1 | /*
|
---|
2 | * strftime - convert a structure to a string, controlled by an argument
|
---|
3 | */
|
---|
4 | /* $Header: /cvsup/minix/src/lib/ansi/strftime.c,v 1.1.1.1 2005/04/21 14:56:06 beng Exp $ */
|
---|
5 |
|
---|
6 | #include <time.h>
|
---|
7 | #include "loc_time.h"
|
---|
8 |
|
---|
9 | /* The width can be -1 in both s_prnt() as in u_prnt(). This
|
---|
10 | * indicates that as many characters as needed should be printed.
|
---|
11 | */
|
---|
12 | static char *
|
---|
13 | s_prnt(char *s, size_t maxsize, const char *str, int width)
|
---|
14 | {
|
---|
15 | while (width > 0 || (width < 0 && *str)) {
|
---|
16 | if (!maxsize) break;
|
---|
17 | *s++ = *str++;
|
---|
18 | maxsize--;
|
---|
19 | width--;
|
---|
20 | }
|
---|
21 | return s;
|
---|
22 | }
|
---|
23 |
|
---|
24 | static char *
|
---|
25 | u_prnt(char *s, size_t maxsize, unsigned val, int width)
|
---|
26 | {
|
---|
27 | int c;
|
---|
28 |
|
---|
29 | c = val % 10;
|
---|
30 | val = val / 10;
|
---|
31 | if (--width > 0 || (width < 0 && val != 0))
|
---|
32 | s = u_prnt(s, (maxsize ? maxsize - 1 : 0), val, width);
|
---|
33 | if (maxsize) *s++ = c + '0';
|
---|
34 | return s;
|
---|
35 | }
|
---|
36 |
|
---|
37 | size_t
|
---|
38 | strftime(char *s, size_t maxsize,
|
---|
39 | const char *format, const struct tm *timeptr)
|
---|
40 | {
|
---|
41 | size_t n;
|
---|
42 | char *firsts, *olds;
|
---|
43 |
|
---|
44 | if (!format) return 0;
|
---|
45 |
|
---|
46 | _tzset(); /* for %Z conversion */
|
---|
47 | firsts = s;
|
---|
48 | while (maxsize && *format) {
|
---|
49 | while (maxsize && *format && *format != '%') {
|
---|
50 | *s++ = *format++;
|
---|
51 | maxsize--;
|
---|
52 | }
|
---|
53 | if (!maxsize || !*format) break;
|
---|
54 | format++;
|
---|
55 |
|
---|
56 | olds = s;
|
---|
57 | switch (*format++) {
|
---|
58 | case 'a':
|
---|
59 | s = s_prnt(s, maxsize,
|
---|
60 | _days[timeptr->tm_wday], ABB_LEN);
|
---|
61 | maxsize -= s - olds;
|
---|
62 | break;
|
---|
63 | case 'A':
|
---|
64 | s = s_prnt(s, maxsize, _days[timeptr->tm_wday], -1);
|
---|
65 | maxsize -= s - olds;
|
---|
66 | break;
|
---|
67 | case 'b':
|
---|
68 | s = s_prnt(s, maxsize,
|
---|
69 | _months[timeptr->tm_mon], ABB_LEN);
|
---|
70 | maxsize -= s - olds;
|
---|
71 | break;
|
---|
72 | case 'B':
|
---|
73 | s = s_prnt(s, maxsize, _months[timeptr->tm_mon], -1);
|
---|
74 | maxsize -= s - olds;
|
---|
75 | break;
|
---|
76 | case 'c':
|
---|
77 | n = strftime(s, maxsize,
|
---|
78 | "%a %b %d %H:%M:%S %Y", timeptr);
|
---|
79 | if (n) maxsize -= n;
|
---|
80 | else maxsize = 0;
|
---|
81 | s += n;
|
---|
82 | break;
|
---|
83 | case 'd':
|
---|
84 | s = u_prnt(s, maxsize, timeptr->tm_mday, 2);
|
---|
85 | maxsize -= s - olds;
|
---|
86 | break;
|
---|
87 | case 'H':
|
---|
88 | s = u_prnt(s, maxsize, timeptr->tm_hour, 2);
|
---|
89 | maxsize -= s - olds;
|
---|
90 | break;
|
---|
91 | case 'I':
|
---|
92 | s = u_prnt(s, maxsize,
|
---|
93 | (timeptr->tm_hour + 11) % 12 + 1, 2);
|
---|
94 | maxsize -= s - olds;
|
---|
95 | break;
|
---|
96 | case 'j':
|
---|
97 | s = u_prnt(s, maxsize, timeptr->tm_yday + 1, 3);
|
---|
98 | maxsize -= s - olds;
|
---|
99 | break;
|
---|
100 | case 'm':
|
---|
101 | s = u_prnt(s, maxsize, timeptr->tm_mon + 1, 2);
|
---|
102 | maxsize -= s - olds;
|
---|
103 | break;
|
---|
104 | case 'M':
|
---|
105 | s = u_prnt(s, maxsize, timeptr->tm_min, 2);
|
---|
106 | maxsize -= s - olds;
|
---|
107 | break;
|
---|
108 | case 'p':
|
---|
109 | s = s_prnt(s, maxsize,
|
---|
110 | (timeptr->tm_hour < 12) ? "AM" : "PM", 2);
|
---|
111 | maxsize -= s - olds;
|
---|
112 | break;
|
---|
113 | case 'S':
|
---|
114 | s = u_prnt(s, maxsize, timeptr->tm_sec, 2);
|
---|
115 | maxsize -= s - olds;
|
---|
116 | break;
|
---|
117 | case 'U':
|
---|
118 | s = u_prnt(s, maxsize, /* ??? */
|
---|
119 | (timeptr->tm_yday + 7 - timeptr->tm_wday) / 7, 2);
|
---|
120 | maxsize -= s - olds;
|
---|
121 | break;
|
---|
122 | case 'w':
|
---|
123 | s = u_prnt(s, maxsize, timeptr->tm_wday, 1);
|
---|
124 | maxsize -= s - olds;
|
---|
125 | break;
|
---|
126 | case 'W':
|
---|
127 | s = u_prnt(s, maxsize, /* ??? */
|
---|
128 | (timeptr->tm_yday+7-(timeptr->tm_wday+6)%7)/7,2);
|
---|
129 | maxsize -= s - olds;
|
---|
130 | break;
|
---|
131 | case 'x':
|
---|
132 | n = strftime(s, maxsize, "%a %b %d %Y", timeptr);
|
---|
133 | if (n) maxsize -= n;
|
---|
134 | else maxsize = 0;
|
---|
135 | s += n;
|
---|
136 | break;
|
---|
137 | case 'X':
|
---|
138 | n = strftime(s, maxsize, "%H:%M:%S", timeptr);
|
---|
139 | if (n) maxsize -= n;
|
---|
140 | else maxsize = 0;
|
---|
141 | s += n;
|
---|
142 | break;
|
---|
143 | case 'y':
|
---|
144 | s = u_prnt(s, maxsize, timeptr->tm_year % 100, 2);
|
---|
145 | maxsize -= s - olds;
|
---|
146 | break;
|
---|
147 | case 'Y':
|
---|
148 | s = u_prnt(s, maxsize, timeptr->tm_year + YEAR0, -1);
|
---|
149 | maxsize -= s - olds;
|
---|
150 | break;
|
---|
151 | case 'Z':
|
---|
152 | s = s_prnt(s, maxsize,
|
---|
153 | _tzname[(timeptr->tm_isdst > 0)], -1);
|
---|
154 | maxsize -= s - olds;
|
---|
155 | break;
|
---|
156 | case '%':
|
---|
157 | *s++ = '%';
|
---|
158 | maxsize--;
|
---|
159 | break;
|
---|
160 | default:
|
---|
161 | /* A conversion error. Leave the loop. */
|
---|
162 | while (*format) format++;
|
---|
163 | break;
|
---|
164 | }
|
---|
165 |
|
---|
166 | }
|
---|
167 | if (maxsize) {
|
---|
168 | *s = '\0';
|
---|
169 | return s - firsts;
|
---|
170 | }
|
---|
171 | return 0; /* The buffer is full */
|
---|
172 | }
|
---|