2006-02-02 Roland McGrath <roland@redhat.com>
[kopensolaris-gnu/glibc.git] / timezone / scheck.c
1 #ifndef lint
2 #ifndef NOID
3 static char     elsieid[] = "@(#)scheck.c       8.17";
4 #endif /* !defined lint */
5 #endif /* !defined NOID */
6
7 /*LINTLIBRARY*/
8
9 #include "private.h"
10
11 const char *
12 scheck(string, format)
13 const char * const      string;
14 const char * const      format;
15 {
16         register char *         fbuf;
17         register const char *   fp;
18         register char *         tp;
19         register int            c;
20         register const char *   result;
21         char                    dummy;
22
23         result = "";
24         if (string == NULL || format == NULL)
25                 return result;
26         fbuf = imalloc((int) (2 * strlen(format) + 4));
27         if (fbuf == NULL)
28                 return result;
29         fp = format;
30         tp = fbuf;
31         while ((*tp++ = c = *fp++) != '\0') {
32                 if (c != '%')
33                         continue;
34                 if (*fp == '%') {
35                         *tp++ = *fp++;
36                         continue;
37                 }
38                 *tp++ = '*';
39                 if (*fp == '*')
40                         ++fp;
41                 while (is_digit(*fp))
42                         *tp++ = *fp++;
43                 if (*fp == 'l' || *fp == 'h')
44                         *tp++ = *fp++;
45                 else if (*fp == '[')
46                         do *tp++ = *fp++;
47                                 while (*fp != '\0' && *fp != ']');
48                 if ((*tp++ = *fp++) == '\0')
49                         break;
50         }
51         *(tp - 1) = '%';
52         *tp++ = 'c';
53         *tp = '\0';
54         if (sscanf(string, fbuf, &dummy) != 1)
55                 result = (char *) format;
56         ifree(fbuf);
57         return result;
58 }