1 /* $NetBSD: stime.c,v 1.3 2003/08/07 11:13:08 agc Exp $ */ 2 3 /* 4 * Copyright (c) 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. Neither the name of the University nor the names of its contributors 16 * may be used to endorse or promote products derived from this software 17 * without specific prior written permission. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 29 * SUCH DAMAGE. 30 */ 31 32 #include <sys/cdefs.h> 33 #ifndef lint 34 __COPYRIGHT("@(#) Copyright (c) 1993\n\ 35 The Regents of the University of California. All rights reserved.\n"); 36 #endif /* not lint */ 37 38 #ifndef lint 39 #if 0 40 static char sccsid[] = "from: @(#)touch.c 8.2 (Berkeley) 4/28/95"; 41 #endif 42 __RCSID("$NetBSD: stime.c,v 1.3 2003/08/07 11:13:08 agc Exp $"); 43 #endif /* not lint */ 44 45 46 #include <err.h> 47 #include <string.h> 48 #include <time.h> 49 #include <tzfile.h> 50 51 #include "stime.h" 52 53 #define ATOI2(s) ((s) += 2, ((s)[-2] - '0') * 10 + ((s)[-1] - '0')) 54 55 time_t 56 stime(arg) 57 char *arg; 58 { 59 struct tm *t; 60 time_t tmptime; 61 int yearset; 62 char *p; 63 /* Start with the current time. */ 64 if (time(&tmptime) == (time_t)-1) 65 err(1, "time"); 66 67 if ((t = localtime(&tmptime)) == NULL) 68 err(1, "localtime"); 69 /* [[CC]YY]MMDDhhmm[.SS] */ 70 if ((p = strchr(arg, '.')) == NULL) 71 t->tm_sec = 0; /* Seconds defaults to 0. */ 72 else { 73 if (strlen(p + 1) != 2) 74 goto terr; 75 *p++ = '\0'; 76 t->tm_sec = ATOI2(p); 77 } 78 79 yearset = 0; 80 switch (strlen(arg)) { 81 case 12: /* CCYYMMDDhhmm */ 82 t->tm_year = ATOI2(arg) * 100 - TM_YEAR_BASE; 83 yearset = 1; 84 /* FALLTHOUGH */ 85 case 10: /* YYMMDDhhmm */ 86 if (yearset) { 87 t->tm_year += ATOI2(arg); 88 } else { 89 yearset = ATOI2(arg); 90 if (yearset < 69) 91 t->tm_year = yearset + 2000 - TM_YEAR_BASE; 92 else 93 t->tm_year = yearset + 1900 - TM_YEAR_BASE; 94 } 95 /* FALLTHROUGH */ 96 case 8: /* MMDDhhmm */ 97 t->tm_mon = ATOI2(arg); 98 --t->tm_mon; /* Convert from 01-12 to 00-11 */ 99 /* FALLTHROUGH */ 100 case 6: 101 t->tm_mday = ATOI2(arg); 102 /* FALLTHROUGH */ 103 case 4: 104 t->tm_hour = ATOI2(arg); 105 /* FALLTHROUGH */ 106 case 2: 107 t->tm_min = ATOI2(arg); 108 break; 109 default: 110 goto terr; 111 } 112 113 t->tm_isdst = -1; /* Figure out DST. */ 114 tmptime = mktime(t); 115 if (tmptime == (time_t)-1) 116 terr: errx(1, 117 "out of range or illegal time specification: [[CC]YY]MMDDhhmm[.SS]"); 118 119 return (tmptime); 120 } 121