Mort Bay Jetty URL Multiple Slash Character Information Disclosure

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

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

if (description)
{
  script_id(29852);
  script_version("1.24");
  script_set_attribute(attribute:"plugin_modification_date", value:"2022/04/11");

  script_cve_id("CVE-2007-6672");
  script_bugtraq_id(27117);
  script_xref(name:"CERT", value:"553235");

  script_name(english:"Mort Bay Jetty URL Multiple Slash Character Information Disclosure");

  script_set_attribute(attribute:"synopsis", value:
"The remote web server is affected by an information disclosure
vulnerability.");
  script_set_attribute(attribute:"description", value:
"The remote instance of Mort Bay Jetty allows an attacker to view
static content in WEB-INF and behind security constraints because of
the approach it uses to compact URLs like '/foo///bar'.");
  script_set_attribute(attribute:"see_also", value:"http://jira.codehaus.org/browse/JETTY-386#action_117699");
  script_set_attribute(attribute:"solution", value:
"Upgrade to Mort Bay Jetty 6.1.7 or later.");
  script_set_cvss_base_vector("CVSS2#AV:N/AC:L/Au:N/C:P/I:N/A:N");
  script_set_cvss_temporal_vector("CVSS2#E:U/RL:OF/RC:C");

  script_set_attribute(attribute:"exploitability_ease", value:"No known exploits are available");
  script_set_attribute(attribute:"exploit_available", value:"false");
  script_set_attribute(attribute:"exploited_by_nessus", value:"true");
  script_cwe_id(22);

  script_set_attribute(attribute:"plugin_publication_date", value:"2008/01/07");

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

  script_category(ACT_ATTACK);
  script_family(english:"CGI abuses");

  script_copyright(english:"This script is Copyright (C) 2008-2022 and is owned by Tenable, Inc. or an Affiliate thereof.");

  script_dependencies("webmirror.nasl", "http_version.nasl");
  script_require_ports("Services/www", 80, 8080);

  exit(0);
}


include("global_settings.inc");
include("misc_func.inc");
include("http.inc");
include("data_protection.inc");

port = get_http_port(default:80);

# Unless we're paranoid, make sure the banner looks like Mort Bay Jetty.
#
# nb: the Server Response header can be suppressed; eg, see
#     <http://docs.codehaus.org/display/JETTY/How+to+suppress+the+Server+HTTP+header>.
if (report_paranoia < 2)
{
  banner = get_http_banner(port:port);
  if (!banner || "Server: Jetty(" >!< banner) exit(0);
}


# Identify likely web apps.
dirs = get_kb_list(string("www/", port, "/content/directories"));
if (!dirs) exit(0);

# Loop through possible webapps.
#
# nb: unless thorough_tests is enabled, we'll only scan a couple of directories.
max_apps = 10;

foreach webapp (dirs)
{
  if (webapp =~ "^/.+/") continue;

  # Try to exploit the flaw to read an app's web.xml.
  uri = string(webapp, "//WEB-INF/web.xml");
  w = http_send_recv3(method:"GET", item:uri, port:port);
  if (isnull(w)) exit(1, "The web server on port "+port+" did not answer");
  res = strcat(w[0], w[1], '\r\n', w[2]);

  # If it looks like the file...
  if (
    "<web-app" >< res && "<servlet>" >< res &&
    "Content-Type: application/xml" >< res
  )
  {
    # Make sure we can't get the file ordinarily.
    w = http_send_recv3(method:"GET", item:string(webapp, "/WEB-INF/web.xml"), port:port);
    if (isnull(w)) exit(1, "The web server on port "+port+" did not answer");
    res2 = strcat(w[0], w[1], '\r\n', w[2]);

    if ("<web-app" >!< res2 && "<servlet>" >!< res2)
    {
      body = strstr(res, '\r\n\r\n') - '\r\n\r\n';
      webapp = webapp - "/";

      report = string(
        "Nessus was able to retrieve the web.xml file for the webapp '", webapp, "'\n",
        "using the following URI :\n",
        "\n",
        "  ", uri, "\n",
        "\n",
        "Here are its contents :\n",
        "\n",
        data_protection::sanitize_user_full_redaction(output:body)
      );
      security_warning(port:port, extra:report);
      exit(0);
    }
  }

  if (!thorough_tests && --max_apps == 0) break;
}