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 };
90 void setup(int, char **);
91 #define gettokens cpp_gettokens
92 int gettokens(Tokenrow *, int);
93 int comparetokens(Tokenrow *, Tokenrow *);
94 Source *setsource(char *, int, char *);
95 void unsetsource(void);
96 void puttokens(Tokenrow *);
97 void process(Tokenrow *);
98 void *dorealloc(void *, int);
101 void error(enum errtype, char *, ...);
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 *, int);
112 void builtin(Tokenrow *, int);
113 int gatherargs(Tokenrow *, Tokenrow **, int, int *);
114 void substargs(Nlist *, Tokenrow *, Tokenrow **);
115 void expandrow(Tokenrow *, char *, int);
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);
129 void setempty(Tokenrow *);
130 void makespace(Tokenrow *);
131 char *outnum(char *, int);
133 uchar *newstring(uchar *, int, int);
134 int checkhideset(int, Nlist *);
136 int newhideset(int, Nlist *);
137 int unionhideset(int, int);
139 void setobjname(char *);
140 void clearwstab(void);
141 #define rowlen(tokrow) ((tokrow)->lp - (tokrow)->bp)
144 extern Token nltoken;
145 extern Source *cursource;
146 extern char *curtime;
149 extern int ifsatisfied[NIF];
151 extern int nolineinfo;
154 extern int Cplusplus;
155 extern Nlist *kwdefined;
156 extern Includelist includelist[NINCLUDE];