Usuario: Contraseña:
¿Olvidaste tu contraseña?
Inicio Ayuda Buscar Ingresar Registrarse
Foros El Hacker » Hacking » Vulnerabilidades & Exploits » Busca Panel de administracion, By KuNdUz
ANONYMOUS ESTÁ AQUÍ. ÚNETE A LA CAUSA, STOP SOPA!
En los siguientes enlaces encontrarás la información necesaria para poder aportar y formar parte de las operaciones.
Link: http://el-hacker.com.ar/anonymous/
Facebook: ANONYMOUS ARGENTINA
IRC Network Ops: irc.anonops.pro:6667 (SSL:6697) (#argentina,#ddos,#defacement,#anonops,#opblackout,#setup) ¡Basta con difundir estos medios para ayudar con la causa!
Nueva respuesta
Páginas: [1]

Autor Tema: Busca Panel de administracion, By KuNdUz  (Leído 3475 veces)

02 de octubre de 2010, 02:02


  • Puntos: 0
  • Mensajes: 23
  • Agradeció 0 veces y fue agradecido 3 veces en 3 mensajes
Busca Panel de administracion, By KuNdUz
Código: [Seleccionar]
#!usr/bin/perl

##
#CodedByKuNdUz
##

useTk;
useHTTP::Request;
useLWP::UserAgent;

$mw=MainWindow->new(-background=>"black",-cursor=>"crosshair");
$mw->geometry("1070x325+100+300");
$mw->title("|_^_|AdminControlPanelFinderv1.2|_^_|");
$mw->resizable(0,0);

$statusbar="|_^_|AdminControlPanelFinderv1.2|_^_|";
$statusbottom=$mw->Label(-textvariable=>\$statusbar,-relief=>'flat',-background=>"black",-foreground=>"red",-font=>"Verdana7",-width=>120)->place(-x=>240,-y=>307);
$mw->Label(-background=>"black",-foreground=>"black")->pack();
$stat="ControlPanelFound";
$sta=$mw->Label(-textvariable=>\$stat,-relief=>'flat',-background=>"black",-foreground=>"red",-font=>"Verdana9")->place(-x=>380,-y=>10);
$stat1="ControlPanelNotFound";
$st=$mw->Label(-textvariable=>\$stat1,-relief=>'flat',-background=>"black",-foreground=>"red",-font=>"Verdana9")->place(-x=>786,-y=>10);
$test1=$mw->Scrolled("Text",-scrollbars=>'oe',-font=>"Verdana8",-background=>"black",-foreground=>"red",-selectbackground=>"red",-insertbackground=>"red",-relief=>"ridge",-width=>55,-height=>20)->pack(-side=>'right',-anchor=>'e');
$test2=$mw->Scrolled("Text",-scrollbars=>'oe',-font=>"Verdana8",-background=>"black",-foreground=>"red",-selectbackground=>"red",-insertbackground=>"red",-relief=>"ridge",-width=>55,-height=>20)->pack(-side=>'right',-anchor=>'e');
$mw->Label(-background=>"black",-foreground=>"black")->pack();
$mw->Label(-background=>"black",-foreground=>"black")->pack();
$mw->Label(-background=>"black",-foreground=>"black")->pack();
$mw->Label(-background=>"black",-foreground=>"red",-font=>"Verdana9",-text=>"EnterSite")->pack(-anchor=>'nw');
$mw->Entry(-background=>"black",-foreground=>"red",-selectbackground=>"black",-insertbackground=>"red",-width=>40,-relief=>"ridge",-textvariable=>\$site)->pack(-anchor=>'nw');
$mw->Label(-background=>"black",-foreground=>"red",-font=>"Verdana9",-text=>"EnterSiteSourceCode")->pack(-anchor=>'nw');
$mw->Entry(-background=>"black",-foreground=>"red",-selectbackground=>"black",-insertbackground=>"red",-width=>40,-relief=>"ridge",-textvariable=>\$code)->pack(-anchor=>'nw');
$mw->Label(-background=>"black",-foreground=>"black")->pack();
$mw->Label(-background=>"black",-foreground=>"black")->pack();
$mw->Button(-activebackground=>"red",-activeforeground=>"black",-background=>"black",-foreground=>"red",-font=>"Verdana7",-relief=>"groove",-text=>"Start",-width=>5,-command=>\&scan)->place(-x=>40,-y=>190);
$mw->Button(-activebackground=>"red",-activeforeground=>"black",-background=>"black",-foreground=>"red",-font=>"Verdana7",-relief=>"groove",-text=>"Stop",-width=>5,-command=>\&sto)->place(-x=>95,-y=>190);
$mw->Button(-activebackground=>"red",-activeforeground=>"black",-background=>"black",-foreground=>"red",-font=>"Verdana7",-relief=>"groove",-text=>"Clear",-width=>5,-command=>\&cle)->place(-x=>150,-y=>190);
$mw->Button(-activebackground=>"red",-activeforeground=>"black",-background=>"black",-foreground=>"red",-font=>"Verdana7",-relief=>"groove",-text=>"Help/About",-width=>9,-command=>\&heaab)->place(-x=>50,-y=>240);
$mw->Button(-activebackground=>"red",-activeforeground=>"black",-background=>"black",-foreground=>"red",-font=>"Verdana7",-relief=>"groove",-text=>"Exit",-width=>5,-command=>sub{exit})->place(-x=>133,-y=>240);

MainLoop;

subheaab{
$about=$mw->Toplevel(-background=>"black",-cursor=>"crosshair");
$about->geometry("500x422+425+250");
$about->title("|_^_|AdminControlPanelFinderv1.2|_^_|");
$about->resizable(0,0);
$about->Label(-background=>"black",-foreground=>"red")->pack();
$about->Label(-background=>"black",-foreground=>"red",-font=>"Cambria10",-text=>"|_^_|AdminControlPanelFinderv1.2Help|_^_|\n")->pack();
$about->Label(-background=>"black",-foreground=>"red",-font=>"Cambria10",-text=>"-EnterSite-\nEnterTargetaddress,\nexemplarilywww.site.comorwww.site.com/path")->pack();
$about->Label(-background=>"black",-foreground=>"red",-font=>"Cambria10",-text=>"-EnterSiteSourceCode-\nEntertargetsitesourcecode.\nSitesourcecodephpisthewritephpor\nSitesourcecodeaspisthewriteasp")->pack();
$about->Label(-background=>"black",-foreground=>"red",-font=>"Cambria10",-text=>"\nEx:\nEnterSite:www.target.com\nEnterSiteSourceCode:php")->pack();
$about->Label(-background=>"black",-foreground=>"red")->pack();
$about->Label(-background=>"black",-foreground=>"red",-font=>"Cambria10",-text=>"|_^_|AdminControlPanelFinderv1.2About|_^_|\n")->pack();
$about->Label(-background=>"black",-foreground=>"red",-font=>"wingdings22",-text=>"7")->pack();
$about->Label(-background=>"black",-foreground=>"red",-font=>"Cambria11",-text=>"CodedByKuNdUz")->pack();
$about->Label(-background=>"black",-foreground=>"red",-font=>"Cambria11",-text=>"Enjoy!")->pack();
$about->Label(-background=>"black",-foreground=>"red",-font=>"Cambria8",-text=>"10/12/2008")->pack(-anchor=>"se");
$about->Button(-activebackground=>"red",-activeforeground=>"black",-background=>"black",-foreground=>"red",-relief=>"groove",-font=>"Verdana7",-text=>"Exit",-command=>[$about=>'destroy'])->pack(-fill=>"both");
}

subcle{
$test1->delete("0.0","end");
$test2->delete("0.0","end");
}

substo{
$sisite="",
$ways="",
@path1=""
}

subscan{

$test1->delete("0.0","end");
$test2->delete("0.0","end");

$sisite=$site;

if($sisite!~/^http:/){
$sisite='http://'.$sisite;
}
if($sisite!~/\/$/){
$sisite=$sisite.'/';
}

if($codeeq"php"){
@path1=('admin/','administrator/','moderator/','webadmin/','adminarea/','bb-admin/','adminLogin/','admin_area/','panel-administracion/','instadmin/',
'memberadmin/','administratorlogin/','adm/','admin/account.php','admin/index.php','admin/login.php','admin/admin.php','admin/account.php',
'admin_area/admin.php','admin_area/login.php','siteadmin/login.php','siteadmin/index.php','siteadmin/login.html','admin/account.html','admin/index.html','admin/login.html','admin/admin.html',
'admin_area/index.php','bb-admin/index.php','bb-admin/login.php','bb-admin/admin.php','admin/home.php','admin_area/login.html','admin_area/index.html',
'admin/controlpanel.php','admin.php','admincp/index.asp','admincp/login.asp','admincp/index.html','admin/account.html','adminpanel.html','webadmin.html',
'webadmin/index.html','webadmin/admin.html','webadmin/login.html','admin/admin_login.html','admin_login.html','panel-administracion/login.html',
'admin/cp.php','cp.php','administrator/index.php','administrator/login.php','nsw/admin/login.php','webadmin/login.php','admin/admin_login.php','admin_login.php',
'administrator/account.php','administrator.php','admin_area/admin.html','pages/admin/admin-login.php','admin/admin-login.php','admin-login.php',
'bb-admin/index.html','bb-admin/login.html','bb-admin/admin.html','admin/home.html','login.php','modelsearch/login.php','moderator.php','moderator/login.php',
'moderator/admin.php','account.php','pages/admin/admin-login.html','admin/admin-login.html','admin-login.html','controlpanel.php','admincontrol.php',
'admin/adminLogin.html','adminLogin.html','admin/adminLogin.html','home.html','rcjakar/admin/login.php','adminarea/index.html','adminarea/admin.html',
'webadmin.php','webadmin/index.php','webadmin/admin.php','admin/controlpanel.html','admin.html','admin/cp.html','cp.html','adminpanel.php','moderator.html',
'administrator/index.html','administrator/login.html','user.html','administrator/account.html','administrator.html','login.html','modelsearch/login.html',
'moderator/login.html','adminarea/login.html','panel-administracion/index.html','panel-administracion/admin.html','modelsearch/index.html','modelsearch/admin.html',
'admincontrol/login.html','adm/index.html','adm.html','moderator/admin.html','user.php','account.html','controlpanel.html','admincontrol.html',
'panel-administracion/login.php','wp-login.php','adminLogin.php','admin/adminLogin.php','home.php','admin.php','adminarea/index.php',
'adminarea/admin.php','adminarea/login.php','panel-administracion/index.php','panel-administracion/admin.php','modelsearch/index.php',
'modelsearch/admin.php','admincontrol/login.php','adm/admloginuser.php','admloginuser.php','admin2.php','admin2/login.php','admin2/index.php',
'adm/index.php','adm.php','affiliate.php','adm_auth.php','memberadmin.php','administratorlogin.php'
);

foreach$ways(@path1){
$statusbar="Scaningpath:".$ways;
$statusbottom->update();
$statusbar="|_^_|AdminControlPanelFinderv1.2|_^_|";
$final=$sisite.$ways;
$req=HTTP::Request->new(GET=>$final);
$ua=LWP::UserAgent->new();
$ua->timeout(30);
$response=$ua->request($req);

if($response->content=~/Username/||
$response->content=~/Password/||
$response->content=~/username/||
$response->content=~/password/||
$response->content=~/USERNAME/||
$response->content=~/PASSWORD/||
$response->content=~/Senha/||
$response->content=~/senha/||
$response->content=~/Personal/||
$response->content=~/Usuario/||
$response->content=~/Clave/||
$response->content=~/Usager/||
$response->content=~/usager/||
$response->content=~/Sing/||
$response->content=~/passe/||
$response->content=~/P\/W/||
$response->content=~/AdminPassword/
){
$test2->insert('end',$final."\n");
}else{
$test1->insert('end',$final."\n");
}
}
}

if($codeeq"asp"){
@path1=('admin/','administrator/','moderator/','webadmin/','adminarea/','bb-admin/','adminLogin/','admin_area/','panel-administracion/','instadmin/',
'memberadmin/','administratorlogin/','adm/','account.asp','admin/account.asp','admin/index.asp','admin/login.asp','admin/admin.asp',
'admin_area/admin.asp','admin_area/login.asp','admin/account.html','admin/index.html','admin/login.html','admin/admin.html',
'admin_area/admin.html','admin_area/login.html','admin_area/index.html','admin_area/index.asp','bb-admin/index.asp','bb-admin/login.asp','bb-admin/admin.asp',
'bb-admin/index.html','bb-admin/login.html','bb-admin/admin.html','admin/home.html','admin/controlpanel.html','admin.html','admin/cp.html','cp.html',
'administrator/index.html','administrator/login.html','administrator/account.html','administrator.html','login.html','modelsearch/login.html','moderator.html',
'moderator/login.html','moderator/admin.html','account.html','controlpanel.html','admincontrol.html','admin_login.html','panel-administracion/login.html',
'admin/home.asp','admin/controlpanel.asp','admin.asp','pages/admin/admin-login.asp','admin/admin-login.asp','admin-login.asp','admin/cp.asp','cp.asp',
'administrator/account.asp','administrator.asp','login.asp','modelsearch/login.asp','moderator.asp','moderator/login.asp','administrator/login.asp',
'moderator/admin.asp','controlpanel.asp','admin/account.html','adminpanel.html','webadmin.html','pages/admin/admin-login.html','admin/admin-login.html',
'webadmin/index.html','webadmin/admin.html','webadmin/login.html','user.asp','user.html','admincp/index.asp','admincp/login.asp','admincp/index.html',
'admin/adminLogin.html','adminLogin.html','admin/adminLogin.html','home.html','adminarea/index.html','adminarea/admin.html','adminarea/login.html',
'panel-administracion/index.html','panel-administracion/admin.html','modelsearch/index.html','modelsearch/admin.html','admin/admin_login.html',
'admincontrol/login.html','adm/index.html','adm.html','admincontrol.asp','admin/account.asp','adminpanel.asp','webadmin.asp','webadmin/index.asp',
'webadmin/admin.asp','webadmin/login.asp','admin/admin_login.asp','admin_login.asp','panel-administracion/login.asp','adminLogin.asp',
'admin/adminLogin.asp','home.asp','admin.asp','adminarea/index.asp','adminarea/admin.asp','adminarea/login.asp','admin-login.html',
'panel-administracion/index.asp','panel-administracion/admin.asp','modelsearch/index.asp','modelsearch/admin.asp','administrator/index.asp',
'admincontrol/login.asp','adm/admloginuser.asp','admloginuser.asp','admin2.asp','admin2/login.asp','admin2/index.asp','adm/index.asp',
'adm.asp','affiliate.asp','adm_auth.asp','memberadmin.asp','administratorlogin.asp','siteadmin/login.asp','siteadmin/index.asp','siteadmin/login.html'
);

foreach$ways(@path1){
$statusbar="Scaningpath:".$ways;
$statusbottom->update();
$statusbar="|_^_|AdminControlPanelFinderv1.2|_^_|";
$final=$sisite.$ways;
$req=HTTP::Request->new(GET=>$final);
$ua=LWP::UserAgent->new();
$ua->timeout(30);
$response=$ua->request($req);

if($response->content=~/Username/||
$response->content=~/Password/||
$response->content=~/username/||
$response->content=~/password/||
$response->content=~/USERNAME/||
$response->content=~/PASSWORD/||
$response->content=~/Senha/||
$response->content=~/senha/||
$response->content=~/Personal/||
$response->content=~/Usuario/||
$response->content=~/Clave/||
$response->content=~/Usager/||
$response->content=~/usager/||
$response->content=~/Sing/||
$response->content=~/passe/||
$response->content=~/P\/W/||
$response->content=~/AdminPassword/
){
$test2->insert('end',$final."\n");
}else{
$test1->insert('end',$final."\n");
}
}
}
}

##
#CodedByKuNdUz
##
« Última Modificación: 02 de octubre de 2010, 02:02 por unish »

02 de octubre de 2010, 02:02


  • Puntos: 0
  • Sexo: Masculino
  • Mensajes: 18
  • Agradeció 0 veces y fue agradecido 3 veces en 3 mensajes
  • El Exito solo se logra con esfuerzo.
Re: Busca Panel de administracion, By KuNdUz
jajjaja perdona mi ignorancia pero como se usa :S ??? ajajaja Perdon :D pero quiero aprender :D

02 de octubre de 2010, 02:02


  • Administrador
  • Puntos: 10
  • Mensajes: 197
  • Agradeció 78 veces y fue agradecido 83 veces en 50 mensajes
Re: Busca Panel de administracion, By KuNdUz
Cita de: loku en 02 de octubre de 2010, 02:02
jajjaja perdona mi ignorancia pero como se usa :S ??? ajajaja Perdon :D pero quiero aprender :D

Viendo el código veo que el script escanea un determinado dominio y busca directorios clave como 'admin', 'panel', etc. Luego busca también palabras claves tales como Username, Password.

Útil para ahorrar algo de tiempo.

Saludos!

02 de octubre de 2010, 02:02


  • Puntos: 0
  • Mensajes: 23
  • Agradeció 0 veces y fue agradecido 3 veces en 3 mensajes
Re: Busca Panel de administracion, By KuNdUz
el escaner señala algunos de los directorios q tiene una determinada pagina.

para usarlo , te instalas el ActivePerl y luego llamas al exploit desde una linea de comandos y sigues las indicaciones

02 de octubre de 2010, 03:03


  • Puntos: 0
  • Sexo: Masculino
  • Mensajes: 18
  • Agradeció 0 veces y fue agradecido 3 veces en 3 mensajes
  • El Exito solo se logra con esfuerzo.
Re: Busca Panel de administracion, By KuNdUz
:O waaaa Ok :D Graciasssss pues me gustaria saber un poco mas del tema Blozzter Buen aporte cuando tengas un tiempo y si no es mucha molestia podias postiar el programa y decir como funciona de antemano gracias :D

02 de octubre de 2010, 15:03

jex



  • Puntos: 0
  • Mensajes: 30
  • Agradeció 0 veces y fue agradecido 5 veces en 4 mensajes
Re: Busca Panel de administracion, By KuNdUz
mira, yo uso uno que esta piola, lo que haces es meter la url y el programa te escanea con una serie de directorios que podes encontrar en admin.txt
lo que tiene de bueno es justamente eso, que podes agregarle nuevos directorios, y el programa se va a encargar de verificarlos.
una vez que recibe una respuesta de ese directorio lo lista para que puedas entrar.

lo subo a MU cualquier cosa si se cae me dicen y lo subo de nuevo:

http://www.megaupload.com/?d=H0HXTUUN

saludos che

02 de octubre de 2010, 15:03


  • Administrador
  • Puntos: 10
  • Mensajes: 197
  • Agradeció 78 veces y fue agradecido 83 veces en 50 mensajes
Re: Busca Panel de administracion, By KuNdUz
Hola Jex!

No descargué el archivo porque ya me estoy llendo, pero por lo que decis es lo mismo, sólo que aquí los directorios están declarados en el código e imagino que el programa que usas debe tener una interfaz gráfica pero la función es la misma.

Quería avisar, si los archivos que quieren subir no superan el límite actual del foro de 256 KB (Que será expandido pronto) cárguenlos como adjuntos así nos aseguramos de que permanezcan siempre en línea.

Saludos.

02 de octubre de 2010, 15:03

jex



  • Puntos: 0
  • Mensajes: 30
  • Agradeció 0 veces y fue agradecido 5 veces en 4 mensajes
Re: Busca Panel de administracion, By KuNdUz
si si entiendo lo que hace ese código, pero el otro por ahí es mucho mas cómodo por lo que decís, la interfaz gráfica, y la posibilidad de importar nuevos directorios directamente en el .txt

02 de octubre de 2010, 15:03


  • Administrador
  • Puntos: 10
  • Mensajes: 197
  • Agradeció 78 veces y fue agradecido 83 veces en 50 mensajes
Re: Busca Panel de administracion, By KuNdUz
Claro que es más cómodo, igual ya que dijiste que querés aprender más del tema, insisto en que utilices estos códigos perl y veas con la flexibilidad que corren. Lo mejor de todo, es que si sabés programar, ves con pura claridad que es exactamente lo que el script hace al ejecutarse. Y al final, es bueno escribir uno sus propios códigos para no depender de aplicaciones que muchas veces no se ajustan a lo que necesitamos, en estos días estaré aportando sobre el tema!...

Un Saludo Jex!!

02 de octubre de 2010, 21:09


  • Puntos: 0
  • Sexo: Masculino
  • Mensajes: 18
  • Agradeció 0 veces y fue agradecido 3 veces en 3 mensajes
  • El Exito solo se logra con esfuerzo.
Re: Busca Panel de administracion, By KuNdUz
Emmmmm No funciona :( ajajaja instale el active perl y no va el otro que postiaste si sirve pero este no si puedes verficar el codigo gracias :D

01 de diciembre de 2010, 20:08


  • Puntos: -1
  • Mensajes: 2
  • Agradeció 1 vez y fue agradecido 1 vez en 1 mensaje
Re: Busca Panel de administracion, By KuNdUz
buen codigo pero pena que no funcione

02 de diciembre de 2010, 11:11


  • Puntos: 0
  • Mensajes: 23
  • Agradeció 0 veces y fue agradecido 3 veces en 3 mensajes
Re: Busca Panel de administracion, By KuNdUz
Cita de: lampone en 01 de diciembre de 2010, 20:08
buen codigo pero pena que no funcione

si funciona, no es mi  culpa si no lo sabes utilizar.

02 de diciembre de 2010, 17:05


  • Administrador
  • Puntos: 10
  • Mensajes: 197
  • Agradeció 78 veces y fue agradecido 83 veces en 50 mensajes
Re: Busca Panel de administracion, By KuNdUz
Cita de: loku en 02 de octubre de 2010, 21:09
Emmmmm No funciona :( ajajaja instale el active perl y no va el otro que postiaste si sirve pero este no si puedes verficar el codigo gracias :D
Cita de: lampone en 01 de diciembre de 2010, 20:08
buen codigo pero pena que no funcione
Cita de: blozzter en 02 de diciembre de 2010, 11:11
si funciona, no es mi  culpa si no lo sabes utilizar.

Mirando a simplevista el código... Veo errores de espacios que harían que el código no se compile correctamente...
Por ejemplo, búsquen "foreach", verán que está junto a una variable faltando un espacio entre la función y la variable.

Slds.

Edit: Aprovecho y les dejo el código adjuntado... Lo prueban y avisan.
« Última Modificación: 02 de diciembre de 2010, 17:05 por unish »

02 de diciembre de 2010, 22:10


  • Puntos: 0
  • Mensajes: 23
  • Agradeció 0 veces y fue agradecido 3 veces en 3 mensajes
Re: Busca Panel de administracion, By KuNdUz
que SO estan usando???

ahora me doy cuenta que no funciona en win7, pero en XP si, lo probé.

16 de febrero de 2011, 02:02


  • Puntos: 0
  • Mensajes: 2
  • Agradeció 0 veces y fue agradecido 0 veces en 0 mensaje
Re: Busca Panel de administracion, By KuNdUz
Where to buy software to learn a language


rosettastone spanish
If you want to learn the language. But do not know where to buy the best, now you can choose to our website can not only buy good quality and good after-sales service language software. rosettastone english
 When you choose our Rosetta software, which is choosing our service. We have the best satisfied with a full refund, return services. There are the best on-line help. rosettastone italian
 Visit our website, you can also join our great promotions. We are learning a language software to buy your preferred site。rosettastone french
Nueva respuesta
Páginas: [1]
 

Página creada en 0.584 segundos con 22 consultas.