##
# $Id$
##

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

	include Msf::Exploit::Remote::SunRPC
	include Msf::Auxiliary::Report
	include Msf::Auxiliary::Scanner

	def initialize
		super(
			'Name'          => 'NFS Mount Scanner',
			'Description'   => %q{
				This module scans NFS mounts and their permissions.
			},
			'Author'	       => ['<tebo[at]attackresearch.com>'],
			'Version'       => '$Revision$',
			'References'	 =>
				[
					['CVE', '1999-0170'],
					['URL',	'http://www.ietf.org/rfc/rfc1094.txt']
				],
			'License'	=> MSF_LICENSE
		)
	end

	def run_host(ip)

		begin
			program		= 100005
			progver		= 1
			procedure	= 5

			sunrpc_create('udp', program, progver)
			sunrpc_authnull()
			resp = sunrpc_call(procedure, "")

			# XXX: Assume that transport is udp and port is 2049
			#      Technically we are talking to mountd not nfsd

			report_service(
				:host  => ip,
				:proto => 'udp',
				:port  => 2049,
				:name  => 'nfsd',
				:info  => "NFS Daemon #{program} v#{progver}"
			)

			exports = resp[3,1].unpack('C')[0]
			if (exports == 0x01)
				shares = []
				while XDR.decode_int!(resp) == 1 do
					dir = XDR.decode_string!(resp)
					grp = []
					while XDR.decode_int!(resp) == 1 do
						grp << XDR.decode_string!(resp)
					end
					print_good("#{ip} NFS Export: #{dir} [#{grp.join(", ")}]")
					shares << [dir, grp]
				end
				report_note(
					:host => ip,
					:proto => 'udp',
					:port => 2049,
					:type => 'nfs.exports',
					:data => { :exports => shares },
					:update => :unique_data
				)
			elsif(exports == 0x00)
				print_status("#{ip} - No exported directories")
			end

			sunrpc_destroy
		rescue ::Rex::Proto::SunRPC::RPCTimeout
		end
	end

end