src/collectd-nagios.c

   1 /**
   2  * collectd-nagios - src/collectd-nagios.c
   3  * Copyright (C) 2008-2010  Florian octo Forster
   4  *
   5  * This program is free software; you can redistribute it and/or modify it
   6  * under the terms of the GNU General Public License as published by the
   7  * Free Software Foundation; only version 2 of the License is applicable.
   8  *
   9  * This program is distributed in the hope that it will be useful, but
  10  * WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License along
  15  * with this program; if not, write to the Free Software Foundation, Inc.,
  16  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  17  *
  18  * Authors:
  19  *   Florian octo Forster <octo at verplant.org>
  20  **/
  21
  22 #if HAVE_CONFIG_H
  23 # include "config.h"
  24 #endif
  25
  26 #if !defined(__GNUC__) || !__GNUC__
  27 # define __attribute__(x) /**/
  28 #endif
  29
  30 #include <stdlib.h>
  31 #include <unistd.h>
  32 #include <stdio.h>
  33 #include <errno.h>
  34 #include <string.h>
  35 #include <strings.h>
  36 #include <assert.h>
  37
  38 #if NAN_STATIC_DEFAULT
  39 # include <math.h>
  40 /* #endif NAN_STATIC_DEFAULT*/
  41 #elif NAN_STATIC_ISOC
  42 # ifndef __USE_ISOC99
  43 #  define DISABLE_ISOC99 1
  44 #  define __USE_ISOC99 1
  45 # endif /* !defined(__USE_ISOC99) */
  46 # include <math.h>
  47 # if DISABLE_ISOC99
  48 #  undef DISABLE_ISOC99
  49 #  undef __USE_ISOC99
  50 # endif /* DISABLE_ISOC99 */
  51 /* #endif NAN_STATIC_ISOC */
  52 #elif NAN_ZERO_ZERO
  53 # include <math.h>
  54 # ifdef NAN
  55 #  undef NAN
  56 # endif
  57 # define NAN (0.0 / 0.0)
  58 # ifndef isnan
  59 #  define isnan(f) ((f) != (f))
  60 # endif /* !defined(isnan) */
  61 # ifndef isfinite
  62 #  define isfinite(f) (((f) - (f)) == 0.0)
  63 # endif
  64 # ifndef isinf
  65 #  define isinf(f) (!isfinite(f) && !isnan(f))
  66 # endif
  67 #endif /* NAN_ZERO_ZERO */
  68
  69 #include "libcollectdclient/collectd/client.h"
  70
  71 #define RET_OKAY     0
  72 #define RET_WARNING  1
  73 #define RET_CRITICAL 2
  74 #define RET_UNKNOWN  3
  75
  76 #define CON_NONE     0
  77 #define CON_AVERAGE  1
  78 #define CON_SUM      2
  79 #define CON_PERCENTAGE  3
  80
  81 struct range_s
  82 {
  83         double min;
  84         double max;
  85         int    invert;
  86 };
  87 typedef struct range_s range_t;
  88
  89 extern char *optarg;
  90 extern int optind, opterr, optopt;
  91
  92 static char *socket_file_g = NULL;
  93 static char *value_string_g = NULL;
  94 static char *hostname_g = NULL;
  95
  96 static range_t range_critical_g;
  97 static range_t range_warning_g;
  98 static int consolitation_g = CON_NONE;
  99 static _Bool nan_is_error_g = 0;
 100
 101 static char **match_ds_g = NULL;
 102 static int    match_ds_num_g = 0;
 103
 104 /* `strdup' is an XSI extension. I don't want to pull in all of XSI just for
 105  * that, so here's an own implementation.. It's easy enough. The GCC attributes
 106  * are supposed to get good performance..  -octo */
 107 __attribute__((malloc, nonnull (1)))
 108 static char *cn_strdup (const char *str) /* {{{ */
 109 {
 110   size_t strsize;
 111   char *ret;
 112
 113   strsize = strlen (str) + 1;
 114   ret = (char *) malloc (strsize);
 115   if (ret != NULL)
 116     memcpy (ret, str, strsize);
 117   return (ret);
 118 } /* }}} char *cn_strdup */
 119
 120 static int filter_ds (size_t *values_num,
 121                 double **values, char ***values_names)
 122 {
 123         gauge_t *new_values;
 124         char   **new_names;
 125
 126         size_t i;
 127
 128         if (match_ds_g == NULL)
 129                 return (RET_OKAY);
 130
 131         new_values = (gauge_t *)calloc (match_ds_num_g, sizeof (*new_values));
 132         if (new_values == NULL)
 133         {
 134                 fprintf (stderr, "malloc failed: %s\n", strerror (errno));
 135                 return (RET_UNKNOWN);
 136         }
 137
 138         new_names = (char **)calloc (match_ds_num_g, sizeof (*new_names));
 139         if (new_names == NULL)
 140         {
 141                 fprintf (stderr, "malloc failed: %s\n", strerror (errno));
 142                 free (new_values);
 143                 return (RET_UNKNOWN);
 144         }
 145
 146         for (i = 0; i < (size_t) match_ds_num_g; i++)
 147         {
 148                 size_t j;
 149
 150                 /* match_ds_g keeps pointers into argv but the names will be freed */
 151                 new_names[i] = cn_strdup (match_ds_g[i]);
 152                 if (new_names[i] == NULL)
 153                 {
 154                         fprintf (stderr, "cn_strdup failed: %s\n", strerror (errno));
 155                         free (new_values);
 156                         for (j = 0; j < i; j++)
 157                                 free (new_names[j]);
 158                         free (new_names);
 159                         return (RET_UNKNOWN);
 160                 }
 161
 162                 for (j = 0; j < *values_num; j++)
 163                         if (strcasecmp (new_names[i], (*values_names)[j]) == 0)
 164                                 break;
 165
 166                 if (j == *values_num)
 167                 {
 168                         printf ("ERROR: DS `%s' is not available.\n", new_names[i]);
 169                         free (new_values);
 170                         for (j = 0; j <= i; j++)
 171                                 free (new_names[j]);
 172                         free (new_names);
 173                         return (RET_CRITICAL);
 174                 }
 175
 176                 new_values[i] = (*values)[j];
 177         }
 178
 179         free (*values);
 180         for (i = 0; i < *values_num; i++)
 181                 free ((*values_names)[i]);
 182         free (*values_names);
 183
 184         *values       = new_values;
 185         *values_names = new_names;
 186         *values_num   = match_ds_num_g;
 187         return (RET_OKAY);
 188 } /* int filter_ds */
 189
 190 static void parse_range (char *string, range_t *range)
 191 {
 192         char *min_ptr;
 193         char *max_ptr;
 194
 195         if (*string == '@')
 196         {
 197                 range->invert = 1;
 198                 string++;
 199         }
 200
 201         max_ptr = strchr (string, ':');
 202         if (max_ptr == NULL)
 203         {
 204                 min_ptr = NULL;
 205                 max_ptr = string;
 206         }
 207         else
 208         {
 209                 min_ptr = string;
 210                 *max_ptr = '\0';
 211                 max_ptr++;
 212         }
 213
 214         assert (max_ptr != NULL);
 215
 216         /* `10' == `0:10' */
 217         if (min_ptr == NULL)
 218                 range->min = 0.0;
 219         /* :10 == ~:10 == -inf:10 */
 220         else if ((*min_ptr == '\0') || (*min_ptr == '~'))
 221                 range->min = NAN;
 222         else
 223                 range->min = atof (min_ptr);
 224
 225         if ((*max_ptr == '\0') || (*max_ptr == '~'))
 226                 range->max = NAN;
 227         else
 228                 range->max = atof (max_ptr);
 229 } /* void parse_range */
 230
 231 static int match_range (range_t *range, double value)
 232 {
 233         int ret = 0;
 234
 235         if (!isnan (range->min) && (range->min > value))
 236                 ret = 1;
 237         if (!isnan (range->max) && (range->max < value))
 238                 ret = 1;
 239
 240         return (((ret - range->invert) == 0) ? 0 : 1);
 241 } /* int match_range */
 242
 243 static void usage (const char *name)
 244 {
 245         fprintf (stderr, "Usage: %s <-s socket> <-n value_spec> <-H hostname> [options]\n"
 246                         "\n"
 247                         "Valid options are:\n"
 248                         "  -s <socket>    Path to collectd's UNIX-socket.\n"
 249                         "  -n <v_spec>    Value specification to get from collectd.\n"
 250                         "                 Format: `plugin-instance/type-instance'\n"
 251                         "  -d <ds>        Select the DS to examine. May be repeated to examine multiple\n"
 252                         "                 DSes. By default all DSes are used.\n"
 253                         "  -g <consol>    Method to use to consolidate several DSes.\n"
 254                         "                 See below for a list of valid arguments.\n"
 255                         "  -H <host>      Hostname to query the values for.\n"
 256                         "  -c <range>     Critical range\n"
 257                         "  -w <range>     Warning range\n"
 258                         "  -m             Treat \"Not a Number\" (NaN) as critical (default: warning)\n"
 259                         "\n"
 260                         "Consolidation functions:\n"
 261                         "  none:          Apply the warning- and critical-ranges to each data-source\n"
 262                         "                 individually.\n"
 263                         "  average:       Calculate the average of all matching DSes and apply the\n"
 264                         "                 warning- and critical-ranges to the calculated average.\n"
 265                         "  sum:           Apply the ranges to the sum of all DSes.\n"
 266                         "  percentage:    Apply the ranges to the ratio (in percent) of the first value\n"
 267                         "                 and the sum of all values."
 268                         "\n", name);
 269         exit (1);
 270 } /* void usage */
 271
 272 static int do_listval (lcc_connection_t *connection)
 273 {
 274         lcc_identifier_t *ret_ident = NULL;
 275         size_t ret_ident_num = 0;
 276
 277         char *hostname = NULL;
 278
 279         int status;
 280         size_t i;
 281
 282         status = lcc_listval (connection, &ret_ident, &ret_ident_num);
 283         if (status != 0) {
 284                 printf ("UNKNOWN: %s\n", lcc_strerror (connection));
 285                 if (ret_ident != NULL)
 286                         free (ret_ident);
 287                 return (RET_UNKNOWN);
 288         }
 289
 290         status = lcc_sort_identifiers (connection, ret_ident, ret_ident_num);
 291         if (status != 0) {
 292                 printf ("UNKNOWN: %s\n", lcc_strerror (connection));
 293                 if (ret_ident != NULL)
 294                         free (ret_ident);
 295                 return (RET_UNKNOWN);
 296         }
 297
 298         for (i = 0; i < ret_ident_num; ++i) {
 299                 char id[1024];
 300
 301                 if ((hostname_g != NULL) && (strcasecmp (hostname_g, ret_ident[i].host)))
 302                         continue;
 303
 304                 if ((hostname == NULL) || strcasecmp (hostname, ret_ident[i].host))
 305                 {
 306                         free (hostname);
 307                         hostname = strdup (ret_ident[i].host);
 308                         printf ("Host: %s\n", hostname);
 309                 }
 310
 311                 /* empty hostname; not to be printed again */
 312                 ret_ident[i].host[0] = '\0';
 313
 314                 status = lcc_identifier_to_string (connection,
 315                                 id, sizeof (id), ret_ident + i);
 316                 if (status != 0) {
 317                         printf ("ERROR: listval: Failed to convert returned "
 318                                         "identifier to a string: %s\n",
 319                                         lcc_strerror (connection));
 320                         free (hostname);
 321                         hostname = NULL;
 322                         continue;
 323                 }
 324
 325                 /* skip over the (empty) hostname and following '/' */
 326                 printf ("\t%s\n", id + 1);
 327         }
 328
 329         free (ret_ident);
 330         free (hostname);
 331         return (RET_OKAY);
 332 } /* int do_listval */
 333
 334 static int do_check_con_none (size_t values_num,
 335                 double *values, char **values_names)
 336 {
 337         int num_critical = 0;
 338         int num_warning  = 0;
 339         int num_okay = 0;
 340         const char *status_str = "UNKNOWN";
 341         int status_code = RET_UNKNOWN;
 342         size_t i;
 343
 344         for (i = 0; i < values_num; i++)
 345         {
 346                 if (isnan (values[i]))
 347                 {
 348                         if (nan_is_error_g)
 349                                 num_critical++;
 350                         else
 351                                 num_warning++;
 352                 }
 353                 else if (match_range (&range_critical_g, values[i]) != 0)
 354                         num_critical++;
 355                 else if (match_range (&range_warning_g, values[i]) != 0)
 356                         num_warning++;
 357                 else
 358                         num_okay++;
 359         }
 360
 361         if ((num_critical == 0) && (num_warning == 0) && (num_okay == 0))
 362         {
 363                 printf ("WARNING: No defined values found\n");
 364                 return (RET_WARNING);
 365         }
 366         else if ((num_critical == 0) && (num_warning == 0))
 367         {
 368                 status_str = "OKAY";
 369                 status_code = RET_OKAY;
 370         }
 371         else if (num_critical == 0)
 372         {
 373                 status_str = "WARNING";
 374                 status_code = RET_WARNING;
 375         }
 376         else
 377         {
 378                 status_str = "CRITICAL";
 379                 status_code = RET_CRITICAL;
 380         }
 381
 382         printf ("%s: %i critical, %i warning, %i okay", status_str,
 383                         num_critical, num_warning, num_okay);
 384         if (values_num > 0)
 385         {
 386                 printf (" |");
 387                 for (i = 0; i < values_num; i++)
 388                         printf (" %s=%f;;;;", values_names[i], values[i]);
 389         }
 390         printf ("\n");
 391
 392         return (status_code);
 393 } /* int do_check_con_none */
 394
 395 static int do_check_con_average (size_t values_num,
 396                 double *values, char **values_names)
 397 {
 398         size_t i;
 399         double total;
 400         int total_num;
 401         double average;
 402         const char *status_str = "UNKNOWN";
 403         int status_code = RET_UNKNOWN;
 404
 405         total = 0.0;
 406         total_num = 0;
 407         for (i = 0; i < values_num; i++)
 408         {
 409                 if (isnan (values[i]))
 410                 {
 411                         if (!nan_is_error_g)
 412                                 continue;
 413
 414                         printf ("CRITICAL: Data source \"%s\" is NaN\n",
 415                                         values_names[i]);
 416                         return (RET_CRITICAL);
 417                 }
 418
 419                 total += values[i];
 420                 total_num++;
 421         }
 422
 423         if (total_num == 0)
 424         {
 425                 printf ("WARNING: No defined values found\n");
 426                 return (RET_WARNING);
 427         }
 428
 429         average = total / total_num;
 430
 431         if (match_range (&range_critical_g, average) != 0)
 432         {
 433                 status_str = "CRITICAL";
 434                 status_code = RET_CRITICAL;
 435         }
 436         else if (match_range (&range_warning_g, average) != 0)
 437         {
 438                 status_str = "WARNING";
 439                 status_code = RET_WARNING;
 440         }
 441         else
 442         {
 443                 status_str = "OKAY";
 444                 status_code = RET_OKAY;
 445         }
 446
 447         printf ("%s: %g average |", status_str, average);
 448         for (i = 0; i < values_num; i++)
 449                 printf (" %s=%f;;;;", values_names[i], values[i]);
 450         printf ("\n");
 451
 452         return (status_code);
 453 } /* int do_check_con_average */
 454
 455 static int do_check_con_sum (size_t values_num,
 456                 double *values, char **values_names)
 457 {
 458         size_t i;
 459         double total;
 460         int total_num;
 461         const char *status_str = "UNKNOWN";
 462         int status_code = RET_UNKNOWN;
 463
 464         total = 0.0;
 465         total_num = 0;
 466         for (i = 0; i < values_num; i++)
 467         {
 468                 if (isnan (values[i]))
 469                 {
 470                         if (!nan_is_error_g)
 471                                 continue;
 472
 473                         printf ("CRITICAL: Data source \"%s\" is NaN\n",
 474                                         values_names[i]);
 475                         return (RET_CRITICAL);
 476                 }
 477
 478                 total += values[i];
 479                 total_num++;
 480         }
 481
 482         if (total_num == 0)
 483         {
 484                 printf ("WARNING: No defined values found\n");
 485                 return (RET_WARNING);
 486         }
 487
 488         if (match_range (&range_critical_g, total) != 0)
 489         {
 490                 status_str = "CRITICAL";
 491                 status_code = RET_CRITICAL;
 492         }
 493         else if (match_range (&range_warning_g, total) != 0)
 494         {
 495                 status_str = "WARNING";
 496                 status_code = RET_WARNING;
 497         }
 498         else
 499         {
 500                 status_str = "OKAY";
 501                 status_code = RET_OKAY;
 502         }
 503
 504         printf ("%s: %g sum |", status_str, total);
 505         for (i = 0; i < values_num; i++)
 506                 printf (" %s=%f;;;;", values_names[i], values[i]);
 507         printf ("\n");
 508
 509         return (status_code);
 510 } /* int do_check_con_sum */
 511
 512 static int do_check_con_percentage (size_t values_num,
 513                 double *values, char **values_names)
 514 {
 515         size_t i;
 516         double sum = 0.0;
 517         double percentage;
 518
 519         const char *status_str  = "UNKNOWN";
 520         int         status_code = RET_UNKNOWN;
 521
 522         if ((values_num < 1) || (isnan (values[0])))
 523         {
 524                 printf ("WARNING: The first value is not defined\n");
 525                 return (RET_WARNING);
 526         }
 527
 528         for (i = 0; i < values_num; i++)
 529         {
 530                 if (isnan (values[i]))
 531                 {
 532                         if (!nan_is_error_g)
 533                                 continue;
 534
 535                         printf ("CRITICAL: Data source \"%s\" is NaN\n",
 536                                         values_names[i]);
 537                         return (RET_CRITICAL);
 538                 }
 539
 540                 sum += values[i];
 541         }
 542
 543         if (sum == 0.0)
 544         {
 545                 printf ("WARNING: Values sum up to zero\n");
 546                 return (RET_WARNING);
 547         }
 548
 549         percentage = 100.0 * values[0] / sum;
 550
 551         if (match_range (&range_critical_g, percentage) != 0)
 552         {
 553                 status_str  = "CRITICAL";
 554                 status_code = RET_CRITICAL;
 555         }
 556         else if (match_range (&range_warning_g, percentage) != 0)
 557         {
 558                 status_str  = "WARNING";
 559                 status_code = RET_WARNING;
 560         }
 561         else
 562         {
 563                 status_str  = "OKAY";
 564                 status_code = RET_OKAY;
 565         }
 566
 567         printf ("%s: %lf percent |", status_str, percentage);
 568         for (i = 0; i < values_num; i++)
 569                 printf (" %s=%lf;;;;", values_names[i], values[i]);
 570         return (status_code);
 571 } /* int do_check_con_percentage */
 572
 573 static int do_check (lcc_connection_t *connection)
 574 {
 575         gauge_t *values;
 576         char   **values_names;
 577         size_t   values_num;
 578         char ident_str[1024];
 579         lcc_identifier_t ident;
 580         size_t i;
 581         int status;
 582
 583         snprintf (ident_str, sizeof (ident_str), "%s/%s",
 584                         hostname_g, value_string_g);
 585         ident_str[sizeof (ident_str) - 1] = 0;
 586
 587         memset (&ident, 0, sizeof (ident));
 588         status = lcc_string_to_identifier (connection, &ident, ident_str);
 589         if (status != 0)
 590         {
 591                 printf ("ERROR: Creating an identifier failed: %s.\n",
 592                                 lcc_strerror (connection));
 593                 LCC_DESTROY (connection);
 594                 return (RET_CRITICAL);
 595         }
 596
 597         status = lcc_getval (connection, &ident,
 598                         &values_num, &values, &values_names);
 599         if (status != 0)
 600         {
 601                 printf ("ERROR: Retrieving values from the daemon failed: %s.\n",
 602                                 lcc_strerror (connection));
 603                 LCC_DESTROY (connection);
 604                 return (RET_CRITICAL);
 605         }
 606
 607         LCC_DESTROY (connection);
 608
 609         status = filter_ds (&values_num, &values, &values_names);
 610         if (status != RET_OKAY)
 611                 return (status);
 612
 613         status = RET_UNKNOWN;
 614         if (consolitation_g == CON_NONE)
 615                 status =  do_check_con_none (values_num, values, values_names);
 616         else if (consolitation_g == CON_AVERAGE)
 617                 status =  do_check_con_average (values_num, values, values_names);
 618         else if (consolitation_g == CON_SUM)
 619                 status = do_check_con_sum (values_num, values, values_names);
 620         else if (consolitation_g == CON_PERCENTAGE)
 621                 status = do_check_con_percentage (values_num, values, values_names);
 622
 623         free (values);
 624         if (values_names != NULL)
 625                 for (i = 0; i < values_num; i++)
 626                         free (values_names[i]);
 627         free (values_names);
 628
 629         return (status);
 630 } /* int do_check */
 631
 632 int main (int argc, char **argv)
 633 {
 634         char address[1024];
 635         lcc_connection_t *connection;
 636
 637         int status;
 638
 639         range_critical_g.min = NAN;
 640         range_critical_g.max = NAN;
 641         range_critical_g.invert = 0;
 642
 643         range_warning_g.min = NAN;
 644         range_warning_g.max = NAN;
 645         range_warning_g.invert = 0;
 646
 647         while (42)
 648         {
 649                 int c;
 650
 651                 c = getopt (argc, argv, "w:c:s:n:H:g:d:hm");
 652                 if (c < 0)
 653                         break;
 654
 655                 switch (c)
 656                 {
 657                         case 'c':
 658                                 parse_range (optarg, &range_critical_g);
 659                                 break;
 660                         case 'w':
 661                                 parse_range (optarg, &range_warning_g);
 662                                 break;
 663                         case 's':
 664                                 socket_file_g = optarg;
 665                                 break;
 666                         case 'n':
 667                                 value_string_g = optarg;
 668                                 break;
 669                         case 'H':
 670                                 hostname_g = optarg;
 671                                 break;
 672                         case 'g':
 673                                 if (strcasecmp (optarg, "none") == 0)
 674                                         consolitation_g = CON_NONE;
 675                                 else if (strcasecmp (optarg, "average") == 0)
 676                                         consolitation_g = CON_AVERAGE;
 677                                 else if (strcasecmp (optarg, "sum") == 0)
 678                                         consolitation_g = CON_SUM;
 679                                 else if (strcasecmp (optarg, "percentage") == 0)
 680                                         consolitation_g = CON_PERCENTAGE;
 681                                 else
 682                                 {
 683                                         fprintf (stderr, "Unknown consolidation function `%s'.\n",
 684                                                         optarg);
 685                                         usage (argv[0]);
 686                                 }
 687                                 break;
 688                         case 'd':
 689                         {
 690                                 char **tmp;
 691                                 tmp = (char **) realloc (match_ds_g,
 692                                                 (match_ds_num_g + 1)
 693                                                 * sizeof (char *));
 694                                 if (tmp == NULL)
 695                                 {
 696                                         fprintf (stderr, "realloc failed: %s\n",
 697                                                         strerror (errno));
 698                                         return (RET_UNKNOWN);
 699                                 }
 700                                 match_ds_g = tmp;
 701                                 match_ds_g[match_ds_num_g] = cn_strdup (optarg);
 702                                 if (match_ds_g[match_ds_num_g] == NULL)
 703                                 {
 704                                         fprintf (stderr, "cn_strdup failed: %s\n",
 705                                                         strerror (errno));
 706                                         return (RET_UNKNOWN);
 707                                 }
 708                                 match_ds_num_g++;
 709                                 break;
 710                         }
 711                         case 'm':
 712                                 nan_is_error_g = 1;
 713                                 break;
 714                         default:
 715                                 usage (argv[0]);
 716                 } /* switch (c) */
 717         }
 718
 719         if ((socket_file_g == NULL) || (value_string_g == NULL)
 720                         || ((hostname_g == NULL) && (strcasecmp (value_string_g, "LIST"))))
 721         {
 722                 fprintf (stderr, "Missing required arguments.\n");
 723                 usage (argv[0]);
 724         }
 725
 726         snprintf (address, sizeof (address), "unix:%s", socket_file_g);
 727         address[sizeof (address) - 1] = 0;
 728
 729         connection = NULL;
 730         status = lcc_connect (address, &connection);
 731         if (status != 0)
 732         {
 733                 printf ("ERROR: Connecting to daemon at %s failed.\n",
 734                                 socket_file_g);
 735                 return (RET_CRITICAL);
 736         }
 737
 738         if (0 == strcasecmp (value_string_g, "LIST"))
 739                 return (do_listval (connection));
 740
 741         return (do_check (connection));
 742 } /* int main */