3 * Copyright (c) 1996-2012 by the citadel.org team
5 * This program is open source software. You can redistribute it and/or
6 * modify it under the terms of the GNU General Public License, version 3.
8 * This program is distributed in the hope that it will be useful,
9 * but WITHOUT ANY WARRANTY; without even the implied warranty of
10 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11 * GNU General Public License for more details.
15 #include "webserver.h"
18 extern locale_t *wc_locales;
21 typedef unsigned char byte;
23 #define FALSE 0 /**< no. */
25 #define TRUE 1 /**< yes. */
28 * Wrapper around strftime() or strftime_l()
29 * depending upon how our build is configured.
31 * s String target buffer
32 * max Maximum size of string target buffer
33 * format strftime() format
36 size_t wc_strftime(char *s, size_t max, const char *format, const struct tm *tm) {
40 if (wc_locales[WC->selected_language] == NULL) {
41 return strftime(s, max, format, tm);
44 return strftime_l(s, max, format, tm, wc_locales[WC->selected_language]);
47 return strftime(s, max, format, tm);
50 return strftime(s, max, format, tm);
57 * Format a date/time stamp for output
59 long webcit_fmt_date(char *buf, size_t siz, time_t thetime, int Format) {
66 time_format = get_time_format_cached();
67 today_timet = time(NULL);
68 localtime_r(&today_timet, &today_tm);
70 localtime_r(&thetime, &tm);
73 * DATEFMT_FULL: full display
74 * DATEFMT_BRIEF: if date == today, show only the time
75 * otherwise, for messages up to 6 months old,
76 * show the month and day, and the time
77 * older than 6 months, show only the date
78 * DATEFMT_RAWDATE: show full date, regardless of age
79 * DATEFMT_LOCALEDATE: show full date as prefered for the locale
84 if ((tm.tm_year == today_tm.tm_year)
85 && (tm.tm_mon == today_tm.tm_mon)
86 && (tm.tm_mday == today_tm.tm_mday)) {
87 if (time_format == WC_TIMEFORMAT_24)
88 retlen = wc_strftime(buf, siz, "%k:%M", &tm);
90 retlen = wc_strftime(buf, siz, "%l:%M%p", &tm);
92 else if (today_timet - thetime < 15552000) {
93 if (time_format == WC_TIMEFORMAT_24)
94 retlen = wc_strftime(buf, siz, "%b %d %k:%M", &tm);
96 retlen = wc_strftime(buf, siz, "%b %d %l:%M%p", &tm);
99 retlen = wc_strftime(buf, siz, "%b %d %Y", &tm);
103 if (time_format == WC_TIMEFORMAT_24)
104 retlen = wc_strftime(buf, siz, "%a %b %d %Y %T %Z", &tm);
106 retlen = wc_strftime(buf, siz, "%a %b %d %Y %r %Z", &tm);
108 case DATEFMT_RAWDATE:
109 retlen = wc_strftime(buf, siz, "%a %b %d %Y", &tm);
111 case DATEFMT_LOCALEDATE:
112 retlen = wc_strftime(buf, siz, "%x", &tm);
120 * Try to guess whether the user will prefer 12 hour or 24 hour time based on the locale.
122 long guess_calhourformat(void) {
125 memset(&tm, 0, sizeof tm);
126 wc_strftime(buf, 64, "%X", &tm);
127 if (buf[strlen(buf) - 1] == 'M') {
135 * learn the users timeformat preference.
137 int get_time_format_cached(void) {
139 int *time_format_cache;
140 time_format_cache = &(WC->time_format_cache);
141 if (*time_format_cache == WC_TIMEFORMAT_NONE) {
142 get_pref_long("calhourformat", &calhourformat, 99);
144 /* If we don't know the user's time format preference yet,
145 * make a guess based on the locale.
147 if (calhourformat == 99) {
148 calhourformat = guess_calhourformat();
151 /* Now set the preference */
152 if (calhourformat == 24)
153 *time_format_cache = WC_TIMEFORMAT_24;
155 *time_format_cache = WC_TIMEFORMAT_AMPM;
157 return *time_format_cache;
161 * Format TIME ONLY for output
162 * buf the output buffer
163 * thetime time to format into buf
165 void fmt_time(char *buf, size_t siz, time_t thetime) {
170 time_format = get_time_format_cached();
172 tm = localtime(&thetime);
179 if (time_format == WC_TIMEFORMAT_24) {
180 snprintf(buf, siz, "%d:%02d", tm->tm_hour, tm->tm_min);
183 snprintf(buf, siz, "%d:%02d%s", hour, tm->tm_min, ((tm->tm_hour > 12) ? "pm" : "am")
192 * Break down the timestamp used in HTTP headers
193 * Should read rfc1123 and rfc850 dates OK
194 * FIXME won't read asctime
195 * Doesn't understand timezone, but we only should be using GMT/UTC anyway
197 time_t httpdate_to_timestamp(StrBuf * buf) {
202 /** Skip day of week, to number */
203 for (c = ChrPtr(buf); *c != ' '; c++);
206 memset(&tt, 0, sizeof(tt));
208 /* Get day of month */
209 tt.tm_mday = atoi(c);
210 for (; *c != ' ' && *c != '-'; c++);
215 case 'A': /* April, August */
216 tt.tm_mon = (c[1] == 'p') ? 3 : 7;
218 case 'D': /* December */
221 case 'F': /* February */
224 case 'M': /* March, May */
225 tt.tm_mon = (c[2] == 'r') ? 2 : 4;
227 case 'J': /* January, June, July */
228 tt.tm_mon = (c[2] == 'n') ? ((c[1] == 'a') ? 0 : 5) : 6;
230 case 'N': /* November */
233 case 'O': /* October */
236 case 'S': /* September */
241 break; /* NOTREACHED */
247 tt.tm_year = atoi(c);
248 for (; *c != ' '; c++);
250 if (tt.tm_year >= 1900)
254 tt.tm_hour = atoi(c);
255 for (; *c != ':'; c++);
260 for (; *c != ':'; c++);
265 for (; *c && *c != ' '; c++);
267 /* Got everything; let's go. The global 'timezone' variable contains the
268 * local timezone's offset from UTC, in seconds, so we apply that to tm_sec.
269 * This produces an illegal value for tm_sec, but mktime() will normalize
270 * it for us. This eliminates the need to temporarily switch the environment
271 * variable TZ to UTC, which is good because it fails to switch back on
276 tt.tm_sec = tt.tm_sec - tt.tm_gmtoff;
278 tt.tm_sec = tt.tm_sec - (int) timezone;
285 void LoadTimeformatSettingsCache(StrBuf * Preference, long lvalue) {
286 int *time_format_cache;
288 time_format_cache = &(WC->time_format_cache);
290 *time_format_cache = WC_TIMEFORMAT_24;
292 *time_format_cache = WC_TIMEFORMAT_AMPM;
297 void InitModule_DATETIME(void) {
298 RegisterPreference("calhourformat", _("Time format"), PRF_INT, LoadTimeformatSettingsCache);