src/globals.c

   1 /*
   2 ** Splint - annotation-assisted static program checker
   3 ** Copyright (C) 1994-2003 University of Virginia,
   4 **         Massachusetts Institute of Technology
   5 **
   6 ** This program is free software; you can redistribute it and/or modify it
   7 ** under the terms of the GNU General Public License as published by the
   8 ** Free Software Foundation; either version 2 of the License, or (at your
   9 ** option) any later version.
  10 **
  11 ** This program is distributed in the hope that it will be useful, but
  12 ** WITHOUT ANY WARRANTY; without even the implied warranty of
  13 ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14 ** General Public License for more details.
  15 **
  16 ** The GNU General Public License is available from http://www.gnu.org/ or
  17 ** the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  18 ** MA 02111-1307, USA.
  19 **
  20 ** For information on splint: info@splint.org
  21 ** To report a bug: splint-bug@splint.org
  22 ** For more information: http://www.splint.org
  23 */
  24 /*
  25 ** globals.c
  26 */
  27
  28 # include "splintMacros.nf"
  29 # include "basic.h"
  30
  31 fileloc g_currentloc;
  32
  33 symtable g_symtab;
  34 /*@only@*/ lsymbolSet g_currentImports = lsymbolSet_undefined;
  35
  36 cstring g_codeFile = cstring_undefined;
  37 int g_codeLine = 0;
  38
  39 cstring g_prevCodeFile = cstring_undefined;
  40 int g_prevCodeLine = 0;
  41
  42 /*
  43 ** These are initialized in llmain.c.
  44 */
  45
  46 FILE *g_warningstream = NULL;
  47 FILE *g_messagestream = NULL;
  48 FILE *g_errorstream = NULL;
  49 FILE *g_csvstream = NULL;
  50
  51 /*
  52 ** These were in llmain.c.  Most should not be globals...
  53 */
  54
  55 /*@observer@*/ char *g_localSpecPath = ".";
  56
  57 /*@only@*/ cstring g_currentSpec;
  58 /*@only@*/ char *g_currentSpecName;
  59
  60 void printCodePoint (void)
  61 {
  62   static bool incode = FALSE;
  63
  64   if (incode) {
  65     fprintf (stderr, "[[[ in code! ]]]\n");
  66   }
  67
  68   incode = TRUE;
  69
  70   if (cstring_isDefined (g_codeFile))
  71     {
  72       cstring temps = fileloc_unparseRaw (g_codeFile, g_codeLine);
  73
  74       fprintf (stderr, "*** Last code point: %s\n",
  75                cstring_toCharsSafe (temps));
  76
  77       cstring_free (temps);
  78
  79       if (cstring_isDefined (g_prevCodeFile))
  80         {
  81           temps = fileloc_unparseRaw (g_prevCodeFile, g_prevCodeLine);
  82           fprintf (stderr, "*** Previous code point: %s\n",
  83                    cstring_toCharsSafe (temps));
  84
  85           cstring_free (temps);
  86         }
  87     }
  88
  89   incode = FALSE;
  90 }
  91