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 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 * 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 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