| [9] | 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 | }
|
|---|