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