date.c revision 1.23
1/* $NetBSD: date.c,v 1.23 1998/07/27 16:43:25 mycroft Exp $ */ 2 3/* 4 * Copyright (c) 1985, 1987, 1988, 1993 5 * The Regents of the University of California. All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. All advertising materials mentioning features or use of this software 16 * must display the following acknowledgement: 17 * This product includes software developed by the University of 18 * California, Berkeley and its contributors. 19 * 4. Neither the name of the University nor the names of its contributors 20 * may be used to endorse or promote products derived from this software 21 * without specific prior written permission. 22 * 23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 33 * SUCH DAMAGE. 34 */ 35 36#include <sys/cdefs.h> 37#ifndef lint 38__COPYRIGHT( 39"@(#) Copyright (c) 1985, 1987, 1988, 1993\n\ 40 The Regents of the University of California. All rights reserved.\n"); 41#endif /* not lint */ 42 43#ifndef lint 44#if 0 45static char sccsid[] = "@(#)date.c 8.2 (Berkeley) 4/28/95"; 46#else 47__RCSID("$NetBSD: date.c,v 1.23 1998/07/27 16:43:25 mycroft Exp $"); 48#endif 49#endif /* not lint */ 50 51#include <sys/param.h> 52#include <sys/time.h> 53 54#include <ctype.h> 55#include <err.h> 56#include <fcntl.h> 57#include <stdio.h> 58#include <stdlib.h> 59#include <string.h> 60#include <locale.h> 61#include <syslog.h> 62#include <time.h> 63#include <tzfile.h> 64#include <unistd.h> 65#include <util.h> 66 67#include "extern.h" 68 69time_t tval; 70int retval, nflag; 71 72int main __P((int, char *[])); 73static void setthetime __P((const char *)); 74static void badformat __P((void)); 75static void usage __P((void)); 76 77int 78main(argc, argv) 79 int argc; 80 char *argv[]; 81{ 82 extern int optind; 83 extern char *optarg; 84 int ch, rflag; 85 char *format, buf[1024]; 86 87 (void)setlocale(LC_ALL, ""); 88 89 rflag = 0; 90 while ((ch = getopt(argc, argv, "nr:u")) != -1) 91 switch((char)ch) { 92 case 'n': /* don't set network */ 93 nflag = 1; 94 break; 95 case 'r': /* user specified seconds */ 96 rflag = 1; 97 tval = atol(optarg); 98 break; 99 case 'u': /* do everything in GMT */ 100 (void)setenv("TZ", "GMT0", 1); 101 break; 102 default: 103 usage(); 104 } 105 argc -= optind; 106 argv += optind; 107 108 if (!rflag && time(&tval) == -1) 109 err(1, "time"); 110 111 format = "%a %b %e %H:%M:%S %Z %Y"; 112 113 /* allow the operands in any order */ 114 if (*argv && **argv == '+') { 115 format = *argv + 1; 116 ++argv; 117 } 118 119 if (*argv) { 120 setthetime(*argv); 121 ++argv; 122 } 123 124 if (*argv && **argv == '+') 125 format = *argv + 1; 126 127 (void)strftime(buf, sizeof(buf), format, localtime(&tval)); 128 (void)printf("%s\n", buf); 129 exit(retval); 130 /* NOTREACHED */ 131} 132 133#define ATOI2(s) ((s) += 2, ((s)[-2] - '0') * 10 + ((s)[-1] - '0')) 134 135void 136setthetime(p) 137 const char *p; 138{ 139 struct tm *lt; 140 struct timeval tv; 141 const char *dot, *t; 142 int yearset, len; 143 144 for (t = p, dot = NULL; *t; ++t) { 145 if (isdigit(*t)) 146 continue; 147 if (*t == '.' && dot == NULL) { 148 dot = t; 149 continue; 150 } 151 badformat(); 152 } 153 154 lt = localtime(&tval); 155 156 if (dot != NULL) { /* .ss */ 157 len = strlen(dot); 158 if (len != 3) 159 badformat(); 160 ++dot; 161 lt->tm_sec = ATOI2(dot); 162 } else { 163 len = 0; 164 lt->tm_sec = 0; 165 } 166 167 yearset = 0; 168 switch (strlen(p) - len) { 169 case 12: /* cc */ 170 lt->tm_year = ATOI2(p) * 100 - TM_YEAR_BASE; 171 yearset = 1; 172 /* FALLTHROUGH */ 173 case 10: /* yy */ 174 if (yearset) { 175 lt->tm_year += ATOI2(p); 176 } else { 177 yearset = ATOI2(p); 178 if (yearset < 69) 179 lt->tm_year = yearset + 2000 - TM_YEAR_BASE; 180 else 181 lt->tm_year = yearset + 1900 - TM_YEAR_BASE; 182 } 183 /* FALLTHROUGH */ 184 case 8: /* mm */ 185 lt->tm_mon = ATOI2(p); 186 --lt->tm_mon; /* time struct is 0 - 11 */ 187 /* FALLTHROUGH */ 188 case 6: /* dd */ 189 lt->tm_mday = ATOI2(p); 190 /* FALLTHROUGH */ 191 case 4: /* hh */ 192 lt->tm_hour = ATOI2(p); 193 /* FALLTHROUGH */ 194 case 2: /* mm */ 195 lt->tm_min = ATOI2(p); 196 break; 197 default: 198 badformat(); 199 } 200 201 /* convert broken-down time to GMT clock time */ 202 if ((tval = mktime(lt)) == -1) 203 badformat(); 204 205 /* set the time */ 206 if (nflag || netsettime(tval)) { 207 logwtmp("|", "date", ""); 208 tv.tv_sec = tval; 209 tv.tv_usec = 0; 210 if (settimeofday(&tv, NULL)) { 211 perror("date: settimeofday"); 212 exit(1); 213 } 214 logwtmp("{", "date", ""); 215 } 216 217 if ((p = getlogin()) == NULL) 218 p = "???"; 219 syslog(LOG_AUTH | LOG_NOTICE, "date set by %s", p); 220} 221 222static void 223badformat() 224{ 225 warnx("illegal time format"); 226 usage(); 227} 228 229static void 230usage() 231{ 232 (void)fprintf(stderr, 233 "usage: date [-nu] [-r seconds] [+format]\n"); 234 (void)fprintf(stderr, " date [[[[[cc]yy]mm]dd]hh]mm[.ss]\n"); 235 exit(1); 236} 237