# include "sendmail.h"

static char SccsId[] = "@(#)stab.c	3.2	08/08/81";

/*
**  STAB -- manage the symbol table
**
**	Parameters:
**		name -- the name to be looked up or inserted.
**		op -- what to do:
**			ST_ENTER -- enter the name if not
**				already present.
**			ST_FIND -- find it only.
**
**	Returns:
**		pointer to a STAB entry for this name.
**		NULL if not found and not entered.
**
**	Side Effects:
**		can update the symbol table.
**
**	Notes:
**		Obviously, this deserves a better algorithm.  But
**		for the moment......
*/

static STAB	*SymTab;

STAB *
stab(name, op)
	char *name;
	int op;
{
	register STAB *s = SymTab;
	register STAB **ps = &SymTab;
	extern char *newstr();
	extern bool sameword();

	while (s != NULL && sameword(name, s->s_name))
	{
		ps = &s->s_next;
		s = s->s_next;
	}
	if (s != NULL || op == ST_FIND)
		return (s);

	/* make new entry */
	s = (STAB *) xalloc(sizeof *s);
	s->s_name = newstr(name);
	makelower(s->s_name);
	s->s_type = 0;
	s->s_class = 0;
	s->s_next = NULL;

	/* and link it in */
	*ps = s;

	return (s);
}