Welcome to ftp.nluug.nl Current directory: /pub/ftp/pub/pub/NetBSD/NetBSDrelease8/src/usr.bin/cal/ 

Contents of README:The cal(1) date routines were written from scratch, basically from first principles. The algorithm for calculating the day of week from any Gregorian date was "reverse engineered". This was necessary as most of the documented algorithms have to do with date calculations for other calendars (e.g. julian) and are only accurate when converted to gregorian within a narrow range of dates. 1 Jan 1 is a Saturday because that's what cal says and I couldn't change that even if I was dumb enough to try. From this we can easily calculate the day of week for any date. The algorithm for a zero based day of week: calculate the number of days in all prior years (year1)*365 add the number of leap years (days?) since year 1 (not including this year as that is covered later) add the day number within the year this compensates for the noninclusive leap year calculation if the day in question occurs before the gregorian reformation (3 sep 1752 for our purposes), then simply return (value so far  1 + SATURDAY's value of 6) modulo 7. if the day in question occurs during the reformation (3 sep 1752 to 13 sep 1752 inclusive) return THURSDAY. This is my idea of what happened then. It does not matter much as this program never tries to find day of week for any day that is not the first of a month. otherwise, after the reformation, use the same formula as the days before with the additional step of subtracting the number of days (11) that were adjusted out of the calendar just before taking the modulo. It must be noted that the number of leap years calculation is sensitive to the date for which the leap year is being calculated. A year that occurs before the reformation is determined to be a leap year if its modulo of 4 equals zero. But after the reformation, a year is only a leap year if its modulo of 4 equals zero and its modulo of 100 does not. Of course, there is an exception for these century years. If the modulo of 400 equals zero, then the year is a leap year anyway. This is, in fact, what the gregorian reformation was all about (a bit of error in the old algorithm that caused the calendar to be inaccurate.) Once we have the day in year for the first of the month in question, the rest is trivial. 
Name Last modified Size
Parent Directory  CVS/ 04Jun2017 10:21  Makefile 03Feb2010 16:34 170 README 21Mar1993 10:45 2.2K cal.1 08Jan2015 04:56 5.6K cal.c 17Jun2015 00:54 23K
NLUUG  Open Systems. Open Standards
Become a member
and get discounts on conferences and more, see the NLUUG website!