plugins/check_http.c

   1 /****************************************************************************
   2  *
   3  * Program: HTTP plugin for Nagios
   4  * License: GPL
   5  *
   6  * License Information:
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 2 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  21  *
  22  * $Id$
  23  *
  24  *****************************************************************************/
  25
  26 #define PROGNAME "check_http"
  27 #define REVISION "$Revision$"
  28 #define COPYRIGHT "1999-2001"
  29 #define AUTHORS "Ethan Galstad/Karl DeBisschop"
  30 #define EMAIL "kdebisschop@users.sourceforge.net"
  31
  32 #include "config.h"
  33 #include "common.h"
  34 #include "version.h"
  35 #include "netutils.h"
  36 #include "utils.h"
  37
  38 #define SUMMARY "\
  39 This plugin tests the HTTP service on the specified host. It can test\n\
  40 normal (http) and secure (https) servers, follow redirects, search for\n\
  41 strings and regular expressions, check connection times, and report on\n\
  42 certificate expiration times.\n"
  43
  44 #define OPTIONS "\
  45 \(-H <vhost> | -I <IP-address>) [-u <uri>] [-p <port>]\n\
  46             [-w <warn time>] [-c <critical time>] [-t <timeout>] [-L]\n\
  47             [-a auth] [-f <ok | warn | critcal | follow>] [-e <expect>]\n\
  48             [-s string] [-r <regex> | -R <case-insensitive regex>]\n\
  49             [-P string]"
  50
  51 #define LONGOPTIONS "\
  52  -H, --hostname=ADDRESS\n\
  53     Host name argument for servers using host headers (virtual host)\n\
  54  -I, --IP-address=ADDRESS\n\
  55    IP address or name (use numeric address if possible to bypass DNS lookup).\n\
  56  -e, --expect=STRING\n\
  57    String to expect in first (status) line of server response (default: %s)\n\
  58    If specified skips all other status line logic (ex: 3xx, 4xx, 5xx processing)\n\
  59  -s, --string=STRING\n\
  60    String to expect in the content\n\
  61  -u, --url=PATH\n\
  62    URL to GET or POST (default: /)\n\
  63  -p, --port=INTEGER\n\
  64    Port number (default: %d)\n\
  65  -P, --post=STRING\n\
  66    URL encoded http POST data\n\
  67  -w, --warning=INTEGER\n\
  68    Response time to result in warning status (seconds)\n\
  69  -c, --critical=INTEGER\n\
  70    Response time to result in critical status (seconds)\n\
  71  -t, --timeout=INTEGER\n\
  72    Seconds before connection times out (default: %d)\n\
  73  -a, --authorization=AUTH_PAIR\n\
  74    Username:password on sites with basic authentication\n\
  75  -L, --link=URL\n\
  76    Wrap output in HTML link (obsoleted by urlize)\n\
  77  -f, --onredirect=<ok|warning|critical|follow>\n\
  78    How to handle redirected pages\n%s\
  79  -v, --verbose\n\
  80     Show details for command-line debugging (do not use with nagios server)\n\
  81  -h, --help\n\
  82     Print detailed help screen\n\
  83  -V, --version\n\
  84     Print version information\n"
  85
  86 #ifdef HAVE_SSL
  87 #define SSLOPTIONS "\
  88  -S, --ssl\n\
  89     Connect via SSL\n\
  90  -C, --certificate=INTEGER\n\
  91     Minimum number of days a certificate has to be valid.\n\
  92     (when this option is used the url is not checked.)\n"
  93 #else
  94 #define SSLOPTIONS ""
  95 #endif
  96
  97 #define DESCRIPTION "\
  98 This plugin will attempt to open an HTTP connection with the host. Successul\n\
  99 connects return STATE_OK, refusals and timeouts return STATE_CRITICAL, other\n\
 100 errors return STATE_UNKNOWN.  Successful connects, but incorrect reponse\n\
 101 messages from the host result in STATE_WARNING return values.  If you are\n\
 102 checking a virtual server that uses \"host headers\" you must supply the FQDN\n\
 103 \(fully qualified domain name) as the [host_name] argument.\n"
 104
 105 #define SSLDESCRIPTION "\
 106 This plugin can also check whether an SSL enabled web server is able to\n\
 107 serve content (optionally within a specified time) or whether the X509 \n\
 108 certificate is still valid for the specified number of days.\n\n\
 109 CHECK CONTENT: check_http -w 5 -c 10 --ssl www.verisign.com\n\n\
 110 When the 'www.verisign.com' server returns its content within 5 seconds, a\n\
 111 STATE_OK will be returned. When the server returns its content but exceeds\n\
 112 the 5-second threshold, a STATE_WARNING will be returned. When an error occurs,\n\
 113 a STATE_CRITICAL will be returned.\n\n\
 114 CHECK CERTIFICATE: check_http www.verisign.com -C 14\n\n\
 115 When the certificate of 'www.verisign.com' is valid for more than 14 days, a\n\
 116 STATE_OK is returned. When the certificate is still valid, but for less than\n\
 117 14 days, a STATE_WARNING is returned. A STATE_CRITICAL will be returned when\n\
 118 the certificate is expired.\n"
 119
 120 #ifdef HAVE_SSL_H
 121 #include <rsa.h>
 122 #include <crypto.h>
 123 #include <x509.h>
 124 #include <pem.h>
 125 #include <ssl.h>
 126 #include <err.h>
 127 #include <rand.h>
 128 #endif
 129
 130 #ifdef HAVE_OPENSSL_SSL_H
 131 #include <openssl/rsa.h>
 132 #include <openssl/crypto.h>
 133 #include <openssl/x509.h>
 134 #include <openssl/pem.h>
 135 #include <openssl/ssl.h>
 136 #include <openssl/err.h>
 137 #include <openssl/rand.h>
 138 #endif
 139
 140 #ifdef HAVE_SSL
 141 int check_cert = FALSE;
 142 int days_till_exp;
 143 unsigned char *randbuff;
 144 SSL_CTX *ctx;
 145 SSL *ssl;
 146 X509 *server_cert;
 147 int connect_SSL (void);
 148 int check_certificate (X509 **);
 149 #endif
 150
 151 #ifdef HAVE_REGEX_H
 152 #define REGS 2
 153 #define MAX_RE_SIZE 256
 154 #include <regex.h>
 155 regex_t preg;
 156 regmatch_t pmatch[REGS];
 157 char regexp[MAX_RE_SIZE];
 158 char errbuf[MAX_INPUT_BUFFER];
 159 int cflags = REG_NOSUB | REG_EXTENDED | REG_NEWLINE;
 160 int errcode;
 161 #endif
 162
 163 #define server_type_check(server_type) \
 164 (strcmp (server_type, "https") ? FALSE : TRUE)
 165
 166 #define server_port_check(use_ssl) (use_ssl ? HTTPS_PORT : HTTP_PORT)
 167
 168 #define MAX_IPV4_HOSTLENGTH 64
 169 #define HDR_LOCATION "%*[Ll]%*[Oo]%*[Cc]%*[Aa]%*[Tt]%*[Ii]%*[Oo]%*[Nn]: "
 170 #define URI_HTTP "%[HTPShtps]://"
 171 #define URI_HOST "%[a-zA-Z0-9.-]"
 172 #define URI_PORT ":%[0-9]"
 173 #define URI_PATH "%[/a-zA-Z0-9._-=@,]"
 174
 175 #define HTTP_PORT 80
 176 #define HTTPS_PORT 443
 177 #define HTTP_EXPECT "HTTP/1."
 178 #define HTTP_URL "/"
 179
 180 char timestamp[17] = "";
 181 int specify_port = FALSE;
 182 int server_port = HTTP_PORT;
 183 char server_port_text[6] = "";
 184 char server_type[6] = "http";
 185 /*@null@*/ char *server_address = NULL;
 186 /*@null@*/ char *host_name = NULL;
 187 /*@null@*/ char *server_url = NULL;
 188 int server_url_length = 0;
 189 int server_expect_yn = 0;
 190 char server_expect[MAX_INPUT_BUFFER] = HTTP_EXPECT;
 191 char string_expect[MAX_INPUT_BUFFER] = "";
 192 int warning_time = 0;
 193 int check_warning_time = FALSE;
 194 int critical_time = 0;
 195 int check_critical_time = FALSE;
 196 char user_auth[MAX_INPUT_BUFFER] = "";
 197 int display_html = FALSE;
 198 int onredirect = STATE_OK;
 199 int use_ssl = FALSE;
 200 int verbose = FALSE;
 201 int sd;
 202 /*@null@*/ char *http_method = NULL;
 203 /*@null@*/ char *http_post_data = NULL;
 204 char buffer[MAX_INPUT_BUFFER];
 205
 206 void print_usage (void);
 207 void print_help (void);
 208 int process_arguments (int, char **);
 209 int call_getopt (int, char **);
 210 static char *base64 (char *bin, int len);
 211 int check_http (void);
 212 int my_recv (void);
 213 int my_close (void);
 214
 215 int
 216 main (int argc, char **argv)
 217 {
 218         int result = STATE_UNKNOWN;
 219
 220         if (process_arguments (argc, argv) == ERROR)
 221                 usage ("check_http: could not parse arguments\n");
 222
 223         if (strstr (timestamp, ":")) {
 224                 if (strstr (server_url, "?"))
 225                         server_url = ssprintf (server_url, "%s&%s", server_url, timestamp);
 226                 else
 227                         server_url = ssprintf (server_url, "%s?%s", server_url, timestamp);
 228         }
 229
 230         if (display_html == TRUE)
 231                 printf ("<A HREF=\"http://%s:%d%s\" target=\"_blank\">",
 232                         host_name, server_port, server_url);
 233
 234         /* initialize alarm signal handling, set socket timeout, start timer */
 235         (void) signal (SIGALRM, socket_timeout_alarm_handler);
 236         (void) alarm (socket_timeout);
 237         (void) time (&start_time);
 238
 239 #ifdef HAVE_SSL
 240         if (use_ssl && check_cert == TRUE) {
 241                 if (connect_SSL () != OK)
 242                         terminate (STATE_CRITICAL,
 243                                    "HTTP CRITICAL - Could not make SSL connection\n");
 244                 if ((server_cert = SSL_get_peer_certificate (ssl)) != NULL) {
 245                         result = check_certificate (&server_cert);
 246                         X509_free (server_cert);
 247                 }
 248                 else {
 249                         printf ("ERROR: Cannot retrieve server certificate.\n");
 250                         result = STATE_CRITICAL;
 251                 }
 252                 SSL_shutdown (ssl);
 253                 SSL_free (ssl);
 254                 SSL_CTX_free (ctx);
 255                 close (sd);
 256         }
 257         else {
 258                 result = check_http ();
 259         }
 260 #else
 261         result = check_http ();
 262 #endif
 263         return result;
 264 }
 265 \f
 266
 267
 268 /* process command-line arguments */
 269 int
 270 process_arguments (int argc, char **argv)
 271 {
 272         int c, i = 1;
 273         char optchars[MAX_INPUT_BUFFER];
 274
 275 #ifdef HAVE_GETOPT_H
 276         int option_index = 0;
 277         static struct option long_options[] = {
 278                 STD_OPTS_LONG,
 279                 {"link", no_argument, 0, 'L'},
 280                 {"nohtml", no_argument, 0, 'n'},
 281                 {"ssl", no_argument, 0, 'S'},
 282                 {"verbose", no_argument, 0, 'v'},
 283                 {"post", required_argument, 0, 'P'},
 284                 {"IP-address", required_argument, 0, 'I'},
 285                 {"string", required_argument, 0, 's'},
 286                 {"regex", required_argument, 0, 'r'},
 287                 {"ereg", required_argument, 0, 'r'},
 288                 {"eregi", required_argument, 0, 'R'},
 289                 {"onredirect", required_argument, 0, 'f'},
 290                 {"certificate", required_argument, 0, 'C'},
 291                 {0, 0, 0, 0}
 292         };
 293 #endif
 294
 295         if (argc < 2)
 296                 return ERROR;
 297
 298         for (c = 1; c < argc; c++) {
 299                 if (strcmp ("-to", argv[c]) == 0)
 300                         strcpy (argv[c], "-t");
 301                 if (strcmp ("-hn", argv[c]) == 0)
 302                         strcpy (argv[c], "-H");
 303                 if (strcmp ("-wt", argv[c]) == 0)
 304                         strcpy (argv[c], "-w");
 305                 if (strcmp ("-ct", argv[c]) == 0)
 306                         strcpy (argv[c], "-c");
 307                 if (strcmp ("-nohtml", argv[c]) == 0)
 308                         strcpy (argv[c], "-n");
 309         }
 310
 311         snprintf (optchars, MAX_INPUT_BUFFER, "%s%s", STD_OPTS,
 312                   "P:I:a:e:p:s:R:r:u:f:C:nLS");
 313
 314         while (1) {
 315 #ifdef HAVE_GETOPT_H
 316                 c = getopt_long (argc, argv, optchars, long_options, &option_index);
 317 #else
 318                 c = getopt (argc, argv, optchars);
 319 #endif
 320                 if (c == -1 || c == EOF)
 321                         break;
 322
 323                 switch (c) {
 324                 case '?': /* usage */
 325                         usage2 ("unknown argument", optarg);
 326                         break;
 327                 case 'h': /* help */
 328                         print_help ();
 329                         exit (STATE_OK);
 330                         break;
 331                 case 'V': /* version */
 332                         print_revision (PROGNAME, REVISION);
 333                         exit (STATE_OK);
 334                         break;
 335                 case 't': /* timeout period */
 336                         if (!is_intnonneg (optarg))
 337                                 usage2 ("timeout interval must be a non-negative integer", optarg);
 338                         socket_timeout = atoi (optarg);
 339                         break;
 340                 case 'c': /* critical time threshold */
 341                         if (!is_intnonneg (optarg))
 342                                 usage2 ("invalid critical threshold", optarg);
 343                         critical_time = atoi (optarg);
 344                         check_critical_time = TRUE;
 345                         break;
 346                 case 'w': /* warning time threshold */
 347                         if (!is_intnonneg (optarg))
 348                                 usage2 ("invalid warning threshold", optarg);
 349                         warning_time = atoi (optarg);
 350                         check_warning_time = TRUE;
 351                         break;
 352                 case 'L': /* show html link */
 353                         display_html = TRUE;
 354                         break;
 355                 case 'n': /* do not show html link */
 356                         display_html = FALSE;
 357                         break;
 358                 case 'S': /* use SSL */
 359 #ifndef HAVE_SSL
 360                         usage ("check_http: invalid option - SSL is not available\n");
 361 #endif
 362                         use_ssl = TRUE;
 363                         if (specify_port == FALSE)
 364                                 server_port = HTTPS_PORT;
 365                         break;
 366                 case 'C': /* warning time threshold */
 367 #ifdef HAVE_SSL
 368                         if (!is_intnonneg (optarg))
 369                                 usage2 ("invalid certificate expiration period", optarg);
 370                         days_till_exp = atoi (optarg);
 371                         check_cert = TRUE;
 372 #else
 373                         usage ("check_http: invalid option - SSL is not available\n");
 374 #endif
 375                         break;
 376                 case 'f': /* onredirect */
 377                         if (!strcmp (optarg, "follow"))
 378                                 onredirect = STATE_DEPENDENT;
 379                         if (!strcmp (optarg, "unknown"))
 380                                 onredirect = STATE_UNKNOWN;
 381                         if (!strcmp (optarg, "ok"))
 382                                 onredirect = STATE_OK;
 383                         if (!strcmp (optarg, "warning"))
 384                                 onredirect = STATE_WARNING;
 385                         if (!strcmp (optarg, "critical"))
 386                                 onredirect = STATE_CRITICAL;
 387                         if (verbose)
 388                                 printf("option f:%d \n", onredirect);
 389                         break;
 390                 /* Note: H, I, and u must be malloc'd or will fail on redirects */
 391                 case 'H': /* Host Name (virtual host) */
 392                         host_name = strscpy (host_name, optarg);
 393                         break;
 394                 case 'I': /* Server IP-address */
 395                         server_address = strscpy (server_address, optarg);
 396                         break;
 397                 case 'u': /* Host or server */
 398                         server_url = strscpy (server_url, optarg);
 399                         server_url_length = strlen (optarg);
 400                         break;
 401                 case 'p': /* Host or server */
 402                         if (!is_intnonneg (optarg))
 403                                 usage2 ("invalid port number", optarg);
 404                         server_port = atoi (optarg);
 405                         specify_port = TRUE;
 406                         break;
 407                 case 'a': /* authorization info */
 408                         strncpy (user_auth, optarg, MAX_INPUT_BUFFER - 1);
 409                         user_auth[MAX_INPUT_BUFFER - 1] = 0;
 410                         break;
 411                 case 'P': /* HTTP POST data in URL encoded format */
 412                         http_method = strscpy (http_method, "POST");
 413                         http_post_data = strscpy (http_post_data, optarg);
 414                         break;
 415                 case 's': /* string or substring */
 416                         strncpy (string_expect, optarg, MAX_INPUT_BUFFER - 1);
 417                         string_expect[MAX_INPUT_BUFFER - 1] = 0;
 418                         break;
 419                 case 'e': /* string or substring */
 420                         strncpy (server_expect, optarg, MAX_INPUT_BUFFER - 1);
 421                         server_expect[MAX_INPUT_BUFFER - 1] = 0;
 422                         server_expect_yn = 1;
 423                         break;
 424                 case 'R': /* regex */
 425 #ifdef HAVE_REGEX_H
 426                         cflags = REG_ICASE;
 427 #else
 428                         usage ("check_http: call for regex which was not a compiled option\n");
 429 #endif
 430                 case 'r': /* regex */
 431 #ifdef HAVE_REGEX_H
 432                         cflags |= REG_EXTENDED | REG_NOSUB | REG_NEWLINE;
 433                         strncpy (regexp, optarg, MAX_RE_SIZE - 1);
 434                         regexp[MAX_RE_SIZE - 1] = 0;
 435                         errcode = regcomp (&preg, regexp, cflags);
 436                         if (errcode != 0) {
 437                                 (void) regerror (errcode, &preg, errbuf, MAX_INPUT_BUFFER);
 438                                 printf ("Could Not Compile Regular Expression: %s", errbuf);
 439                                 return ERROR;
 440                         }
 441 #else
 442                         usage ("check_http: call for regex which was not a compiled option\n");
 443 #endif
 444                         break;
 445                 case 'v': /* verbose */
 446                         verbose = TRUE;
 447                         break;
 448                 }
 449         }
 450
 451         c = optind;
 452
 453         if (server_address == NULL && host_name == NULL) {
 454                 server_address = strscpy (NULL, argv[c]);
 455                 host_name = strscpy (NULL, argv[c++]);
 456         }
 457
 458         if (server_address == NULL && host_name == NULL)
 459                 usage ("check_http: you must specify a host name\n");
 460
 461         if (server_address == NULL)
 462                 server_address = strscpy (NULL, host_name);
 463
 464         if (host_name == NULL)
 465                 host_name = strscpy (NULL, server_address);
 466
 467         if (http_method == NULL)
 468                 http_method = strscpy (http_method, "GET");
 469
 470         if (server_url == NULL) {
 471                 server_url = strscpy (NULL, "/");
 472                 server_url_length = strlen(HTTP_URL);
 473         }
 474
 475         return TRUE;
 476 }
 477 \f
 478
 479
 480 /* written by lauri alanko */
 481 static char *
 482 base64 (char *bin, int len)
 483 {
 484
 485         char *buf = (char *) malloc ((len + 2) / 3 * 4 + 1);
 486         int i = 0, j = 0;
 487
 488         char BASE64_END = '=';
 489         char base64_table[64] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
 490
 491         while (j < len - 2) {
 492                 buf[i++] = base64_table[bin[j] >> 2];
 493                 buf[i++] = base64_table[((bin[j] & 3) << 4) | (bin[j + 1] >> 4)];
 494                 buf[i++] = base64_table[((bin[j + 1] & 15) << 2) | (bin[j + 2] >> 6)];
 495                 buf[i++] = base64_table[bin[j + 2] & 63];
 496                 j += 3;
 497         }
 498
 499         switch (len - j) {
 500         case 1:
 501                 buf[i++] = base64_table[bin[j] >> 2];
 502                 buf[i++] = base64_table[(bin[j] & 3) << 4];
 503                 buf[i++] = BASE64_END;
 504                 buf[i++] = BASE64_END;
 505                 break;
 506         case 2:
 507                 buf[i++] = base64_table[bin[j] >> 2];
 508                 buf[i++] = base64_table[((bin[j] & 3) << 4) | (bin[j + 1] >> 4)];
 509                 buf[i++] = base64_table[(bin[j + 1] & 15) << 2];
 510                 buf[i++] = BASE64_END;
 511                 break;
 512         case 0:
 513                 break;
 514         }
 515
 516         buf[i] = '\0';
 517         return buf;
 518 }
 519 \f
 520
 521
 522 int
 523 check_http (void)
 524 {
 525         char *msg = NULL;
 526         char *status_line = NULL;
 527         char *header = NULL;
 528         char *page = NULL;
 529         char *auth = NULL;
 530         int i = 0;
 531         size_t pagesize = 0;
 532         char *full_page = NULL;
 533         char *buf = NULL;
 534         char *pos = NULL;
 535         char *x = NULL;
 536         char *orig_url = NULL;
 537
 538         /* try to connect to the host at the given port number */
 539 #ifdef HAVE_SSL
 540         if (use_ssl == TRUE) {
 541
 542                 if (connect_SSL () != OK) {
 543                         msg = ssprintf (msg, "Unable to open TCP socket");
 544                         terminate (STATE_CRITICAL, msg);
 545                 }
 546
 547                 if ((server_cert = SSL_get_peer_certificate (ssl)) != NULL) {
 548                         X509_free (server_cert);
 549                 }
 550                 else {
 551                         printf ("ERROR: Cannot retrieve server certificate.\n");
 552                         return STATE_CRITICAL;
 553                 }
 554
 555                 buf = ssprintf (buf, "%s %s HTTP/1.0\r\n", http_method, server_url);
 556                 if (SSL_write (ssl, buf, strlen (buf)) == -1) {
 557                         ERR_print_errors_fp (stderr);
 558                         return STATE_CRITICAL;
 559                 }
 560
 561                 /* optionally send the host header info (not clear if it's usable) */
 562                 if (strcmp (host_name, "")) {
 563                         buf = ssprintf (buf, "Host: %s\r\n", host_name);
 564                         if (SSL_write (ssl, buf, strlen (buf)) == -1) {
 565                                 ERR_print_errors_fp (stderr);
 566                                 return STATE_CRITICAL;
 567                         }
 568                 }
 569
 570                 /* send user agent */
 571                 buf = ssprintf (buf, "User-Agent: check_http/%s (nagios-plugins %s)\r\n",
 572                          clean_revstring (REVISION), PACKAGE_VERSION);
 573                 if (SSL_write (ssl, buf, strlen (buf)) == -1) {
 574                         ERR_print_errors_fp (stderr);
 575                         return STATE_CRITICAL;
 576                 }
 577
 578                 /* optionally send the authentication info */
 579                 if (strcmp (user_auth, "")) {
 580                         auth = base64 (user_auth, strlen (user_auth));
 581                         buf = ssprintf (buf, "Authorization: Basic %s\r\n", auth);
 582                         if (SSL_write (ssl, buf, strlen (buf)) == -1) {
 583                                 ERR_print_errors_fp (stderr);
 584                                 return STATE_CRITICAL;
 585                         }
 586                 }
 587
 588                 /* optionally send http POST data */
 589                 if (http_post_data) {
 590                         buf = ssprintf (buf, "Content-Type: application/x-www-form-urlencoded\r\n");
 591                         if (SSL_write (ssl, buf, strlen (buf)) == -1) {
 592                                 ERR_print_errors_fp (stderr);
 593                                 return STATE_CRITICAL;
 594                         }
 595                         buf = ssprintf (buf, "Content-Length: %i\r\n\r\n", strlen (http_post_data));
 596                         if (SSL_write (ssl, buf, strlen (buf)) == -1) {
 597                                 ERR_print_errors_fp (stderr);
 598                                 return STATE_CRITICAL;
 599                         }
 600                         http_post_data = strscat (http_post_data, "\r\n");
 601                         if (SSL_write (ssl, http_post_data, strlen (http_post_data)) == -1) {
 602                                 ERR_print_errors_fp (stderr);
 603                                 return STATE_CRITICAL;
 604                         }
 605                 }
 606
 607                 /* send a newline so the server knows we're done with the request */
 608                 buf = ssprintf (buf, "\r\n\r\n");
 609                 if (SSL_write (ssl, buf, strlen (buf)) == -1) {
 610                         ERR_print_errors_fp (stderr);
 611                         return STATE_CRITICAL;
 612                 }
 613
 614         }
 615         else {
 616 #endif
 617                 if (my_tcp_connect (server_address, server_port, &sd) != STATE_OK) {
 618                         msg = ssprintf (msg, "Unable to open TCP socket");
 619                         terminate (STATE_CRITICAL, msg);
 620                 }
 621                 buf = ssprintf (buf, "%s %s HTTP/1.0\r\n", http_method, server_url);
 622                 send (sd, buf, strlen (buf), 0);
 623
 624
 625
 626                 /* optionally send the host header info */
 627                 if (strcmp (host_name, "")) {
 628                         buf = ssprintf (buf, "Host: %s\r\n", host_name);
 629                         send (sd, buf, strlen (buf), 0);
 630                 }
 631
 632                 /* send user agent */
 633                 buf = ssprintf (buf,
 634                          "User-Agent: check_http/%s (nagios-plugins %s)\r\n",
 635                          clean_revstring (REVISION), PACKAGE_VERSION);
 636                 send (sd, buf, strlen (buf), 0);
 637
 638                 /* optionally send the authentication info */
 639                 if (strcmp (user_auth, "")) {
 640                         auth = base64 (user_auth, strlen (user_auth));
 641                         buf = ssprintf (buf, "Authorization: Basic %s\r\n", auth);
 642                         send (sd, buf, strlen (buf), 0);
 643                 }
 644
 645                 /* optionally send http POST data */
 646                 /* written by Chris Henesy <lurker@shadowtech.org> */
 647                 if (http_post_data) {
 648                         buf = ssprintf (buf, "Content-Type: application/x-www-form-urlencoded\r\n");
 649                         send (sd, buf, strlen (buf), 0);
 650                         buf = ssprintf (buf, "Content-Length: %i\r\n\r\n", strlen (http_post_data));
 651                         send (sd, buf, strlen (buf), 0);
 652                         http_post_data = strscat (http_post_data, "\r\n");
 653                         send (sd, http_post_data, strlen (http_post_data), 0);
 654                 }
 655
 656                 /* send a newline so the server knows we're done with the request */
 657                 buf = ssprintf (buf, "\r\n\r\n");
 658                 send (sd, buf, strlen (buf), 0);
 659 #ifdef HAVE_SSL
 660         }
 661 #endif
 662
 663         /* fetch the page */
 664         pagesize = (size_t) 0;
 665         while ((i = my_recv ()) > 0) {
 666                 full_page = strscat (full_page, buffer);
 667                 pagesize += i;
 668         }
 669
 670         if (i < 0)
 671                 terminate (STATE_CRITICAL, "Error in recv()");
 672
 673         /* return a CRITICAL status if we couldn't read any data */
 674         if (pagesize == (size_t) 0)
 675                 terminate (STATE_CRITICAL, "No data received %s", timestamp);
 676
 677         /* close the connection */
 678         my_close ();
 679
 680         /* reset the alarm */
 681         alarm (0);
 682
 683         /* leave full_page untouched so we can free it later */
 684         page = full_page;
 685
 686         if (verbose)
 687                 printf ("Page is %d characters\n", pagesize);
 688
 689         /* find status line and null-terminate it */
 690         status_line = page;
 691         page += (size_t) strcspn (page, "\r\n");
 692         pos = page;
 693         page += (size_t) strspn (page, "\r\n");
 694         status_line[pos - status_line] = 0;
 695         strip (status_line);
 696         if (verbose)
 697                 printf ("STATUS: %s\n", status_line);
 698
 699         /* find header info and null terminate it */
 700         header = page;
 701         while (strcspn (page, "\r\n") > 0) {
 702                 page += (size_t) strcspn (page, "\r\n");
 703                 pos = page;
 704                 if ((strspn (page, "\r") == 1 && strspn (page, "\r\n") >= 2) ||
 705                     (strspn (page, "\n") == 1 && strspn (page, "\r\n") >= 2))
 706                         page += (size_t) 2;
 707                 else
 708                         page += (size_t) 1;
 709         }
 710         page += (size_t) strspn (page, "\r\n");
 711         header[pos - header] = 0;
 712         if (verbose)
 713                 printf ("**** HEADER ****\n%s\n**** CONTENT ****\n%s\n", header, page);
 714
 715         /* make sure the status line matches the response we are looking for */
 716         if (!strstr (status_line, server_expect)) {
 717                 if (server_port == HTTP_PORT)
 718                         msg = ssprintf (msg, "Invalid HTTP response received from host\n");
 719                 else
 720                         msg = ssprintf (msg,
 721                                         "Invalid HTTP response received from host on port %d\n",
 722                                         server_port);
 723                 terminate (STATE_CRITICAL, msg);
 724         }
 725
 726
 727         /* Exit here if server_expect was set by user and not default */
 728         if ( server_expect_yn  )  {
 729                 msg = ssprintf (msg, "HTTP OK: Status line output matched \"%s\"\n",
 730                           server_expect);
 731                 if (verbose)
 732                         printf ("%s\n",msg);
 733
 734         }
 735         else {
 736
 737
 738                 /* check the return code */
 739                 /* server errors result in a critical state */
 740                 if (strstr (status_line, "500") ||
 741                   strstr (status_line, "501") ||
 742                 strstr (status_line, "502") ||
 743                     strstr (status_line, "503")) {
 744                         msg = ssprintf (msg, "HTTP CRITICAL: %s\n", status_line);
 745                         terminate (STATE_CRITICAL, msg);
 746                 }
 747
 748                 /* client errors result in a warning state */
 749                 if (strstr (status_line, "400") ||
 750                   strstr (status_line, "401") ||
 751                 strstr (status_line, "402") ||
 752                     strstr (status_line, "403") ||
 753                     strstr (status_line, "404")) {
 754                         msg = ssprintf (msg, "HTTP WARNING: %s\n", status_line);
 755                         terminate (STATE_WARNING, msg);
 756                 }
 757
 758                 /* check redirected page if specified */
 759                 if (strstr (status_line, "300") ||
 760                   strstr (status_line, "301") ||
 761                 strstr (status_line, "302") ||
 762                     strstr (status_line, "303") ||
 763                     strstr (status_line, "304")) {
 764                         if (onredirect == STATE_DEPENDENT) {
 765
 766                                 orig_url = strscpy(NULL, server_url);
 767                                 pos = header;
 768                                 while (pos) {
 769                                         server_address = realloc (server_address, MAX_IPV4_HOSTLENGTH);
 770                                         if (server_address == NULL)
 771                                                 terminate (STATE_UNKNOWN,
 772                                                                                  "HTTP UNKNOWN: could not allocate server_address");
 773                                         if (strcspn (pos, "\r\n") > server_url_length) {
 774                                                 server_url = realloc (server_url, strcspn (pos, "\r\n"));
 775                                                 if (server_url == NULL)
 776                                                         terminate (STATE_UNKNOWN,
 777                                                                    "HTTP UNKNOWN: could not allocate server_url");
 778                                                 server_url_length = strcspn (pos, "\r\n");
 779                                         }
 780                                         if (sscanf (pos, HDR_LOCATION URI_HTTP URI_HOST URI_PORT URI_PATH, server_type, server_address, server_port_text, server_url) == 4) {
 781                                                 host_name = strscpy (host_name, server_address);
 782                                                 use_ssl = server_type_check (server_type);
 783                                                 server_port = atoi (server_port_text);
 784                                                 check_http ();
 785                                         }
 786                                         else if (sscanf (pos, HDR_LOCATION URI_HTTP URI_HOST URI_PATH, server_type, server_address, server_url) == 3 ) {
 787                                                 host_name = strscpy (host_name, server_address);
 788                                                 use_ssl = server_type_check (server_type);
 789                                                 server_port = server_port_check (use_ssl);
 790                                                 check_http ();
 791                                         }
 792                                         else if (sscanf (pos, HDR_LOCATION URI_HTTP URI_HOST URI_PORT, server_type, server_address, server_port_text) == 3) {
 793                                                 host_name = strscpy (host_name, server_address);
 794                                                 strcpy (server_url, "/");
 795                                                 use_ssl = server_type_check (server_type);
 796                                                 server_port = atoi (server_port_text);
 797                                                 check_http ();
 798                                         }
 799                                         else if (sscanf (pos, HDR_LOCATION URI_HTTP URI_HOST, server_type, server_address) == 2) {
 800                                                 host_name = strscpy (host_name, server_address);
 801                                                 strcpy (server_url, "/");
 802                                                 use_ssl = server_type_check (server_type);
 803                                                 server_port = server_port_check (use_ssl);
 804                                                 check_http ();
 805                                         }
 806                                         else if (sscanf (pos, HDR_LOCATION URI_PATH, server_url) == 1) {
 807                                                 if ((server_url[0] != '/') && (x = strrchr(orig_url, '/'))) {
 808                                                         *x = '\0';
 809                                                         server_url = ssprintf (server_url, "%s/%s", orig_url, server_url);
 810                                                 }
 811                                                 check_http ();
 812                                         }
 813                                         pos += (size_t) strcspn (pos, "\r\n");
 814                                         pos += (size_t) strspn (pos, "\r\n");
 815                                 } /* end while (pos) */
 816                                 printf ("HTTP UNKNOWN: Could not find redirect location - %s%s",
 817                                         status_line, (display_html ? "</A>" : ""));
 818                                 exit (STATE_UNKNOWN);
 819                         } /* end if (onredirect == STATE_DEPENDENT) */
 820
 821                         else if (onredirect == STATE_UNKNOWN)
 822                                 printf ("HTTP UNKNOWN");
 823                         else if (onredirect == STATE_OK)
 824                                 printf ("HTTP ok");
 825                         else if (onredirect == STATE_WARNING)
 826                                 printf ("HTTP WARNING");
 827                         else if (onredirect == STATE_CRITICAL)
 828                                 printf ("HTTP CRITICAL");
 829                         time (&end_time);
 830                         msg = ssprintf (msg, ": %s - %d second response time %s%s|time=%d\n",
 831                                  status_line, (int) (end_time - start_time), timestamp,
 832                            (display_html ? "</A>" : ""), (int) (end_time - start_time));
 833                         terminate (onredirect, msg);
 834                 } /* end if (strstr (status_line, "30[0-4]") */
 835
 836
 837         } /* end else (server_expect_yn)  */
 838
 839
 840         /* check elapsed time */
 841         time (&end_time);
 842         msg = ssprintf (msg, "HTTP problem: %s - %d second response time %s%s|time=%d\n",
 843                        status_line, (int) (end_time - start_time), timestamp,
 844                        (display_html ? "</A>" : ""), (int) (end_time - start_time));
 845         if (check_critical_time == TRUE && (end_time - start_time) > critical_time)
 846                 terminate (STATE_CRITICAL, msg);
 847         if (check_warning_time == TRUE && (end_time - start_time) > warning_time)
 848                 terminate (STATE_WARNING, msg);
 849
 850         /* Page and Header content checks go here */
 851         /* these checks should be last */
 852
 853         if (strlen (string_expect)) {
 854                 if (strstr (page, string_expect)) {
 855                         printf ("HTTP ok: %s - %d second response time %s%s|time=%d\n",
 856                                 status_line, (int) (end_time - start_time),
 857                                 timestamp, (display_html ? "</A>" : ""), (int) (end_time - start_time));
 858                         exit (STATE_OK);
 859                 }
 860                 else {
 861                         printf ("HTTP CRITICAL: string not found%s|time=%d\n",
 862                                 (display_html ? "</A>" : ""), (int) (end_time - start_time));
 863                         exit (STATE_CRITICAL);
 864                 }
 865         }
 866 #ifdef HAVE_REGEX_H
 867         if (strlen (regexp)) {
 868                 errcode = regexec (&preg, page, REGS, pmatch, 0);
 869                 if (errcode == 0) {
 870                         printf ("HTTP ok: %s - %d second response time %s%s|time=%d\n",
 871                                 status_line, (int) (end_time - start_time),
 872                                 timestamp, (display_html ? "</A>" : ""), (int) (end_time - start_time));
 873                         exit (STATE_OK);
 874                 }
 875                 else {
 876                         if (errcode == REG_NOMATCH) {
 877                                 printf ("HTTP CRITICAL: pattern not found%s|time=%d\n",
 878                                         (display_html ? "</A>" : ""), (int) (end_time - start_time));
 879                                 exit (STATE_CRITICAL);
 880                         }
 881                         else {
 882                                 regerror (errcode, &preg, errbuf, MAX_INPUT_BUFFER);
 883                                 printf ("Execute Error: %s\n", errbuf);
 884                                 exit (STATE_CRITICAL);
 885                         }
 886                 }
 887         }
 888 #endif
 889
 890         /* We only get here if all tests have been passed */
 891         msg = ssprintf (msg, "HTTP ok: %s - %d second response time %s%s|time=%d\n",
 892                         status_line, (int) (end_time - start_time),
 893                         timestamp, (display_html ? "</A>" : ""), (int) (end_time - start_time));
 894         terminate (STATE_OK, msg);
 895         return STATE_UNKNOWN;
 896 }
 897
 898
 899
 900 #ifdef HAVE_SSL
 901 int connect_SSL (void)
 902 {
 903         SSL_METHOD *meth;
 904
 905         randbuff = strscpy (NULL, "qwertyuiopasdfghjkl");
 906         RAND_seed (randbuff, strlen (randbuff));
 907         /* Initialize SSL context */
 908         SSLeay_add_ssl_algorithms ();
 909         meth = SSLv23_client_method ();
 910         SSL_load_error_strings ();
 911         if ((ctx = SSL_CTX_new (meth)) == NULL) {
 912                 printf ("ERROR: Cannot create SSL context.\n");
 913                 return STATE_CRITICAL;
 914         }
 915
 916         /* Initialize alarm signal handling */
 917         signal (SIGALRM, socket_timeout_alarm_handler);
 918
 919         /* Set socket timeout */
 920         alarm (socket_timeout);
 921
 922         /* Save start time */
 923         time (&start_time);
 924
 925         /* Make TCP connection */
 926         if (my_tcp_connect (server_address, server_port, &sd) == STATE_OK) {
 927                 /* Do the SSL handshake */
 928                 if ((ssl = SSL_new (ctx)) != NULL) {
 929                         SSL_set_cipher_list(ssl, "ALL");
 930                         SSL_set_fd (ssl, sd);
 931                         if (SSL_connect (ssl) != -1)
 932                                 return OK;
 933                         ERR_print_errors_fp (stderr);
 934                 }
 935                 else {
 936                         printf ("ERROR: Cannot initiate SSL handshake.\n");
 937                 }
 938                 SSL_free (ssl);
 939         }
 940
 941         SSL_CTX_free (ctx);
 942         close (sd);
 943
 944         return STATE_CRITICAL;
 945 }
 946 #endif
 947
 948 #ifdef HAVE_SSL
 949 int
 950 check_certificate (X509 ** certificate)
 951 {
 952         ASN1_STRING *tm;
 953         int offset;
 954         struct tm stamp;
 955         int days_left;
 956
 957
 958         /* Retrieve timestamp of certificate */
 959         tm = X509_get_notAfter (*certificate);
 960
 961         /* Generate tm structure to process timestamp */
 962         if (tm->type == V_ASN1_UTCTIME) {
 963                 if (tm->length < 10) {
 964                         printf ("ERROR: Wrong time format in certificate.\n");
 965                         return STATE_CRITICAL;
 966                 }
 967                 else {
 968                         stamp.tm_year = (tm->data[0] - '0') * 10 + (tm->data[1] - '0');
 969                         if (stamp.tm_year < 50)
 970                                 stamp.tm_year += 100;
 971                         offset = 0;
 972                 }
 973         }
 974         else {
 975                 if (tm->length < 12) {
 976                         printf ("ERROR: Wrong time format in certificate.\n");
 977                         return STATE_CRITICAL;
 978                 }
 979                 else {
 980                         stamp.tm_year =
 981                                 (tm->data[0] - '0') * 1000 + (tm->data[1] - '0') * 100 +
 982                                 (tm->data[2] - '0') * 10 + (tm->data[3] - '0');
 983                         stamp.tm_year -= 1900;
 984                         offset = 2;
 985                 }
 986         }
 987         stamp.tm_mon =
 988                 (tm->data[2 + offset] - '0') * 10 + (tm->data[3 + offset] - '0') - 1;
 989         stamp.tm_mday =
 990                 (tm->data[4 + offset] - '0') * 10 + (tm->data[5 + offset] - '0');
 991         stamp.tm_hour =
 992                 (tm->data[6 + offset] - '0') * 10 + (tm->data[7 + offset] - '0');
 993         stamp.tm_min =
 994                 (tm->data[8 + offset] - '0') * 10 + (tm->data[9 + offset] - '0');
 995         stamp.tm_sec = 0;
 996         stamp.tm_isdst = -1;
 997
 998         days_left = (mktime (&stamp) - time (NULL)) / 86400;
 999         snprintf
1000                 (timestamp, 16, "%02d/%02d/%04d %02d:%02d",
1001                  stamp.tm_mon + 1,
1002                  stamp.tm_mday, stamp.tm_year + 1900, stamp.tm_hour, stamp.tm_min);
1003
1004         if (days_left > 0 && days_left <= days_till_exp) {
1005                 printf ("Certificate expires in %d day(s) (%s).\n", days_left, timestamp);
1006                 return STATE_WARNING;
1007         }
1008         if (days_left < 0) {
1009                 printf ("Certificate expired on %s.\n", timestamp);
1010                 return STATE_CRITICAL;
1011         }
1012
1013         if (days_left == 0) {
1014                 printf ("Certificate expires today (%s).\n", timestamp);
1015                 return STATE_WARNING;
1016         }
1017
1018         printf ("Certificate will expire on %s.\n", timestamp);
1019
1020         return STATE_OK;
1021 }
1022 #endif
1023 \f
1024
1025
1026 int
1027 my_recv (void)
1028 {
1029         int i;
1030 #ifdef HAVE_SSL
1031         if (use_ssl) {
1032                 i = SSL_read (ssl, buffer, MAX_INPUT_BUFFER - 1);
1033         }
1034         else {
1035                 i = recv (sd, buffer, MAX_INPUT_BUFFER - 1, 0);
1036         }
1037 #else
1038         i = recv (sd, buffer, MAX_INPUT_BUFFER - 1, 0);
1039 #endif
1040         return i;
1041 }
1042
1043
1044 int
1045 my_close (void)
1046 {
1047 #ifdef HAVE_SSL
1048         if (use_ssl == TRUE) {
1049                 SSL_shutdown (ssl);
1050                 SSL_free (ssl);
1051                 SSL_CTX_free (ctx);
1052                 return 0;
1053         }
1054         else {
1055 #endif
1056                 return close (sd);
1057 #ifdef HAVE_SSL
1058         }
1059 #endif
1060 }
1061 \f
1062
1063
1064 void
1065 print_help (void)
1066 {
1067         print_revision (PROGNAME, REVISION);
1068         printf
1069                 ("Copyright (c) %s %s <%s>\n\n%s\n",
1070                  COPYRIGHT, AUTHORS, EMAIL, SUMMARY);
1071         print_usage ();
1072         printf ("NOTE: One or both of -H and -I must be specified\n");
1073         printf ("\nOptions:\n" LONGOPTIONS "\n", HTTP_EXPECT, HTTP_PORT,
1074                 DEFAULT_SOCKET_TIMEOUT, SSLOPTIONS);
1075 #ifdef HAVE_SSL
1076         printf (SSLDESCRIPTION);
1077 #endif
1078 }
1079
1080
1081 void
1082 print_usage (void)
1083 {
1084         printf ("Usage:\n" " %s %s\n"
1085 #ifdef HAVE_GETOPT_H
1086                 " %s (-h | --help) for detailed help\n"
1087                 " %s (-V | --version) for version information\n",
1088 #else
1089                 " %s -h for detailed help\n"
1090                 " %s -V for version information\n",
1091 #endif
1092         PROGNAME, OPTIONS, PROGNAME, PROGNAME);
1093 }