1  /* Test of cpp_callbacks::comments.  */
       2  
       3  #include "gcc-plugin.h"
       4  #include "config.h"
       5  #include "system.h"
       6  #include "coretypes.h"
       7  #include "cpplib.h"
       8  #include "diagnostic.h"
       9  #include "c-family/c-pragma.h"
      10  
      11  int plugin_is_GPL_compatible;
      12  
      13  /* Test callback for cpp_callbacks::comments.  */
      14  
      15  void
      16  my_comment_cb (cpp_reader *, location_t loc,
      17  	       const unsigned char *content, size_t len)
      18  {
      19    if (in_system_header_at (loc))
      20      return;
      21  
      22    /* CONTENT contains the opening slash-star (or slash-slash),
      23       and for C-style comments contains the closing star-slash.  */
      24    gcc_assert (len >= 2);
      25    gcc_assert (content[0] == '/');
      26    gcc_assert (content[1] == '*' || content[1] == '/');
      27    bool c_style = (content[1] == '*');
      28    if (c_style)
      29      {
      30        gcc_assert (content[len - 2] == '*');
      31        gcc_assert (content[len - 1] == '/');
      32      }
      33  
      34    if (c_style)
      35      inform (loc, "got C-style comment; length=%i", len);
      36    else
      37      inform (loc, "got C++-style comment; length=%i", len);
      38  
      39    /* Print the content of the comment.
      40       For a C-style comment, the buffer CONTENT contains the opening
      41       slash-star and closing star-slash, so we can't directly verify
      42       it in the DejaGnu test without adding another comment, which
      43       would trigger this callback again.
      44       Hence we skip the syntactically-significant parts of the comment
      45       when printing it.  */
      46    fprintf (stderr, "stripped content of comment: >");
      47    /* Avoid printing trailing star-slash.  */
      48    if (c_style)
      49      len -= 2;
      50    for (size_t i = 2; i < len; i++)
      51      fputc (content[i], stderr);
      52    fprintf (stderr, "<\n");
      53  }
      54  
      55  int
      56  plugin_init (struct plugin_name_args *plugin_info,
      57  	     struct plugin_gcc_version *version)
      58  {
      59    cpp_callbacks *cb = cpp_get_callbacks (parse_in);
      60    cb->comment = my_comment_cb;
      61  
      62    return 0;
      63  }