1 #include <stdio.h>
2 #include <stdlib.h>
3 #include <string.h>
4 #include <time.h>
5
6
7 static int
do_bz18985(void)8 do_bz18985 (void)
9 {
10 char buf[1000];
11 struct tm ttm;
12 int rc, ret = 0;
13
14 memset (&ttm, 1, sizeof (ttm));
15 ttm.tm_zone = NULL; /* Dereferenced directly if non-NULL. */
16 rc = strftime (buf, sizeof (buf), "%a %A %b %B %c %z %Z", &ttm);
17
18 if (rc == 66)
19 {
20 const char expected[]
21 = "? ? ? ? ? ? 16843009 16843009:16843009:16843009 16844909 +467836 ?";
22 if (0 != strcmp (buf, expected))
23 {
24 printf ("expected:\n %s\ngot:\n %s\n", expected, buf);
25 ret += 1;
26 }
27 }
28 else
29 {
30 printf ("expected 66, got %d\n", rc);
31 ret += 1;
32 }
33
34 /* Check negative values as well. */
35 memset (&ttm, 0xFF, sizeof (ttm));
36 ttm.tm_zone = NULL; /* Dereferenced directly if non-NULL. */
37 rc = strftime (buf, sizeof (buf), "%a %A %b %B %c %z %Z", &ttm);
38
39 if (rc == 30)
40 {
41 const char expected[] = "? ? ? ? ? ? -1 -1:-1:-1 1899 ";
42 if (0 != strcmp (buf, expected))
43 {
44 printf ("expected:\n %s\ngot:\n %s\n", expected, buf);
45 ret += 1;
46 }
47 }
48 else
49 {
50 printf ("expected 30, got %d\n", rc);
51 ret += 1;
52 }
53
54 return ret;
55 }
56
57 static struct
58 {
59 const char *fmt;
60 size_t min;
61 size_t max;
62 } tests[] =
63 {
64 { "%2000Y", 2000, 4000 },
65 { "%02000Y", 2000, 4000 },
66 { "%_2000Y", 2000, 4000 },
67 { "%-2000Y", 2000, 4000 },
68 };
69 #define ntests (sizeof (tests) / sizeof (tests[0]))
70
71
72 static int
do_test(void)73 do_test (void)
74 {
75 size_t cnt;
76 int result = 0;
77
78 time_t tnow = time (NULL);
79 struct tm *now = localtime (&tnow);
80
81 for (cnt = 0; cnt < ntests; ++cnt)
82 {
83 size_t size = 0;
84 int res;
85 char *buf = NULL;
86
87 do
88 {
89 size += 500;
90 buf = (char *) realloc (buf, size);
91 if (buf == NULL)
92 {
93 puts ("out of memory");
94 exit (1);
95 }
96
97 res = strftime (buf, size, tests[cnt].fmt, now);
98 if (res != 0)
99 break;
100 }
101 while (size < tests[cnt].max);
102
103 if (res == 0)
104 {
105 printf ("%Zu: %s: res == 0 despite size == %Zu\n",
106 cnt, tests[cnt].fmt, size);
107 result = 1;
108 }
109 else if (size < tests[cnt].min)
110 {
111 printf ("%Zu: %s: size == %Zu was enough\n",
112 cnt, tests[cnt].fmt, size);
113 result = 1;
114 }
115 else
116 printf ("%Zu: %s: size == %Zu: OK\n", cnt, tests[cnt].fmt, size);
117
118 free (buf);
119 }
120
121 struct tm ttm =
122 {
123 /* Initialize the fields which are needed in the tests. */
124 .tm_mday = 1,
125 .tm_hour = 2
126 };
127 const struct
128 {
129 const char *fmt;
130 const char *exp;
131 size_t n;
132 } ftests[] =
133 {
134 { "%-e", "1", 1 },
135 { "%-k", "2", 1 },
136 { "%-l", "2", 1 },
137 };
138 #define nftests (sizeof (ftests) / sizeof (ftests[0]))
139 for (cnt = 0; cnt < nftests; ++cnt)
140 {
141 char buf[100];
142 size_t r = strftime (buf, sizeof (buf), ftests[cnt].fmt, &ttm);
143 if (r != ftests[cnt].n)
144 {
145 printf ("strftime(\"%s\") returned %zu not %zu\n",
146 ftests[cnt].fmt, r, ftests[cnt].n);
147 result = 1;
148 }
149 if (strcmp (buf, ftests[cnt].exp) != 0)
150 {
151 printf ("strftime(\"%s\") produced \"%s\" not \"%s\"\n",
152 ftests[cnt].fmt, buf, ftests[cnt].exp);
153 result = 1;
154 }
155 }
156
157 return result + do_bz18985 ();
158 }
159
160 #define TEST_FUNCTION do_test ()
161 #include "../test-skeleton.c"
162