5 * \defgroup FormatDates Miscellaneous routines formating dates
10 #include "webserver.h"
12 typedef unsigned char byte; /**< a byte. */
14 #define FALSE 0 /**< no. */
15 #define TRUE 1 /**< yes. */
18 * \brief Wrapper around strftime() or strftime_l()
19 * depending upon how our build is configured.
21 * \param s String target buffer
22 * \param max Maximum size of string target buffer
23 * \param format strftime() format
24 * \param tm Input date/time
26 size_t wc_strftime(char *s, size_t max, const char *format, const struct tm *tm)
29 if (wc_locales[WC->selected_language] == NULL) {
30 return strftime(s, max, format, tm);
32 else { // TODO: this gives empty strings on debian.
33 return strftime_l(s, max, format, tm, wc_locales[WC->selected_language]);
36 return strftime(s, max, format, tm);
42 * \brief Format a date/time stamp for output
43 * \param buf the output buffer
44 * \param thetime time to convert to string
45 * \param brief do we want compact view?????
47 void fmt_date(char *buf, time_t thetime, int brief)
54 time_format = get_time_format_cached ();
55 today_timet = time(NULL);
56 localtime_r(&today_timet, &today_tm);
58 localtime_r(&thetime, &tm);
62 /** If date == today, show only the time */
63 if ((tm.tm_year == today_tm.tm_year)
64 &&(tm.tm_mon == today_tm.tm_mon)
65 &&(tm.tm_mday == today_tm.tm_mday)) {
66 if (time_format == WC_TIMEFORMAT_24)
67 wc_strftime(buf, 32, "%k:%M", &tm);
69 wc_strftime(buf, 32, "%l:%M%p", &tm);
71 /** Otherwise, for messages up to 6 months old, show the month and day, and the time */
72 else if (today_timet - thetime < 15552000) {
73 if (time_format == WC_TIMEFORMAT_24)
74 wc_strftime(buf, 32, "%b %d %k:%M", &tm);
76 wc_strftime(buf, 32, "%b %d %l:%M%p", &tm);
78 /** older than 6 months, show only the date */
80 wc_strftime(buf, 32, "%b %d %Y", &tm);
84 wc_strftime(buf, 32, "%c", &tm);
90 * \brief learn the users timeformat preference.
92 int get_time_format_cached (void)
94 char calhourformat[16];
95 int *time_format_cache;
96 time_format_cache = &(WC->time_format_cache);
97 if (*time_format_cache == WC_TIMEFORMAT_NONE)
99 get_preference("calhourformat", calhourformat, sizeof calhourformat);
100 if (!strcasecmp(calhourformat, "24"))
101 *time_format_cache = WC_TIMEFORMAT_24;
103 *time_format_cache = WC_TIMEFORMAT_AMPM;
105 return *time_format_cache;
109 * \brief Format TIME ONLY for output
110 * \param buf the output buffer
111 * \param thetime time to format into buf
113 void fmt_time(char *buf, time_t thetime)
119 time_format = get_time_format_cached ();
121 tm = localtime(&thetime);
128 if (time_format == WC_TIMEFORMAT_24) {
129 sprintf(buf, "%2d:%02d",
130 tm->tm_hour, tm->tm_min
134 sprintf(buf, "%d:%02d%s",
135 hour, tm->tm_min, ((tm->tm_hour > 12) ? "pm" : "am")
144 * \brief Break down the timestamp used in HTTP headers
145 * Should read rfc1123 and rfc850 dates OK
146 * \todo FIXME won't read asctime
147 * Doesn't understand timezone, but we only should be using GMT/UTC anyway
148 * \param buf time to parse
149 * \return the time found in buf
151 time_t httpdate_to_timestamp(char *buf)
158 /** Skip day of week, to number */
159 for (c = buf; *c != ' '; c++)
163 /* Get day of month */
164 tt.tm_mday = atoi(c);
165 for (; *c != ' ' && *c != '-'; c++);
170 case 'A': /** April, August */
171 tt.tm_mon = (c[1] == 'p') ? 3 : 7;
173 case 'D': /** December */
176 case 'F': /** February */
179 case 'M': /** March, May */
180 tt.tm_mon = (c[2] == 'r') ? 2 : 4;
182 case 'J': /** January, June, July */
183 tt.tm_mon = (c[2] == 'n') ? ((c[1] == 'a') ? 0 : 5) : 6;
185 case 'N': /** November */
188 case 'O': /** October */
191 case 'S': /** September */
196 break; /** NOTREACHED */
202 tt.tm_year = atoi(c);
203 for (; *c != ' '; c++);
205 if (tt.tm_year >= 1900)
209 tt.tm_hour = atoi(c);
210 for (; *c != ':'; c++);
215 for (; *c != ':'; c++);
220 for (; *c && *c != ' '; c++);
222 /** Got everything; let's go */
223 /** First, change to UTC */
225 sprintf(tz, "TZ=%s", getenv("TZ"));