84d9c625bf
- Fix for possible unset uid/gid in toproto
- Fix for default mtree style
- Update libelf
- Importing libexecinfo
- Resynchronize GCC, mpc, gmp, mpfr
- build.sh: Replace params with show-params.
This has been done as the make target has been renamed in the same
way, while a new target named params has been added. This new
target generates a file containing all the parameters, instead of
printing it on the console.
- Update test48 with new etc/services (Fix by Ben Gras <ben@minix3.org)
get getservbyport() out of the inner loop
Change-Id: Ie6ad5226fa2621ff9f0dee8782ea48f9443d2091
213 lines
4.4 KiB
C
213 lines
4.4 KiB
C
#if HAVE_NBTOOL_CONFIG_H
|
|
#include "nbtool_config.h"
|
|
#endif
|
|
|
|
#include <stdio.h>
|
|
#include "awk.h"
|
|
#include "awkgram.h"
|
|
|
|
static const char * const printname[94] = {
|
|
"FIRSTTOKEN", /* 57346 */
|
|
"PROGRAM", /* 57347 */
|
|
"PASTAT", /* 57348 */
|
|
"PASTAT2", /* 57349 */
|
|
"XBEGIN", /* 57350 */
|
|
"XEND", /* 57351 */
|
|
"NL", /* 57352 */
|
|
"ARRAY", /* 57353 */
|
|
"MATCH", /* 57354 */
|
|
"NOTMATCH", /* 57355 */
|
|
"MATCHOP", /* 57356 */
|
|
"FINAL", /* 57357 */
|
|
"DOT", /* 57358 */
|
|
"ALL", /* 57359 */
|
|
"CCL", /* 57360 */
|
|
"NCCL", /* 57361 */
|
|
"CHAR", /* 57362 */
|
|
"OR", /* 57363 */
|
|
"STAR", /* 57364 */
|
|
"QUEST", /* 57365 */
|
|
"PLUS", /* 57366 */
|
|
"EMPTYRE", /* 57367 */
|
|
"AND", /* 57368 */
|
|
"BOR", /* 57369 */
|
|
"APPEND", /* 57370 */
|
|
"EQ", /* 57371 */
|
|
"GE", /* 57372 */
|
|
"GT", /* 57373 */
|
|
"LE", /* 57374 */
|
|
"LT", /* 57375 */
|
|
"NE", /* 57376 */
|
|
"IN", /* 57377 */
|
|
"ARG", /* 57378 */
|
|
"BLTIN", /* 57379 */
|
|
"BREAK", /* 57380 */
|
|
"CLOSE", /* 57381 */
|
|
"CONTINUE", /* 57382 */
|
|
"DELETE", /* 57383 */
|
|
"DO", /* 57384 */
|
|
"EXIT", /* 57385 */
|
|
"FOR", /* 57386 */
|
|
"FUNC", /* 57387 */
|
|
"SUB", /* 57388 */
|
|
"GSUB", /* 57389 */
|
|
"IF", /* 57390 */
|
|
"INDEX", /* 57391 */
|
|
"LSUBSTR", /* 57392 */
|
|
"MATCHFCN", /* 57393 */
|
|
"NEXT", /* 57394 */
|
|
"NEXTFILE", /* 57395 */
|
|
"ADD", /* 57396 */
|
|
"MINUS", /* 57397 */
|
|
"MULT", /* 57398 */
|
|
"DIVIDE", /* 57399 */
|
|
"MOD", /* 57400 */
|
|
"ASSIGN", /* 57401 */
|
|
"ASGNOP", /* 57402 */
|
|
"ADDEQ", /* 57403 */
|
|
"SUBEQ", /* 57404 */
|
|
"MULTEQ", /* 57405 */
|
|
"DIVEQ", /* 57406 */
|
|
"MODEQ", /* 57407 */
|
|
"POWEQ", /* 57408 */
|
|
"PRINT", /* 57409 */
|
|
"PRINTF", /* 57410 */
|
|
"SPRINTF", /* 57411 */
|
|
"ELSE", /* 57412 */
|
|
"INTEST", /* 57413 */
|
|
"CONDEXPR", /* 57414 */
|
|
"POSTINCR", /* 57415 */
|
|
"PREINCR", /* 57416 */
|
|
"POSTDECR", /* 57417 */
|
|
"PREDECR", /* 57418 */
|
|
"VAR", /* 57419 */
|
|
"IVAR", /* 57420 */
|
|
"VARNF", /* 57421 */
|
|
"CALL", /* 57422 */
|
|
"NUMBER", /* 57423 */
|
|
"STRING", /* 57424 */
|
|
"REGEXPR", /* 57425 */
|
|
"GETLINE", /* 57426 */
|
|
"GENSUB", /* 57427 */
|
|
"RETURN", /* 57428 */
|
|
"SPLIT", /* 57429 */
|
|
"SUBSTR", /* 57430 */
|
|
"WHILE", /* 57431 */
|
|
"CAT", /* 57432 */
|
|
"NOT", /* 57433 */
|
|
"UMINUS", /* 57434 */
|
|
"POWER", /* 57435 */
|
|
"DECR", /* 57436 */
|
|
"INCR", /* 57437 */
|
|
"INDIRECT", /* 57438 */
|
|
"LASTTOKEN", /* 57439 */
|
|
};
|
|
|
|
|
|
Cell *(*proctab[94])(Node **, int) = {
|
|
nullproc, /* FIRSTTOKEN */
|
|
program, /* PROGRAM */
|
|
pastat, /* PASTAT */
|
|
dopa2, /* PASTAT2 */
|
|
nullproc, /* XBEGIN */
|
|
nullproc, /* XEND */
|
|
nullproc, /* NL */
|
|
array, /* ARRAY */
|
|
matchop, /* MATCH */
|
|
matchop, /* NOTMATCH */
|
|
nullproc, /* MATCHOP */
|
|
nullproc, /* FINAL */
|
|
nullproc, /* DOT */
|
|
nullproc, /* ALL */
|
|
nullproc, /* CCL */
|
|
nullproc, /* NCCL */
|
|
nullproc, /* CHAR */
|
|
nullproc, /* OR */
|
|
nullproc, /* STAR */
|
|
nullproc, /* QUEST */
|
|
nullproc, /* PLUS */
|
|
nullproc, /* EMPTYRE */
|
|
boolop, /* AND */
|
|
boolop, /* BOR */
|
|
nullproc, /* APPEND */
|
|
relop, /* EQ */
|
|
relop, /* GE */
|
|
relop, /* GT */
|
|
relop, /* LE */
|
|
relop, /* LT */
|
|
relop, /* NE */
|
|
instat, /* IN */
|
|
arg, /* ARG */
|
|
bltin, /* BLTIN */
|
|
jump, /* BREAK */
|
|
closefile, /* CLOSE */
|
|
jump, /* CONTINUE */
|
|
awkdelete, /* DELETE */
|
|
dostat, /* DO */
|
|
jump, /* EXIT */
|
|
forstat, /* FOR */
|
|
nullproc, /* FUNC */
|
|
sub, /* SUB */
|
|
gsub, /* GSUB */
|
|
ifstat, /* IF */
|
|
sindex, /* INDEX */
|
|
nullproc, /* LSUBSTR */
|
|
matchop, /* MATCHFCN */
|
|
jump, /* NEXT */
|
|
jump, /* NEXTFILE */
|
|
arith, /* ADD */
|
|
arith, /* MINUS */
|
|
arith, /* MULT */
|
|
arith, /* DIVIDE */
|
|
arith, /* MOD */
|
|
assign, /* ASSIGN */
|
|
nullproc, /* ASGNOP */
|
|
assign, /* ADDEQ */
|
|
assign, /* SUBEQ */
|
|
assign, /* MULTEQ */
|
|
assign, /* DIVEQ */
|
|
assign, /* MODEQ */
|
|
assign, /* POWEQ */
|
|
printstat, /* PRINT */
|
|
awkprintf, /* PRINTF */
|
|
awksprintf, /* SPRINTF */
|
|
nullproc, /* ELSE */
|
|
intest, /* INTEST */
|
|
condexpr, /* CONDEXPR */
|
|
incrdecr, /* POSTINCR */
|
|
incrdecr, /* PREINCR */
|
|
incrdecr, /* POSTDECR */
|
|
incrdecr, /* PREDECR */
|
|
nullproc, /* VAR */
|
|
nullproc, /* IVAR */
|
|
getnf, /* VARNF */
|
|
call, /* CALL */
|
|
nullproc, /* NUMBER */
|
|
nullproc, /* STRING */
|
|
nullproc, /* REGEXPR */
|
|
awkgetline, /* GETLINE */
|
|
gensub, /* GENSUB */
|
|
jump, /* RETURN */
|
|
split, /* SPLIT */
|
|
substr, /* SUBSTR */
|
|
whilestat, /* WHILE */
|
|
cat, /* CAT */
|
|
boolop, /* NOT */
|
|
arith, /* UMINUS */
|
|
arith, /* POWER */
|
|
nullproc, /* DECR */
|
|
nullproc, /* INCR */
|
|
indirect, /* INDIRECT */
|
|
nullproc, /* LASTTOKEN */
|
|
};
|
|
|
|
const char *tokname(int n)
|
|
{
|
|
static char buf[100];
|
|
|
|
if (n < FIRSTTOKEN || n > LASTTOKEN) {
|
|
snprintf(buf, sizeof(buf), "token %d", n);
|
|
return buf;
|
|
}
|
|
return printname[n-FIRSTTOKEN];
|
|
}
|