1 /* -*- mode: fundamental; indent-tabs-mode: t; -*- */
5 * Copyright (c) 2021 Omar Polo <op@omarpolo.com>
7 * Permission to use, copy, modify, and distribute this software for any
8 * purpose with or without fee is hereby granted, provided that the above
9 * copyright notice and this permission notice appear in all copies.
11 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
12 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
13 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
14 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
15 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
16 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
17 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
38 const char *config_path;
40 void yyerror(const char*, ...);
41 int parse_portno(const char*);
42 void parse_conf(const char*);
43 char *ensure_absolute_path(char*);
44 int check_block_code(int);
45 char *check_block_fmt(char*);
46 int check_strip_no(int);
51 /* %define parse.error verbose */
58 %token TIPV6 TPORT TPROTOCOLS TMIME TDEFAULT TTYPE
59 %token TCHROOT TUSER TSERVER
60 %token TLOCATION TCERT TKEY TROOT TCGI TLANG TINDEX TAUTO
61 %token TSTRIP TBLOCK TRETURN
70 conf : options vhosts ;
76 option : TIPV6 TBOOL { conf.ipv6 = $2; }
77 | TPORT TNUM { conf.port = $2; }
78 | TPROTOCOLS TSTRING {
79 if (tls_config_parse_protocols(&conf.protos, $2) == -1)
80 errx(1, "invalid protocols string \"%s\"", $2);
82 | TMIME TSTRING TSTRING { add_mime(&conf.mime, $2, $3); }
83 | TCHROOT TSTRING { conf.chroot = $2; }
84 | TUSER TSTRING { conf.user = $2; }
91 vhost : TSERVER TSTRING '{' servopts locations '}' {
92 host->locations[0].match = xstrdup("*");
95 if (strstr($2, "xn--") != NULL) {
96 warnx("%s:%d \"%s\" looks like punycode: "
97 "you should use the decoded hostname.",
98 config_path, yylineno, $2);
101 if (host->cert == NULL || host->key == NULL ||
103 errx(1, "invalid vhost definition: %s", $2);
105 if (++ihost == HOSTSLEN)
106 errx(1, "too much vhosts defined");
109 loc = &host->locations[0];
112 | error '}' { yyerror("error in server directive"); }
115 servopts : /* empty */
119 servopt : TCERT TSTRING { host->cert = ensure_absolute_path($2); }
120 | TKEY TSTRING { host->key = ensure_absolute_path($2); }
121 | TROOT TSTRING { host->dir = ensure_absolute_path($2); }
123 /* drop the starting '/', if any */
125 memmove($2, $2+1, strlen($2));
131 locations : /* empty */
135 location : TLOCATION TSTRING '{' locopts '}' {
137 if (++iloc == LOCLEN)
138 errx(1, "too much location rules defined");
144 locopts : /* empty */
148 locopt : TDEFAULT TTYPE TSTRING {
149 if (loc->default_mime != NULL)
150 yyerror("`default type' specified more than once");
151 loc->default_mime = $3;
154 if (loc->lang != NULL)
155 yyerror("`lang' specified more than once");
159 if (loc->index != NULL)
160 yyerror("`index' specified more than once");
163 | TAUTO TINDEX TBOOL { loc->auto_index = $3 ? 1 : -1; }
164 | TBLOCK TRETURN TNUM TSTRING {
165 if (loc->block_fmt != NULL)
166 yyerror("`block' rule specified more than once");
167 loc->block_fmt = check_block_fmt($4);
168 loc->block_code = check_block_code($3);
170 | TBLOCK TRETURN TNUM {
171 if (loc->block_fmt != NULL)
172 yyerror("`block' rule specified more than once");
173 loc->block_fmt = xstrdup("temporary failure");
174 loc->block_code = check_block_code($3);
175 if ($3 >= 30 && $3 < 40)
176 yyerror("missing `meta' for block return %d", $3);
179 if (loc->block_fmt != NULL)
180 yyerror("`block' rule specified more than once");
181 loc->block_fmt = xstrdup("temporary failure");
182 loc->block_code = 40;
184 | TSTRIP TNUM { loc->strip = check_strip_no($2); }
190 yyerror(const char *msg, ...)
197 fprintf(stderr, "%s:%d: ", config_path, yylineno);
198 vfprintf(stderr, msg, ap);
203 parse_portno(const char *p)
208 n = strtonum(p, 0, UINT16_MAX, &errstr);
210 errx(1, "port number is %s: %s", errstr, p);
215 parse_conf(const char *path)
219 loc = &hosts[0].locations[0];
223 if ((yyin = fopen(path, "r")) == NULL)
224 fatal("cannot open config %s", path);
233 ensure_absolute_path(char *path)
235 if (path == NULL || *path != '/')
236 yyerror("not an absolute path");
241 check_block_code(int n)
243 if (n < 10 || n >= 70 || (n >= 20 && n <= 29))
244 yyerror("invalid block code %d", n);
249 check_block_fmt(char *fmt)
253 for (s = fmt; *s; ++s) {
264 yyerror("invalid format specifier %%%c", *s);
272 check_strip_no(int n)
275 yyerror("invalid strip number %d", n);