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