Code

Bug Fix [ 1024735 ] check_swap providing inaccurate swap information on Sol6
[nagiosplug.git] / plugins / check_swap.c
index 96eacf359ca79fec66ff517e5e8942c9072dfd2f..ba353bc0b89a44580860c6c94815806f61ecf2fa 100644 (file)
  *
  *****************************************************************************/
 
+const char *progname = "check_swap";
+const char *revision = "$Revision$";
+const char *copyright = "2000-2004";
+const char *email = "nagiosplug-devel@lists.sourceforge.net";
+
 #include "common.h"
 #include "popen.h"
 #include "utils.h"
 
-const char *progname = "check_swap";
-#define REVISION "$Revision$"
-#define COPYRIGHT "2000-2002"
-#define AUTHOR "Karl DeBisschop"
-#define EMAIL "kdebisschop@users.sourceforge.net"
-#define SUMMARY "Check swap space on local server.\n"
-
+int check_swap (int usp, long unsigned int free_swap);
 int process_arguments (int argc, char **argv);
 int validate_arguments (void);
 void print_usage (void);
 void print_help (void);
 
-int warn_percent = 200;
-int crit_percent = 200;
-long unsigned int warn_size = 0;
-long unsigned int crit_size = 0;
+int warn_percent = 0;
+int crit_percent = 0;
+unsigned long long warn_size = 0;
+unsigned long long crit_size = 0;
 int verbose;
 int allswaps;
 
-#if !defined(sun)
-int sun = 0;   /* defined by compiler if it is a sun solaris system */
-#endif
-
 int
 main (int argc, char **argv)
 {
        int percent_used, percent;
-       long unsigned int total_swap = 0, used_swap = 0, free_swap = 0;
-       long unsigned int total, used, free;
-       int conv_factor;                /* Convert to MBs */
-       int result = STATE_OK;
+       unsigned long long total_swap = 0, used_swap = 0, free_swap = 0;
+       unsigned long long dsktotal = 0, dskused = 0, dskfree = 0, tmp = 0;
+       int result = STATE_UNKNOWN;
        char input_buffer[MAX_INPUT_BUFFER];
-#ifdef HAVE_SWAP
+       char *perf;
+       int conv_factor = SWAP_CONVERSION;
+#ifdef HAVE_PROC_MEMINFO
+       FILE *fp;
+#else
+# ifdef HAVE_SWAP
        char *temp_buffer;
        char *swap_command;
        char *swap_format;
-#endif
-#ifdef HAVE_PROC_MEMINFO
-       FILE *fp;
+# else
+#  ifdef HAVE_DECL_SWAPCTL
+       int i=0, nswaps=0, swapctl_res=0;
+#   ifdef CHECK_SWAP_SWAPCTL_SVR4
+       swaptbl_t *tbl=NULL;
+       swapent_t *ent=NULL;
+#   else
+#    ifdef CHECK_SWAP_SWAPCTL_BSD
+       struct swapent *ent;
+#    endif /* CHECK_SWAP_SWAPCTL_BSD */
+#   endif /* CHECK_SWAP_SWAPCTL_SVR4 */
+#  endif /* HAVE_DECL_SWAPCTL */
+# endif
 #endif
        char str[32];
-       char *status = "";
+       char *status, *tmp_status;
+
+       setlocale (LC_ALL, "");
+       bindtextdomain (PACKAGE, LOCALEDIR);
+       textdomain (PACKAGE);
 
-       if (process_arguments (argc, argv) != OK)
-               usage ("Invalid command arguments supplied\n");
+       status = strdup ("");
+       tmp_status = strdup ("");
+       perf = strdup ("");
+
+       if (process_arguments (argc, argv) == ERROR)
+               usage4 (_("Could not parse arguments"));
 
 #ifdef HAVE_PROC_MEMINFO
        fp = fopen (PROC_MEMINFO, "r");
        while (fgets (input_buffer, MAX_INPUT_BUFFER - 1, fp)) {
-               if (sscanf (input_buffer, " %s %lu %lu %lu", str, &total, &used, &free) == 4 &&
-                   strstr (str, "Swap")) {
-                       total = total / 1048576;
-                       used = used / 1048576;
-                       free = free / 1048576;
-#endif
-#ifdef HAVE_SWAP
-       if (!allswaps && sun) {
-               asprintf(&swap_command, "%s", "/usr/sbin/swap -s");
-               asprintf(&swap_format, "%s", "%*s %*dk %*s %*s + %*dk %*s = %dk %*s %dk %*s");
-               conv_factor = 2048;
-       } else {
-               asprintf(&swap_command, "%s", SWAP_COMMAND);
-               asprintf(&swap_format, "%s", SWAP_FORMAT);
-               conv_factor = SWAP_CONVERSION;
+               if (sscanf (input_buffer, "%*[S]%*[w]%*[a]%*[p]%*[:] %llu %llu %llu", &dsktotal, &dskused, &dskfree) == 3) {
+                       dsktotal = dsktotal / 1048576;
+                       dskused = dskused / 1048576;
+                       dskfree = dskfree / 1048576;
+                       total_swap += dsktotal;
+                       used_swap += dskused;
+                       free_swap += dskfree;
+                       if (allswaps) {
+                               if (dsktotal == 0)
+                                       percent=100.0;
+                               else
+                                       percent = 100 * (((double) dskused) / ((double) dsktotal));
+                               result = max_state (result, check_swap (percent, dskfree));
+                               if (verbose)
+                                       asprintf (&status, "%s [%llu (%d%%)]", status, dskfree, 100 - percent);
+                       }
+               }
+               else if (sscanf (input_buffer, "%*[S]%*[w]%*[a]%*[p]%[TotalFre]%*[:] %llu %*[k]%*[B]", str, &tmp)) {
+                       if (strcmp ("Total", str) == 0) {
+                               dsktotal = tmp / 1024;
+                       }
+                       else if (strcmp ("Free", str) == 0) {
+                               dskfree = tmp / 1024;
+                       }
+               }
+       }
+       fclose(fp);
+       dskused = dsktotal - dskfree;
+       total_swap = dsktotal;
+       used_swap = dskused;
+       free_swap = dskfree;
+#else
+# ifdef HAVE_SWAP
+       asprintf(&swap_command, "%s", SWAP_COMMAND);
+       asprintf(&swap_format, "%s", SWAP_FORMAT);
+
+/* These override the command used if a summary (and thus ! allswaps) is required */
+/* The summary flag returns more accurate information about swap usage on these OSes */
+#  ifdef _AIX
+       if (!allswaps) {
+               asprintf(&swap_command, "%s", "/usr/sbin/lsps -s");
+               asprintf(&swap_format, "%s", "%d%*s %d");
+               conv_factor = 1;
        }
+#  endif
 
        if (verbose >= 2)
-               printf ("Command: %s\n", swap_command);
+               printf (_("Command: %s\n"), swap_command);
        if (verbose >= 3)
-               printf ("Format: %s\n", swap_format);
+               printf (_("Format: %s\n"), swap_format);
 
        child_process = spopen (swap_command);
        if (child_process == NULL) {
-               printf ("Could not open pipe: %s\n", swap_command);
+               printf (_("Could not open pipe: %s\n"), swap_command);
                return STATE_UNKNOWN;
        }
 
        child_stderr = fdopen (child_stderr_array[fileno (child_process)], "r");
        if (child_stderr == NULL)
-               printf ("Could not open stderr for %s\n", swap_command);
+               printf (_("Could not open stderr for %s\n"), swap_command);
 
        sprintf (str, "%s", "");
        /* read 1st line */
@@ -118,7 +164,7 @@ main (int argc, char **argv)
                while (temp_buffer) {
                        if (strstr (temp_buffer, "blocks"))
                                sprintf (str, "%s %s", str, "%f");
-                       else if (strstr (temp_buffer, "free"))
+                       else if (strstr (temp_buffer, "dskfree"))
                                sprintf (str, "%s %s", str, "%f");
                        else
                                sprintf (str, "%s %s", str, "%*s");
@@ -126,42 +172,45 @@ main (int argc, char **argv)
                }
        }
 
-       if (!allswaps && sun) {
-               sscanf (input_buffer, swap_format, &used_swap, &free_swap);
-               used_swap = used_swap / 1024;
-               free_swap = free_swap / 1024;
-               total_swap = used_swap + free_swap;
+/* If different swap command is used for summary switch, need to read format differently */
+#  ifdef _AIX
+       if (!allswaps) {
+               fgets(input_buffer, MAX_INPUT_BUFFER - 1, child_process);       /* Ignore first line */
+               sscanf (input_buffer, swap_format, &total_swap, &used_swap);
+               free_swap = total_swap * (100 - used_swap) /100;
+               used_swap = total_swap - free_swap;
+               if (verbose >= 3)
+                       printf (_("total=%d, used=%d, free=%d\n"), total_swap, used_swap, free_swap);
        } else {
+#  endif
                while (fgets (input_buffer, MAX_INPUT_BUFFER - 1, child_process)) {
-                       sscanf (input_buffer, swap_format, &total, &free);
-
-                       total = total / conv_factor;
-                       free = free / conv_factor;
+                       sscanf (input_buffer, swap_format, &dsktotal, &dskfree);
+
+                       dsktotal = dsktotal / conv_factor;
+                       /* AIX lists percent used, so this converts to dskfree in MBs */
+#  ifdef _AIX
+                       dskfree = dsktotal * (100 - dskfree) / 100;
+#  else
+                       dskfree = dskfree / conv_factor;
+#  endif
                        if (verbose >= 3)
-                               printf ("total=%d, free=%d\n", total, free);
+                               printf (_("total=%llu, free=%llu\n"), dsktotal, dskfree);
 
-                       used = total - free;
-#endif
-                       total_swap += total;
-                       used_swap += used;
-                       free_swap += free;
+                       dskused = dsktotal - dskfree;
+                       total_swap += dsktotal;
+                       used_swap += dskused;
+                       free_swap += dskfree;
                        if (allswaps) {
-                               percent = 100 * (((double) used) / ((double) total));
-                               result = max_state (result, check_swap (percent, free));
+                               percent = 100 * (((double) dskused) / ((double) dsktotal));
+                               result = max_state (result, check_swap (percent, dskfree));
                                if (verbose)
-                                       asprintf (&status, "%s [%lu (%d%%)]", status, free, 100 - percent);
+                                       asprintf (&status, "%s [%llu (%d%%)]", status, dskfree, 100 - percent);
                        }
                }
+#  ifdef _AIX
        }
-       percent_used = 100 * ((double) used_swap) / ((double) total_swap);
-       result = max_state (result, check_swap (percent_used, free_swap));
-       asprintf (&status, " %d%% free (%lu MB out of %lu MB)%s",
-                                               (100 - percent_used), free_swap, total_swap, status);
+#  endif
 
-#ifdef HAVE_PROC_MEMINFO
-       fclose(fp);
-#endif
-#ifdef HAVE_SWAP
        /* If we get anything on STDERR, at least set warning */
        while (fgets (input_buffer, MAX_INPUT_BUFFER - 1, child_stderr))
                result = max_state (result, STATE_WARNING);
@@ -172,25 +221,123 @@ main (int argc, char **argv)
        /* close the pipe */
        if (spclose (child_process))
                result = max_state (result, STATE_WARNING);
-#endif
+# else
+#  ifdef CHECK_SWAP_SWAPCTL_SVR4
+
+       /* get the number of active swap devices */
+       nswaps=swapctl(SC_GETNSWP, NULL);
+
+       /* initialize swap table + entries */
+       tbl=(swaptbl_t*)malloc(sizeof(swaptbl_t)+(sizeof(swapent_t)*nswaps));
+       memset(tbl, 0, sizeof(swaptbl_t)+(sizeof(swapent_t)*nswaps));
+       tbl->swt_n=nswaps;
+       for(i=0;i<nswaps;i++){
+               ent=&tbl->swt_ent[i];
+               ent->ste_path=(char*)malloc(sizeof(char)*MAXPATHLEN);
+       }
 
-       terminate (result, "SWAP %s:%s\n", state_text (result), status);
+       /* and now, tally 'em up */
+       swapctl_res=swapctl(SC_LIST, tbl);
+       if(swapctl_res < 0){
+               perror("swapctl failed: ");
+               result = STATE_WARNING;
+       }
+
+       for(i=0;i<nswaps;i++){
+               dsktotal = tbl->swt_ent[i].ste_pages / SWAP_CONVERSION;
+               dskfree = tbl->swt_ent[i].ste_free /  SWAP_CONVERSION;
+               dskused = ( dsktotal - dskfree );
+
+               if(allswaps && dsktotal > 0){
+                       percent = 100 * (((double) dskused) / ((double) dsktotal));
+                       result = max_state (result, check_swap (percent, dskfree));
+                       if (verbose) {
+                               asprintf (&status, "%s [%d (%d%%)]", status, (int)dskfree, 100 - percent);
+                       }
+               }
+
+               total_swap += dsktotal;
+               free_swap += dskfree;
+               used_swap += dskused;
+       }
+
+       /* and clean up after ourselves */
+       for(i=0;i<nswaps;i++){
+               free(tbl->swt_ent[i].ste_path);
+       }
+       free(tbl);
+#  else
+#   ifdef CHECK_SWAP_SWAPCTL_BSD
+
+       /* get the number of active swap devices */
+       nswaps=swapctl(SWAP_NSWAP, NULL, 0);
+
+       /* initialize swap table + entries */
+       ent=(struct swapent*)malloc(sizeof(struct swapent)*nswaps);
+
+       /* and now, tally 'em up */
+       swapctl_res=swapctl(SWAP_STATS, ent, nswaps);
+       if(swapctl_res < 0){
+               perror("swapctl failed: ");
+               result = STATE_WARNING;
+       }
+
+       for(i=0;i<nswaps;i++){
+               dsktotal = ent->se_nblks / conv_factor;
+               dskused = ent->se_inuse / conv_factor;
+               dskfree = ( dsktotal - dskused );
+
+               if(allswaps && dsktotal > 0){
+                       percent = 100 * (((double) dskused) / ((double) dsktotal));
+                       result = max_state (result, check_swap (percent, dskfree));
+                       if (verbose) {
+                               asprintf (&status, "%s [%d (%d%%)]", status, (int)dskfree, 100 - percent);
+                       }
+               }
+
+               total_swap += dsktotal;
+               free_swap += dskfree;
+               used_swap += dskused;
+       }
+
+       /* and clean up after ourselves */
+       free(ent);
+
+#   endif /* CHECK_SWAP_SWAPCTL_BSD */
+#  endif /* CHECK_SWAP_SWAPCTL_SVR4 */
+# endif /* HAVE_SWAP */
+#endif /* HAVE_PROC_MEMINFO */
+
+       percent_used = 100 * ((double) used_swap) / ((double) total_swap);
+       result = max_state (result, check_swap (percent_used, free_swap));
+       /* broken into two steps because of funkiness with builtin asprintf */
+       asprintf (&tmp_status, _(" %d%% free (%llu MB out of %llu MB)"),
+                                               (100 - percent_used), free_swap, total_swap);
+       asprintf (&status, "%s%s", tmp_status, status);
+
+       asprintf (&perf, "%s", perfdata ("swap", (long) free_swap, "MB",
+               TRUE, (long) max (warn_size/1024, warn_percent/100.0*total_swap),
+               TRUE, (long) max (crit_size/1024, crit_percent/100.0*total_swap),
+               TRUE, 0,
+               TRUE, (long) total_swap));
+       printf ("SWAP %s:%s |%s\n", state_text (result), status, perf);
+       return result;
 }
 
 
 
-\f
 int
-check_swap (int usp, int free_swap)
+check_swap (int usp, long unsigned int free_swap)
 {
        int result = STATE_UNKNOWN;
-       if (usp >= 0 && usp >= (100.0 - crit_percent))
+       free_swap = free_swap * 1024;           /* Convert back to bytes as warn and crit specified in bytes */
+       if (usp >= 0 && crit_percent != 0 && usp >= (100.0 - crit_percent))
                result = STATE_CRITICAL;
-       else if (crit_size >= 0 && free_swap <= crit_size)
+       else if (crit_size > 0 && free_swap <= crit_size)
                result = STATE_CRITICAL;
-       else if (usp >= 0 && usp >= (100.0 - warn_percent))
+       else if (usp >= 0 && warn_percent != 0 && usp >= (100.0 - warn_percent))
                result = STATE_WARNING;
-       else if (warn_size >= 0 && free_swap <= warn_size)
+       else if (warn_size > 0 && free_swap <= warn_size)
                result = STATE_WARNING;
        else if (usp >= 0.0)
                result = STATE_OK;
@@ -198,16 +345,15 @@ check_swap (int usp, int free_swap)
 }
 
 
+
 /* process command-line arguments */
 int
 process_arguments (int argc, char **argv)
 {
        int c = 0;  /* option character */
-       int wc = 0; /* warning counter  */
-       int cc = 0; /* critical counter */
 
-       int option_index = 0;
-       static struct option long_options[] = {
+       int option = 0;
+       static struct option longopts[] = {
                {"warning", required_argument, 0, 'w'},
                {"critical", required_argument, 0, 'c'},
                {"allswaps", no_argument, 0, 'a'},
@@ -221,20 +367,20 @@ process_arguments (int argc, char **argv)
                return ERROR;
 
        while (1) {
-               c = getopt_long (argc, argv, "+?Vvhac:w:", long_options, &option_index);
+               c = getopt_long (argc, argv, "+?Vvhac:w:", longopts, &option);
 
                if (c == -1 || c == EOF)
                        break;
 
                switch (c) {
-               case 'w':                                                                       /* warning time threshold */
+               case 'w':                                                                       /* warning size threshold */
                        if (is_intnonneg (optarg)) {
                                warn_size = atoi (optarg);
                                break;
                        }
                        else if (strstr (optarg, ",") &&
                                                         strstr (optarg, "%") &&
-                                                        sscanf (optarg, "%lu,%d%%", &warn_size, &warn_percent) == 2) {
+                                                        sscanf (optarg, "%llu,%d%%", &warn_size, &warn_percent) == 2) {
                                break;
                        }
                        else if (strstr (optarg, "%") &&
@@ -242,17 +388,16 @@ process_arguments (int argc, char **argv)
                                break;
                        }
                        else {
-                               usage ("Warning threshold must be integer or percentage!\n");
+                               usage (_("Warning threshold must be integer or percentage!\n"));
                        }
-                       wc++;
-               case 'c':                                                                       /* critical time threshold */
+               case 'c':                                                                       /* critical size threshold */
                        if (is_intnonneg (optarg)) {
                                crit_size = atoi (optarg);
                                break;
                        }
                        else if (strstr (optarg, ",") &&
                                                         strstr (optarg, "%") &&
-                                                        sscanf (optarg, "%lu,%d%%", &crit_size, &crit_percent) == 2) {
+                                                        sscanf (optarg, "%llu,%d%%", &crit_size, &crit_percent) == 2) {
                                break;
                        }
                        else if (strstr (optarg, "%") &&
@@ -260,9 +405,8 @@ process_arguments (int argc, char **argv)
                                break;
                        }
                        else {
-                               usage ("Critical threshold must be integer or percentage!\n");
+                               usage (_("Critical threshold must be integer or percentage!\n"));
                        }
-                       cc++;
                case 'a':                                                                       /* all swap */
                        allswaps = TRUE;
                        break;
@@ -270,35 +414,37 @@ process_arguments (int argc, char **argv)
                        verbose++;
                        break;
                case 'V':                                                                       /* version */
-                       print_revision (progname, "$Revision$");
+                       print_revision (progname, revision);
                        exit (STATE_OK);
                case 'h':                                                                       /* help */
                        print_help ();
                        exit (STATE_OK);
-               case '?':                                                                       /* help */
-                       usage ("Invalid argument\n");
+               case '?':                                                                       /* error */
+                       printf (_("%s: Unknown argument: %s\n\n"), progname, optarg);
+                       print_usage ();
+                       exit (STATE_UNKNOWN);
                }
        }
 
        c = optind;
        if (c == argc)
                return validate_arguments ();
-       if (warn_percent > 100 && is_intnonneg (argv[c]))
+       if (warn_percent == 0 && is_intnonneg (argv[c]))
                warn_percent = atoi (argv[c++]);
 
        if (c == argc)
                return validate_arguments ();
-       if (crit_percent > 100 && is_intnonneg (argv[c]))
+       if (crit_percent == 0 && is_intnonneg (argv[c]))
                crit_percent = atoi (argv[c++]);
 
        if (c == argc)
                return validate_arguments ();
-       if (warn_size < 0 && is_intnonneg (argv[c]))
+       if (warn_size == 0 && is_intnonneg (argv[c]))
                warn_size = atoi (argv[c++]);
 
        if (c == argc)
                return validate_arguments ();
-       if (crit_size < 0 && is_intnonneg (argv[c]))
+       if (crit_size == 0 && is_intnonneg (argv[c]))
                crit_size = atoi (argv[c++]);
 
        return validate_arguments ();
@@ -306,73 +452,69 @@ process_arguments (int argc, char **argv)
 
 
 
-
-
 int
 validate_arguments (void)
 {
-       if (warn_percent > 100 && crit_percent > 100 && warn_size < 0
-                       && crit_size < 0) {
+       if (warn_percent == 0 && crit_percent == 0 && warn_size == 0
+                       && crit_size == 0) {
                return ERROR;
        }
        else if (warn_percent < crit_percent) {
                usage
-                       ("Warning percentage should be more than critical percentage\n");
+                       (_("Warning percentage should be more than critical percentage\n"));
        }
        else if (warn_size < crit_size) {
                usage
-                       ("Warning free space should be more than critical free space\n");
+                       (_("Warning free space should be more than critical free space\n"));
        }
        return OK;
 }
 
 
 
-
-
 void
-print_usage (void)
+print_help (void)
 {
-       printf
-               ("Usage:\n"
-                " %s [-a] -w <used_percentage>%% -c <used_percentage>%%\n"
-                " %s [-a] -w <bytes_free> -c <bytes_free>\n"
-                " %s (-h | --help) for detailed help\n"
-                " %s (-V | --version) for version information\n",
-                progname, progname, progname, progname);
-}
+       print_revision (progname, revision);
+
+       printf (_(COPYRIGHT), copyright, email);
 
+       printf (_("Check swap space on local machine.\n\n"));
 
+       print_usage ();
+
+       printf (_(UT_HELP_VRSN));
+
+       printf (_("\n\
+ -w, --warning=INTEGER\n\
+   Exit with WARNING status if less than INTEGER bytes of swap space are free\n\
+ -w, --warning=PERCENT%%\n\
+   Exit with WARNING status if less than PERCENT of swap space is free\n\
+ -c, --critical=INTEGER\n\
+   Exit with CRITICAL status if less than INTEGER bytes of swap space are free\n\
+ -c, --critical=PERCENT%%\n\
+   Exit with CRITCAL status if less than PERCENT of swap space is free\n\
+ -a, --allswaps\n\
+    Conduct comparisons for all swap partitions, one by one\n\
+ -v, --verbose\n\
+    Verbose output. Up to 3 levels\n"));
+
+       printf (_("\n\
+On Solaris, if -a specified, uses swap -l, otherwise uses swap -s.\n\
+Will be discrepencies because swap -s counts allocated swap and includes\n\
+real memory\n"));
+       printf (_("\n\
+On AIX, if -a is specified, uses lsps -a, otherwise uses lsps -s.\n"));
+
+       printf (_(UT_SUPPORT));
+}
 
 
 
 void
-print_help (void)
+print_usage (void)
 {
-       print_revision (progname, REVISION);
-       printf
-               ("Copyright (c) %s %s <%s>\n\n%s\n", COPYRIGHT, AUTHOR, EMAIL, SUMMARY);
-       print_usage ();
-       printf
-               ("\nOptions:\n"
-                " -w, --warning=INTEGER\n"
-                "   Exit with WARNING status if less than INTEGER bytes of swap space are free\n"
-                " -w, --warning=PERCENT%%\n"
-                "   Exit with WARNING status if less than PERCENT of swap space has been used\n"
-                " -c, --critical=INTEGER\n"
-                "   Exit with CRITICAL status if less than INTEGER bytes of swap space are free\n"
-                " -c, --critical=PERCENT%%\n"
-                "   Exit with CRITCAL status if less than PERCENT of swap space has been used\n"
-                " -a, --allswaps\n"
-                "    Conduct comparisons for all swap partitions, one by one\n"
-                " -h, --help\n"
-                "    Print detailed help screen\n"
-                " -V, --version\n" "    Print version information\n"
-#ifdef sun
-                "\nOn Solaris, if -a specified, uses swap -l, otherwise uses swap -s.\n"
-                "Will be discrepencies because swap -s counts allocated swap and includes real memory\n"
-#endif
-                "\n"
-                );
-       support ();
+       printf ("\
+       Usage: %s [-av] -w <percent_free>%% -c <percent_free>%%\n\
+         %s [-av] -w <bytes_free> -c <bytes_free>\n", progname, progname);
 }