contrib/one-true-awk/proto.h

2a55deb1SDavid E. O'Brien/****************************************************************
2a55deb1SDavid E. O'BrienCopyright (C) Lucent Technologies 1997
2a55deb1SDavid E. O'BrienAll Rights Reserved
2a55deb1SDavid E. O'Brien
2a55deb1SDavid E. O'BrienPermission to use, copy, modify, and distribute this software and
2a55deb1SDavid E. O'Brienits documentation for any purpose and without fee is hereby
2a55deb1SDavid E. O'Briengranted, provided that the above copyright notice appear in all
2a55deb1SDavid E. O'Briencopies and that both that the copyright notice and this
2a55deb1SDavid E. O'Brienpermission notice and warranty disclaimer appear in supporting
2a55deb1SDavid E. O'Briendocumentation, and that the name Lucent Technologies or any of
2a55deb1SDavid E. O'Brienits entities not be used in advertising or publicity pertaining
2a55deb1SDavid E. O'Briento distribution of the software without specific, written prior
2a55deb1SDavid E. O'Brienpermission.
2a55deb1SDavid E. O'Brien
2a55deb1SDavid E. O'BrienLUCENT DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
2a55deb1SDavid E. O'BrienINCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS.
2a55deb1SDavid E. O'BrienIN NO EVENT SHALL LUCENT OR ANY OF ITS ENTITIES BE LIABLE FOR ANY
2a55deb1SDavid E. O'BrienSPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
2a55deb1SDavid E. O'BrienWHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER
2a55deb1SDavid E. O'BrienIN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
2a55deb1SDavid E. O'BrienARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF
2a55deb1SDavid E. O'BrienTHIS SOFTWARE.
2a55deb1SDavid E. O'Brien****************************************************************/
2a55deb1SDavid E. O'Brien
2a55deb1SDavid E. O'Brienextern	int	yywrap(void);
2a55deb1SDavid E. O'Brienextern	void	setfname(Cell *);
2a55deb1SDavid E. O'Brienextern	int	constnode(Node *);
2a55deb1SDavid E. O'Brienextern	char	*strnode(Node *);
2a55deb1SDavid E. O'Brienextern	Node	*notnull(Node *);
2a55deb1SDavid E. O'Brienextern	int	yyparse(void);
2a55deb1SDavid E. O'Brien
2a55deb1SDavid E. O'Brienextern	int	yylex(void);
2a55deb1SDavid E. O'Brienextern	void	startreg(void);
2a55deb1SDavid E. O'Brienextern	int	input(void);
2a55deb1SDavid E. O'Brienextern	void	unput(int);
2a55deb1SDavid E. O'Brienextern	void	unputstr(char *);
2a55deb1SDavid E. O'Brienextern	int	yylook(void);
2a55deb1SDavid E. O'Brienextern	int	yyback(int *, int);
2a55deb1SDavid E. O'Brienextern	int	yyinput(void);
2a55deb1SDavid E. O'Brien
2a55deb1SDavid E. O'Brienextern	fa	*makedfa(char *, int);
2a55deb1SDavid E. O'Brienextern	fa	*mkdfa(char *, int);
2a55deb1SDavid E. O'Brienextern	int	makeinit(fa *, int);
2a55deb1SDavid E. O'Brienextern	void	penter(Node *);
2a55deb1SDavid E. O'Brienextern	void	freetr(Node *);
2a55deb1SDavid E. O'Brienextern	int	hexstr(char **);
2a55deb1SDavid E. O'Brienextern	int	quoted(char **);
2a55deb1SDavid E. O'Brienextern	char	*cclenter(char *);
2a55deb1SDavid E. O'Brienextern	void	overflo(char *);
2a55deb1SDavid E. O'Brienextern	void	cfoll(fa *, Node *);
2a55deb1SDavid E. O'Brienextern	int	first(Node *);
2a55deb1SDavid E. O'Brienextern	void	follow(Node *);
2a55deb1SDavid E. O'Brienextern	int	member(int, char *);
2a55deb1SDavid E. O'Brienextern	int	match(fa *, char *);
2a55deb1SDavid E. O'Brienextern	int	pmatch(fa *, char *);
2a55deb1SDavid E. O'Brienextern	int	nematch(fa *, char *);
2a55deb1SDavid E. O'Brienextern	Node	*reparse(char *);
2a55deb1SDavid E. O'Brienextern	Node	*regexp(void);
2a55deb1SDavid E. O'Brienextern	Node	*primary(void);
2a55deb1SDavid E. O'Brienextern	Node	*concat(Node *);
2a55deb1SDavid E. O'Brienextern	Node	*alt(Node *);
2a55deb1SDavid E. O'Brienextern	Node	*unary(Node *);
2a55deb1SDavid E. O'Brienextern	int	relex(void);
2a55deb1SDavid E. O'Brienextern	int	cgoto(fa *, int, int);
2a55deb1SDavid E. O'Brienextern	void	freefa(fa *);
2a55deb1SDavid E. O'Brien
2a55deb1SDavid E. O'Brienextern	int	pgetc(void);
2a55deb1SDavid E. O'Brienextern	char	*cursource(void);
2a55deb1SDavid E. O'Brien
2a55deb1SDavid E. O'Brienextern	Node	*nodealloc(int);
2a55deb1SDavid E. O'Brienextern	Node	*exptostat(Node *);
2a55deb1SDavid E. O'Brienextern	Node	*node1(int, Node *);
2a55deb1SDavid E. O'Brienextern	Node	*node2(int, Node *, Node *);
2a55deb1SDavid E. O'Brienextern	Node	*node3(int, Node *, Node *, Node *);
2a55deb1SDavid E. O'Brienextern	Node	*node4(int, Node *, Node *, Node *, Node *);
2a55deb1SDavid E. O'Brienextern	Node	*stat3(int, Node *, Node *, Node *);
2a55deb1SDavid E. O'Brienextern	Node	*op2(int, Node *, Node *);
2a55deb1SDavid E. O'Brienextern	Node	*op1(int, Node *);
2a55deb1SDavid E. O'Brienextern	Node	*stat1(int, Node *);
2a55deb1SDavid E. O'Brienextern	Node	*op3(int, Node *, Node *, Node *);
2a55deb1SDavid E. O'Brienextern	Node	*op4(int, Node *, Node *, Node *, Node *);
2a55deb1SDavid E. O'Brienextern	Node	*stat2(int, Node *, Node *);
2a55deb1SDavid E. O'Brienextern	Node	*stat4(int, Node *, Node *, Node *, Node *);
2a55deb1SDavid E. O'Brienextern	Node	*celltonode(Cell *, int);
2a55deb1SDavid E. O'Brienextern	Node	*rectonode(void);
2a55deb1SDavid E. O'Brienextern	Node	*makearr(Node *);
2a55deb1SDavid E. O'Brienextern	Node	*pa2stat(Node *, Node *, Node *);
2a55deb1SDavid E. O'Brienextern	Node	*linkum(Node *, Node *);
2a55deb1SDavid E. O'Brienextern	void	defn(Cell *, Node *, Node *);
2a55deb1SDavid E. O'Brienextern	int	isarg(char *);
2a55deb1SDavid E. O'Brienextern	char	*tokname(int);
2a55deb1SDavid E. O'Brienextern	Cell	*(*proctab[])(Node **, int);
2a55deb1SDavid E. O'Brienextern	int	ptoi(void *);
2a55deb1SDavid E. O'Brienextern	Node	*itonp(int);
2a55deb1SDavid E. O'Brien
2a55deb1SDavid E. O'Brienextern	void	syminit(void);
2a55deb1SDavid E. O'Brienextern	void	arginit(int, char **);
2a55deb1SDavid E. O'Brienextern	void	envinit(char **);
2a55deb1SDavid E. O'Brienextern	Array	*makesymtab(int);
2a55deb1SDavid E. O'Brienextern	void	freesymtab(Cell *);
2a55deb1SDavid E. O'Brienextern	void	freeelem(Cell *, char *);
2a55deb1SDavid E. O'Brienextern	Cell	*setsymtab(char *, char *, double, unsigned int, Array *);
2a55deb1SDavid E. O'Brienextern	int	hash(char *, int);
2a55deb1SDavid E. O'Brienextern	void	rehash(Array *);
2a55deb1SDavid E. O'Brienextern	Cell	*lookup(char *, Array *);
2a55deb1SDavid E. O'Brienextern	double	setfval(Cell *, double);
2a55deb1SDavid E. O'Brienextern	void	funnyvar(Cell *, char *);
2a55deb1SDavid E. O'Brienextern	char	*setsval(Cell *, char *);
2a55deb1SDavid E. O'Brienextern	double	getfval(Cell *);
2a55deb1SDavid E. O'Brienextern	char	*getsval(Cell *);
2a55deb1SDavid E. O'Brienextern	char	*tostring(char *);
2a55deb1SDavid E. O'Brienextern	char	*qstring(char *, int);
2a55deb1SDavid E. O'Brien
2a55deb1SDavid E. O'Brienextern	void	recinit(unsigned int);
2a55deb1SDavid E. O'Brienextern	void	initgetrec(void);
2a55deb1SDavid E. O'Brienextern	void	makefields(int, int);
2a55deb1SDavid E. O'Brienextern	void	growfldtab(int n);
2a55deb1SDavid E. O'Brienextern	int	getrec(char **, int *, int);
2a55deb1SDavid E. O'Brienextern	void	nextfile(void);
2a55deb1SDavid E. O'Brienextern	int	readrec(char **buf, int *bufsize, FILE *inf);
2a55deb1SDavid E. O'Brienextern	char	*getargv(int);
2a55deb1SDavid E. O'Brienextern	void	setclvar(char *);
2a55deb1SDavid E. O'Brienextern	void	fldbld(void);
2a55deb1SDavid E. O'Brienextern	void	cleanfld(int, int);
2a55deb1SDavid E. O'Brienextern	void	newfld(int);
2a55deb1SDavid E. O'Brienextern	int	refldbld(char *, char *);
2a55deb1SDavid E. O'Brienextern	void	recbld(void);
2a55deb1SDavid E. O'Brienextern	Cell	*fieldadr(int);
2a55deb1SDavid E. O'Brienextern	void	yyerror(char *);
2a55deb1SDavid E. O'Brienextern	void	fpecatch(int);
2a55deb1SDavid E. O'Brienextern	void	bracecheck(void);
2a55deb1SDavid E. O'Brienextern	void	bcheck2(int, int, int);
2a55deb1SDavid E. O'Brienextern	void	SYNTAX(char *, ...);
2a55deb1SDavid E. O'Brienextern	void	FATAL(char *, ...);
2a55deb1SDavid E. O'Brienextern	void	WARNING(char *, ...);
2a55deb1SDavid E. O'Brienextern	void	error(void);
2a55deb1SDavid E. O'Brienextern	void	eprint(void);
2a55deb1SDavid E. O'Brienextern	void	bclass(int);
2a55deb1SDavid E. O'Brienextern	double	errcheck(double, char *);
2a55deb1SDavid E. O'Brienextern	int	isclvar(char *);
2a55deb1SDavid E. O'Brienextern	int	is_number(char *);
2a55deb1SDavid E. O'Brien
2a55deb1SDavid E. O'Brienextern	int	adjbuf(char **pb, int *sz, int min, int q, char **pbp, char *what);
2a55deb1SDavid E. O'Brienextern	void	run(Node *);
2a55deb1SDavid E. O'Brienextern	Cell	*execute(Node *);
2a55deb1SDavid E. O'Brienextern	Cell	*program(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*call(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*copycell(Cell *);
2a55deb1SDavid E. O'Brienextern	Cell	*arg(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*jump(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*getline(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*getnf(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*array(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*awkdelete(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*intest(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*matchop(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*boolop(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*relop(Node **, int);
2a55deb1SDavid E. O'Brienextern	void	tfree(Cell *);
2a55deb1SDavid E. O'Brienextern	Cell	*gettemp(void);
2a55deb1SDavid E. O'Brienextern	Cell	*field(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*indirect(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*substr(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*sindex(Node **, int);
2a55deb1SDavid E. O'Brienextern	int	format(char **, int *, char *, Node *);
2a55deb1SDavid E. O'Brienextern	Cell	*awksprintf(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*awkprintf(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*arith(Node **, int);
2a55deb1SDavid E. O'Brienextern	double	ipow(double, int);
2a55deb1SDavid E. O'Brienextern	Cell	*incrdecr(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*assign(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*cat(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*pastat(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*dopa2(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*split(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*condexpr(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*ifstat(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*whilestat(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*dostat(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*forstat(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*instat(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*bltin(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*printstat(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*nullproc(Node **, int);
2a55deb1SDavid E. O'Brienextern	FILE	*redirect(int, Node *);
2a55deb1SDavid E. O'Brienextern	FILE	*openfile(int, char *);
2a55deb1SDavid E. O'Brienextern	char	*filename(FILE *);
2a55deb1SDavid E. O'Brienextern	Cell	*closefile(Node **, int);
2a55deb1SDavid E. O'Brienextern	void	closeall(void);
2a55deb1SDavid E. O'Brienextern	Cell	*sub(Node **, int);
2a55deb1SDavid E. O'Brienextern	Cell	*gsub(Node **, int);
2a55deb1SDavid E. O'Brien
2a55deb1SDavid E. O'Brienextern	FILE	*popen(const char *, const char *);
2a55deb1SDavid E. O'Brienextern	int	pclose(FILE *);