usr.bin/cal/cal.c

52 #define	MAXDAYS			42		/* max slots in a month array */
150 	int ch, month, year, yflag;
193 	month = 0;
196 		month = parsemonth(*argv++);
197 		if (!month)
198 			errx(1, "Unable to parse month");
202 			month = parsemonth(*argv);
203 			if (!month)
219 			month = local_time->tm_mon + 1;
225 	if (month)
226 		monthly(month, year);
243 week(int day, int month, int year)
253 		return isoweek(day, month, year);
255 	yearday = day_in_year(day, month, year);
257 	weekday = day_in_week(day, month, year) + 1;
270 isoweek(int day, int month, int year)
275 	a = month <= 2 ? year - 1 : year;
279 	if (month <= 2) {
281 		f = day - 1 + 31 * (month-1);
284 		f = day + ((153 * (month-3) + 2) / 5) + 58 + s;
299 monthly(int month, int year)
304 	day_array(month, year, days);
306 	    month_names[month - 1], year);
323 			printf(" [%2d]", week(firstday, month, year));
331 	int col, *dp, i, month, row, which_cal;
342 	for (month = 0; month < 12; month += 2) {
343 		center(month_names[month], J_WEEK_LEN, J_HEAD_SEP);
344 		center(month_names[month + 1], J_WEEK_LEN, 0);
351 				dp = &days[month + which_cal][row * 7];
366 	int col, *dp, i, month, row, which_cal, week_len, wn, firstday;
380 	for (month = 0; month < 12; month += 3) {
381 		center(month_names[month], week_len, HEAD_SEP);
382 		center(month_names[month + 1], week_len, HEAD_SEP);
383 		center(month_names[month + 2], week_len, 0);
392 				dp = &days[month + which_cal][row * 7];
401 					    month + which_cal + 1, year);
421  *	builds that array for any month from Jan. 1 through Dec. 9999.
424 day_array(int month, int year, int *days)
428 	if (month == 9 && year == 1752) {
433 	dm = days_in_month[leap_year(year)][month];
434 	dw = day_in_week(mflag?0:1, month, year);
435 	day = julian ? day_in_year(1, month, year) : 1;
445 day_in_year(int day, int month, int year)
450 	for (i = 1; i < month; i++)
463 day_in_week(int day, int month, int year)
468 	    + day_in_year(day, month, year);
543 	(void)fprintf(stderr, "usage: cal [-jmwy] [month] [year]\n");
561 		errx(1, "invalid month: use 1-12 or a name");