gcc/java/xref.c

   1 /* Write cross reference information extracted from Java(TM)
   2    source and bytecode files, in one of formats documented below.
   3    Copyright (C) 1999, 2000 Free Software Foundation, Inc.
   4    Contributed by Alexandre Petit-Bianco (apbianco@cygnus.com)
   5
   6 This file is part of GNU CC.
   7
   8 GNU CC is free software; you can redistribute it and/or modify
   9 it under the terms of the GNU General Public License as published by
  10 the Free Software Foundation; either version 2, or (at your option)
  11 any later version.
  12
  13 GNU CC is distributed in the hope that it will be useful,
  14 but WITHOUT ANY WARRANTY; without even the implied warranty of
  15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16 GNU General Public License for more details.
  17
  18 You should have received a copy of the GNU General Public License
  19 along with GNU CC; see the file COPYING.  If not, write to
  20 the Free Software Foundation, 59 Temple Place - Suite 330,
  21 Boston, MA 02111-1307, USA.
  22
  23 Java and all Java-based marks are trademarks or registered trademarks
  24 of Sun Microsystems, Inc. in the United States and other countries.
  25 The Free Software Foundation is independent of Sun Microsystems, Inc.  */
  26
  27 #include "config.h"
  28 #include "system.h"
  29 #include "tree.h"
  30 #include "java-tree.h"
  31 #include "xref.h"
  32 #include "jcf.h"
  33 #include "parse.h"
  34 #include "obstack.h"
  35
  36
  37 static xref_flag_table xref_table [] = {
  38   {NULL, NULL, NULL, NULL},
  39 };
  40
  41 /* Decode an xref flag value. Return 0 if the flag wasn't found. */
  42
  43 int
  44 xref_flag_value (flag)
  45      const char *flag;
  46 {
  47   int i;
  48   for (i = 0; xref_table [i].key; i++)
  49     if (!strcmp (flag, xref_table [i].key))
  50       return i+1;
  51   return 0;
  52 }
  53
  54 void
  55 xref_set_data (flag, data)
  56      int flag;
  57      void *data;
  58 {
  59   xref_table [flag-1].data = data;
  60 }
  61
  62 void *
  63 xref_get_data (flag)
  64      int flag;
  65 {
  66   return xref_table [flag-1].data;
  67 }
  68
  69 void
  70 xref_set_current_fp (fp)
  71      FILE *fp;
  72 {
  73   xref_table [flag_emit_xref-1].fp = fp;
  74 }
  75
  76 /* Branch to the right xref "back-end".  */
  77
  78 void
  79 expand_xref (node)
  80      tree node;
  81 {
  82   /* Maintain these two cached. */
  83   static FILE *fp = NULL;
  84   static void (*current_expand) PARAMS ((FILE *, tree)) = NULL;
  85
  86   if ( !flag_emit_xref )
  87     return;
  88
  89   if (!fp)
  90     fp = xref_table [flag_emit_xref-1].fp;
  91   if (!current_expand)
  92     current_expand = xref_table [flag_emit_xref-1].expand;
  93
  94   (*current_expand) (fp, node);
  95 }
  96
  97 /* Implementation of the xref back-ends. */
  98