Login validation with INI

[Hemrry]

Hello, I am a bit of a beginner in programming with autoit, please could you help me, I am a bit stuck, I am doing a login with user and password validation, it works very well with iniread, but it can only read a single line of the ini file when you want to add more users or passwords to the ini file continues to read me only the first line and does not validate the rest of the data, and I tried with inireadsection, but there is the problem I am not very clear on how to use it and I looked for an example and tried but I cannot make it work please for whom can help thank you very much

expandcollapse popup

#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <DateTimeConstants.au3>
#include <MsgBoxConstants.au3>
#include <Constants.au3>
#include <GUIConstants.au3>
#include <FontConstants.au3>
#include <WinAPI.au3>
#include <WinAPISysWin.au3>
#include <Array.au3>


Contra()
Prin ()

Func Contra()

Global $Login = GUICreate("Login", 441, 251, -0, -0)
GUISetFont(12, 400, 2, "Times New Roman")
GUISetBkColor(0xFFFFFF)
$Label = GUICtrlCreateLabel("Usuario", 280, 40, 95, 24, $SS_CENTER)
$usur = GUICtrlCreateInput("", 248, 80, 169, 27)
GUICtrlSetBkColor(-1, 0xC8C8C8)
$Pass = GUICtrlCreateInput("", 248, 168, 169, 27, BitOR($GUI_SS_DEFAULT_INPUT,$ES_PASSWORD))
GUICtrlSetBkColor(-1, 0xC8C8C8)
$Labe2 = GUICtrlCreateLabel("Contraseña", 288, 128, 95, 23, $SS_CENTER)
$Button1 = GUICtrlCreateButton("Login", 136, 208, 177, 33)
GUICtrlSetCursor (-1, 0)
$Pic1 = GUICtrlCreatePic("Logo.JPG", 8, 24, 233, 169)
Dim $Login_AccelTable[1][2] = [["{ENTER}", $Button1]]
GUISetAccelerators($Login_AccelTable)
GUISetState(@SW_SHOW)

While 1
   $a = wingetpos("Login")
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

         Case $Button1
            Global $UserInput = GUICtrlRead($usur)
            Global $Passinput = GUICtrlRead($Pass)

if $UserInput = iniread ("User.ini", "Usuario",  1, Default) And $Passinput = iniread ("Pass.ini", "Contraseñas",  1, Default) Then
Prin ()
 Else
     MsgBox(0,"ERROR","Verifique usuario y contraseña")

EndIf
    EndSwitch
WEnd
 EndFunc

  Func Prin ()
GUISetState(@SW_HIDE,$Login)
$VIngreP = GUICreate("Ingreso", 602, 202, 215, 168)
GUISetBkColor(0xFFFFFF)
$Label1 = GUICtrlCreateLabel("! Bienvenido", 16, 8, 88, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Times New Roman")
$Label2 = GUICtrlCreateLabel($UserInput, 104, 8, 61, 23, BitOR($SS_CENTER,$SS_RIGHTJUST), $GUI_WS_EX_PARENTDRAG)
GUICtrlSetFont(-1, 12, 800, 0, "Times New Roman")
GUISetState(@SW_SHOW)


While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd

EndFunc

 

Edited March 25, 2022 by Hemrry

[Nine]

I would suggest you change your ini file to make user name the key, and password the value.  Then you can read ini just once to get the right password associated with the user name.

[ad777]

@Hemrry

if you dont know how to use IniReadSection see below:

$UserIni = IniReadSection("User.ini", "Usuario")
                $PassIni = IniReadSection("Pass.ini", "Contraseñas")
                For $i = 1 To $UserIni[0][0] + $PassIni[0][0]
                    if $i > $UserIni[0][0] Or $i > $PassIni[0][0] Then
                        if $i = $UserIni[0][0] + $PassIni[0][0] Then
                            MsgBox(64, "ERROR", "ERROR")
                        EndIf
                    Else
                        if $UserInput = $UserIni[$i][1] And $Passinput = $PassIni[$i][1] Then ; check every line if it's match [$UserInput]
                            Prin()
                        EndIf
                    EndIf

                Next

User.ini File:

[Usuario]
1=name1
2=name2
3=name3
4=name4

Pass.ini File:

[Contraseñas]
1=de
2=rrr
3=54
4=eed

 

Edited March 25, 2022 by ad777

[Hemrry]

Perfect, thank you very much

[water]

Having all Userids and Passwords in plain text in simple text files isn't very secure, is it?
I hope your security requirements are equal to the security provided by this setup

[jchd]

At the very least, store the userid and a strong hash of "userid & passphrase" possibly with some salt. This way Eve can't easily impersonate any Alice or Bob.

Well in theory since, as you should know, AutoIt scripts even "compiled" aren't immune to reverse-engineering.