-
Notifications
You must be signed in to change notification settings - Fork 3
/
check_ssl_certificate
executable file
·278 lines (245 loc) · 8.35 KB
/
check_ssl_certificate
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
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
#!/usr/bin/perl -w
#
# check_ssl_certificate
# Nagios script to check ssl certificate expirations
#
# Copyright (c) 2006-2008 David Alden <alden@math.ohio-state.edu>
#
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version 2
# of the License, or (at your option) any later version.
#
# 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
#
#
# Changes:
# 2018-08-07 Gerrit Doornenbal
# - Finetuning the -servername option by adding it as a real option. (-S)
# 2016-10-11 Gerrit Doornenbal (g.doornenbal@gmail.com)
# - Added option -servername in openssl-s_client command to get
# the correct server certificate using SNI identification.
# - Minor changes in output text, more consistent.
# 2014-03-26 Vladimir Mencl <vladimir.mencl@canterbury.ac.nz>
# - add support for checking a certificate in the file (-f)
# - add option for supporting a full DN instead of just CN (-D)
# - support both 32-bit and 64-bit platforms with "use lib" path
# - move some verbose ouput under DEBUG (-d)
# - FIX: add missing exit for expired certificate as per comment on plugin
# page
# - use POSIX:floor() instead of int() for rounding daysLeft
# 10/30/2008 dja <alden@math.ohio-state.edu>
# - fixed a bug which caused it to not deal with certs that expire
# on a single digit day (thanks to Christian Sava, Kyle Smith &
# Raphael Berlamont)
# 10/09/2007 dja <alden@math.ohio-state.edu>
# - fixed a bug which caused it to improperly report expired certs
# (thanks to Hassan Alusesi for pointing this out)
# - no longer use temporary files or Date::Manip
# (thanks to tommybobbins on NagiosExchange)
# - added the printing of the Common Name (CN) if verbose is specified
# (thanks to mp72 on NagiosExchange)
#
# Description:
# This script will check if an SSL certificate is going to expire. For
# example, to check the IMAP certificate on an imaps port:
#
# check_ssl_certificate -H 1.1.1.1 -p 993
#
# Installation:
# Edit this script, replacing the line:
# use lib "/usr/lib/nagios/plugins";
# with the path to your nagios plugins directory (where utils.pm is
# located). Also edit the line:
# my $openssl = "/usr/bin/openssl";
# with the path to your openssl binary. Then copy the script into
# your nagios plugins directory.
#
#
use strict;
use POSIX;
use Time::Local;
use Getopt::Long;
# support both 32-bit and 64-bit environemnt
use lib "/usr/lib/nagios/plugins";
use lib "/usr/lib64/nagios/plugins";
use utils qw(%ERRORS &print_revision &support &usage);
my $PROGNAME="check_ssl_certificate";
my $REVISION="1.3";
#
$ENV{PATH}="/usr/sbin:/usr/bin:/bin";
#
my $openssl = "/usr/bin/openssl";
my $critical = 7;
my $help;
my $host;
my $sname;
my $servername = '';
my $port = 443;
my $certificate_file = '';
my $useDN = 0;
my $additional = '';
my $verbose;
my $debug = 0;
my $version;
my $warning = 30;
#
my %months = ('Jan' => 0, 'Feb' => 1, 'Mar' => 2, 'Apr' => 3, 'May' => 4,
'Jun' => 5, 'Jul' => 6, 'Aug' => 7, 'Sep' => 8, 'Oct' => 9,
'Nov' => 10, 'Dec' => 11);
#
Getopt::Long::Configure('bundling');
if (GetOptions(
"a=s" => \$additional,
"c:s" => \$critical,
"h" => \$help,
"H:s" => \$host,
"S:s" => \$sname,
"f:s" => \$certificate_file,
"D" => \$useDN,
"d" => \$debug,
"o=s" => \$openssl,
"p=i" => \$port,
"v" => \$verbose,
"V" => \$version,
"w:s" => \$warning,
) == 0) {
print_usage();
exit $ERRORS{'UNKNOWN'}
}
if ($version) {
print_revision($PROGNAME, "\$Revision: $REVISION \$");
exit $ERRORS{'OK'};
}
if ($help) {
print_help();
exit $ERRORS{'OK'};
}
# accept either a hostname or a certificate file - but not both
if (! $certificate_file && ! utils::is_hostname($host)) {
usage("");
exit $ERRORS{'UNKNOWN'};
}
if ($host && $certificate_file) {
usage("You cannot specify both host and certificate_file\n");
exit $ERRORS{'UNKNOWN'};
};
# create -servernameoption in string.
if ($sname) {
$servername = "-servername $sname ";
}
my $openssl_cmd = "";
if ($certificate_file ) {
$openssl_cmd = "$openssl x509 -enddate -noout -in $certificate_file $additional |"
} else {
$openssl_cmd = "$openssl s_client -connect $host:$port $servername$additional < /dev/null 2>&1 | $openssl x509 -enddate -noout |"
};
print "Command:$openssl_cmd \n" if $debug;
open(OPENSSL, "$openssl_cmd" ) ||
die "unable to open $openssl: $!";
my $date;
while (<OPENSSL>) {
if ($_ =~ /^notAfter=(.*)/) {
$date = $1;
chomp($date);
# last;
}
}
close(OPENSSL);
print "Found date:$date \n" if $debug;
$date =~ s/ +/ /g;
my ($month, $day, $hour, $min, $sec, $year, $tz) = split(/[\s+|:]/, $date);
print "m=$month, d=$day, h=$hour, m=$min, s=$sec, y=$year, z=$tz\n" if $debug;
my $daysLeft = floor((timegm($sec, $min, $hour, $day, $months{$month}, $year - 1900) - time()) / 86400);
print "daysLeft=$daysLeft\n" if $debug;
my $cn="this certificate";
# get the certificate name
if ($verbose) {
# different handling for certificates in a file
if ($certificate_file) {
open(OPENSSL, "$openssl x509 -subject -noout -in $certificate_file $additional < /dev/null 2>&1 |") ||
die "unable to open $openssl: $!";
while (<OPENSSL>) {
if ( $_ =~ /^subject= (.*)/ ) {
# we found the subject line.
my $cert_subject = $1;
# if we can match a CN field, use that, otherwise the whole DN
if ( !$useDN && $cert_subject =~ /CN=([^\/=]*)/ ) {
$cn=$1;
} else {
$cn=$cert_subject;
};
$cn .= "[$certificate_file]";
last;
}
}
close(OPENSSL);
} else {
open(OPENSSL, "$openssl s_client -connect $host:$port $servername$additional < /dev/null 2>&1 |") ||
die "unable to open $openssl: $!";
while (<OPENSSL>) {
next unless $_ =~ /Certificate chain/;
while (<OPENSSL>) {
next unless $_ =~ /^ 0 s:(.*)/;
my $cert_subject = $1;
# if we can match a CN field, use that, otherwise the whole DN
if ( !$useDN && $cert_subject =~ /CN=([^\/=]*)/ ) {
$cn=$1;
} else {
$cn=$cert_subject;
};
$cn .= "[$host]" if ($cn ne $host);
last;
}
}
close(OPENSSL);
}
}
if ($daysLeft < 0) {
print "CRITICAL - certificate $cn expired " . abs($daysLeft) . " day(s) ago.\n";
exit $ERRORS{'CRITICAL'};
} elsif ($daysLeft <= $critical) {
print "CRITICAL - only $daysLeft day(s) left for certificate $cn.\n";
exit $ERRORS{'CRITICAL'};
} elsif ($daysLeft <= $warning) {
print "WARNING - only $daysLeft day(s) left for certificate $cn.\n";
exit $ERRORS{'WARNING'};
} elsif ($verbose) {
print "OK - $daysLeft day(s) left for certificate $cn.\n";
}
exit $ERRORS{'OK'};
sub print_help {
print_revision($PROGNAME, "Revision: $REVISION");
print "Copyright (c) 2006 David Alden
Check if an SSL certificate is close to expiring
";
print_usage();
print "
-a <add> add the text to the openssl line, used for checking the smtp ssl
certificate with starttls (\"-a '-starttls smtp'\")
-c <num> exit with CRITICAL status if number of days left is less than <num>
-h show this help script
-H <host> check the certificate on the indicated host
-S <name> give (SNI) servername when needed
-o <path> path to openssl binary
-p <port> check the certificate on the specified port
-f <file> check instead a certificate in a specific file
-D use full DN instead of just CN in verbose output
-w <num> exit with WARNING status if number of days left is less than <num>
-v show the number of days left
-d show debug output
-V show version and license information
";
support();
}
sub print_usage {
print "Usage: $PROGNAME -H <host> [-p <port>] [-S <sni-name>] [-c <low>:<high>] [-w <low>:<high>]\n";
return();
}