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 /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
23 /* All Rights Reserved */
24
25
26 /*
27 * Copyright 2004 Sun Microsystems, Inc. All rights reserved.
28 * Use is subject to license terms.
29 */
30
31 #include <stdio.h>
32 #include <string.h>
33 #include <limits.h>
34 #include <sys/types.h>
35 #include "libadm.h"
36
37 /*
38 * This file is the only one anywhere to need these functions,
39 * so we declare them here, not in libadm.h
40 */
41 extern char *__compile(char *, char *, const char *, int);
42 extern int __step(const char *, const char *);
43
44 #define ESIZE 1024
45
46 #define ERRMSG0 "Input is required."
47 #define ERRMSG1 "Please enter a string containing no more than %d characters."
48 #define ERRMSG2 \
49 "Pattern matching has failed."
50 #define ERRMSG3 \
51 "Please enter a string which contains no embedded, \
52 leading or trailing spaces or tabs."
53
54 #define HLPMSG0 "Please enter a string"
55 #define HLPMSG1 "Please enter a string containing no more than %d characters"
56 #define HLPMSG2 "matches one of the following patterns:"
57 #define HLPMSG3 "matches the following pattern:"
58 #define HLPMSG4 "contains no embedded, leading or trailing spaces or tabs."
59
60 static char *errstr;
61
62 static char *
sethlp(char * msg,char * regexp[],int length)63 sethlp(char *msg, char *regexp[], int length)
64 {
65 int i;
66
67 if (length)
68 (void) sprintf(msg, HLPMSG1, length);
69 else
70 (void) strcpy(msg, HLPMSG0);
71
72 (void) strcat(msg, length ? " and " : " which ");
73
74 if (regexp && regexp[0]) {
75 (void) strcat(msg, regexp[1] ? HLPMSG2 : HLPMSG3);
76 for (i = 0; regexp[i]; i++) {
77 (void) strcat(msg, "\\n\\t");
78 (void) strcat(msg, regexp[i]);
79 }
80 } else
81 (void) strcat(msg, HLPMSG4);
82 return (msg);
83 }
84
85 int
ckstr_val(char * regexp[],int length,char * input)86 ckstr_val(char *regexp[], int length, char *input)
87 {
88 char expbuf[ESIZE];
89 int i, valid;
90
91 valid = 1;
92 if (length && (strlen(input) > (size_t)length)) {
93 errstr = ERRMSG1;
94 return (1);
95 }
96 if (regexp && regexp[0]) {
97 valid = 0;
98 for (i = 0; !valid && regexp[i]; ++i) {
99 if (!__compile(regexp[i], expbuf, &expbuf[ESIZE], '\0'))
100 return (2);
101 valid = __step(input, expbuf);
102 }
103 if (!valid)
104 errstr = ERRMSG2;
105 } else if (strpbrk(input, " \t")) {
106 errstr = ERRMSG3;
107 valid = 0;
108 }
109 return (valid == 0);
110 }
111
112 void
ckstr_err(char * regexp[],int length,char * error,char * input)113 ckstr_err(char *regexp[], int length, char *error, char *input)
114 {
115 char *defhlp;
116 char temp[1024];
117
118 if (input) {
119 if (ckstr_val(regexp, length, input)) {
120 /* LINTED E_SEC_PRINTF_VAR_FMT */
121 (void) snprintf(temp, sizeof (temp), errstr, length);
122 puterror(stdout, temp, error);
123 return;
124 }
125 }
126
127 defhlp = sethlp(temp, regexp, length);
128 puterror(stdout, defhlp, error);
129 }
130
131 void
ckstr_hlp(char * regexp[],int length,char * help)132 ckstr_hlp(char *regexp[], int length, char *help)
133 {
134 char *defhlp;
135 char hlpbuf[1024];
136
137 defhlp = sethlp(hlpbuf, regexp, length);
138 puthelp(stdout, defhlp, help);
139 }
140
141 int
ckstr(char * strval,char * regexp[],int length,char * defstr,char * error,char * help,char * prompt)142 ckstr(char *strval, char *regexp[], int length, char *defstr, char *error,
143 char *help, char *prompt)
144 {
145 int n;
146 char *defhlp;
147 char input[MAX_INPUT],
148 hlpbuf[1024],
149 errbuf[1024];
150
151 defhlp = NULL;
152 if (!prompt)
153 prompt = "Enter an appropriate value";
154
155 start:
156 putprmpt(stderr, prompt, NULL, defstr);
157 if (getinput(input))
158 return (1);
159
160 n = (int)strlen(input);
161 if (n == 0) {
162 if (defstr) {
163 (void) strcpy(strval, defstr);
164 return (0);
165 }
166 puterror(stderr, ERRMSG0, error);
167 goto start;
168 }
169 if (strcmp(input, "?") == 0) {
170 if (defhlp == NULL)
171 defhlp = sethlp(hlpbuf, regexp, length);
172 puthelp(stderr, defhlp, help);
173 goto start;
174 }
175 if (ckquit && (strcmp(input, "q") == 0)) {
176 (void) strcpy(strval, input);
177 return (3);
178 }
179 if (ckstr_val(regexp, length, input)) {
180 /* LINTED E_SEC_PRINTF_VAR_FMT */
181 (void) snprintf(errbuf, sizeof (errbuf), errstr, length);
182 puterror(stderr, errbuf, error);
183 goto start;
184 }
185 (void) strcpy(strval, input);
186 return (0);
187 }
188