gcc/testsuite/gcc.dg/format/gcc_diag-10.c

   1 /* Test for GCC internal format directives.
   2    { dg-do compile }
   3    { dg-options "-std=gnu99 -Wformat" } */
   4
   5 /* Magic identifiers must be set before the attribute is used.  */
   6
   7 typedef long long __gcc_host_wide_int__;
   8
   9 typedef struct location_s
  10 {
  11   const char *file;
  12   int line;
  13 } location_t;
  14
  15 union tree_node;
  16 typedef union tree_node *tree;
  17
  18 /* Define gimple as a dummy type.  The typedef must be provided for
  19    the C test to find the symbol.  */
  20 typedef struct gimple gimple;
  21
  22 #define FORMAT(kind) __attribute__ ((format (__gcc_## kind ##__, 1, 2)))
  23
  24 void diag (const char*, ...) FORMAT (diag);
  25 void cdiag (const char*, ...) FORMAT (cdiag);
  26 void tdiag (const char*, ...) FORMAT (tdiag);
  27 void cxxdiag (const char*, ...) FORMAT (cxxdiag);
  28
  29 void test_diag (tree t, gimple *gc)
  30 {
  31   diag ("%<");   /* { dg-warning "unterminated quoting directive" } */
  32   diag ("%>");   /* { dg-warning "unmatched quoting directive " } */
  33   diag ("%<foo%<bar%>%>");   /* { dg-warning "nested quoting directive" } */
  34
  35   diag ("%G", gc); /* { dg-warning "format" } */
  36   diag ("%K", t); /* { dg-warning "format" } */
  37
  38   diag ("%R");       /* { dg-warning "unmatched color reset directive" } */
  39   diag ("%r", "");   /* { dg-warning "unterminated color directive" } */
  40   diag ("%r%r", "", "");   /* { dg-warning "unterminated color directive" } */
  41   diag ("%r%R", "");
  42   diag ("%r%r%R", "", "");
  43   diag ("%r%R%r%R", "", "");
  44
  45   diag ("%<%R%>");      /* { dg-warning "unmatched color reset directive" } */
  46   diag ("%<%r%>", "");  /* { dg-warning "unterminated color directive" } */
  47   diag ("%<%r%R%>", "");
  48 }
  49
  50 void test_cdiag (tree t, gimple *gc)
  51 {
  52   cdiag ("%<");   /* { dg-warning "unterminated quoting directive" } */
  53   cdiag ("%>");   /* { dg-warning "unmatched quoting directive " } */
  54   cdiag ("%<foo%<bar%>%>");   /* { dg-warning "nested quoting directive" } */
  55
  56   cdiag ("%D", t);       /* { dg-warning ".D. conversion used unquoted" } */
  57   cdiag ("%E", t);
  58   cdiag ("%F", t);       /* { dg-warning ".F. conversion used unquoted" } */
  59   cdiag ("%G", gc);
  60   cdiag ("%K", t);
  61
  62   cdiag ("%R");       /* { dg-warning "unmatched color reset directive" } */
  63   cdiag ("%r", "");   /* { dg-warning "unterminated color directive" } */
  64   cdiag ("%r%r", "", "");   /* { dg-warning "unterminated color directive" } */
  65   cdiag ("%r%R", "");
  66   cdiag ("%r%r%R", "", "");
  67   cdiag ("%r%R%r%R", "", "");
  68
  69   cdiag ("%T", t);       /* { dg-warning ".T. conversion used unquoted" } */
  70   cdiag ("%V", t);       /* { dg-warning ".V. conversion used unquoted" } */
  71
  72   cdiag ("%<%D%>", t);
  73   cdiag ("%<%E%>", t);
  74   cdiag ("%<%F%>", t);
  75   cdiag ("%<%G%>", gc);  /* { dg-warning ".G. conversion used within a quoted sequence" } */
  76   cdiag ("%<%K%>", t);   /* { dg-warning ".K. conversion used within a quoted sequence" } */
  77
  78   cdiag ("%<%R%>");      /* { dg-warning "unmatched color reset directive" } */
  79   cdiag ("%<%r%>", "");  /* { dg-warning "unterminated color directive" } */
  80   cdiag ("%<%r%R%>", "");
  81
  82   cdiag ("%<%T%>", t);
  83   cdiag ("%<%V%>", t);
  84
  85   cdiag ("%<%qD%>", t);  /* { dg-warning ".q. flag used within a quoted sequence" } */
  86   cdiag ("%<%qE%>", t);  /* { dg-warning ".q. flag used within a quoted sequence" } */
  87   cdiag ("%<%qT%>", t);  /* { dg-warning ".q. flag used within a quoted sequence" } */
  88 }
  89
  90 void test_tdiag (tree t, gimple *gc)
  91 {
  92   tdiag ("%<");       /* { dg-warning "unterminated quoting directive" } */
  93   tdiag ("%>");       /* { dg-warning "unmatched quoting directive " } */
  94   tdiag ("%<foo%<bar%>%>");   /* { dg-warning "nested quoting directive" } */
  95
  96   tdiag ("%D", t);       /* { dg-warning ".D. conversion used unquoted" } */
  97   tdiag ("%E", t);
  98   tdiag ("%G", gc);
  99   tdiag ("%K", t);
 100
 101   tdiag ("%R");          /* { dg-warning "unmatched color reset directive" } */
 102   tdiag ("%r", "");   /* { dg-warning "unterminated color directive" } */
 103   tdiag ("%r%r", "", "");   /* { dg-warning "unterminated color directive" } */
 104   tdiag ("%r%R", "");
 105   tdiag ("%r%R", "");
 106   tdiag ("%r%r%R", "", "");
 107   tdiag ("%r%R%r%R", "", "");
 108
 109   tdiag ("%T", t);       /* { dg-warning ".T. conversion used unquoted" } */
 110
 111   tdiag ("%<%D%>", t);
 112   tdiag ("%<%E%>", t);
 113   tdiag ("%<%G%>", gc);  /* { dg-warning ".G. conversion used within a quoted sequence" } */
 114   tdiag ("%<%K%>", t);   /* { dg-warning ".K. conversion used within a quoted sequence" } */
 115
 116   tdiag ("%<%R%>");      /* { dg-warning "unmatched color reset directive" } */
 117   tdiag ("%<%r%>", "");  /* { dg-warning "unterminated color directive" } */
 118   tdiag ("%<%r%R%>", "");
 119
 120   tdiag ("%<%T%>", t);
 121
 122   tdiag ("%<%qD%>", t);  /* { dg-warning ".q. flag used within a quoted sequence" } */
 123   tdiag ("%<%qE%>", t);  /* { dg-warning ".q. flag used within a quoted sequence" } */
 124   tdiag ("%<%qT%>", t);  /* { dg-warning ".q. flag used within a quoted sequence" } */
 125 }
 126
 127 void test_cxxdiag (tree t, gimple *gc)
 128 {
 129   cxxdiag ("%A", t);     /* { dg-warning ".A. conversion used unquoted" } */
 130   cxxdiag ("%D", t);     /* { dg-warning ".D. conversion used unquoted" } */
 131   cxxdiag ("%E", t);
 132   cxxdiag ("%F", t);     /* { dg-warning ".F. conversion used unquoted" } */
 133   cxxdiag ("%G", gc);
 134   cxxdiag ("%K", t);
 135
 136   cxxdiag ("%R");        /* { dg-warning "unmatched color reset directive" } */
 137   cxxdiag ("%r", "");    /* { dg-warning "unterminated color directive" } */
 138   cxxdiag ("%r%r", "", "");   /* { dg-warning "unterminated color directive" } */
 139   cxxdiag ("%r%R", "");
 140   cxxdiag ("%r%R", "");
 141   cxxdiag ("%r%r%R", "", "");
 142   cxxdiag ("%r%R%r%R", "", "");
 143
 144   cxxdiag ("%S", t);     /* { dg-warning ".S. conversion used unquoted" } */
 145   cxxdiag ("%T", t);     /* { dg-warning ".T. conversion used unquoted" } */
 146   cxxdiag ("%V", t);     /* { dg-warning ".V. conversion used unquoted" } */
 147   cxxdiag ("%X", t);     /* { dg-warning ".X. conversion used unquoted" } */
 148
 149   cxxdiag ("%<%A%>", t);
 150   cxxdiag ("%<%D%>", t);
 151   cxxdiag ("%<%E%>", t);
 152   cxxdiag ("%<%F%>", t);
 153   cxxdiag ("%<%R%>");    /* { dg-warning "unmatched color reset" } */
 154   cxxdiag ("%<%r%R%>", "");
 155   cxxdiag ("%<%S%>", t);
 156   cxxdiag ("%<%T%>", t);
 157   cxxdiag ("%<%V%>", t);
 158   cxxdiag ("%<%X%>", t);
 159 }