blob: 2efb1c496b42ce139ba05e395428b79bd62c0494 [file] [log] [blame]
Skip Montanaroad3bc442000-08-30 14:01:28 +00001"""Calendar printing functions
2
3Note when comparing these calendars to the ones printed by cal(1): By
4default, these calendars have Monday as the first day of the week, and
5Sunday as the last (the European convention). Use setfirstweekday() to
6set the first day of the week (0=Monday, 6=Sunday)."""
Guido van Rossumc6360141990-10-13 19:23:40 +00007
Jeremy Hyltona05e2932000-06-28 14:48:01 +00008# Revision 2: uses functions from built-in time module
Guido van Rossumc6360141990-10-13 19:23:40 +00009
Guido van Rossum9b3bc711993-06-20 21:02:22 +000010# Import functions and variables from time module
Guido van Rossum00245cf1999-05-03 18:07:40 +000011from time import localtime, mktime
Guido van Rossumc6360141990-10-13 19:23:40 +000012
Skip Montanaroe99d5ea2001-01-20 19:54:20 +000013__all__ = ["error","setfirstweekday","firstweekday","isleap",
14 "leapdays","weekday","monthrange","monthcalendar",
15 "prmonth","month","prcal","calendar","timegm"]
16
Guido van Rossumc6360141990-10-13 19:23:40 +000017# Exception raised for bad input (with string parameter for details)
Guido van Rossum00245cf1999-05-03 18:07:40 +000018error = ValueError
Guido van Rossumc6360141990-10-13 19:23:40 +000019
Guido van Rossum9b3bc711993-06-20 21:02:22 +000020# Constants for months referenced later
21January = 1
22February = 2
23
24# Number of days per month (except for February in leap years)
25mdays = [0, 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31]
26
27# Full and abbreviated names of weekdays
Guido van Rossum4acc25b2000-02-02 15:10:15 +000028day_name = ['Monday', 'Tuesday', 'Wednesday', 'Thursday',
29 'Friday', 'Saturday', 'Sunday']
Guido van Rossum9b3bc711993-06-20 21:02:22 +000030day_abbr = ['Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat', 'Sun']
31
Guido van Rossum5cfa5df1993-06-23 09:30:50 +000032# Full and abbreviated names of months (1-based arrays!!!)
Guido van Rossum4acc25b2000-02-02 15:10:15 +000033month_name = ['', 'January', 'February', 'March', 'April',
34 'May', 'June', 'July', 'August',
35 'September', 'October', 'November', 'December']
36month_abbr = [' ', 'Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun',
37 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec']
Guido van Rossum9b3bc711993-06-20 21:02:22 +000038
Skip Montanaroad3bc442000-08-30 14:01:28 +000039# Constants for weekdays
40(MONDAY, TUESDAY, WEDNESDAY, THURSDAY, FRIDAY, SATURDAY, SUNDAY) = range(7)
41
42_firstweekday = 0 # 0 = Monday, 6 = Sunday
43
44def firstweekday():
45 return _firstweekday
46
47def setfirstweekday(weekday):
48 """Set weekday (Monday=0, Sunday=6) to start each week."""
49 global _firstweekday
50 if not MONDAY <= weekday <= SUNDAY:
51 raise ValueError, \
52 'bad weekday number; must be 0 (Monday) to 6 (Sunday)'
53 _firstweekday = weekday
54
Guido van Rossum9b3bc711993-06-20 21:02:22 +000055def isleap(year):
Guido van Rossum4acc25b2000-02-02 15:10:15 +000056 """Return 1 for leap years, 0 for non-leap years."""
Fred Drake8152d322000-12-12 23:20:45 +000057 return year % 4 == 0 and (year % 100 != 0 or year % 400 == 0)
Guido van Rossum9b3bc711993-06-20 21:02:22 +000058
Guido van Rossum9b3bc711993-06-20 21:02:22 +000059def leapdays(y1, y2):
Guido van Rossum4acc25b2000-02-02 15:10:15 +000060 """Return number of leap years in range [y1, y2).
Guido van Rossum46735ad2000-10-09 12:42:04 +000061 Assume y1 <= y2."""
62 y1 -= 1
63 y2 -= 1
64 return (y2/4 - y1/4) - (y2/100 - y1/100) + (y2/400 - y1/400)
Guido van Rossum9b3bc711993-06-20 21:02:22 +000065
Guido van Rossumc6360141990-10-13 19:23:40 +000066def weekday(year, month, day):
Skip Montanaroad3bc442000-08-30 14:01:28 +000067 """Return weekday (0-6 ~ Mon-Sun) for year (1970-...), month (1-12),
68 day (1-31)."""
Guido van Rossum4acc25b2000-02-02 15:10:15 +000069 secs = mktime((year, month, day, 0, 0, 0, 0, 0, 0))
70 tuple = localtime(secs)
71 return tuple[6]
Guido van Rossumc6360141990-10-13 19:23:40 +000072
Guido van Rossumc6360141990-10-13 19:23:40 +000073def monthrange(year, month):
Skip Montanaroad3bc442000-08-30 14:01:28 +000074 """Return weekday (0-6 ~ Mon-Sun) and number of days (28-31) for
75 year, month."""
76 if not 1 <= month <= 12:
77 raise ValueError, 'bad month number'
Guido van Rossum4acc25b2000-02-02 15:10:15 +000078 day1 = weekday(year, month, 1)
79 ndays = mdays[month] + (month == February and isleap(year))
80 return day1, ndays
Guido van Rossumc6360141990-10-13 19:23:40 +000081
Skip Montanaroad3bc442000-08-30 14:01:28 +000082def monthcalendar(year, month):
Guido van Rossum4acc25b2000-02-02 15:10:15 +000083 """Return a matrix representing a month's calendar.
Skip Montanaroad3bc442000-08-30 14:01:28 +000084 Each row represents a week; days outside this month are zero."""
Guido van Rossum4acc25b2000-02-02 15:10:15 +000085 day1, ndays = monthrange(year, month)
86 rows = []
87 r7 = range(7)
Skip Montanaroad3bc442000-08-30 14:01:28 +000088 day = (_firstweekday - day1 + 6) % 7 - 5 # for leading 0's in first week
Guido van Rossum4acc25b2000-02-02 15:10:15 +000089 while day <= ndays:
90 row = [0, 0, 0, 0, 0, 0, 0]
91 for i in r7:
92 if 1 <= day <= ndays: row[i] = day
93 day = day + 1
94 rows.append(row)
95 return rows
Guido van Rossumc6360141990-10-13 19:23:40 +000096
Guido van Rossum9b3bc711993-06-20 21:02:22 +000097def _center(str, width):
Guido van Rossum4acc25b2000-02-02 15:10:15 +000098 """Center a string in a field."""
99 n = width - len(str)
Skip Montanaroad3bc442000-08-30 14:01:28 +0000100 if n <= 0:
101 return str
Guido van Rossum4acc25b2000-02-02 15:10:15 +0000102 return ' '*((n+1)/2) + str + ' '*((n)/2)
Guido van Rossumc6360141990-10-13 19:23:40 +0000103
Skip Montanaroad3bc442000-08-30 14:01:28 +0000104def prweek(theweek, width):
Guido van Rossum4acc25b2000-02-02 15:10:15 +0000105 """Print a single week (no newline)."""
Skip Montanaroad3bc442000-08-30 14:01:28 +0000106 print week(theweek, width),
107
108def week(theweek, width):
109 """Returns a single week in a string (no newline)."""
110 days = []
111 for day in theweek:
112 if day == 0:
113 s = ''
114 else:
115 s = '%2i' % day # right-align single-digit days
116 days.append(_center(s, width))
117 return ' '.join(days)
Guido van Rossumc6360141990-10-13 19:23:40 +0000118
Guido van Rossumc6360141990-10-13 19:23:40 +0000119def weekheader(width):
Guido van Rossum4acc25b2000-02-02 15:10:15 +0000120 """Return a header for a week."""
Skip Montanaroad3bc442000-08-30 14:01:28 +0000121 if width >= 9:
122 names = day_name
123 else:
124 names = day_abbr
125 days = []
126 for i in range(_firstweekday, _firstweekday + 7):
127 days.append(_center(names[i%7][:width], width))
128 return ' '.join(days)
Guido van Rossumc6360141990-10-13 19:23:40 +0000129
Skip Montanaroad3bc442000-08-30 14:01:28 +0000130def prmonth(theyear, themonth, w=0, l=0):
Guido van Rossum4acc25b2000-02-02 15:10:15 +0000131 """Print a month's calendar."""
Skip Montanaroad3bc442000-08-30 14:01:28 +0000132 print month(theyear, themonth, w, l),
133
134def month(theyear, themonth, w=0, l=0):
135 """Return a month's calendar string (multi-line)."""
Guido van Rossum4acc25b2000-02-02 15:10:15 +0000136 w = max(2, w)
137 l = max(1, l)
Tim Peters88869f92001-01-14 23:36:06 +0000138 s = (_center(month_name[themonth] + ' ' + `theyear`,
Skip Montanaroad3bc442000-08-30 14:01:28 +0000139 7 * (w + 1) - 1).rstrip() +
140 '\n' * l + weekheader(w).rstrip() + '\n' * l)
141 for aweek in monthcalendar(theyear, themonth):
142 s = s + week(aweek, w).rstrip() + '\n' * l
143 return s[:-l] + '\n'
Guido van Rossumc6360141990-10-13 19:23:40 +0000144
Skip Montanaroad3bc442000-08-30 14:01:28 +0000145# Spacing of month columns for 3-column year calendar
Guido van Rossum4acc25b2000-02-02 15:10:15 +0000146_colwidth = 7*3 - 1 # Amount printed by prweek()
Skip Montanaroad3bc442000-08-30 14:01:28 +0000147_spacing = 6 # Number of spaces between columns
Guido van Rossumc6360141990-10-13 19:23:40 +0000148
Skip Montanaroad3bc442000-08-30 14:01:28 +0000149def format3c(a, b, c, colwidth=_colwidth, spacing=_spacing):
150 """Prints 3-column formatting for year calendars"""
151 print format3cstring(a, b, c, colwidth, spacing)
Guido van Rossumc6360141990-10-13 19:23:40 +0000152
Skip Montanaroad3bc442000-08-30 14:01:28 +0000153def format3cstring(a, b, c, colwidth=_colwidth, spacing=_spacing):
154 """Returns a string formatted from 3 strings, centered within 3 columns."""
155 return (_center(a, colwidth) + ' ' * spacing + _center(b, colwidth) +
156 ' ' * spacing + _center(c, colwidth))
157
158def prcal(year, w=0, l=0, c=_spacing):
Guido van Rossum4acc25b2000-02-02 15:10:15 +0000159 """Print a year's calendar."""
Skip Montanaroad3bc442000-08-30 14:01:28 +0000160 print calendar(year, w, l, c),
161
162def calendar(year, w=0, l=0, c=_spacing):
163 """Returns a year's calendar as a multi-line string."""
164 w = max(2, w)
165 l = max(1, l)
166 c = max(2, c)
167 colwidth = (w + 1) * 7 - 1
168 s = _center(`year`, colwidth * 3 + c * 2).rstrip() + '\n' * l
169 header = weekheader(w)
170 header = format3cstring(header, header, header, colwidth, c).rstrip()
Guido van Rossum4acc25b2000-02-02 15:10:15 +0000171 for q in range(January, January+12, 3):
Skip Montanaroad3bc442000-08-30 14:01:28 +0000172 s = (s + '\n' * l +
173 format3cstring(month_name[q], month_name[q+1], month_name[q+2],
Tim Peters88869f92001-01-14 23:36:06 +0000174 colwidth, c).rstrip() +
Skip Montanaroad3bc442000-08-30 14:01:28 +0000175 '\n' * l + header + '\n' * l)
Guido van Rossum4acc25b2000-02-02 15:10:15 +0000176 data = []
177 height = 0
Skip Montanaroad3bc442000-08-30 14:01:28 +0000178 for amonth in range(q, q + 3):
179 cal = monthcalendar(year, amonth)
180 if len(cal) > height:
181 height = len(cal)
Guido van Rossum4acc25b2000-02-02 15:10:15 +0000182 data.append(cal)
183 for i in range(height):
Skip Montanaroad3bc442000-08-30 14:01:28 +0000184 weeks = []
Guido van Rossum4acc25b2000-02-02 15:10:15 +0000185 for cal in data:
186 if i >= len(cal):
Skip Montanaroad3bc442000-08-30 14:01:28 +0000187 weeks.append('')
Guido van Rossum4acc25b2000-02-02 15:10:15 +0000188 else:
Skip Montanaroad3bc442000-08-30 14:01:28 +0000189 weeks.append(week(cal[i], w))
Tim Peters88869f92001-01-14 23:36:06 +0000190 s = s + format3cstring(weeks[0], weeks[1], weeks[2],
Skip Montanaroad3bc442000-08-30 14:01:28 +0000191 colwidth, c).rstrip() + '\n' * l
192 return s[:-l] + '\n'
Guido van Rossumb39aff81999-06-09 15:07:38 +0000193
Guido van Rossumb39aff81999-06-09 15:07:38 +0000194EPOCH = 1970
195def timegm(tuple):
Guido van Rossum4acc25b2000-02-02 15:10:15 +0000196 """Unrelated but handy function to calculate Unix timestamp from GMT."""
197 year, month, day, hour, minute, second = tuple[:6]
198 assert year >= EPOCH
199 assert 1 <= month <= 12
200 days = 365*(year-EPOCH) + leapdays(EPOCH, year)
201 for i in range(1, month):
202 days = days + mdays[i]
203 if month > 2 and isleap(year):
204 days = days + 1
205 days = days + day - 1
206 hours = days*24 + hour
207 minutes = hours*60 + minute
208 seconds = minutes*60 + second
209 return seconds