Blame


1 15902770 2021-01-15 op %{
2 15902770 2021-01-15 op
3 15902770 2021-01-15 op /*
4 15902770 2021-01-15 op * Copyright (c) 2021 Omar Polo <op@omarpolo.com>
5 15902770 2021-01-15 op *
6 15902770 2021-01-15 op * Permission to use, copy, modify, and distribute this software for any
7 15902770 2021-01-15 op * purpose with or without fee is hereby granted, provided that the above
8 15902770 2021-01-15 op * copyright notice and this permission notice appear in all copies.
9 15902770 2021-01-15 op *
10 15902770 2021-01-15 op * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
11 15902770 2021-01-15 op * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
12 15902770 2021-01-15 op * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
13 15902770 2021-01-15 op * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
14 15902770 2021-01-15 op * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
15 15902770 2021-01-15 op * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
16 15902770 2021-01-15 op * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
17 15902770 2021-01-15 op */
18 15902770 2021-01-15 op
19 74f0778b 2021-06-16 op #include <ctype.h>
20 002a84a1 2021-02-10 op #include <errno.h>
21 6abda252 2021-02-06 op #include <stdarg.h>
22 15902770 2021-01-15 op #include <stdio.h>
23 74f0778b 2021-06-16 op #include <stdlib.h>
24 32693ee6 2021-01-28 op #include <string.h>
25 15902770 2021-01-15 op
26 15902770 2021-01-15 op #include "gmid.h"
27 15902770 2021-01-15 op
28 74f0778b 2021-06-16 op FILE *yyfp;
29 74f0778b 2021-06-16 op
30 ef129b08 2021-06-16 op typedef struct {
31 ef129b08 2021-06-16 op union {
32 ef129b08 2021-06-16 op char *str;
33 ef129b08 2021-06-16 op int num;
34 8235a81c 2021-06-29 op } v;
35 ef129b08 2021-06-16 op int lineno;
36 ef129b08 2021-06-16 op int colno;
37 ef129b08 2021-06-16 op } yystype;
38 ef129b08 2021-06-16 op #define YYSTYPE yystype
39 ef129b08 2021-06-16 op
40 15902770 2021-01-15 op /*
41 15902770 2021-01-15 op * #define YYDEBUG 1
42 15902770 2021-01-15 op * int yydebug = 1;
43 15902770 2021-01-15 op */
44 15902770 2021-01-15 op
45 3b21cca3 2021-06-29 op /*
46 3b21cca3 2021-06-29 op * The idea behind this implementation of macros is from rad/parse.y
47 3b21cca3 2021-06-29 op */
48 3b21cca3 2021-06-29 op TAILQ_HEAD(symhead, sym) symhead = TAILQ_HEAD_INITIALIZER(symhead);
49 3b21cca3 2021-06-29 op struct sym {
50 3b21cca3 2021-06-29 op TAILQ_ENTRY(sym) entry;
51 3b21cca3 2021-06-29 op int used;
52 3b21cca3 2021-06-29 op int persist;
53 3b21cca3 2021-06-29 op char *name;
54 3b21cca3 2021-06-29 op char *val;
55 3b21cca3 2021-06-29 op };
56 3b21cca3 2021-06-29 op
57 ca21e100 2021-02-04 op struct vhost *host;
58 ca21e100 2021-02-04 op struct location *loc;
59 15902770 2021-01-15 op
60 74f0778b 2021-06-16 op static int goterror;
61 15902770 2021-01-15 op
62 b8e64ccd 2021-03-31 op static struct vhost *new_vhost(void);
63 b8e64ccd 2021-03-31 op static struct location *new_location(void);
64 b8e64ccd 2021-03-31 op
65 6abda252 2021-02-06 op void yyerror(const char*, ...);
66 74f0778b 2021-06-16 op static int yylex(void);
67 13ed2fb6 2021-01-27 op int parse_portno(const char*);
68 13ed2fb6 2021-01-27 op void parse_conf(const char*);
69 e17642a7 2021-02-01 op char *ensure_absolute_path(char*);
70 6abda252 2021-02-06 op int check_block_code(int);
71 6abda252 2021-02-06 op char *check_block_fmt(char*);
72 6abda252 2021-02-06 op int check_strip_no(int);
73 a709ddf5 2021-02-07 op int check_prefork_num(int);
74 49b73ba1 2021-02-10 op void advance_loc(void);
75 c705ecb1 2021-05-03 op void only_once(const void*, const char*);
76 8ad1c570 2021-05-09 op void only_oncei(int, const char*);
77 8ad1c570 2021-05-09 op int fastcgi_conf(char *, char *, char *);
78 c92b802b 2021-06-11 op void add_param(char *, char *, int);
79 3b21cca3 2021-06-29 op int symset(const char *, const char *, int);
80 3b21cca3 2021-06-29 op char *symget(const char *);
81 13ed2fb6 2021-01-27 op
82 15902770 2021-01-15 op %}
83 15902770 2021-01-15 op
84 15902770 2021-01-15 op /* for bison: */
85 15902770 2021-01-15 op /* %define parse.error verbose */
86 15902770 2021-01-15 op
87 d06d6f4b 2021-04-29 op %token TIPV6 TPORT TPROTOCOLS TMIME TDEFAULT TTYPE TCHROOT TUSER TSERVER
88 d06d6f4b 2021-04-29 op %token TPREFORK TLOCATION TCERT TKEY TROOT TCGI TENV TLANG TLOG TINDEX TAUTO
89 8ad1c570 2021-05-09 op %token TSTRIP TBLOCK TRETURN TENTRYPOINT TREQUIRE TCLIENT TCA TALIAS TTCP
90 c92b802b 2021-06-11 op %token TFASTCGI TSPAWN TPARAM
91 d06d6f4b 2021-04-29 op
92 15902770 2021-01-15 op %token TERR
93 15902770 2021-01-15 op
94 8235a81c 2021-06-29 op %token <v.str> TSTRING
95 8235a81c 2021-06-29 op %token <v.num> TNUM
96 8235a81c 2021-06-29 op %token <v.num> TBOOL
97 15902770 2021-01-15 op
98 15902770 2021-01-15 op %%
99 15902770 2021-01-15 op
100 6b86655a 2021-06-29 op conf : /* empty */
101 6b86655a 2021-06-29 op | conf var
102 6b86655a 2021-06-29 op | conf option
103 6b86655a 2021-06-29 op | conf vhost
104 3b21cca3 2021-06-29 op ;
105 3b21cca3 2021-06-29 op
106 3b21cca3 2021-06-29 op var : TSTRING '=' TSTRING {
107 3b21cca3 2021-06-29 op char *s = $1;
108 3b21cca3 2021-06-29 op while (*s++) {
109 3b21cca3 2021-06-29 op if (isspace(*s)) {
110 3b21cca3 2021-06-29 op yyerror("macro name cannot contain "
111 3b21cca3 2021-06-29 op "whitespaces");
112 3b21cca3 2021-06-29 op free($1);
113 3b21cca3 2021-06-29 op free($3);
114 3b21cca3 2021-06-29 op YYERROR;
115 3b21cca3 2021-06-29 op }
116 3b21cca3 2021-06-29 op }
117 3b21cca3 2021-06-29 op symset($1, $3, 0);
118 3b21cca3 2021-06-29 op free($1);
119 3b21cca3 2021-06-29 op free($3);
120 3b21cca3 2021-06-29 op }
121 15902770 2021-01-15 op ;
122 15902770 2021-01-15 op
123 eb59f87e 2021-02-09 op option : TCHROOT TSTRING { conf.chroot = $2; }
124 eb59f87e 2021-02-09 op | TIPV6 TBOOL { conf.ipv6 = $2; }
125 eb59f87e 2021-02-09 op | TMIME TSTRING TSTRING { add_mime(&conf.mime, $2, $3); }
126 15902770 2021-01-15 op | TPORT TNUM { conf.port = $2; }
127 eb59f87e 2021-02-09 op | TPREFORK TNUM { conf.prefork = check_prefork_num($2); }
128 5bc3c98e 2021-01-15 op | TPROTOCOLS TSTRING {
129 5bc3c98e 2021-01-15 op if (tls_config_parse_protocols(&conf.protos, $2) == -1)
130 002a84a1 2021-02-10 op yyerror("invalid protocols string \"%s\"", $2);
131 5bc3c98e 2021-01-15 op }
132 ae08ec7d 2021-01-25 op | TUSER TSTRING { conf.user = $2; }
133 15902770 2021-01-15 op ;
134 15902770 2021-01-15 op
135 b8e64ccd 2021-03-31 op vhost : TSERVER TSTRING {
136 b8e64ccd 2021-03-31 op host = new_vhost();
137 b8e64ccd 2021-03-31 op TAILQ_INSERT_HEAD(&hosts, host, vhosts);
138 b8e64ccd 2021-03-31 op
139 b8e64ccd 2021-03-31 op loc = new_location();
140 b8e64ccd 2021-03-31 op TAILQ_INSERT_HEAD(&host->locations, loc, locations);
141 b8e64ccd 2021-03-31 op
142 b8e64ccd 2021-03-31 op loc->match = xstrdup("*");
143 15902770 2021-01-15 op host->domain = $2;
144 15902770 2021-01-15 op
145 cbeee4ca 2021-01-28 op if (strstr($2, "xn--") != NULL) {
146 ef129b08 2021-06-16 op warnx("%s:%d:%d \"%s\" looks like punycode: "
147 415ac7a2 2021-01-28 op "you should use the decoded hostname.",
148 ef129b08 2021-06-16 op config_path, yylval.lineno+1, yylval.colno,
149 ef129b08 2021-06-16 op $2);
150 cbeee4ca 2021-01-28 op }
151 b8e64ccd 2021-03-31 op } '{' servopts locations '}' {
152 cbeee4ca 2021-01-28 op
153 fdea6aa0 2021-04-30 op if (host->cert == NULL || host->key == NULL)
154 002a84a1 2021-02-10 op yyerror("invalid vhost definition: %s", $2);
155 15902770 2021-01-15 op }
156 15902770 2021-01-15 op | error '}' { yyerror("error in server directive"); }
157 15902770 2021-01-15 op ;
158 15902770 2021-01-15 op
159 15902770 2021-01-15 op servopts : /* empty */
160 15902770 2021-01-15 op | servopts servopt
161 15902770 2021-01-15 op ;
162 15902770 2021-01-15 op
163 cc8c2901 2021-04-29 op servopt : TALIAS TSTRING {
164 cc8c2901 2021-04-29 op struct alist *a;
165 cc8c2901 2021-04-29 op
166 cc8c2901 2021-04-29 op a = xcalloc(1, sizeof(*a));
167 cc8c2901 2021-04-29 op a->alias = $2;
168 cc8c2901 2021-04-29 op if (TAILQ_EMPTY(&host->aliases))
169 cc8c2901 2021-04-29 op TAILQ_INSERT_HEAD(&host->aliases, a, aliases);
170 cc8c2901 2021-04-29 op else
171 cc8c2901 2021-04-29 op TAILQ_INSERT_TAIL(&host->aliases, a, aliases);
172 cc8c2901 2021-04-29 op }
173 c705ecb1 2021-05-03 op | TCERT TSTRING {
174 c705ecb1 2021-05-03 op only_once(host->cert, "cert");
175 c705ecb1 2021-05-03 op host->cert = ensure_absolute_path($2);
176 c705ecb1 2021-05-03 op }
177 15902770 2021-01-15 op | TCGI TSTRING {
178 c705ecb1 2021-05-03 op only_once(host->cgi, "cgi");
179 15902770 2021-01-15 op /* drop the starting '/', if any */
180 709f4c94 2021-02-04 op if (*$2 == '/')
181 709f4c94 2021-02-04 op memmove($2, $2+1, strlen($2));
182 709f4c94 2021-02-04 op host->cgi = $2;
183 05c23a54 2021-01-19 op }
184 e3ddf390 2021-02-06 op | TENTRYPOINT TSTRING {
185 c705ecb1 2021-05-03 op only_once(host->entrypoint, "entrypoint");
186 e3ddf390 2021-02-06 op while (*$2 == '/')
187 e3ddf390 2021-02-06 op memmove($2, $2+1, strlen($2));
188 e3ddf390 2021-02-06 op host->entrypoint = $2;
189 e3ddf390 2021-02-06 op }
190 9cc630aa 2021-04-28 op | TENV TSTRING TSTRING {
191 c92b802b 2021-06-11 op add_param($2, $3, 1);
192 9cc630aa 2021-04-28 op }
193 c705ecb1 2021-05-03 op | TKEY TSTRING {
194 c705ecb1 2021-05-03 op only_once(host->key, "key");
195 c705ecb1 2021-05-03 op host->key = ensure_absolute_path($2);
196 c92b802b 2021-06-11 op }
197 c92b802b 2021-06-11 op | TPARAM TSTRING TSTRING {
198 c92b802b 2021-06-11 op add_param($2, $3, 0);
199 c705ecb1 2021-05-03 op }
200 c8b74339 2021-01-24 op | locopt
201 c8b74339 2021-01-24 op ;
202 c8b74339 2021-01-24 op
203 c8b74339 2021-01-24 op locations : /* empty */
204 c8b74339 2021-01-24 op | locations location
205 c8b74339 2021-01-24 op ;
206 c8b74339 2021-01-24 op
207 49b73ba1 2021-02-10 op location : TLOCATION { advance_loc(); } TSTRING '{' locopts '}' {
208 49b73ba1 2021-02-10 op /* drop the starting '/' if any */
209 49b73ba1 2021-02-10 op if (*$3 == '/')
210 49b73ba1 2021-02-10 op memmove($3, $3+1, strlen($3));
211 49b73ba1 2021-02-10 op loc->match = $3;
212 6119e13e 2021-01-19 op }
213 c8b74339 2021-01-24 op | error '}'
214 c8b74339 2021-01-24 op ;
215 c8b74339 2021-01-24 op
216 c8b74339 2021-01-24 op locopts : /* empty */
217 c8b74339 2021-01-24 op | locopts locopt
218 c8b74339 2021-01-24 op ;
219 c8b74339 2021-01-24 op
220 eb59f87e 2021-02-09 op locopt : TAUTO TINDEX TBOOL { loc->auto_index = $3 ? 1 : -1; }
221 6abda252 2021-02-06 op | TBLOCK TRETURN TNUM TSTRING {
222 c705ecb1 2021-05-03 op only_once(loc->block_fmt, "block");
223 6abda252 2021-02-06 op loc->block_fmt = check_block_fmt($4);
224 6abda252 2021-02-06 op loc->block_code = check_block_code($3);
225 6abda252 2021-02-06 op }
226 6abda252 2021-02-06 op | TBLOCK TRETURN TNUM {
227 c705ecb1 2021-05-03 op only_once(loc->block_fmt, "block");
228 6abda252 2021-02-06 op loc->block_fmt = xstrdup("temporary failure");
229 6abda252 2021-02-06 op loc->block_code = check_block_code($3);
230 6abda252 2021-02-06 op if ($3 >= 30 && $3 < 40)
231 6abda252 2021-02-06 op yyerror("missing `meta' for block return %d", $3);
232 6abda252 2021-02-06 op }
233 6abda252 2021-02-06 op | TBLOCK {
234 c705ecb1 2021-05-03 op only_once(loc->block_fmt, "block");
235 6abda252 2021-02-06 op loc->block_fmt = xstrdup("temporary failure");
236 6abda252 2021-02-06 op loc->block_code = 40;
237 6abda252 2021-02-06 op }
238 eb59f87e 2021-02-09 op | TDEFAULT TTYPE TSTRING {
239 c705ecb1 2021-05-03 op only_once(loc->default_mime, "default type");
240 eb59f87e 2021-02-09 op loc->default_mime = $3;
241 eb59f87e 2021-02-09 op }
242 0d047efc 2021-05-24 op | TFASTCGI fastcgi
243 eb59f87e 2021-02-09 op | TINDEX TSTRING {
244 c705ecb1 2021-05-03 op only_once(loc->index, "index");
245 eb59f87e 2021-02-09 op loc->index = $2;
246 eb59f87e 2021-02-09 op }
247 eb59f87e 2021-02-09 op | TLANG TSTRING {
248 c705ecb1 2021-05-03 op only_once(loc->lang, "lang");
249 eb59f87e 2021-02-09 op loc->lang = $2;
250 eb59f87e 2021-02-09 op }
251 793835cb 2021-02-23 op | TLOG TBOOL { loc->disable_log = !$2; }
252 02be96c6 2021-02-09 op | TREQUIRE TCLIENT TCA TSTRING {
253 c705ecb1 2021-05-03 op only_once(loc->reqca, "require client ca");
254 adbe6a64 2021-04-30 op ensure_absolute_path($4);
255 02be96c6 2021-02-09 op if ((loc->reqca = load_ca($4)) == NULL)
256 02be96c6 2021-02-09 op yyerror("couldn't load ca cert: %s", $4);
257 02be96c6 2021-02-09 op free($4);
258 fdea6aa0 2021-04-30 op }
259 fdea6aa0 2021-04-30 op | TROOT TSTRING {
260 c705ecb1 2021-05-03 op only_once(loc->dir, "root");
261 fdea6aa0 2021-04-30 op loc->dir = ensure_absolute_path($2);
262 02be96c6 2021-02-09 op }
263 eb59f87e 2021-02-09 op | TSTRIP TNUM { loc->strip = check_strip_no($2); }
264 15902770 2021-01-15 op ;
265 13ed2fb6 2021-01-27 op
266 0d047efc 2021-05-24 op fastcgi : TSPAWN TSTRING {
267 0d047efc 2021-05-24 op only_oncei(loc->fcgi, "fastcgi");
268 0d047efc 2021-05-24 op loc->fcgi = fastcgi_conf(NULL, NULL, $2);
269 0d047efc 2021-05-24 op }
270 0d047efc 2021-05-24 op | TSTRING {
271 0d047efc 2021-05-24 op only_oncei(loc->fcgi, "fastcgi");
272 0d047efc 2021-05-24 op loc->fcgi = fastcgi_conf($1, NULL, NULL);
273 0d047efc 2021-05-24 op }
274 0d047efc 2021-05-24 op | TTCP TSTRING TNUM {
275 0d047efc 2021-05-24 op char *c;
276 0d047efc 2021-05-24 op if (asprintf(&c, "%d", $3) == -1)
277 0d047efc 2021-05-24 op err(1, "asprintf");
278 0d047efc 2021-05-24 op only_oncei(loc->fcgi, "fastcgi");
279 0d047efc 2021-05-24 op loc->fcgi = fastcgi_conf($2, c, NULL);
280 0d047efc 2021-05-24 op }
281 0d047efc 2021-05-24 op | TTCP TSTRING {
282 0d047efc 2021-05-24 op only_oncei(loc->fcgi, "fastcgi");
283 0d047efc 2021-05-24 op loc->fcgi = fastcgi_conf($2, xstrdup("9000"), NULL);
284 0d047efc 2021-05-24 op }
285 0d047efc 2021-05-24 op | TTCP TSTRING TSTRING {
286 0d047efc 2021-05-24 op only_oncei(loc->fcgi, "fastcgi");
287 0d047efc 2021-05-24 op loc->fcgi = fastcgi_conf($2, $3, NULL);
288 0d047efc 2021-05-24 op }
289 0d047efc 2021-05-24 op ;
290 0d047efc 2021-05-24 op
291 13ed2fb6 2021-01-27 op %%
292 b8e64ccd 2021-03-31 op
293 b8e64ccd 2021-03-31 op static struct vhost *
294 b8e64ccd 2021-03-31 op new_vhost(void)
295 b8e64ccd 2021-03-31 op {
296 b8e64ccd 2021-03-31 op return xcalloc(1, sizeof(struct vhost));
297 b8e64ccd 2021-03-31 op }
298 13ed2fb6 2021-01-27 op
299 b8e64ccd 2021-03-31 op static struct location *
300 b8e64ccd 2021-03-31 op new_location(void)
301 b8e64ccd 2021-03-31 op {
302 fdea6aa0 2021-04-30 op struct location *l;
303 fdea6aa0 2021-04-30 op
304 fdea6aa0 2021-04-30 op l = xcalloc(1, sizeof(*l));
305 fdea6aa0 2021-04-30 op l->dirfd = -1;
306 8ad1c570 2021-05-09 op l->fcgi = -1;
307 fdea6aa0 2021-04-30 op return l;
308 b8e64ccd 2021-03-31 op }
309 b8e64ccd 2021-03-31 op
310 13ed2fb6 2021-01-27 op void
311 6abda252 2021-02-06 op yyerror(const char *msg, ...)
312 13ed2fb6 2021-01-27 op {
313 6abda252 2021-02-06 op va_list ap;
314 6abda252 2021-02-06 op
315 13ed2fb6 2021-01-27 op goterror = 1;
316 6abda252 2021-02-06 op
317 6abda252 2021-02-06 op va_start(ap, msg);
318 ef129b08 2021-06-16 op fprintf(stderr, "%s:%d: ", config_path, yylval.lineno);
319 6abda252 2021-02-06 op vfprintf(stderr, msg, ap);
320 a1373913 2021-02-07 op fprintf(stderr, "\n");
321 6abda252 2021-02-06 op va_end(ap);
322 74f0778b 2021-06-16 op }
323 74f0778b 2021-06-16 op
324 74f0778b 2021-06-16 op static struct keyword {
325 74f0778b 2021-06-16 op const char *word;
326 74f0778b 2021-06-16 op int token;
327 74f0778b 2021-06-16 op } keywords[] = {
328 74f0778b 2021-06-16 op {"alias", TALIAS},
329 74f0778b 2021-06-16 op {"auto", TAUTO},
330 74f0778b 2021-06-16 op {"block", TBLOCK},
331 74f0778b 2021-06-16 op {"ca", TCA},
332 74f0778b 2021-06-16 op {"cert", TCERT},
333 74f0778b 2021-06-16 op {"cgi", TCGI},
334 74f0778b 2021-06-16 op {"chroot", TCHROOT},
335 74f0778b 2021-06-16 op {"client", TCLIENT},
336 74f0778b 2021-06-16 op {"default", TDEFAULT},
337 74f0778b 2021-06-16 op {"entrypoint", TENTRYPOINT},
338 74f0778b 2021-06-16 op {"env", TENV},
339 74f0778b 2021-06-16 op {"fastcgi", TFASTCGI},
340 74f0778b 2021-06-16 op {"index", TINDEX},
341 74f0778b 2021-06-16 op {"ipv6", TIPV6},
342 74f0778b 2021-06-16 op {"key", TKEY},
343 74f0778b 2021-06-16 op {"lang", TLANG},
344 74f0778b 2021-06-16 op {"location", TLOCATION},
345 74f0778b 2021-06-16 op {"log", TLOG},
346 74f0778b 2021-06-16 op {"mime", TMIME},
347 74f0778b 2021-06-16 op {"param", TPARAM},
348 74f0778b 2021-06-16 op {"port", TPORT},
349 74f0778b 2021-06-16 op {"prefork", TPREFORK},
350 74f0778b 2021-06-16 op {"protocols", TPROTOCOLS},
351 74f0778b 2021-06-16 op {"require", TREQUIRE},
352 74f0778b 2021-06-16 op {"return", TRETURN},
353 74f0778b 2021-06-16 op {"root", TROOT},
354 74f0778b 2021-06-16 op {"server", TSERVER},
355 74f0778b 2021-06-16 op {"spawn", TSPAWN},
356 74f0778b 2021-06-16 op {"strip", TSTRIP},
357 74f0778b 2021-06-16 op {"tcp", TTCP},
358 74f0778b 2021-06-16 op {"type", TTYPE},
359 74f0778b 2021-06-16 op {"user", TUSER},
360 74f0778b 2021-06-16 op };
361 74f0778b 2021-06-16 op
362 74f0778b 2021-06-16 op /*
363 74f0778b 2021-06-16 op * Taken an adapted from doas' parse.y
364 74f0778b 2021-06-16 op */
365 74f0778b 2021-06-16 op static int
366 74f0778b 2021-06-16 op yylex(void)
367 74f0778b 2021-06-16 op {
368 3b21cca3 2021-06-29 op char buf[8096], *ebuf, *p, *str, *v, *val;
369 74f0778b 2021-06-16 op int c, quotes = 0, escape = 0, qpos = -1, nonkw = 0;
370 3b21cca3 2021-06-29 op size_t i, len;
371 74f0778b 2021-06-16 op
372 74f0778b 2021-06-16 op p = buf;
373 74f0778b 2021-06-16 op ebuf = buf + sizeof(buf);
374 74f0778b 2021-06-16 op
375 74f0778b 2021-06-16 op repeat:
376 74f0778b 2021-06-16 op /* skip whitespace first */
377 74f0778b 2021-06-16 op for (c = getc(yyfp); isspace(c); c = getc(yyfp)) {
378 ef129b08 2021-06-16 op yylval.colno++;
379 74f0778b 2021-06-16 op if (c == '\n') {
380 ef129b08 2021-06-16 op yylval.lineno++;
381 ef129b08 2021-06-16 op yylval.colno = 0;
382 74f0778b 2021-06-16 op }
383 74f0778b 2021-06-16 op }
384 74f0778b 2021-06-16 op
385 74f0778b 2021-06-16 op /* check for special one-character constructions */
386 74f0778b 2021-06-16 op switch (c) {
387 74f0778b 2021-06-16 op case '{':
388 74f0778b 2021-06-16 op case '}':
389 74f0778b 2021-06-16 op return c;
390 74f0778b 2021-06-16 op case '#':
391 74f0778b 2021-06-16 op /* skip comments; NUL is allowed; no continuation */
392 74f0778b 2021-06-16 op while ((c = getc(yyfp)) != '\n')
393 74f0778b 2021-06-16 op if (c == EOF)
394 74f0778b 2021-06-16 op goto eof;
395 ef129b08 2021-06-16 op yylval.colno = 0;
396 ef129b08 2021-06-16 op yylval.lineno++;
397 74f0778b 2021-06-16 op goto repeat;
398 3b21cca3 2021-06-29 op case '=':
399 3b21cca3 2021-06-29 op return c;
400 74f0778b 2021-06-16 op case EOF:
401 74f0778b 2021-06-16 op goto eof;
402 74f0778b 2021-06-16 op }
403 74f0778b 2021-06-16 op
404 3b21cca3 2021-06-29 op top:
405 74f0778b 2021-06-16 op /* parsing next word */
406 ef129b08 2021-06-16 op for (;; c = getc(yyfp), yylval.colno++) {
407 74f0778b 2021-06-16 op switch (c) {
408 74f0778b 2021-06-16 op case '\0':
409 74f0778b 2021-06-16 op yyerror("unallowed character NULL in column %d",
410 ef129b08 2021-06-16 op yylval.colno+1);
411 74f0778b 2021-06-16 op escape = 0;
412 74f0778b 2021-06-16 op continue;
413 74f0778b 2021-06-16 op case '\\':
414 74f0778b 2021-06-16 op escape = !escape;
415 74f0778b 2021-06-16 op if (escape)
416 74f0778b 2021-06-16 op continue;
417 74f0778b 2021-06-16 op break;
418 3b21cca3 2021-06-29 op
419 3b21cca3 2021-06-29 op /* expand macros in-place */
420 3b21cca3 2021-06-29 op case '$':
421 3b21cca3 2021-06-29 op if (!escape) {
422 3b21cca3 2021-06-29 op v = p;
423 3b21cca3 2021-06-29 op while (1) {
424 3b21cca3 2021-06-29 op if ((c = getc(yyfp)) == EOF) {
425 3b21cca3 2021-06-29 op yyerror("EOF during macro expansion");
426 3b21cca3 2021-06-29 op return 0;
427 3b21cca3 2021-06-29 op }
428 3b21cca3 2021-06-29 op if (p + 1 >= ebuf - 1) {
429 3b21cca3 2021-06-29 op yyerror("string too long");
430 3b21cca3 2021-06-29 op return 0;
431 3b21cca3 2021-06-29 op }
432 3b21cca3 2021-06-29 op if (isalnum(c) || c == '_') {
433 3b21cca3 2021-06-29 op *p++ = c;
434 3b21cca3 2021-06-29 op continue;
435 3b21cca3 2021-06-29 op }
436 3b21cca3 2021-06-29 op *p = 0;
437 3b21cca3 2021-06-29 op ungetc(c, yyfp);
438 3b21cca3 2021-06-29 op break;
439 3b21cca3 2021-06-29 op }
440 3b21cca3 2021-06-29 op p = v;
441 3b21cca3 2021-06-29 op if ((val = symget(p)) == NULL) {
442 3b21cca3 2021-06-29 op yyerror("macro '%s' not defined", v);
443 3b21cca3 2021-06-29 op goto top;
444 3b21cca3 2021-06-29 op }
445 3b21cca3 2021-06-29 op len = strlen(val);
446 3b21cca3 2021-06-29 op if (p + len >= ebuf - 1) {
447 3b21cca3 2021-06-29 op yyerror("after macro-expansion, "
448 3b21cca3 2021-06-29 op "string too long");
449 3b21cca3 2021-06-29 op goto top;
450 3b21cca3 2021-06-29 op }
451 3b21cca3 2021-06-29 op *p = '\0';
452 3b21cca3 2021-06-29 op strlcat(p, val, ebuf - p);
453 3b21cca3 2021-06-29 op p += len;
454 3b21cca3 2021-06-29 op goto top;
455 3b21cca3 2021-06-29 op }
456 3b21cca3 2021-06-29 op break;
457 74f0778b 2021-06-16 op case '\n':
458 74f0778b 2021-06-16 op if (quotes)
459 74f0778b 2021-06-16 op yyerror("unterminated quotes in column %d",
460 ef129b08 2021-06-16 op yylval.colno+1);
461 74f0778b 2021-06-16 op if (escape) {
462 74f0778b 2021-06-16 op nonkw = 1;
463 74f0778b 2021-06-16 op escape = 0;
464 ef129b08 2021-06-16 op yylval.colno = 0;
465 ef129b08 2021-06-16 op yylval.lineno++;
466 74f0778b 2021-06-16 op }
467 74f0778b 2021-06-16 op goto eow;
468 74f0778b 2021-06-16 op case EOF:
469 74f0778b 2021-06-16 op if (escape)
470 74f0778b 2021-06-16 op yyerror("unterminated escape in column %d",
471 ef129b08 2021-06-16 op yylval.colno);
472 74f0778b 2021-06-16 op if (quotes)
473 74f0778b 2021-06-16 op yyerror("unterminated quotes in column %d",
474 74f0778b 2021-06-16 op qpos+1);
475 74f0778b 2021-06-16 op goto eow;
476 74f0778b 2021-06-16 op case '{':
477 74f0778b 2021-06-16 op case '}':
478 74f0778b 2021-06-16 op case '#':
479 74f0778b 2021-06-16 op case ' ':
480 74f0778b 2021-06-16 op case '\t':
481 74f0778b 2021-06-16 op if (!escape && !quotes)
482 74f0778b 2021-06-16 op goto eow;
483 74f0778b 2021-06-16 op break;
484 74f0778b 2021-06-16 op case '"':
485 74f0778b 2021-06-16 op if (!escape) {
486 74f0778b 2021-06-16 op quotes = !quotes;
487 74f0778b 2021-06-16 op if (quotes) {
488 74f0778b 2021-06-16 op nonkw = 1;
489 ef129b08 2021-06-16 op qpos = yylval.colno;
490 74f0778b 2021-06-16 op }
491 74f0778b 2021-06-16 op continue;
492 74f0778b 2021-06-16 op }
493 74f0778b 2021-06-16 op }
494 74f0778b 2021-06-16 op *p++ = c;
495 74f0778b 2021-06-16 op if (p == ebuf) {
496 74f0778b 2021-06-16 op yyerror("line too long");
497 74f0778b 2021-06-16 op p = buf;
498 74f0778b 2021-06-16 op }
499 74f0778b 2021-06-16 op escape = 0;
500 74f0778b 2021-06-16 op }
501 74f0778b 2021-06-16 op
502 74f0778b 2021-06-16 op eow:
503 74f0778b 2021-06-16 op *p = 0;
504 74f0778b 2021-06-16 op if (c != EOF)
505 74f0778b 2021-06-16 op ungetc(c, yyfp);
506 74f0778b 2021-06-16 op if (p == buf) {
507 74f0778b 2021-06-16 op /*
508 74f0778b 2021-06-16 op * There could be a number of reason for empty buffer,
509 74f0778b 2021-06-16 op * and we handle all of them here, to avoid cluttering
510 74f0778b 2021-06-16 op * the main loop.
511 74f0778b 2021-06-16 op */
512 74f0778b 2021-06-16 op if (c == EOF)
513 74f0778b 2021-06-16 op goto eof;
514 74f0778b 2021-06-16 op else if (qpos == -1) /* accept, e.g., empty args: cmd foo args "" */
515 74f0778b 2021-06-16 op goto repeat;
516 74f0778b 2021-06-16 op }
517 74f0778b 2021-06-16 op if (!nonkw) {
518 74f0778b 2021-06-16 op for (i = 0; i < sizeof(keywords) / sizeof(keywords[0]); ++i) {
519 74f0778b 2021-06-16 op if (!strcmp(buf, keywords[i].word))
520 74f0778b 2021-06-16 op return keywords[i].token;
521 74f0778b 2021-06-16 op }
522 74f0778b 2021-06-16 op }
523 74f0778b 2021-06-16 op c = *buf;
524 74f0778b 2021-06-16 op if (!nonkw && (c == '-' || isdigit(c))) {
525 8235a81c 2021-06-29 op yylval.v.num = parse_portno(buf);
526 74f0778b 2021-06-16 op return TNUM;
527 74f0778b 2021-06-16 op }
528 74f0778b 2021-06-16 op if (!nonkw && !strcmp(buf, "on")) {
529 8235a81c 2021-06-29 op yylval.v.num = 1;
530 74f0778b 2021-06-16 op return TBOOL;
531 74f0778b 2021-06-16 op }
532 74f0778b 2021-06-16 op if (!nonkw && !strcmp(buf, "off")) {
533 8235a81c 2021-06-29 op yylval.v.num = 0;
534 74f0778b 2021-06-16 op return TBOOL;
535 74f0778b 2021-06-16 op }
536 74f0778b 2021-06-16 op if ((str = strdup(buf)) == NULL)
537 74f0778b 2021-06-16 op err(1, "%s", __func__);
538 8235a81c 2021-06-29 op yylval.v.str = str;
539 74f0778b 2021-06-16 op return TSTRING;
540 74f0778b 2021-06-16 op
541 74f0778b 2021-06-16 op eof:
542 74f0778b 2021-06-16 op if (ferror(yyfp))
543 74f0778b 2021-06-16 op yyerror("input error reading config");
544 74f0778b 2021-06-16 op return 0;
545 13ed2fb6 2021-01-27 op }
546 13ed2fb6 2021-01-27 op
547 13ed2fb6 2021-01-27 op int
548 13ed2fb6 2021-01-27 op parse_portno(const char *p)
549 13ed2fb6 2021-01-27 op {
550 13ed2fb6 2021-01-27 op const char *errstr;
551 13ed2fb6 2021-01-27 op int n;
552 13ed2fb6 2021-01-27 op
553 13ed2fb6 2021-01-27 op n = strtonum(p, 0, UINT16_MAX, &errstr);
554 13ed2fb6 2021-01-27 op if (errstr != NULL)
555 2d34f732 2021-02-10 op yyerror("port number is %s: %s", errstr, p);
556 13ed2fb6 2021-01-27 op return n;
557 13ed2fb6 2021-01-27 op }
558 13ed2fb6 2021-01-27 op
559 13ed2fb6 2021-01-27 op void
560 13ed2fb6 2021-01-27 op parse_conf(const char *path)
561 13ed2fb6 2021-01-27 op {
562 3b21cca3 2021-06-29 op struct sym *sym, *next;
563 3b21cca3 2021-06-29 op
564 13ed2fb6 2021-01-27 op config_path = path;
565 74f0778b 2021-06-16 op if ((yyfp = fopen(path, "r")) == NULL)
566 48b69cb2 2021-04-28 op err(1, "cannot open config: %s", path);
567 13ed2fb6 2021-01-27 op yyparse();
568 74f0778b 2021-06-16 op fclose(yyfp);
569 13ed2fb6 2021-01-27 op
570 13ed2fb6 2021-01-27 op if (goterror)
571 13ed2fb6 2021-01-27 op exit(1);
572 b8e64ccd 2021-03-31 op
573 b8e64ccd 2021-03-31 op if (TAILQ_FIRST(&hosts)->domain == NULL)
574 48b69cb2 2021-04-28 op errx(1, "no vhost defined in %s", path);
575 3b21cca3 2021-06-29 op
576 3b21cca3 2021-06-29 op /* free unused macros */
577 3b21cca3 2021-06-29 op TAILQ_FOREACH_SAFE(sym, &symhead, entry, next) {
578 3b21cca3 2021-06-29 op /* TODO: warn if !sym->used */
579 3b21cca3 2021-06-29 op if (!sym->persist) {
580 3b21cca3 2021-06-29 op free(sym->name);
581 3b21cca3 2021-06-29 op free(sym->val);
582 3b21cca3 2021-06-29 op TAILQ_REMOVE(&symhead, sym, entry);
583 3b21cca3 2021-06-29 op free(sym);
584 3b21cca3 2021-06-29 op }
585 3b21cca3 2021-06-29 op }
586 13ed2fb6 2021-01-27 op }
587 e17642a7 2021-02-01 op
588 e17642a7 2021-02-01 op char *
589 e17642a7 2021-02-01 op ensure_absolute_path(char *path)
590 e17642a7 2021-02-01 op {
591 e17642a7 2021-02-01 op if (path == NULL || *path != '/')
592 adbe6a64 2021-04-30 op yyerror("not an absolute path: %s", path);
593 e17642a7 2021-02-01 op return path;
594 e17642a7 2021-02-01 op }
595 6abda252 2021-02-06 op
596 6abda252 2021-02-06 op int
597 6abda252 2021-02-06 op check_block_code(int n)
598 6abda252 2021-02-06 op {
599 6abda252 2021-02-06 op if (n < 10 || n >= 70 || (n >= 20 && n <= 29))
600 6abda252 2021-02-06 op yyerror("invalid block code %d", n);
601 6abda252 2021-02-06 op return n;
602 6abda252 2021-02-06 op }
603 6abda252 2021-02-06 op
604 6abda252 2021-02-06 op char *
605 6abda252 2021-02-06 op check_block_fmt(char *fmt)
606 6abda252 2021-02-06 op {
607 6abda252 2021-02-06 op char *s;
608 6abda252 2021-02-06 op
609 6abda252 2021-02-06 op for (s = fmt; *s; ++s) {
610 6abda252 2021-02-06 op if (*s != '%')
611 6abda252 2021-02-06 op continue;
612 6abda252 2021-02-06 op switch (*++s) {
613 6abda252 2021-02-06 op case '%':
614 6abda252 2021-02-06 op case 'p':
615 6abda252 2021-02-06 op case 'q':
616 6abda252 2021-02-06 op case 'P':
617 6abda252 2021-02-06 op case 'N':
618 6abda252 2021-02-06 op break;
619 6abda252 2021-02-06 op default:
620 6abda252 2021-02-06 op yyerror("invalid format specifier %%%c", *s);
621 6abda252 2021-02-06 op }
622 6abda252 2021-02-06 op }
623 6abda252 2021-02-06 op
624 6abda252 2021-02-06 op return fmt;
625 6abda252 2021-02-06 op }
626 6abda252 2021-02-06 op
627 6abda252 2021-02-06 op int
628 6abda252 2021-02-06 op check_strip_no(int n)
629 6abda252 2021-02-06 op {
630 6abda252 2021-02-06 op if (n <= 0)
631 6abda252 2021-02-06 op yyerror("invalid strip number %d", n);
632 a709ddf5 2021-02-07 op return n;
633 a709ddf5 2021-02-07 op }
634 a709ddf5 2021-02-07 op
635 a709ddf5 2021-02-07 op int
636 a709ddf5 2021-02-07 op check_prefork_num(int n)
637 a709ddf5 2021-02-07 op {
638 2c3e53da 2021-03-03 op if (n <= 0 || n >= PROC_MAX)
639 a709ddf5 2021-02-07 op yyerror("invalid prefork number %d", n);
640 6abda252 2021-02-06 op return n;
641 6abda252 2021-02-06 op }
642 49b73ba1 2021-02-10 op
643 49b73ba1 2021-02-10 op void
644 49b73ba1 2021-02-10 op advance_loc(void)
645 49b73ba1 2021-02-10 op {
646 b8e64ccd 2021-03-31 op loc = new_location();
647 b8e64ccd 2021-03-31 op TAILQ_INSERT_TAIL(&host->locations, loc, locations);
648 49b73ba1 2021-02-10 op }
649 c705ecb1 2021-05-03 op
650 c705ecb1 2021-05-03 op void
651 c705ecb1 2021-05-03 op only_once(const void *ptr, const char *name)
652 c705ecb1 2021-05-03 op {
653 c705ecb1 2021-05-03 op if (ptr != NULL)
654 c705ecb1 2021-05-03 op yyerror("`%s' specified more than once", name);
655 c705ecb1 2021-05-03 op }
656 8ad1c570 2021-05-09 op
657 8ad1c570 2021-05-09 op void
658 8ad1c570 2021-05-09 op only_oncei(int i, const char *name)
659 8ad1c570 2021-05-09 op {
660 8ad1c570 2021-05-09 op if (i != -1)
661 8ad1c570 2021-05-09 op yyerror("`%s' specified more than once", name);
662 8ad1c570 2021-05-09 op }
663 8ad1c570 2021-05-09 op
664 8ad1c570 2021-05-09 op int
665 8ad1c570 2021-05-09 op fastcgi_conf(char *path, char *port, char *prog)
666 8ad1c570 2021-05-09 op {
667 8ad1c570 2021-05-09 op struct fcgi *f;
668 8ad1c570 2021-05-09 op int i;
669 8ad1c570 2021-05-09 op
670 8ad1c570 2021-05-09 op for (i = 0; i < FCGI_MAX; ++i) {
671 8ad1c570 2021-05-09 op f = &fcgi[i];
672 fafc6849 2021-06-29 op
673 8ad1c570 2021-05-09 op if (f->path == NULL) {
674 8ad1c570 2021-05-09 op f->id = i;
675 8ad1c570 2021-05-09 op f->path = path;
676 8ad1c570 2021-05-09 op f->port = port;
677 8ad1c570 2021-05-09 op f->prog = prog;
678 8ad1c570 2021-05-09 op return i;
679 8ad1c570 2021-05-09 op }
680 8ad1c570 2021-05-09 op
681 8ad1c570 2021-05-09 op /* XXX: what to do with prog? */
682 8ad1c570 2021-05-09 op if (!strcmp(f->path, path) &&
683 8ad1c570 2021-05-09 op ((port == NULL && f->port == NULL) ||
684 8ad1c570 2021-05-09 op !strcmp(f->port, port))) {
685 8ad1c570 2021-05-09 op free(path);
686 8ad1c570 2021-05-09 op free(port);
687 8ad1c570 2021-05-09 op return i;
688 8ad1c570 2021-05-09 op }
689 8ad1c570 2021-05-09 op }
690 8ad1c570 2021-05-09 op
691 8ad1c570 2021-05-09 op yyerror("too much `fastcgi' rules defined.");
692 8ad1c570 2021-05-09 op return -1;
693 c92b802b 2021-06-11 op }
694 c92b802b 2021-06-11 op
695 c92b802b 2021-06-11 op void
696 c92b802b 2021-06-11 op add_param(char *name, char *val, int env)
697 c92b802b 2021-06-11 op {
698 c92b802b 2021-06-11 op struct envlist *e;
699 c92b802b 2021-06-11 op struct envhead *h;
700 c92b802b 2021-06-11 op
701 c92b802b 2021-06-11 op if (env)
702 c92b802b 2021-06-11 op h = &host->env;
703 c92b802b 2021-06-11 op else
704 c92b802b 2021-06-11 op h = &host->params;
705 c92b802b 2021-06-11 op
706 c92b802b 2021-06-11 op e = xcalloc(1, sizeof(*e));
707 c92b802b 2021-06-11 op e->name = name;
708 c92b802b 2021-06-11 op e->value = val;
709 c92b802b 2021-06-11 op if (TAILQ_EMPTY(h))
710 c92b802b 2021-06-11 op TAILQ_INSERT_HEAD(h, e, envs);
711 c92b802b 2021-06-11 op else
712 c92b802b 2021-06-11 op TAILQ_INSERT_TAIL(h, e, envs);
713 3b21cca3 2021-06-29 op }
714 3b21cca3 2021-06-29 op
715 3b21cca3 2021-06-29 op int
716 3b21cca3 2021-06-29 op symset(const char *name, const char *val, int persist)
717 3b21cca3 2021-06-29 op {
718 3b21cca3 2021-06-29 op struct sym *sym;
719 3b21cca3 2021-06-29 op
720 3b21cca3 2021-06-29 op TAILQ_FOREACH(sym, &symhead, entry) {
721 3b21cca3 2021-06-29 op if (!strcmp(name, sym->name))
722 3b21cca3 2021-06-29 op break;
723 3b21cca3 2021-06-29 op }
724 3b21cca3 2021-06-29 op
725 3b21cca3 2021-06-29 op if (sym != NULL) {
726 3b21cca3 2021-06-29 op if (sym->persist)
727 3b21cca3 2021-06-29 op return 0;
728 3b21cca3 2021-06-29 op else {
729 3b21cca3 2021-06-29 op free(sym->name);
730 3b21cca3 2021-06-29 op free(sym->val);
731 3b21cca3 2021-06-29 op TAILQ_REMOVE(&symhead, sym, entry);
732 3b21cca3 2021-06-29 op free(sym);
733 3b21cca3 2021-06-29 op }
734 3b21cca3 2021-06-29 op }
735 3b21cca3 2021-06-29 op
736 3b21cca3 2021-06-29 op sym = xcalloc(1, sizeof(*sym));
737 3b21cca3 2021-06-29 op sym->name = xstrdup(name);
738 3b21cca3 2021-06-29 op sym->val = xstrdup(val);
739 3b21cca3 2021-06-29 op sym->used = 0;
740 3b21cca3 2021-06-29 op sym->persist = persist;
741 3b21cca3 2021-06-29 op
742 3b21cca3 2021-06-29 op TAILQ_INSERT_TAIL(&symhead, sym, entry);
743 3b21cca3 2021-06-29 op return 0;
744 8ad1c570 2021-05-09 op }
745 3b21cca3 2021-06-29 op
746 3b21cca3 2021-06-29 op int
747 3b21cca3 2021-06-29 op cmdline_symset(char *s)
748 3b21cca3 2021-06-29 op {
749 3b21cca3 2021-06-29 op char *sym, *val;
750 3b21cca3 2021-06-29 op int ret;
751 3b21cca3 2021-06-29 op
752 3b21cca3 2021-06-29 op if ((val = strrchr(s, '=')) == NULL)
753 3b21cca3 2021-06-29 op return -1;
754 3b21cca3 2021-06-29 op sym = xcalloc(1, val - s + 1);
755 3b21cca3 2021-06-29 op memcpy(sym, s, val - s);
756 3b21cca3 2021-06-29 op ret = symset(sym, val + 1, 1);
757 3b21cca3 2021-06-29 op free(sym);
758 3b21cca3 2021-06-29 op return ret;
759 3b21cca3 2021-06-29 op }
760 3b21cca3 2021-06-29 op
761 3b21cca3 2021-06-29 op char *
762 3b21cca3 2021-06-29 op symget(const char *name)
763 3b21cca3 2021-06-29 op {
764 3b21cca3 2021-06-29 op struct sym *sym;
765 3b21cca3 2021-06-29 op
766 3b21cca3 2021-06-29 op TAILQ_FOREACH(sym, &symhead, entry) {
767 3b21cca3 2021-06-29 op if (!strcmp(name, sym->name)) {
768 3b21cca3 2021-06-29 op sym->used = 1;
769 3b21cca3 2021-06-29 op return sym->val;
770 3b21cca3 2021-06-29 op }
771 3b21cca3 2021-06-29 op }
772 3b21cca3 2021-06-29 op
773 3b21cca3 2021-06-29 op return NULL;
774 3b21cca3 2021-06-29 op }