src/Headers/fileTable.h

   1 /*
   2 ** Copyright (C) University of Virginia, Massachusetts Institue of Technology 1994-2001.
   3 ** See ../LICENSE for license information.
   4 **
   5 */
   6 /*
   7 ** fileTable.h
   8 */
   9
  10 # ifndef FILETABLE_H
  11 # define FILETABLE_H
  12
  13 /*@constant int FTBASESIZE; @*/
  14 # define FTBASESIZE 64
  15
  16 /* moved to fileloc.h
  17 **    typedef int fileId;
  18 */
  19
  20 typedef enum { FILE_NORMAL, FILE_LSLTEMP, FILE_NODELETE,
  21                FILE_HEADER, FILE_XH, FILE_MACROS, FILE_METASTATE } fileType;
  22
  23 /*@private@*/ typedef struct
  24 {
  25   bool     ftemp     BOOLBITS;
  26   bool     fsystem   BOOLBITS;
  27   bool     fspecial  BOOLBITS;
  28   cstring  fname;
  29   cstring  basename;
  30   fileType ftype;
  31   fileId   fder;
  32 } *ftentry;
  33
  34 typedef /*@only@*/ ftentry o_ftentry;
  35
  36 typedef /*@only@*/ struct {
  37   /*@dependent@*/ /*@exposed@*/ FILE *f;
  38   /*@only@*/ cstring fname;
  39 } *foentry;
  40
  41 abst_typedef /*@null@*/ struct
  42 {
  43   int nentries;
  44   int nspace;
  45   cstringTable htable;
  46   /*@reldef@*/ /*@only@*/ o_ftentry *elements;
  47
  48   /*
  49   ** Keep track of all the open files, so we can close them on error exits.
  50   */
  51
  52   int nopen;
  53   int nopenspace;
  54   /*@reldef@*/ /*@only@*/ foentry *openelements;
  55 } *fileTable ;
  56
  57 /*@constant null fileTable fileTable_undefined; @*/
  58 # define fileTable_undefined ((fileTable) NULL)
  59
  60 extern /*@unused@*/ /*@nullwhentrue@*/ bool
  61   fileTable_isUndefined (/*@null@*/ fileTable p_f) /*@*/ ;
  62 extern /*@unused@*/ /*@falsewhennull@*/ bool
  63   fileTable_isDefined (/*@null@*/ fileTable p_f) /*@*/ ;
  64
  65 # define fileTable_isUndefined(ft) ((ft) == fileTable_undefined)
  66 # define fileTable_isDefined(ft) ((ft) != fileTable_undefined)
  67 extern /*@observer@*/ cstring fileTable_getName (fileTable p_ft, fileId p_fid) /*@*/ ;
  68 extern /*@observer@*/ cstring fileTable_getNameBase (fileTable p_ft, fileId p_fid) ;
  69 extern fileId fileTable_addFile (fileTable p_ft, cstring p_name)
  70    /*@modifies p_ft@*/ ;
  71 extern fileId fileTable_addHeaderFile (fileTable p_ft, cstring p_name)
  72    /*@modifies p_ft@*/ ;
  73 extern fileId fileTable_addXHFile (fileTable p_ft, cstring p_name)
  74    /*@modifies p_ft@*/ ;
  75 extern fileId fileTable_addLibraryFile (fileTable p_ft, cstring p_name)
  76    /*@modifies p_ft@*/ ;
  77
  78 # ifndef NOLCL
  79 extern fileId fileTable_addLCLFile (fileTable p_ft, cstring p_name)
  80    /*@modifies p_ft@*/ ;
  81
  82 extern fileId fileTable_addltemp (fileTable p_ft);
  83
  84 # endif
  85
  86 extern /*@notnull@*/ /*@only@*/ fileTable fileTable_create (void) /*@*/ ;
  87 extern fileId fileTable_lookup (fileTable p_ft, cstring p_s) /*@*/ ;
  88 extern fileId fileTable_addCTempFile (fileTable p_ft, fileId p_fid)
  89    /*@modifies p_ft@*/ ;
  90 extern fileId fileTable_addFileOnly (fileTable p_ft, /*@only@*/ cstring p_name)
  91    /*@modifies p_ft@*/ ;
  92
  93 # ifndef NOLCL
  94 extern fileId fileTable_addImportFile (fileTable p_ft, cstring p_name)
  95    /*@modifies p_ft@*/ ;
  96 # endif
  97
  98 extern fileId fileTable_addMacrosFile (fileTable p_ft)
  99    /*@modifies p_ft@*/ ;
 100
 101 extern fileId fileTable_addMetastateFile (fileTable p_ft, cstring p_name)
 102    /*@modifies p_ft@*/ ;
 103
 104 extern void fileTable_setFilePath (fileTable p_ft, fileId p_fid, cstring p_path)
 105      /*@modifies p_ft@*/ ;
 106
 107 extern /*@observer@*/ cstring fileTable_getRootName (fileTable p_ft, fileId p_fid) /*@*/ ;
 108 extern bool fileTable_isHeader       (fileTable p_ft, fileId p_fid) /*@*/ ;
 109 extern bool fileId_isHeader (fileId p_f) /*@*/ ;
 110 # define fileId_isHeader(f)          (fileTable_isHeader (context_fileTable(), f))
 111
 112 extern bool fileTable_sameBase (fileTable p_ft, fileId p_f1, fileId p_f2);
 113 extern void fileTable_cleanup (fileTable p_ft) /*@modifies fileSystem@*/;
 114 extern fileId fileTable_lookupBase (fileTable p_ft, cstring p_base) /*@modifies p_ft@*/ ;
 115 extern void fileTable_printTemps (fileTable p_ft) /*@modifies g_msgstream@*/ ;
 116 extern /*@unused@*/ /*@only@*/ cstring fileTable_unparse (fileTable p_ft) /*@*/ ;
 117 extern bool fileTable_exists (fileTable p_ft, cstring p_s) /*@*/ ;
 118 extern void fileTable_free (/*@only@*/ fileTable p_f);
 119 extern bool fileTable_isSpecialFile (fileTable p_ft, fileId p_fid) /*@*/ ;
 120 extern bool fileTable_isSystemFile (fileTable p_ft, fileId p_fid) /*@*/ ;
 121 extern bool fileTable_isXHFile (fileTable p_ft, fileId p_fid) /*@*/ ;
 122
 123 extern /*@observer@*/ cstring fileTable_fileName (fileId p_fid) /*@*/ ;
 124 extern /*@observer@*/ cstring fileTable_fileNameBase (fileId p_fid) /*@*/ ;
 125 extern /*@observer@*/ cstring fileTable_rootFileName (fileId p_fid) /*@*/ ;
 126
 127 # define fileTable_fileName(fid)     (fileTable_getName(context_fileTable(), fid))
 128 # define fileTable_fileNameBase(fid) (fileTable_getNameBase(context_fileTable(), fid))
 129 # define fileTable_rootFileName(fid) (fileTable_getRootName(context_fileTable(), fid))
 130
 131 extern void fileTable_noDelete (fileTable, cstring);
 132 extern bool fileId_baseEqual (/*@sef@*/ fileId p_t1, /*@sef@*/ fileId p_t2) /*@*/ ;
 133 # define fileId_baseEqual(t1,t2) \
 134   (fileId_equal (t1, t2) || fileTable_sameBase (context_fileTable (), t1, t2))
 135
 136
 137 extern /*@null@*/ /*@open@*/ /*@dependent@*/ FILE *
 138 fileTable_openFile (fileTable p_ft, cstring p_fname, /*@observer@*/ char *p_mode)
 139      /*@modifies p_ft@*/ ;
 140
 141 extern bool fileTable_closeFile (fileTable p_ft, FILE *p_f)
 142    /*@ensures closed p_f@*/
 143    /*@modifies p_ft, p_f@*/ ;
 144
 145 extern void fileTable_closeAll (fileTable p_ft)
 146   /*@modifies p_ft@*/ ;
 147
 148 # else
 149 # error "Multiple include"
 150 #endif
 151