3 * Copyright (c) 1980, 1993
4 * The Regents of the University of California. All rights reserved.
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 4. Neither the name of the University nor the names of its contributors
15 * may be used to endorse or promote products derived from this software
16 * without specific prior written permission.
18 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
19 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
24 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
25 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
26 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
27 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 * @(#)lang.l 8.1 (Berkeley) 6/6/93
42 * Data for returning to previous files from include files.
45 struct incl *in_prev; /* previous includes in effect, if any */
46 YY_BUFFER_STATE in_buf; /* previous lex state */
47 const char *in_fname; /* previous file name */
48 int in_lineno; /* previous line number */
49 int in_ateof; /* token to insert at EOF */
51 static struct incl *inclp;
52 static const char *lastfile;
66 { "devices", DEVICE },
67 { "nodevice", NODEVICE },
68 { "nodevices", NODEVICE },
72 { "machine", ARCH }, /* MACHINE is defined in /sys/param.h */
73 { "makeoption", MAKEOPTIONS },
74 { "makeoptions", MAKEOPTIONS },
75 { "nomakeoption", NOMAKEOPTION },
76 { "nomakeoptions", NOMAKEOPTION },
77 { "maxusers", MAXUSERS },
78 { "profile", PROFILE },
79 { "option", OPTIONS },
80 { "options", OPTIONS },
81 { "nooption", NOOPTION },
82 { "nooptions", NOOPTION },
83 { "include", INCLUDE },
89 static int endinclude(void);
90 int include(const char *, int);
91 int kw_lookup(char *);
92 unsigned int octal(const char *);
93 unsigned int hex(const char *);
94 int yyerror(const char *);
96 #define YY_DECL int yylex(void)
102 ID [A-Za-z_][-A-Za-z_0-9]*
103 PATH [./][-/.%^A-Za-z_0-9]+
110 if ((i = kw_lookup(yytext)) == -1)
112 yylval.str = strdup(yytext);
119 yytext[yyleng-2] = '"';
120 yytext[yyleng-1] = '\0';
121 yylval.str = strdup(yytext + 1);
126 yytext[yyleng-1] = '\0';
127 yylval.str = strdup(yytext + 1);
132 yylval.str = strdup(yytext);
136 yylval.val = octal(yytext);
140 yylval.val = hex(yytext);
144 yylval.val = atoi(yytext);
158 #.* { /* Ignored (comment) */; }
159 [ \t\f]* { /* Ignored (white space) */; }
160 ";" { return SEMICOLON; }
161 "," { return COMMA; }
162 "=" { BEGIN TOEOL; return EQUALS; }
163 "+=" { BEGIN TOEOL; return PLUSEQUALS; }
172 /* otherwise continue scanning */
176 yylval.str = strdup(yytext);
179 . { return yytext[0]; }
184 * Look up a string in the keyword table. Returns a -1 if the
185 * string is not a keyword otherwise it returns the keyword number
189 kw_lookup(char *word)
193 for (kp = key_words; kp->kt_name != 0; kp++)
194 if (eq(word, kp->kt_name))
200 * Number conversion routines
204 octal(const char *str)
208 (void) sscanf(str, "%o", &num);
217 (void) sscanf(str+2, "%x", &num);
222 cfgfile_add(const char *fname)
226 cf = calloc(1, sizeof(*cf));
228 err(EXIT_FAILURE, "calloc");
230 asprintf(&cf->cfg_path, "%s", fname);
231 STAILQ_INSERT_TAIL(&cfgfiles, cf, cfg_next);
235 cfgfile_removeall(void)
239 while (!STAILQ_EMPTY(&cfgfiles)) {
240 cf = STAILQ_FIRST(&cfgfiles);
241 STAILQ_REMOVE_HEAD(&cfgfiles, cfg_next);
242 if (cf->cfg_path != NULL)
249 * Open the named file for inclusion at the current point. Returns 0 on
250 * success (file opened and previous state pushed), nonzero on failure
251 * (fopen failed, complaint made). The `ateof' parameter controls the
252 * token to be inserted at the end of the include file. If ateof == 0,
253 * then nothing is inserted.
256 include(const char *fname, int ateof)
263 fp = fopen(fname, "r");
264 if (fp == NULL && fname[0] != '.' && fname[0] != '/') {
265 asprintf(&fnamebuf, "../../conf/%s", fname);
266 if (fnamebuf != NULL) {
267 fp = fopen(fnamebuf, "r");
272 yyerror("cannot open included file");
275 cfgfile_add(fnamebuf == NULL ? fname : fnamebuf);
276 in = malloc(sizeof(*in));
279 in->in_buf = YY_CURRENT_BUFFER;
280 in->in_fname = yyfile;
281 in->in_lineno = yyline;
282 in->in_ateof = ateof;
284 yy_switch_to_buffer(yy_create_buffer(fp, YY_BUF_SIZE));
291 * Terminate the most recent inclusion.
303 yy_delete_buffer(YY_CURRENT_BUFFER);
305 yy_switch_to_buffer(in->in_buf);
306 yyfile = in->in_fname;
307 yyline = in->in_lineno;
308 ateof = in->in_ateof;