The Tor Browser / file comparison
comparison: security/nss/coreconf/mkdepend/cppsetup.c
security/nss/coreconf/mkdepend/cppsetup.c
- branch
- TOR_BUG_9701
- changeset 15
- b8a032363ba2
equal
deleted
inserted
replaced
| -1:000000000000 | 0:06f3f52007e0 |
|---|---|
| 1 /* $Xorg: cppsetup.c,v 1.5 2001/02/09 02:03:16 xorgcvs Exp $ */ | |
| 2 /* | |
| 3 | |
| 4 Copyright (c) 1993, 1994, 1998 The Open Group | |
| 5 | |
| 6 Permission to use, copy, modify, distribute, and sell this software and its | |
| 7 documentation for any purpose is hereby granted without fee, provided that | |
| 8 the above copyright notice appear in all copies and that both that | |
| 9 copyright notice and this permission notice appear in supporting | |
| 10 documentation. | |
| 11 | |
| 12 The above copyright notice and this permission notice shall be included in | |
| 13 all copies or substantial portions of the Software. | |
| 14 | |
| 15 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR | |
| 16 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, | |
| 17 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE | |
| 18 OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN | |
| 19 AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN | |
| 20 CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. | |
| 21 | |
| 22 Except as contained in this notice, the name of The Open Group shall not be | |
| 23 used in advertising or otherwise to promote the sale, use or other dealings | |
| 24 in this Software without prior written authorization from The Open Group. | |
| 25 | |
| 26 */ | |
| 27 /* $XFree86: xc/config/makedepend/cppsetup.c,v 3.11 2001/12/17 20:52:22 dawes Exp $ */ | |
| 28 | |
| 29 #include "def.h" | |
| 30 | |
| 31 #ifdef CPP | |
| 32 /* | |
| 33 * This file is strictly for the sake of cpy.y and yylex.c (if | |
| 34 * you indeed have the source for cpp). | |
| 35 */ | |
| 36 #define IB 1 | |
| 37 #define SB 2 | |
| 38 #define NB 4 | |
| 39 #define CB 8 | |
| 40 #define QB 16 | |
| 41 #define WB 32 | |
| 42 #define SALT '#' | |
| 43 #if defined(pdp11) || defined(vax) || defined(ns16000) || defined(mc68000) || defined(ibm032) | |
| 44 #define COFF 128 | |
| 45 #else | |
| 46 #define COFF 0 | |
| 47 #endif | |
| 48 /* | |
| 49 * These variables used by cpy.y and yylex.c | |
| 50 */ | |
| 51 extern char *outp, *inp, *newp, *pend; | |
| 52 extern char *ptrtab; | |
| 53 extern char fastab[]; | |
| 54 extern char slotab[]; | |
| 55 | |
| 56 /* | |
| 57 * cppsetup | |
| 58 */ | |
| 59 struct filepointer *currentfile; | |
| 60 struct inclist *currentinc; | |
| 61 | |
| 62 int | |
| 63 cppsetup(char *line, struct filepointer *filep, struct inclist *inc) | |
| 64 { | |
| 65 char *p, savec; | |
| 66 static boolean setupdone = FALSE; | |
| 67 boolean value; | |
| 68 | |
| 69 if (!setupdone) { | |
| 70 cpp_varsetup(); | |
| 71 setupdone = TRUE; | |
| 72 } | |
| 73 | |
| 74 currentfile = filep; | |
| 75 currentinc = inc; | |
| 76 inp = newp = line; | |
| 77 for (p=newp; *p; p++) | |
| 78 ; | |
| 79 | |
| 80 /* | |
| 81 * put a newline back on the end, and set up pend, etc. | |
| 82 */ | |
| 83 *p++ = '\n'; | |
| 84 savec = *p; | |
| 85 *p = '\0'; | |
| 86 pend = p; | |
| 87 | |
| 88 ptrtab = slotab+COFF; | |
| 89 *--inp = SALT; | |
| 90 outp=inp; | |
| 91 value = yyparse(); | |
| 92 *p = savec; | |
| 93 return(value); | |
| 94 } | |
| 95 | |
| 96 struct symtab **lookup(symbol) | |
| 97 char *symbol; | |
| 98 { | |
| 99 static struct symtab *undefined; | |
| 100 struct symtab **sp; | |
| 101 | |
| 102 sp = isdefined(symbol, currentinc, NULL); | |
| 103 if (sp == NULL) { | |
| 104 sp = &undefined; | |
| 105 (*sp)->s_value = NULL; | |
| 106 } | |
| 107 return (sp); | |
| 108 } | |
| 109 | |
| 110 pperror(tag, x0,x1,x2,x3,x4) | |
| 111 int tag,x0,x1,x2,x3,x4; | |
| 112 { | |
| 113 warning("\"%s\", line %d: ", currentinc->i_file, currentfile->f_line); | |
| 114 warning(x0,x1,x2,x3,x4); | |
| 115 } | |
| 116 | |
| 117 | |
| 118 yyerror(s) | |
| 119 register char *s; | |
| 120 { | |
| 121 fatalerr("Fatal error: %s\n", s); | |
| 122 } | |
| 123 #else /* not CPP */ | |
| 124 | |
| 125 #include "ifparser.h" | |
| 126 struct _parse_data { | |
| 127 struct filepointer *filep; | |
| 128 struct inclist *inc; | |
| 129 char *filename; | |
| 130 const char *line; | |
| 131 }; | |
| 132 | |
| 133 static const char * | |
| 134 my_if_errors (IfParser *ip, const char *cp, const char *expecting) | |
| 135 { | |
| 136 struct _parse_data *pd = (struct _parse_data *) ip->data; | |
| 137 int lineno = pd->filep->f_line; | |
| 138 char *filename = pd->filename; | |
| 139 char prefix[300]; | |
| 140 int prefixlen; | |
| 141 int i; | |
| 142 | |
| 143 sprintf (prefix, "\"%s\":%d", filename, lineno); | |
| 144 prefixlen = strlen(prefix); | |
| 145 fprintf (stderr, "%s: %s", prefix, pd->line); | |
| 146 i = cp - pd->line; | |
| 147 if (i > 0 && pd->line[i-1] != '\n') { | |
| 148 putc ('\n', stderr); | |
| 149 } | |
| 150 for (i += prefixlen + 3; i > 0; i--) { | |
| 151 putc (' ', stderr); | |
| 152 } | |
| 153 fprintf (stderr, "^--- expecting %s\n", expecting); | |
| 154 return NULL; | |
| 155 } | |
| 156 | |
| 157 | |
| 158 #define MAXNAMELEN 256 | |
| 159 | |
| 160 static struct symtab ** | |
| 161 lookup_variable (IfParser *ip, const char *var, int len) | |
| 162 { | |
| 163 char tmpbuf[MAXNAMELEN + 1]; | |
| 164 struct _parse_data *pd = (struct _parse_data *) ip->data; | |
| 165 | |
| 166 if (len > MAXNAMELEN) | |
| 167 return 0; | |
| 168 | |
| 169 strncpy (tmpbuf, var, len); | |
| 170 tmpbuf[len] = '\0'; | |
| 171 return isdefined (tmpbuf, pd->inc, NULL); | |
| 172 } | |
| 173 | |
| 174 | |
| 175 static int | |
| 176 my_eval_defined (IfParser *ip, const char *var, int len) | |
| 177 { | |
| 178 if (lookup_variable (ip, var, len)) | |
| 179 return 1; | |
| 180 else | |
| 181 return 0; | |
| 182 } | |
| 183 | |
| 184 #define isvarfirstletter(ccc) (isalpha(ccc) || (ccc) == '_') | |
| 185 | |
| 186 static long | |
| 187 my_eval_variable (IfParser *ip, const char *var, int len) | |
| 188 { | |
| 189 long val; | |
| 190 struct symtab **s; | |
| 191 | |
| 192 s = lookup_variable (ip, var, len); | |
| 193 if (!s) | |
| 194 return 0; | |
| 195 do { | |
| 196 var = (*s)->s_value; | |
| 197 if (!isvarfirstletter(*var) || !strcmp((*s)->s_name, var)) | |
| 198 break; | |
| 199 s = lookup_variable (ip, var, strlen(var)); | |
| 200 } while (s); | |
| 201 | |
| 202 var = ParseIfExpression(ip, var, &val); | |
| 203 if (var && *var) debug(4, ("extraneous: '%s'\n", var)); | |
| 204 return val; | |
| 205 } | |
| 206 | |
| 207 int | |
| 208 cppsetup(char *filename, | |
| 209 char *line, | |
| 210 struct filepointer *filep, | |
| 211 struct inclist *inc) | |
| 212 { | |
| 213 IfParser ip; | |
| 214 struct _parse_data pd; | |
| 215 long val = 0; | |
| 216 | |
| 217 pd.filep = filep; | |
| 218 pd.inc = inc; | |
| 219 pd.line = line; | |
| 220 pd.filename = filename; | |
| 221 ip.funcs.handle_error = my_if_errors; | |
| 222 ip.funcs.eval_defined = my_eval_defined; | |
| 223 ip.funcs.eval_variable = my_eval_variable; | |
| 224 ip.data = (char *) &pd; | |
| 225 | |
| 226 (void) ParseIfExpression (&ip, line, &val); | |
| 227 if (val) | |
| 228 return IF; | |
| 229 else | |
| 230 return IFFALSE; | |
| 231 } | |
| 232 #endif /* CPP */ | |
| 233 |
