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);
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)
55 time_format = get_time_format_cached ();
56 /// TODO: what about the time format?
57 today_timet = time(NULL);
58 localtime_r(&today_timet, &today_tm);
60 localtime_r(&thetime, &tm);
71 /** If date == today, show only the time */
72 if ((tm.tm_year == today_tm.tm_year)
73 &&(tm.tm_mon == today_tm.tm_mon)
74 &&(tm.tm_mday == today_tm.tm_mday)) {
75 if (time_format == WC_TIMEFORMAT_24)
76 wc_strftime(buf, 32, "%k:%M", &tm);
78 wc_strftime(buf, 32, "%l:%M%p", &tm);
80 /** Otherwise, for messages up to 6 months old, show the
81 * month and day, and the time */
82 else if (today_timet - thetime < 15552000) {
83 if (time_format == WC_TIMEFORMAT_24)
84 wc_strftime(buf, 32, "%b %d %k:%M", &tm);
86 wc_strftime(buf, 32, "%b %d %l:%M%p", &tm);
88 /** older than 6 months, show only the date */
90 wc_strftime(buf, 32, "%b %d %Y", &tm);
94 wc_strftime(buf, 32, "%c", &tm);
100 * \brief learn the users timeformat preference.
102 int get_time_format_cached (void)
104 char calhourformat[16];
105 int *time_format_cache;
106 time_format_cache = &(WC->time_format_cache);
107 if (*time_format_cache == WC_TIMEFORMAT_NONE)
109 get_preference("calhourformat", calhourformat, sizeof calhourformat);
110 if (!strcasecmp(calhourformat, "24"))
111 *time_format_cache = WC_TIMEFORMAT_24;
113 *time_format_cache = WC_TIMEFORMAT_AMPM;
115 return *time_format_cache;
119 * \brief Format TIME ONLY for output
120 * \param buf the output buffer
121 * \param thetime time to format into buf
123 void fmt_time(char *buf, time_t thetime)
129 time_format = get_time_format_cached ();
131 tm = localtime(&thetime);
138 if (time_format == WC_TIMEFORMAT_24) {
139 sprintf(buf, "%2d:%02d",
140 tm->tm_hour, tm->tm_min
144 sprintf(buf, "%d:%02d%s",
145 hour, tm->tm_min, ((tm->tm_hour > 12) ? "pm" : "am")
154 * \brief Break down the timestamp used in HTTP headers
155 * Should read rfc1123 and rfc850 dates OK
156 * \todo FIXME won't read asctime
157 * Doesn't understand timezone, but we only should be using GMT/UTC anyway
158 * \param buf time to parse
159 * \return the time found in buf
161 time_t httpdate_to_timestamp(char *buf)
168 /** Skip day of week, to number */
169 for (c = buf; *c != ' '; c++)
173 /* Get day of month */
174 tt.tm_mday = atoi(c);
175 for (; *c != ' ' && *c != '-'; c++);
180 case 'A': /** April, August */
181 tt.tm_mon = (c[1] == 'p') ? 3 : 7;
183 case 'D': /** December */
186 case 'F': /** February */
189 case 'M': /** March, May */
190 tt.tm_mon = (c[2] == 'r') ? 2 : 4;
192 case 'J': /** January, June, July */
193 tt.tm_mon = (c[2] == 'n') ? ((c[1] == 'a') ? 0 : 5) : 6;
195 case 'N': /** November */
198 case 'O': /** October */
201 case 'S': /** September */
206 break; /** NOTREACHED */
212 tt.tm_year = atoi(c);
213 for (; *c != ' '; c++);
215 if (tt.tm_year >= 1900)
219 tt.tm_hour = atoi(c);
220 for (; *c != ':'; c++);
225 for (; *c != ':'; c++);
230 for (; *c && *c != ' '; c++);
232 /** Got everything; let's go */
233 /** First, change to UTC */
235 sprintf(tz, "TZ=%s", getenv("TZ"));