1 /* $KAME: parser.y,v 1.8 2000/11/08 03:03:34 jinmei Exp $ */
4 * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. Neither the name of the project nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
19 * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35 #include <sys/param.h>
36 #include <sys/ioctl.h>
37 #include <sys/socket.h>
39 #include <sys/queue.h>
43 #include <netinet/in.h>
44 #include <netinet/in_var.h>
45 #include <netinet/icmp6.h>
54 struct config_is_set {
58 struct dst_list *dl_head;
59 struct payload_list *pl_head, ple_cur;
61 char errbuf[LINE_MAX];
64 extern void yyerror(const char *s);
65 extern int yylex(void);
66 static struct payload_list * pllist_lookup(int seqnum);
67 static void pllist_enqueue(struct payload_list *pl_entry);
69 #define MAX_RETRYNUM 10 /* upper limit of retry in this rrenumd program */
70 #define MAX_SEQNUM 256 /* upper limit of seqnum in this rrenumd program */
82 struct in6_addr addr6;
88 struct payload_list *pl;
92 %token <num> ADD CHANGE SETGLOBAL
93 %token DEBUG_CMD DEST_CMD RETRY_CMD SEQNUM_CMD
94 %token MATCH_PREFIX_CMD MAXLEN_CMD MINLEN_CMD
95 %token USE_PREFIX_CMD KEEPLEN_CMD
96 %token VLTIME_CMD PLTIME_CMD
97 %token RAF_ONLINK_CMD RAF_AUTO_CMD RAF_DECRVALID_CMD RAF_DECRPREFD_CMD
98 %token <num> DAYS HOURS MINUTES SECONDS INFINITY
100 %token BCL ECL EOS ERROR
101 %token <cs> NAME HOSTNAME QSTRING DECSTRING
102 %token <addr4> IPV4ADDR
103 %token <addr6> IPV6ADDR
104 %token <num> PREFIXLEN
106 %type <num> retrynum seqnum rrenum_cmd
107 %type <num> prefixlen maxlen minlen keeplen vltime pltime
108 %type <num> lifetime days hours minutes seconds
109 %type <num> decstring
110 %type <num> raf_onlink raf_auto raf_decrvalid raf_decrprefd flag
111 %type <dl> dest_addrs dest_addr sin sin6
112 %type <pl> rrenum_statement
114 %type <prefix> prefixval
124 | statements statement
129 | destination_statement
130 | rrenum_statement_without_seqnum
131 | rrenum_statement_with_seqnum
148 destination_statement:
149 DEST_CMD dest_addrs retrynum EOS
158 | dest_addrs dest_addr
176 struct sockaddr_in6 *sin6;
178 sin6 = (struct sockaddr_in6 *)$1->dl_dst;
179 sin6->sin6_scope_id = if_nametoindex($2.cp);
185 struct sockaddr_storage *ss;
186 struct addrinfo hints, *res;
189 memset(&hints, 0, sizeof(hints));
190 hints.ai_flags = AI_CANONNAME;
191 hints.ai_family = AF_UNSPEC;
192 hints.ai_socktype = SOCK_RAW;
193 hints.ai_protocol = 0;
194 error = getaddrinfo($1.cp, 0, &hints, &res);
196 snprintf(errbuf, sizeof(errbuf),
197 "name resolution failed for %s:%s",
198 $1.cp, gai_strerror(error));
201 ss = (struct sockaddr_storage *)malloc(sizeof(*ss));
202 memset(ss, 0, sizeof(*ss));
203 memcpy(ss, res->ai_addr, res->ai_addr->sa_len);
206 $$ = (struct dst_list *)
207 malloc(sizeof(struct dst_list));
208 memset($$, 0, sizeof(struct dst_list));
209 $$->dl_dst = (struct sockaddr *)ss;
216 struct sockaddr_in *sin;
218 sin = (struct sockaddr_in *)malloc(sizeof(*sin));
219 memset(sin, 0, sizeof(*sin));
220 sin->sin_len = sizeof(*sin);
221 sin->sin_family = AF_INET;
224 $$ = (struct dst_list *)
225 malloc(sizeof(struct dst_list));
226 memset($$, 0, sizeof(struct dst_list));
227 $$->dl_dst = (struct sockaddr *)sin;
234 struct sockaddr_in6 *sin6;
236 sin6 = (struct sockaddr_in6 *)malloc(sizeof(*sin6));
237 memset(sin6, 0, sizeof(*sin6));
238 sin6->sin6_len = sizeof(*sin6);
239 sin6->sin6_family = AF_INET6;
240 sin6->sin6_addr = $1;
242 $$ = (struct dst_list *)
243 malloc(sizeof(struct dst_list));
244 memset($$, 0, sizeof(struct dst_list));
245 $$->dl_dst = (struct sockaddr *)sin6;
251 $$.cp = strdup($1.cp);
256 $1.cp[$1.len - 1] = 0;
257 $$.cp = strdup(&$1.cp[1]);
267 | RETRY_CMD decstring
269 if ($2 > MAX_RETRYNUM)
275 rrenum_statement_with_seqnum:
278 if (pllist_lookup($2)) {
279 snprintf(errbuf, sizeof(errbuf),
280 "duplicate seqnum %ld specified at %d",
285 BCL rrenum_statement EOS ECL EOS
287 $5->pl_irr.rr_seqnum = $2;
299 if ($1 > MAX_SEQNUM) {
300 snprintf(errbuf, sizeof(errbuf),
301 "seqnum %ld is illegal for this program. "
302 "should be between 0 and %d",
310 rrenum_statement_without_seqnum:
313 if (pllist_lookup(0)) {
314 snprintf(errbuf, sizeof(errbuf),
315 "duplicate seqnum %d specified at %d",
319 $1->pl_irr.rr_seqnum = 0;
325 match_prefix_definition use_prefix_definition
327 $$ = (struct payload_list *)
328 malloc(sizeof(struct payload_list));
329 memcpy($$, &ple_cur, sizeof(ple_cur));
333 match_prefix_definition:
334 rrenum_cmd MATCH_PREFIX_CMD prefixval maxlen minlen
336 struct icmp6_router_renum *irr;
337 struct rr_pco_match *rpm;
339 irr = &ple_cur.pl_irr;
340 rpm = &ple_cur.pl_rpm;
341 memset(rpm, 0, sizeof(*rpm));
344 rpm->rpm_prefix = $3.addr;
345 rpm->rpm_matchlen = $3.plen;
346 rpm->rpm_maxlen = $4;
347 rpm->rpm_minlen = $5;
382 | MAXLEN_CMD decstring
395 | MINLEN_CMD decstring
403 use_prefix_definition:
406 struct icmp6_router_renum *irr;
407 struct rr_pco_match *rpm;
408 struct rr_pco_use *rpu;
410 irr = (struct icmp6_router_renum *)&ple_cur.pl_irr;
411 rpm = (struct rr_pco_match *)(irr + 1);
412 rpu = (struct rr_pco_use *)(rpm + 1);
413 memset(rpu, 0, sizeof(*rpu));
415 | USE_PREFIX_CMD prefixval keeplen use_prefix_values
417 struct icmp6_router_renum *irr;
418 struct rr_pco_match *rpm;
419 struct rr_pco_use *rpu;
421 irr = (struct icmp6_router_renum *)&ple_cur.pl_irr;
422 rpm = (struct rr_pco_match *)(irr + 1);
423 rpu = (struct rr_pco_use *)(rpm + 1);
425 rpu->rpu_prefix = $2.addr;
426 rpu->rpu_uselen = $2.plen;
427 rpu->rpu_keeplen = $3;
434 struct icmp6_router_renum *irr;
435 struct rr_pco_match *rpm;
436 struct rr_pco_use *rpu;
438 irr = (struct icmp6_router_renum *)&ple_cur.pl_irr;
439 rpm = (struct rr_pco_match *)(irr + 1);
440 rpu = (struct rr_pco_use *)(rpm + 1);
441 memset(rpu, 0, sizeof(*rpu));
443 rpu->rpu_vltime = htonl(DEF_VLTIME);
444 rpu->rpu_pltime = htonl(DEF_PLTIME);
448 | BCL vltime pltime raf_onlink raf_auto raf_decrvalid raf_decrprefd ECL
450 struct icmp6_router_renum *irr;
451 struct rr_pco_match *rpm;
452 struct rr_pco_use *rpu;
454 irr = (struct icmp6_router_renum *)&ple_cur.pl_irr;
455 rpm = (struct rr_pco_match *)(irr + 1);
456 rpu = (struct rr_pco_use *)(rpm + 1);
457 memset(rpu, 0, sizeof(*rpu));
459 rpu->rpu_vltime = $2;
460 rpu->rpu_pltime = $3;
463 ~ICMP6_RR_PCOUSE_RAFLAGS_ONLINK;
466 ICMP6_RR_PCOUSE_RAFLAGS_ONLINK;
469 ICMP6_RR_PCOUSE_RAFLAGS_ONLINK;
472 ~ICMP6_RR_PCOUSE_RAFLAGS_ONLINK;
477 ICMP6_RR_PCOUSE_RAFLAGS_AUTO;
480 ICMP6_RR_PCOUSE_RAFLAGS_AUTO;
483 ICMP6_RR_PCOUSE_RAFLAGS_AUTO;
486 ~ICMP6_RR_PCOUSE_RAFLAGS_AUTO;
492 ICMP6_RR_PCOUSE_FLAGS_DECRVLTIME;
496 ICMP6_RR_PCOUSE_FLAGS_DECRPLTIME;
506 | KEEPLEN_CMD decstring
518 $$ = htonl(DEF_VLTIME);
520 | VLTIME_CMD lifetime
529 $$ = htonl(DEF_PLTIME);
531 | PLTIME_CMD lifetime
541 | RAF_ONLINK_CMD flag
563 | RAF_DECRVALID_CMD flag
574 | RAF_DECRPREFD_CMD flag
591 | days hours minutes seconds
595 d = $1 * 24 * 60 * 60;
647 static struct payload_list *
648 pllist_lookup(int seqnum)
650 struct payload_list *pl;
651 for (pl = pl_head; pl && pl->pl_irr.rr_seqnum != seqnum;
658 pllist_enqueue(struct payload_list *pl_entry)
660 struct payload_list *pl, *pl_last;
664 pl && pl->pl_irr.rr_seqnum < pl_entry->pl_irr.rr_seqnum;
665 pl_last = pl, pl = pl->pl_next)
668 pl_last->pl_next = pl_entry;