diff options
Diffstat (limited to 'time/strftime.c')
| -rw-r--r-- | time/strftime.c | 87 |
1 files changed, 59 insertions, 28 deletions
diff --git a/time/strftime.c b/time/strftime.c index fea545c..963e9e4 100644 --- a/time/strftime.c +++ b/time/strftime.c @@ -85,23 +85,27 @@ extern char *tzname[]; #endif #ifndef __P -#if defined (__GNUC__) || (defined (__STDC__) && __STDC__) -#define __P(args) args -#else -#define __P(args) () -#endif /* GCC. */ +# if defined (__GNUC__) || (defined (__STDC__) && __STDC__) +# define __P(args) args +# else +# define __P(args) () +# endif /* GCC. */ #endif /* Not __P. */ #ifndef PTR -#ifdef __STDC__ -#define PTR void * -#else -#define PTR char * -#endif +# ifdef __STDC__ +# define PTR void * +# else +# define PTR char * +# endif #endif #ifndef CHAR_BIT -#define CHAR_BIT 8 +# define CHAR_BIT 8 +#endif + +#ifndef NULL +# define NULL 0 #endif #define TYPE_SIGNED(t) ((t) -1 < 0) @@ -119,7 +123,7 @@ extern char *tzname[]; #ifndef __isleap /* Nonzero if YEAR is a leap year (every 4 years, except every 100th isn't, and every 400th is). */ -#define __isleap(year) \ +# define __isleap(year) \ ((year) % 4 == 0 && ((year) % 100 != 0 || (year) % 400 == 0)) #endif @@ -134,7 +138,7 @@ extern int __tz_compute __P ((time_t timer, const struct tm *tm)); # if ! HAVE_LOCALTIME_R # if ! HAVE_TM_GMTOFF /* Approximate gmtime_r as best we can in its absence. */ -#define gmtime_r my_gmtime_r +# define gmtime_r my_gmtime_r static struct tm *gmtime_r __P ((const time_t *, struct tm *)); static struct tm * gmtime_r (t, tp) @@ -150,7 +154,7 @@ gmtime_r (t, tp) # endif /* ! HAVE_TM_GMTOFF */ /* Approximate localtime_r as best we can in its absence. */ -#define localtime_r my_localtime_r +# define localtime_r my_localtime_r static struct tm *localtime_r __P ((const time_t *, struct tm *)); static struct tm * localtime_r (t, tp) @@ -194,23 +198,25 @@ static const char spaces[16] = " "; { \ int _n = (n); \ int _delta = width - _n; \ - i += _n + (_delta > 0 ? _delta : 0); \ - if (i >= maxsize) \ + int _incr = _n + (_delta > 0 ? _delta : 0); \ + if (i + _incr >= maxsize) \ return 0; \ - else \ - if (p) \ - { \ - if (_delta > 0) \ - memset_space (p, _delta); \ - f; \ - p += _n; \ - } \ + if (p) \ + { \ + if (_delta > 0) \ + memset_space (p, _delta); \ + f; \ + p += _n; \ + } \ + i += _incr; \ } while (0) #define cpy(n, s) \ add ((n), \ if (to_lowcase) \ memcpy_lowcase (p, (s), _n); \ + else if (to_uppcase) \ + memcpy_uppcase (p, (s), _n); \ else \ memcpy ((PTR) p, (PTR) (s), _n)) @@ -237,6 +243,19 @@ memcpy_lowcase (dest, src, len) return dest; } +static char *memcpy_uppcase __P ((char *dest, const char *src, size_t len)); + +static char * +memcpy_uppcase (dest, src, len) + char *dest; + const char *src; + size_t len; +{ + while (len-- > 0) + dest[len] = TOUPPER (src[len]); + return dest; +} + #if ! HAVE_TM_GMTOFF /* Yield the difference between *A and *B, measured in seconds, ignoring leap seconds. */ @@ -393,6 +412,7 @@ strftime (s, maxsize, format, tp) : INT_STRLEN_BOUND (int))]; int width = -1; int to_lowcase = 0; + int to_uppcase = 0; #if DO_MULTIBYTE @@ -468,16 +488,19 @@ strftime (s, maxsize, format, tp) #endif /* ! DO_MULTIBYTE */ /* Check for flags that can modify a number format. */ - ++f; while (1) { - switch (*f) + switch (*++f) { case '_': case '-': case '0': - pad = *f++; - break; + pad = *f; + continue; + + case '^': + to_uppcase = 1; + continue; default: pad = 0; @@ -563,10 +586,18 @@ strftime (s, maxsize, format, tp) subformat: { + char *old_start = p; size_t len = strftime (NULL, maxsize - i, subfmt, tp); if (len == 0 && *subfmt) return 0; add (len, strftime (p, maxsize - i, subfmt, tp)); + + if (to_uppcase) + while (old_start < p) + { + *old_start = TOUPPER (*old_start); + ++old_start; + } } break; |