-
Notifications
You must be signed in to change notification settings - Fork 6
/
FormMail_detect.nasl
104 lines (83 loc) · 3.7 KB
/
FormMail_detect.nasl
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
###############################################################################
# OpenVAS Vulnerability Test
# $Id: FormMail_detect.nasl 10915 2018-08-10 15:50:57Z cfischer $
#
# FormMail Detection
#
# Authors:
# Michael Meyer <[email protected]>
#
# Copyright:
# Copyright (c) 2009 Greenbone Networks GmbH
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License version 2
# (or any later version), as published by the Free Software Foundation.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
###############################################################################
if(description)
{
script_oid("1.3.6.1.4.1.25623.1.0.100201");
script_version("$Revision: 10915 $");
script_tag(name:"last_modification", value:"$Date: 2018-08-10 17:50:57 +0200 (Fri, 10 Aug 2018) $");
script_tag(name:"creation_date", value:"2009-05-14 20:19:12 +0200 (Thu, 14 May 2009)");
script_tag(name:"cvss_base_vector", value:"AV:N/AC:L/Au:N/C:N/I:N/A:N");
script_tag(name:"cvss_base", value:"0.0");
script_name("FormMail Detection");
script_category(ACT_GATHER_INFO);
script_family("Product detection");
script_copyright("This script is Copyright (C) 2009 Greenbone Networks GmbH");
script_dependencies("find_service.nasl", "http_version.nasl");
script_require_ports("Services/www", 80);
script_exclude_keys("Settings/disable_cgi_scanning");
script_xref(name:"URL", value:"http://www.scriptarchive.com/formmail.html");
script_tag(name:"summary", value:"The FormMail Script was found at this port. FormMail is a generic HTML form to
e-mail gateway that parses the results of any form and sends them to the specified users.");
script_tag(name:"qod_type", value:"remote_banner");
exit(0);
}
include("http_func.inc");
include("http_keepalive.inc");
include("cpe.inc");
include("host_details.inc");
port = get_http_port( default:80 );
files = make_list( "formmail.pl", "formmail.pl.cgi", "FormMail.cgi", "FormMail.pl" );
foreach dir( make_list_unique( "/formmail", cgi_dirs( port:port ) ) ) {
install = dir;
if( dir == "/" ) dir = "";
foreach file( files ) {
url = dir + "/" + file;
req = http_get( item:url, port:port );
buf = http_keepalive_send_recv( port:port, data:req, bodyonly:FALSE );
if( isnull( buf ) ) continue;
if( egrep( pattern:'FormMail', string:buf, icase:TRUE ) &&
( egrep( pattern:'A Free Product of', string:buf, icase:TRUE ) ||
egrep( pattern:'Bad Referrer', string:buf, icase:TRUE ) ) ) {
vers = "unknown";
version = eregmatch( string:buf, pattern:'FormMail.*v([0-9.]+)', icase:TRUE );
if (!isnull(version[1])) {
vers = version[1];
concUrl = url;
}
set_kb_item( name:"www/" + port + "/FormMail/file", value:file );
set_kb_item( name:"FormMail/installed", value:TRUE );
cpe = build_cpe( value:vers, exp:"^([0-9.]+)", base:"cpe:/a:matt_wright:formmail:" );
if (!cpe )
cpe = "cpe:/a:matt_wright:formmail";
register_product( cpe:cpe, location:install, port:port );
log_message(data: build_detection_report(app: "FormMail", version: vers, install: install, cpe: cpe,
concluded: version[0], concludedUrl: concUrl),
port: port);
exit( 0 );
}
}
}
exit( 0 );