Título: [batch-vbs] ejemplo de crackeo por brute force Publicado por: The Shadow en 16 Febrero 2008, 00:18 am info:
-permite el uso de diccionarios (archivos que dentro contienen una lista de palabras para q el programa las analize) -agrega las letras mayusculas del abecedario al analisis -reconoce por si mismo la cantidad de caracteres q posee la clave ... osea q ya no es necesario especificar la longitud de la clave -evita al minimo los errores humanos en la introduccion de datos (introducir una clave nula o no introducir clave, introducir una clave de mas de 9 caracteres, introducir espacios dentro de la clave, introducir un diccionario que no exista, etc) -igual q n la version anterior... el prog puede trabajar desde una llamada del cmd (como un comando)... la sintaxis a cambiado a: c:\>fb3 X Y donde c:\=ruta donde esta el programa; fb3=nombre del programa; X=clave; Y=ruta del diccionario* si no se va a usar diccionario la sintaxis cambia a: c:\>fb3 X donde c:\=ruta donde esta el programa; fb3=nombre del programa; X=clave ejemplos: 1) c:\>fb3 a52 2) c:\>fb3 localroot dic1.txt explicaciones: 1) buskra la pass "a52" por fuerza bruta 2) buskra la pass "localroot" con el diccionario "dic1.txt", si no la encuentra, buskra por fuerza bruta ejemplo de un diccionario compatible: --------------------------dic1.txt----- admin root 1a2b system sysroot null 123456789 mariana 111111111 slipknot abcd localroot time quote ------------------------fin(dic1.txt)--------- code del soft: -------------------------------------------------------------------------------fb3.bat------------------------ Citar @echo off -------------------------------------------------------------------------------------fin(fb3.bat)------color a if not '%1==' (set pk=%1 if not %2'==' set rta=%2 set pj=mce.bat m goto cnn) set pj=start /max mce.bat cls echo. echo. :ps set /p dic=Usara diccionario S/N? if %dic:~0,1%==S goto rd if %dic:~0,1%==s goto rd goto prs :rd set /p rta=Ruta donde se encuentra el diccionario? if %rta%t==t goto ps :prs set /p pk=pass? :cnn set nop=666 set d=no set pass=%pk: =% set pk=%pass% if %pass:~0,1%a==a ( cls color c echo Debe darle al programa una pass para buscar! pause color a goto ps ) if %pass:~1,1%a==a (set nop=1 goto op) if %pass:~2,1%a==a (set nop=2 goto op) if %pass:~3,1%a==a (set nop=3 goto op) if %pass:~4,1%a==a (set nop=4 goto op) if %pass:~5,1%a==a (set nop=5 goto op) if %pass:~6,1%a==a (set nop=6 goto op) if %pass:~7,1%a==a (set nop=7 goto op) if %pass:~8,1%a==a (set nop=8 goto op) if %pass:~9,1%a==a (set nop=9 goto op) if %nop%==666 ( set pass=%pass:~0,9% set nop=9 ) :op if not %rta%'==' if exist %rta% set d=si if %d%==si ( for /f "tokens=* delims=" %%v in (%rta%) do ( color 4 echo Probando %%v==%pass% if %%v==%pass% ( echo. color a && echo Pass Encontrada! pause goto %pj:~0,1% ) ) ) :op2 set n=1 set /a np=%nop%+1 echo 0 >da.tk echo %np% >plo.tk echo @echo off >jl.tk echo set rop=_1k >>jl.tk echo color 4 >>jl.tk echo set tip=_time_ >>jl.tk echo set pass=%pk% >>jl.tk echo goto x1 >>jl.tk :a if %n%==10 (set n=%nop% goto l) echo %n% >>da.tk set /A n=%n%+1 goto a :l if %n%==0 goto le echo %n% >>plo.tk set /A n=%n%-1 goto l :le echo a >>da.tk echo b >>da.tk echo c >>da.tk echo d >>da.tk echo e >>da.tk echo f >>da.tk echo g >>da.tk echo h >>da.tk echo i >>da.tk echo j >>da.tk echo k >>da.tk echo l >>da.tk echo m >>da.tk echo n >>da.tk echo o >>da.tk echo p >>da.tk echo q >>da.tk echo r >>da.tk echo s >>da.tk echo t >>da.tk echo u >>da.tk echo v >>da.tk echo w >>da.tk echo x >>da.tk echo y >>da.tk echo z >>da.tk echo A >>da.tk echo B >>da.tk echo C >>da.tk echo D >>da.tk echo E >>da.tk echo F >>da.tk echo G >>da.tk echo H >>da.tk echo I >>da.tk echo J >>da.tk echo K >>da.tk echo L >>da.tk echo M >>da.tk echo N >>da.tk echo O >>da.tk echo P >>da.tk echo Q >>da.tk echo R >>da.tk echo S >>da.tk echo T >>da.tk echo U >>da.tk echo V >>da.tk echo W >>da.tk echo X >>da.tk echo Y >>da.tk echo Z >>da.tk goto for :mc set a=%1 set /A a1=%a%+1 if %a%==%np% ( echo :x%a% >>jl.tk echo set a1=_2_1 >>jl.tk echo echo Probando _a1: =_=_pass_ >>jl.tk echo if _a1_==_pass_ ˇcolor a >>jl.tk echo echo Pass encontrada >>jl.tk echo echo. >>jl.tk echo echo. >>jl.tk echo echo Hora de inicio: _tip_ >>jl.tk echo echo Hora de finalizacion: _time_ >>jl.tk echo pause >>jl.tk echo del /s /q *.tk, rep.vbs ^> nul >>jl.tk echo goto _rop_ >>jl.tk echo :k >>jl.tk echo exit >>jl.tk echo :mk >>jl.tk echo title Simbolo de sistema >>jl.tk echo color 7 >>jl.tk echo cmd $ >>jl.tk echo goto :EOF >>jl.tk goto :EOF ) if %a%==1 ( echo :x%a% >>jl.tk echo for /F "tokens=*" __v in ˇda.tk$ do call :x%a1% __v >>jl.tk goto :EOF ) echo :x%a% >>jl.tk echo set a1=_2_1 >>jl.tk echo for /F "tokens=*" __v in (da.tk) do call :x%a1% __v _a1_ >>jl.tk echo goto :EOF >>jl.tk goto :EOF :for for /F "tokens=*" %%v in (plo.tk) do call :mc %%v if exist "mce.bat" del mce.bat echo set shell = CreateObject("Scripting.FileSystemObject") > rep.vbs echo set file = shell.OpenTextFile("jl.tk") >> rep.vbs echo read = file.ReadAll >> rep.vbs echo repla = replace(read,"_",chr(37)) >> rep.vbs echo repla1 = replace(repla,"ˇ",chr(40)) >> rep.vbs echo repla2 = replace(repla1,"$",chr(41)) >> rep.vbs echo set b=shell.CreateTextFile("mce.bat") >> rep.vbs echo b.close >> rep.vbs echo set d=shell.OpenTextFile("mce.bat",2) >> rep.vbs echo d.write repla2 >> rep.vbs echo d.close >> rep.vbs start rep.vbs ping -n 4 localhost >nul %pj% goto %pj:~0,1% :s exit :m Saludos |