2 8d1b399b 2021-07-22 op * Copyright (c) 2021 Omar Polo <op@omarpolo.com>
3 8d1b399b 2021-07-22 op * Copyright (c) 2018 Florian Obser <florian@openbsd.org>
4 8d1b399b 2021-07-22 op * Copyright (c) 2004, 2005 Esben Norby <norby@openbsd.org>
5 8d1b399b 2021-07-22 op * Copyright (c) 2004 Ryan McBride <mcbride@openbsd.org>
6 8d1b399b 2021-07-22 op * Copyright (c) 2002, 2003, 2004 Henning Brauer <henning@openbsd.org>
7 8d1b399b 2021-07-22 op * Copyright (c) 2001 Markus Friedl. All rights reserved.
8 8d1b399b 2021-07-22 op * Copyright (c) 2001 Daniel Hartmeier. All rights reserved.
9 8d1b399b 2021-07-22 op * Copyright (c) 2001 Theo de Raadt. All rights reserved.
11 8d1b399b 2021-07-22 op * Permission to use, copy, modify, and distribute this software for any
12 8d1b399b 2021-07-22 op * purpose with or without fee is hereby granted, provided that the above
13 8d1b399b 2021-07-22 op * copyright notice and this permission notice appear in all copies.
15 8d1b399b 2021-07-22 op * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
16 8d1b399b 2021-07-22 op * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
17 8d1b399b 2021-07-22 op * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
18 8d1b399b 2021-07-22 op * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
19 8d1b399b 2021-07-22 op * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
20 8d1b399b 2021-07-22 op * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
21 8d1b399b 2021-07-22 op * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
25 8d1b399b 2021-07-22 op #include "compat.h"
27 8d1b399b 2021-07-22 op #include <sys/stat.h>
29 8d1b399b 2021-07-22 op #include <ctype.h>
30 8d1b399b 2021-07-22 op #include <err.h>
31 8d1b399b 2021-07-22 op #include <errno.h>
32 8d1b399b 2021-07-22 op #include <event.h>
33 8d1b399b 2021-07-22 op #include <inttypes.h>
34 8d1b399b 2021-07-22 op #include <limits.h>
35 8d1b399b 2021-07-22 op #include <stdarg.h>
36 8d1b399b 2021-07-22 op #include <stdio.h>
37 8d1b399b 2021-07-22 op #include <stdlib.h>
38 8d1b399b 2021-07-22 op #include <string.h>
39 8d1b399b 2021-07-22 op #include <syslog.h>
40 8d1b399b 2021-07-22 op #include <unistd.h>
42 8d1b399b 2021-07-22 op #include "log.h"
43 8d1b399b 2021-07-22 op #include "kamid.h"
44 8d1b399b 2021-07-22 op #include "table.h"
45 8d1b399b 2021-07-22 op #include "utils.h"
47 8d1b399b 2021-07-22 op TAILQ_HEAD(files, file) files = TAILQ_HEAD_INITIALIZER(files);
48 8d1b399b 2021-07-22 op static struct file {
49 8d1b399b 2021-07-22 op TAILQ_ENTRY(file) entry;
52 8d1b399b 2021-07-22 op size_t ungetpos;
53 8d1b399b 2021-07-22 op size_t ungetsize;
54 8d1b399b 2021-07-22 op u_char *ungetbuf;
55 8d1b399b 2021-07-22 op int eof_reached;
58 8d1b399b 2021-07-22 op } *file, *topfile;
59 8d1b399b 2021-07-22 op struct file *pushfile(const char *, int);
60 8d1b399b 2021-07-22 op int popfile(void);
61 8d1b399b 2021-07-22 op int check_file_secrecy(int, const char *);
62 8d1b399b 2021-07-22 op int yyparse(void);
63 8d1b399b 2021-07-22 op int yylex(void);
64 8d1b399b 2021-07-22 op int yyerror(const char *, ...)
65 8d1b399b 2021-07-22 op __attribute__((__format__ (printf, 1, 2)))
66 8d1b399b 2021-07-22 op __attribute__((__nonnull__ (1)));
67 8d1b399b 2021-07-22 op int kw_cmp(const void *, const void *);
68 8d1b399b 2021-07-22 op int lookup(char *);
69 8d1b399b 2021-07-22 op int igetc(void);
70 8d1b399b 2021-07-22 op int lgetc(int);
71 8d1b399b 2021-07-22 op void lungetc(int);
72 8d1b399b 2021-07-22 op int findeol(void);
74 8d1b399b 2021-07-22 op TAILQ_HEAD(symhead, sym) symhead = TAILQ_HEAD_INITIALIZER(symhead);
76 8d1b399b 2021-07-22 op TAILQ_ENTRY(sym) entry;
83 8d1b399b 2021-07-22 op int symset(const char *, const char *, int);
84 8d1b399b 2021-07-22 op char *symget(const char *);
86 8d1b399b 2021-07-22 op void clear_config(struct kd_conf *xconf);
88 8d1b399b 2021-07-22 op static void add_table(const char *, const char *, const char *);
89 8d1b399b 2021-07-22 op static struct table *findtable(const char *name);
90 8d1b399b 2021-07-22 op static void add_cert(const char *, const char *);
91 8d1b399b 2021-07-22 op static void add_key(const char *, const char *);
92 d82b9f6d 2021-07-22 op static struct kd_listen_conf *listen_new(void);
94 8d1b399b 2021-07-22 op static uint32_t counter;
95 8d1b399b 2021-07-22 op static struct table *table;
96 95eb4eb9 2021-07-22 op static struct kd_listen_conf *listener;
97 8d1b399b 2021-07-22 op static struct kd_conf *conf;
98 8d1b399b 2021-07-22 op static int errors;
100 8d1b399b 2021-07-22 op typedef struct {
102 8d1b399b 2021-07-22 op int64_t number;
103 8d1b399b 2021-07-22 op char *string;
104 8d1b399b 2021-07-22 op struct table *table;
114 8d1b399b 2021-07-22 op %token INCLUDE
116 8d1b399b 2021-07-22 op %token LISTEN
119 8d1b399b 2021-07-22 op %token PKI PORT
120 8d1b399b 2021-07-22 op %token TABLE TLS
123 8d1b399b 2021-07-22 op %token <v.string> STRING
124 8d1b399b 2021-07-22 op %token <v.number> NUMBER
125 8d1b399b 2021-07-22 op %type <v.number> yesno
126 8d1b399b 2021-07-22 op %type <v.string> string
127 8d1b399b 2021-07-22 op %type <v.table> tableref
131 8d1b399b 2021-07-22 op grammar : /* empty */
132 8d1b399b 2021-07-22 op | grammar include '\n'
133 8d1b399b 2021-07-22 op | grammar '\n'
134 8d1b399b 2021-07-22 op | grammar table '\n'
135 8d1b399b 2021-07-22 op | grammar pki '\n'
136 8d1b399b 2021-07-22 op | grammar listen '\n'
137 8d1b399b 2021-07-22 op | grammar varset '\n'
138 8d1b399b 2021-07-22 op | grammar error '\n' { file->errors++; }
141 8d1b399b 2021-07-22 op include : INCLUDE STRING {
142 8d1b399b 2021-07-22 op struct file *nfile;
144 8d1b399b 2021-07-22 op if ((nfile = pushfile($2, 0)) == NULL) {
145 8d1b399b 2021-07-22 op yyerror("failed to include file %s", $2);
151 8d1b399b 2021-07-22 op file = nfile;
152 8d1b399b 2021-07-22 op lungetc('\n');
156 8d1b399b 2021-07-22 op string : string STRING {
157 8d1b399b 2021-07-22 op if (asprintf(&$$, "%s %s", $1, $2) == -1) {
160 8d1b399b 2021-07-22 op yyerror("string: asprintf");
169 8d1b399b 2021-07-22 op yesno : YES { $$ = 1; }
170 8d1b399b 2021-07-22 op | NO { $$ = 0; }
173 8d1b399b 2021-07-22 op optnl : '\n' optnl /* zero or more newlines */
177 8d1b399b 2021-07-22 op nl : '\n' optnl /* one or more newlines */
180 8d1b399b 2021-07-22 op arrow : '=' '>' ;
182 8d1b399b 2021-07-22 op comma : ',' optnl
185 8d1b399b 2021-07-22 op varset : STRING '=' string {
186 8d1b399b 2021-07-22 op char *s = $1;
188 8d1b399b 2021-07-22 op printf("%s = \"%s\"\n", $1, $3);
189 8d1b399b 2021-07-22 op while (*s++) {
190 8d1b399b 2021-07-22 op if (isspace((unsigned char)*s)) {
191 8d1b399b 2021-07-22 op yyerror("macro name cannot contain "
192 8d1b399b 2021-07-22 op "whitespace");
198 8d1b399b 2021-07-22 op if (symset($1, $3, 0) == -1)
199 8d1b399b 2021-07-22 op fatal("cannot store variable");
205 8d1b399b 2021-07-22 op pki : PKI STRING CERT STRING { add_cert($2, $4); }
206 8d1b399b 2021-07-22 op | PKI STRING KEY STRING { add_key($2, $4); }
209 156f1ecc 2021-11-30 op table_kp : string arrow string optnl {
210 8d1b399b 2021-07-22 op if (table_add(table, $1, $3) == -1)
211 8d1b399b 2021-07-22 op yyerror("can't add to table %s",
212 8d1b399b 2021-07-22 op table->t_name);
218 8d1b399b 2021-07-22 op table_kps : table_kp
219 8d1b399b 2021-07-22 op | table_kp comma table_kps
222 8d1b399b 2021-07-22 op stringel : STRING {
223 8d1b399b 2021-07-22 op if (table_add(table, $1, NULL) == -1)
224 8d1b399b 2021-07-22 op yyerror("can't add to table %s",
225 8d1b399b 2021-07-22 op table->t_name);
230 8d1b399b 2021-07-22 op string_list : stringel
231 8d1b399b 2021-07-22 op | stringel comma string_list
234 8d1b399b 2021-07-22 op table_vals : table_kps
235 8d1b399b 2021-07-22 op | string_list
238 8d1b399b 2021-07-22 op table : TABLE STRING STRING {
241 8d1b399b 2021-07-22 op if ((p = strchr($3, ':')) == NULL) {
242 8d1b399b 2021-07-22 op yyerror("invalid table %s", $2);
247 8d1b399b 2021-07-22 op add_table($2, $3, p+1);
251 8d1b399b 2021-07-22 op | TABLE STRING {
252 8d1b399b 2021-07-22 op add_table($2, "static", NULL);
253 156f1ecc 2021-11-30 op } '{' optnl table_vals '}' {
254 8d1b399b 2021-07-22 op table = NULL;
258 8d1b399b 2021-07-22 op tableref : '<' STRING '>' {
259 d82b9f6d 2021-07-22 op struct table *t;
261 d82b9f6d 2021-07-22 op t = findtable($2);
263 d82b9f6d 2021-07-22 op if (t == NULL)
269 95eb4eb9 2021-07-22 op listen : LISTEN { listener = listen_new(); }
270 fccfa871 2021-07-23 op listen_opts {
271 fccfa871 2021-07-23 op if (listener->auth_table == NULL)
272 fccfa871 2021-07-23 op yyerror("missing auth table");
273 2695b856 2021-07-23 op if (!(listener->flags & L_TLS))
274 2695b856 2021-07-23 op yyerror("can't define a non-tls listener");
275 fccfa871 2021-07-23 op listener = NULL;
279 d82b9f6d 2021-07-22 op listen_opts : listen_opt
280 d82b9f6d 2021-07-22 op | listen_opt listen_opts
283 d82b9f6d 2021-07-22 op listen_opt : ON STRING PORT NUMBER {
284 95eb4eb9 2021-07-22 op if (*listener->iface != '\0')
285 d82b9f6d 2021-07-22 op yyerror("listen address and port already"
287 95eb4eb9 2021-07-22 op strlcpy(listener->iface, $2, sizeof(listener->iface));
288 95eb4eb9 2021-07-22 op listener->port = $4;
290 d82b9f6d 2021-07-22 op | TLS PKI STRING {
291 95eb4eb9 2021-07-22 op if (*listener->pki != '\0')
292 d82b9f6d 2021-07-22 op yyerror("listen tls pki already defined");
293 fccfa871 2021-07-23 op listener->flags |= L_TLS;
294 95eb4eb9 2021-07-22 op strlcpy(listener->pki, $3, sizeof(listener->pki));
296 d82b9f6d 2021-07-22 op | AUTH tableref {
297 95eb4eb9 2021-07-22 op if (listener->auth_table != NULL)
298 d82b9f6d 2021-07-22 op yyerror("listen auth already defined");
299 95eb4eb9 2021-07-22 op listener->auth_table = $2;
305 8d1b399b 2021-07-22 op struct keywords {
306 8d1b399b 2021-07-22 op const char *k_name;
311 8d1b399b 2021-07-22 op yyerror(const char *fmt, ...)
316 8d1b399b 2021-07-22 op file->errors++;
317 8d1b399b 2021-07-22 op va_start(ap, fmt);
318 8d1b399b 2021-07-22 op if (vasprintf(&msg, fmt, ap) == -1)
319 8d1b399b 2021-07-22 op fatalx("yyerror vasprintf");
321 8d1b399b 2021-07-22 op logit(LOG_CRIT, "%s:%d: %s", file->name, yylval.lineno, msg);
327 8d1b399b 2021-07-22 op kw_cmp(const void *k, const void *e)
329 8d1b399b 2021-07-22 op return strcmp(k, ((const struct keywords *)e)->k_name);
333 8d1b399b 2021-07-22 op lookup(char *s)
335 8d1b399b 2021-07-22 op /* This has to be sorted always. */
336 8d1b399b 2021-07-22 op static const struct keywords keywords[] = {
337 8d1b399b 2021-07-22 op {"auth", AUTH},
338 8d1b399b 2021-07-22 op {"cert", CERT},
339 8d1b399b 2021-07-22 op {"include", INCLUDE},
340 8d1b399b 2021-07-22 op {"key", KEY},
341 8d1b399b 2021-07-22 op {"listen", LISTEN},
344 8d1b399b 2021-07-22 op {"pki", PKI},
345 8d1b399b 2021-07-22 op {"port", PORT},
346 8d1b399b 2021-07-22 op {"table", TABLE},
347 8d1b399b 2021-07-22 op {"tls", TLS},
348 8d1b399b 2021-07-22 op {"yes", YES},
350 8d1b399b 2021-07-22 op const struct keywords *p;
352 8d1b399b 2021-07-22 op p = bsearch(s, keywords, sizeof(keywords)/sizeof(keywords[0]),
353 8d1b399b 2021-07-22 op sizeof(keywords[0]), kw_cmp);
356 8d1b399b 2021-07-22 op return p->k_val;
358 8d1b399b 2021-07-22 op return STRING;
361 8d1b399b 2021-07-22 op #define START_EXPAND 1
362 8d1b399b 2021-07-22 op #define DONE_EXPAND 2
364 8d1b399b 2021-07-22 op static int expanding;
372 8d1b399b 2021-07-22 op if (file->ungetpos > 0)
373 8d1b399b 2021-07-22 op c = file->ungetbuf[--file->ungetpos];
375 8d1b399b 2021-07-22 op c = getc(file->stream);
377 8d1b399b 2021-07-22 op if (c == START_EXPAND)
378 8d1b399b 2021-07-22 op expanding = 1;
379 8d1b399b 2021-07-22 op else if (c == DONE_EXPAND)
380 8d1b399b 2021-07-22 op expanding = 0;
388 8d1b399b 2021-07-22 op lgetc(int quotec)
392 8d1b399b 2021-07-22 op if (quotec) {
393 8d1b399b 2021-07-22 op if ((c = igetc()) == EOF) {
394 8d1b399b 2021-07-22 op yyerror("reached end of file while parsing "
395 8d1b399b 2021-07-22 op "quoted string");
396 8d1b399b 2021-07-22 op if (file == topfile || popfile() == EOF)
398 8d1b399b 2021-07-22 op return quotec;
403 8d1b399b 2021-07-22 op while ((c = igetc()) == '\\') {
404 8d1b399b 2021-07-22 op next = igetc();
405 8d1b399b 2021-07-22 op if (next != '\n') {
409 8d1b399b 2021-07-22 op yylval.lineno = file->lineno;
410 8d1b399b 2021-07-22 op file->lineno++;
413 8d1b399b 2021-07-22 op if (c == EOF) {
415 8d1b399b 2021-07-22 op * Fake EOL when hit EOF for the first time. This gets line
416 8d1b399b 2021-07-22 op * count right if last line in included file is syntactically
417 8d1b399b 2021-07-22 op * invalid and has no newline.
419 8d1b399b 2021-07-22 op if (file->eof_reached == 0) {
420 8d1b399b 2021-07-22 op file->eof_reached = 1;
423 8d1b399b 2021-07-22 op while (c == EOF) {
424 8d1b399b 2021-07-22 op if (file == topfile || popfile() == EOF)
433 8d1b399b 2021-07-22 op lungetc(int c)
435 8d1b399b 2021-07-22 op if (c == EOF)
438 8d1b399b 2021-07-22 op if (file->ungetpos >= file->ungetsize) {
439 8d1b399b 2021-07-22 op void *p = reallocarray(file->ungetbuf, file->ungetsize, 2);
440 8d1b399b 2021-07-22 op if (p == NULL)
441 8d1b399b 2021-07-22 op err(1, "lungetc");
442 8d1b399b 2021-07-22 op file->ungetbuf = p;
443 8d1b399b 2021-07-22 op file->ungetsize *= 2;
445 8d1b399b 2021-07-22 op file->ungetbuf[file->ungetpos++] = c;
449 8d1b399b 2021-07-22 op findeol(void)
453 8d1b399b 2021-07-22 op /* Skip to either EOF or the first real EOL. */
455 8d1b399b 2021-07-22 op c = lgetc(0);
456 8d1b399b 2021-07-22 op if (c == '\n') {
457 8d1b399b 2021-07-22 op file->lineno++;
460 8d1b399b 2021-07-22 op if (c == EOF)
463 8d1b399b 2021-07-22 op return ERROR;
467 ab51127d 2021-08-04 op int my_yylex(void);
474 ab51127d 2021-08-04 op switch (x = my_yylex()) {
476 ab51127d 2021-08-04 op puts("auth");
479 ab51127d 2021-08-04 op puts("cert");
482 ab51127d 2021-08-04 op puts("error");
484 ab51127d 2021-08-04 op case INCLUDE:
485 ab51127d 2021-08-04 op puts("include");
491 ab51127d 2021-08-04 op puts("listen");
503 ab51127d 2021-08-04 op puts("port");
506 ab51127d 2021-08-04 op puts("table");
515 ab51127d 2021-08-04 op printf("string \"%s\"\n", yylval.v.string);
518 ab51127d 2021-08-04 op printf("number %"PRIi64"\n", yylval.v.number);
520 ab51127d 2021-08-04 op printf("character ");
521 ab51127d 2021-08-04 op if (x == '\n')
522 ab51127d 2021-08-04 op printf("\\n");
524 ab51127d 2021-08-04 op printf("%c", x);
525 ab51127d 2021-08-04 op printf(" [0x%x]", x);
526 ab51127d 2021-08-04 op printf("\n");
534 ab51127d 2021-08-04 op my_yylex(void)
540 e63bf1fb 2021-11-30 op char buf[8096];
541 e63bf1fb 2021-11-30 op char *p, *val;
542 e63bf1fb 2021-11-30 op int quotec, next, c;
547 8d1b399b 2021-07-22 op while ((c = lgetc(0)) == ' ' || c == '\t')
548 8d1b399b 2021-07-22 op ; /* nothing */
550 8d1b399b 2021-07-22 op yylval.lineno = file->lineno;
551 8d1b399b 2021-07-22 op if (c == '#')
552 8d1b399b 2021-07-22 op while ((c = lgetc(0)) != '\n' && c != EOF)
553 8d1b399b 2021-07-22 op ; /* nothing */
554 8d1b399b 2021-07-22 op if (c == '$' && !expanding) {
556 8d1b399b 2021-07-22 op if ((c = lgetc(0)) == EOF)
559 8d1b399b 2021-07-22 op if (p + 1 >= buf + sizeof(buf) - 1) {
560 8d1b399b 2021-07-22 op yyerror("string too long");
561 8d1b399b 2021-07-22 op return findeol();
563 8d1b399b 2021-07-22 op if (isalnum(c) || c == '_') {
571 8d1b399b 2021-07-22 op val = symget(buf);
572 8d1b399b 2021-07-22 op if (val == NULL) {
573 8d1b399b 2021-07-22 op yyerror("macro '%s' not defined", buf);
574 8d1b399b 2021-07-22 op return findeol();
576 8d1b399b 2021-07-22 op p = val + strlen(val) - 1;
577 8d1b399b 2021-07-22 op lungetc(DONE_EXPAND);
578 8d1b399b 2021-07-22 op while (p >= val) {
579 e63bf1fb 2021-11-30 op lungetc((unsigned char)*p);
582 8d1b399b 2021-07-22 op lungetc(START_EXPAND);
591 8d1b399b 2021-07-22 op if ((c = lgetc(quotec)) == EOF)
593 8d1b399b 2021-07-22 op if (c == '\n') {
594 8d1b399b 2021-07-22 op file->lineno++;
596 8d1b399b 2021-07-22 op } else if (c == '\\') {
597 8d1b399b 2021-07-22 op if ((next = lgetc(quotec)) == EOF)
599 8d1b399b 2021-07-22 op if (next == quotec || next == ' ' ||
600 8d1b399b 2021-07-22 op next == '\t')
602 8d1b399b 2021-07-22 op else if (next == '\n') {
603 8d1b399b 2021-07-22 op file->lineno++;
606 8d1b399b 2021-07-22 op lungetc(next);
607 8d1b399b 2021-07-22 op } else if (c == quotec) {
610 8d1b399b 2021-07-22 op } else if (c == '\0') {
611 8d1b399b 2021-07-22 op yyerror("syntax error");
612 8d1b399b 2021-07-22 op return findeol();
614 8d1b399b 2021-07-22 op if (p + 1 >= buf + sizeof(buf) - 1) {
615 8d1b399b 2021-07-22 op yyerror("string too long");
616 8d1b399b 2021-07-22 op return findeol();
620 8d1b399b 2021-07-22 op yylval.v.string = strdup(buf);
621 8d1b399b 2021-07-22 op if (yylval.v.string == NULL)
622 8d1b399b 2021-07-22 op err(1, "yylex: strdup");
623 8d1b399b 2021-07-22 op return STRING;
626 8d1b399b 2021-07-22 op #define allowed_to_end_number(x) \
627 8d1b399b 2021-07-22 op (isspace(x) || x == ')' || x ==',' || x == '/' || x == '}' || x == '=')
629 8d1b399b 2021-07-22 op if (c == '-' || isdigit(c)) {
632 8d1b399b 2021-07-22 op if ((size_t)(p-buf) >= sizeof(buf)) {
633 8d1b399b 2021-07-22 op yyerror("string too long");
634 8d1b399b 2021-07-22 op return findeol();
636 8d1b399b 2021-07-22 op } while ((c = lgetc(0)) != EOF && isdigit(c));
638 8d1b399b 2021-07-22 op if (p == buf + 1 && buf[0] == '-')
639 8d1b399b 2021-07-22 op goto nodigits;
640 8d1b399b 2021-07-22 op if (c == EOF || allowed_to_end_number(c)) {
641 8d1b399b 2021-07-22 op const char *errstr = NULL;
644 8d1b399b 2021-07-22 op yylval.v.number = strtonum(buf, LLONG_MIN,
645 8d1b399b 2021-07-22 op LLONG_MAX, &errstr);
646 8d1b399b 2021-07-22 op if (errstr) {
647 8d1b399b 2021-07-22 op yyerror("\"%s\" invalid number: %s",
648 8d1b399b 2021-07-22 op buf, errstr);
649 8d1b399b 2021-07-22 op return findeol();
651 8d1b399b 2021-07-22 op return NUMBER;
654 8d1b399b 2021-07-22 op while (p > buf + 1)
655 e63bf1fb 2021-11-30 op lungetc((unsigned char)*--p);
656 e63bf1fb 2021-11-30 op c = (unsigned char)*--p;
657 8d1b399b 2021-07-22 op if (c == '-')
662 8d1b399b 2021-07-22 op #define allowed_in_string(x) \
663 8d1b399b 2021-07-22 op (isalnum(x) || (ispunct(x) && x != '(' && x != ')' && \
664 8d1b399b 2021-07-22 op x != '{' && x != '}' && \
665 8d1b399b 2021-07-22 op x != '!' && x != '=' && x != '#' && \
666 afb31195 2021-08-04 op x != ',' && x != '>'))
668 8d1b399b 2021-07-22 op if (isalnum(c) || c == ':' || c == '_') {
671 8d1b399b 2021-07-22 op if ((size_t)(p-buf) >= sizeof(buf)) {
672 8d1b399b 2021-07-22 op yyerror("string too long");
673 8d1b399b 2021-07-22 op return findeol();
675 8d1b399b 2021-07-22 op } while ((c = lgetc(0)) != EOF && (allowed_in_string(c)));
678 8d1b399b 2021-07-22 op if ((token = lookup(buf)) == STRING)
679 8d1b399b 2021-07-22 op if ((yylval.v.string = strdup(buf)) == NULL)
680 8d1b399b 2021-07-22 op err(1, "yylex: strdup");
681 8d1b399b 2021-07-22 op return token;
683 8d1b399b 2021-07-22 op if (c == '\n') {
684 8d1b399b 2021-07-22 op yylval.lineno = file->lineno;
685 8d1b399b 2021-07-22 op file->lineno++;
687 8d1b399b 2021-07-22 op if (c == EOF)
693 8d1b399b 2021-07-22 op check_file_secrecy(int fd, const char *fname)
695 8d1b399b 2021-07-22 op struct stat st;
697 8d1b399b 2021-07-22 op if (fstat(fd, &st)) {
698 8d1b399b 2021-07-22 op log_warn("cannot stat %s", fname);
701 8d1b399b 2021-07-22 op if (st.st_uid != 0 && st.st_uid != getuid()) {
702 8d1b399b 2021-07-22 op log_warnx("%s: owner not root or current user", fname);
705 8d1b399b 2021-07-22 op if (st.st_mode & (S_IWGRP | S_IXGRP | S_IRWXO)) {
706 8d1b399b 2021-07-22 op log_warnx("%s: group writable or world read/writable", fname);
712 8d1b399b 2021-07-22 op struct file *
713 8d1b399b 2021-07-22 op pushfile(const char *name, int secret)
715 8d1b399b 2021-07-22 op struct file *nfile;
717 8d1b399b 2021-07-22 op if ((nfile = calloc(1, sizeof(struct file))) == NULL) {
718 8d1b399b 2021-07-22 op log_warn("calloc");
721 8d1b399b 2021-07-22 op if ((nfile->name = strdup(name)) == NULL) {
722 8d1b399b 2021-07-22 op log_warn("strdup");
726 8d1b399b 2021-07-22 op if ((nfile->stream = fopen(nfile->name, "r")) == NULL) {
727 8d1b399b 2021-07-22 op log_warn("%s", nfile->name);
728 8d1b399b 2021-07-22 op free(nfile->name);
731 8d1b399b 2021-07-22 op } else if (secret &&
732 8d1b399b 2021-07-22 op check_file_secrecy(fileno(nfile->stream), nfile->name)) {
733 8d1b399b 2021-07-22 op fclose(nfile->stream);
734 8d1b399b 2021-07-22 op free(nfile->name);
738 8d1b399b 2021-07-22 op nfile->lineno = TAILQ_EMPTY(&files) ? 1 : 0;
739 8d1b399b 2021-07-22 op nfile->ungetsize = 16;
740 8d1b399b 2021-07-22 op nfile->ungetbuf = malloc(nfile->ungetsize);
741 8d1b399b 2021-07-22 op if (nfile->ungetbuf == NULL) {
742 8d1b399b 2021-07-22 op log_warn("malloc");
743 8d1b399b 2021-07-22 op fclose(nfile->stream);
744 8d1b399b 2021-07-22 op free(nfile->name);
748 8d1b399b 2021-07-22 op TAILQ_INSERT_TAIL(&files, nfile, entry);
749 8d1b399b 2021-07-22 op return nfile;
753 8d1b399b 2021-07-22 op popfile(void)
755 8d1b399b 2021-07-22 op struct file *prev;
757 8d1b399b 2021-07-22 op if ((prev = TAILQ_PREV(file, files, entry)) != NULL)
758 8d1b399b 2021-07-22 op prev->errors += file->errors;
760 8d1b399b 2021-07-22 op TAILQ_REMOVE(&files, file, entry);
761 8d1b399b 2021-07-22 op fclose(file->stream);
762 8d1b399b 2021-07-22 op free(file->name);
763 8d1b399b 2021-07-22 op free(file->ungetbuf);
766 8d1b399b 2021-07-22 op return file ? 0 : EOF;
769 8d1b399b 2021-07-22 op struct kd_conf *
770 8d1b399b 2021-07-22 op parse_config(const char *filename)
772 8d1b399b 2021-07-22 op struct sym *sym, *next;
775 8d1b399b 2021-07-22 op conf = config_new_empty();
777 8d1b399b 2021-07-22 op file = pushfile(filename, 0);
778 8d1b399b 2021-07-22 op if (file == NULL) {
782 8d1b399b 2021-07-22 op topfile = file;
785 8d1b399b 2021-07-22 op errors = file->errors;
788 8d1b399b 2021-07-22 op /* Free macros and check which have not been used. */
789 8d1b399b 2021-07-22 op TAILQ_FOREACH_SAFE(sym, &symhead, entry, next) {
790 8d1b399b 2021-07-22 op if (verbose && !sym->used)
791 8d1b399b 2021-07-22 op fprintf(stderr, "warning: macro '%s' not used\n",
793 8d1b399b 2021-07-22 op if (!sym->persist) {
794 8d1b399b 2021-07-22 op free(sym->nam);
795 8d1b399b 2021-07-22 op free(sym->val);
796 8d1b399b 2021-07-22 op TAILQ_REMOVE(&symhead, sym, entry);
801 8d1b399b 2021-07-22 op if (errors) {
802 8d1b399b 2021-07-22 op clear_config(conf);
810 8d1b399b 2021-07-22 op symset(const char *nam, const char *val, int persist)
812 8d1b399b 2021-07-22 op struct sym *sym;
814 8d1b399b 2021-07-22 op TAILQ_FOREACH(sym, &symhead, entry) {
815 8d1b399b 2021-07-22 op if (strcmp(nam, sym->nam) == 0)
819 8d1b399b 2021-07-22 op if (sym != NULL) {
820 8d1b399b 2021-07-22 op if (sym->persist == 1)
823 8d1b399b 2021-07-22 op free(sym->nam);
824 8d1b399b 2021-07-22 op free(sym->val);
825 8d1b399b 2021-07-22 op TAILQ_REMOVE(&symhead, sym, entry);
829 8d1b399b 2021-07-22 op if ((sym = calloc(1, sizeof(*sym))) == NULL)
832 8d1b399b 2021-07-22 op sym->nam = strdup(nam);
833 8d1b399b 2021-07-22 op if (sym->nam == NULL) {
837 8d1b399b 2021-07-22 op sym->val = strdup(val);
838 8d1b399b 2021-07-22 op if (sym->val == NULL) {
839 8d1b399b 2021-07-22 op free(sym->nam);
843 8d1b399b 2021-07-22 op sym->used = 0;
844 8d1b399b 2021-07-22 op sym->persist = persist;
845 8d1b399b 2021-07-22 op TAILQ_INSERT_TAIL(&symhead, sym, entry);
850 8d1b399b 2021-07-22 op cmdline_symset(char *s)
852 8d1b399b 2021-07-22 op char *sym, *val;
855 8d1b399b 2021-07-22 op if ((val = strrchr(s, '=')) == NULL)
857 8d1b399b 2021-07-22 op sym = strndup(s, val - s);
858 8d1b399b 2021-07-22 op if (sym == NULL)
859 8d1b399b 2021-07-22 op errx(1, "%s: strndup", __func__);
860 8d1b399b 2021-07-22 op ret = symset(sym, val + 1, 1);
867 8d1b399b 2021-07-22 op symget(const char *nam)
869 8d1b399b 2021-07-22 op struct sym *sym;
871 8d1b399b 2021-07-22 op TAILQ_FOREACH(sym, &symhead, entry) {
872 8d1b399b 2021-07-22 op if (strcmp(nam, sym->nam) == 0) {
873 8d1b399b 2021-07-22 op sym->used = 1;
874 8d1b399b 2021-07-22 op return sym->val;
881 8d1b399b 2021-07-22 op clear_config(struct kd_conf *xconf)
883 8d1b399b 2021-07-22 op /* free stuff? */
889 8d1b399b 2021-07-22 op add_table(const char *name, const char *type, const char *path)
891 8d1b399b 2021-07-22 op if (table_open(conf, name, type, path) == -1)
892 8d1b399b 2021-07-22 op yyerror("can't initialize table %s", name);
893 c25feded 2021-07-26 op table = STAILQ_FIRST(&conf->table_head)->table;
896 8d1b399b 2021-07-22 op static struct table *
897 8d1b399b 2021-07-22 op findtable(const char *name)
899 8d1b399b 2021-07-22 op struct kd_tables_conf *i;
901 c25feded 2021-07-26 op STAILQ_FOREACH(i, &conf->table_head, entry) {
902 8d1b399b 2021-07-22 op if (!strcmp(i->table->t_name, name))
903 8d1b399b 2021-07-22 op return i->table;
906 8d1b399b 2021-07-22 op yyerror("unknown table %s", name);
911 8d1b399b 2021-07-22 op add_cert(const char *name, const char *path)
913 8d1b399b 2021-07-22 op struct kd_pki_conf *pki;
915 c25feded 2021-07-26 op STAILQ_FOREACH(pki, &conf->pki_head, entry) {
916 8d1b399b 2021-07-22 op if (strcmp(name, pki->name) != 0)
919 8d1b399b 2021-07-22 op if (pki->cert != NULL) {
920 8d1b399b 2021-07-22 op yyerror("duplicate `pki %s cert'", name);
927 8d1b399b 2021-07-22 op pki = xcalloc(1, sizeof(*pki));
928 8d1b399b 2021-07-22 op strlcpy(pki->name, name, sizeof(pki->name));
929 c25feded 2021-07-26 op STAILQ_INSERT_HEAD(&conf->pki_head, pki, entry);
932 8d1b399b 2021-07-22 op if ((pki->cert = tls_load_file(path, &pki->certlen, NULL)) == NULL)
937 8d1b399b 2021-07-22 op add_key(const char *name, const char *path)
939 8d1b399b 2021-07-22 op struct kd_pki_conf *pki;
941 c25feded 2021-07-26 op STAILQ_FOREACH(pki, &conf->pki_head, entry) {
942 8d1b399b 2021-07-22 op if (strcmp(name, pki->name) != 0)
945 8d1b399b 2021-07-22 op if (pki->key != NULL) {
946 8d1b399b 2021-07-22 op yyerror("duplicate `pki %s key'", name);
953 8d1b399b 2021-07-22 op pki = xcalloc(1, sizeof(*pki));
954 8d1b399b 2021-07-22 op strlcpy(pki->name, name, sizeof(pki->name));
955 c25feded 2021-07-26 op STAILQ_INSERT_HEAD(&conf->pki_head, pki, entry);
958 8d1b399b 2021-07-22 op if ((pki->key = tls_load_file(path, &pki->keylen, NULL)) == NULL)
962 d82b9f6d 2021-07-22 op static struct kd_listen_conf *
963 d82b9f6d 2021-07-22 op listen_new(void)
965 8d1b399b 2021-07-22 op struct kd_listen_conf *l;
967 8d1b399b 2021-07-22 op l = xcalloc(1, sizeof(*l));
968 8d1b399b 2021-07-22 op l->id = counter++;
971 c25feded 2021-07-26 op STAILQ_INSERT_HEAD(&conf->listen_head, l, entry);