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 #ifndef lint
33 static const char copyright[] =
34 "@(#) Copyright (c) 1989, 1993\n\
35 The Regents of the University of California. All rights reserved.\n";
36 #endif
37
38 #if 0
39 #ifndef lint
40 static char sccsid[] = "@(#)calendar.c 8.3 (Berkeley) 3/25/94";
41 #endif
42 #endif
43
44 #include <sys/cdefs.h>
45 __FBSDID("$FreeBSD$");
46
47 #include <sys/types.h>
48 #include <err.h>
49 #include <errno.h>
50 #include <locale.h>
51 #include <login_cap.h>
52 #include <langinfo.h>
53 #include <pwd.h>
54 #include <stdio.h>
55 #include <stdlib.h>
56 #include <string.h>
57 #include <time.h>
58 #include <unistd.h>
59
60 #include "calendar.h"
61
62 #define UTCOFFSET_NOTSET 100 /* Expected between -24 and +24 */
63 #define LONGITUDE_NOTSET 1000 /* Expected between -360 and +360 */
64
65 struct passwd *pw;
66 int doall = 0;
67 int debug = 0;
68 static char *DEBUG = NULL;
69 static time_t f_time = 0;
70 double UTCOffset = UTCOFFSET_NOTSET;
71 int EastLongitude = LONGITUDE_NOTSET;
72 #ifdef WITH_ICONV
73 const char *outputEncoding = NULL;
74 #endif
75
76 static void usage(void) __dead2;
77
78 int
main(int argc,char * argv[])79 main(int argc, char *argv[])
80 {
81 int f_dayAfter = 0; /* days after current date */
82 int f_dayBefore = 0; /* days before current date */
83 int Friday = 5; /* day before weekend */
84
85 int ch;
86 struct tm tp1, tp2;
87
88 (void)setlocale(LC_ALL, "");
89
90 while ((ch = getopt(argc, argv, "-A:aB:D:dF:f:l:t:U:W:?")) != -1)
91 switch (ch) {
92 case '-': /* backward contemptible */
93 case 'a':
94 if (getuid()) {
95 errno = EPERM;
96 err(1, NULL);
97 }
98 doall = 1;
99 break;
100
101 case 'W': /* we don't need no steenking Fridays */
102 Friday = -1;
103 /* FALLTHROUGH */
104
105 case 'A': /* days after current date */
106 f_dayAfter = atoi(optarg);
107 if (f_dayAfter < 0)
108 errx(1, "number of days must be positive");
109 break;
110
111 case 'B': /* days before current date */
112 f_dayBefore = atoi(optarg);
113 if (f_dayBefore < 0)
114 errx(1, "number of days must be positive");
115 break;
116
117 case 'D': /* debug output of sun and moon info */
118 DEBUG = optarg;
119 break;
120
121 case 'd': /* debug output of current date */
122 debug = 1;
123 break;
124
125 case 'F': /* Change the time: When does weekend start? */
126 Friday = atoi(optarg);
127 break;
128
129 case 'f': /* other calendar file */
130 calendarFile = optarg;
131 break;
132
133 case 'l': /* Change longitudal position */
134 EastLongitude = strtol(optarg, NULL, 10);
135 break;
136
137 case 't': /* other date, for tests */
138 f_time = Mktime(optarg);
139 break;
140
141 case 'U': /* Change UTC offset */
142 UTCOffset = strtod(optarg, NULL);
143 break;
144
145 case '?':
146 default:
147 usage();
148 }
149
150 argc -= optind;
151 argv += optind;
152
153 if (argc)
154 usage();
155
156 /* use current time */
157 if (f_time <= 0)
158 (void)time(&f_time);
159
160 /* if not set, determine where I could be */
161 {
162 if (UTCOffset == UTCOFFSET_NOTSET &&
163 EastLongitude == LONGITUDE_NOTSET) {
164 /* Calculate on difference between here and UTC */
165 time_t t;
166 struct tm tm;
167 long utcoffset, hh, mm, ss;
168 double uo;
169
170 time(&t);
171 localtime_r(&t, &tm);
172 utcoffset = tm.tm_gmtoff;
173 /* seconds -> hh:mm:ss */
174 hh = utcoffset / SECSPERHOUR;
175 utcoffset %= SECSPERHOUR;
176 mm = utcoffset / SECSPERMINUTE;
177 utcoffset %= SECSPERMINUTE;
178 ss = utcoffset;
179
180 /* hh:mm:ss -> hh.mmss */
181 uo = mm + (100.0 * (ss / 60.0));
182 uo /= 60.0 / 100.0;
183 uo = hh + uo / 100;
184
185 UTCOffset = uo;
186 EastLongitude = UTCOffset * 15;
187 } else if (UTCOffset == UTCOFFSET_NOTSET) {
188 /* Base on information given */
189 UTCOffset = EastLongitude / 15;
190 } else if (EastLongitude == LONGITUDE_NOTSET) {
191 /* Base on information given */
192 EastLongitude = UTCOffset * 15;
193 }
194 }
195
196 settimes(f_time, f_dayBefore, f_dayAfter, Friday, &tp1, &tp2);
197 generatedates(&tp1, &tp2);
198
199 /*
200 * FROM now on, we are working in UTC.
201 * This will only affect moon and sun related events anyway.
202 */
203 if (setenv("TZ", "UTC", 1) != 0)
204 errx(1, "setenv: %s", strerror(errno));
205 tzset();
206
207 if (debug)
208 dumpdates();
209
210 if (DEBUG != NULL) {
211 dodebug(DEBUG);
212 exit(0);
213 }
214
215 if (doall)
216 while ((pw = getpwent()) != NULL) {
217 pid_t pid;
218
219 if (chdir(pw->pw_dir) == -1)
220 continue;
221 pid = fork();
222 if (pid < 0)
223 err(1, "fork");
224 if (pid == 0) {
225 login_cap_t *lc;
226
227 lc = login_getpwclass(pw);
228 if (setusercontext(lc, pw, pw->pw_uid,
229 LOGIN_SETALL) != 0)
230 errx(1, "setusercontext");
231 setenv("HOME", pw->pw_dir, 1);
232 cal();
233 exit(0);
234 }
235 }
236 else {
237 #ifdef WITH_ICONV
238 /* Save the information about the encoding used in the terminal. */
239 outputEncoding = strdup(nl_langinfo(CODESET));
240 if (outputEncoding == NULL)
241 errx(1, "cannot allocate memory");
242 #endif
243 cal();
244 }
245 exit(0);
246 }
247
248
249 static void __dead2
usage(void)250 usage(void)
251 {
252
253 fprintf(stderr, "%s\n%s\n%s\n",
254 "usage: calendar [-A days] [-a] [-B days] [-D sun|moon] [-d]",
255 " [-F friday] [-f calendarfile] [-l longitude]",
256 " [-t dd[.mm[.year]]] [-U utcoffset] [-W days]"
257 );
258 exit(1);
259 }
260