1 #define INS 32768 /* input buffer */
2 #define OBS 4096 /* outbut buffer */
3 #define NARG 64 /* 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 */
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 };
22 enum kwtype { KIF, KIFDEF, KIFNDEF, KELIF, KELSE, KENDIF, KINCLUDE, KDEFINE,
23 KUNDEF, KLINE, KERROR, KWARNING, KPRAGMA, KDEFINED,
24 KLINENO, KFILE, KDATE, KTIME, KSTDC, KEVAL };
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 #define ISVARMAC 020 /* variadic macro */
32 #define EOFC 0xFD /* sentinel for end of input file */
33 #define XPWS 1 /* token flag: white space to assure token sep. */
35 enum { Notinmacro, Inmacro };
37 typedef struct token {
40 unsigned short hideset;
46 typedef struct tokenrow {
47 Token *tp; /* current one to scan */
48 Token *bp; /* base (allocated value) */
49 Token *lp; /* last+1 token used */
50 int max; /* number allocated */
53 typedef struct source {
54 char *filename; /* name of file of the source */
55 int line; /* current line number */
56 int lineinc; /* adjustment for \\n lines */
57 uchar *inb; /* input buffer */
58 uchar *inp; /* input pointer */
59 uchar *inl; /* end of input */
60 int fd; /* input source */
61 int ifdepth; /* conditional nesting in include */
62 struct source *next; /* stack for #include */
65 typedef struct nlist {
69 Tokenrow *vp; /* value as macro */
70 Tokenrow *ap; /* list of argument names, if any */
71 char val; /* value as preprocessor name */
72 char flag; /* is defined, is pp name */
75 typedef struct includelist {
81 #define new(t) (t *)domalloc(sizeof(t))
82 #define quicklook(a,b) (namebit[(a)&077] & (1<<((b)&037)))
83 #define quickset(a,b) namebit[(a)&077] |= (1<<((b)&037))
84 extern unsigned long namebit[077+1];
86 enum errtype { WARNING, ERROR, FATAL };
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);
100 void error(enum errtype, char *, ...);
102 int trigraph(Source *);
103 int foldline(Source *);
104 Nlist *lookup(Token *, int);
105 void control(Tokenrow *);
106 void dodefine(Tokenrow *);
107 void doadefine(Tokenrow *, int);
108 void doinclude(Tokenrow *);
109 void doif(Tokenrow *, enum kwtype);
110 void expand(Tokenrow *, Nlist *, int);
111 void builtin(Tokenrow *, int);
112 int gatherargs(Tokenrow *, Tokenrow **, int, int *);
113 void substargs(Nlist *, Tokenrow *, Tokenrow **);
114 void expandrow(Tokenrow *, char *, int);
115 void maketokenrow(int, Tokenrow *);
116 Tokenrow *copytokenrow(Tokenrow *, Tokenrow *);
117 Token *growtokenrow(Tokenrow *);
118 Tokenrow *normtokenrow(Tokenrow *);
119 void adjustrow(Tokenrow *, int);
120 void movetokenrow(Tokenrow *, Tokenrow *);
121 void insertrow(Tokenrow *, int, Tokenrow *);
122 void peektokens(Tokenrow *, char *);
123 void doconcat(Tokenrow *);
124 Tokenrow *stringify(Tokenrow *);
125 int lookuparg(Nlist *, Token *);
126 long eval(Tokenrow *, int);
128 void setempty(Tokenrow *);
129 void makespace(Tokenrow *);
130 char *outnum(char *, int);
132 uchar *newstring(uchar *, int, int);
133 int checkhideset(int, Nlist *);
135 int newhideset(int, Nlist *);
136 int unionhideset(int, int);
138 void setobjname(char *);
139 void clearwstab(void);
140 #define rowlen(tokrow) ((tokrow)->lp - (tokrow)->bp)
143 extern Token nltoken;
144 extern Source *cursource;
145 extern char *curtime;
148 extern int ifsatisfied[NIF];
150 extern int nolineinfo;
153 extern int Cplusplus;
154 extern Nlist *kwdefined;
155 extern Includelist includelist[NINCLUDE];