Annotation of embedaddon/php/ext/date/lib/dow.c, revision 1.1.1.4
1.1 misho 1: /*
2: +----------------------------------------------------------------------+
3: | PHP Version 5 |
4: +----------------------------------------------------------------------+
1.1.1.4 ! misho 5: | Copyright (c) 1997-2014 The PHP Group |
1.1 misho 6: +----------------------------------------------------------------------+
7: | This source file is subject to version 3.01 of the PHP license, |
8: | that is bundled with this package in the file LICENSE, and is |
9: | available through the world-wide-web at the following url: |
10: | http://www.php.net/license/3_01.txt |
11: | If you did not receive a copy of the PHP license and are unable to |
12: | obtain it through the world-wide-web, please send a note to |
13: | license@php.net so we can mail you a copy immediately. |
14: +----------------------------------------------------------------------+
15: | Authors: Derick Rethans <derick@derickrethans.nl> |
16: +----------------------------------------------------------------------+
17: */
18:
1.1.1.2 misho 19: /* $Id$ */
1.1 misho 20:
21: #include "timelib.h"
22:
23: static int m_table_common[13] = { -1, 0, 3, 3, 6, 1, 4, 6, 2, 5, 0, 3, 5 }; /* 1 = jan */
24: static int m_table_leap[13] = { -1, 6, 2, 3, 6, 1, 4, 6, 2, 5, 0, 3, 5 }; /* 1 = jan */
25:
26: static timelib_sll century_value(timelib_sll j)
27: {
1.1.1.4 ! misho 28: return 6 - (j % 4) * 2;
1.1 misho 29: }
30:
31: static timelib_sll timelib_day_of_week_ex(timelib_sll y, timelib_sll m, timelib_sll d, int iso)
32: {
33: timelib_sll c1, y1, m1, dow;
34:
35: /* Only valid for Gregorian calendar, commented out as we don't handle
1.1.1.4 ! misho 36: * Julian calendar. We just return the 'wrong' day of week to be
! 37: * consistent. */
1.1 misho 38: c1 = century_value(y / 100);
39: y1 = (y % 100);
40: m1 = timelib_is_leap(y) ? m_table_leap[m] : m_table_common[m];
41: dow = (c1 + y1 + m1 + (y1 / 4) + d) % 7;
42: if (iso) {
43: if (dow == 0) {
44: dow = 7;
45: }
46: }
47: return dow;
48: }
49:
50: timelib_sll timelib_day_of_week(timelib_sll y, timelib_sll m, timelib_sll d)
51: {
52: return timelib_day_of_week_ex(y, m, d, 0);
53: }
54:
55: timelib_sll timelib_iso_day_of_week(timelib_sll y, timelib_sll m, timelib_sll d)
56: {
57: return timelib_day_of_week_ex(y, m, d, 1);
58: }
59:
60: /* jan feb mar apr may jun jul aug sep oct nov dec */
61: static int d_table_common[13] = { 0, 0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334 };
62: static int d_table_leap[13] = { 0, 0, 31, 60, 91, 121, 152, 182, 213, 244, 274, 305, 335 };
63: static int ml_table_common[13] = { 0, 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };
64: static int ml_table_leap[13] = { 0, 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };
65:
66: timelib_sll timelib_day_of_year(timelib_sll y, timelib_sll m, timelib_sll d)
67: {
68: return (timelib_is_leap(y) ? d_table_leap[m] : d_table_common[m]) + d - 1;
69: }
70:
71: timelib_sll timelib_days_in_month(timelib_sll y, timelib_sll m)
72: {
73: return timelib_is_leap(y) ? ml_table_leap[m] : ml_table_common[m];
74: }
75:
76: void timelib_isoweek_from_date(timelib_sll y, timelib_sll m, timelib_sll d, timelib_sll *iw, timelib_sll *iy)
77: {
78: int y_leap, prev_y_leap, doy, jan1weekday, weekday;
79:
80: y_leap = timelib_is_leap(y);
81: prev_y_leap = timelib_is_leap(y-1);
82: doy = timelib_day_of_year(y, m, d) + 1;
83: if (y_leap && m > 2) {
84: doy++;
85: }
86: jan1weekday = timelib_day_of_week(y, 1, 1);
87: weekday = timelib_day_of_week(y, m, d);
88: if (weekday == 0) weekday = 7;
89: if (jan1weekday == 0) jan1weekday = 7;
90: /* Find if Y M D falls in YearNumber Y-1, WeekNumber 52 or 53 */
91: if (doy <= (8 - jan1weekday) && jan1weekday > 4) {
92: *iy = y - 1;
93: if (jan1weekday == 5 || (jan1weekday == 6 && prev_y_leap)) {
94: *iw = 53;
95: } else {
96: *iw = 52;
97: }
98: } else {
99: *iy = y;
100: }
101: /* 8. Find if Y M D falls in YearNumber Y+1, WeekNumber 1 */
102: if (*iy == y) {
103: int i;
104:
105: i = y_leap ? 366 : 365;
106: if ((i - (doy - y_leap)) < (4 - weekday)) {
107: *iy = y + 1;
108: *iw = 1;
109: return;
110: }
111: }
112: /* 9. Find if Y M D falls in YearNumber Y, WeekNumber 1 through 53 */
113: if (*iy == y) {
114: int j;
115:
116: j = doy + (7 - weekday) + (jan1weekday - 1);
117: *iw = j / 7;
118: if (jan1weekday > 4) {
119: *iw -= 1;
120: }
121: }
122: }
123:
124: timelib_sll timelib_daynr_from_weeknr(timelib_sll y, timelib_sll w, timelib_sll d)
125: {
126: timelib_sll dow, day;
127:
128: /* Figure out the dayofweek for y-1-1 */
129: dow = timelib_day_of_week(y, 1, 1);
130: /* then use that to figure out the offset for day 1 of week 1 */
131: day = 0 - (dow > 4 ? dow - 7 : dow);
132:
133: /* Add weeks and days */
134: return day + ((w - 1) * 7) + d;
135: }
136:
137: int timelib_valid_time(timelib_sll h, timelib_sll i, timelib_sll s)
138: {
139: if (h < 0 || h > 23 || i < 0 || i > 59 || s < 0 || s > 59) {
140: return 0;
141: }
142: return 1;
143: }
144:
145: int timelib_valid_date(timelib_sll y, timelib_sll m, timelib_sll d)
146: {
147: if (m < 1 || m > 12 || d < 1 || d > timelib_days_in_month(y, m)) {
148: return 0;
149: }
150: return 1;
151: }
152: #if 0
153: int main(void)
154: {
155: printf("dow = %d\n", timelib_day_of_week(1978, 12, 22)); /* 5 */
156: printf("dow = %d\n", timelib_day_of_week(2005, 2, 19)); /* 6 */
157: }
158: #endif
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>