IBM Lotus Domino IMAP Service Mailbox Name Overflow

#%NASL_MIN_LEVEL 70300
#
# (C) Tenable Network Security, Inc.
#

include('deprecated_nasl_level.inc');
include('compat.inc');

if (description)
{
  script_id(27535);
  script_version("1.18");
  script_set_attribute(attribute:"plugin_modification_date", value:"2022/04/07");

  script_cve_id("CVE-2007-3510");
  script_bugtraq_id(26176);

  script_name(english:"IBM Lotus Domino IMAP Service Mailbox Name Overflow");

  script_set_attribute(attribute:"synopsis", value:
"The remote IMAP server is affected by a buffer overflow vulnerability.");
  script_set_attribute(attribute:"description", value:
"The IMAP server component of IBM Lotus Domino Server installed on the
remote host fails to properly validate the mailbox name before copying
it into a fixed-size stack buffer as part of handling certain
unspecified commands.  Using a specially crafted mailbox name to which
he is subscribed, an authenticated attacker can leverage this issue to
execute arbitrary code remotely. 

Note that successful exploitation typically results in SYSTEM-level
access under Windows and non-root access on unix-like systems.");
  # https://labs.idefense.com/verisign/intelligence/2009/vulnerabilities/display.php?id=605
  script_set_attribute(attribute:"see_also", value:"http://www.nessus.org/u?2363e0e5");
  script_set_attribute(attribute:"see_also", value:"https://www.securityfocus.com/archive/1/482739/30/0/threaded");
  script_set_attribute(attribute:"see_also", value:"https://www-01.ibm.com/support/docview.wss?uid=swg21270623");
  script_set_attribute(attribute:"solution", value:
"Upgrade to Domino 6.5.6 Fix Pack 2 / 7.0.2 Fix Pack 3 / 7.0.3 / 8.0
or later.");
  script_set_cvss_base_vector("CVSS2#AV:N/AC:L/Au:S/C:C/I:C/A:C");
  script_set_cvss_temporal_vector("CVSS2#E:F/RL:OF/RC:C");

  script_set_attribute(attribute:"exploitability_ease", value:"Exploits are available");
  script_set_attribute(attribute:"exploit_available", value:"true");
  script_set_attribute(attribute:"exploit_framework_core", value:"true");
  script_cwe_id(119);

  script_set_attribute(attribute:"plugin_publication_date", value:"2007/10/24");

  script_set_attribute(attribute:"plugin_type", value:"remote");
  script_set_attribute(attribute:"cpe", value:"cpe:/a:ibm:lotus_domino");
  script_set_attribute(attribute:"thorough_tests", value:"true");
  script_end_attributes();

  script_category(ACT_GATHER_INFO);
  script_family(english:"Gain a shell remotely");

  script_copyright(english:"This script is Copyright (C) 2007-2022 Tenable Network Security, Inc.");

  script_dependencies("find_service1.nasl");
  script_require_ports("Services/imap", 143);

  exit(0);
}


include("imap_func.inc");


port = get_kb_item("Services/imap");
if (!port) port = 143;
if (!get_port_state(port)) exit(0);


# Do a banner check.
banner = get_imap_banner(port:port);
if (!banner || " Domino IMAP4 Server Release " >!< banner) exit(0);

ver = strstr(banner, "Server Release ") - "Server Release ";
ver = ver - strstr(ver, " ready");
# nb: IBM's advisory says versions 6.5 < 6.5.6FP2 and 7.0 < 7.0.3 are affected.
if (ver && egrep(pattern:"^(6\.5($|[^.]|\.([0-5]($|[^0-9])|6($|FP1)))|7\.0($|[^.]|\.[0-2]($|[^F0-9]|FP[0-2]($|[^0-9]))))", string:ver))
{
  report = string(
    "According to the banner from its IMAP server, Domino ", ver, " is\n",
    "installed on the remote host.\n"
  );
  security_hole(port:port, extra: report);
}