Squid FTP URL Special Character Handling Remote Overflow

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

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

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

  script_cve_id("CVE-2002-0068");
  script_bugtraq_id(4148);

  script_name(english:"Squid FTP URL Special Character Handling Remote Overflow");

  script_set_attribute(attribute:"synopsis", value:
"The remote service is vulnerable to a buffer overflow.");
  script_set_attribute(attribute:"description", value:
"The remote squid caching proxy, according to its version number,
is vulnerable to various buffer overflows.

An attacker may use these to gain a shell on this system.");
  script_set_attribute(attribute:"see_also", value:"http://www.squid-cache.org/Advisories/SQUID-2002_1.txt");
  script_set_attribute(attribute:"solution", value:
"Upgrade to squid 2.4.STABLE7 or newer");
  script_set_cvss_base_vector("CVSS2#AV:N/AC:L/Au:N/C:P/I:P/A:P");
  script_set_cvss_temporal_vector("CVSS2#E:POC/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:"vuln_publication_date", value:"2002/02/21");
  script_set_attribute(attribute:"plugin_publication_date", value:"2002/03/27");

  script_set_attribute(attribute:"plugin_type", value:"remote");
  script_set_attribute(attribute:"cpe", value:"cpe:/a:squid-cache:squid");
  script_set_attribute(attribute:"thorough_tests", value:"true");
  script_end_attributes();

  script_category(ACT_GATHER_INFO);
  script_family(english:"Firewalls");

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

  script_dependencies("find_service1.nasl");
  script_require_ports("Services/http_proxy", 3128, 8080);

  exit(0);
}

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

port = get_kb_item("Services/http_proxy");
if(!port)
{
 if(get_port_state(3128))
 {
  port = 3128;
 }
 else port = 8080;
}

if (! get_port_state(port)) exit(0, "Port "+port+" is closed");

  res = http_get_cache(item:"/", port:port, exit_on_fail: 1);
  if(egrep(pattern:"Squid/2\.([0-3]\.|4\.STABLE[0-6]([^0-9]|$))", string:res))
      security_hole(port);