1/* Test for strftime formats. Formats using C99 features. */ 2/* Origin: Joseph Myers <jsm28@cam.ac.uk> */ 3/* { dg-do compile } */ 4/* { dg-options "-std=iso9899:1999 -pedantic -Wformat -Wformat-y2k" } */ 5 6#include "format.h" 7 8void 9foo (char *s, size_t m, const struct tm *tp) 10{ 11 /* See ISO/IEC 9899:1990 (E) subclause 7.12.3.5 (pages 174-175). */ 12 /* Formats which are Y2K-compliant (no 2-digit years). */ 13 strftime (s, m, "%a%A%b%B%C%d%e%F%G%h%H%I%j%m%M%p%R%S%t%T%u%U%V%w%W%X%Y%z%Z%%", tp); 14 strftime (s, m, "%EC%EX%EY%Od%Oe%OH%OI%Om%OM%OS%Ou%OU%OV%Ow%OW", tp); 15 /* Formats with 2-digit years. */ 16 strftime (s, m, "%D", tp); /* { dg-warning "only last 2" "2-digit year" } */ 17 strftime (s, m, "%g", tp); /* { dg-warning "only last 2" "2-digit year" } */ 18 strftime (s, m, "%y", tp); /* { dg-warning "only last 2" "2-digit year" } */ 19 strftime (s, m, "%Oy", tp); /* { dg-warning "only last 2" "2-digit year" } */ 20 /* Formats with 2-digit years in some locales. */ 21 strftime (s, m, "%c", tp); /* { dg-warning "some locales" "2-digit year" } */ 22 strftime (s, m, "%Ec", tp); /* { dg-warning "some locales" "2-digit year" } */ 23 strftime (s, m, "%x", tp); /* { dg-warning "some locales" "2-digit year" } */ 24 strftime (s, m, "%Ex", tp); /* { dg-warning "some locales" "2-digit year" } */ 25 /* %Ey is explicitly an era offset not a 2-digit year; but in some 26 locales the E modifier may be ignored. 27 */ 28 strftime (s, m, "%Ey", tp); /* { dg-warning "some locales" "2-digit year" } */ 29 /* Bad uses of %E and %O. */ 30 strftime (s, m, "%EEY", tp); /* { dg-warning "multiple|repeated" "multiple %E/%O" } */ 31 strftime (s, m, "%EOy", tp); /* { dg-warning "multiple|together" "multiple %E/%O" } */ 32 strftime (s, m, "%OEy", tp); /* { dg-warning "multiple|together" "multiple %E/%O" } */ 33 strftime (s, m, "%OOV", tp); /* { dg-warning "multiple|repeated" "multiple %E/%O" } */ 34 /* { dg-warning "only last 2" "2-digit year" { target *-*-* } 31 } */ 35 /* { dg-warning "only last 2" "2-digit year" { target *-*-* } 32 } */ 36 strftime (s, m, "%Ea", tp); /* { dg-warning "flag|modifier" "bad %Ea" } */ 37 strftime (s, m, "%EA", tp); /* { dg-warning "flag|modifier" "bad %EA" } */ 38 strftime (s, m, "%Eb", tp); /* { dg-warning "flag|modifier" "bad %Eb" } */ 39 strftime (s, m, "%EB", tp); /* { dg-warning "flag|modifier" "bad %EB" } */ 40 strftime (s, m, "%Ed", tp); /* { dg-warning "flag|modifier" "bad %Ed" } */ 41 strftime (s, m, "%ED", tp); /* { dg-warning "flag|modifier" "bad %ED" } */ 42 /* { dg-warning "only last 2" "2-digit year" { target *-*-* } 41 } */ 43 strftime (s, m, "%Ee", tp); /* { dg-warning "flag|modifier" "bad %Ee" } */ 44 strftime (s, m, "%EF", tp); /* { dg-warning "flag|modifier" "bad %EF" } */ 45 strftime (s, m, "%Eg", tp); /* { dg-warning "flag|modifier" "bad %Eg" } */ 46 /* { dg-warning "only last 2" "2-digit year" { target *-*-* } 45 } */ 47 strftime (s, m, "%EG", tp); /* { dg-warning "flag|modifier" "bad %EG" } */ 48 strftime (s, m, "%Eh", tp); /* { dg-warning "flag|modifier" "bad %Eh" } */ 49 strftime (s, m, "%EH", tp); /* { dg-warning "flag|modifier" "bad %EH" } */ 50 strftime (s, m, "%EI", tp); /* { dg-warning "flag|modifier" "bad %EI" } */ 51 strftime (s, m, "%Ej", tp); /* { dg-warning "flag|modifier" "bad %Ej" } */ 52 strftime (s, m, "%Em", tp); /* { dg-warning "flag|modifier" "bad %Em" } */ 53 strftime (s, m, "%EM", tp); /* { dg-warning "flag|modifier" "bad %EM" } */ 54 strftime (s, m, "%En", tp); /* { dg-warning "flag|modifier" "bad %En" } */ 55 strftime (s, m, "%Ep", tp); /* { dg-warning "flag|modifier" "bad %Ep" } */ 56 strftime (s, m, "%Er", tp); /* { dg-warning "flag|modifier" "bad %Er" } */ 57 strftime (s, m, "%ER", tp); /* { dg-warning "flag|modifier" "bad %ER" } */ 58 strftime (s, m, "%ES", tp); /* { dg-warning "flag|modifier" "bad %ES" } */ 59 strftime (s, m, "%Et", tp); /* { dg-warning "flag|modifier" "bad %Et" } */ 60 strftime (s, m, "%ET", tp); /* { dg-warning "flag|modifier" "bad %ET" } */ 61 strftime (s, m, "%Eu", tp); /* { dg-warning "flag|modifier" "bad %Eu" } */ 62 strftime (s, m, "%EU", tp); /* { dg-warning "flag|modifier" "bad %EU" } */ 63 strftime (s, m, "%EV", tp); /* { dg-warning "flag|modifier" "bad %EV" } */ 64 strftime (s, m, "%Ew", tp); /* { dg-warning "flag|modifier" "bad %Ew" } */ 65 strftime (s, m, "%EW", tp); /* { dg-warning "flag|modifier" "bad %EW" } */ 66 strftime (s, m, "%Ez", tp); /* { dg-warning "flag|modifier" "bad %Ez" } */ 67 strftime (s, m, "%EZ", tp); /* { dg-warning "flag|modifier" "bad %EZ" } */ 68 strftime (s, m, "%E%", tp); /* { dg-warning "flag|modifier" "bad %E%" } */ 69 strftime (s, m, "%Oa", tp); /* { dg-warning "flag|modifier" "bad %Oa" } */ 70 strftime (s, m, "%OA", tp); /* { dg-warning "flag|modifier" "bad %OA" } */ 71 strftime (s, m, "%Ob", tp); /* { dg-warning "flag|modifier" "bad %Ob" } */ 72 strftime (s, m, "%OB", tp); /* { dg-warning "flag|modifier" "bad %OB" } */ 73 strftime (s, m, "%Oc", tp); /* { dg-warning "flag|modifier" "bad %Oc" } */ 74 /* { dg-warning "in some locales" "2-digit year" { target *-*-* } 73 } */ 75 strftime (s, m, "%OC", tp); /* { dg-warning "flag|modifier|C" "bad %OC" } */ 76 strftime (s, m, "%OD", tp); /* { dg-warning "flag|modifier" "bad %OD" } */ 77 /* { dg-warning "only last 2" "2-digit year" { target *-*-* } 76 } */ 78 strftime (s, m, "%OF", tp); /* { dg-warning "flag|modifier" "bad %OF" } */ 79 strftime (s, m, "%Og", tp); /* { dg-warning "flag|modifier|C" "bad %Og" } */ 80 /* { dg-warning "only last 2" "2-digit year" { target *-*-* } 79 } */ 81 strftime (s, m, "%OG", tp); /* { dg-warning "flag|modifier|C" "bad %OG" } */ 82 strftime (s, m, "%Oh", tp); /* { dg-warning "flag|modifier" "bad %Oh" } */ 83 strftime (s, m, "%Oj", tp); /* { dg-warning "flag|modifier|C" "bad %Oj" } */ 84 strftime (s, m, "%On", tp); /* { dg-warning "flag|modifier" "bad %On" } */ 85 strftime (s, m, "%Op", tp); /* { dg-warning "flag|modifier" "bad %Op" } */ 86 strftime (s, m, "%Or", tp); /* { dg-warning "flag|modifier" "bad %Or" } */ 87 strftime (s, m, "%OR", tp); /* { dg-warning "flag|modifier" "bad %OR" } */ 88 strftime (s, m, "%Ot", tp); /* { dg-warning "flag|modifier" "bad %Ot" } */ 89 strftime (s, m, "%OT", tp); /* { dg-warning "flag|modifier" "bad %OT" } */ 90 strftime (s, m, "%Ox", tp); /* { dg-warning "flag|modifier" "bad %Ox" } */ 91 /* { dg-warning "in some locales" "2-digit year" { target *-*-* } 90 } */ 92 strftime (s, m, "%OX", tp); /* { dg-warning "flag|modifier" "bad %OX" } */ 93 strftime (s, m, "%OY", tp); /* { dg-warning "flag|modifier|C" "bad %OY" } */ 94 strftime (s, m, "%Oz", tp); /* { dg-warning "flag|modifier|C" "bad %Oz" } */ 95 strftime (s, m, "%OZ", tp); /* { dg-warning "flag|modifier" "bad %OZ" } */ 96 strftime (s, m, "%O%", tp); /* { dg-warning "flag|modifier" "bad %O%" } */ 97} 98