Annotation of src/usr.bin/m4/mdef.h, Revision 1.26
1.26 ! espie 1: /* $OpenBSD: mdef.h,v 1.25 2003/06/30 21:42:50 espie Exp $ */
1.2 deraadt 2: /* $NetBSD: mdef.h,v 1.7 1996/01/13 23:25:27 pk Exp $ */
1.1 deraadt 3:
4: /*
5: * Copyright (c) 1989, 1993
6: * The Regents of the University of California. All rights reserved.
7: *
8: * This code is derived from software contributed to Berkeley by
9: * Ozan Yigit at York University.
10: *
11: * Redistribution and use in source and binary forms, with or without
12: * modification, are permitted provided that the following conditions
13: * are met:
14: * 1. Redistributions of source code must retain the above copyright
15: * notice, this list of conditions and the following disclaimer.
16: * 2. Redistributions in binary form must reproduce the above copyright
17: * notice, this list of conditions and the following disclaimer in the
18: * documentation and/or other materials provided with the distribution.
1.23 millert 19: * 3. Neither the name of the University nor the names of its contributors
1.1 deraadt 20: * may be used to endorse or promote products derived from this software
21: * without specific prior written permission.
22: *
23: * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24: * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25: * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26: * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27: * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28: * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29: * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30: * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31: * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32: * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33: * SUCH DAMAGE.
34: *
35: * @(#)mdef.h 8.1 (Berkeley) 6/6/93
36: */
1.24 espie 37:
38: #ifdef __GNUC__
39: # define UNUSED __attribute__((__unused__))
40: #else
41: # define UNUSED
42: #endif
1.1 deraadt 43:
44: #define MACRTYPE 1
45: #define DEFITYPE 2
46: #define EXPRTYPE 3
47: #define SUBSTYPE 4
48: #define IFELTYPE 5
49: #define LENGTYPE 6
50: #define CHNQTYPE 7
51: #define SYSCTYPE 8
52: #define UNDFTYPE 9
53: #define INCLTYPE 10
54: #define SINCTYPE 11
55: #define PASTTYPE 12
56: #define SPASTYPE 13
57: #define INCRTYPE 14
58: #define IFDFTYPE 15
59: #define PUSDTYPE 16
60: #define POPDTYPE 17
61: #define SHIFTYPE 18
62: #define DECRTYPE 19
63: #define DIVRTYPE 20
64: #define UNDVTYPE 21
65: #define DIVNTYPE 22
66: #define MKTMTYPE 23
67: #define ERRPTYPE 24
68: #define M4WRTYPE 25
69: #define TRNLTYPE 26
70: #define DNLNTYPE 27
71: #define DUMPTYPE 28
72: #define CHNCTYPE 29
73: #define INDXTYPE 30
74: #define SYSVTYPE 31
75: #define EXITTYPE 32
76: #define DEFNTYPE 33
1.10 espie 77: #define SELFTYPE 34
1.14 espie 78: #define INDIRTYPE 35
79: #define BUILTINTYPE 36
80: #define PATSTYPE 37
81: #define FILENAMETYPE 38
82: #define LINETYPE 39
83: #define REGEXPTYPE 40
1.17 espie 84: #define ESYSCMDTYPE 41
1.21 espie 85: #define TRACEONTYPE 42
86: #define TRACEOFFTYPE 43
87:
1.25 espie 88: #define BUILTIN_MARKER "__builtin_"
1.1 deraadt 89:
1.9 espie 90: #define TYPEMASK 63 /* Keep bits really corresponding to a type. */
91: #define RECDEF 256 /* Pure recursive def, don't expand it */
1.11 espie 92: #define NOARGS 512 /* builtin needs no args */
93: #define NEEDARGS 1024 /* mark builtin that need args with this */
1.1 deraadt 94:
95: /*
96: * m4 special characters
97: */
98:
99: #define ARGFLAG '$'
100: #define LPAREN '('
101: #define RPAREN ')'
102: #define LQUOTE '`'
103: #define RQUOTE '\''
104: #define COMMA ','
105: #define SCOMMT '#'
106: #define ECOMMT '\n'
107:
108: #ifdef msdos
109: #define system(str) (-1)
110: #endif
111:
112: /*
113: * other important constants
114: */
115:
1.5 espie 116: #define EOS '\0'
1.6 espie 117: #define MAXINP 10 /* maximum include files */
118: #define MAXOUT 10 /* maximum # of diversions */
119: #define BUFSIZE 4096 /* starting size of pushback buffer */
1.15 espie 120: #define INITSTACKMAX 4096 /* starting size of call stack */
1.16 espie 121: #define STRSPMAX 4096 /* starting size of string space */
1.18 espie 122: #define MAXTOK 512 /* maximum chars in a tokn */
1.6 espie 123: #define HASHSIZE 199 /* maximum size of hashtab */
124: #define MAXCCHARS 5 /* max size of comment/quote delim */
1.1 deraadt 125:
126: #define ALL 1
127: #define TOP 0
128:
129: #define TRUE 1
130: #define FALSE 0
131: #define cycle for(;;)
132:
133: /*
134: * m4 data structures
135: */
136:
137: typedef struct ndblock *ndptr;
138:
1.25 espie 139: struct macro_definition {
1.9 espie 140: char *defn; /* definition.. */
141: unsigned int type; /* type of the entry.. */
1.1 deraadt 142: };
1.25 espie 143:
1.1 deraadt 144: struct keyblk {
145: char *knam; /* keyword name */
146: int ktyp; /* keyword type */
147: };
148:
149: typedef union { /* stack structure */
150: int sfra; /* frame entry */
151: char *sstr; /* string entry */
152: } stae;
153:
1.12 espie 154: struct input_file {
155: FILE *file;
156: char *name;
157: unsigned long lineno;
1.22 espie 158: unsigned long synch_lineno; /* used for -s */
1.12 espie 159: int c;
160: };
161:
162: #define CURRENT_NAME (infile[ilevel].name)
163: #define CURRENT_LINE (infile[ilevel].lineno)
1.1 deraadt 164: /*
165: * macros for readibility and/or speed
166: *
167: * gpbc() - get a possibly pushed-back character
168: * pushf() - push a call frame entry onto stack
169: * pushs() - push a string pointer onto stack
170: */
1.12 espie 171: #define gpbc() (bp > bufbase) ? *--bp : obtain_char(infile+ilevel)
1.15 espie 172: #define pushf(x) \
173: do { \
174: if (++sp == STACKMAX) \
175: enlarge_stack();\
176: mstack[sp].sfra = (x); \
177: sstack[sp] = 0; \
1.20 espie 178: } while (0)
1.15 espie 179:
180: #define pushs(x) \
181: do { \
182: if (++sp == STACKMAX) \
183: enlarge_stack();\
184: mstack[sp].sstr = (x); \
185: sstack[sp] = 1; \
1.20 espie 186: } while (0)
1.15 espie 187:
188: #define pushs1(x) \
189: do { \
190: if (++sp == STACKMAX) \
191: enlarge_stack();\
192: mstack[sp].sstr = (x); \
193: sstack[sp] = 0; \
1.20 espie 194: } while (0)
1.1 deraadt 195:
196: /*
197: * . .
198: * | . | <-- sp | . |
199: * +-------+ +-----+
200: * | arg 3 ----------------------->| str |
201: * +-------+ | . |
202: * | arg 2 ---PREVEP-----+ .
203: * +-------+ |
204: * . | | |
205: * +-------+ | +-----+
206: * | plev | PARLEV +-------->| str |
207: * +-------+ | . |
208: * | type | CALTYP .
209: * +-------+
210: * | prcf ---PREVFP--+
211: * +-------+ |
212: * | . | PREVSP |
213: * . |
214: * +-------+ |
215: * | <----------+
216: * +-------+
217: *
218: */
219: #define PARLEV (mstack[fp].sfra)
1.26 ! espie 220: #define CALTYP (mstack[fp-2].sfra)
! 221: #define TRACESTATUS (mstack[fp-1].sfra)
1.15 espie 222: #define PREVEP (mstack[fp+3].sstr)
1.26 ! espie 223: #define PREVSP (fp-4)
! 224: #define PREVFP (mstack[fp-3].sfra)