usr/src/cmd/valtools/ckrange.c

   1 /*
   2  * CDDL HEADER START
   3  *
   4  * The contents of this file are subject to the terms of the
   5  * Common Development and Distribution License, Version 1.0 only
   6  * (the "License").  You may not use this file except in compliance
   7  * with the License.
   8  *
   9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
  10  * or http://www.opensolaris.org/os/licensing.
  11  * See the License for the specific language governing permissions
  12  * and limitations under the License.
  13  *
  14  * When distributing Covered Code, include this CDDL HEADER in each
  15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
  16  * If applicable, add the following below this CDDL HEADER, with the
  17  * fields enclosed by brackets "[]" replaced with your own identifying
  18  * information: Portions Copyright [yyyy] [name of copyright owner]
  19  *
  20  * CDDL HEADER END
  21  */
  22 /*
  23  * Copyright 2004 Sun Microsystems, Inc.  All rights reserved.
  24  * Use is subject to license terms.
  25  */
  26
  27 /*      Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
  28 /*        All Rights Reserved   */
  29
  30
  31 #pragma ident   "%Z%%M% %I%     %E% SMI"
  32
  33 #include <stdio.h>
  34 #include <limits.h>
  35 #include <string.h>
  36 #include <signal.h>
  37 #include <stdlib.h>
  38 #include <locale.h>
  39 #include <libintl.h>
  40 #include "usage.h"
  41 #include "libadm.h"
  42
  43 #define BADPID  (-2)
  44
  45 static char     *prog;
  46 static char     *deflt = NULL, *prompt = NULL, *error = NULL, *help = NULL;
  47 static int      kpid = BADPID;
  48 static int      signo;
  49 static int      base = 10;
  50 static char     *upper;
  51 static char     *lower;
  52
  53 static const char       vusage[] = "bul";
  54 static const char       husage[] = "bulWh";
  55 static const char       eusage[] = "bulWe";
  56
  57 #define USAGE   "[-l lower] [-u upper] [-b base]"
  58
  59 static void
  60 usage(void)
  61 {
  62         switch (*prog) {
  63         default:
  64                 (void) fprintf(stderr,
  65                         gettext("usage: %s [options] %s\n"),
  66                         prog, USAGE);
  67                 (void) fprintf(stderr, gettext(OPTMESG));
  68                 (void) fprintf(stderr, gettext(STDOPTS));
  69                 break;
  70
  71         case 'v':
  72                 (void) fprintf(stderr,
  73                         gettext("usage: %s %s input\n"), prog, USAGE);
  74                 break;
  75
  76         case 'h':
  77                 (void) fprintf(stderr,
  78                         gettext("usage: %s [options] %s\n"),
  79                         prog, USAGE);
  80                 (void) fprintf(stderr, gettext(OPTMESG));
  81                 (void) fprintf(stderr,
  82                         gettext("\t-W width\n\t-h help\n"));
  83                 break;
  84
  85         case 'e':
  86                 (void) fprintf(stderr,
  87                         gettext("usage: %s [options] %s\n"),
  88                         prog, USAGE);
  89                 (void) fprintf(stderr, gettext(OPTMESG));
  90                 (void) fprintf(stderr,
  91                         gettext("\t-W width\n\t-e error\n"));
  92                 break;
  93         }
  94         exit(1);
  95 }
  96
  97 /*
  98  * Given argv[0], return a pointer to the basename of the program.
  99  */
 100 static char *
 101 prog_name(char *arg0)
 102 {
 103         char *str;
 104
 105         /* first strip trailing '/' characters (exec() allows these!) */
 106         str = arg0 + strlen(arg0);
 107         while (str > arg0 && *--str == '/')
 108                 *str = '\0';
 109         if ((str = strrchr(arg0, '/')) != NULL)
 110                 return (str + 1);
 111         return (arg0);
 112 }
 113
 114 int
 115 main(int argc, char **argv)
 116 {
 117         int     c, n;
 118         long    lvalue, uvalue, intval;
 119         char    *ptr = 0;
 120
 121         (void) setlocale(LC_ALL, "");
 122
 123 #if     !defined(TEXT_DOMAIN)
 124 #define TEXT_DOMAIN     "SYS_TEST"
 125 #endif
 126         (void) textdomain(TEXT_DOMAIN);
 127
 128         prog = prog_name(argv[0]);
 129
 130         while ((c = getopt(argc, argv, "l:u:b:d:p:e:h:k:s:QW:?")) != EOF) {
 131                 /* check for invalid option */
 132                 if ((*prog == 'v') && !strchr(vusage, c))
 133                         usage();
 134                 if ((*prog == 'e') && !strchr(eusage, c))
 135                         usage();
 136                 if ((*prog == 'h') && !strchr(husage, c))
 137                         usage();
 138
 139                 switch (c) {
 140                 case 'Q':
 141                         ckquit = 0;
 142                         break;
 143
 144                 case 'W':
 145                         ckwidth = atoi(optarg);
 146                         if (ckwidth < 0) {
 147                                 (void) fprintf(stderr,
 148                 gettext("%s: ERROR: negative display width specified\n"),
 149                                         prog);
 150                                 exit(1);
 151                         }
 152                         break;
 153
 154                 case 'b':
 155                         base = atoi(optarg);
 156                         if ((base < 2) || (base > 36)) {
 157                                 (void) fprintf(stderr,
 158                 gettext("%s: ERROR: base must be between 2 and 36\n"),
 159                                         prog);
 160                                 exit(1);
 161                         }
 162                         break;
 163
 164                 case 'u':
 165                         upper = optarg;
 166                         break;
 167
 168                 case 'l':
 169                         lower = optarg;
 170                         break;
 171
 172                 case 'd':
 173                         deflt = optarg;
 174                         break;
 175
 176                 case 'p':
 177                         prompt = optarg;
 178                         break;
 179
 180                 case 'e':
 181                         error = optarg;
 182                         break;
 183
 184                 case 'h':
 185                         help = optarg;
 186                         break;
 187
 188                 case 'k':
 189                         kpid = atoi(optarg);
 190                         break;
 191
 192                 case 's':
 193                         signo = atoi(optarg);
 194                         break;
 195
 196                 default:
 197                         usage();
 198                 }
 199         }
 200
 201         if (signo) {
 202                 if (kpid == BADPID)
 203                         usage();
 204         } else
 205                 signo = SIGTERM;
 206
 207         if (upper) {
 208                 uvalue = strtol(upper, &ptr, base);
 209                 if (ptr == upper) {
 210                         (void) fprintf(stderr,
 211                 gettext("%s: ERROR: invalid upper value specification\n"),
 212                                 prog);
 213                         exit(1);
 214                 }
 215         } else
 216                 uvalue = LONG_MAX;
 217         if (lower) {
 218                 lvalue =  strtol(lower, &ptr, base);
 219                 if (ptr == lower) {
 220                         (void) fprintf(stderr,
 221                 gettext("%s: ERROR: invalid lower value specification\n"),
 222                                 prog);
 223                         exit(1);
 224                 }
 225         } else
 226                 lvalue = LONG_MIN;
 227
 228         if (uvalue < lvalue) {
 229                 (void) fprintf(stderr,
 230                 gettext("%s: ERROR: upper value is less than lower value\n"),
 231                         prog);
 232                 exit(1);
 233         }
 234
 235         if (*prog == 'v') {
 236                 if (argc != (optind+1))
 237                         usage();
 238                 exit(ckrange_val(lvalue, uvalue, base, argv[optind]));
 239         }
 240
 241         if (optind != argc)
 242                 usage();
 243
 244         if (*prog == 'e') {
 245                 ckindent = 0;
 246                 ckrange_err(lvalue, uvalue, base, error);
 247                 exit(0);
 248         } else if (*prog == 'h') {
 249                 ckindent = 0;
 250                 ckrange_hlp(lvalue, uvalue, base, help);
 251                 exit(0);
 252         }
 253
 254         n = ckrange(&intval, lvalue, uvalue, (short)base,
 255                 deflt, error, help, prompt);    /* libadm interface */
 256         if (n == 3) {
 257                 if (kpid > -2)
 258                         (void) kill(kpid, signo);
 259                 (void) puts("q");
 260         } else if (n == 0)
 261                 (void) printf("%ld", intval);
 262         return (n);
 263 }