1 8d1b399b 2021-07-22 op /*
  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.
 10 8d1b399b 2021-07-22 op  *
 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.
 14 8d1b399b 2021-07-22 op  *
 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.
 22 8d1b399b 2021-07-22 op  */
 23 8d1b399b 2021-07-22 op 
 24 8d1b399b 2021-07-22 op %{
 25 8d1b399b 2021-07-22 op #include "compat.h"
 26 8d1b399b 2021-07-22 op 
 27 8d1b399b 2021-07-22 op #include <sys/stat.h>
 28 8d1b399b 2021-07-22 op 
 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>
 41 8d1b399b 2021-07-22 op 
 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"
 46 8d1b399b 2021-07-22 op 
 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;
 50 8d1b399b 2021-07-22 op 	FILE			*stream;
 51 8d1b399b 2021-07-22 op 	char			*name;
 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;
 56 8d1b399b 2021-07-22 op 	int			 lineno;
 57 8d1b399b 2021-07-22 op 	int			 errors;
 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);
 73 8d1b399b 2021-07-22 op 
 74 8d1b399b 2021-07-22 op TAILQ_HEAD(symhead, sym)	 symhead = TAILQ_HEAD_INITIALIZER(symhead);
 75 8d1b399b 2021-07-22 op struct sym {
 76 8d1b399b 2021-07-22 op 	TAILQ_ENTRY(sym)	 entry;
 77 8d1b399b 2021-07-22 op 	int			 used;
 78 8d1b399b 2021-07-22 op 	int			 persist;
 79 8d1b399b 2021-07-22 op 	char			*nam;
 80 8d1b399b 2021-07-22 op 	char			*val;
 81 8d1b399b 2021-07-22 op };
 82 8d1b399b 2021-07-22 op 
 83 8d1b399b 2021-07-22 op int	 symset(const char *, const char *, int);
 84 8d1b399b 2021-07-22 op char	*symget(const char *);
 85 8d1b399b 2021-07-22 op 
 86 8d1b399b 2021-07-22 op void	 clear_config(struct kd_conf *xconf);
 87 8d1b399b 2021-07-22 op 
 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);
 93 8d1b399b 2021-07-22 op 
 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;
 99 8d1b399b 2021-07-22 op 
100 8d1b399b 2021-07-22 op typedef struct {
101 8d1b399b 2021-07-22 op 	union {
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;
105 8d1b399b 2021-07-22 op 	} v;
106 8d1b399b 2021-07-22 op 	int lineno;
107 8d1b399b 2021-07-22 op } YYSTYPE;
108 8d1b399b 2021-07-22 op 
109 8d1b399b 2021-07-22 op %}
110 8d1b399b 2021-07-22 op 
111 8d1b399b 2021-07-22 op %token	AUTH
112 8d1b399b 2021-07-22 op %token	CERT
113 8d1b399b 2021-07-22 op %token	ERROR
114 8d1b399b 2021-07-22 op %token	INCLUDE
115 8d1b399b 2021-07-22 op %token	KEY
116 8d1b399b 2021-07-22 op %token	LISTEN
117 8d1b399b 2021-07-22 op %token	NO
118 8d1b399b 2021-07-22 op %token	ON
119 8d1b399b 2021-07-22 op %token	PKI PORT
120 8d1b399b 2021-07-22 op %token	TABLE TLS
121 8d1b399b 2021-07-22 op %token	YES
122 8d1b399b 2021-07-22 op 
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
128 8d1b399b 2021-07-22 op 
129 8d1b399b 2021-07-22 op %%
130 8d1b399b 2021-07-22 op 
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++; }
139 8d1b399b 2021-07-22 op 		;
140 8d1b399b 2021-07-22 op 
141 8d1b399b 2021-07-22 op include		: INCLUDE STRING		{
142 8d1b399b 2021-07-22 op 			struct file	*nfile;
143 8d1b399b 2021-07-22 op 
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);
146 8d1b399b 2021-07-22 op 				free($2);
147 8d1b399b 2021-07-22 op 				YYERROR;
148 8d1b399b 2021-07-22 op 			}
149 8d1b399b 2021-07-22 op 			free($2);
150 8d1b399b 2021-07-22 op 
151 8d1b399b 2021-07-22 op 			file = nfile;
152 8d1b399b 2021-07-22 op 			lungetc('\n');
153 8d1b399b 2021-07-22 op 		}
154 8d1b399b 2021-07-22 op 		;
155 8d1b399b 2021-07-22 op 
156 8d1b399b 2021-07-22 op string		: string STRING	{
157 8d1b399b 2021-07-22 op 			if (asprintf(&$$, "%s %s", $1, $2) == -1) {
158 8d1b399b 2021-07-22 op 				free($1);
159 8d1b399b 2021-07-22 op 				free($2);
160 8d1b399b 2021-07-22 op 				yyerror("string: asprintf");
161 8d1b399b 2021-07-22 op 				YYERROR;
162 8d1b399b 2021-07-22 op 			}
163 8d1b399b 2021-07-22 op 			free($1);
164 8d1b399b 2021-07-22 op 			free($2);
165 8d1b399b 2021-07-22 op 		}
166 8d1b399b 2021-07-22 op 		| STRING
167 8d1b399b 2021-07-22 op 		;
168 8d1b399b 2021-07-22 op 
169 8d1b399b 2021-07-22 op yesno		: YES	{ $$ = 1; }
170 8d1b399b 2021-07-22 op 		| NO	{ $$ = 0; }
171 8d1b399b 2021-07-22 op 		;
172 8d1b399b 2021-07-22 op 
173 8d1b399b 2021-07-22 op optnl		: '\n' optnl		/* zero or more newlines */
174 8d1b399b 2021-07-22 op 		| /*empty*/
175 8d1b399b 2021-07-22 op 		;
176 8d1b399b 2021-07-22 op 
177 8d1b399b 2021-07-22 op nl		: '\n' optnl		/* one or more newlines */
178 8d1b399b 2021-07-22 op 		;
179 8d1b399b 2021-07-22 op 
180 8d1b399b 2021-07-22 op arrow		: '=' '>' ;
181 8d1b399b 2021-07-22 op 
182 8d1b399b 2021-07-22 op comma		: ',' optnl
183 8d1b399b 2021-07-22 op 		| nl
184 8d1b399b 2021-07-22 op 		;
185 8d1b399b 2021-07-22 op 
186 8d1b399b 2021-07-22 op varset		: STRING '=' string		{
187 8d1b399b 2021-07-22 op 			char *s = $1;
188 8d1b399b 2021-07-22 op 			if (verbose)
189 8d1b399b 2021-07-22 op 				printf("%s = \"%s\"\n", $1, $3);
190 8d1b399b 2021-07-22 op 			while (*s++) {
191 8d1b399b 2021-07-22 op 				if (isspace((unsigned char)*s)) {
192 8d1b399b 2021-07-22 op 					yyerror("macro name cannot contain "
193 8d1b399b 2021-07-22 op 					    "whitespace");
194 8d1b399b 2021-07-22 op 					free($1);
195 8d1b399b 2021-07-22 op 					free($3);
196 8d1b399b 2021-07-22 op 					YYERROR;
197 8d1b399b 2021-07-22 op 				}
198 8d1b399b 2021-07-22 op 			}
199 8d1b399b 2021-07-22 op 			if (symset($1, $3, 0) == -1)
200 8d1b399b 2021-07-22 op 				fatal("cannot store variable");
201 8d1b399b 2021-07-22 op 			free($1);
202 8d1b399b 2021-07-22 op 			free($3);
203 8d1b399b 2021-07-22 op 		}
204 8d1b399b 2021-07-22 op 		;
205 8d1b399b 2021-07-22 op 
206 8d1b399b 2021-07-22 op pki		: PKI STRING CERT STRING { add_cert($2, $4); }
207 8d1b399b 2021-07-22 op 		| PKI STRING KEY STRING  { add_key($2, $4); }
208 8d1b399b 2021-07-22 op 		;
209 8d1b399b 2021-07-22 op 
210 8d1b399b 2021-07-22 op table_kp	: string arrow string {
211 8d1b399b 2021-07-22 op 			if (table_add(table, $1, $3) == -1)
212 8d1b399b 2021-07-22 op 				yyerror("can't add to table %s",
213 8d1b399b 2021-07-22 op 				    table->t_name);
214 8d1b399b 2021-07-22 op 			free($1);
215 8d1b399b 2021-07-22 op 			free($3);
216 8d1b399b 2021-07-22 op 		}
217 8d1b399b 2021-07-22 op 		;
218 8d1b399b 2021-07-22 op 
219 8d1b399b 2021-07-22 op table_kps	: table_kp
220 8d1b399b 2021-07-22 op 		| table_kp comma table_kps
221 8d1b399b 2021-07-22 op 		;
222 8d1b399b 2021-07-22 op 
223 8d1b399b 2021-07-22 op stringel	: STRING {
224 8d1b399b 2021-07-22 op 			if (table_add(table, $1, NULL) == -1)
225 8d1b399b 2021-07-22 op 				yyerror("can't add to table %s",
226 8d1b399b 2021-07-22 op 				    table->t_name);
227 8d1b399b 2021-07-22 op 			free($1);
228 8d1b399b 2021-07-22 op 		}
229 8d1b399b 2021-07-22 op 		;
230 8d1b399b 2021-07-22 op 
231 8d1b399b 2021-07-22 op string_list	: stringel
232 8d1b399b 2021-07-22 op 		| stringel comma string_list
233 8d1b399b 2021-07-22 op 		;
234 8d1b399b 2021-07-22 op 
235 8d1b399b 2021-07-22 op table_vals	: table_kps
236 8d1b399b 2021-07-22 op 		| string_list
237 8d1b399b 2021-07-22 op 		;
238 8d1b399b 2021-07-22 op 
239 8d1b399b 2021-07-22 op table		: TABLE STRING STRING {
240 8d1b399b 2021-07-22 op 			char *p;
241 8d1b399b 2021-07-22 op 
242 8d1b399b 2021-07-22 op 			if ((p = strchr($3, ':')) == NULL) {
243 8d1b399b 2021-07-22 op 				yyerror("invalid table %s", $2);
244 8d1b399b 2021-07-22 op 				YYERROR;
245 8d1b399b 2021-07-22 op 			}
246 8d1b399b 2021-07-22 op 
247 8d1b399b 2021-07-22 op 			*p = '\0';
248 8d1b399b 2021-07-22 op 			add_table($2, $3, p+1);
249 8d1b399b 2021-07-22 op 			free($2);
250 8d1b399b 2021-07-22 op 			free($3);
251 8d1b399b 2021-07-22 op 		}
252 8d1b399b 2021-07-22 op 		| TABLE STRING {
253 8d1b399b 2021-07-22 op 			add_table($2, "static", NULL);
254 8d1b399b 2021-07-22 op 		} '{' table_vals '}' {
255 8d1b399b 2021-07-22 op 			table = NULL;
256 8d1b399b 2021-07-22 op 		}
257 8d1b399b 2021-07-22 op 		;
258 8d1b399b 2021-07-22 op 
259 8d1b399b 2021-07-22 op tableref	: '<' STRING '>' {
260 d82b9f6d 2021-07-22 op 			struct table *t;
261 d82b9f6d 2021-07-22 op 
262 d82b9f6d 2021-07-22 op 			t = findtable($2);
263 d82b9f6d 2021-07-22 op 			free($2);
264 d82b9f6d 2021-07-22 op 			if (t == NULL)
265 8d1b399b 2021-07-22 op 				YYERROR;
266 d82b9f6d 2021-07-22 op 			$$ = t;
267 8d1b399b 2021-07-22 op 		}
268 8d1b399b 2021-07-22 op 		;
269 8d1b399b 2021-07-22 op 
270 95eb4eb9 2021-07-22 op listen		: LISTEN { listener = listen_new(); }
271 fccfa871 2021-07-23 op 		listen_opts {
272 fccfa871 2021-07-23 op 			if (listener->auth_table == NULL)
273 fccfa871 2021-07-23 op 				yyerror("missing auth table");
274 2695b856 2021-07-23 op 			if (!(listener->flags & L_TLS))
275 2695b856 2021-07-23 op 				yyerror("can't define a non-tls listener");
276 fccfa871 2021-07-23 op 
277 fccfa871 2021-07-23 op 			listener = NULL;
278 fccfa871 2021-07-23 op 		};
279 8d1b399b 2021-07-22 op 
280 d82b9f6d 2021-07-22 op listen_opts	: listen_opt
281 d82b9f6d 2021-07-22 op 		| listen_opt listen_opts
282 d82b9f6d 2021-07-22 op 		;
283 d82b9f6d 2021-07-22 op 
284 d82b9f6d 2021-07-22 op listen_opt	: ON STRING PORT NUMBER	{
285 95eb4eb9 2021-07-22 op 			if (*listener->iface != '\0')
286 d82b9f6d 2021-07-22 op 				yyerror("listen address and port already"
287 d82b9f6d 2021-07-22 op 				    " defined");
288 95eb4eb9 2021-07-22 op 			strlcpy(listener->iface, $2, sizeof(listener->iface));
289 95eb4eb9 2021-07-22 op 			listener->port = $4;
290 d82b9f6d 2021-07-22 op 		}
291 d82b9f6d 2021-07-22 op 		| TLS PKI STRING {
292 95eb4eb9 2021-07-22 op 			if (*listener->pki != '\0')
293 d82b9f6d 2021-07-22 op 				yyerror("listen tls pki already defined");
294 fccfa871 2021-07-23 op 			listener->flags |= L_TLS;
295 95eb4eb9 2021-07-22 op 			strlcpy(listener->pki, $3, sizeof(listener->pki));
296 d82b9f6d 2021-07-22 op 		}
297 d82b9f6d 2021-07-22 op 		| AUTH tableref {
298 95eb4eb9 2021-07-22 op 			if (listener->auth_table != NULL)
299 d82b9f6d 2021-07-22 op 				yyerror("listen auth already defined");
300 95eb4eb9 2021-07-22 op 			listener->auth_table = $2;
301 8d1b399b 2021-07-22 op 		}
302 8d1b399b 2021-07-22 op 		;
303 8d1b399b 2021-07-22 op 
304 8d1b399b 2021-07-22 op %%
305 8d1b399b 2021-07-22 op 
306 8d1b399b 2021-07-22 op struct keywords {
307 8d1b399b 2021-07-22 op 	const char	*k_name;
308 8d1b399b 2021-07-22 op 	int		 k_val;
309 8d1b399b 2021-07-22 op };
310 8d1b399b 2021-07-22 op 
311 8d1b399b 2021-07-22 op int
312 8d1b399b 2021-07-22 op yyerror(const char *fmt, ...)
313 8d1b399b 2021-07-22 op {
314 8d1b399b 2021-07-22 op 	va_list		 ap;
315 8d1b399b 2021-07-22 op 	char		*msg;
316 8d1b399b 2021-07-22 op 
317 8d1b399b 2021-07-22 op 	file->errors++;
318 8d1b399b 2021-07-22 op 	va_start(ap, fmt);
319 8d1b399b 2021-07-22 op 	if (vasprintf(&msg, fmt, ap) == -1)
320 8d1b399b 2021-07-22 op 		fatalx("yyerror vasprintf");
321 8d1b399b 2021-07-22 op 	va_end(ap);
322 8d1b399b 2021-07-22 op 	logit(LOG_CRIT, "%s:%d: %s", file->name, yylval.lineno, msg);
323 8d1b399b 2021-07-22 op 	free(msg);
324 8d1b399b 2021-07-22 op 	return 0;
325 8d1b399b 2021-07-22 op }
326 8d1b399b 2021-07-22 op 
327 8d1b399b 2021-07-22 op int
328 8d1b399b 2021-07-22 op kw_cmp(const void *k, const void *e)
329 8d1b399b 2021-07-22 op {
330 8d1b399b 2021-07-22 op 	return strcmp(k, ((const struct keywords *)e)->k_name);
331 8d1b399b 2021-07-22 op }
332 8d1b399b 2021-07-22 op 
333 8d1b399b 2021-07-22 op int
334 8d1b399b 2021-07-22 op lookup(char *s)
335 8d1b399b 2021-07-22 op {
336 8d1b399b 2021-07-22 op 	/* This has to be sorted always. */
337 8d1b399b 2021-07-22 op 	static const struct keywords keywords[] = {
338 8d1b399b 2021-07-22 op 		{"auth",		AUTH},
339 8d1b399b 2021-07-22 op 		{"cert",		CERT},
340 8d1b399b 2021-07-22 op 		{"include",		INCLUDE},
341 8d1b399b 2021-07-22 op 		{"key",			KEY},
342 8d1b399b 2021-07-22 op 		{"listen",		LISTEN},
343 8d1b399b 2021-07-22 op 		{"no",			NO},
344 8d1b399b 2021-07-22 op 		{"on",			ON},
345 8d1b399b 2021-07-22 op 		{"pki",			PKI},
346 8d1b399b 2021-07-22 op 		{"port",		PORT},
347 8d1b399b 2021-07-22 op 		{"table",		TABLE},
348 8d1b399b 2021-07-22 op 		{"tls",			TLS},
349 8d1b399b 2021-07-22 op 		{"yes",			YES},
350 8d1b399b 2021-07-22 op 	};
351 8d1b399b 2021-07-22 op 	const struct keywords	*p;
352 8d1b399b 2021-07-22 op 
353 8d1b399b 2021-07-22 op 	p = bsearch(s, keywords, sizeof(keywords)/sizeof(keywords[0]),
354 8d1b399b 2021-07-22 op 	    sizeof(keywords[0]), kw_cmp);
355 8d1b399b 2021-07-22 op 
356 8d1b399b 2021-07-22 op 	if (p)
357 8d1b399b 2021-07-22 op 		return p->k_val;
358 8d1b399b 2021-07-22 op 	else
359 8d1b399b 2021-07-22 op 		return STRING;
360 8d1b399b 2021-07-22 op }
361 8d1b399b 2021-07-22 op 
362 8d1b399b 2021-07-22 op #define START_EXPAND	1
363 8d1b399b 2021-07-22 op #define DONE_EXPAND	2
364 8d1b399b 2021-07-22 op 
365 8d1b399b 2021-07-22 op static int	expanding;
366 8d1b399b 2021-07-22 op 
367 8d1b399b 2021-07-22 op int
368 8d1b399b 2021-07-22 op igetc(void)
369 8d1b399b 2021-07-22 op {
370 8d1b399b 2021-07-22 op 	int	c;
371 8d1b399b 2021-07-22 op 
372 8d1b399b 2021-07-22 op 	while (1) {
373 8d1b399b 2021-07-22 op 		if (file->ungetpos > 0)
374 8d1b399b 2021-07-22 op 			c = file->ungetbuf[--file->ungetpos];
375 8d1b399b 2021-07-22 op 		else
376 8d1b399b 2021-07-22 op 			c = getc(file->stream);
377 8d1b399b 2021-07-22 op 
378 8d1b399b 2021-07-22 op 		if (c == START_EXPAND)
379 8d1b399b 2021-07-22 op 			expanding = 1;
380 8d1b399b 2021-07-22 op 		else if (c == DONE_EXPAND)
381 8d1b399b 2021-07-22 op 			expanding = 0;
382 8d1b399b 2021-07-22 op 		else
383 8d1b399b 2021-07-22 op 			break;
384 8d1b399b 2021-07-22 op 	}
385 8d1b399b 2021-07-22 op 	return c;
386 8d1b399b 2021-07-22 op }
387 8d1b399b 2021-07-22 op 
388 8d1b399b 2021-07-22 op int
389 8d1b399b 2021-07-22 op lgetc(int quotec)
390 8d1b399b 2021-07-22 op {
391 8d1b399b 2021-07-22 op 	int		c, next;
392 8d1b399b 2021-07-22 op 
393 8d1b399b 2021-07-22 op 	if (quotec) {
394 8d1b399b 2021-07-22 op 		if ((c = igetc()) == EOF) {
395 8d1b399b 2021-07-22 op 			yyerror("reached end of file while parsing "
396 8d1b399b 2021-07-22 op 			    "quoted string");
397 8d1b399b 2021-07-22 op 			if (file == topfile || popfile() == EOF)
398 8d1b399b 2021-07-22 op 				return EOF;
399 8d1b399b 2021-07-22 op 			return quotec;
400 8d1b399b 2021-07-22 op 		}
401 8d1b399b 2021-07-22 op 		return c;
402 8d1b399b 2021-07-22 op 	}
403 8d1b399b 2021-07-22 op 
404 8d1b399b 2021-07-22 op 	while ((c = igetc()) == '\\') {
405 8d1b399b 2021-07-22 op 		next = igetc();
406 8d1b399b 2021-07-22 op 		if (next != '\n') {
407 8d1b399b 2021-07-22 op 			c = next;
408 8d1b399b 2021-07-22 op 			break;
409 8d1b399b 2021-07-22 op 		}
410 8d1b399b 2021-07-22 op 		yylval.lineno = file->lineno;
411 8d1b399b 2021-07-22 op 		file->lineno++;
412 8d1b399b 2021-07-22 op 	}
413 8d1b399b 2021-07-22 op 
414 8d1b399b 2021-07-22 op 	if (c == EOF) {
415 8d1b399b 2021-07-22 op 		/*
416 8d1b399b 2021-07-22 op 		 * Fake EOL when hit EOF for the first time. This gets line
417 8d1b399b 2021-07-22 op 		 * count right if last line in included file is syntactically
418 8d1b399b 2021-07-22 op 		 * invalid and has no newline.
419 8d1b399b 2021-07-22 op 		 */
420 8d1b399b 2021-07-22 op 		if (file->eof_reached == 0) {
421 8d1b399b 2021-07-22 op 			file->eof_reached = 1;
422 8d1b399b 2021-07-22 op 			return '\n';
423 8d1b399b 2021-07-22 op 		}
424 8d1b399b 2021-07-22 op 		while (c == EOF) {
425 8d1b399b 2021-07-22 op 			if (file == topfile || popfile() == EOF)
426 8d1b399b 2021-07-22 op 				return EOF;
427 8d1b399b 2021-07-22 op 			c = igetc();
428 8d1b399b 2021-07-22 op 		}
429 8d1b399b 2021-07-22 op 	}
430 8d1b399b 2021-07-22 op 	return c;
431 8d1b399b 2021-07-22 op }
432 8d1b399b 2021-07-22 op 
433 8d1b399b 2021-07-22 op void
434 8d1b399b 2021-07-22 op lungetc(int c)
435 8d1b399b 2021-07-22 op {
436 8d1b399b 2021-07-22 op 	if (c == EOF)
437 8d1b399b 2021-07-22 op 		return;
438 8d1b399b 2021-07-22 op 
439 8d1b399b 2021-07-22 op 	if (file->ungetpos >= file->ungetsize) {
440 8d1b399b 2021-07-22 op 		void *p = reallocarray(file->ungetbuf, file->ungetsize, 2);
441 8d1b399b 2021-07-22 op 		if (p == NULL)
442 8d1b399b 2021-07-22 op 			err(1, "lungetc");
443 8d1b399b 2021-07-22 op 		file->ungetbuf = p;
444 8d1b399b 2021-07-22 op 		file->ungetsize *= 2;
445 8d1b399b 2021-07-22 op 	}
446 8d1b399b 2021-07-22 op 	file->ungetbuf[file->ungetpos++] = c;
447 8d1b399b 2021-07-22 op }
448 8d1b399b 2021-07-22 op 
449 8d1b399b 2021-07-22 op int
450 8d1b399b 2021-07-22 op findeol(void)
451 8d1b399b 2021-07-22 op {
452 8d1b399b 2021-07-22 op 	int	c;
453 8d1b399b 2021-07-22 op 
454 8d1b399b 2021-07-22 op 	/* Skip to either EOF or the first real EOL. */
455 8d1b399b 2021-07-22 op 	while (1) {
456 8d1b399b 2021-07-22 op 		c = lgetc(0);
457 8d1b399b 2021-07-22 op 		if (c == '\n') {
458 8d1b399b 2021-07-22 op 			file->lineno++;
459 8d1b399b 2021-07-22 op 			break;
460 8d1b399b 2021-07-22 op 		}
461 8d1b399b 2021-07-22 op 		if (c == EOF)
462 8d1b399b 2021-07-22 op 			break;
463 8d1b399b 2021-07-22 op 	}
464 8d1b399b 2021-07-22 op 	return ERROR;
465 8d1b399b 2021-07-22 op }
466 8d1b399b 2021-07-22 op 
467 8d1b399b 2021-07-22 op int
468 8d1b399b 2021-07-22 op yylex(void)
469 8d1b399b 2021-07-22 op {
470 8d1b399b 2021-07-22 op 	unsigned char	 buf[8096];
471 8d1b399b 2021-07-22 op 	unsigned char	*p, *val;
472 8d1b399b 2021-07-22 op 	int		 quotec, next, c;
473 8d1b399b 2021-07-22 op 	int		 token;
474 8d1b399b 2021-07-22 op 
475 8d1b399b 2021-07-22 op top:
476 8d1b399b 2021-07-22 op 	p = buf;
477 8d1b399b 2021-07-22 op 	while ((c = lgetc(0)) == ' ' || c == '\t')
478 8d1b399b 2021-07-22 op 		; /* nothing */
479 8d1b399b 2021-07-22 op 
480 8d1b399b 2021-07-22 op 	yylval.lineno = file->lineno;
481 8d1b399b 2021-07-22 op 	if (c == '#')
482 8d1b399b 2021-07-22 op 		while ((c = lgetc(0)) != '\n' && c != EOF)
483 8d1b399b 2021-07-22 op 			; /* nothing */
484 8d1b399b 2021-07-22 op 	if (c == '$' && !expanding) {
485 8d1b399b 2021-07-22 op 		while (1) {
486 8d1b399b 2021-07-22 op 			if ((c = lgetc(0)) == EOF)
487 8d1b399b 2021-07-22 op 				return 0;
488 8d1b399b 2021-07-22 op 
489 8d1b399b 2021-07-22 op 			if (p + 1 >= buf + sizeof(buf) - 1) {
490 8d1b399b 2021-07-22 op 				yyerror("string too long");
491 8d1b399b 2021-07-22 op 				return findeol();
492 8d1b399b 2021-07-22 op 			}
493 8d1b399b 2021-07-22 op 			if (isalnum(c) || c == '_') {
494 8d1b399b 2021-07-22 op 				*p++ = c;
495 8d1b399b 2021-07-22 op 				continue;
496 8d1b399b 2021-07-22 op 			}
497 8d1b399b 2021-07-22 op 			*p = '\0';
498 8d1b399b 2021-07-22 op 			lungetc(c);
499 8d1b399b 2021-07-22 op 			break;
500 8d1b399b 2021-07-22 op 		}
501 8d1b399b 2021-07-22 op 		val = symget(buf);
502 8d1b399b 2021-07-22 op 		if (val == NULL) {
503 8d1b399b 2021-07-22 op 			yyerror("macro '%s' not defined", buf);
504 8d1b399b 2021-07-22 op 			return findeol();
505 8d1b399b 2021-07-22 op 		}
506 8d1b399b 2021-07-22 op 		p = val + strlen(val) - 1;
507 8d1b399b 2021-07-22 op 		lungetc(DONE_EXPAND);
508 8d1b399b 2021-07-22 op 		while (p >= val) {
509 8d1b399b 2021-07-22 op 			lungetc(*p);
510 8d1b399b 2021-07-22 op 			p--;
511 8d1b399b 2021-07-22 op 		}
512 8d1b399b 2021-07-22 op 		lungetc(START_EXPAND);
513 8d1b399b 2021-07-22 op 		goto top;
514 8d1b399b 2021-07-22 op 	}
515 8d1b399b 2021-07-22 op 
516 8d1b399b 2021-07-22 op 	switch (c) {
517 8d1b399b 2021-07-22 op 	case '\'':
518 8d1b399b 2021-07-22 op 	case '"':
519 8d1b399b 2021-07-22 op 		quotec = c;
520 8d1b399b 2021-07-22 op 		while (1) {
521 8d1b399b 2021-07-22 op 			if ((c = lgetc(quotec)) == EOF)
522 8d1b399b 2021-07-22 op 				return 0;
523 8d1b399b 2021-07-22 op 			if (c == '\n') {
524 8d1b399b 2021-07-22 op 				file->lineno++;
525 8d1b399b 2021-07-22 op 				continue;
526 8d1b399b 2021-07-22 op 			} else if (c == '\\') {
527 8d1b399b 2021-07-22 op 				if ((next = lgetc(quotec)) == EOF)
528 8d1b399b 2021-07-22 op 					return (0);
529 8d1b399b 2021-07-22 op 				if (next == quotec || next == ' ' ||
530 8d1b399b 2021-07-22 op 				    next == '\t')
531 8d1b399b 2021-07-22 op 					c = next;
532 8d1b399b 2021-07-22 op 				else if (next == '\n') {
533 8d1b399b 2021-07-22 op 					file->lineno++;
534 8d1b399b 2021-07-22 op 					continue;
535 8d1b399b 2021-07-22 op 				} else
536 8d1b399b 2021-07-22 op 					lungetc(next);
537 8d1b399b 2021-07-22 op 			} else if (c == quotec) {
538 8d1b399b 2021-07-22 op 				*p = '\0';
539 8d1b399b 2021-07-22 op 				break;
540 8d1b399b 2021-07-22 op 			} else if (c == '\0') {
541 8d1b399b 2021-07-22 op 				yyerror("syntax error");
542 8d1b399b 2021-07-22 op 				return findeol();
543 8d1b399b 2021-07-22 op 			}
544 8d1b399b 2021-07-22 op 			if (p + 1 >= buf + sizeof(buf) - 1) {
545 8d1b399b 2021-07-22 op 				yyerror("string too long");
546 8d1b399b 2021-07-22 op 				return findeol();
547 8d1b399b 2021-07-22 op 			}
548 8d1b399b 2021-07-22 op 			*p++ = c;
549 8d1b399b 2021-07-22 op 		}
550 8d1b399b 2021-07-22 op 		yylval.v.string = strdup(buf);
551 8d1b399b 2021-07-22 op 		if (yylval.v.string == NULL)
552 8d1b399b 2021-07-22 op 			err(1, "yylex: strdup");
553 8d1b399b 2021-07-22 op 		return STRING;
554 8d1b399b 2021-07-22 op 	}
555 8d1b399b 2021-07-22 op 
556 8d1b399b 2021-07-22 op #define allowed_to_end_number(x) \
557 8d1b399b 2021-07-22 op 	(isspace(x) || x == ')' || x ==',' || x == '/' || x == '}' || x == '=')
558 8d1b399b 2021-07-22 op 
559 8d1b399b 2021-07-22 op 	if (c == '-' || isdigit(c)) {
560 8d1b399b 2021-07-22 op 		do {
561 8d1b399b 2021-07-22 op 			*p++ = c;
562 8d1b399b 2021-07-22 op 			if ((size_t)(p-buf) >= sizeof(buf)) {
563 8d1b399b 2021-07-22 op 				yyerror("string too long");
564 8d1b399b 2021-07-22 op 				return findeol();
565 8d1b399b 2021-07-22 op 			}
566 8d1b399b 2021-07-22 op 		} while ((c = lgetc(0)) != EOF && isdigit(c));
567 8d1b399b 2021-07-22 op 		lungetc(c);
568 8d1b399b 2021-07-22 op 		if (p == buf + 1 && buf[0] == '-')
569 8d1b399b 2021-07-22 op 			goto nodigits;
570 8d1b399b 2021-07-22 op 		if (c == EOF || allowed_to_end_number(c)) {
571 8d1b399b 2021-07-22 op 			const char *errstr = NULL;
572 8d1b399b 2021-07-22 op 
573 8d1b399b 2021-07-22 op 			*p = '\0';
574 8d1b399b 2021-07-22 op 			yylval.v.number = strtonum(buf, LLONG_MIN,
575 8d1b399b 2021-07-22 op 			    LLONG_MAX, &errstr);
576 8d1b399b 2021-07-22 op 			if (errstr) {
577 8d1b399b 2021-07-22 op 				yyerror("\"%s\" invalid number: %s",
578 8d1b399b 2021-07-22 op 				    buf, errstr);
579 8d1b399b 2021-07-22 op 				return findeol();
580 8d1b399b 2021-07-22 op 			}
581 8d1b399b 2021-07-22 op 			return NUMBER;
582 8d1b399b 2021-07-22 op 		} else {
583 8d1b399b 2021-07-22 op nodigits:
584 8d1b399b 2021-07-22 op 			while (p > buf + 1)
585 8d1b399b 2021-07-22 op 				lungetc(*--p);
586 8d1b399b 2021-07-22 op 			c = *--p;
587 8d1b399b 2021-07-22 op 			if (c == '-')
588 8d1b399b 2021-07-22 op 				return c;
589 8d1b399b 2021-07-22 op 		}
590 8d1b399b 2021-07-22 op 	}
591 8d1b399b 2021-07-22 op 
592 8d1b399b 2021-07-22 op #define allowed_in_string(x) \
593 8d1b399b 2021-07-22 op 	(isalnum(x) || (ispunct(x) && x != '(' && x != ')' && \
594 8d1b399b 2021-07-22 op 	x != '{' && x != '}' && \
595 8d1b399b 2021-07-22 op 	x != '!' && x != '=' && x != '#' && \
596 8d1b399b 2021-07-22 op 	x != ','))
597 8d1b399b 2021-07-22 op 
598 8d1b399b 2021-07-22 op 	if (isalnum(c) || c == ':' || c == '_') {
599 8d1b399b 2021-07-22 op 		do {
600 8d1b399b 2021-07-22 op 			*p++ = c;
601 8d1b399b 2021-07-22 op 			if ((size_t)(p-buf) >= sizeof(buf)) {
602 8d1b399b 2021-07-22 op 				yyerror("string too long");
603 8d1b399b 2021-07-22 op 				return findeol();
604 8d1b399b 2021-07-22 op 			}
605 8d1b399b 2021-07-22 op 		} while ((c = lgetc(0)) != EOF && (allowed_in_string(c)));
606 8d1b399b 2021-07-22 op 		lungetc(c);
607 8d1b399b 2021-07-22 op 		*p = '\0';
608 8d1b399b 2021-07-22 op 		if ((token = lookup(buf)) == STRING)
609 8d1b399b 2021-07-22 op 			if ((yylval.v.string = strdup(buf)) == NULL)
610 8d1b399b 2021-07-22 op 				err(1, "yylex: strdup");
611 8d1b399b 2021-07-22 op 		return token;
612 8d1b399b 2021-07-22 op 	}
613 8d1b399b 2021-07-22 op 	if (c == '\n') {
614 8d1b399b 2021-07-22 op 		yylval.lineno = file->lineno;
615 8d1b399b 2021-07-22 op 		file->lineno++;
616 8d1b399b 2021-07-22 op 	}
617 8d1b399b 2021-07-22 op 	if (c == EOF)
618 8d1b399b 2021-07-22 op 		return 0;
619 8d1b399b 2021-07-22 op 	return c;
620 8d1b399b 2021-07-22 op }
621 8d1b399b 2021-07-22 op 
622 8d1b399b 2021-07-22 op int
623 8d1b399b 2021-07-22 op check_file_secrecy(int fd, const char *fname)
624 8d1b399b 2021-07-22 op {
625 8d1b399b 2021-07-22 op 	struct stat	st;
626 8d1b399b 2021-07-22 op 
627 8d1b399b 2021-07-22 op 	if (fstat(fd, &st)) {
628 8d1b399b 2021-07-22 op 		log_warn("cannot stat %s", fname);
629 8d1b399b 2021-07-22 op 		return -1;
630 8d1b399b 2021-07-22 op 	}
631 8d1b399b 2021-07-22 op 	if (st.st_uid != 0 && st.st_uid != getuid()) {
632 8d1b399b 2021-07-22 op 		log_warnx("%s: owner not root or current user", fname);
633 8d1b399b 2021-07-22 op 		return -1;
634 8d1b399b 2021-07-22 op 	}
635 8d1b399b 2021-07-22 op 	if (st.st_mode & (S_IWGRP | S_IXGRP | S_IRWXO)) {
636 8d1b399b 2021-07-22 op 		log_warnx("%s: group writable or world read/writable", fname);
637 8d1b399b 2021-07-22 op 		return -1;
638 8d1b399b 2021-07-22 op 	}
639 8d1b399b 2021-07-22 op 	return 0;
640 8d1b399b 2021-07-22 op }
641 8d1b399b 2021-07-22 op 
642 8d1b399b 2021-07-22 op struct file *
643 8d1b399b 2021-07-22 op pushfile(const char *name, int secret)
644 8d1b399b 2021-07-22 op {
645 8d1b399b 2021-07-22 op 	struct file	*nfile;
646 8d1b399b 2021-07-22 op 
647 8d1b399b 2021-07-22 op 	if ((nfile = calloc(1, sizeof(struct file))) == NULL) {
648 8d1b399b 2021-07-22 op 		log_warn("calloc");
649 8d1b399b 2021-07-22 op 		return NULL;
650 8d1b399b 2021-07-22 op 	}
651 8d1b399b 2021-07-22 op 	if ((nfile->name = strdup(name)) == NULL) {
652 8d1b399b 2021-07-22 op 		log_warn("strdup");
653 8d1b399b 2021-07-22 op 		free(nfile);
654 8d1b399b 2021-07-22 op 		return NULL;
655 8d1b399b 2021-07-22 op 	}
656 8d1b399b 2021-07-22 op 	if ((nfile->stream = fopen(nfile->name, "r")) == NULL) {
657 8d1b399b 2021-07-22 op 		log_warn("%s", nfile->name);
658 8d1b399b 2021-07-22 op 		free(nfile->name);
659 8d1b399b 2021-07-22 op 		free(nfile);
660 8d1b399b 2021-07-22 op 		return NULL;
661 8d1b399b 2021-07-22 op 	} else if (secret &&
662 8d1b399b 2021-07-22 op 	    check_file_secrecy(fileno(nfile->stream), nfile->name)) {
663 8d1b399b 2021-07-22 op 		fclose(nfile->stream);
664 8d1b399b 2021-07-22 op 		free(nfile->name);
665 8d1b399b 2021-07-22 op 		free(nfile);
666 8d1b399b 2021-07-22 op 		return NULL;
667 8d1b399b 2021-07-22 op 	}
668 8d1b399b 2021-07-22 op 	nfile->lineno = TAILQ_EMPTY(&files) ? 1 : 0;
669 8d1b399b 2021-07-22 op 	nfile->ungetsize = 16;
670 8d1b399b 2021-07-22 op 	nfile->ungetbuf = malloc(nfile->ungetsize);
671 8d1b399b 2021-07-22 op 	if (nfile->ungetbuf == NULL) {
672 8d1b399b 2021-07-22 op 		log_warn("malloc");
673 8d1b399b 2021-07-22 op 		fclose(nfile->stream);
674 8d1b399b 2021-07-22 op 		free(nfile->name);
675 8d1b399b 2021-07-22 op 		free(nfile);
676 8d1b399b 2021-07-22 op 		return NULL;
677 8d1b399b 2021-07-22 op 	}
678 8d1b399b 2021-07-22 op 	TAILQ_INSERT_TAIL(&files, nfile, entry);
679 8d1b399b 2021-07-22 op 	return nfile;
680 8d1b399b 2021-07-22 op }
681 8d1b399b 2021-07-22 op 
682 8d1b399b 2021-07-22 op int
683 8d1b399b 2021-07-22 op popfile(void)
684 8d1b399b 2021-07-22 op {
685 8d1b399b 2021-07-22 op 	struct file	*prev;
686 8d1b399b 2021-07-22 op 
687 8d1b399b 2021-07-22 op 	if ((prev = TAILQ_PREV(file, files, entry)) != NULL)
688 8d1b399b 2021-07-22 op 		prev->errors += file->errors;
689 8d1b399b 2021-07-22 op 
690 8d1b399b 2021-07-22 op 	TAILQ_REMOVE(&files, file, entry);
691 8d1b399b 2021-07-22 op 	fclose(file->stream);
692 8d1b399b 2021-07-22 op 	free(file->name);
693 8d1b399b 2021-07-22 op 	free(file->ungetbuf);
694 8d1b399b 2021-07-22 op 	free(file);
695 8d1b399b 2021-07-22 op 	file = prev;
696 8d1b399b 2021-07-22 op 	return file ? 0 : EOF;
697 8d1b399b 2021-07-22 op }
698 8d1b399b 2021-07-22 op 
699 8d1b399b 2021-07-22 op struct kd_conf *
700 8d1b399b 2021-07-22 op parse_config(const char *filename)
701 8d1b399b 2021-07-22 op {
702 8d1b399b 2021-07-22 op 	struct sym		*sym, *next;
703 8d1b399b 2021-07-22 op 
704 8d1b399b 2021-07-22 op 	counter = 0;
705 8d1b399b 2021-07-22 op 	conf = config_new_empty();
706 8d1b399b 2021-07-22 op 
707 8d1b399b 2021-07-22 op 	file = pushfile(filename, 0);
708 8d1b399b 2021-07-22 op 	if (file == NULL) {
709 8d1b399b 2021-07-22 op 		free(conf);
710 8d1b399b 2021-07-22 op 		return NULL;
711 8d1b399b 2021-07-22 op 	}
712 8d1b399b 2021-07-22 op 	topfile = file;
713 8d1b399b 2021-07-22 op 
714 8d1b399b 2021-07-22 op 	yyparse();
715 8d1b399b 2021-07-22 op 	errors = file->errors;
716 8d1b399b 2021-07-22 op 	popfile();
717 8d1b399b 2021-07-22 op 
718 8d1b399b 2021-07-22 op 	/* Free macros and check which have not been used. */
719 8d1b399b 2021-07-22 op 	TAILQ_FOREACH_SAFE(sym, &symhead, entry, next) {
720 8d1b399b 2021-07-22 op 		if (verbose && !sym->used)
721 8d1b399b 2021-07-22 op 			fprintf(stderr, "warning: macro '%s' not used\n",
722 8d1b399b 2021-07-22 op 			    sym->nam);
723 8d1b399b 2021-07-22 op 		if (!sym->persist) {
724 8d1b399b 2021-07-22 op 			free(sym->nam);
725 8d1b399b 2021-07-22 op 			free(sym->val);
726 8d1b399b 2021-07-22 op 			TAILQ_REMOVE(&symhead, sym, entry);
727 8d1b399b 2021-07-22 op 			free(sym);
728 8d1b399b 2021-07-22 op 		}
729 8d1b399b 2021-07-22 op 	}
730 8d1b399b 2021-07-22 op 
731 8d1b399b 2021-07-22 op 	if (errors) {
732 8d1b399b 2021-07-22 op 		clear_config(conf);
733 8d1b399b 2021-07-22 op 		return NULL;
734 8d1b399b 2021-07-22 op 	}
735 8d1b399b 2021-07-22 op 
736 8d1b399b 2021-07-22 op 	return conf;
737 8d1b399b 2021-07-22 op }
738 8d1b399b 2021-07-22 op 
739 8d1b399b 2021-07-22 op int
740 8d1b399b 2021-07-22 op symset(const char *nam, const char *val, int persist)
741 8d1b399b 2021-07-22 op {
742 8d1b399b 2021-07-22 op 	struct sym	*sym;
743 8d1b399b 2021-07-22 op 
744 8d1b399b 2021-07-22 op 	TAILQ_FOREACH(sym, &symhead, entry) {
745 8d1b399b 2021-07-22 op 		if (strcmp(nam, sym->nam) == 0)
746 8d1b399b 2021-07-22 op 			break;
747 8d1b399b 2021-07-22 op 	}
748 8d1b399b 2021-07-22 op 
749 8d1b399b 2021-07-22 op 	if (sym != NULL) {
750 8d1b399b 2021-07-22 op 		if (sym->persist == 1)
751 8d1b399b 2021-07-22 op 			return 0;
752 8d1b399b 2021-07-22 op 		else {
753 8d1b399b 2021-07-22 op 			free(sym->nam);
754 8d1b399b 2021-07-22 op 			free(sym->val);
755 8d1b399b 2021-07-22 op 			TAILQ_REMOVE(&symhead, sym, entry);
756 8d1b399b 2021-07-22 op 			free(sym);
757 8d1b399b 2021-07-22 op 		}
758 8d1b399b 2021-07-22 op 	}
759 8d1b399b 2021-07-22 op 	if ((sym = calloc(1, sizeof(*sym))) == NULL)
760 8d1b399b 2021-07-22 op 		return -1;
761 8d1b399b 2021-07-22 op 
762 8d1b399b 2021-07-22 op 	sym->nam = strdup(nam);
763 8d1b399b 2021-07-22 op 	if (sym->nam == NULL) {
764 8d1b399b 2021-07-22 op 		free(sym);
765 8d1b399b 2021-07-22 op 		return -1;
766 8d1b399b 2021-07-22 op 	}
767 8d1b399b 2021-07-22 op 	sym->val = strdup(val);
768 8d1b399b 2021-07-22 op 	if (sym->val == NULL) {
769 8d1b399b 2021-07-22 op 		free(sym->nam);
770 8d1b399b 2021-07-22 op 		free(sym);
771 8d1b399b 2021-07-22 op 		return -1;
772 8d1b399b 2021-07-22 op 	}
773 8d1b399b 2021-07-22 op 	sym->used = 0;
774 8d1b399b 2021-07-22 op 	sym->persist = persist;
775 8d1b399b 2021-07-22 op 	TAILQ_INSERT_TAIL(&symhead, sym, entry);
776 8d1b399b 2021-07-22 op 	return 0;
777 8d1b399b 2021-07-22 op }
778 8d1b399b 2021-07-22 op 
779 8d1b399b 2021-07-22 op int
780 8d1b399b 2021-07-22 op cmdline_symset(char *s)
781 8d1b399b 2021-07-22 op {
782 8d1b399b 2021-07-22 op 	char	*sym, *val;
783 8d1b399b 2021-07-22 op 	int	ret;
784 8d1b399b 2021-07-22 op 
785 8d1b399b 2021-07-22 op 	if ((val = strrchr(s, '=')) == NULL)
786 8d1b399b 2021-07-22 op 		return -1;
787 8d1b399b 2021-07-22 op 	sym = strndup(s, val - s);
788 8d1b399b 2021-07-22 op 	if (sym == NULL)
789 8d1b399b 2021-07-22 op 		errx(1, "%s: strndup", __func__);
790 8d1b399b 2021-07-22 op 	ret = symset(sym, val + 1, 1);
791 8d1b399b 2021-07-22 op 	free(sym);
792 8d1b399b 2021-07-22 op 
793 8d1b399b 2021-07-22 op 	return ret;
794 8d1b399b 2021-07-22 op }
795 8d1b399b 2021-07-22 op 
796 8d1b399b 2021-07-22 op char *
797 8d1b399b 2021-07-22 op symget(const char *nam)
798 8d1b399b 2021-07-22 op {
799 8d1b399b 2021-07-22 op 	struct sym	*sym;
800 8d1b399b 2021-07-22 op 
801 8d1b399b 2021-07-22 op 	TAILQ_FOREACH(sym, &symhead, entry) {
802 8d1b399b 2021-07-22 op 		if (strcmp(nam, sym->nam) == 0) {
803 8d1b399b 2021-07-22 op 			sym->used = 1;
804 8d1b399b 2021-07-22 op 			return sym->val;
805 8d1b399b 2021-07-22 op 		}
806 8d1b399b 2021-07-22 op 	}
807 8d1b399b 2021-07-22 op 	return NULL;
808 8d1b399b 2021-07-22 op }
809 8d1b399b 2021-07-22 op 
810 8d1b399b 2021-07-22 op void
811 8d1b399b 2021-07-22 op clear_config(struct kd_conf *xconf)
812 8d1b399b 2021-07-22 op {
813 8d1b399b 2021-07-22 op 	/* free stuff? */
814 8d1b399b 2021-07-22 op 
815 8d1b399b 2021-07-22 op 	free(xconf);
816 8d1b399b 2021-07-22 op }
817 8d1b399b 2021-07-22 op 
818 8d1b399b 2021-07-22 op static void
819 8d1b399b 2021-07-22 op add_table(const char *name, const char *type, const char *path)
820 8d1b399b 2021-07-22 op {
821 8d1b399b 2021-07-22 op 	if (table_open(conf, name, type, path) == -1)
822 8d1b399b 2021-07-22 op 		yyerror("can't initialize table %s", name);
823 c25feded 2021-07-26 op 	table = STAILQ_FIRST(&conf->table_head)->table;
824 8d1b399b 2021-07-22 op }
825 8d1b399b 2021-07-22 op 
826 8d1b399b 2021-07-22 op static struct table *
827 8d1b399b 2021-07-22 op findtable(const char *name)
828 8d1b399b 2021-07-22 op {
829 8d1b399b 2021-07-22 op 	struct kd_tables_conf *i;
830 8d1b399b 2021-07-22 op 
831 c25feded 2021-07-26 op 	STAILQ_FOREACH(i, &conf->table_head, entry) {
832 8d1b399b 2021-07-22 op 		if (!strcmp(i->table->t_name, name))
833 8d1b399b 2021-07-22 op 			return i->table;
834 8d1b399b 2021-07-22 op 	}
835 8d1b399b 2021-07-22 op 
836 8d1b399b 2021-07-22 op 	yyerror("unknown table %s", name);
837 8d1b399b 2021-07-22 op 	return NULL;
838 8d1b399b 2021-07-22 op }
839 8d1b399b 2021-07-22 op 
840 8d1b399b 2021-07-22 op static void
841 8d1b399b 2021-07-22 op add_cert(const char *name, const char *path)
842 8d1b399b 2021-07-22 op {
843 8d1b399b 2021-07-22 op 	struct kd_pki_conf *pki;
844 8d1b399b 2021-07-22 op 
845 c25feded 2021-07-26 op 	STAILQ_FOREACH(pki, &conf->pki_head, entry) {
846 8d1b399b 2021-07-22 op 		if (strcmp(name, pki->name) != 0)
847 8d1b399b 2021-07-22 op 			continue;
848 8d1b399b 2021-07-22 op 
849 8d1b399b 2021-07-22 op 		if (pki->cert != NULL) {
850 8d1b399b 2021-07-22 op 			yyerror("duplicate `pki %s cert'", name);
851 8d1b399b 2021-07-22 op 			return;
852 8d1b399b 2021-07-22 op 		}
853 8d1b399b 2021-07-22 op 
854 8d1b399b 2021-07-22 op 		goto set;
855 8d1b399b 2021-07-22 op 	}
856 8d1b399b 2021-07-22 op 
857 8d1b399b 2021-07-22 op 	pki = xcalloc(1, sizeof(*pki));
858 8d1b399b 2021-07-22 op 	strlcpy(pki->name, name, sizeof(pki->name));
859 c25feded 2021-07-26 op 	STAILQ_INSERT_HEAD(&conf->pki_head, pki, entry);
860 8d1b399b 2021-07-22 op 
861 8d1b399b 2021-07-22 op set:
862 8d1b399b 2021-07-22 op 	if ((pki->cert = tls_load_file(path, &pki->certlen, NULL)) == NULL)
863 8d1b399b 2021-07-22 op 		fatal(NULL);
864 8d1b399b 2021-07-22 op }
865 8d1b399b 2021-07-22 op 
866 8d1b399b 2021-07-22 op static void
867 8d1b399b 2021-07-22 op add_key(const char *name, const char *path)
868 8d1b399b 2021-07-22 op {
869 8d1b399b 2021-07-22 op 	struct kd_pki_conf *pki;
870 8d1b399b 2021-07-22 op 
871 c25feded 2021-07-26 op 	STAILQ_FOREACH(pki, &conf->pki_head, entry) {
872 8d1b399b 2021-07-22 op 		if (strcmp(name, pki->name) != 0)
873 8d1b399b 2021-07-22 op 			continue;
874 8d1b399b 2021-07-22 op 
875 8d1b399b 2021-07-22 op 		if (pki->key != NULL) {
876 8d1b399b 2021-07-22 op 			yyerror("duplicate `pki %s key'", name);
877 8d1b399b 2021-07-22 op 			return;
878 8d1b399b 2021-07-22 op 		}
879 8d1b399b 2021-07-22 op 
880 8d1b399b 2021-07-22 op 		goto set;
881 8d1b399b 2021-07-22 op 	}
882 8d1b399b 2021-07-22 op 
883 8d1b399b 2021-07-22 op 	pki = xcalloc(1, sizeof(*pki));
884 8d1b399b 2021-07-22 op 	strlcpy(pki->name, name, sizeof(pki->name));
885 c25feded 2021-07-26 op 	STAILQ_INSERT_HEAD(&conf->pki_head, pki, entry);
886 8d1b399b 2021-07-22 op 
887 8d1b399b 2021-07-22 op set:
888 8d1b399b 2021-07-22 op 	if ((pki->key = tls_load_file(path, &pki->keylen, NULL)) == NULL)
889 8d1b399b 2021-07-22 op 		fatal(NULL);
890 8d1b399b 2021-07-22 op }
891 8d1b399b 2021-07-22 op 
892 d82b9f6d 2021-07-22 op static struct kd_listen_conf *
893 d82b9f6d 2021-07-22 op listen_new(void)
894 8d1b399b 2021-07-22 op {
895 8d1b399b 2021-07-22 op 	struct kd_listen_conf *l;
896 8d1b399b 2021-07-22 op 
897 8d1b399b 2021-07-22 op 	l = xcalloc(1, sizeof(*l));
898 8d1b399b 2021-07-22 op 	l->id = counter++;
899 8d1b399b 2021-07-22 op 	l->fd = -1;
900 8d1b399b 2021-07-22 op 
901 c25feded 2021-07-26 op 	STAILQ_INSERT_HEAD(&conf->listen_head, l, entry);
902 d82b9f6d 2021-07-22 op 	return l;
903 8d1b399b 2021-07-22 op }