1 #define INS 32768 /* input buffer */ 2 #define OBS 4096 /* outbut buffer */ 3 #define NARG 32 /* Max number arguments to a macro */ 4 #define NINCLUDE 64 /* Max number of include directories (-I) */ 5 #define NIF 32 /* depth of nesting of #if */ 6 #ifndef EOF 7 #define EOF (-1) 8 #endif 9 #ifndef NULL 10 #define NULL 0 11 #endif 12 13 enum toktype { END, UNCLASS, NAME, NUMBER, STRING, CCON, NL, WS, DSHARP, 14 EQ, NEQ, LEQ, GEQ, LSH, RSH, LAND, LOR, PPLUS, MMINUS, 15 ARROW, SBRA, SKET, LP, RP, DOT, AND, STAR, PLUS, MINUS, 16 TILDE, NOT, SLASH, PCT, LT, GT, CIRC, OR, QUEST, 17 COLON, ASGN, COMMA, SHARP, SEMIC, CBRA, CKET, 18 ASPLUS, ASMINUS, ASSTAR, ASSLASH, ASPCT, ASCIRC, ASLSH, 19 ASRSH, ASOR, ASAND, ELLIPS, 20 DSHARP1, NAME1, DEFINED, UMINUS }; 21 22 enum kwtype { KIF, KIFDEF, KIFNDEF, KELIF, KELSE, KENDIF, KINCLUDE, KDEFINE, 23 KUNDEF, KLINE, KERROR, KPRAGMA, KDEFINED, 24 KLINENO, KFILE, KDATE, KTIME, KSTDC, KEVAL }; 25 26 #define ISDEFINED 01 /* has #defined value */ 27 #define ISKW 02 /* is PP keyword */ 28 #define ISUNCHANGE 04 /* can't be #defined in PP */ 29 #define ISMAC 010 /* builtin macro, e.g. __LINE__ */ 30 31 #define EOB 0xFE /* sentinel for end of input buffer */ 32 #define EOFC 0xFD /* sentinel for end of input file */ 33 #define XPWS 1 /* token flag: white space to assure token sep. */ 34 35 typedef struct token { 36 unsigned char type; 37 unsigned char flag; 38 unsigned short hideset; 39 unsigned int wslen; 40 unsigned int len; 41 uchar *t; 42 } Token; 43 44 typedef struct tokenrow { 45 Token *tp; /* current one to scan */ 46 Token *bp; /* base (allocated value) */ 47 Token *lp; /* last+1 token used */ 48 int max; /* number allocated */ 49 } Tokenrow; 50 51 typedef struct source { 52 char *filename; /* name of file of the source */ 53 int line; /* current line number */ 54 int lineinc; /* adjustment for \\n lines */ 55 uchar *inb; /* input buffer */ 56 uchar *inp; /* input pointer */ 57 uchar *inl; /* end of input */ 58 int ins; /* input buffer size */ 59 int fd; /* input source */ 60 int ifdepth; /* conditional nesting in include */ 61 struct source *next; /* stack for #include */ 62 } Source; 63 64 typedef struct nlist { 65 struct nlist *next; 66 uchar *name; 67 int len; 68 Tokenrow *vp; /* value as macro */ 69 Tokenrow *ap; /* list of argument names, if any */ 70 char val; /* value as preprocessor name */ 71 char flag; /* is defined, is pp name */ 72 } Nlist; 73 74 typedef struct includelist { 75 char deleted; 76 char always; 77 char *file; 78 } Includelist; 79 80 #define new(t) (t *)domalloc(sizeof(t)) 81 #define quicklook(a,b) (namebit[(a)&077] & (1<<((b)&037))) 82 #define quickset(a,b) namebit[(a)&077] |= (1<<((b)&037)) 83 extern unsigned long namebit[077+1]; 84 85 enum errtype { WARNING, ERROR, FATAL }; 86 87 void expandlex(void); 88 void fixlex(void); 89 void setup(int, char **); 90 #define gettokens cpp_gettokens 91 int gettokens(Tokenrow *, int); 92 int comparetokens(Tokenrow *, Tokenrow *); 93 Source *setsource(char *, int, char *); 94 void unsetsource(void); 95 void puttokens(Tokenrow *); 96 void process(Tokenrow *); 97 void *dorealloc(void *, int); 98 void *domalloc(int); 99 void dofree(void *); 100 void error(enum errtype, char *, ...); 101 void flushout(void); 102 int fillbuf(Source *); 103 int trigraph(Source *); 104 int foldline(Source *); 105 Nlist *lookup(Token *, int); 106 void control(Tokenrow *); 107 void dodefine(Tokenrow *); 108 void doadefine(Tokenrow *, int); 109 void doinclude(Tokenrow *); 110 void doif(Tokenrow *, enum kwtype); 111 void expand(Tokenrow *, Nlist *); 112 void builtin(Tokenrow *, int); 113 int gatherargs(Tokenrow *, Tokenrow **, int *); 114 void substargs(Nlist *, Tokenrow *, Tokenrow **); 115 void expandrow(Tokenrow *, char *); 116 void maketokenrow(int, Tokenrow *); 117 Tokenrow *copytokenrow(Tokenrow *, Tokenrow *); 118 Token *growtokenrow(Tokenrow *); 119 Tokenrow *normtokenrow(Tokenrow *); 120 void adjustrow(Tokenrow *, int); 121 void movetokenrow(Tokenrow *, Tokenrow *); 122 void insertrow(Tokenrow *, int, Tokenrow *); 123 void peektokens(Tokenrow *, char *); 124 void doconcat(Tokenrow *); 125 Tokenrow *stringify(Tokenrow *); 126 int lookuparg(Nlist *, Token *); 127 long eval(Tokenrow *, int); 128 void genline(void); 129 void setempty(Tokenrow *); 130 void makespace(Tokenrow *); 131 char *outnum(char *, int); 132 int digit(int); 133 uchar *newstring(uchar *, int, int); 134 int checkhideset(int, Nlist *); 135 void prhideset(int); 136 int newhideset(int, Nlist *); 137 int unionhideset(int, int); 138 void iniths(void); 139 void setobjname(char *); 140 void clearwstab(void); 141 #define rowlen(tokrow) ((tokrow)->lp - (tokrow)->bp) 142 143 extern char *outp; 144 extern Token nltoken; 145 extern Source *cursource; 146 extern char *curtime; 147 extern int incdepth; 148 extern int ifdepth; 149 extern int ifsatisfied[NIF]; 150 extern int Mflag; 151 extern int nolineinfo; 152 extern int skipping; 153 extern int verbose; 154 extern int Cplusplus; 155 extern Nlist *kwdefined; 156 extern Includelist includelist[NINCLUDE]; 157 extern char wd[]; 158