run program until multiple conditions are met

[royalmarine]

Hi guys,

quick explanation on what im doing.

my program will run a program called securityApp.exe all the time.

when a usb is inserted with a certain ID, and when a ping response from an ip address of 192.168.1.2 is received,

the securityApp.exe is shutdown until either the usb device is removed or the ping response fails.

when the usb device is plugged in, a file on it is decrypted and text read and verified with that stored in the code.

it works at present in the sense that I plug the usb key in, it decrypts the file, pings the ip address, and when all 3 conditions are met, it will do something.

and likewise when the usb key is removed,

or when the ip address is no longer reachable.

how can i get the securityApp.exe to run all the time until these conditions are met?

ive tinkered with it long enough to come asking for help :/

code below

expandcollapse popup

#include <Crypt.au3>
#include <USBDevice.au3>
While 1
   $aDrives = DriveGetDrive("Removable")
    For $i = 1 To UBound ( $aDrives ) -1
        $_Drive = $aDrives[$i]
        $id = _GetPNPDeviceID($aDrives[$i])
    Next
    Sleep ( 500 )
if WinExists("AutoPlay","Removable Disk") then WinClose("AutoPlay")
   ; auto closes the AutoPlay window from USB insertion
WEnd
; when device is inserted
Func sink_OnObjectReady($objObject, $objAsyncContext)
    Local $choice

    If $objObject.TargetInstance.DriveType = 2 Then
        Select
        Case $objObject.Path_.Class () = "__InstanceCreationEvent"
    
    
            if $id = "UNIQUEIDOFUSB" Then   
; if correct device
    
      Local $var = Ping("192.168.1.2", 250)
      If @error = 0 Then
; ping succesful
    
         _Crypt_DecryptFile("E:encrypt", "E:decrypt", "passowrd", $CALG_AES_256)
         ; decrypts the file called "encrypt", outputs to decrypt, using password and AES_256 algorithmn
         Local $file = FileOpen("E:decrypt", 0)
         ; reads the decrypt file into buffer
         local $line2 = "this line is required to match"
         ; variable to match the read file to
         Local $line = FileReadLine($file)
         ; Read in lines of text until the EOF is reached
    
;** Variables Match **;
         If $line == $line2 Then
         ;MsgBox(0, "Success", "Ping succesful, Correct Device Inserted, variables match")
         ;debug info
         Consolewrite("Drive " & $objObject.TargetInstance.DeviceId & " has been added." & @CR)
         Consolewrite("Ping succesful" & @CR)
         ConsoleWrite("file succesfully decrypted and variables match")
         processclose("securityApp.exe")
         FileClose($file)
         ; removes file from buffer
         FileDelete("E:decrypt")
         ; deletes the decrypted file
         FileRecycleEmpty("C:")
         ; empties the recycle bin
         sleep(500)
    
    
;** Variables Dont Match **;
         Else
         FileClose($file)
         ; removes file from buffer
         FileDelete("E:decrypt")
         ; deletes the decrypted file
         FileRecycleEmpty("C:")
         FileRecycleEmpty("E:")
         ; empties the recycle bin
         sleep(500)
    
         EndIf
      Else
; ping un-succesful
       sleep(500)
      EndIf 
; end if correct device
            Else
; if wrong device
       sleep(500)  
; end if wrong device  
            EndIf
; when device is removed
   Case $objObject.Path_.Class () = "__InstanceDeletionEvent"
  
   ;MsgBox(0, "device", "device removed")
   If (Not ProcessExists("securityApp.exe")) Then
      Run("securityApp.exe")
   Else
      Sleep(500)
   EndIf
   Case Else
   EndSelect
    EndIf
EndFunc

Edited February 23, 2012 by royalmarine

[royalmarine]

would a do/until loop make the program open over and over until the condition is met?

e.g.

do

run("notepad.exe")

until

; condition is met.

[JohnQSmith]

would a do/until loop make the program open over and over until the condition is met?

Yes

[Blinky]

u can make 3 functions that veryfi usb id , data on the usb and ping and structure your script like this

Global $status=0
while 1
while $status=0
  if usb_id()=1 And key_file()=1 And pc_ping()=1 Then
   $status=1
  Else
   If (Not ProcessExists("securityApp.exe")) Then Run("securityApp.exe")
   Sleep(500) 
  EndIf
WEnd


while $status=1
  If ProcessExists("securityApp.exe") Then ProcessClose("securityApp.exe")
  if usb_id()=0 Or pc_ping()=0 Then $status=0
  Sleep(500)
WEnd
WEnd

Func usb_id()
If True Then
  Return 1
Else
  Return 0
EndIf
EndFunc

[Blinky]

u can also use _StringEncript|() function to avoid use of other files

[BrewManNH]

You wouldn't want to use the _StringEncrypt function, the encryption is pretty weak with it. Besides, you can't use the _StringEncrypt function without including the File.au3 UDF.

[Blinky]

@BrewManNH the _StringEncrypt is in the string.au3 and he can remove the crypt.au3

i dont know very well these functions but i gues they use the same type of key encription and at the very best the stringEncript is way slower.