1 15902770 2021-01-15 op /* -*- mode: fundamental; indent-tabs-mode: t; -*- */
5 15902770 2021-01-15 op * Copyright (c) 2021 Omar Polo <op@omarpolo.com>
7 15902770 2021-01-15 op * Permission to use, copy, modify, and distribute this software for any
8 15902770 2021-01-15 op * purpose with or without fee is hereby granted, provided that the above
9 15902770 2021-01-15 op * copyright notice and this permission notice appear in all copies.
11 15902770 2021-01-15 op * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
12 15902770 2021-01-15 op * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
13 15902770 2021-01-15 op * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
14 15902770 2021-01-15 op * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
15 15902770 2021-01-15 op * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
16 15902770 2021-01-15 op * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
17 15902770 2021-01-15 op * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
20 15902770 2021-01-15 op #include <err.h>
21 6abda252 2021-02-06 op #include <stdarg.h>
22 15902770 2021-01-15 op #include <stdio.h>
23 32693ee6 2021-01-28 op #include <string.h>
25 15902770 2021-01-15 op #include "gmid.h"
28 15902770 2021-01-15 op * #define YYDEBUG 1
29 15902770 2021-01-15 op * int yydebug = 1;
32 ca21e100 2021-02-04 op struct vhost *host;
34 ca21e100 2021-02-04 op struct location *loc;
37 13ed2fb6 2021-01-27 op int goterror = 0;
38 13ed2fb6 2021-01-27 op const char *config_path;
40 6abda252 2021-02-06 op void yyerror(const char*, ...);
41 13ed2fb6 2021-01-27 op int parse_portno(const char*);
42 13ed2fb6 2021-01-27 op void parse_conf(const char*);
43 e17642a7 2021-02-01 op char *ensure_absolute_path(char*);
44 6abda252 2021-02-06 op int check_block_code(int);
45 6abda252 2021-02-06 op char *check_block_fmt(char*);
46 6abda252 2021-02-06 op int check_strip_no(int);
50 15902770 2021-01-15 op /* for bison: */
51 15902770 2021-01-15 op /* %define parse.error verbose */
58 46af8c6c 2021-01-27 op %token TIPV6 TPORT TPROTOCOLS TMIME TDEFAULT TTYPE
59 ae08ec7d 2021-01-25 op %token TCHROOT TUSER TSERVER
60 252908e6 2021-01-24 op %token TLOCATION TCERT TKEY TROOT TCGI TLANG TINDEX TAUTO
61 6abda252 2021-02-06 op %token TSTRIP TBLOCK TRETURN
64 15902770 2021-01-15 op %token <str> TSTRING
65 15902770 2021-01-15 op %token <num> TNUM
66 15902770 2021-01-15 op %token <num> TBOOL
70 15902770 2021-01-15 op conf : options vhosts ;
72 15902770 2021-01-15 op options : /* empty */
73 15902770 2021-01-15 op | options option
76 46af8c6c 2021-01-27 op option : TIPV6 TBOOL { conf.ipv6 = $2; }
77 15902770 2021-01-15 op | TPORT TNUM { conf.port = $2; }
78 5bc3c98e 2021-01-15 op | TPROTOCOLS TSTRING {
79 5bc3c98e 2021-01-15 op if (tls_config_parse_protocols(&conf.protos, $2) == -1)
80 5bc3c98e 2021-01-15 op errx(1, "invalid protocols string \"%s\"", $2);
82 b2a6b613 2021-01-21 op | TMIME TSTRING TSTRING { add_mime(&conf.mime, $2, $3); }
83 ae08ec7d 2021-01-25 op | TCHROOT TSTRING { conf.chroot = $2; }
84 ae08ec7d 2021-01-25 op | TUSER TSTRING { conf.user = $2; }
87 15902770 2021-01-15 op vhosts : /* empty */
88 15902770 2021-01-15 op | vhosts vhost
91 c8b74339 2021-01-24 op vhost : TSERVER TSTRING '{' servopts locations '}' {
92 ca21e100 2021-02-04 op host->locations[0].match = xstrdup("*");
93 15902770 2021-01-15 op host->domain = $2;
95 cbeee4ca 2021-01-28 op if (strstr($2, "xn--") != NULL) {
96 cbeee4ca 2021-01-28 op warnx("%s:%d \"%s\" looks like punycode: "
97 415ac7a2 2021-01-28 op "you should use the decoded hostname.",
98 415ac7a2 2021-01-28 op config_path, yylineno, $2);
101 15902770 2021-01-15 op if (host->cert == NULL || host->key == NULL ||
102 15902770 2021-01-15 op host->dir == NULL)
103 15902770 2021-01-15 op errx(1, "invalid vhost definition: %s", $2);
105 15902770 2021-01-15 op if (++ihost == HOSTSLEN)
106 15902770 2021-01-15 op errx(1, "too much vhosts defined");
109 c8b74339 2021-01-24 op loc = &host->locations[0];
112 15902770 2021-01-15 op | error '}' { yyerror("error in server directive"); }
115 15902770 2021-01-15 op servopts : /* empty */
116 15902770 2021-01-15 op | servopts servopt
119 e17642a7 2021-02-01 op servopt : TCERT TSTRING { host->cert = ensure_absolute_path($2); }
120 e17642a7 2021-02-01 op | TKEY TSTRING { host->key = ensure_absolute_path($2); }
121 e17642a7 2021-02-01 op | TROOT TSTRING { host->dir = ensure_absolute_path($2); }
122 15902770 2021-01-15 op | TCGI TSTRING {
123 15902770 2021-01-15 op /* drop the starting '/', if any */
124 709f4c94 2021-02-04 op if (*$2 == '/')
125 709f4c94 2021-02-04 op memmove($2, $2+1, strlen($2));
126 709f4c94 2021-02-04 op host->cgi = $2;
128 e3ddf390 2021-02-06 op | TENTRYPOINT TSTRING {
129 e3ddf390 2021-02-06 op if (host->entrypoint != NULL)
130 e3ddf390 2021-02-06 op yyerror("`entrypoint' specified more than once");
131 e3ddf390 2021-02-06 op while (*$2 == '/')
132 e3ddf390 2021-02-06 op memmove($2, $2+1, strlen($2));
133 e3ddf390 2021-02-06 op host->entrypoint = $2;
138 c8b74339 2021-01-24 op locations : /* empty */
139 c8b74339 2021-01-24 op | locations location
142 c8b74339 2021-01-24 op location : TLOCATION TSTRING '{' locopts '}' {
143 c8b74339 2021-01-24 op loc->match = $2;
144 c8b74339 2021-01-24 op if (++iloc == LOCLEN)
145 c8b74339 2021-01-24 op errx(1, "too much location rules defined");
151 c8b74339 2021-01-24 op locopts : /* empty */
152 c8b74339 2021-01-24 op | locopts locopt
155 c8b74339 2021-01-24 op locopt : TDEFAULT TTYPE TSTRING {
156 fe5967cd 2021-01-27 op if (loc->default_mime != NULL)
157 fe5967cd 2021-01-27 op yyerror("`default type' specified more than once");
158 c8b74339 2021-01-24 op loc->default_mime = $3;
160 05c23a54 2021-01-19 op | TLANG TSTRING {
161 fe5967cd 2021-01-27 op if (loc->lang != NULL)
162 fe5967cd 2021-01-27 op yyerror("`lang' specified more than once");
163 c8b74339 2021-01-24 op loc->lang = $2;
165 e7a2a99b 2021-01-24 op | TINDEX TSTRING {
166 fe5967cd 2021-01-27 op if (loc->index != NULL)
167 fe5967cd 2021-01-27 op yyerror("`index' specified more than once");
168 c8b74339 2021-01-24 op loc->index = $2;
170 252908e6 2021-01-24 op | TAUTO TINDEX TBOOL { loc->auto_index = $3 ? 1 : -1; }
171 6abda252 2021-02-06 op | TBLOCK TRETURN TNUM TSTRING {
172 6abda252 2021-02-06 op if (loc->block_fmt != NULL)
173 6abda252 2021-02-06 op yyerror("`block' rule specified more than once");
174 6abda252 2021-02-06 op loc->block_fmt = check_block_fmt($4);
175 6abda252 2021-02-06 op loc->block_code = check_block_code($3);
177 6abda252 2021-02-06 op | TBLOCK TRETURN TNUM {
178 6abda252 2021-02-06 op if (loc->block_fmt != NULL)
179 6abda252 2021-02-06 op yyerror("`block' rule specified more than once");
180 6abda252 2021-02-06 op loc->block_fmt = xstrdup("temporary failure");
181 6abda252 2021-02-06 op loc->block_code = check_block_code($3);
182 6abda252 2021-02-06 op if ($3 >= 30 && $3 < 40)
183 6abda252 2021-02-06 op yyerror("missing `meta' for block return %d", $3);
186 6abda252 2021-02-06 op if (loc->block_fmt != NULL)
187 6abda252 2021-02-06 op yyerror("`block' rule specified more than once");
188 6abda252 2021-02-06 op loc->block_fmt = xstrdup("temporary failure");
189 6abda252 2021-02-06 op loc->block_code = 40;
191 6abda252 2021-02-06 op | TSTRIP TNUM { loc->strip = check_strip_no($2); }
197 6abda252 2021-02-06 op yyerror(const char *msg, ...)
201 13ed2fb6 2021-01-27 op goterror = 1;
203 6abda252 2021-02-06 op va_start(ap, msg);
204 6abda252 2021-02-06 op fprintf(stderr, "%s:%d: ", config_path, yylineno);
205 6abda252 2021-02-06 op vfprintf(stderr, msg, ap);
210 13ed2fb6 2021-01-27 op parse_portno(const char *p)
212 13ed2fb6 2021-01-27 op const char *errstr;
215 13ed2fb6 2021-01-27 op n = strtonum(p, 0, UINT16_MAX, &errstr);
216 13ed2fb6 2021-01-27 op if (errstr != NULL)
217 13ed2fb6 2021-01-27 op errx(1, "port number is %s: %s", errstr, p);
222 13ed2fb6 2021-01-27 op parse_conf(const char *path)
224 ca21e100 2021-02-04 op host = &hosts[0];
226 ca21e100 2021-02-04 op loc = &hosts[0].locations[0];
229 13ed2fb6 2021-01-27 op config_path = path;
230 13ed2fb6 2021-01-27 op if ((yyin = fopen(path, "r")) == NULL)
231 13ed2fb6 2021-01-27 op fatal("cannot open config %s", path);
233 13ed2fb6 2021-01-27 op fclose(yyin);
235 13ed2fb6 2021-01-27 op if (goterror)
240 e17642a7 2021-02-01 op ensure_absolute_path(char *path)
242 e17642a7 2021-02-01 op if (path == NULL || *path != '/')
243 e17642a7 2021-02-01 op yyerror("not an absolute path");
248 6abda252 2021-02-06 op check_block_code(int n)
250 6abda252 2021-02-06 op if (n < 10 || n >= 70 || (n >= 20 && n <= 29))
251 6abda252 2021-02-06 op yyerror("invalid block code %d", n);
256 6abda252 2021-02-06 op check_block_fmt(char *fmt)
260 6abda252 2021-02-06 op for (s = fmt; *s; ++s) {
261 6abda252 2021-02-06 op if (*s != '%')
263 6abda252 2021-02-06 op switch (*++s) {
271 6abda252 2021-02-06 op yyerror("invalid format specifier %%%c", *s);
279 6abda252 2021-02-06 op check_strip_no(int n)
282 6abda252 2021-02-06 op yyerror("invalid strip number %d", n);