Revert r354847 for now

It was broken.

PR:		242095
Reported by:	lwhsu
This commit is contained in:
Conrad Meyer 2019-11-20 19:07:22 +00:00
parent 1d91c857d7
commit 0877992e6b
Notes: svn2git 2020-12-20 02:59:44 +00:00
svn path=/head/; revision=354911

View File

@ -45,11 +45,8 @@
* it possible to handle all "dodgy" directives correctly. * it possible to handle all "dodgy" directives correctly.
*/ */
#include <sys/param.h>
#include <sys/stat.h> #include <sys/stat.h>
#include <sys/tree.h>
#include <assert.h>
#include <ctype.h> #include <ctype.h>
#include <err.h> #include <err.h>
#include <stdarg.h> #include <stdarg.h>
@ -152,6 +149,7 @@ static char const * const linestate_name[] = {
*/ */
#define MAXDEPTH 64 /* maximum #if nesting */ #define MAXDEPTH 64 /* maximum #if nesting */
#define MAXLINE 4096 /* maximum length of line */ #define MAXLINE 4096 /* maximum length of line */
#define MAXSYMS 16384 /* maximum number of symbols */
/* /*
* Sometimes when editing a keyword the replacement text is longer, so * Sometimes when editing a keyword the replacement text is longer, so
@ -159,26 +157,6 @@ static char const * const linestate_name[] = {
*/ */
#define EDITSLOP 10 #define EDITSLOP 10
/*
* C17/18 allow 63 characters per macro name, but up to 127 arbitrarily large
* parameters.
*/
struct macro {
RB_ENTRY(macro) entry;
const char *name;
const char *value;
bool ignore; /* -iDsym or -iUsym */
};
static int
macro_cmp(struct macro *a, struct macro *b)
{
return (strcmp(a->name, b->name));
}
static RB_HEAD(macrohd, macro) macro_tree = RB_INITIALIZER(&macro_tree);
RB_GENERATE_STATIC(macrohd, macro, entry, macro_cmp);
/* /*
* Globals. * Globals.
*/ */
@ -196,6 +174,11 @@ static bool symlist; /* -s: output symbol list */
static bool symdepth; /* -S: output symbol depth */ static bool symdepth; /* -S: output symbol depth */
static bool text; /* -t: this is a text file */ static bool text; /* -t: this is a text file */
static const char *symname[MAXSYMS]; /* symbol name */
static const char *value[MAXSYMS]; /* -Dsym=value */
static bool ignore[MAXSYMS]; /* -iDsym or -iUsym */
static int nsyms; /* number of symbols */
static FILE *input; /* input file pointer */ static FILE *input; /* input file pointer */
static const char *filename; /* input file name */ static const char *filename; /* input file name */
static int linenum; /* current line number */ static int linenum; /* current line number */
@ -244,12 +227,12 @@ static char *astrcat(const char *, const char *);
static void cleantemp(void); static void cleantemp(void);
static void closeio(void); static void closeio(void);
static void debug(const char *, ...); static void debug(const char *, ...);
static void debugsym(const char *, const struct macro *); static void debugsym(const char *, int);
static bool defundef(void); static bool defundef(void);
static void defundefile(const char *); static void defundefile(const char *);
static void done(void); static void done(void);
static void error(const char *); static void error(const char *);
static struct macro *findsym(const char **); static int findsym(const char **);
static void flushline(bool); static void flushline(bool);
static void hashline(void); static void hashline(void);
static void help(void); static void help(void);
@ -824,7 +807,7 @@ static Linetype
parseline(void) parseline(void)
{ {
const char *cp; const char *cp;
struct macro *cursym; int cursym;
Linetype retval; Linetype retval;
Comment_state wascomment; Comment_state wascomment;
@ -846,15 +829,15 @@ parseline(void)
if ((cp = matchsym("ifdef", keyword)) != NULL || if ((cp = matchsym("ifdef", keyword)) != NULL ||
(cp = matchsym("ifndef", keyword)) != NULL) { (cp = matchsym("ifndef", keyword)) != NULL) {
cp = skipcomment(cp); cp = skipcomment(cp);
if ((cursym = findsym(&cp)) == NULL) if ((cursym = findsym(&cp)) < 0)
retval = LT_IF; retval = LT_IF;
else { else {
retval = (keyword[2] == 'n') retval = (keyword[2] == 'n')
? LT_FALSE : LT_TRUE; ? LT_FALSE : LT_TRUE;
if (cursym->value == NULL) if (value[cursym] == NULL)
retval = (retval == LT_TRUE) retval = (retval == LT_TRUE)
? LT_FALSE : LT_TRUE; ? LT_FALSE : LT_TRUE;
if (cursym->ignore) if (ignore[cursym])
retval = (retval == LT_TRUE) retval = (retval == LT_TRUE)
? LT_TRUEI : LT_FALSEI; ? LT_TRUEI : LT_FALSEI;
} }
@ -1054,7 +1037,7 @@ eval_unary(const struct ops *ops, long *valp, const char **cpp)
{ {
const char *cp; const char *cp;
char *ep; char *ep;
struct macro *sym; int sym;
bool defparen; bool defparen;
Linetype lt; Linetype lt;
@ -1119,27 +1102,27 @@ eval_unary(const struct ops *ops, long *valp, const char **cpp)
debug("eval%d defined missing ')'", prec(ops)); debug("eval%d defined missing ')'", prec(ops));
return (LT_ERROR); return (LT_ERROR);
} }
if (sym == NULL) { if (sym < 0) {
debug("eval%d defined unknown", prec(ops)); debug("eval%d defined unknown", prec(ops));
lt = LT_IF; lt = LT_IF;
} else { } else {
debug("eval%d defined %s", prec(ops), sym->name); debug("eval%d defined %s", prec(ops), symname[sym]);
*valp = (sym->value != NULL); *valp = (value[sym] != NULL);
lt = *valp ? LT_TRUE : LT_FALSE; lt = *valp ? LT_TRUE : LT_FALSE;
} }
constexpr = false; constexpr = false;
} else if (!endsym(*cp)) { } else if (!endsym(*cp)) {
debug("eval%d symbol", prec(ops)); debug("eval%d symbol", prec(ops));
sym = findsym(&cp); sym = findsym(&cp);
if (sym == NULL) { if (sym < 0) {
lt = LT_IF; lt = LT_IF;
cp = skipargs(cp); cp = skipargs(cp);
} else if (sym->value == NULL) { } else if (value[sym] == NULL) {
*valp = 0; *valp = 0;
lt = LT_FALSE; lt = LT_FALSE;
} else { } else {
*valp = strtol(sym->value, &ep, 0); *valp = strtol(value[sym], &ep, 0);
if (*ep != '\0' || ep == sym->value) if (*ep != '\0' || ep == value[sym])
return (LT_ERROR); return (LT_ERROR);
lt = *valp ? LT_TRUE : LT_FALSE; lt = *valp ? LT_TRUE : LT_FALSE;
cp = skipargs(cp); cp = skipargs(cp);
@ -1456,17 +1439,17 @@ matchsym(const char *s, const char *t)
* Look for the symbol in the symbol table. If it is found, we return * Look for the symbol in the symbol table. If it is found, we return
* the symbol table index, else we return -1. * the symbol table index, else we return -1.
*/ */
static struct macro * static int
findsym(const char **strp) findsym(const char **strp)
{ {
const char *str; const char *str;
struct macro key, *res; int symind;
str = *strp; str = *strp;
*strp = skipsym(str); *strp = skipsym(str);
if (symlist) { if (symlist) {
if (*strp == str) if (*strp == str)
return (NULL); return (-1);
if (symdepth && firstsym) if (symdepth && firstsym)
printf("%s%3d", zerosyms ? "" : "\n", depth); printf("%s%3d", zerosyms ? "" : "\n", depth);
firstsym = zerosyms = false; firstsym = zerosyms = false;
@ -1475,14 +1458,15 @@ findsym(const char **strp)
(int)(*strp-str), str, (int)(*strp-str), str,
symdepth ? "" : "\n"); symdepth ? "" : "\n");
/* we don't care about the value of the symbol */ /* we don't care about the value of the symbol */
return (NULL); return (0);
} }
for (symind = 0; symind < nsyms; ++symind) {
key.name = str; if (matchsym(symname[symind], str) != NULL) {
res = RB_FIND(macrohd, &macro_tree, &key); debugsym("findsym", symind);
if (res != NULL) return (symind);
debugsym("findsym", res); }
return (res); }
return (-1);
} }
/* /*
@ -1492,23 +1476,22 @@ static void
indirectsym(void) indirectsym(void)
{ {
const char *cp; const char *cp;
int changed; int changed, sym, ind;
struct macro *sym, *ind;
do { do {
changed = 0; changed = 0;
RB_FOREACH(sym, macrohd, &macro_tree) { for (sym = 0; sym < nsyms; ++sym) {
if (sym->value == NULL) if (value[sym] == NULL)
continue; continue;
cp = sym->value; cp = value[sym];
ind = findsym(&cp); ind = findsym(&cp);
if (ind == NULL || ind == sym || if (ind == -1 || ind == sym ||
*cp != '\0' || *cp != '\0' ||
ind->value == NULL || value[ind] == NULL ||
ind->value == sym->value) value[ind] == value[sym])
continue; continue;
debugsym("indir...", sym); debugsym("indir...", sym);
sym->value = ind->value; value[sym] = value[ind];
debugsym("...ectsym", sym); debugsym("...ectsym", sym);
changed++; changed++;
} }
@ -1540,29 +1523,29 @@ addsym1(bool ignorethis, bool definethis, char *symval)
* Add a symbol to the symbol table. * Add a symbol to the symbol table.
*/ */
static void static void
addsym2(bool ignorethis, const char *symname, const char *val) addsym2(bool ignorethis, const char *sym, const char *val)
{ {
const char *cp = symname; const char *cp = sym;
struct macro *sym, *r; int symind;
sym = findsym(&cp); symind = findsym(&cp);
if (sym == NULL) { if (symind < 0) {
sym = calloc(1, sizeof(*sym)); if (nsyms >= MAXSYMS)
sym->ignore = ignorethis; errx(2, "too many symbols");
sym->name = symname; symind = nsyms++;
sym->value = val;
r = RB_INSERT(macrohd, &macro_tree, sym);
assert(r == NULL);
} }
debugsym("addsym", sym); ignore[symind] = ignorethis;
symname[symind] = sym;
value[symind] = val;
debugsym("addsym", symind);
} }
static void static void
debugsym(const char *why, const struct macro *sym) debugsym(const char *why, int symind)
{ {
debug("%s %s%c%s", why, sym->name, debug("%s %s%c%s", why, symname[symind],
sym->value ? '=' : ' ', value[symind] ? '=' : ' ',
sym->value ? sym->value : "undef"); value[symind] ? value[symind] : "undef");
} }
/* /*