symantec_ws_detection.nasl

来自「漏洞扫描源码,可以扫描linux,windows,交换机路由器」· NASL 代码 · 共 73 行

#
#  This script was written by David Maciejak <david dot maciejak at kyxar dot fr>
#
#  This script is released under the GNU GPL v2
#
# kst-depend-misc

if(description)
{
 script_id(80019);
 script_version("$Revision: 1.1 $");
 
 name["english"] = "Symantec Web Security Detection";

 script_name(english:name["english"]);
 
 desc["english"] = "
Synopsis :

The remote service filters HTTP / FTP content.

Description :

The remote web server appears to be running Symantec Web Security, 
for filtering traffic of viruses and inappropriate content.

Risk factor : 

None";

 script_description(english:desc["english"]);
 
 summary["english"] = "Checks for SWS";
 
 script_summary(english:summary["english"]);
 
 script_category(ACT_GATHER_INFO);
 
 script_copyright(english:"This script is Copyright (C) 2007 David Maciejak");
 
 family["english"] = "CGI abuses";
 script_family(english:family["english"]);
 script_dependencie("httpver.nasl");
 script_require_ports("Services/www", 8002);
 exit(0);
}

#
# The script code starts here
#

include("http_func.inc");

port = get_kb_item("Services/www");
if ( ! port ) port = 8002;

if(get_port_state(port))
{
  banner = get_http_banner(port:port);
  if (
    banner && 
    "Server: SWS-" >< banner
  ) {
    ver = strstr(banner, "Server: SWS-") - "Server: SWS-";
    if (ver) ver = ver - strstr(ver, '\r');
    if (ver) ver = ver - strstr(ver, '\n');
    if (ver && ver =~ "^[0-9]") {
      security_note(port);
      set_kb_item(name:string("www/", port, "/SWS"),value:string(ver));
    }
  }
}