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
usage(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 *
prog_name(char * arg0)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
main(int argc,char ** argv)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 }
264