452 lines
10 KiB
Plaintext
Executable File
452 lines
10 KiB
Plaintext
Executable File
/* $KAME: cftoken.l,v 1.35 2005/01/12 06:06:11 suz Exp $ */
|
|
|
|
%{
|
|
/*
|
|
* Copyright (C) 2002 WIDE Project.
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* 3. Neither the name of the project nor the names of its contributors
|
|
* may be used to endorse or promote products derived from this software
|
|
* without specific prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
|
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
|
* SUCH DAMAGE.
|
|
*/
|
|
#include <sys/types.h>
|
|
#include <sys/param.h>
|
|
#include <sys/socket.h>
|
|
#include <sys/queue.h>
|
|
#include <sys/time.h>
|
|
|
|
#include <netinet/in.h>
|
|
|
|
#include <errno.h>
|
|
#include <syslog.h>
|
|
#include <string.h>
|
|
#ifdef HAVE_STDARG_H
|
|
#include <stdarg.h>
|
|
#else
|
|
#include <varargs.h>
|
|
#endif
|
|
|
|
#include "dhcp6.h"
|
|
#include "config.h"
|
|
#include "common.h"
|
|
#include "y.tab.h"
|
|
|
|
#define YY_NO_UNPUT 1
|
|
|
|
char *configfilename;
|
|
int lineno = 1;
|
|
|
|
|
|
/* Recursion limit for includes */
|
|
#define MAX_INCLUDE_DEPTH 10
|
|
|
|
static struct include_stack {
|
|
char *path;
|
|
YY_BUFFER_STATE state;
|
|
int lineno;
|
|
} incstack[MAX_INCLUDE_DEPTH];
|
|
int incstackp = 0;
|
|
|
|
|
|
static int yy_first_time = 1;
|
|
static int yyerrorcount = 0;
|
|
|
|
#ifndef NOCONFIG_DEBUG
|
|
#define YYDEBUG 1
|
|
|
|
int cfdebug = 1;
|
|
#else
|
|
int cfdebug = 0;
|
|
#endif
|
|
|
|
extern int yyparse __P((void));
|
|
extern int cf_post_config __P((void));
|
|
|
|
static void cfdebug_print __P((char *, char *, int));
|
|
|
|
#define DP(str) if (cfdebug) cfdebug_print(str, yytext, yyleng)
|
|
#define DECHO if (cfdebug) cfdebug_print(NULL, yytext, yyleng);
|
|
#define DNOECHO if (cfdebug) cfdebug_print(NULL, "****", yyleng);
|
|
%}
|
|
|
|
/* abbreviations */
|
|
nl \n
|
|
ws [ \t]+
|
|
comma ,
|
|
comment \#.*
|
|
semi \;
|
|
quotedstring \"[^\"]*\"
|
|
string [a-zA-Z0-9:\._\-][a-zA-Z0-9:\._\-]*
|
|
digit [0-9]
|
|
integer {digit}+
|
|
number {integer}|({digit}*\.{integer})
|
|
hexdigit [0-9A-Fa-f]
|
|
hexpair {hexdigit}{hexdigit}
|
|
hexstring 0[xX]{hexpair}+
|
|
duid {hexpair}(:{hexpair})*
|
|
ifname {string}
|
|
slash \/
|
|
bcl \{
|
|
ecl \}
|
|
|
|
%s S_CNF
|
|
%s S_IFACE
|
|
%s S_PREF
|
|
%s S_HOST
|
|
%s S_DUID
|
|
%s S_IA
|
|
%s S_AUTH
|
|
%s S_KEY
|
|
%s S_SECRET
|
|
%s S_ADDRPOOL
|
|
%s S_INCL
|
|
|
|
%%
|
|
%{
|
|
if (yy_first_time) {
|
|
BEGIN S_CNF;
|
|
yy_first_time = 0;
|
|
}
|
|
%}
|
|
/* interface configuration */
|
|
<S_CNF>interface { DECHO; BEGIN S_IFACE; return (INTERFACE); }
|
|
<S_IFACE>{ifname} {
|
|
DECHO;
|
|
yylval.str = strdup(yytext);
|
|
BEGIN S_CNF;
|
|
return (IFNAME);
|
|
}
|
|
|
|
/* host configuration */
|
|
<S_CNF>host { DECHO; BEGIN S_HOST; return (HOST); }
|
|
<S_HOST>{string} {
|
|
DECHO;
|
|
yylval.str = strdup(yytext);
|
|
BEGIN S_CNF;
|
|
return (HOSTNAME);
|
|
}
|
|
|
|
/* address pool configuration */
|
|
<S_CNF>pool { DECHO; BEGIN S_ADDRPOOL; return (ADDRPOOL); }
|
|
|
|
<S_ADDRPOOL>{string} {
|
|
DECHO;
|
|
yylval.str = strdup(yytext);
|
|
BEGIN S_CNF;
|
|
return (POOLNAME);
|
|
}
|
|
|
|
<S_CNF>duid { DECHO; BEGIN S_DUID; return (DUID); }
|
|
<S_DUID>{duid} {
|
|
DECHO;
|
|
yylval.str = strdup(yytext);
|
|
BEGIN S_CNF;
|
|
return (DUID_ID);
|
|
}
|
|
|
|
<S_CNF>address { DECHO; return (ADDRESS); }
|
|
|
|
<S_CNF>prefix { DECHO; return (PREFIX); }
|
|
|
|
<S_CNF>preference { DECHO; return (PREFERENCE); }
|
|
|
|
<S_CNF>script { DECHO; return (SCRIPT); }
|
|
|
|
<S_CNF>delayedkey { DECHO; return (DELAYEDKEY); }
|
|
|
|
/* request */
|
|
<S_CNF>request { DECHO; return (REQUEST); }
|
|
|
|
/* send */
|
|
<S_CNF>send { DECHO; return (SEND); }
|
|
|
|
/* range */
|
|
<S_CNF>range { DECHO; return (RANGE); }
|
|
<S_CNF>to { DECHO; return (TO); }
|
|
|
|
/* address-pool */
|
|
<S_CNF>address-pool { DECHO; return (ADDRESS_POOL); }
|
|
|
|
/* DHCP options */
|
|
<S_CNF>option { DECHO; return (OPTION); }
|
|
|
|
<S_CNF>rapid-commit { DECHO; return (RAPID_COMMIT); }
|
|
<S_CNF>ia-pd { DECHO; return (IA_PD); }
|
|
<S_CNF>ia-na { DECHO; return (IA_NA); }
|
|
<S_CNF>domain-name-servers { DECHO; return (DNS_SERVERS); }
|
|
<S_CNF>domain-name { DECHO; return (DNS_NAME); }
|
|
<S_CNF>vendor_opts { DECHO; return (VENDOR_OPTS); }
|
|
<S_CNF>dslite-name { DECHO; return (DSLITE_NAME); }
|
|
<S_CNF>dslite-address { DECHO; return (DSLITE_ADDRESS); }
|
|
<S_CNF>sip-server-address { DECHO; return (SIP_SERVERS); }
|
|
<S_CNF>sip-server-domain-name { DECHO; return (SIP_NAME); }
|
|
<S_CNF>ntp-servers { DECHO; return (NTP_SERVERS); }
|
|
<S_CNF>nis-server-address { DECHO; return (NIS_SERVERS); }
|
|
<S_CNF>nis-domain-name { DECHO; return (NIS_NAME); }
|
|
<S_CNF>nisp-server-address { DECHO; return (NISP_SERVERS); }
|
|
<S_CNF>nisp-domain-name { DECHO; return (NISP_NAME); }
|
|
<S_CNF>bcmcs-server-address { DECHO; return (BCMCS_SERVERS); }
|
|
<S_CNF>bcmcs-server-domain-name { DECHO; return (BCMCS_NAME); }
|
|
<S_CNF>refreshtime { DECHO; return (REFRESHTIME); }
|
|
|
|
/* provided for a backward compatibility to WIDE-DHCPv6 before Oct 1 2006 */
|
|
<S_CNF>nis-server-domain-name { DECHO; return (NIS_NAME); }
|
|
<S_CNF>nisp-server-domain-name { DECHO; return (NISP_NAME); }
|
|
|
|
/* generic options */
|
|
<S_CNF>information-only { DECHO; return (INFO_ONLY); }
|
|
|
|
<S_CNF>allow { DECHO; return (ALLOW); }
|
|
|
|
/* identity association */
|
|
<S_CNF>id-assoc { DECHO; BEGIN S_IA; return(ID_ASSOC); }
|
|
<S_IA>pd { DECHO; return(IA_PD); }
|
|
<S_IA>na { DECHO; return(IA_NA); }
|
|
<S_IA>{number} { DECHO; yylval.str = strdup(yytext); return(IAID); }
|
|
<S_IA>{bcl} { DP("begin of closure"); BEGIN S_CNF; return (BCL); }
|
|
|
|
/*
|
|
* interface parameters for delegated prefix configuration.
|
|
* when lex reads an interface name, the state will be back to
|
|
* S_CNF.
|
|
*/
|
|
<S_CNF>prefix-interface { DECHO; BEGIN S_IFACE; return (PREFIX_INTERFACE); }
|
|
<S_CNF>sla-id { DECHO; return (SLA_ID); }
|
|
<S_CNF>sla-len { DECHO; return (SLA_LEN); }
|
|
|
|
/* duration */
|
|
<S_CNF>infinity { DECHO; return (INFINITY); }
|
|
|
|
/* authentication option */
|
|
<S_CNF>authentication { DECHO; BEGIN S_AUTH; return (AUTHENTICATION); }
|
|
<S_AUTH>{string} {
|
|
DECHO;
|
|
yylval.str = strdup(yytext);
|
|
BEGIN S_CNF;
|
|
return (AUTHNAME);
|
|
}
|
|
|
|
/* authentication parameters */
|
|
<S_CNF>protocol { DECHO; return (PROTOCOL); };
|
|
<S_CNF>algorithm { DECHO; return (ALGORITHM); };
|
|
<S_CNF>rdm { DECHO; return (RDM); };
|
|
<S_CNF>key { DECHO; return (KEY); };
|
|
|
|
/* authentication protocols */
|
|
<S_CNF>delayed { DECHO; return (DELAYED); };
|
|
<S_CNF>reconfig { DECHO; return (RECONFIG); };
|
|
|
|
/* authentication algorithms */
|
|
<S_CNF>hmac-md5 { DECHO; return (HMACMD5); };
|
|
<S_CNF>HMAC-MD5 { DECHO; return (HMACMD5); };
|
|
<S_CNF>hmacmd5 { DECHO; return (HMACMD5); };
|
|
<S_CNF>HMACMD5 { DECHO; return (HMACMD5); };
|
|
|
|
/* authentication RDM */
|
|
<S_CNF>monocounter { DECHO; return (MONOCOUNTER); };
|
|
|
|
/* secret keys */
|
|
<S_CNF>keyinfo { DECHO; BEGIN S_KEY; return (KEYINFO); }
|
|
<S_KEY>{string} {
|
|
DECHO;
|
|
yylval.str = strdup(yytext);
|
|
BEGIN S_CNF;
|
|
return (KEYNAME);
|
|
}
|
|
|
|
/* key parameters */
|
|
<S_CNF>realm { DECHO; return (REALM); }
|
|
<S_CNF>keyid { DECHO; return (KEYID); }
|
|
<S_CNF>secret { DECHO; BEGIN S_SECRET; return (SECRET); }
|
|
<S_SECRET>{quotedstring} {
|
|
DNOECHO;
|
|
yylval.str = strdup(yytext);
|
|
BEGIN S_CNF;
|
|
return (QSTRING);
|
|
}
|
|
<S_CNF>expire { DECHO; return (EXPIRE); }
|
|
|
|
/* include */
|
|
<S_CNF>include { DECHO; BEGIN S_INCL; return (INCLUDE); }
|
|
<S_INCL>{quotedstring} {
|
|
DECHO;
|
|
yylval.str = strdup(yytext);
|
|
BEGIN S_CNF;
|
|
return (QSTRING);
|
|
}
|
|
|
|
/* quoted string */
|
|
{quotedstring} {
|
|
DECHO;
|
|
yylval.str = strdup(yytext);
|
|
return (QSTRING);
|
|
}
|
|
|
|
/* misc */
|
|
{ws} { ; }
|
|
{nl} { lineno++; }
|
|
{comment} { DP("comment"); }
|
|
{number} {
|
|
DECHO;
|
|
yylval.num = strtoll(yytext, NULL, 10);
|
|
return (NUMBER);
|
|
}
|
|
{slash} { DECHO; return (SLASH); }
|
|
{comma} { DECHO; return (COMMA); }
|
|
{semi} { DP("end of sentence"); return (EOS); }
|
|
{bcl} { DP("begin of closure"); return (BCL); }
|
|
{ecl} { DP("end of closure"); return (ECL); }
|
|
|
|
/* generic string */
|
|
{string} {
|
|
DECHO;
|
|
yylval.str = strdup(yytext);
|
|
return (STRING);
|
|
}
|
|
|
|
<<EOF>> {
|
|
if (--incstackp < 0)
|
|
yyterminate();
|
|
else {
|
|
yy_delete_buffer(YY_CURRENT_BUFFER);
|
|
free(incstack[incstackp + 1].path);
|
|
configfilename = incstack[incstackp].path;
|
|
lineno = incstack[incstackp].lineno;
|
|
yy_switch_to_buffer(incstack[incstackp].state);
|
|
}
|
|
}
|
|
|
|
%%
|
|
static void
|
|
cfdebug_print(w, t, l)
|
|
char *w, *t;
|
|
int l;
|
|
{
|
|
if (w) {
|
|
dprintf(LOG_DEBUG, FNAME,
|
|
"<%d>%s [%s] (%d)", yy_start, w, t, l);
|
|
} else {
|
|
dprintf(LOG_DEBUG, FNAME,
|
|
"<%d>[%s] (%d)", yy_start, t, l);
|
|
}
|
|
}
|
|
|
|
static void
|
|
yyerror0(int level, char *s, va_list ap)
|
|
{
|
|
char ebuf[BUFSIZ], *bp, *ep;
|
|
|
|
bp = ebuf;
|
|
ep = ebuf + sizeof(ebuf);
|
|
bp += snprintf(bp, ep - bp, "%s %d: ", configfilename, lineno);
|
|
if (bp < ep)
|
|
bp += vsnprintf(bp, ep - bp, s, ap);
|
|
|
|
dprintf(level, FNAME, ebuf);
|
|
}
|
|
|
|
void
|
|
yyerror(char *s, ...)
|
|
{
|
|
va_list ap;
|
|
#ifdef HAVE_STDARG_H
|
|
va_start(ap, s);
|
|
#else
|
|
va_start(ap);
|
|
#endif
|
|
yyerror0(LOG_ERR, s, ap);
|
|
va_end(ap);
|
|
yyerrorcount++;
|
|
}
|
|
|
|
void
|
|
yywarn(char *s, ...)
|
|
{
|
|
va_list ap;
|
|
#ifdef HAVE_STDARG_H
|
|
va_start(ap, s);
|
|
#else
|
|
va_start(ap);
|
|
#endif
|
|
yyerror0(LOG_WARNING, s, ap);
|
|
va_end(ap);
|
|
}
|
|
|
|
int
|
|
cfswitch_buffer(incl)
|
|
char *incl;
|
|
{
|
|
char *path = qstrdup(incl);
|
|
FILE *fp;
|
|
|
|
if (incstackp >= MAX_INCLUDE_DEPTH) {
|
|
dprintf(LOG_ERR, FNAME, "cfparse: includes nested too deeply");
|
|
return (-1);
|
|
}
|
|
incstack[incstackp].path = configfilename;
|
|
incstack[incstackp].state = YY_CURRENT_BUFFER;
|
|
incstack[incstackp].lineno = lineno;
|
|
|
|
fp = fopen(path, "r");
|
|
if (fp == NULL) {
|
|
dprintf(LOG_ERR, FNAME, "cfparse: fopen(%s): %s",
|
|
path, strerror(errno));
|
|
if (errno == ENOENT)
|
|
return (0);
|
|
return (-1);
|
|
}
|
|
incstackp++;
|
|
configfilename = path;
|
|
lineno = 1;
|
|
yy_switch_to_buffer(yy_create_buffer(fp, YY_BUF_SIZE));
|
|
|
|
BEGIN(S_CNF);
|
|
|
|
return (0);
|
|
}
|
|
|
|
int
|
|
cfparse(conf)
|
|
char *conf;
|
|
{
|
|
configfilename = conf;
|
|
if ((yyin = fopen(configfilename, "r")) == NULL) {
|
|
dprintf(LOG_ERR, FNAME, "cfparse: fopen(%s): %s",
|
|
configfilename, strerror(errno));
|
|
if (errno == ENOENT)
|
|
return (0);
|
|
return (-1);
|
|
}
|
|
|
|
if (yyparse() || yyerrorcount) {
|
|
if (yyerrorcount) {
|
|
yyerror("fatal parse failure: exiting (%d errors)",
|
|
yyerrorcount);
|
|
} else
|
|
yyerror("fatal parse failure: exiting");
|
|
return (-1);
|
|
}
|
|
|
|
return (cf_post_config());
|
|
}
|