1 /* $NetBSD: stime.c,v 1.7 2008/07/21 14:19:21 lukem 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\
35 The Regents of the University of California. All rights reserved.");
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.7 2008/07/21 14:19:21 lukem Exp $");
43 #endif /* not lint */
44
45 #include <err.h>
46 #include <stdlib.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
stime(char * arg)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(EXIT_FAILURE, "time");
65
66 if ((t = localtime(&tmptime)) == NULL)
67 err(EXIT_FAILURE, "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 t->tm_year = conv_2dig_year(yearset) - TM_YEAR_BASE;
90 }
91 /* FALLTHROUGH */
92 case 8: /* MMDDhhmm */
93 t->tm_mon = ATOI2(arg);
94 --t->tm_mon; /* Convert from 01-12 to 00-11 */
95 /* FALLTHROUGH */
96 case 6:
97 t->tm_mday = ATOI2(arg);
98 /* FALLTHROUGH */
99 case 4:
100 t->tm_hour = ATOI2(arg);
101 /* FALLTHROUGH */
102 case 2:
103 t->tm_min = ATOI2(arg);
104 break;
105 default:
106 goto terr;
107 }
108
109 t->tm_isdst = -1; /* Figure out DST. */
110 tmptime = mktime(t);
111 if (tmptime == (time_t)-1) {
112 terr: errx(EXIT_FAILURE,
113 "out of range or illegal time specification: [[CC]YY]MMDDhhmm[.SS]");
114 }
115 return tmptime;
116 }
117