Files
Arquivotheca.Solaris-2.5/cmd/cmd-inet/usr.sbin/htable/parse.y
seta75D 7c4988eac0 Init
2021-10-11 19:38:01 -03:00

160 lines
2.7 KiB
Plaintext
Executable File

/* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
/* All Rights Reserved */
/* THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF AT&T */
/* The copyright notice above does not evidence any */
/* actual or intended publication of such source code. */
%{
#ident "@(#)parse.y 1.2 90/02/03 SMI" /* SVr4.0 1.1 */
/*
* +++++++++++++++++++++++++++++++++++++++++++++++++++++++++
* PROPRIETARY NOTICE (Combined)
*
* This source code is unpublished proprietary information
* constituting, or derived under license from AT&T's UNIX(r) System V.
* In addition, portions of such source code were derived from Berkeley
* 4.3 BSD under license from the Regents of the University of
* California.
*
*
*
* Copyright Notice
*
* Notice of copyright on this source code product does not indicate
* publication.
*
* (c) 1986,1987,1988.1989 Sun Microsystems, Inc
* (c) 1983,1984,1985,1986,1987,1988,1989 AT&T.
* All rights reserved.
*
*/
#include "htable.h"
%}
%union {
int number;
struct addr *addrlist;
struct name *namelist;
}
%start Table
%token END
%token <number> NUMBER KEYWORD
%token <namelist> NAME
%type <namelist> Names Cputype Opsys Protos Proto
%type <addrlist> Addresses Address
%%
Table : Entry
| Table Entry
;
Entry : KEYWORD ':' Addresses ':' Names ':' END
= {
do_entry($1, $3, $5, NONAME, NONAME, NONAME);
}
| KEYWORD ':' Addresses ':' Names ':' Cputype ':' END
= {
do_entry($1, $3, $5, $7, NONAME, NONAME);
}
| KEYWORD ':' Addresses ':' Names ':' Cputype ':' Opsys ':' END
= {
do_entry($1, $3, $5, $7, $9, NONAME);
}
| KEYWORD ':' Addresses ':' Names ':' Cputype ':' Opsys ':' ':' END
= {
do_entry($1, $3, $5, $7, $9, NONAME);
}
| KEYWORD ':' Addresses ':' Names ':' Cputype ':' Opsys ':' Protos ':' END
= {
do_entry($1, $3, $5, $7, $9, $11);
}
| error END
| END /* blank line */
;
Addresses: Address
= {
$$ = $1;
}
| Address ',' Addresses
= {
$1->addr_link = $3;
$$ = $1;
}
;
Address : NUMBER '.' NUMBER '.' NUMBER '.' NUMBER
= {
char *a;
$$ = (struct addr *)malloc(sizeof (struct addr));
a = (char *)&($$->addr_val);
a[0] = $1; a[1] = $3; a[2] = $5; a[3] = $7;
$$->addr_link = NOADDR;
}
;
Names : NAME
= {
$$ = $1;
}
| NAME ',' Names
= {
$1->name_link = $3;
$$ = $1;
}
;
Cputype : /* empty */
= {
$$ = NONAME;
}
| NAME
= {
$$ = $1;
}
;
Opsys : /* empty */
= {
$$ = NONAME;
}
| NAME
= {
$$ = $1;
}
;
Protos : Proto
= {
$$ = $1;
}
| Proto ',' Protos
= {
$1->name_link = $3;
$$ = $1;
}
;
Proto : NAME
= {
$$ = $1;
}
;
%%
#include <stdio.h>
extern int yylineno;
yyerror(msg)
char *msg;
{
fprintf(stderr, "\"%s\", line %d: %s\n", infile, yylineno, msg);
}