usr.bin/calendar/parsedata.c

48 static char *floattoday(int year, double f);
50 static int wdayom (int day, int offset, int month, int year);
91     char *modifierindex, char *specialday, char *year, int *iyear)
101 	*year = '\0';
198 		/* We have a year in the string. Now this is getting tricky */
199 		strcpy(year, p1);
200 		*iyear = (int)strtol(year, NULL, 10);
342     char *year, int iyear)
355 	if (year[0] != '\0')
356 		printf("year: |%s| (%d)\n", year, iyear);
368 	int year;
384 wdayom (int day, int offset, int month, int year)
392 	wday1 = first_dayofweek_of_month(year, month);
439 	int year, remindex;
474 	for (year = year1; year <= year2; year++) {
477 		/* If the year is specified, only do it if it is this year! */
479 			if (iyear != year)
483 		/* Get important dates for this year */
486 			if (yearinfo->year == year)
495 			yearinfo->year = year;
499 			yearinfo->monthdays = monthdaytab[isleap(year)];
500 			yearinfo->ieaster = easter(year);
501 			yearinfo->ipaskha = paskha(year);
502 			fpom(year, UTCOffset, yearinfo->ffullmoon,
504 			fpom(year, UTCOFFSET_CNY, yearinfo->ffullmooncny,
506 			fequinoxsolstice(year, UTCOffset,
513 			yearinfo->firstcnyday = calculatesunlongitude30(year,
525 		/* Same day every year */
527 			if (!remember_ymd(year, imonth, idayofmonth))
530 			    year, imonth, idayofmonth, NULL);
534 		/* XXX Same day every year, but variable */
536 			if (!remember_ymd(year, imonth, idayofmonth))
539 			    year, imonth, idayofmonth, NULL);
546 				if (!remember_ymd(year, m, idayofmonth))
549 				    year, m, idayofmonth, NULL);
557 				if (!remember_ymd(year, imonth, d))
560 				    year, imonth, d, NULL);
568 				if (!remember_ymd(year, m, idayofmonth))
571 				    year, m, idayofmonth, NULL);
576 		/* Every dayofweek of the year */
578 			dow = first_dayofweek_of_year(year);
581 				if (remember_yd(year, d, &rm, &rd))
584 					    year, rm, rd, NULL);
591 	         * Every so-manied dayofweek of every month of the year:
598 	                        d = wdayom (idayofweek, offset, m, year);
599 				if (remember_ymd(year, m, d)) {
602 					    year, m, d, NULL);
616 			dow = first_dayofweek_of_month(year, imonth);
622 					    && remember_ymd(year, imonth, d)) {
625 						    year, imonth, d, NULL);
639 				if (remember_ymd(year, imonth, d))
642 					    year, imonth, d, NULL);
650 			dow = first_dayofweek_of_month(year, imonth);
653 				if (remember_ymd(year, imonth, d))
656 					    year, imonth, d, NULL);
668 			if (remember_yd(year, yearinfo->ieaster + offset,
671 				    year, rm, rd, NULL);
681 			if (remember_yd(year, yearinfo->ipaskha + offset,
684 				    year, rm, rd, NULL);
694 			if (remember_yd(year, yearinfo->firstcnyday + offset,
697 				    year, rm, rd, NULL);
710 				if (remember_yd(year,
717 					    year, rm, rd, ed);
732 				if (remember_yd(year,
738 					    year, rm, rd, ed);
750 			if (remember_yd(year, yearinfo->equinoxdays[0] + offset,
754 				    year, rm, rd, ed);
763 			if (remember_yd(year, yearinfo->equinoxdays[1] + offset,
767 				    year, rm, rd, ed);
778 			if (remember_yd(year,
782 				    year, rm, rd, ed);
791 			if (remember_yd(year,
795 				    year, rm, rd, ed);
823 		strcat(s, "year ");
1041 floattoday(int year, double f)
1045 	int *cumdays = cumdaytab[isleap(year)];
1067 	int year;
1076 		for (year = year1; year <= year2; year++) {
1077 			fpom(year, UTCOffset, ffullmoon, fnewmoon);
1078 			printf("Full moon %d:\t", year);
1081 				    floattoday(year, ffullmoon[i]));
1083 			printf("\nNew moon %d:\t", year);
1086 				    floattoday(year, fnewmoon[i]));
1097 		for (year = year1; year <= year2; year++) {
1098 			printf("Sun in %d:\n", year);
1099 			fequinoxsolstice(year, UTCOffset, equinoxdays,
1103 			    floattoday(year, equinoxdays[0]));
1106 			    floattoday(year, equinoxdays[1]));
1109 			    floattoday(year, solsticedays[0]));
1112 			    floattoday(year, solsticedays[1]));