xref: /freebsd/usr.bin/calendar/calendar.c (revision bb15ca603fa442c72dde3f3cb8b46db6970e3950)
1 /*-
2  * Copyright (c) 1989, 1993, 1994
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 4. Neither the name of the University nor the names of its contributors
14  *    may be used to endorse or promote products derived from this software
15  *    without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  */
29 
30 #ifndef lint
31 static const char copyright[] =
32 "@(#) Copyright (c) 1989, 1993\n\
33 	The Regents of the University of California.  All rights reserved.\n";
34 #endif
35 
36 #if 0
37 #ifndef lint
38 static char sccsid[] = "@(#)calendar.c	8.3 (Berkeley) 3/25/94";
39 #endif
40 #endif
41 
42 #include <sys/cdefs.h>
43 __FBSDID("$FreeBSD$");
44 
45 #include <err.h>
46 #include <errno.h>
47 #include <locale.h>
48 #include <pwd.h>
49 #include <stdio.h>
50 #include <stdlib.h>
51 #include <string.h>
52 #include <time.h>
53 #include <unistd.h>
54 
55 #include "calendar.h"
56 
57 #define	UTCOFFSET_NOTSET	100	/* Expected between -24 and +24 */
58 #define	LONGITUDE_NOTSET	1000	/* Expected between -360 and +360 */
59 
60 struct passwd	*pw;
61 int		doall = 0;
62 int		debug = 0;
63 char		*DEBUG = NULL;
64 time_t		f_time = 0;
65 double		UTCOffset = UTCOFFSET_NOTSET;
66 int		EastLongitude = LONGITUDE_NOTSET;
67 
68 static void	usage(void) __dead2;
69 
70 int
71 main(int argc, char *argv[])
72 {
73 	int	f_dayAfter = 0;		/* days after current date */
74 	int	f_dayBefore = 0;	/* days before current date */
75 	int	Friday = 5;		/* day before weekend */
76 
77 	int ch;
78 	struct tm tp1, tp2;
79 
80 	(void)setlocale(LC_ALL, "");
81 
82 	while ((ch = getopt(argc, argv, "-A:aB:D:dF:f:l:t:U:W:?")) != -1)
83 		switch (ch) {
84 		case '-':		/* backward contemptible */
85 		case 'a':
86 			if (getuid()) {
87 				errno = EPERM;
88 				err(1, NULL);
89 			}
90 			doall = 1;
91 			break;
92 
93 		case 'W': /* we don't need no steenking Fridays */
94 			Friday = -1;
95 			/* FALLTHROUGH */
96 
97 		case 'A': /* days after current date */
98 			f_dayAfter = atoi(optarg);
99 			break;
100 
101 		case 'B': /* days before current date */
102 			f_dayBefore = atoi(optarg);
103 			break;
104 
105 		case 'D': /* debug output of sun and moon info */
106 			DEBUG = optarg;
107 			break;
108 
109 		case 'd': /* debug output of current date */
110 			debug = 1;
111 			break;
112 
113 		case 'F': /* Change the time: When does weekend start? */
114 			Friday = atoi(optarg);
115 			break;
116 
117 		case 'f': /* other calendar file */
118 			calendarFile = optarg;
119 			break;
120 
121 		case 'l': /* Change longitudal position */
122 			EastLongitude = strtol(optarg, NULL, 10);
123 			break;
124 
125 		case 't': /* other date, for tests */
126 			f_time = Mktime(optarg);
127 			break;
128 
129 		case 'U': /* Change UTC offset */
130 			UTCOffset = strtod(optarg, NULL);
131 			break;
132 
133 		case '?':
134 		default:
135 			usage();
136 		}
137 
138 	argc -= optind;
139 	argv += optind;
140 
141 	if (argc)
142 		usage();
143 
144 	/* use current time */
145 	if (f_time <= 0)
146 		(void)time(&f_time);
147 
148 	/* if not set, determine where I could be */
149 	{
150 		if (UTCOffset == UTCOFFSET_NOTSET &&
151 		    EastLongitude == LONGITUDE_NOTSET) {
152 			/* Calculate on difference between here and UTC */
153 			time_t t;
154 			struct tm tm;
155 			long utcoffset, hh, mm, ss;
156 			double uo;
157 
158 			time(&t);
159 			localtime_r(&t, &tm);
160 			utcoffset = tm.tm_gmtoff;
161 			/* seconds -> hh:mm:ss */
162 			hh = utcoffset / SECSPERHOUR;
163 			utcoffset %= SECSPERHOUR;
164 			mm = utcoffset / SECSPERMINUTE;
165 			utcoffset %= SECSPERMINUTE;
166 			ss = utcoffset;
167 
168 			/* hh:mm:ss -> hh.mmss */
169 			uo = mm + (100.0 * (ss / 60.0));
170 			uo /=  60.0 / 100.0;
171 			uo = hh + uo / 100;
172 
173 			UTCOffset = uo;
174 			EastLongitude = UTCOffset * 15;
175 		} else if (UTCOffset == UTCOFFSET_NOTSET) {
176 			/* Base on information given */
177 			UTCOffset = EastLongitude / 15;
178 		} else if (EastLongitude == LONGITUDE_NOTSET) {
179 			/* Base on information given */
180 			EastLongitude = UTCOffset * 15;
181 		}
182 	}
183 
184 	settimes(f_time, f_dayBefore, f_dayAfter, Friday, &tp1, &tp2);
185 	generatedates(&tp1, &tp2);
186 
187 	/*
188 	 * FROM now on, we are working in UTC.
189 	 * This will only affect moon and sun related events anyway.
190 	 */
191 	if (setenv("TZ", "UTC", 1) != 0)
192 		errx(1, "setenv: %s", strerror(errno));
193 	tzset();
194 
195 	if (debug)
196 		dumpdates();
197 
198 	if (DEBUG != NULL) {
199 		dodebug(DEBUG);
200 		exit(0);
201 	}
202 
203 	if (doall)
204 		while ((pw = getpwent()) != NULL) {
205 			(void)setegid(pw->pw_gid);
206 			(void)initgroups(pw->pw_name, pw->pw_gid);
207 			(void)seteuid(pw->pw_uid);
208 			if (!chdir(pw->pw_dir))
209 				cal();
210 			(void)seteuid(0);
211 		}
212 	else
213 		cal();
214 	exit(0);
215 }
216 
217 
218 static void __dead2
219 usage(void)
220 {
221 
222 	fprintf(stderr, "%s\n%s\n%s\n",
223 	    "usage: calendar [-A days] [-a] [-B days] [-D sun|moon] [-d]",
224 	    "		     [-F friday] [-f calendarfile] [-l longitude]",
225 	    "		     [-t dd[.mm[.year]]] [-U utcoffset] [-W days]"
226 	    );
227 	exit(1);
228 }
229