1 /* $NetBSD: stime.c,v 1.5 2005/11/26 13:57:27 tsutsui 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.5 2005/11/26 13:57:27 tsutsui 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(char *arg) 57 { 58 struct tm *t; 59 time_t tmptime; 60 int yearset; 61 char *p; 62 /* Start with the current time. */ 63 if (time(&tmptime) == (time_t)-1) 64 err(1, "time"); 65 66 if ((t = localtime(&tmptime)) == NULL) 67 err(1, "localtime"); 68 /* [[CC]YY]MMDDhhmm[.SS] */ 69 if ((p = strchr(arg, '.')) == NULL) 70 t->tm_sec = 0; /* Seconds defaults to 0. */ 71 else { 72 if (strlen(p + 1) != 2) 73 goto terr; 74 *p++ = '\0'; 75 t->tm_sec = ATOI2(p); 76 } 77 78 yearset = 0; 79 switch (strlen(arg)) { 80 case 12: /* CCYYMMDDhhmm */ 81 t->tm_year = ATOI2(arg) * 100 - TM_YEAR_BASE; 82 yearset = 1; 83 /* FALLTHROUGH */ 84 case 10: /* YYMMDDhhmm */ 85 if (yearset) { 86 t->tm_year += ATOI2(arg); 87 } else { 88 yearset = ATOI2(arg); 89 if (yearset < 69) 90 t->tm_year = yearset + 2000 - TM_YEAR_BASE; 91 else 92 t->tm_year = yearset + 1900 - TM_YEAR_BASE; 93 } 94 /* FALLTHROUGH */ 95 case 8: /* MMDDhhmm */ 96 t->tm_mon = ATOI2(arg); 97 --t->tm_mon; /* Convert from 01-12 to 00-11 */ 98 /* FALLTHROUGH */ 99 case 6: 100 t->tm_mday = ATOI2(arg); 101 /* FALLTHROUGH */ 102 case 4: 103 t->tm_hour = ATOI2(arg); 104 /* FALLTHROUGH */ 105 case 2: 106 t->tm_min = ATOI2(arg); 107 break; 108 default: 109 goto terr; 110 } 111 112 t->tm_isdst = -1; /* Figure out DST. */ 113 tmptime = mktime(t); 114 if (tmptime == (time_t)-1) 115 terr: errx(1, 116 "out of range or illegal time specification: [[CC]YY]MMDDhhmm[.SS]"); 117 118 return (tmptime); 119 } 120