xref: /illumos-gate/usr/src/cmd/valtools/ckdate.c (revision 7c478bd9)
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 <string.h>
35 #include <signal.h>
36 #include <stdlib.h>
37 #include <locale.h>
38 #include <libintl.h>
39 #include <limits.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	signo = 0;
48 static int	kpid = BADPID;
49 static char	*fmt = NULL;
50 
51 static const char	vusage[] = "f";
52 static const char	husage[] = "fWh";
53 static const char	eusage[] = "fWe";
54 
55 #define	MYFMT "%s:ERROR:invalid format\n" \
56 	"valid format descriptors are:\n" \
57 	"\t%%b  #abbreviated month name\n" \
58 	"\t%%B  #full month name\n" \
59 	"\t%%d  #day of month (01-31)\n" \
60 	"\t%%D  #date as %%m/%%d/%%y or %%m-%%d-%%y (default)\n" \
61 	"\t%%e  #day of month (1-31)\n" \
62 	"\t%%m  #month of year (01-12)\n" \
63 	"\t%%y  #year within century (YY)\n" \
64 	"\t%%Y  #year as CCYY\n"
65 
66 static void
usage(void)67 usage(void)
68 {
69 	switch (*prog) {
70 	default:
71 		(void) fprintf(stderr,
72 			gettext("usage: %s [options] [-f format]\n"), prog);
73 		(void) fprintf(stderr, gettext(OPTMESG));
74 		(void) fprintf(stderr, gettext(STDOPTS));
75 		break;
76 
77 	case 'v':
78 		(void) fprintf(stderr,
79 			gettext("usage: %s [-f format] input\n"), prog);
80 		break;
81 
82 	case 'h':
83 		(void) fprintf(stderr,
84 			gettext("usage: %s [options] [-f format]\n"), prog);
85 		(void) fprintf(stderr, gettext(OPTMESG));
86 		(void) fprintf(stderr,
87 			gettext("\t-W width\n\t-h help\n"));
88 		break;
89 
90 	case 'e':
91 		(void) fprintf(stderr,
92 			gettext("usage: %s [options] [-f format]\n"), prog);
93 		(void) fprintf(stderr, gettext(OPTMESG));
94 		(void) fprintf(stderr,
95 			gettext("\t-W width\n\t-h error\n"));
96 		break;
97 	}
98 	exit(1);
99 }
100 
101 /*
102  * Given argv[0], return a pointer to the basename of the program.
103  */
104 static char *
prog_name(char * arg0)105 prog_name(char *arg0)
106 {
107 	char *str;
108 
109 	/* first strip trailing '/' characters (exec() allows these!) */
110 	str = arg0 + strlen(arg0);
111 	while (str > arg0 && *--str == '/')
112 		*str = '\0';
113 	if ((str = strrchr(arg0, '/')) != NULL)
114 		return (str + 1);
115 	return (arg0);
116 }
117 
118 int
main(int argc,char ** argv)119 main(int argc, char **argv)
120 {
121 	int	c, n;
122 	char	*date;
123 	size_t	len;
124 
125 	(void) setlocale(LC_ALL, "");
126 
127 #if	!defined(TEXT_DOMAIN)
128 #define	TEXT_DOMAIN	"SYS_TEST"
129 #endif
130 	(void) textdomain(TEXT_DOMAIN);
131 
132 	prog = prog_name(argv[0]);
133 
134 	while ((c = getopt(argc, argv, "f:d:p:e:h:k:s:QW:?")) != EOF) {
135 		/* check for invalid option */
136 		if ((*prog == 'v') && !strchr(vusage, c))
137 			usage();
138 		if ((*prog == 'e') && !strchr(eusage, c))
139 			usage();
140 		if ((*prog == 'h') && !strchr(husage, c))
141 			usage();
142 
143 		switch (c) {
144 		case 'Q':
145 			ckquit = 0;
146 			break;
147 
148 		case 'W':
149 			ckwidth = atoi(optarg);
150 			if (ckwidth < 0) {
151 				(void) fprintf(stderr,
152 		gettext("%s: ERROR: negative display width specified\n"),
153 					prog);
154 				exit(1);
155 			}
156 			break;
157 
158 		case 'f':
159 			fmt = optarg;
160 			break;
161 
162 		case 'd':
163 			deflt = optarg;
164 			break;
165 
166 		case 'p':
167 			prompt = optarg;
168 			break;
169 
170 		case 'e':
171 			error = optarg;
172 			break;
173 
174 		case 'h':
175 			help = optarg;
176 			break;
177 
178 		case 'k':
179 			kpid = atoi(optarg);
180 			break;
181 
182 		case 's':
183 			signo = atoi(optarg);
184 			break;
185 
186 		default:
187 			usage();
188 		}
189 	}
190 
191 	if (signo) {
192 		if (kpid == BADPID)
193 			usage();
194 	} else
195 		signo = SIGTERM;
196 
197 	if (*prog == 'v') {
198 		if (argc != (optind + 1))
199 			usage();
200 		n = (ckdate_val(fmt, argv[optind]));
201 		if (n == 4)
202 			(void) fprintf(stderr, gettext(MYFMT), prog);
203 		exit(n);
204 	}
205 
206 	if (optind != argc)
207 		usage();
208 
209 	if (*prog == 'e') {
210 		ckindent = 0;
211 		if (ckdate_err(fmt, error)) {
212 			(void) fprintf(stderr, gettext(MYFMT), prog);
213 			exit(4);
214 		} else
215 			exit(0);
216 
217 	} else if (*prog == 'h') {
218 		ckindent = 0;
219 		if (ckdate_hlp(fmt, help)) {
220 			(void) fprintf(stderr, gettext(MYFMT), prog);
221 			exit(4);
222 		} else
223 			exit(0);
224 
225 	}
226 
227 	if (deflt) {
228 		len = strlen(deflt) + 1;
229 		if (len < MAX_INPUT)
230 			len = MAX_INPUT;
231 	} else {
232 		len = MAX_INPUT;
233 	}
234 	date = (char *)malloc(len);
235 	if (!date) {
236 		(void) fprintf(stderr,
237 			gettext("Not enough memory\n"));
238 		exit(1);
239 	}
240 	n = ckdate(date, fmt, deflt, error, help, prompt);
241 	if (n == 3) {
242 		if (kpid > -2)
243 			(void) kill(kpid, signo);
244 		(void) puts("q");
245 	} else if (n == 0)
246 		(void) printf("%s", date);
247 	if (n == 4)
248 		(void) fprintf(stderr, gettext(MYFMT), prog);
249 	return (n);
250 }
251