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 ab51127d 2021-08-04 op 
467 ab51127d 2021-08-04 op #if 0
468 ab51127d 2021-08-04 op int my_yylex(void);
469 8d1b399b 2021-07-22 op 
470 8d1b399b 2021-07-22 op int
471 8d1b399b 2021-07-22 op yylex(void)
472 8d1b399b 2021-07-22 op {
473 ab51127d 2021-08-04 op 	int x;
474 ab51127d 2021-08-04 op 
475 ab51127d 2021-08-04 op 	switch (x = my_yylex()) {
476 ab51127d 2021-08-04 op 	case AUTH:
477 ab51127d 2021-08-04 op 		puts("auth");
478 ab51127d 2021-08-04 op 		break;
479 ab51127d 2021-08-04 op 	case CERT:
480 ab51127d 2021-08-04 op 		puts("cert");
481 ab51127d 2021-08-04 op 		break;
482 ab51127d 2021-08-04 op 	case ERROR:
483 ab51127d 2021-08-04 op 		puts("error");
484 ab51127d 2021-08-04 op 		break;
485 ab51127d 2021-08-04 op 	case INCLUDE:
486 ab51127d 2021-08-04 op 		puts("include");
487 ab51127d 2021-08-04 op 		break;
488 ab51127d 2021-08-04 op 	case KEY:
489 ab51127d 2021-08-04 op 		puts("key");
490 ab51127d 2021-08-04 op 		break;
491 ab51127d 2021-08-04 op 	case LISTEN:
492 ab51127d 2021-08-04 op 		puts("listen");
493 ab51127d 2021-08-04 op 		break;
494 ab51127d 2021-08-04 op 	case NO:
495 ab51127d 2021-08-04 op 		puts("no");
496 ab51127d 2021-08-04 op 		break;
497 ab51127d 2021-08-04 op 	case ON:
498 ab51127d 2021-08-04 op 		puts("on");
499 ab51127d 2021-08-04 op 		break;
500 ab51127d 2021-08-04 op 	case PKI:
501 ab51127d 2021-08-04 op 		puts("pki");
502 ab51127d 2021-08-04 op 		break;
503 ab51127d 2021-08-04 op 	case PORT:
504 ab51127d 2021-08-04 op 		puts("port");
505 ab51127d 2021-08-04 op 		break;
506 ab51127d 2021-08-04 op 	case TABLE:
507 ab51127d 2021-08-04 op 		puts("table");
508 ab51127d 2021-08-04 op 		break;
509 ab51127d 2021-08-04 op 	case TLS:
510 ab51127d 2021-08-04 op 		puts("tls");
511 ab51127d 2021-08-04 op 		break;
512 ab51127d 2021-08-04 op 	case YES:
513 ab51127d 2021-08-04 op 		puts("yes");
514 ab51127d 2021-08-04 op 		break;
515 ab51127d 2021-08-04 op 	case STRING:
516 ab51127d 2021-08-04 op 		printf("string \"%s\"\n", yylval.v.string);
517 ab51127d 2021-08-04 op 		break;
518 ab51127d 2021-08-04 op 	case NUMBER:
519 ab51127d 2021-08-04 op 		printf("number %"PRIi64"\n", yylval.v.number);
520 ab51127d 2021-08-04 op 	default:
521 ab51127d 2021-08-04 op 		printf("character ");
522 ab51127d 2021-08-04 op 		if (x == '\n')
523 ab51127d 2021-08-04 op 			printf("\\n");
524 ab51127d 2021-08-04 op 		else
525 ab51127d 2021-08-04 op 			printf("%c", x);
526 ab51127d 2021-08-04 op 		printf(" [0x%x]", x);
527 ab51127d 2021-08-04 op 		printf("\n");
528 ab51127d 2021-08-04 op 		break;
529 ab51127d 2021-08-04 op 	}
530 ab51127d 2021-08-04 op 
531 ab51127d 2021-08-04 op 	return x;
532 ab51127d 2021-08-04 op }
533 ab51127d 2021-08-04 op 
534 ab51127d 2021-08-04 op int
535 ab51127d 2021-08-04 op my_yylex(void)
536 ab51127d 2021-08-04 op #else
537 ab51127d 2021-08-04 op int
538 ab51127d 2021-08-04 op yylex(void)
539 ab51127d 2021-08-04 op #endif
540 ab51127d 2021-08-04 op {
541 8d1b399b 2021-07-22 op 	unsigned char	 buf[8096];
542 8d1b399b 2021-07-22 op 	unsigned char	*p, *val;
543 8d1b399b 2021-07-22 op 	int		 quotec, next, c;
544 8d1b399b 2021-07-22 op 	int		 token;
545 8d1b399b 2021-07-22 op 
546 8d1b399b 2021-07-22 op top:
547 8d1b399b 2021-07-22 op 	p = buf;
548 8d1b399b 2021-07-22 op 	while ((c = lgetc(0)) == ' ' || c == '\t')
549 8d1b399b 2021-07-22 op 		; /* nothing */
550 8d1b399b 2021-07-22 op 
551 8d1b399b 2021-07-22 op 	yylval.lineno = file->lineno;
552 8d1b399b 2021-07-22 op 	if (c == '#')
553 8d1b399b 2021-07-22 op 		while ((c = lgetc(0)) != '\n' && c != EOF)
554 8d1b399b 2021-07-22 op 			; /* nothing */
555 8d1b399b 2021-07-22 op 	if (c == '$' && !expanding) {
556 8d1b399b 2021-07-22 op 		while (1) {
557 8d1b399b 2021-07-22 op 			if ((c = lgetc(0)) == EOF)
558 8d1b399b 2021-07-22 op 				return 0;
559 8d1b399b 2021-07-22 op 
560 8d1b399b 2021-07-22 op 			if (p + 1 >= buf + sizeof(buf) - 1) {
561 8d1b399b 2021-07-22 op 				yyerror("string too long");
562 8d1b399b 2021-07-22 op 				return findeol();
563 8d1b399b 2021-07-22 op 			}
564 8d1b399b 2021-07-22 op 			if (isalnum(c) || c == '_') {
565 8d1b399b 2021-07-22 op 				*p++ = c;
566 8d1b399b 2021-07-22 op 				continue;
567 8d1b399b 2021-07-22 op 			}
568 8d1b399b 2021-07-22 op 			*p = '\0';
569 8d1b399b 2021-07-22 op 			lungetc(c);
570 8d1b399b 2021-07-22 op 			break;
571 8d1b399b 2021-07-22 op 		}
572 8d1b399b 2021-07-22 op 		val = symget(buf);
573 8d1b399b 2021-07-22 op 		if (val == NULL) {
574 8d1b399b 2021-07-22 op 			yyerror("macro '%s' not defined", buf);
575 8d1b399b 2021-07-22 op 			return findeol();
576 8d1b399b 2021-07-22 op 		}
577 8d1b399b 2021-07-22 op 		p = val + strlen(val) - 1;
578 8d1b399b 2021-07-22 op 		lungetc(DONE_EXPAND);
579 8d1b399b 2021-07-22 op 		while (p >= val) {
580 8d1b399b 2021-07-22 op 			lungetc(*p);
581 8d1b399b 2021-07-22 op 			p--;
582 8d1b399b 2021-07-22 op 		}
583 8d1b399b 2021-07-22 op 		lungetc(START_EXPAND);
584 8d1b399b 2021-07-22 op 		goto top;
585 8d1b399b 2021-07-22 op 	}
586 8d1b399b 2021-07-22 op 
587 8d1b399b 2021-07-22 op 	switch (c) {
588 8d1b399b 2021-07-22 op 	case '\'':
589 8d1b399b 2021-07-22 op 	case '"':
590 8d1b399b 2021-07-22 op 		quotec = c;
591 8d1b399b 2021-07-22 op 		while (1) {
592 8d1b399b 2021-07-22 op 			if ((c = lgetc(quotec)) == EOF)
593 8d1b399b 2021-07-22 op 				return 0;
594 8d1b399b 2021-07-22 op 			if (c == '\n') {
595 8d1b399b 2021-07-22 op 				file->lineno++;
596 8d1b399b 2021-07-22 op 				continue;
597 8d1b399b 2021-07-22 op 			} else if (c == '\\') {
598 8d1b399b 2021-07-22 op 				if ((next = lgetc(quotec)) == EOF)
599 8d1b399b 2021-07-22 op 					return (0);
600 8d1b399b 2021-07-22 op 				if (next == quotec || next == ' ' ||
601 8d1b399b 2021-07-22 op 				    next == '\t')
602 8d1b399b 2021-07-22 op 					c = next;
603 8d1b399b 2021-07-22 op 				else if (next == '\n') {
604 8d1b399b 2021-07-22 op 					file->lineno++;
605 8d1b399b 2021-07-22 op 					continue;
606 8d1b399b 2021-07-22 op 				} else
607 8d1b399b 2021-07-22 op 					lungetc(next);
608 8d1b399b 2021-07-22 op 			} else if (c == quotec) {
609 8d1b399b 2021-07-22 op 				*p = '\0';
610 8d1b399b 2021-07-22 op 				break;
611 8d1b399b 2021-07-22 op 			} else if (c == '\0') {
612 8d1b399b 2021-07-22 op 				yyerror("syntax error");
613 8d1b399b 2021-07-22 op 				return findeol();
614 8d1b399b 2021-07-22 op 			}
615 8d1b399b 2021-07-22 op 			if (p + 1 >= buf + sizeof(buf) - 1) {
616 8d1b399b 2021-07-22 op 				yyerror("string too long");
617 8d1b399b 2021-07-22 op 				return findeol();
618 8d1b399b 2021-07-22 op 			}
619 8d1b399b 2021-07-22 op 			*p++ = c;
620 8d1b399b 2021-07-22 op 		}
621 8d1b399b 2021-07-22 op 		yylval.v.string = strdup(buf);
622 8d1b399b 2021-07-22 op 		if (yylval.v.string == NULL)
623 8d1b399b 2021-07-22 op 			err(1, "yylex: strdup");
624 8d1b399b 2021-07-22 op 		return STRING;
625 8d1b399b 2021-07-22 op 	}
626 8d1b399b 2021-07-22 op 
627 8d1b399b 2021-07-22 op #define allowed_to_end_number(x) \
628 8d1b399b 2021-07-22 op 	(isspace(x) || x == ')' || x ==',' || x == '/' || x == '}' || x == '=')
629 8d1b399b 2021-07-22 op 
630 8d1b399b 2021-07-22 op 	if (c == '-' || isdigit(c)) {
631 8d1b399b 2021-07-22 op 		do {
632 8d1b399b 2021-07-22 op 			*p++ = c;
633 8d1b399b 2021-07-22 op 			if ((size_t)(p-buf) >= sizeof(buf)) {
634 8d1b399b 2021-07-22 op 				yyerror("string too long");
635 8d1b399b 2021-07-22 op 				return findeol();
636 8d1b399b 2021-07-22 op 			}
637 8d1b399b 2021-07-22 op 		} while ((c = lgetc(0)) != EOF && isdigit(c));
638 8d1b399b 2021-07-22 op 		lungetc(c);
639 8d1b399b 2021-07-22 op 		if (p == buf + 1 && buf[0] == '-')
640 8d1b399b 2021-07-22 op 			goto nodigits;
641 8d1b399b 2021-07-22 op 		if (c == EOF || allowed_to_end_number(c)) {
642 8d1b399b 2021-07-22 op 			const char *errstr = NULL;
643 8d1b399b 2021-07-22 op 
644 8d1b399b 2021-07-22 op 			*p = '\0';
645 8d1b399b 2021-07-22 op 			yylval.v.number = strtonum(buf, LLONG_MIN,
646 8d1b399b 2021-07-22 op 			    LLONG_MAX, &errstr);
647 8d1b399b 2021-07-22 op 			if (errstr) {
648 8d1b399b 2021-07-22 op 				yyerror("\"%s\" invalid number: %s",
649 8d1b399b 2021-07-22 op 				    buf, errstr);
650 8d1b399b 2021-07-22 op 				return findeol();
651 8d1b399b 2021-07-22 op 			}
652 8d1b399b 2021-07-22 op 			return NUMBER;
653 8d1b399b 2021-07-22 op 		} else {
654 8d1b399b 2021-07-22 op nodigits:
655 8d1b399b 2021-07-22 op 			while (p > buf + 1)
656 8d1b399b 2021-07-22 op 				lungetc(*--p);
657 8d1b399b 2021-07-22 op 			c = *--p;
658 8d1b399b 2021-07-22 op 			if (c == '-')
659 8d1b399b 2021-07-22 op 				return c;
660 8d1b399b 2021-07-22 op 		}
661 8d1b399b 2021-07-22 op 	}
662 8d1b399b 2021-07-22 op 
663 8d1b399b 2021-07-22 op #define allowed_in_string(x) \
664 8d1b399b 2021-07-22 op 	(isalnum(x) || (ispunct(x) && x != '(' && x != ')' && \
665 8d1b399b 2021-07-22 op 	x != '{' && x != '}' && \
666 8d1b399b 2021-07-22 op 	x != '!' && x != '=' && x != '#' && \
667 afb31195 2021-08-04 op 	x != ',' && x != '>'))
668 8d1b399b 2021-07-22 op 
669 8d1b399b 2021-07-22 op 	if (isalnum(c) || c == ':' || c == '_') {
670 8d1b399b 2021-07-22 op 		do {
671 8d1b399b 2021-07-22 op 			*p++ = c;
672 8d1b399b 2021-07-22 op 			if ((size_t)(p-buf) >= sizeof(buf)) {
673 8d1b399b 2021-07-22 op 				yyerror("string too long");
674 8d1b399b 2021-07-22 op 				return findeol();
675 8d1b399b 2021-07-22 op 			}
676 8d1b399b 2021-07-22 op 		} while ((c = lgetc(0)) != EOF && (allowed_in_string(c)));
677 8d1b399b 2021-07-22 op 		lungetc(c);
678 8d1b399b 2021-07-22 op 		*p = '\0';
679 8d1b399b 2021-07-22 op 		if ((token = lookup(buf)) == STRING)
680 8d1b399b 2021-07-22 op 			if ((yylval.v.string = strdup(buf)) == NULL)
681 8d1b399b 2021-07-22 op 				err(1, "yylex: strdup");
682 8d1b399b 2021-07-22 op 		return token;
683 8d1b399b 2021-07-22 op 	}
684 8d1b399b 2021-07-22 op 	if (c == '\n') {
685 8d1b399b 2021-07-22 op 		yylval.lineno = file->lineno;
686 8d1b399b 2021-07-22 op 		file->lineno++;
687 8d1b399b 2021-07-22 op 	}
688 8d1b399b 2021-07-22 op 	if (c == EOF)
689 8d1b399b 2021-07-22 op 		return 0;
690 8d1b399b 2021-07-22 op 	return c;
691 8d1b399b 2021-07-22 op }
692 8d1b399b 2021-07-22 op 
693 8d1b399b 2021-07-22 op int
694 8d1b399b 2021-07-22 op check_file_secrecy(int fd, const char *fname)
695 8d1b399b 2021-07-22 op {
696 8d1b399b 2021-07-22 op 	struct stat	st;
697 8d1b399b 2021-07-22 op 
698 8d1b399b 2021-07-22 op 	if (fstat(fd, &st)) {
699 8d1b399b 2021-07-22 op 		log_warn("cannot stat %s", fname);
700 8d1b399b 2021-07-22 op 		return -1;
701 8d1b399b 2021-07-22 op 	}
702 8d1b399b 2021-07-22 op 	if (st.st_uid != 0 && st.st_uid != getuid()) {
703 8d1b399b 2021-07-22 op 		log_warnx("%s: owner not root or current user", fname);
704 8d1b399b 2021-07-22 op 		return -1;
705 8d1b399b 2021-07-22 op 	}
706 8d1b399b 2021-07-22 op 	if (st.st_mode & (S_IWGRP | S_IXGRP | S_IRWXO)) {
707 8d1b399b 2021-07-22 op 		log_warnx("%s: group writable or world read/writable", fname);
708 8d1b399b 2021-07-22 op 		return -1;
709 8d1b399b 2021-07-22 op 	}
710 8d1b399b 2021-07-22 op 	return 0;
711 8d1b399b 2021-07-22 op }
712 8d1b399b 2021-07-22 op 
713 8d1b399b 2021-07-22 op struct file *
714 8d1b399b 2021-07-22 op pushfile(const char *name, int secret)
715 8d1b399b 2021-07-22 op {
716 8d1b399b 2021-07-22 op 	struct file	*nfile;
717 8d1b399b 2021-07-22 op 
718 8d1b399b 2021-07-22 op 	if ((nfile = calloc(1, sizeof(struct file))) == NULL) {
719 8d1b399b 2021-07-22 op 		log_warn("calloc");
720 8d1b399b 2021-07-22 op 		return NULL;
721 8d1b399b 2021-07-22 op 	}
722 8d1b399b 2021-07-22 op 	if ((nfile->name = strdup(name)) == NULL) {
723 8d1b399b 2021-07-22 op 		log_warn("strdup");
724 8d1b399b 2021-07-22 op 		free(nfile);
725 8d1b399b 2021-07-22 op 		return NULL;
726 8d1b399b 2021-07-22 op 	}
727 8d1b399b 2021-07-22 op 	if ((nfile->stream = fopen(nfile->name, "r")) == NULL) {
728 8d1b399b 2021-07-22 op 		log_warn("%s", nfile->name);
729 8d1b399b 2021-07-22 op 		free(nfile->name);
730 8d1b399b 2021-07-22 op 		free(nfile);
731 8d1b399b 2021-07-22 op 		return NULL;
732 8d1b399b 2021-07-22 op 	} else if (secret &&
733 8d1b399b 2021-07-22 op 	    check_file_secrecy(fileno(nfile->stream), nfile->name)) {
734 8d1b399b 2021-07-22 op 		fclose(nfile->stream);
735 8d1b399b 2021-07-22 op 		free(nfile->name);
736 8d1b399b 2021-07-22 op 		free(nfile);
737 8d1b399b 2021-07-22 op 		return NULL;
738 8d1b399b 2021-07-22 op 	}
739 8d1b399b 2021-07-22 op 	nfile->lineno = TAILQ_EMPTY(&files) ? 1 : 0;
740 8d1b399b 2021-07-22 op 	nfile->ungetsize = 16;
741 8d1b399b 2021-07-22 op 	nfile->ungetbuf = malloc(nfile->ungetsize);
742 8d1b399b 2021-07-22 op 	if (nfile->ungetbuf == NULL) {
743 8d1b399b 2021-07-22 op 		log_warn("malloc");
744 8d1b399b 2021-07-22 op 		fclose(nfile->stream);
745 8d1b399b 2021-07-22 op 		free(nfile->name);
746 8d1b399b 2021-07-22 op 		free(nfile);
747 8d1b399b 2021-07-22 op 		return NULL;
748 8d1b399b 2021-07-22 op 	}
749 8d1b399b 2021-07-22 op 	TAILQ_INSERT_TAIL(&files, nfile, entry);
750 8d1b399b 2021-07-22 op 	return nfile;
751 8d1b399b 2021-07-22 op }
752 8d1b399b 2021-07-22 op 
753 8d1b399b 2021-07-22 op int
754 8d1b399b 2021-07-22 op popfile(void)
755 8d1b399b 2021-07-22 op {
756 8d1b399b 2021-07-22 op 	struct file	*prev;
757 8d1b399b 2021-07-22 op 
758 8d1b399b 2021-07-22 op 	if ((prev = TAILQ_PREV(file, files, entry)) != NULL)
759 8d1b399b 2021-07-22 op 		prev->errors += file->errors;
760 8d1b399b 2021-07-22 op 
761 8d1b399b 2021-07-22 op 	TAILQ_REMOVE(&files, file, entry);
762 8d1b399b 2021-07-22 op 	fclose(file->stream);
763 8d1b399b 2021-07-22 op 	free(file->name);
764 8d1b399b 2021-07-22 op 	free(file->ungetbuf);
765 8d1b399b 2021-07-22 op 	free(file);
766 8d1b399b 2021-07-22 op 	file = prev;
767 8d1b399b 2021-07-22 op 	return file ? 0 : EOF;
768 8d1b399b 2021-07-22 op }
769 8d1b399b 2021-07-22 op 
770 8d1b399b 2021-07-22 op struct kd_conf *
771 8d1b399b 2021-07-22 op parse_config(const char *filename)
772 8d1b399b 2021-07-22 op {
773 8d1b399b 2021-07-22 op 	struct sym		*sym, *next;
774 8d1b399b 2021-07-22 op 
775 8d1b399b 2021-07-22 op 	counter = 0;
776 8d1b399b 2021-07-22 op 	conf = config_new_empty();
777 8d1b399b 2021-07-22 op 
778 8d1b399b 2021-07-22 op 	file = pushfile(filename, 0);
779 8d1b399b 2021-07-22 op 	if (file == NULL) {
780 8d1b399b 2021-07-22 op 		free(conf);
781 8d1b399b 2021-07-22 op 		return NULL;
782 8d1b399b 2021-07-22 op 	}
783 8d1b399b 2021-07-22 op 	topfile = file;
784 8d1b399b 2021-07-22 op 
785 8d1b399b 2021-07-22 op 	yyparse();
786 8d1b399b 2021-07-22 op 	errors = file->errors;
787 8d1b399b 2021-07-22 op 	popfile();
788 8d1b399b 2021-07-22 op 
789 8d1b399b 2021-07-22 op 	/* Free macros and check which have not been used. */
790 8d1b399b 2021-07-22 op 	TAILQ_FOREACH_SAFE(sym, &symhead, entry, next) {
791 8d1b399b 2021-07-22 op 		if (verbose && !sym->used)
792 8d1b399b 2021-07-22 op 			fprintf(stderr, "warning: macro '%s' not used\n",
793 8d1b399b 2021-07-22 op 			    sym->nam);
794 8d1b399b 2021-07-22 op 		if (!sym->persist) {
795 8d1b399b 2021-07-22 op 			free(sym->nam);
796 8d1b399b 2021-07-22 op 			free(sym->val);
797 8d1b399b 2021-07-22 op 			TAILQ_REMOVE(&symhead, sym, entry);
798 8d1b399b 2021-07-22 op 			free(sym);
799 8d1b399b 2021-07-22 op 		}
800 8d1b399b 2021-07-22 op 	}
801 8d1b399b 2021-07-22 op 
802 8d1b399b 2021-07-22 op 	if (errors) {
803 8d1b399b 2021-07-22 op 		clear_config(conf);
804 8d1b399b 2021-07-22 op 		return NULL;
805 8d1b399b 2021-07-22 op 	}
806 8d1b399b 2021-07-22 op 
807 8d1b399b 2021-07-22 op 	return conf;
808 8d1b399b 2021-07-22 op }
809 8d1b399b 2021-07-22 op 
810 8d1b399b 2021-07-22 op int
811 8d1b399b 2021-07-22 op symset(const char *nam, const char *val, int persist)
812 8d1b399b 2021-07-22 op {
813 8d1b399b 2021-07-22 op 	struct sym	*sym;
814 8d1b399b 2021-07-22 op 
815 8d1b399b 2021-07-22 op 	TAILQ_FOREACH(sym, &symhead, entry) {
816 8d1b399b 2021-07-22 op 		if (strcmp(nam, sym->nam) == 0)
817 8d1b399b 2021-07-22 op 			break;
818 8d1b399b 2021-07-22 op 	}
819 8d1b399b 2021-07-22 op 
820 8d1b399b 2021-07-22 op 	if (sym != NULL) {
821 8d1b399b 2021-07-22 op 		if (sym->persist == 1)
822 8d1b399b 2021-07-22 op 			return 0;
823 8d1b399b 2021-07-22 op 		else {
824 8d1b399b 2021-07-22 op 			free(sym->nam);
825 8d1b399b 2021-07-22 op 			free(sym->val);
826 8d1b399b 2021-07-22 op 			TAILQ_REMOVE(&symhead, sym, entry);
827 8d1b399b 2021-07-22 op 			free(sym);
828 8d1b399b 2021-07-22 op 		}
829 8d1b399b 2021-07-22 op 	}
830 8d1b399b 2021-07-22 op 	if ((sym = calloc(1, sizeof(*sym))) == NULL)
831 8d1b399b 2021-07-22 op 		return -1;
832 8d1b399b 2021-07-22 op 
833 8d1b399b 2021-07-22 op 	sym->nam = strdup(nam);
834 8d1b399b 2021-07-22 op 	if (sym->nam == NULL) {
835 8d1b399b 2021-07-22 op 		free(sym);
836 8d1b399b 2021-07-22 op 		return -1;
837 8d1b399b 2021-07-22 op 	}
838 8d1b399b 2021-07-22 op 	sym->val = strdup(val);
839 8d1b399b 2021-07-22 op 	if (sym->val == NULL) {
840 8d1b399b 2021-07-22 op 		free(sym->nam);
841 8d1b399b 2021-07-22 op 		free(sym);
842 8d1b399b 2021-07-22 op 		return -1;
843 8d1b399b 2021-07-22 op 	}
844 8d1b399b 2021-07-22 op 	sym->used = 0;
845 8d1b399b 2021-07-22 op 	sym->persist = persist;
846 8d1b399b 2021-07-22 op 	TAILQ_INSERT_TAIL(&symhead, sym, entry);
847 8d1b399b 2021-07-22 op 	return 0;
848 8d1b399b 2021-07-22 op }
849 8d1b399b 2021-07-22 op 
850 8d1b399b 2021-07-22 op int
851 8d1b399b 2021-07-22 op cmdline_symset(char *s)
852 8d1b399b 2021-07-22 op {
853 8d1b399b 2021-07-22 op 	char	*sym, *val;
854 8d1b399b 2021-07-22 op 	int	ret;
855 8d1b399b 2021-07-22 op 
856 8d1b399b 2021-07-22 op 	if ((val = strrchr(s, '=')) == NULL)
857 8d1b399b 2021-07-22 op 		return -1;
858 8d1b399b 2021-07-22 op 	sym = strndup(s, val - s);
859 8d1b399b 2021-07-22 op 	if (sym == NULL)
860 8d1b399b 2021-07-22 op 		errx(1, "%s: strndup", __func__);
861 8d1b399b 2021-07-22 op 	ret = symset(sym, val + 1, 1);
862 8d1b399b 2021-07-22 op 	free(sym);
863 8d1b399b 2021-07-22 op 
864 8d1b399b 2021-07-22 op 	return ret;
865 8d1b399b 2021-07-22 op }
866 8d1b399b 2021-07-22 op 
867 8d1b399b 2021-07-22 op char *
868 8d1b399b 2021-07-22 op symget(const char *nam)
869 8d1b399b 2021-07-22 op {
870 8d1b399b 2021-07-22 op 	struct sym	*sym;
871 8d1b399b 2021-07-22 op 
872 8d1b399b 2021-07-22 op 	TAILQ_FOREACH(sym, &symhead, entry) {
873 8d1b399b 2021-07-22 op 		if (strcmp(nam, sym->nam) == 0) {
874 8d1b399b 2021-07-22 op 			sym->used = 1;
875 8d1b399b 2021-07-22 op 			return sym->val;
876 8d1b399b 2021-07-22 op 		}
877 8d1b399b 2021-07-22 op 	}
878 8d1b399b 2021-07-22 op 	return NULL;
879 8d1b399b 2021-07-22 op }
880 8d1b399b 2021-07-22 op 
881 8d1b399b 2021-07-22 op void
882 8d1b399b 2021-07-22 op clear_config(struct kd_conf *xconf)
883 8d1b399b 2021-07-22 op {
884 8d1b399b 2021-07-22 op 	/* free stuff? */
885 8d1b399b 2021-07-22 op 
886 8d1b399b 2021-07-22 op 	free(xconf);
887 8d1b399b 2021-07-22 op }
888 8d1b399b 2021-07-22 op 
889 8d1b399b 2021-07-22 op static void
890 8d1b399b 2021-07-22 op add_table(const char *name, const char *type, const char *path)
891 8d1b399b 2021-07-22 op {
892 8d1b399b 2021-07-22 op 	if (table_open(conf, name, type, path) == -1)
893 8d1b399b 2021-07-22 op 		yyerror("can't initialize table %s", name);
894 c25feded 2021-07-26 op 	table = STAILQ_FIRST(&conf->table_head)->table;
895 8d1b399b 2021-07-22 op }
896 8d1b399b 2021-07-22 op 
897 8d1b399b 2021-07-22 op static struct table *
898 8d1b399b 2021-07-22 op findtable(const char *name)
899 8d1b399b 2021-07-22 op {
900 8d1b399b 2021-07-22 op 	struct kd_tables_conf *i;
901 8d1b399b 2021-07-22 op 
902 c25feded 2021-07-26 op 	STAILQ_FOREACH(i, &conf->table_head, entry) {
903 8d1b399b 2021-07-22 op 		if (!strcmp(i->table->t_name, name))
904 8d1b399b 2021-07-22 op 			return i->table;
905 8d1b399b 2021-07-22 op 	}
906 8d1b399b 2021-07-22 op 
907 8d1b399b 2021-07-22 op 	yyerror("unknown table %s", name);
908 8d1b399b 2021-07-22 op 	return NULL;
909 8d1b399b 2021-07-22 op }
910 8d1b399b 2021-07-22 op 
911 8d1b399b 2021-07-22 op static void
912 8d1b399b 2021-07-22 op add_cert(const char *name, const char *path)
913 8d1b399b 2021-07-22 op {
914 8d1b399b 2021-07-22 op 	struct kd_pki_conf *pki;
915 8d1b399b 2021-07-22 op 
916 c25feded 2021-07-26 op 	STAILQ_FOREACH(pki, &conf->pki_head, entry) {
917 8d1b399b 2021-07-22 op 		if (strcmp(name, pki->name) != 0)
918 8d1b399b 2021-07-22 op 			continue;
919 8d1b399b 2021-07-22 op 
920 8d1b399b 2021-07-22 op 		if (pki->cert != NULL) {
921 8d1b399b 2021-07-22 op 			yyerror("duplicate `pki %s cert'", name);
922 8d1b399b 2021-07-22 op 			return;
923 8d1b399b 2021-07-22 op 		}
924 8d1b399b 2021-07-22 op 
925 8d1b399b 2021-07-22 op 		goto set;
926 8d1b399b 2021-07-22 op 	}
927 8d1b399b 2021-07-22 op 
928 8d1b399b 2021-07-22 op 	pki = xcalloc(1, sizeof(*pki));
929 8d1b399b 2021-07-22 op 	strlcpy(pki->name, name, sizeof(pki->name));
930 c25feded 2021-07-26 op 	STAILQ_INSERT_HEAD(&conf->pki_head, pki, entry);
931 8d1b399b 2021-07-22 op 
932 8d1b399b 2021-07-22 op set:
933 8d1b399b 2021-07-22 op 	if ((pki->cert = tls_load_file(path, &pki->certlen, NULL)) == NULL)
934 8d1b399b 2021-07-22 op 		fatal(NULL);
935 8d1b399b 2021-07-22 op }
936 8d1b399b 2021-07-22 op 
937 8d1b399b 2021-07-22 op static void
938 8d1b399b 2021-07-22 op add_key(const char *name, const char *path)
939 8d1b399b 2021-07-22 op {
940 8d1b399b 2021-07-22 op 	struct kd_pki_conf *pki;
941 8d1b399b 2021-07-22 op 
942 c25feded 2021-07-26 op 	STAILQ_FOREACH(pki, &conf->pki_head, entry) {
943 8d1b399b 2021-07-22 op 		if (strcmp(name, pki->name) != 0)
944 8d1b399b 2021-07-22 op 			continue;
945 8d1b399b 2021-07-22 op 
946 8d1b399b 2021-07-22 op 		if (pki->key != NULL) {
947 8d1b399b 2021-07-22 op 			yyerror("duplicate `pki %s key'", name);
948 8d1b399b 2021-07-22 op 			return;
949 8d1b399b 2021-07-22 op 		}
950 8d1b399b 2021-07-22 op 
951 8d1b399b 2021-07-22 op 		goto set;
952 8d1b399b 2021-07-22 op 	}
953 8d1b399b 2021-07-22 op 
954 8d1b399b 2021-07-22 op 	pki = xcalloc(1, sizeof(*pki));
955 8d1b399b 2021-07-22 op 	strlcpy(pki->name, name, sizeof(pki->name));
956 c25feded 2021-07-26 op 	STAILQ_INSERT_HEAD(&conf->pki_head, pki, entry);
957 8d1b399b 2021-07-22 op 
958 8d1b399b 2021-07-22 op set:
959 8d1b399b 2021-07-22 op 	if ((pki->key = tls_load_file(path, &pki->keylen, NULL)) == NULL)
960 8d1b399b 2021-07-22 op 		fatal(NULL);
961 8d1b399b 2021-07-22 op }
962 8d1b399b 2021-07-22 op 
963 d82b9f6d 2021-07-22 op static struct kd_listen_conf *
964 d82b9f6d 2021-07-22 op listen_new(void)
965 8d1b399b 2021-07-22 op {
966 8d1b399b 2021-07-22 op 	struct kd_listen_conf *l;
967 8d1b399b 2021-07-22 op 
968 8d1b399b 2021-07-22 op 	l = xcalloc(1, sizeof(*l));
969 8d1b399b 2021-07-22 op 	l->id = counter++;
970 8d1b399b 2021-07-22 op 	l->fd = -1;
971 8d1b399b 2021-07-22 op 
972 c25feded 2021-07-26 op 	STAILQ_INSERT_HEAD(&conf->listen_head, l, entry);
973 d82b9f6d 2021-07-22 op 	return l;
974 8d1b399b 2021-07-22 op }