1 /*-
2 * SPDX-License-Identifier: BSD-3-Clause
3 *
4 * Copyright (c) 1989, 1993, 1994
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 #include <err.h>
34 #include <locale.h>
35 #include <stdio.h>
36 #include <stdlib.h>
37 #include <string.h>
38 #include <time.h>
39
40 #include "calendar.h"
41
42 static time_t time1, time2;
43 const struct tm tm0;
44 char dayname[100];
45 int year1, year2;
46
47
48 void
settimes(time_t now,int before,int after,int friday,struct tm * tp1,struct tm * tp2)49 settimes(time_t now, int before, int after, int friday, struct tm *tp1, struct tm *tp2)
50 {
51 struct tm tp;
52
53 localtime_r(&now, &tp);
54
55 /* Friday displays Monday's events */
56 if (after == 0 && before == 0 && friday != -1)
57 after = tp.tm_wday == friday ? 3 : 1;
58
59 time1 = now - SECSPERDAY * before;
60 localtime_r(&time1, tp1);
61 year1 = 1900 + tp1->tm_year;
62 time2 = now + SECSPERDAY * after;
63 localtime_r(&time2, tp2);
64 year2 = 1900 + tp2->tm_year;
65
66 strftime(dayname, sizeof(dayname) - 1, "%A, %d %B %Y", tp1);
67
68 setnnames();
69 }
70
71 /* convert Day[/Month][/Year] into unix time (since 1970)
72 * Day: two digits, Month: two digits, Year: digits
73 */
74 time_t
Mktime(char * dp)75 Mktime(char *dp)
76 {
77 time_t t;
78 int d, m, y;
79 struct tm tm, tp;
80
81 (void)time(&t);
82 localtime_r(&t, &tp);
83
84 tm = tm0;
85 tm.tm_mday = tp.tm_mday;
86 tm.tm_mon = tp.tm_mon;
87 tm.tm_year = tp.tm_year;
88
89 switch (sscanf(dp, "%d.%d.%d", &d, &m, &y)) {
90 case 3:
91 if (y > 1900)
92 y -= 1900;
93 tm.tm_year = y;
94 /* FALLTHROUGH */
95 case 2:
96 tm.tm_mon = m - 1;
97 /* FALLTHROUGH */
98 case 1:
99 tm.tm_mday = d;
100 }
101
102 #ifdef DEBUG
103 fprintf(stderr, "Mktime: %d %d %s\n",
104 (int)mktime(&tm), (int)t, asctime(&tm));
105 #endif
106 return (mktime(&tm));
107 }
108