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 		;
184 8d1b399b 2021-07-22 op 
185 8d1b399b 2021-07-22 op varset		: STRING '=' string		{
186 8d1b399b 2021-07-22 op 			char *s = $1;
187 8d1b399b 2021-07-22 op 			if (verbose)
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");
193 8d1b399b 2021-07-22 op 					free($1);
194 8d1b399b 2021-07-22 op 					free($3);
195 8d1b399b 2021-07-22 op 					YYERROR;
196 8d1b399b 2021-07-22 op 				}
197 8d1b399b 2021-07-22 op 			}
198 8d1b399b 2021-07-22 op 			if (symset($1, $3, 0) == -1)
199 8d1b399b 2021-07-22 op 				fatal("cannot store variable");
200 8d1b399b 2021-07-22 op 			free($1);
201 8d1b399b 2021-07-22 op 			free($3);
202 8d1b399b 2021-07-22 op 		}
203 8d1b399b 2021-07-22 op 		;
204 8d1b399b 2021-07-22 op 
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); }
207 8d1b399b 2021-07-22 op 		;
208 8d1b399b 2021-07-22 op 
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);
213 8d1b399b 2021-07-22 op 			free($1);
214 8d1b399b 2021-07-22 op 			free($3);
215 8d1b399b 2021-07-22 op 		}
216 8d1b399b 2021-07-22 op 		;
217 8d1b399b 2021-07-22 op 
218 8d1b399b 2021-07-22 op table_kps	: table_kp
219 8d1b399b 2021-07-22 op 		| table_kp comma table_kps
220 8d1b399b 2021-07-22 op 		;
221 8d1b399b 2021-07-22 op 
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);
226 8d1b399b 2021-07-22 op 			free($1);
227 8d1b399b 2021-07-22 op 		}
228 8d1b399b 2021-07-22 op 		;
229 8d1b399b 2021-07-22 op 
230 8d1b399b 2021-07-22 op string_list	: stringel
231 8d1b399b 2021-07-22 op 		| stringel comma string_list
232 8d1b399b 2021-07-22 op 		;
233 8d1b399b 2021-07-22 op 
234 8d1b399b 2021-07-22 op table_vals	: table_kps
235 8d1b399b 2021-07-22 op 		| string_list
236 8d1b399b 2021-07-22 op 		;
237 8d1b399b 2021-07-22 op 
238 8d1b399b 2021-07-22 op table		: TABLE STRING STRING {
239 8d1b399b 2021-07-22 op 			char *p;
240 8d1b399b 2021-07-22 op 
241 8d1b399b 2021-07-22 op 			if ((p = strchr($3, ':')) == NULL) {
242 8d1b399b 2021-07-22 op 				yyerror("invalid table %s", $2);
243 8d1b399b 2021-07-22 op 				YYERROR;
244 8d1b399b 2021-07-22 op 			}
245 8d1b399b 2021-07-22 op 
246 8d1b399b 2021-07-22 op 			*p = '\0';
247 8d1b399b 2021-07-22 op 			add_table($2, $3, p+1);
248 8d1b399b 2021-07-22 op 			free($2);
249 8d1b399b 2021-07-22 op 			free($3);
250 8d1b399b 2021-07-22 op 		}
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;
255 8d1b399b 2021-07-22 op 		}
256 8d1b399b 2021-07-22 op 		;
257 8d1b399b 2021-07-22 op 
258 8d1b399b 2021-07-22 op tableref	: '<' STRING '>' {
259 d82b9f6d 2021-07-22 op 			struct table *t;
260 d82b9f6d 2021-07-22 op 
261 d82b9f6d 2021-07-22 op 			t = findtable($2);
262 d82b9f6d 2021-07-22 op 			free($2);
263 d82b9f6d 2021-07-22 op 			if (t == NULL)
264 8d1b399b 2021-07-22 op 				YYERROR;
265 d82b9f6d 2021-07-22 op 			$$ = t;
266 8d1b399b 2021-07-22 op 		}
267 8d1b399b 2021-07-22 op 		;
268 8d1b399b 2021-07-22 op 
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;
276 9693abfe 2021-11-30 op 		}
277 9693abfe 2021-11-30 op 		;
278 8d1b399b 2021-07-22 op 
279 d82b9f6d 2021-07-22 op listen_opts	: listen_opt
280 d82b9f6d 2021-07-22 op 		| listen_opt listen_opts
281 d82b9f6d 2021-07-22 op 		;
282 d82b9f6d 2021-07-22 op 
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"
286 d82b9f6d 2021-07-22 op 				    " defined");
287 95eb4eb9 2021-07-22 op 			strlcpy(listener->iface, $2, sizeof(listener->iface));
288 95eb4eb9 2021-07-22 op 			listener->port = $4;
289 d82b9f6d 2021-07-22 op 		}
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));
295 d82b9f6d 2021-07-22 op 		}
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;
300 8d1b399b 2021-07-22 op 		}
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 struct keywords {
306 8d1b399b 2021-07-22 op 	const char	*k_name;
307 8d1b399b 2021-07-22 op 	int		 k_val;
308 8d1b399b 2021-07-22 op };
309 8d1b399b 2021-07-22 op 
310 8d1b399b 2021-07-22 op int
311 8d1b399b 2021-07-22 op yyerror(const char *fmt, ...)
312 8d1b399b 2021-07-22 op {
313 8d1b399b 2021-07-22 op 	va_list		 ap;
314 8d1b399b 2021-07-22 op 	char		*msg;
315 8d1b399b 2021-07-22 op 
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");
320 8d1b399b 2021-07-22 op 	va_end(ap);
321 8d1b399b 2021-07-22 op 	logit(LOG_CRIT, "%s:%d: %s", file->name, yylval.lineno, msg);
322 8d1b399b 2021-07-22 op 	free(msg);
323 8d1b399b 2021-07-22 op 	return 0;
324 8d1b399b 2021-07-22 op }
325 8d1b399b 2021-07-22 op 
326 8d1b399b 2021-07-22 op int
327 8d1b399b 2021-07-22 op kw_cmp(const void *k, const void *e)
328 8d1b399b 2021-07-22 op {
329 8d1b399b 2021-07-22 op 	return strcmp(k, ((const struct keywords *)e)->k_name);
330 8d1b399b 2021-07-22 op }
331 8d1b399b 2021-07-22 op 
332 8d1b399b 2021-07-22 op int
333 8d1b399b 2021-07-22 op lookup(char *s)
334 8d1b399b 2021-07-22 op {
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},
342 8d1b399b 2021-07-22 op 		{"no",			NO},
343 8d1b399b 2021-07-22 op 		{"on",			ON},
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},
349 8d1b399b 2021-07-22 op 	};
350 8d1b399b 2021-07-22 op 	const struct keywords	*p;
351 8d1b399b 2021-07-22 op 
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);
354 8d1b399b 2021-07-22 op 
355 8d1b399b 2021-07-22 op 	if (p)
356 8d1b399b 2021-07-22 op 		return p->k_val;
357 8d1b399b 2021-07-22 op 	else
358 8d1b399b 2021-07-22 op 		return STRING;
359 8d1b399b 2021-07-22 op }
360 8d1b399b 2021-07-22 op 
361 8d1b399b 2021-07-22 op #define START_EXPAND	1
362 8d1b399b 2021-07-22 op #define DONE_EXPAND	2
363 8d1b399b 2021-07-22 op 
364 8d1b399b 2021-07-22 op static int	expanding;
365 8d1b399b 2021-07-22 op 
366 8d1b399b 2021-07-22 op int
367 8d1b399b 2021-07-22 op igetc(void)
368 8d1b399b 2021-07-22 op {
369 8d1b399b 2021-07-22 op 	int	c;
370 8d1b399b 2021-07-22 op 
371 8d1b399b 2021-07-22 op 	while (1) {
372 8d1b399b 2021-07-22 op 		if (file->ungetpos > 0)
373 8d1b399b 2021-07-22 op 			c = file->ungetbuf[--file->ungetpos];
374 8d1b399b 2021-07-22 op 		else
375 8d1b399b 2021-07-22 op 			c = getc(file->stream);
376 8d1b399b 2021-07-22 op 
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;
381 8d1b399b 2021-07-22 op 		else
382 8d1b399b 2021-07-22 op 			break;
383 8d1b399b 2021-07-22 op 	}
384 8d1b399b 2021-07-22 op 	return c;
385 8d1b399b 2021-07-22 op }
386 8d1b399b 2021-07-22 op 
387 8d1b399b 2021-07-22 op int
388 8d1b399b 2021-07-22 op lgetc(int quotec)
389 8d1b399b 2021-07-22 op {
390 8d1b399b 2021-07-22 op 	int		c, next;
391 8d1b399b 2021-07-22 op 
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)
397 8d1b399b 2021-07-22 op 				return EOF;
398 8d1b399b 2021-07-22 op 			return quotec;
399 8d1b399b 2021-07-22 op 		}
400 8d1b399b 2021-07-22 op 		return c;
401 8d1b399b 2021-07-22 op 	}
402 8d1b399b 2021-07-22 op 
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') {
406 8d1b399b 2021-07-22 op 			c = next;
407 8d1b399b 2021-07-22 op 			break;
408 8d1b399b 2021-07-22 op 		}
409 8d1b399b 2021-07-22 op 		yylval.lineno = file->lineno;
410 8d1b399b 2021-07-22 op 		file->lineno++;
411 8d1b399b 2021-07-22 op 	}
412 8d1b399b 2021-07-22 op 
413 8d1b399b 2021-07-22 op 	if (c == EOF) {
414 8d1b399b 2021-07-22 op 		/*
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.
418 8d1b399b 2021-07-22 op 		 */
419 8d1b399b 2021-07-22 op 		if (file->eof_reached == 0) {
420 8d1b399b 2021-07-22 op 			file->eof_reached = 1;
421 8d1b399b 2021-07-22 op 			return '\n';
422 8d1b399b 2021-07-22 op 		}
423 8d1b399b 2021-07-22 op 		while (c == EOF) {
424 8d1b399b 2021-07-22 op 			if (file == topfile || popfile() == EOF)
425 8d1b399b 2021-07-22 op 				return EOF;
426 8d1b399b 2021-07-22 op 			c = igetc();
427 8d1b399b 2021-07-22 op 		}
428 8d1b399b 2021-07-22 op 	}
429 8d1b399b 2021-07-22 op 	return c;
430 8d1b399b 2021-07-22 op }
431 8d1b399b 2021-07-22 op 
432 8d1b399b 2021-07-22 op void
433 8d1b399b 2021-07-22 op lungetc(int c)
434 8d1b399b 2021-07-22 op {
435 8d1b399b 2021-07-22 op 	if (c == EOF)
436 8d1b399b 2021-07-22 op 		return;
437 8d1b399b 2021-07-22 op 
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;
444 8d1b399b 2021-07-22 op 	}
445 8d1b399b 2021-07-22 op 	file->ungetbuf[file->ungetpos++] = c;
446 8d1b399b 2021-07-22 op }
447 8d1b399b 2021-07-22 op 
448 8d1b399b 2021-07-22 op int
449 8d1b399b 2021-07-22 op findeol(void)
450 8d1b399b 2021-07-22 op {
451 8d1b399b 2021-07-22 op 	int	c;
452 8d1b399b 2021-07-22 op 
453 8d1b399b 2021-07-22 op 	/* Skip to either EOF or the first real EOL. */
454 8d1b399b 2021-07-22 op 	while (1) {
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++;
458 8d1b399b 2021-07-22 op 			break;
459 8d1b399b 2021-07-22 op 		}
460 8d1b399b 2021-07-22 op 		if (c == EOF)
461 8d1b399b 2021-07-22 op 			break;
462 8d1b399b 2021-07-22 op 	}
463 8d1b399b 2021-07-22 op 	return ERROR;
464 8d1b399b 2021-07-22 op }
465 ab51127d 2021-08-04 op 
466 ab51127d 2021-08-04 op #if 0
467 ab51127d 2021-08-04 op int my_yylex(void);
468 8d1b399b 2021-07-22 op 
469 8d1b399b 2021-07-22 op int
470 8d1b399b 2021-07-22 op yylex(void)
471 8d1b399b 2021-07-22 op {
472 ab51127d 2021-08-04 op 	int x;
473 ab51127d 2021-08-04 op 
474 ab51127d 2021-08-04 op 	switch (x = my_yylex()) {
475 ab51127d 2021-08-04 op 	case AUTH:
476 ab51127d 2021-08-04 op 		puts("auth");
477 ab51127d 2021-08-04 op 		break;
478 ab51127d 2021-08-04 op 	case CERT:
479 ab51127d 2021-08-04 op 		puts("cert");
480 ab51127d 2021-08-04 op 		break;
481 ab51127d 2021-08-04 op 	case ERROR:
482 ab51127d 2021-08-04 op 		puts("error");
483 ab51127d 2021-08-04 op 		break;
484 ab51127d 2021-08-04 op 	case INCLUDE:
485 ab51127d 2021-08-04 op 		puts("include");
486 ab51127d 2021-08-04 op 		break;
487 ab51127d 2021-08-04 op 	case KEY:
488 ab51127d 2021-08-04 op 		puts("key");
489 ab51127d 2021-08-04 op 		break;
490 ab51127d 2021-08-04 op 	case LISTEN:
491 ab51127d 2021-08-04 op 		puts("listen");
492 ab51127d 2021-08-04 op 		break;
493 ab51127d 2021-08-04 op 	case NO:
494 ab51127d 2021-08-04 op 		puts("no");
495 ab51127d 2021-08-04 op 		break;
496 ab51127d 2021-08-04 op 	case ON:
497 ab51127d 2021-08-04 op 		puts("on");
498 ab51127d 2021-08-04 op 		break;
499 ab51127d 2021-08-04 op 	case PKI:
500 ab51127d 2021-08-04 op 		puts("pki");
501 ab51127d 2021-08-04 op 		break;
502 ab51127d 2021-08-04 op 	case PORT:
503 ab51127d 2021-08-04 op 		puts("port");
504 ab51127d 2021-08-04 op 		break;
505 ab51127d 2021-08-04 op 	case TABLE:
506 ab51127d 2021-08-04 op 		puts("table");
507 ab51127d 2021-08-04 op 		break;
508 ab51127d 2021-08-04 op 	case TLS:
509 ab51127d 2021-08-04 op 		puts("tls");
510 ab51127d 2021-08-04 op 		break;
511 ab51127d 2021-08-04 op 	case YES:
512 ab51127d 2021-08-04 op 		puts("yes");
513 ab51127d 2021-08-04 op 		break;
514 ab51127d 2021-08-04 op 	case STRING:
515 ab51127d 2021-08-04 op 		printf("string \"%s\"\n", yylval.v.string);
516 ab51127d 2021-08-04 op 		break;
517 ab51127d 2021-08-04 op 	case NUMBER:
518 ab51127d 2021-08-04 op 		printf("number %"PRIi64"\n", yylval.v.number);
519 ab51127d 2021-08-04 op 	default:
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");
523 ab51127d 2021-08-04 op 		else
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");
527 ab51127d 2021-08-04 op 		break;
528 ab51127d 2021-08-04 op 	}
529 ab51127d 2021-08-04 op 
530 ab51127d 2021-08-04 op 	return x;
531 ab51127d 2021-08-04 op }
532 ab51127d 2021-08-04 op 
533 ab51127d 2021-08-04 op int
534 ab51127d 2021-08-04 op my_yylex(void)
535 ab51127d 2021-08-04 op #else
536 ab51127d 2021-08-04 op int
537 ab51127d 2021-08-04 op yylex(void)
538 ab51127d 2021-08-04 op #endif
539 ab51127d 2021-08-04 op {
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;
543 e63bf1fb 2021-11-30 op 	int	 token;
544 8d1b399b 2021-07-22 op 
545 8d1b399b 2021-07-22 op top:
546 8d1b399b 2021-07-22 op 	p = buf;
547 8d1b399b 2021-07-22 op 	while ((c = lgetc(0)) == ' ' || c == '\t')
548 8d1b399b 2021-07-22 op 		; /* nothing */
549 8d1b399b 2021-07-22 op 
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) {
555 8d1b399b 2021-07-22 op 		while (1) {
556 8d1b399b 2021-07-22 op 			if ((c = lgetc(0)) == EOF)
557 8d1b399b 2021-07-22 op 				return 0;
558 8d1b399b 2021-07-22 op 
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();
562 8d1b399b 2021-07-22 op 			}
563 8d1b399b 2021-07-22 op 			if (isalnum(c) || c == '_') {
564 8d1b399b 2021-07-22 op 				*p++ = c;
565 8d1b399b 2021-07-22 op 				continue;
566 8d1b399b 2021-07-22 op 			}
567 8d1b399b 2021-07-22 op 			*p = '\0';
568 8d1b399b 2021-07-22 op 			lungetc(c);
569 8d1b399b 2021-07-22 op 			break;
570 8d1b399b 2021-07-22 op 		}
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();
575 8d1b399b 2021-07-22 op 		}
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);
580 8d1b399b 2021-07-22 op 			p--;
581 8d1b399b 2021-07-22 op 		}
582 8d1b399b 2021-07-22 op 		lungetc(START_EXPAND);
583 8d1b399b 2021-07-22 op 		goto top;
584 8d1b399b 2021-07-22 op 	}
585 8d1b399b 2021-07-22 op 
586 8d1b399b 2021-07-22 op 	switch (c) {
587 8d1b399b 2021-07-22 op 	case '\'':
588 8d1b399b 2021-07-22 op 	case '"':
589 8d1b399b 2021-07-22 op 		quotec = c;
590 8d1b399b 2021-07-22 op 		while (1) {
591 8d1b399b 2021-07-22 op 			if ((c = lgetc(quotec)) == EOF)
592 8d1b399b 2021-07-22 op 				return 0;
593 8d1b399b 2021-07-22 op 			if (c == '\n') {
594 8d1b399b 2021-07-22 op 				file->lineno++;
595 8d1b399b 2021-07-22 op 				continue;
596 8d1b399b 2021-07-22 op 			} else if (c == '\\') {
597 8d1b399b 2021-07-22 op 				if ((next = lgetc(quotec)) == EOF)
598 8d1b399b 2021-07-22 op 					return (0);
599 8d1b399b 2021-07-22 op 				if (next == quotec || next == ' ' ||
600 8d1b399b 2021-07-22 op 				    next == '\t')
601 8d1b399b 2021-07-22 op 					c = next;
602 8d1b399b 2021-07-22 op 				else if (next == '\n') {
603 8d1b399b 2021-07-22 op 					file->lineno++;
604 8d1b399b 2021-07-22 op 					continue;
605 8d1b399b 2021-07-22 op 				} else
606 8d1b399b 2021-07-22 op 					lungetc(next);
607 8d1b399b 2021-07-22 op 			} else if (c == quotec) {
608 8d1b399b 2021-07-22 op 				*p = '\0';
609 8d1b399b 2021-07-22 op 				break;
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();
613 8d1b399b 2021-07-22 op 			}
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();
617 8d1b399b 2021-07-22 op 			}
618 8d1b399b 2021-07-22 op 			*p++ = c;
619 8d1b399b 2021-07-22 op 		}
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;
624 8d1b399b 2021-07-22 op 	}
625 8d1b399b 2021-07-22 op 
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 == '=')
628 8d1b399b 2021-07-22 op 
629 8d1b399b 2021-07-22 op 	if (c == '-' || isdigit(c)) {
630 8d1b399b 2021-07-22 op 		do {
631 8d1b399b 2021-07-22 op 			*p++ = 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();
635 8d1b399b 2021-07-22 op 			}
636 8d1b399b 2021-07-22 op 		} while ((c = lgetc(0)) != EOF && isdigit(c));
637 8d1b399b 2021-07-22 op 		lungetc(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;
642 8d1b399b 2021-07-22 op 
643 8d1b399b 2021-07-22 op 			*p = '\0';
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();
650 8d1b399b 2021-07-22 op 			}
651 8d1b399b 2021-07-22 op 			return NUMBER;
652 8d1b399b 2021-07-22 op 		} else {
653 8d1b399b 2021-07-22 op nodigits:
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 == '-')
658 8d1b399b 2021-07-22 op 				return c;
659 8d1b399b 2021-07-22 op 		}
660 8d1b399b 2021-07-22 op 	}
661 8d1b399b 2021-07-22 op 
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 != '>'))
667 8d1b399b 2021-07-22 op 
668 8d1b399b 2021-07-22 op 	if (isalnum(c) || c == ':' || c == '_') {
669 8d1b399b 2021-07-22 op 		do {
670 8d1b399b 2021-07-22 op 			*p++ = 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();
674 8d1b399b 2021-07-22 op 			}
675 8d1b399b 2021-07-22 op 		} while ((c = lgetc(0)) != EOF && (allowed_in_string(c)));
676 8d1b399b 2021-07-22 op 		lungetc(c);
677 8d1b399b 2021-07-22 op 		*p = '\0';
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;
682 8d1b399b 2021-07-22 op 	}
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++;
686 8d1b399b 2021-07-22 op 	}
687 8d1b399b 2021-07-22 op 	if (c == EOF)
688 8d1b399b 2021-07-22 op 		return 0;
689 8d1b399b 2021-07-22 op 	return c;
690 8d1b399b 2021-07-22 op }
691 8d1b399b 2021-07-22 op 
692 8d1b399b 2021-07-22 op int
693 8d1b399b 2021-07-22 op check_file_secrecy(int fd, const char *fname)
694 8d1b399b 2021-07-22 op {
695 8d1b399b 2021-07-22 op 	struct stat	st;
696 8d1b399b 2021-07-22 op 
697 8d1b399b 2021-07-22 op 	if (fstat(fd, &st)) {
698 8d1b399b 2021-07-22 op 		log_warn("cannot stat %s", fname);
699 8d1b399b 2021-07-22 op 		return -1;
700 8d1b399b 2021-07-22 op 	}
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);
703 8d1b399b 2021-07-22 op 		return -1;
704 8d1b399b 2021-07-22 op 	}
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);
707 8d1b399b 2021-07-22 op 		return -1;
708 8d1b399b 2021-07-22 op 	}
709 8d1b399b 2021-07-22 op 	return 0;
710 8d1b399b 2021-07-22 op }
711 8d1b399b 2021-07-22 op 
712 8d1b399b 2021-07-22 op struct file *
713 8d1b399b 2021-07-22 op pushfile(const char *name, int secret)
714 8d1b399b 2021-07-22 op {
715 8d1b399b 2021-07-22 op 	struct file	*nfile;
716 8d1b399b 2021-07-22 op 
717 8d1b399b 2021-07-22 op 	if ((nfile = calloc(1, sizeof(struct file))) == NULL) {
718 8d1b399b 2021-07-22 op 		log_warn("calloc");
719 8d1b399b 2021-07-22 op 		return NULL;
720 8d1b399b 2021-07-22 op 	}
721 8d1b399b 2021-07-22 op 	if ((nfile->name = strdup(name)) == NULL) {
722 8d1b399b 2021-07-22 op 		log_warn("strdup");
723 8d1b399b 2021-07-22 op 		free(nfile);
724 8d1b399b 2021-07-22 op 		return NULL;
725 8d1b399b 2021-07-22 op 	}
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);
729 8d1b399b 2021-07-22 op 		free(nfile);
730 8d1b399b 2021-07-22 op 		return NULL;
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);
735 8d1b399b 2021-07-22 op 		free(nfile);
736 8d1b399b 2021-07-22 op 		return NULL;
737 8d1b399b 2021-07-22 op 	}
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);
745 8d1b399b 2021-07-22 op 		free(nfile);
746 8d1b399b 2021-07-22 op 		return NULL;
747 8d1b399b 2021-07-22 op 	}
748 8d1b399b 2021-07-22 op 	TAILQ_INSERT_TAIL(&files, nfile, entry);
749 8d1b399b 2021-07-22 op 	return nfile;
750 8d1b399b 2021-07-22 op }
751 8d1b399b 2021-07-22 op 
752 8d1b399b 2021-07-22 op int
753 8d1b399b 2021-07-22 op popfile(void)
754 8d1b399b 2021-07-22 op {
755 8d1b399b 2021-07-22 op 	struct file	*prev;
756 8d1b399b 2021-07-22 op 
757 8d1b399b 2021-07-22 op 	if ((prev = TAILQ_PREV(file, files, entry)) != NULL)
758 8d1b399b 2021-07-22 op 		prev->errors += file->errors;
759 8d1b399b 2021-07-22 op 
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);
764 8d1b399b 2021-07-22 op 	free(file);
765 8d1b399b 2021-07-22 op 	file = prev;
766 8d1b399b 2021-07-22 op 	return file ? 0 : EOF;
767 8d1b399b 2021-07-22 op }
768 8d1b399b 2021-07-22 op 
769 8d1b399b 2021-07-22 op struct kd_conf *
770 8d1b399b 2021-07-22 op parse_config(const char *filename)
771 8d1b399b 2021-07-22 op {
772 8d1b399b 2021-07-22 op 	struct sym		*sym, *next;
773 8d1b399b 2021-07-22 op 
774 8d1b399b 2021-07-22 op 	counter = 0;
775 8d1b399b 2021-07-22 op 	conf = config_new_empty();
776 8d1b399b 2021-07-22 op 
777 8d1b399b 2021-07-22 op 	file = pushfile(filename, 0);
778 8d1b399b 2021-07-22 op 	if (file == NULL) {
779 8d1b399b 2021-07-22 op 		free(conf);
780 8d1b399b 2021-07-22 op 		return NULL;
781 8d1b399b 2021-07-22 op 	}
782 8d1b399b 2021-07-22 op 	topfile = file;
783 8d1b399b 2021-07-22 op 
784 8d1b399b 2021-07-22 op 	yyparse();
785 8d1b399b 2021-07-22 op 	errors = file->errors;
786 8d1b399b 2021-07-22 op 	popfile();
787 8d1b399b 2021-07-22 op 
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",
792 8d1b399b 2021-07-22 op 			    sym->nam);
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);
797 8d1b399b 2021-07-22 op 			free(sym);
798 8d1b399b 2021-07-22 op 		}
799 8d1b399b 2021-07-22 op 	}
800 8d1b399b 2021-07-22 op 
801 8d1b399b 2021-07-22 op 	if (errors) {
802 8d1b399b 2021-07-22 op 		clear_config(conf);
803 8d1b399b 2021-07-22 op 		return NULL;
804 8d1b399b 2021-07-22 op 	}
805 8d1b399b 2021-07-22 op 
806 8d1b399b 2021-07-22 op 	return conf;
807 8d1b399b 2021-07-22 op }
808 8d1b399b 2021-07-22 op 
809 8d1b399b 2021-07-22 op int
810 8d1b399b 2021-07-22 op symset(const char *nam, const char *val, int persist)
811 8d1b399b 2021-07-22 op {
812 8d1b399b 2021-07-22 op 	struct sym	*sym;
813 8d1b399b 2021-07-22 op 
814 8d1b399b 2021-07-22 op 	TAILQ_FOREACH(sym, &symhead, entry) {
815 8d1b399b 2021-07-22 op 		if (strcmp(nam, sym->nam) == 0)
816 8d1b399b 2021-07-22 op 			break;
817 8d1b399b 2021-07-22 op 	}
818 8d1b399b 2021-07-22 op 
819 8d1b399b 2021-07-22 op 	if (sym != NULL) {
820 8d1b399b 2021-07-22 op 		if (sym->persist == 1)
821 8d1b399b 2021-07-22 op 			return 0;
822 8d1b399b 2021-07-22 op 		else {
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);
826 8d1b399b 2021-07-22 op 			free(sym);
827 8d1b399b 2021-07-22 op 		}
828 8d1b399b 2021-07-22 op 	}
829 8d1b399b 2021-07-22 op 	if ((sym = calloc(1, sizeof(*sym))) == NULL)
830 8d1b399b 2021-07-22 op 		return -1;
831 8d1b399b 2021-07-22 op 
832 8d1b399b 2021-07-22 op 	sym->nam = strdup(nam);
833 8d1b399b 2021-07-22 op 	if (sym->nam == NULL) {
834 8d1b399b 2021-07-22 op 		free(sym);
835 8d1b399b 2021-07-22 op 		return -1;
836 8d1b399b 2021-07-22 op 	}
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);
840 8d1b399b 2021-07-22 op 		free(sym);
841 8d1b399b 2021-07-22 op 		return -1;
842 8d1b399b 2021-07-22 op 	}
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);
846 8d1b399b 2021-07-22 op 	return 0;
847 8d1b399b 2021-07-22 op }
848 8d1b399b 2021-07-22 op 
849 8d1b399b 2021-07-22 op int
850 8d1b399b 2021-07-22 op cmdline_symset(char *s)
851 8d1b399b 2021-07-22 op {
852 8d1b399b 2021-07-22 op 	char	*sym, *val;
853 8d1b399b 2021-07-22 op 	int	ret;
854 8d1b399b 2021-07-22 op 
855 8d1b399b 2021-07-22 op 	if ((val = strrchr(s, '=')) == NULL)
856 8d1b399b 2021-07-22 op 		return -1;
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);
861 8d1b399b 2021-07-22 op 	free(sym);
862 8d1b399b 2021-07-22 op 
863 8d1b399b 2021-07-22 op 	return ret;
864 8d1b399b 2021-07-22 op }
865 8d1b399b 2021-07-22 op 
866 8d1b399b 2021-07-22 op char *
867 8d1b399b 2021-07-22 op symget(const char *nam)
868 8d1b399b 2021-07-22 op {
869 8d1b399b 2021-07-22 op 	struct sym	*sym;
870 8d1b399b 2021-07-22 op 
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;
875 8d1b399b 2021-07-22 op 		}
876 8d1b399b 2021-07-22 op 	}
877 8d1b399b 2021-07-22 op 	return NULL;
878 8d1b399b 2021-07-22 op }
879 8d1b399b 2021-07-22 op 
880 8d1b399b 2021-07-22 op void
881 8d1b399b 2021-07-22 op clear_config(struct kd_conf *xconf)
882 8d1b399b 2021-07-22 op {
883 8d1b399b 2021-07-22 op 	/* free stuff? */
884 8d1b399b 2021-07-22 op 
885 8d1b399b 2021-07-22 op 	free(xconf);
886 8d1b399b 2021-07-22 op }
887 8d1b399b 2021-07-22 op 
888 8d1b399b 2021-07-22 op static void
889 8d1b399b 2021-07-22 op add_table(const char *name, const char *type, const char *path)
890 8d1b399b 2021-07-22 op {
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;
894 8d1b399b 2021-07-22 op }
895 8d1b399b 2021-07-22 op 
896 8d1b399b 2021-07-22 op static struct table *
897 8d1b399b 2021-07-22 op findtable(const char *name)
898 8d1b399b 2021-07-22 op {
899 8d1b399b 2021-07-22 op 	struct kd_tables_conf *i;
900 8d1b399b 2021-07-22 op 
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;
904 8d1b399b 2021-07-22 op 	}
905 8d1b399b 2021-07-22 op 
906 8d1b399b 2021-07-22 op 	yyerror("unknown table %s", name);
907 8d1b399b 2021-07-22 op 	return NULL;
908 8d1b399b 2021-07-22 op }
909 8d1b399b 2021-07-22 op 
910 8d1b399b 2021-07-22 op static void
911 8d1b399b 2021-07-22 op add_cert(const char *name, const char *path)
912 8d1b399b 2021-07-22 op {
913 8d1b399b 2021-07-22 op 	struct kd_pki_conf *pki;
914 8d1b399b 2021-07-22 op 
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)
917 8d1b399b 2021-07-22 op 			continue;
918 8d1b399b 2021-07-22 op 
919 8d1b399b 2021-07-22 op 		if (pki->cert != NULL) {
920 8d1b399b 2021-07-22 op 			yyerror("duplicate `pki %s cert'", name);
921 8d1b399b 2021-07-22 op 			return;
922 8d1b399b 2021-07-22 op 		}
923 8d1b399b 2021-07-22 op 
924 8d1b399b 2021-07-22 op 		goto set;
925 8d1b399b 2021-07-22 op 	}
926 8d1b399b 2021-07-22 op 
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);
930 8d1b399b 2021-07-22 op 
931 8d1b399b 2021-07-22 op set:
932 8d1b399b 2021-07-22 op 	if ((pki->cert = tls_load_file(path, &pki->certlen, NULL)) == NULL)
933 8d1b399b 2021-07-22 op 		fatal(NULL);
934 8d1b399b 2021-07-22 op }
935 8d1b399b 2021-07-22 op 
936 8d1b399b 2021-07-22 op static void
937 8d1b399b 2021-07-22 op add_key(const char *name, const char *path)
938 8d1b399b 2021-07-22 op {
939 8d1b399b 2021-07-22 op 	struct kd_pki_conf *pki;
940 8d1b399b 2021-07-22 op 
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)
943 8d1b399b 2021-07-22 op 			continue;
944 8d1b399b 2021-07-22 op 
945 8d1b399b 2021-07-22 op 		if (pki->key != NULL) {
946 8d1b399b 2021-07-22 op 			yyerror("duplicate `pki %s key'", name);
947 8d1b399b 2021-07-22 op 			return;
948 8d1b399b 2021-07-22 op 		}
949 8d1b399b 2021-07-22 op 
950 8d1b399b 2021-07-22 op 		goto set;
951 8d1b399b 2021-07-22 op 	}
952 8d1b399b 2021-07-22 op 
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);
956 8d1b399b 2021-07-22 op 
957 8d1b399b 2021-07-22 op set:
958 8d1b399b 2021-07-22 op 	if ((pki->key = tls_load_file(path, &pki->keylen, NULL)) == NULL)
959 8d1b399b 2021-07-22 op 		fatal(NULL);
960 8d1b399b 2021-07-22 op }
961 8d1b399b 2021-07-22 op 
962 d82b9f6d 2021-07-22 op static struct kd_listen_conf *
963 d82b9f6d 2021-07-22 op listen_new(void)
964 8d1b399b 2021-07-22 op {
965 8d1b399b 2021-07-22 op 	struct kd_listen_conf *l;
966 8d1b399b 2021-07-22 op 
967 8d1b399b 2021-07-22 op 	l = xcalloc(1, sizeof(*l));
968 8d1b399b 2021-07-22 op 	l->id = counter++;
969 8d1b399b 2021-07-22 op 	l->fd = -1;
970 8d1b399b 2021-07-22 op 
971 c25feded 2021-07-26 op 	STAILQ_INSERT_HEAD(&conf->listen_head, l, entry);
972 d82b9f6d 2021-07-22 op 	return l;
973 8d1b399b 2021-07-22 op }