Going Crazy

[kudrow]

OK I am going crazy with StingRegExp. I have to be missing something. It is giving me a positive match for a SINGLE letter of the string to look for. So if I tell it to look for "pass" and the search string contains password it returns positive. Why does it not match EXACT!? I am not looking for partial matches, I need exact, case sensitive as well. 

Any thoughts?

[JohnOne]

Code?

[kudrow]

$inBoundip = $sClientIPAddress
    $inBoundData = TCPRecv ($iSocket, 5)
    If $inBoundData=="login" Then
        TCPSend ($iSocket, "success")
        $inBoundData = TCPRecv ($iSocket, 2048)
    $convert = BinaryToString ($inBoundData)

    $convert2 = BinaryToString (_EncDec(0, $convert))
    $stringtosplit = StringSplit($convert2, "#")
    $username = $stringtosplit[1]
    $password = $stringtosplit[2]
    $path = "C:\accounts\" & $username & "\" & $username & ".txt"
    $accountExists = FileExists ($path)
    If $accountExists == 1 Then
        $datafile = FileRead ($path)
        $chckpass = StringRegExp($datafile, $password)

The string it is evaluating is a text file containing other data including a password. I am searching the entire data file to see if $password exist in it. So if the users password is "password" and its inside the data file and $password = "pass" or "pa" or "word" or any character it returns true. It should be able to see that "pass" is not an exact match to "password".

[Melba23]

kudrow,

Something like this perhaps:

$sKey = "blah"

Global $aString[3] = ["BlahblahBlah", " blah", "blah"]

For $i = 0 To 2
    If StringRegExp($aString[$i], "^" & $sKey & "$") Then
        ConsoleWrite("Found" & @CRLF)
    Else
        ConsoleWrite("Not Found" & @CRLF)
    EndIf
Next

M23 Edited January 15, 2015 by Melba23
Typo

[JohnOne]

Where's your pattern?

looks like you just need StringInStr.

[mikell]

This will match the whole word only

$sKey = "pa"

Global $aString[3] = ["pass", " password", "pa"]

For $i = 0 To 2
    If StringRegExp($aString[$i], "\b" & $sKey & "\b") Then
        ConsoleWrite("Found" & @CRLF)
    Else
        ConsoleWrite("Not Found" & @CRLF)
    EndIf
Next

Edited January 15, 2015 by mikell

[Valuater]

This is how I would do it

$sKey = "pa"

 

Global $aString[3] = ["pass", " password", "pa"]

 

For $i = 0 To 2

    If $aString[$i] == $sKey Then

        ConsoleWrite("Found" & @CRLF)

    Else

        ConsoleWrite("Not Found" & @CRLF)

    EndIf

Next

[jguinch]

I agree with J1 : StringInStr should suffice, no ?

Also, be careful to special chars (reserved chars of RegExp) in your key that you want to search to. You should use "Q" & $sKey & "E" To match something like P@$$w0rd+

[Valuater]

I truly believe that the == is the fastest absolute test.

8)

[JohnOne]

Sure, if it's an array of words, but looks like these are data packets. and the string is in the data, somewhere.

StringInStr with tell you that it's there and where it is.

[kudrow]

Thank you for the replies everyone. I did try StingInStr before I posted for help and received the same results. I received positive returns on partial matches. I am going to evaluate the examples yall provided above to see if I can understand them and then test them. Thanks again everyone for the help!

I am a little confused. $password can be anything. It is actually a string from a login GUI. I take this string and use it as the pattern to search for. So if a users stored password is "AutoITRocks" and they enter (for example) "Auto" in the password field of the GUI, it returns a true value based on the partial match.

Edited January 15, 2015 by kudrow

[mikell]

 

The string it is evaluating is a text file containing other data including a password. I am searching the entire data file to see if $password exist in it.

 

So "==" will obviously don't do the trick, either StringInStr because it will match "pa" in "password" - requirements quite clear in OP's post #3

[JohnOne]

$Password = "pass"
$data = " big sting of data including the pissward password inside as well as the shorter pass word"

If StringInStr($data, " " & $Password & " ") Then
    MsgBox(0, "Woo", "Hoooo!")
EndIf

[SmOke_N]

Maybe:

StringRegExp($string, "\b\Q" & $password & "\E\b")

?

Edit:

or exact match:

StringRegExp($string, "^\b\Q" & $password & "\E\z")

Edited January 15, 2015 by SmOke_N

[kudrow]

Where's your pattern?

looks like you just need StringInStr.

The pattern is $password

[guinness]

I am going to throw that out there, look in my signature for PasswordValid to check the validity of the password too e.g. enough digits, lowercase chars etc.

[kudrow]

$Password = "pass"
$data = " big sting of data including the pissward password inside as well as the shorter pass word"

If StringInStr($data, " " & $Password & " ") Then
    MsgBox(0, "Woo", "Hoooo!")
EndIf

 

Ok so this is looking for spaces on either side of the variable $password correct?

[JohnOne]

Yes, I suppose it's a rather poor example

[kylomas]

Yes, I suppose it's a rather poor example

 

No it's not. 

It is essentially the same as

Stringregexp($data, '\b\Q' & $Password & '\E\b')

as suggested earlier.

The OP's problem was not making the match restrictive enough.

kylomas

Edited January 15, 2015 by kylomas

[kudrow]

I am going to throw that out there, look in my signature for PasswordValid to check the validity of the password too e.g. enough digits, lowercase chars etc.

 

Got it! I will be using this for the registration side of the script! Thank you!