1 b0a6bcf7 2022-09-13 op /*
  2 b0a6bcf7 2022-09-13 op  * Copyright (c) 2022 Omar Polo <op@omarpolo.com>
  3 b0a6bcf7 2022-09-13 op  * Copyright (c) 2007-2016 Reyk Floeter <reyk@openbsd.org>
  4 b0a6bcf7 2022-09-13 op  * Copyright (c) 2004, 2005 Esben Norby <norby@openbsd.org>
  5 b0a6bcf7 2022-09-13 op  * Copyright (c) 2004 Ryan McBride <mcbride@openbsd.org>
  6 b0a6bcf7 2022-09-13 op  * Copyright (c) 2002, 2003, 2004 Henning Brauer <henning@openbsd.org>
  7 b0a6bcf7 2022-09-13 op  * Copyright (c) 2001 Markus Friedl.  All rights reserved.
  8 b0a6bcf7 2022-09-13 op  * Copyright (c) 2001 Daniel Hartmeier.  All rights reserved.
  9 b0a6bcf7 2022-09-13 op  * Copyright (c) 2001 Theo de Raadt.  All rights reserved.
 10 b0a6bcf7 2022-09-13 op  *
 11 b0a6bcf7 2022-09-13 op  * Permission to use, copy, modify, and distribute this software for any
 12 b0a6bcf7 2022-09-13 op  * purpose with or without fee is hereby granted, provided that the above
 13 b0a6bcf7 2022-09-13 op  * copyright notice and this permission notice appear in all copies.
 14 b0a6bcf7 2022-09-13 op  *
 15 b0a6bcf7 2022-09-13 op  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 16 b0a6bcf7 2022-09-13 op  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 17 b0a6bcf7 2022-09-13 op  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 18 b0a6bcf7 2022-09-13 op  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 19 b0a6bcf7 2022-09-13 op  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 20 b0a6bcf7 2022-09-13 op  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 21 b0a6bcf7 2022-09-13 op  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 22 b0a6bcf7 2022-09-13 op  */
 23 b0a6bcf7 2022-09-13 op 
 24 b0a6bcf7 2022-09-13 op %{
 25 b0a6bcf7 2022-09-13 op #include <sys/types.h>
 26 b0a6bcf7 2022-09-13 op #include <sys/queue.h>
 27 b0a6bcf7 2022-09-13 op #include <sys/tree.h>
 28 b0a6bcf7 2022-09-13 op #include <sys/uio.h>
 29 b0a6bcf7 2022-09-13 op 
 30 b0a6bcf7 2022-09-13 op #include <err.h>
 31 b0a6bcf7 2022-09-13 op #include <event.h>
 32 b0a6bcf7 2022-09-13 op #include <netdb.h>
 33 b0a6bcf7 2022-09-13 op #include <stdio.h>
 34 b0a6bcf7 2022-09-13 op #include <stdlib.h>
 35 b0a6bcf7 2022-09-13 op #include <limits.h>
 36 b0a6bcf7 2022-09-13 op #include <stdarg.h>
 37 b0a6bcf7 2022-09-13 op #include <stdint.h>
 38 b0a6bcf7 2022-09-13 op #include <string.h>
 39 b0a6bcf7 2022-09-13 op #include <unistd.h>
 40 b0a6bcf7 2022-09-13 op #include <ctype.h>
 41 b0a6bcf7 2022-09-13 op #include <errno.h>
 42 b0a6bcf7 2022-09-13 op #include <fcntl.h>
 43 b0a6bcf7 2022-09-13 op #include <pwd.h>
 44 b0a6bcf7 2022-09-13 op #include <imsg.h>
 45 b0a6bcf7 2022-09-13 op 
 46 b0a6bcf7 2022-09-13 op #include "log.h"
 47 b0a6bcf7 2022-09-13 op #include "proc.h"
 48 b0a6bcf7 2022-09-13 op 
 49 b0a6bcf7 2022-09-13 op #include "galileo.h"
 50 b0a6bcf7 2022-09-13 op 
 51 b0a6bcf7 2022-09-13 op TAILQ_HEAD(files, file)		 files = TAILQ_HEAD_INITIALIZER(files);
 52 b0a6bcf7 2022-09-13 op static struct file {
 53 b0a6bcf7 2022-09-13 op 	TAILQ_ENTRY(file)	 entry;
 54 b0a6bcf7 2022-09-13 op 	FILE			*stream;
 55 b0a6bcf7 2022-09-13 op 	char			*name;
 56 b0a6bcf7 2022-09-13 op 	size_t			 ungetpos;
 57 b0a6bcf7 2022-09-13 op 	size_t			 ungetsize;
 58 b0a6bcf7 2022-09-13 op 	u_char			*ungetbuf;
 59 b0a6bcf7 2022-09-13 op 	int			 eof_reached;
 60 b0a6bcf7 2022-09-13 op 	int			 lineno;
 61 b0a6bcf7 2022-09-13 op 	int			 errors;
 62 b0a6bcf7 2022-09-13 op } *file, *topfile;
 63 b0a6bcf7 2022-09-13 op struct file	*pushfile(const char *, int);
 64 b0a6bcf7 2022-09-13 op int		 popfile(void);
 65 b0a6bcf7 2022-09-13 op int		 yyparse(void);
 66 b0a6bcf7 2022-09-13 op int		 yylex(void);
 67 b0a6bcf7 2022-09-13 op int		 yyerror(const char *, ...)
 68 b0a6bcf7 2022-09-13 op     __attribute__((__format__ (printf, 1, 2)))
 69 b0a6bcf7 2022-09-13 op     __attribute__((__nonnull__ (1)));
 70 b0a6bcf7 2022-09-13 op int		 kw_cmp(const void *, const void *);
 71 b0a6bcf7 2022-09-13 op int		 lookup(char *);
 72 b0a6bcf7 2022-09-13 op int		 igetc(void);
 73 b0a6bcf7 2022-09-13 op int		 lgetc(int);
 74 b0a6bcf7 2022-09-13 op void		 lungetc(int);
 75 b0a6bcf7 2022-09-13 op int		 findeol(void);
 76 b0a6bcf7 2022-09-13 op 
 77 b0a6bcf7 2022-09-13 op TAILQ_HEAD(symhead, sym)	 symhead = TAILQ_HEAD_INITIALIZER(symhead);
 78 b0a6bcf7 2022-09-13 op struct sym {
 79 b0a6bcf7 2022-09-13 op 	TAILQ_ENTRY(sym)	 entry;
 80 b0a6bcf7 2022-09-13 op 	int			 used;
 81 b0a6bcf7 2022-09-13 op 	int			 persist;
 82 b0a6bcf7 2022-09-13 op 	char			*nam;
 83 b0a6bcf7 2022-09-13 op 	char			*val;
 84 b0a6bcf7 2022-09-13 op };
 85 b0a6bcf7 2022-09-13 op int		 symset(const char *, const char *, int);
 86 b0a6bcf7 2022-09-13 op char		*symget(const char *);
 87 b0a6bcf7 2022-09-13 op 
 88 b0a6bcf7 2022-09-13 op int		 getservice(const char *);
 89 b0a6bcf7 2022-09-13 op 
 90 b0a6bcf7 2022-09-13 op static struct galileo	*conf = NULL;
 91 afb86b2c 2022-09-23 op static struct proxy	*pr = NULL;
 92 b0a6bcf7 2022-09-13 op static int		 errors;
 93 b0a6bcf7 2022-09-13 op 
 94 b0a6bcf7 2022-09-13 op typedef struct {
 95 b0a6bcf7 2022-09-13 op 	union {
 96 b0a6bcf7 2022-09-13 op 		int64_t		 number;
 97 b0a6bcf7 2022-09-13 op 		char		*string;
 98 b0a6bcf7 2022-09-13 op 	} v;
 99 b0a6bcf7 2022-09-13 op 	int lineno;
100 b0a6bcf7 2022-09-13 op } YYSTYPE;
101 b0a6bcf7 2022-09-13 op 
102 b0a6bcf7 2022-09-13 op %}
103 b0a6bcf7 2022-09-13 op 
104 b0a6bcf7 2022-09-13 op %token	INCLUDE ERROR
105 afb86b2c 2022-09-23 op %token	CHROOT HOSTNAME PORT PREFORK PROXY SOURCE STYLESHEET
106 b0a6bcf7 2022-09-13 op %type	<v.number>	NUMBER
107 b0a6bcf7 2022-09-13 op %type	<v.number>	port
108 b0a6bcf7 2022-09-13 op %type	<v.string>	STRING
109 b0a6bcf7 2022-09-13 op %type	<v.string>	string
110 b0a6bcf7 2022-09-13 op 
111 b0a6bcf7 2022-09-13 op %%
112 b0a6bcf7 2022-09-13 op 
113 b0a6bcf7 2022-09-13 op grammar		: /* empty */
114 b0a6bcf7 2022-09-13 op 		| grammar include '\n'
115 b0a6bcf7 2022-09-13 op 		| grammar '\n'
116 b0a6bcf7 2022-09-13 op 		| grammar varset '\n'
117 b0a6bcf7 2022-09-13 op 		| grammar main '\n'
118 afb86b2c 2022-09-23 op 		| grammar proxy '\n'
119 b0a6bcf7 2022-09-13 op 		| grammar error '\n'		{ file->errors++; }
120 b0a6bcf7 2022-09-13 op 		;
121 b0a6bcf7 2022-09-13 op 
122 b0a6bcf7 2022-09-13 op include		: INCLUDE string {
123 b0a6bcf7 2022-09-13 op 			struct file *nfile;
124 b0a6bcf7 2022-09-13 op 
125 b0a6bcf7 2022-09-13 op 			if ((nfile = pushfile($2, 0)) == NULL) {
126 b0a6bcf7 2022-09-13 op 				yyerror("failed to include file %s", $2);
127 b0a6bcf7 2022-09-13 op 				free($2);
128 b0a6bcf7 2022-09-13 op 				YYERROR;
129 b0a6bcf7 2022-09-13 op 			}
130 b0a6bcf7 2022-09-13 op 			free($2);
131 b0a6bcf7 2022-09-13 op 
132 b0a6bcf7 2022-09-13 op 			file = nfile;
133 b0a6bcf7 2022-09-13 op 			lungetc('\n');
134 b0a6bcf7 2022-09-13 op 		}
135 b0a6bcf7 2022-09-13 op 		;
136 b0a6bcf7 2022-09-13 op 
137 b0a6bcf7 2022-09-13 op varset		: STRING '=' STRING {
138 b0a6bcf7 2022-09-13 op 			char *s = $1;
139 b0a6bcf7 2022-09-13 op 			while (*s++) {
140 b0a6bcf7 2022-09-13 op 				if (isspace((unsigned char)*s)) {
141 b0a6bcf7 2022-09-13 op 					yyerror("macro name cannot contain "
142 b0a6bcf7 2022-09-13 op 					    "whitespace");
143 b0a6bcf7 2022-09-13 op 					free($1);
144 b0a6bcf7 2022-09-13 op 					free($3);
145 b0a6bcf7 2022-09-13 op 					YYERROR;
146 b0a6bcf7 2022-09-13 op 				}
147 b0a6bcf7 2022-09-13 op 			}
148 b0a6bcf7 2022-09-13 op 			if (symset($1, $3, 0) == -1)
149 b0a6bcf7 2022-09-13 op 				fatalx("cannot store variable");
150 b0a6bcf7 2022-09-13 op 			free($1);
151 b0a6bcf7 2022-09-13 op 			free($3);
152 b0a6bcf7 2022-09-13 op 		}
153 b0a6bcf7 2022-09-13 op 		;
154 b0a6bcf7 2022-09-13 op 
155 b0a6bcf7 2022-09-13 op main		: PREFORK NUMBER {
156 b0a6bcf7 2022-09-13 op 			if ($2 <= 0 || $2 > PROC_MAX_INSTANCES) {
157 b0a6bcf7 2022-09-13 op 				yyerror("invalid number of preforked "
158 afb86b2c 2022-09-23 op 				    "proxies: %lld", $2);
159 b0a6bcf7 2022-09-13 op 				YYERROR;
160 b0a6bcf7 2022-09-13 op 			}
161 b0a6bcf7 2022-09-13 op 			conf->sc_prefork = $2;
162 b0a6bcf7 2022-09-13 op 		}
163 b0a6bcf7 2022-09-13 op 		| CHROOT STRING {
164 b0a6bcf7 2022-09-13 op 			size_t n;
165 b0a6bcf7 2022-09-13 op 
166 b0a6bcf7 2022-09-13 op 			n = strlcpy(conf->sc_chroot, $2,
167 b0a6bcf7 2022-09-13 op 			    sizeof(conf->sc_chroot));
168 b0a6bcf7 2022-09-13 op 			if (n >= sizeof(conf->sc_chroot))
169 b0a6bcf7 2022-09-13 op 				yyerror("chroot path too long!");
170 b0a6bcf7 2022-09-13 op 			free($2);
171 b0a6bcf7 2022-09-13 op 		}
172 b0a6bcf7 2022-09-13 op 		;
173 b0a6bcf7 2022-09-13 op 
174 afb86b2c 2022-09-23 op proxy		: PROXY STRING {
175 afb86b2c 2022-09-23 op 			struct proxy	*p;
176 b0a6bcf7 2022-09-13 op 			size_t		 n;
177 b0a6bcf7 2022-09-13 op 
178 afb86b2c 2022-09-23 op 			if ((p = calloc(1, sizeof(*p))) == NULL)
179 b0a6bcf7 2022-09-13 op 				fatal("calloc");
180 b0a6bcf7 2022-09-13 op 
181 afb86b2c 2022-09-23 op 			n = strlcpy(p->pr_conf.host, $2,
182 afb86b2c 2022-09-23 op 			    sizeof(p->pr_conf.host));
183 afb86b2c 2022-09-23 op 			if (n >= sizeof(p->pr_conf.host)) {
184 b0a6bcf7 2022-09-13 op 				yyerror("server name too long");
185 b0a6bcf7 2022-09-13 op 				free($2);
186 afb86b2c 2022-09-23 op 				free(p);
187 b0a6bcf7 2022-09-13 op 				YYERROR;
188 b0a6bcf7 2022-09-13 op 			}
189 b0a6bcf7 2022-09-13 op 			free($2);
190 b0a6bcf7 2022-09-13 op 
191 afb86b2c 2022-09-23 op 			pr = p;
192 afb86b2c 2022-09-23 op 			TAILQ_INSERT_TAIL(&conf->sc_proxies, p, pr_entry);
193 afb86b2c 2022-09-23 op 		} '{' optnl proxyopts_l '}' {
194 b0a6bcf7 2022-09-13 op 			/* check if duplicate */
195 b0a6bcf7 2022-09-13 op 			/* eventually load the tls certs */
196 b0a6bcf7 2022-09-13 op 
197 afb86b2c 2022-09-23 op 			pr = NULL;
198 b0a6bcf7 2022-09-13 op 		}
199 b0a6bcf7 2022-09-13 op 		;
200 b0a6bcf7 2022-09-13 op 
201 afb86b2c 2022-09-23 op proxyopts_l	: proxyopts_l proxyoptsl nl
202 afb86b2c 2022-09-23 op 		| proxyoptsl optnl
203 b0a6bcf7 2022-09-13 op 		;
204 b0a6bcf7 2022-09-13 op 
205 26cd3e9d 2022-09-23 op proxyoptsl	: SOURCE STRING proxyport {
206 fc1cb9ea 2022-09-14 op 			size_t n;
207 fc1cb9ea 2022-09-14 op 
208 afb86b2c 2022-09-23 op 			n = strlcpy(pr->pr_conf.proxy_addr, $2,
209 afb86b2c 2022-09-23 op 			    sizeof(pr->pr_conf.proxy_addr));
210 afb86b2c 2022-09-23 op 			if (n >= sizeof(pr->pr_conf.proxy_addr))
211 afb86b2c 2022-09-23 op 				yyerror("proxy source too long!");
212 fc1cb9ea 2022-09-14 op 			free($2);
213 fc1cb9ea 2022-09-14 op 		}
214 afb86b2c 2022-09-23 op 		| HOSTNAME STRING {
215 b0a6bcf7 2022-09-13 op 			size_t n;
216 b0a6bcf7 2022-09-13 op 
217 afb86b2c 2022-09-23 op 			n = strlcpy(pr->pr_conf.proxy_name, $2,
218 afb86b2c 2022-09-23 op 			    sizeof(pr->pr_conf.proxy_name));
219 afb86b2c 2022-09-23 op 			if (n >= sizeof(pr->pr_conf.proxy_name))
220 afb86b2c 2022-09-23 op 				yyerror("proxy hostname too long!");
221 b0a6bcf7 2022-09-13 op 			free($2);
222 b0a6bcf7 2022-09-13 op 		}
223 afb86b2c 2022-09-23 op 		| STYLESHEET string {
224 b0a6bcf7 2022-09-13 op 			size_t n;
225 b0a6bcf7 2022-09-13 op 
226 afb86b2c 2022-09-23 op 			n = strlcpy(pr->pr_conf.stylesheet, $2,
227 afb86b2c 2022-09-23 op 			    sizeof(pr->pr_conf.stylesheet));
228 afb86b2c 2022-09-23 op 			if (n >= sizeof(pr->pr_conf.stylesheet))
229 afb86b2c 2022-09-23 op 				yyerror("stylesheet path too long!");
230 b0a6bcf7 2022-09-13 op 			free($2);
231 b0a6bcf7 2022-09-13 op 		}
232 b0a6bcf7 2022-09-13 op 		;
233 26cd3e9d 2022-09-23 op 
234 26cd3e9d 2022-09-23 op proxyport	: /* empty */ {
235 26cd3e9d 2022-09-23 op 			strlcpy(pr->pr_conf.proxy_port, "1965",
236 26cd3e9d 2022-09-23 op 			    sizeof(pr->pr_conf.proxy_port));
237 26cd3e9d 2022-09-23 op 		}
238 26cd3e9d 2022-09-23 op 		| PORT port {
239 26cd3e9d 2022-09-23 op 			size_t len;
240 26cd3e9d 2022-09-23 op 			int n;
241 26cd3e9d 2022-09-23 op 
242 26cd3e9d 2022-09-23 op 			len = sizeof(pr->pr_conf.proxy_port);
243 26cd3e9d 2022-09-23 op 			n = snprintf(pr->pr_conf.proxy_port, len, "%lld", $2);
244 26cd3e9d 2022-09-23 op 			if (n < 0 || (size_t)n >= len)
245 26cd3e9d 2022-09-23 op 				fatal("port number too long?");
246 26cd3e9d 2022-09-23 op 		};
247 b0a6bcf7 2022-09-13 op 
248 b0a6bcf7 2022-09-13 op port		: NUMBER {
249 b0a6bcf7 2022-09-13 op 			if ($1 <= 0 || $1 > (int)USHRT_MAX) {
250 b0a6bcf7 2022-09-13 op 				yyerror("invalid port: %lld", $1);
251 b0a6bcf7 2022-09-13 op 				YYERROR;
252 b0a6bcf7 2022-09-13 op 			}
253 b0a6bcf7 2022-09-13 op 			$$ = $1;
254 b0a6bcf7 2022-09-13 op 		}
255 b0a6bcf7 2022-09-13 op 		| STRING {
256 b0a6bcf7 2022-09-13 op 			int val;
257 b0a6bcf7 2022-09-13 op 
258 b0a6bcf7 2022-09-13 op 			if ((val = getservice($1)) == -1) {
259 b0a6bcf7 2022-09-13 op 				yyerror("invalid port: %s", $1);
260 b0a6bcf7 2022-09-13 op 				free($1);
261 b0a6bcf7 2022-09-13 op 				YYERROR;
262 b0a6bcf7 2022-09-13 op 			}
263 b0a6bcf7 2022-09-13 op 			free($1);
264 b0a6bcf7 2022-09-13 op 			$$ = val;
265 b0a6bcf7 2022-09-13 op 		}
266 b0a6bcf7 2022-09-13 op 		;
267 b0a6bcf7 2022-09-13 op 
268 b0a6bcf7 2022-09-13 op string		: STRING string {
269 b0a6bcf7 2022-09-13 op 			if (asprintf(&$$, "%s%s", $1, $2) == -1)
270 b0a6bcf7 2022-09-13 op 				fatal("asprintf string");
271 b0a6bcf7 2022-09-13 op 			free($1);
272 b0a6bcf7 2022-09-13 op 			free($2);
273 b0a6bcf7 2022-09-13 op 		}
274 b0a6bcf7 2022-09-13 op 		| STRING
275 b0a6bcf7 2022-09-13 op 		;
276 b0a6bcf7 2022-09-13 op 
277 b0a6bcf7 2022-09-13 op optnl		: '\n' optnl
278 b0a6bcf7 2022-09-13 op 		|
279 b0a6bcf7 2022-09-13 op 		;
280 b0a6bcf7 2022-09-13 op 
281 b0a6bcf7 2022-09-13 op nl		: '\n' optnl
282 b0a6bcf7 2022-09-13 op 		;
283 b0a6bcf7 2022-09-13 op 
284 b0a6bcf7 2022-09-13 op %%
285 b0a6bcf7 2022-09-13 op 
286 b0a6bcf7 2022-09-13 op struct keywords {
287 b0a6bcf7 2022-09-13 op 	const char	*k_name;
288 b0a6bcf7 2022-09-13 op 	int		 k_val;
289 b0a6bcf7 2022-09-13 op };
290 b0a6bcf7 2022-09-13 op 
291 b0a6bcf7 2022-09-13 op int
292 b0a6bcf7 2022-09-13 op yyerror(const char *fmt, ...)
293 b0a6bcf7 2022-09-13 op {
294 b0a6bcf7 2022-09-13 op 	va_list	 ap;
295 b0a6bcf7 2022-09-13 op 	char	*msg;
296 b0a6bcf7 2022-09-13 op 
297 b0a6bcf7 2022-09-13 op 	file->errors++;
298 b0a6bcf7 2022-09-13 op 	va_start(ap, fmt);
299 b0a6bcf7 2022-09-13 op 	if (vasprintf(&msg, fmt, ap) == -1)
300 b0a6bcf7 2022-09-13 op 		fatal("yyerror vasprintf");
301 b0a6bcf7 2022-09-13 op 	va_end(ap);
302 b0a6bcf7 2022-09-13 op 	log_warnx("%s:%d: %s", file->name, yylval.lineno, msg);
303 b0a6bcf7 2022-09-13 op 	free(msg);
304 b0a6bcf7 2022-09-13 op 	return (0);
305 b0a6bcf7 2022-09-13 op }
306 b0a6bcf7 2022-09-13 op 
307 b0a6bcf7 2022-09-13 op int
308 b0a6bcf7 2022-09-13 op kw_cmp(const void *k, const void *e)
309 b0a6bcf7 2022-09-13 op {
310 b0a6bcf7 2022-09-13 op 	return (strcmp(k, ((const struct keywords *)e)->k_name));
311 b0a6bcf7 2022-09-13 op }
312 b0a6bcf7 2022-09-13 op 
313 b0a6bcf7 2022-09-13 op int
314 b0a6bcf7 2022-09-13 op lookup(char *s)
315 b0a6bcf7 2022-09-13 op {
316 b0a6bcf7 2022-09-13 op 	/* this has to be sorted always */
317 b0a6bcf7 2022-09-13 op 	static const struct keywords keywords[] = {
318 b0a6bcf7 2022-09-13 op 		{ "chroot",	CHROOT },
319 b0a6bcf7 2022-09-13 op 		{ "hostname",	HOSTNAME },
320 b0a6bcf7 2022-09-13 op 		{ "include",	INCLUDE },
321 b0a6bcf7 2022-09-13 op 		{ "port",	PORT },
322 b0a6bcf7 2022-09-13 op 		{ "prefork",	PREFORK },
323 b0a6bcf7 2022-09-13 op 		{ "proxy",	PROXY },
324 b0a6bcf7 2022-09-13 op 		{ "source",	SOURCE },
325 b0a6bcf7 2022-09-13 op 		{ "stylesheet",	STYLESHEET},
326 b0a6bcf7 2022-09-13 op 	};
327 b0a6bcf7 2022-09-13 op 	const struct keywords	*p;
328 b0a6bcf7 2022-09-13 op 
329 b0a6bcf7 2022-09-13 op 	p = bsearch(s, keywords, nitems(keywords), sizeof(keywords[0]),
330 b0a6bcf7 2022-09-13 op 	    kw_cmp);
331 b0a6bcf7 2022-09-13 op 
332 b0a6bcf7 2022-09-13 op 	if (p)
333 b0a6bcf7 2022-09-13 op 		return (p->k_val);
334 b0a6bcf7 2022-09-13 op 	else
335 b0a6bcf7 2022-09-13 op 		return (STRING);
336 b0a6bcf7 2022-09-13 op }
337 b0a6bcf7 2022-09-13 op 
338 b0a6bcf7 2022-09-13 op #define START_EXPAND	1
339 b0a6bcf7 2022-09-13 op #define DONE_EXPAND	2
340 b0a6bcf7 2022-09-13 op 
341 b0a6bcf7 2022-09-13 op static int	expanding;
342 b0a6bcf7 2022-09-13 op 
343 b0a6bcf7 2022-09-13 op int
344 b0a6bcf7 2022-09-13 op igetc(void)
345 b0a6bcf7 2022-09-13 op {
346 b0a6bcf7 2022-09-13 op 	int	c;
347 b0a6bcf7 2022-09-13 op 
348 b0a6bcf7 2022-09-13 op 	while (1) {
349 b0a6bcf7 2022-09-13 op 		if (file->ungetpos > 0)
350 b0a6bcf7 2022-09-13 op 			c = file->ungetbuf[--file->ungetpos];
351 b0a6bcf7 2022-09-13 op 		else
352 b0a6bcf7 2022-09-13 op 			c = getc(file->stream);
353 b0a6bcf7 2022-09-13 op 
354 b0a6bcf7 2022-09-13 op 		if (c == START_EXPAND)
355 b0a6bcf7 2022-09-13 op 			expanding = 1;
356 b0a6bcf7 2022-09-13 op 		else if (c == DONE_EXPAND)
357 b0a6bcf7 2022-09-13 op 			expanding = 0;
358 b0a6bcf7 2022-09-13 op 		else
359 b0a6bcf7 2022-09-13 op 			break;
360 b0a6bcf7 2022-09-13 op 	}
361 b0a6bcf7 2022-09-13 op 	return (c);
362 b0a6bcf7 2022-09-13 op }
363 b0a6bcf7 2022-09-13 op 
364 b0a6bcf7 2022-09-13 op int
365 b0a6bcf7 2022-09-13 op lgetc(int quotec)
366 b0a6bcf7 2022-09-13 op {
367 b0a6bcf7 2022-09-13 op 	int		c, next;
368 b0a6bcf7 2022-09-13 op 
369 b0a6bcf7 2022-09-13 op 	if (quotec) {
370 b0a6bcf7 2022-09-13 op 		if ((c = igetc()) == EOF) {
371 b0a6bcf7 2022-09-13 op 			yyerror("reached end of file while parsing "
372 b0a6bcf7 2022-09-13 op 			    "quoted string");
373 b0a6bcf7 2022-09-13 op 			if (file == topfile || popfile() == EOF)
374 b0a6bcf7 2022-09-13 op 				return (EOF);
375 b0a6bcf7 2022-09-13 op 			return (quotec);
376 b0a6bcf7 2022-09-13 op 		}
377 b0a6bcf7 2022-09-13 op 		return (c);
378 b0a6bcf7 2022-09-13 op 	}
379 b0a6bcf7 2022-09-13 op 
380 b0a6bcf7 2022-09-13 op 	while ((c = igetc()) == '\\') {
381 b0a6bcf7 2022-09-13 op 		next = igetc();
382 b0a6bcf7 2022-09-13 op 		if (next != '\n') {
383 b0a6bcf7 2022-09-13 op 			c = next;
384 b0a6bcf7 2022-09-13 op 			break;
385 b0a6bcf7 2022-09-13 op 		}
386 b0a6bcf7 2022-09-13 op 		yylval.lineno = file->lineno;
387 b0a6bcf7 2022-09-13 op 		file->lineno++;
388 b0a6bcf7 2022-09-13 op 	}
389 b0a6bcf7 2022-09-13 op 	if (c == '\t' || c == ' ') {
390 b0a6bcf7 2022-09-13 op 		/* Compress blanks to a single space. */
391 b0a6bcf7 2022-09-13 op 		do {
392 b0a6bcf7 2022-09-13 op 			c = getc(file->stream);
393 b0a6bcf7 2022-09-13 op 		} while (c == '\t' || c == ' ');
394 b0a6bcf7 2022-09-13 op 		ungetc(c, file->stream);
395 b0a6bcf7 2022-09-13 op 		c = ' ';
396 b0a6bcf7 2022-09-13 op 	}
397 b0a6bcf7 2022-09-13 op 
398 b0a6bcf7 2022-09-13 op 	if (c == EOF) {
399 b0a6bcf7 2022-09-13 op 		/*
400 b0a6bcf7 2022-09-13 op 		 * Fake EOL when hit EOF for the first time. This gets line
401 b0a6bcf7 2022-09-13 op 		 * count right if last line in included file is syntactically
402 b0a6bcf7 2022-09-13 op 		 * invalid and has no newline.
403 b0a6bcf7 2022-09-13 op 		 */
404 b0a6bcf7 2022-09-13 op 		if (file->eof_reached == 0) {
405 b0a6bcf7 2022-09-13 op 			file->eof_reached = 1;
406 b0a6bcf7 2022-09-13 op 			return ('\n');
407 b0a6bcf7 2022-09-13 op 		}
408 b0a6bcf7 2022-09-13 op 		while (c == EOF) {
409 b0a6bcf7 2022-09-13 op 			if (file == topfile || popfile() == EOF)
410 b0a6bcf7 2022-09-13 op 				return (EOF);
411 b0a6bcf7 2022-09-13 op 			c = igetc();
412 b0a6bcf7 2022-09-13 op 		}
413 b0a6bcf7 2022-09-13 op 	}
414 b0a6bcf7 2022-09-13 op 	return (c);
415 b0a6bcf7 2022-09-13 op }
416 b0a6bcf7 2022-09-13 op 
417 b0a6bcf7 2022-09-13 op void
418 b0a6bcf7 2022-09-13 op lungetc(int c)
419 b0a6bcf7 2022-09-13 op {
420 b0a6bcf7 2022-09-13 op 	if (c == EOF)
421 b0a6bcf7 2022-09-13 op 		return;
422 b0a6bcf7 2022-09-13 op 
423 b0a6bcf7 2022-09-13 op 	if (file->ungetpos >= file->ungetsize) {
424 b0a6bcf7 2022-09-13 op 		void *p = reallocarray(file->ungetbuf, file->ungetsize, 2);
425 b0a6bcf7 2022-09-13 op 		if (p == NULL)
426 b0a6bcf7 2022-09-13 op 			err(1, "%s", __func__);
427 b0a6bcf7 2022-09-13 op 		file->ungetbuf = p;
428 b0a6bcf7 2022-09-13 op 		file->ungetsize *= 2;
429 b0a6bcf7 2022-09-13 op 	}
430 b0a6bcf7 2022-09-13 op 	file->ungetbuf[file->ungetpos++] = c;
431 b0a6bcf7 2022-09-13 op }
432 b0a6bcf7 2022-09-13 op 
433 b0a6bcf7 2022-09-13 op int
434 b0a6bcf7 2022-09-13 op findeol(void)
435 b0a6bcf7 2022-09-13 op {
436 b0a6bcf7 2022-09-13 op 	int	c;
437 b0a6bcf7 2022-09-13 op 
438 b0a6bcf7 2022-09-13 op 	/* skip to either EOF or the first real EOL */
439 b0a6bcf7 2022-09-13 op 	while (1) {
440 b0a6bcf7 2022-09-13 op 		c = lgetc(0);
441 b0a6bcf7 2022-09-13 op 		if (c == '\n') {
442 b0a6bcf7 2022-09-13 op 			file->lineno++;
443 b0a6bcf7 2022-09-13 op 			break;
444 b0a6bcf7 2022-09-13 op 		}
445 b0a6bcf7 2022-09-13 op 		if (c == EOF)
446 b0a6bcf7 2022-09-13 op 			break;
447 b0a6bcf7 2022-09-13 op 	}
448 b0a6bcf7 2022-09-13 op 	return (ERROR);
449 b0a6bcf7 2022-09-13 op }
450 b0a6bcf7 2022-09-13 op 
451 b0a6bcf7 2022-09-13 op int
452 b0a6bcf7 2022-09-13 op yylex(void)
453 b0a6bcf7 2022-09-13 op {
454 b0a6bcf7 2022-09-13 op 	char	 buf[8096];
455 b0a6bcf7 2022-09-13 op 	char	*p, *val;
456 b0a6bcf7 2022-09-13 op 	int	 quotec, next, c;
457 b0a6bcf7 2022-09-13 op 	int	 token;
458 b0a6bcf7 2022-09-13 op 
459 b0a6bcf7 2022-09-13 op top:
460 b0a6bcf7 2022-09-13 op 	p = buf;
461 b0a6bcf7 2022-09-13 op 	while ((c = lgetc(0)) == ' ' || c == '\t')
462 b0a6bcf7 2022-09-13 op 		; /* nothing */
463 b0a6bcf7 2022-09-13 op 
464 b0a6bcf7 2022-09-13 op 	yylval.lineno = file->lineno;
465 b0a6bcf7 2022-09-13 op 	if (c == '#')
466 b0a6bcf7 2022-09-13 op 		while ((c = lgetc(0)) != '\n' && c != EOF)
467 b0a6bcf7 2022-09-13 op 			; /* nothing */
468 b0a6bcf7 2022-09-13 op 	if (c == '$' && !expanding) {
469 b0a6bcf7 2022-09-13 op 		while (1) {
470 b0a6bcf7 2022-09-13 op 			if ((c = lgetc(0)) == EOF)
471 b0a6bcf7 2022-09-13 op 				return (0);
472 b0a6bcf7 2022-09-13 op 
473 b0a6bcf7 2022-09-13 op 			if (p + 1 >= buf + sizeof(buf) - 1) {
474 b0a6bcf7 2022-09-13 op 				yyerror("string too long");
475 b0a6bcf7 2022-09-13 op 				return (findeol());
476 b0a6bcf7 2022-09-13 op 			}
477 b0a6bcf7 2022-09-13 op 			if (isalnum(c) || c == '_') {
478 b0a6bcf7 2022-09-13 op 				*p++ = c;
479 b0a6bcf7 2022-09-13 op 				continue;
480 b0a6bcf7 2022-09-13 op 			}
481 b0a6bcf7 2022-09-13 op 			*p = '\0';
482 b0a6bcf7 2022-09-13 op 			lungetc(c);
483 b0a6bcf7 2022-09-13 op 			break;
484 b0a6bcf7 2022-09-13 op 		}
485 b0a6bcf7 2022-09-13 op 		val = symget(buf);
486 b0a6bcf7 2022-09-13 op 		if (val == NULL) {
487 b0a6bcf7 2022-09-13 op 			yyerror("macro '%s' not defined", buf);
488 b0a6bcf7 2022-09-13 op 			return (findeol());
489 b0a6bcf7 2022-09-13 op 		}
490 b0a6bcf7 2022-09-13 op 		p = val + strlen(val) - 1;
491 b0a6bcf7 2022-09-13 op 		lungetc(DONE_EXPAND);
492 b0a6bcf7 2022-09-13 op 		while (p >= val) {
493 b0a6bcf7 2022-09-13 op 			lungetc((unsigned char)*p);
494 b0a6bcf7 2022-09-13 op 			p--;
495 b0a6bcf7 2022-09-13 op 		}
496 b0a6bcf7 2022-09-13 op 		lungetc(START_EXPAND);
497 b0a6bcf7 2022-09-13 op 		goto top;
498 b0a6bcf7 2022-09-13 op 	}
499 b0a6bcf7 2022-09-13 op 
500 b0a6bcf7 2022-09-13 op 	switch (c) {
501 b0a6bcf7 2022-09-13 op 	case '\'':
502 b0a6bcf7 2022-09-13 op 	case '"':
503 b0a6bcf7 2022-09-13 op 		quotec = c;
504 b0a6bcf7 2022-09-13 op 		while (1) {
505 b0a6bcf7 2022-09-13 op 			if ((c = lgetc(quotec)) == EOF)
506 b0a6bcf7 2022-09-13 op 				return (0);
507 b0a6bcf7 2022-09-13 op 			if (c == '\n') {
508 b0a6bcf7 2022-09-13 op 				file->lineno++;
509 b0a6bcf7 2022-09-13 op 				continue;
510 b0a6bcf7 2022-09-13 op 			} else if (c == '\\') {
511 b0a6bcf7 2022-09-13 op 				if ((next = lgetc(quotec)) == EOF)
512 b0a6bcf7 2022-09-13 op 					return (0);
513 b0a6bcf7 2022-09-13 op 				if (next == quotec || next == ' ' ||
514 b0a6bcf7 2022-09-13 op 				    next == '\t')
515 b0a6bcf7 2022-09-13 op 					c = next;
516 b0a6bcf7 2022-09-13 op 				else if (next == '\n') {
517 b0a6bcf7 2022-09-13 op 					file->lineno++;
518 b0a6bcf7 2022-09-13 op 					continue;
519 b0a6bcf7 2022-09-13 op 				} else
520 b0a6bcf7 2022-09-13 op 					lungetc(next);
521 b0a6bcf7 2022-09-13 op 			} else if (c == quotec) {
522 b0a6bcf7 2022-09-13 op 				*p = '\0';
523 b0a6bcf7 2022-09-13 op 				break;
524 b0a6bcf7 2022-09-13 op 			} else if (c == '\0') {
525 b0a6bcf7 2022-09-13 op 				yyerror("syntax error");
526 b0a6bcf7 2022-09-13 op 				return (findeol());
527 b0a6bcf7 2022-09-13 op 			}
528 b0a6bcf7 2022-09-13 op 			if (p + 1 >= buf + sizeof(buf) - 1) {
529 b0a6bcf7 2022-09-13 op 				yyerror("string too long");
530 b0a6bcf7 2022-09-13 op 				return (findeol());
531 b0a6bcf7 2022-09-13 op 			}
532 b0a6bcf7 2022-09-13 op 			*p++ = c;
533 b0a6bcf7 2022-09-13 op 		}
534 b0a6bcf7 2022-09-13 op 		yylval.v.string = strdup(buf);
535 b0a6bcf7 2022-09-13 op 		if (yylval.v.string == NULL)
536 b0a6bcf7 2022-09-13 op 			fatal("yylex: strdup");
537 b0a6bcf7 2022-09-13 op 		return (STRING);
538 b0a6bcf7 2022-09-13 op 	}
539 b0a6bcf7 2022-09-13 op 
540 b0a6bcf7 2022-09-13 op #define allowed_to_end_number(x) \
541 b0a6bcf7 2022-09-13 op 	(isspace(x) || x == ')' || x ==',' || x == '/' || x == '}' || x == '=')
542 b0a6bcf7 2022-09-13 op 
543 b0a6bcf7 2022-09-13 op 	if (c == '-' || isdigit(c)) {
544 b0a6bcf7 2022-09-13 op 		do {
545 b0a6bcf7 2022-09-13 op 			*p++ = c;
546 b0a6bcf7 2022-09-13 op 			if ((size_t)(p-buf) >= sizeof(buf)) {
547 b0a6bcf7 2022-09-13 op 				yyerror("string too long");
548 b0a6bcf7 2022-09-13 op 				return (findeol());
549 b0a6bcf7 2022-09-13 op 			}
550 b0a6bcf7 2022-09-13 op 		} while ((c = lgetc(0)) != EOF && isdigit(c));
551 b0a6bcf7 2022-09-13 op 		lungetc(c);
552 b0a6bcf7 2022-09-13 op 		if (p == buf + 1 && buf[0] == '-')
553 b0a6bcf7 2022-09-13 op 			goto nodigits;
554 b0a6bcf7 2022-09-13 op 		if (c == EOF || allowed_to_end_number(c)) {
555 b0a6bcf7 2022-09-13 op 			const char *errstr = NULL;
556 b0a6bcf7 2022-09-13 op 
557 b0a6bcf7 2022-09-13 op 			*p = '\0';
558 b0a6bcf7 2022-09-13 op 			yylval.v.number = strtonum(buf, LLONG_MIN,
559 b0a6bcf7 2022-09-13 op 			    LLONG_MAX, &errstr);
560 b0a6bcf7 2022-09-13 op 			if (errstr) {
561 b0a6bcf7 2022-09-13 op 				yyerror("\"%s\" invalid number: %s",
562 b0a6bcf7 2022-09-13 op 				    buf, errstr);
563 b0a6bcf7 2022-09-13 op 				return (findeol());
564 b0a6bcf7 2022-09-13 op 			}
565 b0a6bcf7 2022-09-13 op 			return (NUMBER);
566 b0a6bcf7 2022-09-13 op 		} else {
567 b0a6bcf7 2022-09-13 op nodigits:
568 b0a6bcf7 2022-09-13 op 			while (p > buf + 1)
569 b0a6bcf7 2022-09-13 op 				lungetc((unsigned char)*--p);
570 b0a6bcf7 2022-09-13 op 			c = (unsigned char)*--p;
571 b0a6bcf7 2022-09-13 op 			if (c == '-')
572 b0a6bcf7 2022-09-13 op 				return (c);
573 b0a6bcf7 2022-09-13 op 		}
574 b0a6bcf7 2022-09-13 op 	}
575 b0a6bcf7 2022-09-13 op 
576 b0a6bcf7 2022-09-13 op #define allowed_in_string(x) \
577 b0a6bcf7 2022-09-13 op 	(isalnum(x) || (ispunct(x) && x != '(' && x != ')' && \
578 b0a6bcf7 2022-09-13 op 	x != '{' && x != '}' && \
579 b0a6bcf7 2022-09-13 op 	x != '!' && x != '=' && x != '#' && \
580 b0a6bcf7 2022-09-13 op 	x != ','))
581 b0a6bcf7 2022-09-13 op 
582 b0a6bcf7 2022-09-13 op 	if (isalnum(c) || c == ':' || c == '_' || c == '/') {
583 b0a6bcf7 2022-09-13 op 		do {
584 b0a6bcf7 2022-09-13 op 			*p++ = c;
585 b0a6bcf7 2022-09-13 op 			if ((size_t)(p-buf) >= sizeof(buf)) {
586 b0a6bcf7 2022-09-13 op 				yyerror("string too long");
587 b0a6bcf7 2022-09-13 op 				return (findeol());
588 b0a6bcf7 2022-09-13 op 			}
589 b0a6bcf7 2022-09-13 op 		} while ((c = lgetc(0)) != EOF && (allowed_in_string(c)));
590 b0a6bcf7 2022-09-13 op 		lungetc(c);
591 b0a6bcf7 2022-09-13 op 		*p = '\0';
592 b0a6bcf7 2022-09-13 op 		if ((token = lookup(buf)) == STRING)
593 b0a6bcf7 2022-09-13 op 			if ((yylval.v.string = strdup(buf)) == NULL)
594 b0a6bcf7 2022-09-13 op 				fatal("yylex: strdup");
595 b0a6bcf7 2022-09-13 op 		return (token);
596 b0a6bcf7 2022-09-13 op 	}
597 b0a6bcf7 2022-09-13 op 	if (c == '\n') {
598 b0a6bcf7 2022-09-13 op 		yylval.lineno = file->lineno;
599 b0a6bcf7 2022-09-13 op 		file->lineno++;
600 b0a6bcf7 2022-09-13 op 	}
601 b0a6bcf7 2022-09-13 op 	if (c == EOF)
602 b0a6bcf7 2022-09-13 op 		return (0);
603 b0a6bcf7 2022-09-13 op 	return (c);
604 b0a6bcf7 2022-09-13 op }
605 b0a6bcf7 2022-09-13 op 
606 b0a6bcf7 2022-09-13 op struct file *
607 b0a6bcf7 2022-09-13 op pushfile(const char *name, int secret)
608 b0a6bcf7 2022-09-13 op {
609 b0a6bcf7 2022-09-13 op 	struct file	*nfile;
610 b0a6bcf7 2022-09-13 op 
611 b0a6bcf7 2022-09-13 op 	if ((nfile = calloc(1, sizeof(struct file))) == NULL) {
612 b0a6bcf7 2022-09-13 op 		log_warn("%s", __func__);
613 b0a6bcf7 2022-09-13 op 		return (NULL);
614 b0a6bcf7 2022-09-13 op 	}
615 b0a6bcf7 2022-09-13 op 	if ((nfile->name = strdup(name)) == NULL) {
616 b0a6bcf7 2022-09-13 op 		log_warn("%s", __func__);
617 b0a6bcf7 2022-09-13 op 		free(nfile);
618 b0a6bcf7 2022-09-13 op 		return (NULL);
619 b0a6bcf7 2022-09-13 op 	}
620 b0a6bcf7 2022-09-13 op 	if ((nfile->stream = fopen(nfile->name, "r")) == NULL) {
621 b0a6bcf7 2022-09-13 op 		free(nfile->name);
622 b0a6bcf7 2022-09-13 op 		free(nfile);
623 b0a6bcf7 2022-09-13 op 		return (NULL);
624 b0a6bcf7 2022-09-13 op 	}
625 b0a6bcf7 2022-09-13 op 	nfile->lineno = TAILQ_EMPTY(&files) ? 1 : 0;
626 b0a6bcf7 2022-09-13 op 	nfile->ungetsize = 16;
627 b0a6bcf7 2022-09-13 op 	nfile->ungetbuf = malloc(nfile->ungetsize);
628 b0a6bcf7 2022-09-13 op 	if (nfile->ungetbuf == NULL) {
629 b0a6bcf7 2022-09-13 op 		log_warn("%s", __func__);
630 b0a6bcf7 2022-09-13 op 		fclose(nfile->stream);
631 b0a6bcf7 2022-09-13 op 		free(nfile->name);
632 b0a6bcf7 2022-09-13 op 		free(nfile);
633 b0a6bcf7 2022-09-13 op 		return (NULL);
634 b0a6bcf7 2022-09-13 op 	}
635 b0a6bcf7 2022-09-13 op 	TAILQ_INSERT_TAIL(&files, nfile, entry);
636 b0a6bcf7 2022-09-13 op 	return (nfile);
637 b0a6bcf7 2022-09-13 op }
638 b0a6bcf7 2022-09-13 op 
639 b0a6bcf7 2022-09-13 op int
640 b0a6bcf7 2022-09-13 op popfile(void)
641 b0a6bcf7 2022-09-13 op {
642 b0a6bcf7 2022-09-13 op 	struct file	*prev;
643 b0a6bcf7 2022-09-13 op 
644 b0a6bcf7 2022-09-13 op 	if ((prev = TAILQ_PREV(file, files, entry)) != NULL)
645 b0a6bcf7 2022-09-13 op 		prev->errors += file->errors;
646 b0a6bcf7 2022-09-13 op 
647 b0a6bcf7 2022-09-13 op 	TAILQ_REMOVE(&files, file, entry);
648 b0a6bcf7 2022-09-13 op 	fclose(file->stream);
649 b0a6bcf7 2022-09-13 op 	free(file->name);
650 b0a6bcf7 2022-09-13 op 	free(file->ungetbuf);
651 b0a6bcf7 2022-09-13 op 	free(file);
652 b0a6bcf7 2022-09-13 op 	file = prev;
653 b0a6bcf7 2022-09-13 op 	return (file ? 0 : EOF);
654 b0a6bcf7 2022-09-13 op }
655 b0a6bcf7 2022-09-13 op 
656 b0a6bcf7 2022-09-13 op int
657 b0a6bcf7 2022-09-13 op parse_config(const char *filename, struct galileo *env)
658 b0a6bcf7 2022-09-13 op {
659 b0a6bcf7 2022-09-13 op 	struct sym	*sym, *next;
660 b0a6bcf7 2022-09-13 op 	size_t		 n;
661 b0a6bcf7 2022-09-13 op 
662 b0a6bcf7 2022-09-13 op 	conf = env;
663 b0a6bcf7 2022-09-13 op 
664 b0a6bcf7 2022-09-13 op 	n = strlcpy(conf->sc_conffile, filename, sizeof(conf->sc_conffile));
665 b0a6bcf7 2022-09-13 op 	if (n >= sizeof(conf->sc_conffile)) {
666 b0a6bcf7 2022-09-13 op 		log_warn("path too long: %s", filename);
667 b0a6bcf7 2022-09-13 op 		return (-1);
668 b0a6bcf7 2022-09-13 op 	}
669 b0a6bcf7 2022-09-13 op 
670 b0a6bcf7 2022-09-13 op 	if ((file = pushfile(filename, 0)) == NULL) {
671 b0a6bcf7 2022-09-13 op 		log_warn("failed to open %s", filename);
672 b0a6bcf7 2022-09-13 op 		return (-1);
673 b0a6bcf7 2022-09-13 op 	}
674 b0a6bcf7 2022-09-13 op 	topfile = file;
675 b0a6bcf7 2022-09-13 op 	setservent(1);
676 b0a6bcf7 2022-09-13 op 
677 b0a6bcf7 2022-09-13 op 	yyparse();
678 b0a6bcf7 2022-09-13 op 	errors = file->errors;
679 b0a6bcf7 2022-09-13 op 	popfile();
680 b0a6bcf7 2022-09-13 op 
681 b0a6bcf7 2022-09-13 op 	endservent();
682 b0a6bcf7 2022-09-13 op 
683 b0a6bcf7 2022-09-13 op 	/* Free macros and check which have not been used. */
684 b0a6bcf7 2022-09-13 op 	TAILQ_FOREACH_SAFE(sym, &symhead, entry, next) {
685 b0a6bcf7 2022-09-13 op 		if (!sym->used)
686 b0a6bcf7 2022-09-13 op 			fprintf(stderr, "warning: macro `%s' not used\n",
687 b0a6bcf7 2022-09-13 op 			    sym->nam);
688 b0a6bcf7 2022-09-13 op 		if (!sym->persist) {
689 b0a6bcf7 2022-09-13 op 			free(sym->nam);
690 b0a6bcf7 2022-09-13 op 			free(sym->val);
691 b0a6bcf7 2022-09-13 op 			TAILQ_REMOVE(&symhead, sym, entry);
692 b0a6bcf7 2022-09-13 op 			free(sym);
693 b0a6bcf7 2022-09-13 op 		}
694 b0a6bcf7 2022-09-13 op 	}
695 b0a6bcf7 2022-09-13 op 
696 b0a6bcf7 2022-09-13 op 	if (errors)
697 b0a6bcf7 2022-09-13 op 		return (-1);
698 b0a6bcf7 2022-09-13 op 
699 b0a6bcf7 2022-09-13 op 	return (0);
700 b0a6bcf7 2022-09-13 op }
701 b0a6bcf7 2022-09-13 op 
702 b0a6bcf7 2022-09-13 op int
703 b0a6bcf7 2022-09-13 op symset(const char *nam, const char *val, int persist)
704 b0a6bcf7 2022-09-13 op {
705 b0a6bcf7 2022-09-13 op 	struct sym	*sym;
706 b0a6bcf7 2022-09-13 op 
707 b0a6bcf7 2022-09-13 op 	TAILQ_FOREACH(sym, &symhead, entry) {
708 b0a6bcf7 2022-09-13 op 		if (strcmp(nam, sym->nam) == 0)
709 b0a6bcf7 2022-09-13 op 			break;
710 b0a6bcf7 2022-09-13 op 	}
711 b0a6bcf7 2022-09-13 op 
712 b0a6bcf7 2022-09-13 op 	if (sym != NULL) {
713 b0a6bcf7 2022-09-13 op 		if (sym->persist == 1)
714 b0a6bcf7 2022-09-13 op 			return (0);
715 b0a6bcf7 2022-09-13 op 		else {
716 b0a6bcf7 2022-09-13 op 			free(sym->nam);
717 b0a6bcf7 2022-09-13 op 			free(sym->val);
718 b0a6bcf7 2022-09-13 op 			TAILQ_REMOVE(&symhead, sym, entry);
719 b0a6bcf7 2022-09-13 op 			free(sym);
720 b0a6bcf7 2022-09-13 op 		}
721 b0a6bcf7 2022-09-13 op 	}
722 b0a6bcf7 2022-09-13 op 	if ((sym = calloc(1, sizeof(*sym))) == NULL)
723 b0a6bcf7 2022-09-13 op 		return (-1);
724 b0a6bcf7 2022-09-13 op 
725 b0a6bcf7 2022-09-13 op 	sym->nam = strdup(nam);
726 b0a6bcf7 2022-09-13 op 	if (sym->nam == NULL) {
727 b0a6bcf7 2022-09-13 op 		free(sym);
728 b0a6bcf7 2022-09-13 op 		return (-1);
729 b0a6bcf7 2022-09-13 op 	}
730 b0a6bcf7 2022-09-13 op 	sym->val = strdup(val);
731 b0a6bcf7 2022-09-13 op 	if (sym->val == NULL) {
732 b0a6bcf7 2022-09-13 op 		free(sym->nam);
733 b0a6bcf7 2022-09-13 op 		free(sym);
734 b0a6bcf7 2022-09-13 op 		return (-1);
735 b0a6bcf7 2022-09-13 op 	}
736 b0a6bcf7 2022-09-13 op 	sym->used = 0;
737 b0a6bcf7 2022-09-13 op 	sym->persist = persist;
738 b0a6bcf7 2022-09-13 op 	TAILQ_INSERT_TAIL(&symhead, sym, entry);
739 b0a6bcf7 2022-09-13 op 	return (0);
740 b0a6bcf7 2022-09-13 op }
741 b0a6bcf7 2022-09-13 op 
742 b0a6bcf7 2022-09-13 op int
743 b0a6bcf7 2022-09-13 op cmdline_symset(char *s)
744 b0a6bcf7 2022-09-13 op {
745 b0a6bcf7 2022-09-13 op 	char	*sym, *val;
746 b0a6bcf7 2022-09-13 op 	int	ret;
747 b0a6bcf7 2022-09-13 op 
748 b0a6bcf7 2022-09-13 op 	if ((val = strrchr(s, '=')) == NULL)
749 b0a6bcf7 2022-09-13 op 		return (-1);
750 b0a6bcf7 2022-09-13 op 	sym = strndup(s, val - s);
751 b0a6bcf7 2022-09-13 op 	if (sym == NULL)
752 b0a6bcf7 2022-09-13 op 		fatal("%s: strndup", __func__);
753 b0a6bcf7 2022-09-13 op 	ret = symset(sym, val + 1, 1);
754 b0a6bcf7 2022-09-13 op 	free(sym);
755 b0a6bcf7 2022-09-13 op 
756 b0a6bcf7 2022-09-13 op 	return (ret);
757 b0a6bcf7 2022-09-13 op }
758 b0a6bcf7 2022-09-13 op 
759 b0a6bcf7 2022-09-13 op char *
760 b0a6bcf7 2022-09-13 op symget(const char *nam)
761 b0a6bcf7 2022-09-13 op {
762 b0a6bcf7 2022-09-13 op 	struct sym	*sym;
763 b0a6bcf7 2022-09-13 op 
764 b0a6bcf7 2022-09-13 op 	TAILQ_FOREACH(sym, &symhead, entry) {
765 b0a6bcf7 2022-09-13 op 		if (strcmp(nam, sym->nam) == 0) {
766 b0a6bcf7 2022-09-13 op 			sym->used = 1;
767 b0a6bcf7 2022-09-13 op 			return (sym->val);
768 b0a6bcf7 2022-09-13 op 		}
769 b0a6bcf7 2022-09-13 op 	}
770 b0a6bcf7 2022-09-13 op 	return (NULL);
771 b0a6bcf7 2022-09-13 op }
772 b0a6bcf7 2022-09-13 op 
773 b0a6bcf7 2022-09-13 op int
774 b0a6bcf7 2022-09-13 op getservice(const char *n)
775 b0a6bcf7 2022-09-13 op {
776 b0a6bcf7 2022-09-13 op 	struct servent	*s;
777 b0a6bcf7 2022-09-13 op 	const char	*errstr;
778 b0a6bcf7 2022-09-13 op 	long long	 llval;
779 b0a6bcf7 2022-09-13 op 
780 b0a6bcf7 2022-09-13 op 	llval = strtonum(n, 0, UINT16_MAX, &errstr);
781 b0a6bcf7 2022-09-13 op 	if (errstr) {
782 b0a6bcf7 2022-09-13 op 		s = getservbyname(n, "tcp");
783 b0a6bcf7 2022-09-13 op 		if (s == NULL)
784 b0a6bcf7 2022-09-13 op 			s = getservbyname(n, "udp");
785 b0a6bcf7 2022-09-13 op 		if (s == NULL)
786 b0a6bcf7 2022-09-13 op 			return (-1);
787 b0a6bcf7 2022-09-13 op 		return (ntohs(s->s_port));
788 b0a6bcf7 2022-09-13 op 	}
789 b0a6bcf7 2022-09-13 op 
790 b0a6bcf7 2022-09-13 op 	return ((unsigned short)llval);
791 b0a6bcf7 2022-09-13 op }