Read and compare INI values?

[Shocker]

Hi there!

Looking for a simple way to read and compare different values from different INI files.

It could be 4 files (if exist) or fewer. The values should be same (normally). If they are equal, safe this value to a variable to write in a new INI.

;sections for file_a.ini, file_b.ini, file_c.ini and file_d.ini 
[SectionName1]
Key=Value_A

[SectionName2]
Key=Value_B

[SectionName3]
Key=Value_C

Any idea?

[BrewManNH]

We need more information than this.

What are you comparing from one INI file to another? Are you looking at section names, keys, values of those keys? What have you tried already? Do you have examples of the INI files you want compared and what should the output be in the new INI file using those INI files?

[careca]

From what i understand it's just one name from one section in each file, this should be simple enough, read all 4 values, and do a compare.. but yeah what did you try so far?

 

[caramen]

You can try somthing with

FileExists ( "path" )
FileRead ( "filehandle/filename" [, count] )

IniRead ( "filename", "section", "key", "default" )
IniWrite ( "filename", "section", "key", "value" )

StringCompare ( "string1", "string2" [, casesense = 0] )

 

Edited October 8, 2018 by caramen

[Shocker]

Thx for reply to all!

Try some snippets with Array, but have no idea to compare Row's /Column's...

 

Spoiler

#include <Array.au3>

Local $ini[4] = ["file_a.ini", "file_b.ini", "file_c.ini", "file_d.ini"]

Local $aSection[3][2] = [["Drive", "path"], ["Language", "lang"], ["Servicekey", "active"]]

Local $sArr[1][4]

    For $i = 0 To UBound($ini) - 1

        If FileExists(@ScriptDir & "\" & $ini[$i]) Then

            For $j = 0 To UBound($aSection) - 1

                    $rINI = IniRead(@ScriptDir & "\" & $ini[$i], $aSection[$j][0], $aSection[$j][1], "")
                    If Not @error Then
                        If $rINI <> "" Then

                            If $sArr[Ubound($sArr)-1][$j] <> '' Then
                                ReDim $sArr[Ubound($sArr)+1][3]
                            EndIf

                            $sArr[Ubound($sArr)-1][$j] = $rINI
                        EndIf


                    EndIf

            Next

        EndIf
    Next

_ArrayDisplay($sArr)

 

 

Don't know if the right way? If all section values equal i want save to output.INI...

file_a.ini

file_b.ini

file_c.ini

file_d.ini

[careca]

This was my solution, maybe there are better ones, but this is the best i could do.

#include <Array.au3>
FileDelete('temp.ini')
Local $ini[4] = ["file_a.ini", "file_b.ini", "file_c.ini", "file_d.ini"]
Local $aSection[3][2] = [["Drive", "path"], ["Language", "lang"], ["Servicekey", "active"]]
For $i = 0 To UBound($ini, 1) - 1
    ;ConsoleWrite($i & ' - $ini[?] - ' & $ini[$i] & @CRLF)
    If FileExists(@ScriptDir & "\" & $ini[$i]) Then
        For $j = 0 To UBound($aSection) - 1
            $rINI = IniRead(@ScriptDir & "\" & $ini[$i], $aSection[$j][0], $aSection[$j][1], "")
            If Not @error Then
                ;ConsoleWrite('$rINI - ' & $rINI & @CRLF)
                If $rINI <> "" Then
                    If IniRead('temp.ini', 'temp', $j, "") = '' Then
                        IniWrite('temp.ini', 'temp', $j, $rINI)
                        ConsoleWrite('First Write - '&$ini[$i]&' - '&$rINI&@CRLF)
                    ElseIf IniRead('temp.ini', 'temp', $j, "") = $rINI Then
                        ConsoleWrite('OK! Same value - '&$ini[$i]&' - '&$rINI&@CRLF)
                    Else
                        ConsoleWrite('Different! - '&$ini[$i]&' - '&$aSection[$j][0]&' - '& $aSection[$j][1]&' - '&$rINI&@CRLF)
                    EndIf
                EndIf
            EndIf
        Next
    EndIf
Next

outputs to console, but there's a problem, if the first file to be read is the one different, the script will say all others are different, because it compares the other ones to the first one to be read.

The good part is that if all you want to know is if any of them is different, it does the job.

Edited October 8, 2018 by careca

[iamtheky]

On 10/7/2018 at 3:48 PM, Shocker said:

If they are equal, safe this value to a variable

Plenty of ways to determine if the files are the same take your pick above.... which parts do you want set as variables tho? the KV pairs?

$arrA = FileReadToArray("file_a.ini")

assign(stringsplit($arrA[1] , "=" , 2)[0] , stringsplit($arrA[1] , "=" , 2)[1])
assign(stringsplit($arrA[4] , "=" , 2)[0] , stringsplit($arrA[4] , "=" , 2)[1])
assign(stringsplit($arrA[7] , "=" , 2)[0] , stringsplit($arrA[7] , "=" , 2)[1])

msgbox(0, '' , Eval("path") & @CR & Eval("lang") & @CR & Eval("Active"))