1 /* -*- mode: fundamental; indent-tabs-mode: t; -*- */
2 %{
3 
4 /*
5  * Copyright (c) 2021 Omar Polo <op@omarpolo.com>
6  *
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.
10  *
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.
18  */
19 
20 #include <err.h>
21 #include <stdio.h>
22 
23 #include "gmid.h"
24 
25 /*
26  * #define YYDEBUG 1
27  * int yydebug = 1;
28  */
29 
30 struct vhost *host = &hosts[0];
31 size_t ihost = 0;
32 
33 struct location *loc = &hosts[0].locations[0];
34 size_t iloc = 0;
35 
36 extern void yyerror(const char*);
37 
38 %}
39 
40 /* for bison: */
41 /* %define parse.error verbose */
42 
43 %union {
44 	char		*str;
45 	int		 num;
46 }
47 
48 %token TIPV6 TPORT TPROTOCOLS TMIME TDEFAULT TTYPE
49 %token TCHROOT TUSER TSERVER
50 %token TLOCATION TCERT TKEY TROOT TCGI TLANG TINDEX TAUTO
51 %token TERR
52 
53 %token <str>	TSTRING
54 %token <num>	TNUM
55 %token <num>	TBOOL
56 
57 %%
58 
59 conf		: options vhosts ;
60 
61 options		: /* empty */
62 		| options option
63 		;
64 
65 option		: TIPV6 TBOOL		{ conf.ipv6 = $2; }
66 		| TPORT TNUM		{ conf.port = $2; }
67 		| TPROTOCOLS TSTRING {
68 			if (tls_config_parse_protocols(&conf.protos, $2) == -1)
69 				errx(1, "invalid protocols string \"%s\"", $2);
70 		}
71 		| TMIME TSTRING TSTRING	{ add_mime(&conf.mime, $2, $3); }
72 		| TCHROOT TSTRING	{ conf.chroot = $2; }
73 		| TUSER TSTRING		{ conf.user = $2; }
74 		;
75 
76 vhosts		: /* empty */
77 		| vhosts vhost
78 		;
79 
80 vhost		: TSERVER TSTRING '{' servopts locations '}' {
81 			host->locations[0].match = (char*)"*";
82 			host->domain = $2;
83 
84 			if (host->cert == NULL || host->key == NULL ||
85 			    host->dir == NULL)
86 				errx(1, "invalid vhost definition: %s", $2);
87 
88 			if (++ihost == HOSTSLEN)
89 				errx(1, "too much vhosts defined");
90 
91 			host++;
92 			loc = &host->locations[0];
93 			iloc = 0;
94 		}
95 		| error '}'		{ yyerror("error in server directive"); }
96 		;
97 
98 servopts	: /* empty */
99 		| servopts servopt
100 		;
101 
102 servopt		: TCERT TSTRING		{ host->cert = $2; }
103 		| TKEY TSTRING		{ host->key = $2; }
104 		| TROOT TSTRING		{ host->dir = $2; }
105 		| TCGI TSTRING		{
106 			host->cgi = $2;
107 			/* drop the starting '/', if any */
108 			if (*host->cgi == '/')
109 				host->cgi++;
110 		}
111 		| locopt
112 		;
113 
114 locations	: /* empty */
115 		| locations location
116 		;
117 
118 location	: TLOCATION TSTRING '{' locopts '}' {
119 			loc->match = $2;
120 			if (++iloc == LOCLEN)
121 				errx(1, "too much location rules defined");
122 			loc++;
123 		}
124 		| error '}'
125 		;
126 
127 locopts		: /* empty */
128 		| locopts locopt
129 		;
130 
131 locopt		: TDEFAULT TTYPE TSTRING {
132 			free(loc->default_mime);
133 			loc->default_mime = $3;
134 		}
135 		| TLANG TSTRING {
136 			free(loc->lang);
137 			loc->lang = $2;
138 		}
139 		| TINDEX TSTRING {
140 			free(loc->index);
141 			loc->index = $2;
142 		}
143 		| TAUTO TINDEX TBOOL	{ loc->auto_index = $3 ? 1 : -1; }
144 		;