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 /* Likewise for gimple.  */
  23 typedef struct cgraph_node cgraph_node;
  24
  25 /* Likewise for diagnostic_event_id_t.  */
  26 typedef struct diagnostic_event_id_t diagnostic_event_id_t;
  27
  28 #define FORMAT(kind) __attribute__ ((format (__gcc_## kind ##__, 1, 2)))
  29
  30 void diag (const char*, ...) FORMAT (diag);
  31 void cdiag (const char*, ...) FORMAT (cdiag);
  32 void tdiag (const char*, ...) FORMAT (tdiag);
  33 void cxxdiag (const char*, ...) FORMAT (cxxdiag);
  34 void dump (const char*, ...) FORMAT (dump_printf);
  35
  36 void test_diag (tree t, gimple *gc, diagnostic_event_id_t *event_id_ptr)
  37 {
  38   diag ("%<");   /* { dg-warning "unterminated quoting directive" } */
  39   diag ("%>");   /* { dg-warning "unmatched quoting directive " } */
  40   diag ("%<foo%<bar%>%>");   /* { dg-warning "nested quoting directive" } */
  41
  42   diag ("%G", gc); /* { dg-warning "format" } */
  43   diag ("%K", t); /* { dg-warning "format" } */
  44   diag ("%@", event_id_ptr);
  45
  46   diag ("%R");       /* { dg-warning "unmatched color reset directive" } */
  47   diag ("%r", "");   /* { dg-warning "unterminated color directive" } */
  48   diag ("%r%r", "", "");   /* { dg-warning "unterminated color directive" } */
  49   diag ("%r%R", "");
  50   diag ("%r%r%R", "", "");
  51   diag ("%r%R%r%R", "", "");
  52
  53   diag ("%<%R%>");      /* { dg-warning "unmatched color reset directive" } */
  54   diag ("%<%r%>", "");  /* { dg-warning "unterminated color directive" } */
  55   diag ("%<%r%R%>", "");
  56 }
  57
  58 void test_cdiag (tree t, gimple *gc)
  59 {
  60   cdiag ("%<");   /* { dg-warning "unterminated quoting directive" } */
  61   cdiag ("%>");   /* { dg-warning "unmatched quoting directive " } */
  62   cdiag ("%<foo%<bar%>%>");   /* { dg-warning "nested quoting directive" } */
  63
  64   cdiag ("%D", t);       /* { dg-warning ".D. conversion used unquoted" } */
  65   cdiag ("%E", t);
  66   cdiag ("%F", t);       /* { dg-warning ".F. conversion used unquoted" } */
  67   cdiag ("%G", gc);      /* { dg-warning "format" } */
  68   cdiag ("%K", t);       /* { dg-warning "format" } */
  69
  70   cdiag ("%R");       /* { dg-warning "unmatched color reset directive" } */
  71   cdiag ("%r", "");   /* { dg-warning "unterminated color directive" } */
  72   cdiag ("%r%r", "", "");   /* { dg-warning "unterminated color directive" } */
  73   cdiag ("%r%R", "");
  74   cdiag ("%r%r%R", "", "");
  75   cdiag ("%r%R%r%R", "", "");
  76
  77   cdiag ("%T", t);       /* { dg-warning ".T. conversion used unquoted" } */
  78   cdiag ("%V", t);       /* { dg-warning ".V. conversion used unquoted" } */
  79
  80   cdiag ("%<%D%>", t);
  81   cdiag ("%<%E%>", t);
  82   cdiag ("%<%F%>", t);
  83   cdiag ("%<%G%>", gc);  /* { dg-warning "format" } */
  84   cdiag ("%<%K%>", t);   /* { dg-warning "format" } */
  85
  86   cdiag ("%<%R%>");      /* { dg-warning "unmatched color reset directive" } */
  87   cdiag ("%<%r%>", "");  /* { dg-warning "unterminated color directive" } */
  88   cdiag ("%<%r%R%>", "");
  89
  90   cdiag ("%<%T%>", t);
  91   cdiag ("%<%V%>", t);
  92
  93   cdiag ("%<%qD%>", t);  /* { dg-warning ".q. flag used within a quoted sequence" } */
  94   cdiag ("%<%qE%>", t);  /* { dg-warning ".q. flag used within a quoted sequence" } */
  95   cdiag ("%<%qT%>", t);  /* { dg-warning ".q. flag used within a quoted sequence" } */
  96 }
  97
  98 void test_tdiag (tree t, gimple *gc)
  99 {
 100   tdiag ("%<");       /* { dg-warning "unterminated quoting directive" } */
 101   tdiag ("%>");       /* { dg-warning "unmatched quoting directive " } */
 102   tdiag ("%<foo%<bar%>%>");   /* { dg-warning "nested quoting directive" } */
 103
 104   tdiag ("%D", t);       /* { dg-warning ".D. conversion used unquoted" } */
 105   tdiag ("%E", t);
 106   tdiag ("%G", gc);     /* { dg-warning "format" } */
 107   tdiag ("%K", t);      /* { dg-warning "format" } */
 108
 109   tdiag ("%R");          /* { dg-warning "unmatched color reset directive" } */
 110   tdiag ("%r", "");   /* { dg-warning "unterminated color directive" } */
 111   tdiag ("%r%r", "", "");   /* { dg-warning "unterminated color directive" } */
 112   tdiag ("%r%R", "");
 113   tdiag ("%r%R", "");
 114   tdiag ("%r%r%R", "", "");
 115   tdiag ("%r%R%r%R", "", "");
 116
 117   tdiag ("%T", t);       /* { dg-warning ".T. conversion used unquoted" } */
 118
 119   tdiag ("%<%D%>", t);
 120   tdiag ("%<%E%>", t);
 121   tdiag ("%<%G%>", gc);  /* { dg-warning "format" } */
 122   tdiag ("%<%K%>", t);   /* { dg-warning "format" } */
 123
 124   tdiag ("%<%R%>");      /* { dg-warning "unmatched color reset directive" } */
 125   tdiag ("%<%r%>", "");  /* { dg-warning "unterminated color directive" } */
 126   tdiag ("%<%r%R%>", "");
 127
 128   tdiag ("%<%T%>", t);
 129
 130   tdiag ("%<%qD%>", t);  /* { dg-warning ".q. flag used within a quoted sequence" } */
 131   tdiag ("%<%qE%>", t);  /* { dg-warning ".q. flag used within a quoted sequence" } */
 132   tdiag ("%<%qT%>", t);  /* { dg-warning ".q. flag used within a quoted sequence" } */
 133 }
 134
 135 void test_cxxdiag (tree t, gimple *gc)
 136 {
 137   cxxdiag ("%A", t);     /* { dg-warning ".A. conversion used unquoted" } */
 138   cxxdiag ("%D", t);     /* { dg-warning ".D. conversion used unquoted" } */
 139   cxxdiag ("%E", t);
 140   cxxdiag ("%F", t);     /* { dg-warning ".F. conversion used unquoted" } */
 141   cxxdiag ("%G", gc);    /* { dg-warning "format" } */
 142   cxxdiag ("%K", t);     /* { dg-warning "format" } */
 143
 144   cxxdiag ("%R");        /* { dg-warning "unmatched color reset directive" } */
 145   cxxdiag ("%r", "");    /* { dg-warning "unterminated color directive" } */
 146   cxxdiag ("%r%r", "", "");   /* { dg-warning "unterminated color directive" } */
 147   cxxdiag ("%r%R", "");
 148   cxxdiag ("%r%R", "");
 149   cxxdiag ("%r%r%R", "", "");
 150   cxxdiag ("%r%R%r%R", "", "");
 151
 152   cxxdiag ("%S", t);     /* { dg-warning ".S. conversion used unquoted" } */
 153   cxxdiag ("%T", t);     /* { dg-warning ".T. conversion used unquoted" } */
 154   cxxdiag ("%V", t);     /* { dg-warning ".V. conversion used unquoted" } */
 155   cxxdiag ("%X", t);     /* { dg-warning ".X. conversion used unquoted" } */
 156
 157   cxxdiag ("%<%A%>", t);
 158   cxxdiag ("%<%D%>", t);
 159   cxxdiag ("%<%E%>", t);
 160   cxxdiag ("%<%F%>", t);
 161   cxxdiag ("%<%R%>");    /* { dg-warning "unmatched color reset" } */
 162   cxxdiag ("%<%r%R%>", "");
 163   cxxdiag ("%<%S%>", t);
 164   cxxdiag ("%<%T%>", t);
 165   cxxdiag ("%<%V%>", t);
 166   cxxdiag ("%<%X%>", t);
 167 }
 168
 169 void test_dump (tree t, gimple *stmt, cgraph_node *node)
 170 {
 171   dump ("%<");   /* { dg-warning "unterminated quoting directive" } */
 172   dump ("%>");   /* { dg-warning "unmatched quoting directive " } */
 173   dump ("%<foo%<bar%>%>");   /* { dg-warning "nested quoting directive" } */
 174
 175   dump ("%R");       /* { dg-warning "unmatched color reset directive" } */
 176   dump ("%r", "");   /* { dg-warning "unterminated color directive" } */
 177   dump ("%r%r", "", "");   /* { dg-warning "unterminated color directive" } */
 178   dump ("%r%R", "");
 179   dump ("%r%r%R", "", "");
 180   dump ("%r%R%r%R", "", "");
 181
 182   dump ("%<%R%>");      /* { dg-warning "unmatched color reset directive" } */
 183   dump ("%<%r%>", "");  /* { dg-warning "unterminated color directive" } */
 184   dump ("%<%r%R%>", "");
 185
 186   dump ("%E", stmt);
 187   dump ("%T", t);
 188   dump ("%G", stmt);
 189   dump ("%C", node);
 190   dump ("%f", 1.0);
 191   dump ("%4.2f", 1.0); /* { dg-warning "format" } */
 192 }