1 8ad1c570 2021-05-09 op /*
  2 8ad1c570 2021-05-09 op  * Copyright (c) 2021 Omar Polo <op@omarpolo.com>
  3 8ad1c570 2021-05-09 op  *
  4 8ad1c570 2021-05-09 op  * Permission to use, copy, modify, and distribute this software for any
  5 8ad1c570 2021-05-09 op  * purpose with or without fee is hereby granted, provided that the above
  6 8ad1c570 2021-05-09 op  * copyright notice and this permission notice appear in all copies.
  7 8ad1c570 2021-05-09 op  *
  8 8ad1c570 2021-05-09 op  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
  9 8ad1c570 2021-05-09 op  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 10 8ad1c570 2021-05-09 op  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 11 8ad1c570 2021-05-09 op  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 12 8ad1c570 2021-05-09 op  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 13 8ad1c570 2021-05-09 op  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 14 8ad1c570 2021-05-09 op  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 15 8ad1c570 2021-05-09 op  */
 16 8ad1c570 2021-05-09 op 
 17 8ad1c570 2021-05-09 op #include "gmid.h"
 18 8ad1c570 2021-05-09 op 
 19 8ad1c570 2021-05-09 op #include <assert.h>
 20 8ad1c570 2021-05-09 op #include <errno.h>
 21 8ad1c570 2021-05-09 op #include <string.h>
 22 8ad1c570 2021-05-09 op 
 23 8ad1c570 2021-05-09 op /*
 24 8ad1c570 2021-05-09 op  * Sometimes it can be useful to inspect the fastcgi traffic as
 25 8ad1c570 2021-05-09 op  * received by gmid.
 26 8ad1c570 2021-05-09 op  *
 27 8ad1c570 2021-05-09 op  * This will make gmid connect to a `debug.sock' socket (that must
 28 8ad1c570 2021-05-09 op  * exists) in the current directory and send there a copy of what gets
 29 8ad1c570 2021-05-09 op  * read.  The socket can be created and monitored e.g. with
 30 8ad1c570 2021-05-09 op  *
 31 8ad1c570 2021-05-09 op  *	rm -f debug.sock ; nc -Ulk ./debug.sock | hexdump -C
 32 8ad1c570 2021-05-09 op  *
 33 8ad1c570 2021-05-09 op  * NB: the sandbox must be disabled for this to work.
 34 8ad1c570 2021-05-09 op  */
 35 8ad1c570 2021-05-09 op #define DEBUG_FCGI 0
 36 8ad1c570 2021-05-09 op 
 37 f740b61b 2021-06-11 op #if DEBUG_FCGI
 38 8ad1c570 2021-05-09 op # include <sys/un.h>
 39 8ad1c570 2021-05-09 op static int debug_socket = -1;
 40 8ad1c570 2021-05-09 op #endif
 41 8ad1c570 2021-05-09 op 
 42 8ad1c570 2021-05-09 op struct fcgi_header {
 43 8ad1c570 2021-05-09 op 	unsigned char version;
 44 8ad1c570 2021-05-09 op 	unsigned char type;
 45 8ad1c570 2021-05-09 op 	unsigned char req_id1;
 46 8ad1c570 2021-05-09 op 	unsigned char req_id0;
 47 8ad1c570 2021-05-09 op 	unsigned char content_len1;
 48 8ad1c570 2021-05-09 op 	unsigned char content_len0;
 49 8ad1c570 2021-05-09 op 	unsigned char padding;
 50 8ad1c570 2021-05-09 op 	unsigned char reserved;
 51 8ad1c570 2021-05-09 op };
 52 8ad1c570 2021-05-09 op 
 53 8ad1c570 2021-05-09 op /*
 54 8ad1c570 2021-05-09 op  * number of bytes in a FCGI_HEADER.  Future version of the protocol
 55 8ad1c570 2021-05-09 op  * will not reduce this number.
 56 8ad1c570 2021-05-09 op  */
 57 8ad1c570 2021-05-09 op #define FCGI_HEADER_LEN	8
 58 8ad1c570 2021-05-09 op 
 59 8ad1c570 2021-05-09 op /*
 60 8ad1c570 2021-05-09 op  * values for the version component
 61 8ad1c570 2021-05-09 op  */
 62 8ad1c570 2021-05-09 op #define FCGI_VERSION_1	1
 63 8ad1c570 2021-05-09 op 
 64 8ad1c570 2021-05-09 op /*
 65 8ad1c570 2021-05-09 op  * values for the type component
 66 8ad1c570 2021-05-09 op  */
 67 8ad1c570 2021-05-09 op #define FCGI_BEGIN_REQUEST	 1
 68 8ad1c570 2021-05-09 op #define FCGI_ABORT_REQUEST	 2
 69 8ad1c570 2021-05-09 op #define FCGI_END_REQUEST	 3
 70 8ad1c570 2021-05-09 op #define FCGI_PARAMS		 4
 71 8ad1c570 2021-05-09 op #define FCGI_STDIN		 5
 72 8ad1c570 2021-05-09 op #define FCGI_STDOUT		 6
 73 8ad1c570 2021-05-09 op #define FCGI_STDERR		 7
 74 8ad1c570 2021-05-09 op #define FCGI_DATA		 8
 75 8ad1c570 2021-05-09 op #define FCGI_GET_VALUES		 9
 76 8ad1c570 2021-05-09 op #define FCGI_GET_VALUES_RESULT	10
 77 8ad1c570 2021-05-09 op #define FCGI_UNKNOWN_TYPE	11
 78 8ad1c570 2021-05-09 op #define FCGI_MAXTYPE		(FCGI_UNKNOWN_TYPE)
 79 8ad1c570 2021-05-09 op 
 80 8ad1c570 2021-05-09 op struct fcgi_begin_req {
 81 8ad1c570 2021-05-09 op 	unsigned char role1;
 82 8ad1c570 2021-05-09 op 	unsigned char role0;
 83 8ad1c570 2021-05-09 op 	unsigned char flags;
 84 8ad1c570 2021-05-09 op 	unsigned char reserved[5];
 85 8ad1c570 2021-05-09 op };
 86 8ad1c570 2021-05-09 op 
 87 8ad1c570 2021-05-09 op struct fcgi_begin_req_record {
 88 8ad1c570 2021-05-09 op 	struct fcgi_header	header;
 89 8ad1c570 2021-05-09 op 	struct fcgi_begin_req	body;
 90 8ad1c570 2021-05-09 op };
 91 8ad1c570 2021-05-09 op 
 92 8ad1c570 2021-05-09 op /*
 93 8ad1c570 2021-05-09 op  * mask for flags;
 94 8ad1c570 2021-05-09 op  */
 95 8ad1c570 2021-05-09 op #define FCGI_KEEP_CONN		1
 96 8ad1c570 2021-05-09 op 
 97 8ad1c570 2021-05-09 op /*
 98 8ad1c570 2021-05-09 op  * values for the role
 99 8ad1c570 2021-05-09 op  */
100 8ad1c570 2021-05-09 op #define FCGI_RESPONDER	1
101 8ad1c570 2021-05-09 op #define FCGI_AUTHORIZER	2
102 8ad1c570 2021-05-09 op #define FCGI_FILTER	3
103 8ad1c570 2021-05-09 op 
104 8ad1c570 2021-05-09 op struct fcgi_end_req_body {
105 8ad1c570 2021-05-09 op 	unsigned char app_status3;
106 8ad1c570 2021-05-09 op 	unsigned char app_status2;
107 8ad1c570 2021-05-09 op 	unsigned char app_status1;
108 8ad1c570 2021-05-09 op 	unsigned char app_status0;
109 8ad1c570 2021-05-09 op 	unsigned char proto_status;
110 8ad1c570 2021-05-09 op 	unsigned char reserved[3];
111 8ad1c570 2021-05-09 op };
112 8ad1c570 2021-05-09 op 
113 8ad1c570 2021-05-09 op /*
114 8ad1c570 2021-05-09 op  * values for proto_status
115 8ad1c570 2021-05-09 op  */
116 8ad1c570 2021-05-09 op #define FCGI_REQUEST_COMPLETE	0
117 8ad1c570 2021-05-09 op #define FCGI_CANT_MPX_CONN	1
118 8ad1c570 2021-05-09 op #define FCGI_OVERLOADED		2
119 8ad1c570 2021-05-09 op #define FCGI_UNKNOWN_ROLE	3
120 8ad1c570 2021-05-09 op 
121 8ad1c570 2021-05-09 op /*
122 8ad1c570 2021-05-09 op  * Variable names for FCGI_GET_VALUES / FCGI_GET_VALUES_RESULT
123 8ad1c570 2021-05-09 op  * records.
124 8ad1c570 2021-05-09 op  */
125 8ad1c570 2021-05-09 op #define FCGI_MAX_CONNS	"FCGI_MAX_CONNS"
126 8ad1c570 2021-05-09 op #define FCGI_MAX_REQS	"FCGI_MAX_REQS"
127 8ad1c570 2021-05-09 op #define FCGI_MPXS_CONNS	"FCGI_MPXS_CONNS"
128 8ad1c570 2021-05-09 op 
129 8ad1c570 2021-05-09 op static int
130 8ad1c570 2021-05-09 op prepare_header(struct fcgi_header *h, int type, int id, size_t size,
131 8ad1c570 2021-05-09 op     size_t padding)
132 8ad1c570 2021-05-09 op {
133 8ad1c570 2021-05-09 op 	memset(h, 0, sizeof(*h));
134 8ad1c570 2021-05-09 op 
135 8ad1c570 2021-05-09 op 	/*
136 8ad1c570 2021-05-09 op 	 * id=0 is reserved for status messages.
137 8ad1c570 2021-05-09 op 	 */
138 8ad1c570 2021-05-09 op 	id++;
139 8ad1c570 2021-05-09 op 
140 8ad1c570 2021-05-09 op 	h->version = FCGI_VERSION_1;
141 8ad1c570 2021-05-09 op         h->type = type;
142 8ad1c570 2021-05-09 op 	h->req_id1 = (id >> 8);
143 8ad1c570 2021-05-09 op 	h->req_id0 = (id & 0xFF);
144 8ad1c570 2021-05-09 op 	h->content_len1 = (size >> 8);
145 8ad1c570 2021-05-09 op 	h->content_len0 = (size & 0xFF);
146 8ad1c570 2021-05-09 op 	h->padding = padding;
147 8ad1c570 2021-05-09 op 
148 8ad1c570 2021-05-09 op 	return 0;
149 8ad1c570 2021-05-09 op }
150 8ad1c570 2021-05-09 op 
151 8ad1c570 2021-05-09 op static int
152 741b69be 2021-09-26 op fcgi_begin_request(struct bufferevent *bev, int id)
153 8ad1c570 2021-05-09 op {
154 8ad1c570 2021-05-09 op 	struct fcgi_begin_req_record r;
155 8ad1c570 2021-05-09 op 
156 8ad1c570 2021-05-09 op 	if (id > UINT16_MAX)
157 8ad1c570 2021-05-09 op 		return -1;
158 8ad1c570 2021-05-09 op 
159 8ad1c570 2021-05-09 op 	memset(&r, 0, sizeof(r));
160 8ad1c570 2021-05-09 op 	prepare_header(&r.header, FCGI_BEGIN_REQUEST, id,
161 8ad1c570 2021-05-09 op 	    sizeof(r.body), 0);
162 8ad1c570 2021-05-09 op 	assert(sizeof(r.body) == FCGI_HEADER_LEN);
163 8ad1c570 2021-05-09 op 
164 8ad1c570 2021-05-09 op 	r.body.role1 = 0;
165 8ad1c570 2021-05-09 op 	r.body.role0 = FCGI_RESPONDER;
166 8ad1c570 2021-05-09 op 	r.body.flags = FCGI_KEEP_CONN;
167 8ad1c570 2021-05-09 op 
168 741b69be 2021-09-26 op 	if (bufferevent_write(bev, &r, sizeof(r)) == -1)
169 8ad1c570 2021-05-09 op 		return -1;
170 8ad1c570 2021-05-09 op 	return 0;
171 8ad1c570 2021-05-09 op }
172 8ad1c570 2021-05-09 op 
173 8ad1c570 2021-05-09 op static int
174 741b69be 2021-09-26 op fcgi_send_param(struct bufferevent *bev, int id, const char *name,
175 741b69be 2021-09-26 op     const char *value)
176 8ad1c570 2021-05-09 op {
177 8ad1c570 2021-05-09 op 	struct fcgi_header	h;
178 8ad1c570 2021-05-09 op         uint32_t		namlen, vallen, padlen;
179 8ad1c570 2021-05-09 op 	uint8_t			s[8];
180 8ad1c570 2021-05-09 op 	size_t			size;
181 8ad1c570 2021-05-09 op 	char			padding[8] = { 0 };
182 8ad1c570 2021-05-09 op 
183 8ad1c570 2021-05-09 op 	namlen = strlen(name);
184 8ad1c570 2021-05-09 op 	vallen = strlen(value);
185 8ad1c570 2021-05-09 op 	size = namlen + vallen + 8; /* 4 for the sizes */
186 8ad1c570 2021-05-09 op 	padlen = (8 - (size & 0x7)) & 0x7;
187 8ad1c570 2021-05-09 op 
188 8ad1c570 2021-05-09 op 	s[0] = ( namlen >> 24)         | 0x80;
189 8ad1c570 2021-05-09 op 	s[1] = ((namlen >> 16) & 0xFF);
190 8ad1c570 2021-05-09 op 	s[2] = ((namlen >>  8) & 0xFF);
191 8ad1c570 2021-05-09 op 	s[3] = ( namlen        & 0xFF);
192 8ad1c570 2021-05-09 op 
193 8ad1c570 2021-05-09 op 	s[4] = ( vallen >> 24)         | 0x80;
194 8ad1c570 2021-05-09 op 	s[5] = ((vallen >> 16) & 0xFF);
195 8ad1c570 2021-05-09 op 	s[6] = ((vallen >>  8) & 0xFF);
196 8ad1c570 2021-05-09 op 	s[7] = ( vallen        & 0xFF);
197 8ad1c570 2021-05-09 op 
198 8ad1c570 2021-05-09 op 	prepare_header(&h, FCGI_PARAMS, id, size, padlen);
199 8ad1c570 2021-05-09 op 
200 741b69be 2021-09-26 op 	if (bufferevent_write(bev, &h, sizeof(h))   == -1 ||
201 741b69be 2021-09-26 op 	    bufferevent_write(bev, s, sizeof(s))    == -1 ||
202 741b69be 2021-09-26 op 	    bufferevent_write(bev, name, namlen)    == -1 ||
203 741b69be 2021-09-26 op 	    bufferevent_write(bev, value, vallen)   == -1 ||
204 741b69be 2021-09-26 op 	    bufferevent_write(bev, padding, padlen) == -1)
205 8ad1c570 2021-05-09 op 		return -1;
206 8ad1c570 2021-05-09 op 
207 8ad1c570 2021-05-09 op 	return 0;
208 8ad1c570 2021-05-09 op }
209 8ad1c570 2021-05-09 op 
210 8ad1c570 2021-05-09 op static int
211 741b69be 2021-09-26 op fcgi_end_param(struct bufferevent *bev, int id)
212 8ad1c570 2021-05-09 op {
213 8ad1c570 2021-05-09 op 	struct fcgi_header h;
214 8ad1c570 2021-05-09 op 
215 8ad1c570 2021-05-09 op 	prepare_header(&h, FCGI_PARAMS, id, 0, 0);
216 741b69be 2021-09-26 op 	if (bufferevent_write(bev, &h, sizeof(h)) == -1)
217 8ad1c570 2021-05-09 op 		return -1;
218 8ad1c570 2021-05-09 op 
219 8ad1c570 2021-05-09 op 	prepare_header(&h, FCGI_STDIN, id, 0, 0);
220 741b69be 2021-09-26 op 	if (bufferevent_write(bev, &h, sizeof(h)) == -1)
221 8ad1c570 2021-05-09 op 		return -1;
222 8ad1c570 2021-05-09 op 
223 8ad1c570 2021-05-09 op 	return 0;
224 8ad1c570 2021-05-09 op }
225 8ad1c570 2021-05-09 op 
226 8ad1c570 2021-05-09 op static int
227 741b69be 2021-09-26 op fcgi_abort_request(struct bufferevent *bev, int id)
228 8ad1c570 2021-05-09 op {
229 8ad1c570 2021-05-09 op 	struct fcgi_header h;
230 8ad1c570 2021-05-09 op 
231 8ad1c570 2021-05-09 op 	prepare_header(&h, FCGI_ABORT_REQUEST, id, 0, 0);
232 741b69be 2021-09-26 op 	if (bufferevent_write(bev, &h, sizeof(h)) == -1)
233 8ad1c570 2021-05-09 op 		return -1;
234 8ad1c570 2021-05-09 op 
235 8ad1c570 2021-05-09 op 	return 0;
236 8ad1c570 2021-05-09 op }
237 8ad1c570 2021-05-09 op 
238 8ad1c570 2021-05-09 op static inline int
239 8ad1c570 2021-05-09 op recid(struct fcgi_header *h)
240 8ad1c570 2021-05-09 op {
241 8ad1c570 2021-05-09 op 	return h->req_id0 + (h->req_id1 << 8) - 1;
242 8ad1c570 2021-05-09 op }
243 8ad1c570 2021-05-09 op 
244 8ad1c570 2021-05-09 op static inline int
245 8ad1c570 2021-05-09 op reclen(struct fcgi_header *h)
246 8ad1c570 2021-05-09 op {
247 8ad1c570 2021-05-09 op 	return h->content_len0 + (h->content_len1 << 8);
248 8ad1c570 2021-05-09 op }
249 8ad1c570 2021-05-09 op 
250 8ad1c570 2021-05-09 op static void
251 8ad1c570 2021-05-09 op copy_mbuf(int fd, short ev, void *d)
252 8ad1c570 2021-05-09 op {
253 8ad1c570 2021-05-09 op 	struct client	*c = d;
254 8ad1c570 2021-05-09 op 	struct mbuf	*mbuf;
255 8ad1c570 2021-05-09 op 	size_t		 len;
256 8ad1c570 2021-05-09 op 	ssize_t		 r;
257 8ad1c570 2021-05-09 op 	char		*data;
258 8ad1c570 2021-05-09 op 
259 8ad1c570 2021-05-09 op         for (;;) {
260 8ad1c570 2021-05-09 op 		mbuf = TAILQ_FIRST(&c->mbufhead);
261 8ad1c570 2021-05-09 op 		if (mbuf == NULL)
262 8ad1c570 2021-05-09 op 			break;
263 8ad1c570 2021-05-09 op 
264 8ad1c570 2021-05-09 op 		len = mbuf->len - mbuf->off;
265 8ad1c570 2021-05-09 op 		data = mbuf->data + mbuf->off;
266 8ad1c570 2021-05-09 op 		switch (r = tls_write(c->ctx, data, len)) {
267 8ad1c570 2021-05-09 op 		case -1:
268 8ad1c570 2021-05-09 op 			/*
269 8ad1c570 2021-05-09 op 			 * Can't close_conn here.  The application
270 8ad1c570 2021-05-09 op 			 * needs to be informed first, otherwise it
271 8ad1c570 2021-05-09 op 			 * can interfere with future connections.
272 8ad1c570 2021-05-09 op 			 * Check also that we're not doing recursion
273 8ad1c570 2021-05-09 op 			 * (copy_mbuf -> handle_fcgi -> copy_mbuf ...)
274 8ad1c570 2021-05-09 op 			 */
275 8ad1c570 2021-05-09 op 			if (c->next != NULL)
276 8ad1c570 2021-05-09 op 				goto end;
277 8ad1c570 2021-05-09 op 			fcgi_abort_request(0, c->id);
278 8ad1c570 2021-05-09 op 			return;
279 8ad1c570 2021-05-09 op 		case TLS_WANT_POLLIN:
280 8ad1c570 2021-05-09 op 			event_once(c->fd, EV_READ, &copy_mbuf, c, NULL);
281 8ad1c570 2021-05-09 op 			return;
282 8ad1c570 2021-05-09 op 		case TLS_WANT_POLLOUT:
283 8ad1c570 2021-05-09 op 			event_once(c->fd, EV_WRITE, &copy_mbuf, c, NULL);
284 8ad1c570 2021-05-09 op 			return;
285 8ad1c570 2021-05-09 op 		}
286 8ad1c570 2021-05-09 op 		mbuf->off += r;
287 8ad1c570 2021-05-09 op 
288 8ad1c570 2021-05-09 op 		if (mbuf->off == mbuf->len) {
289 8ad1c570 2021-05-09 op 			TAILQ_REMOVE(&c->mbufhead, mbuf, mbufs);
290 8ad1c570 2021-05-09 op 			free(mbuf);
291 8ad1c570 2021-05-09 op 		}
292 8ad1c570 2021-05-09 op 	}
293 8ad1c570 2021-05-09 op 
294 8ad1c570 2021-05-09 op end:
295 8ad1c570 2021-05-09 op 	if (c->next != NULL)
296 8ad1c570 2021-05-09 op 		c->next(0, 0, c);
297 8ad1c570 2021-05-09 op }
298 8ad1c570 2021-05-09 op 
299 090b8a89 2021-07-06 op void
300 090b8a89 2021-07-06 op fcgi_close_backend(struct fcgi *f)
301 090b8a89 2021-07-06 op {
302 741b69be 2021-09-26 op 	bufferevent_free(f->bev);
303 741b69be 2021-09-26 op 	f->bev = NULL;
304 741b69be 2021-09-26 op 	close(fcgi->fd);
305 741b69be 2021-09-26 op 	fcgi->fd = -1;
306 741b69be 2021-09-26 op 	fcgi->pending = 0;
307 741b69be 2021-09-26 op 	fcgi->s = FCGI_OFF;
308 8ad1c570 2021-05-09 op }
309 8ad1c570 2021-05-09 op 
310 8ad1c570 2021-05-09 op void
311 741b69be 2021-09-26 op fcgi_read(struct bufferevent *bev, void *d)
312 8ad1c570 2021-05-09 op {
313 741b69be 2021-09-26 op 	struct fcgi		*fcgi = d;
314 741b69be 2021-09-26 op 	struct evbuffer		*src = EVBUFFER_INPUT(bev);
315 741b69be 2021-09-26 op 	struct fcgi_header	 hdr;
316 8ad1c570 2021-05-09 op 	struct fcgi_end_req_body end;
317 8ad1c570 2021-05-09 op 	struct client		*c;
318 8ad1c570 2021-05-09 op 	struct mbuf		*mbuf;
319 8ad1c570 2021-05-09 op 	size_t			 len;
320 8ad1c570 2021-05-09 op 
321 741b69be 2021-09-26 op #if DEBUG_FCGI
322 741b69be 2021-09-26 op 	if (debug_socket == -1) {
323 741b69be 2021-09-26 op 		struct sockaddr_un addr;
324 8ad1c570 2021-05-09 op 
325 741b69be 2021-09-26 op 		if ((debug_socket = socket(AF_UNIX, SOCK_STREAM, 0)) == -1)
326 741b69be 2021-09-26 op 			err(1, "socket");
327 8ad1c570 2021-05-09 op 
328 741b69be 2021-09-26 op 		memset(&addr, 0, sizeof(addr));
329 741b69be 2021-09-26 op 		addr.sun_family = AF_UNIX;
330 741b69be 2021-09-26 op 		strlcpy(addr.sun_path, "./debug.sock", sizeof(addr.sun_path));
331 741b69be 2021-09-26 op 		if (connect(debug_socket, (struct sockaddr*)&addr, sizeof(addr))
332 741b69be 2021-09-26 op 		    == -1)
333 741b69be 2021-09-26 op 			err(1, "connect");
334 741b69be 2021-09-26 op 	}
335 741b69be 2021-09-26 op #endif
336 8ad1c570 2021-05-09 op 
337 741b69be 2021-09-26 op 	for (;;) {
338 741b69be 2021-09-26 op 		if (EVBUFFER_LENGTH(src) < sizeof(hdr))
339 741b69be 2021-09-26 op 			return;
340 090b8a89 2021-07-06 op 
341 741b69be 2021-09-26 op 		memcpy(&hdr, EVBUFFER_DATA(src), sizeof(hdr));
342 8ad1c570 2021-05-09 op 
343 741b69be 2021-09-26 op 		c = try_client_by_id(recid(&hdr));
344 741b69be 2021-09-26 op 		if (c == NULL) {
345 741b69be 2021-09-26 op 			log_err(NULL,
346 741b69be 2021-09-26 op 			    "got invalid client id from fcgi backend %d",
347 741b69be 2021-09-26 op 			    recid(&hdr));
348 8ad1c570 2021-05-09 op 			goto err;
349 741b69be 2021-09-26 op 		}
350 741b69be 2021-09-26 op 
351 741b69be 2021-09-26 op 		len = reclen(&hdr);
352 8ad1c570 2021-05-09 op 
353 741b69be 2021-09-26 op 		if (EVBUFFER_LENGTH(src) < sizeof(hdr) + len + hdr.padding)
354 741b69be 2021-09-26 op 			return;
355 8ad1c570 2021-05-09 op 
356 741b69be 2021-09-26 op #if DEBUG_FCGI
357 741b69be 2021-09-26 op 		write(debug_soocket, EVBUFFER_DATA(src),
358 741b69be 2021-09-26 op 		    sizeof(hdr) + len + hdr.padding);
359 741b69be 2021-09-26 op #endif
360 741b69be 2021-09-26 op 
361 741b69be 2021-09-26 op 		evbuffer_drain(src, sizeof(hdr));
362 741b69be 2021-09-26 op 
363 741b69be 2021-09-26 op 		switch (hdr.type) {
364 741b69be 2021-09-26 op 		case FCGI_END_REQUEST:
365 741b69be 2021-09-26 op 			if (len != sizeof(end)) {
366 741b69be 2021-09-26 op 				log_err(NULL,
367 741b69be 2021-09-26 op 				    "got invalid end request record size");
368 741b69be 2021-09-26 op 				goto err;
369 741b69be 2021-09-26 op 			}
370 741b69be 2021-09-26 op 			bufferevent_read(bev, &end, sizeof(end));
371 741b69be 2021-09-26 op 
372 741b69be 2021-09-26 op 			/* TODO: do something with the status? */
373 741b69be 2021-09-26 op 			fcgi->pending--;
374 741b69be 2021-09-26 op 			c->fcgi = -1;
375 741b69be 2021-09-26 op 			c->next = close_conn;
376 8ad1c570 2021-05-09 op 			event_once(c->fd, EV_WRITE, &copy_mbuf, c, NULL);
377 741b69be 2021-09-26 op 			break;
378 741b69be 2021-09-26 op 
379 741b69be 2021-09-26 op 		case FCGI_STDERR:
380 741b69be 2021-09-26 op 			/* discard stderr (for now) */
381 741b69be 2021-09-26 op 			evbuffer_drain(src, len);
382 741b69be 2021-09-26 op 			break;
383 741b69be 2021-09-26 op 
384 741b69be 2021-09-26 op 		case FCGI_STDOUT:
385 741b69be 2021-09-26 op 			if ((mbuf = calloc(1, sizeof(*mbuf) + len)) == NULL)
386 741b69be 2021-09-26 op 				fatal("calloc");
387 741b69be 2021-09-26 op 			mbuf->len = len;
388 741b69be 2021-09-26 op 			bufferevent_read(bev, mbuf->data, len);
389 741b69be 2021-09-26 op 
390 741b69be 2021-09-26 op 			if (TAILQ_EMPTY(&c->mbufhead))
391 741b69be 2021-09-26 op 				event_once(c->fd, EV_WRITE, &copy_mbuf,
392 741b69be 2021-09-26 op 				    c, NULL);
393 741b69be 2021-09-26 op 
394 8ad1c570 2021-05-09 op 			TAILQ_INSERT_TAIL(&c->mbufhead, mbuf, mbufs);
395 741b69be 2021-09-26 op 			break;
396 8ad1c570 2021-05-09 op 
397 741b69be 2021-09-26 op 		default:
398 741b69be 2021-09-26 op 			log_err(NULL, "got invalid fcgi record (type=%d)",
399 741b69be 2021-09-26 op 			    hdr.type);
400 741b69be 2021-09-26 op 			goto err;
401 741b69be 2021-09-26 op 		}
402 8ad1c570 2021-05-09 op 
403 741b69be 2021-09-26 op 		evbuffer_drain(src, hdr.padding);
404 090b8a89 2021-07-06 op 
405 741b69be 2021-09-26 op 		if (fcgi->pending == 0 && shutting_down) {
406 741b69be 2021-09-26 op 			fcgi_error(bev, EVBUFFER_EOF, fcgi);
407 741b69be 2021-09-26 op 			return;
408 741b69be 2021-09-26 op 		}
409 741b69be 2021-09-26 op 	}
410 090b8a89 2021-07-06 op 
411 741b69be 2021-09-26 op err:
412 741b69be 2021-09-26 op 	fcgi_error(bev, EVBUFFER_ERROR, fcgi);
413 741b69be 2021-09-26 op }
414 741b69be 2021-09-26 op 
415 741b69be 2021-09-26 op void
416 741b69be 2021-09-26 op fcgi_write(struct bufferevent *bev, void *d)
417 741b69be 2021-09-26 op {
418 741b69be 2021-09-26 op 	/*
419 741b69be 2021-09-26 op 	 * There's no much use for the write callback.
420 741b69be 2021-09-26 op 	 */
421 8ad1c570 2021-05-09 op 	return;
422 741b69be 2021-09-26 op }
423 8ad1c570 2021-05-09 op 
424 741b69be 2021-09-26 op void
425 741b69be 2021-09-26 op fcgi_error(struct bufferevent *bev, short err, void *d)
426 741b69be 2021-09-26 op {
427 741b69be 2021-09-26 op 	struct fcgi	*fcgi = d;
428 741b69be 2021-09-26 op 	struct client	*c;
429 741b69be 2021-09-26 op 	size_t		 i;
430 741b69be 2021-09-26 op 
431 741b69be 2021-09-26 op 	if (!(err & EVBUFFER_ERROR) ||
432 741b69be 2021-09-26 op 	    !(err & EVBUFFER_EOF))
433 741b69be 2021-09-26 op 		log_warn(NULL, "unknown event error (%x)",
434 741b69be 2021-09-26 op 		    err);
435 741b69be 2021-09-26 op 
436 741b69be 2021-09-26 op 	for (i = 0; i < MAX_USERS; ++i) {
437 741b69be 2021-09-26 op 		c = &clients[i];
438 741b69be 2021-09-26 op 
439 741b69be 2021-09-26 op 		if (c->fcgi != fcgi->id)
440 741b69be 2021-09-26 op 			continue;
441 741b69be 2021-09-26 op 
442 741b69be 2021-09-26 op 		if (c->code != 0)
443 741b69be 2021-09-26 op 			close_conn(0, 0, 0);
444 741b69be 2021-09-26 op 		else
445 741b69be 2021-09-26 op 			start_reply(c, CGI_ERROR, "CGI error");
446 741b69be 2021-09-26 op 	}
447 741b69be 2021-09-26 op 
448 741b69be 2021-09-26 op 	fcgi_close_backend(fcgi);
449 8ad1c570 2021-05-09 op }
450 8ad1c570 2021-05-09 op 
451 8ad1c570 2021-05-09 op void
452 741b69be 2021-09-26 op fcgi_req(struct fcgi *f, struct client *c)
453 8ad1c570 2021-05-09 op {
454 f740b61b 2021-06-11 op 	char		 addr[NI_MAXHOST], buf[22];
455 d1051bfa 2021-05-15 op 	int		 e;
456 f740b61b 2021-06-11 op 	time_t		 tim;
457 f740b61b 2021-06-11 op 	struct tm	 tminfo;
458 f740b61b 2021-06-11 op 	struct envlist	*p;
459 d1051bfa 2021-05-15 op 
460 090b8a89 2021-07-06 op 	f->pending++;
461 090b8a89 2021-07-06 op 
462 59c7ee13 2021-07-06 op 	e = getnameinfo((struct sockaddr*)&c->addr, sizeof(c->addr),
463 d1051bfa 2021-05-15 op 	    addr, sizeof(addr),
464 d1051bfa 2021-05-15 op 	    NULL, 0,
465 d1051bfa 2021-05-15 op 	    NI_NUMERICHOST);
466 d1051bfa 2021-05-15 op 	if (e != 0)
467 d1051bfa 2021-05-15 op 		fatal("getnameinfo failed");
468 d1051bfa 2021-05-15 op 
469 8ad1c570 2021-05-09 op 	c->next = NULL;
470 8ad1c570 2021-05-09 op 
471 741b69be 2021-09-26 op 	fcgi_begin_request(f->bev, c->id);
472 741b69be 2021-09-26 op 	fcgi_send_param(f->bev, c->id, "GATEWAY_INTERFACE", "CGI/1.1");
473 741b69be 2021-09-26 op 	fcgi_send_param(f->bev, c->id, "GEMINI_URL_PATH", c->iri.path);
474 741b69be 2021-09-26 op 	fcgi_send_param(f->bev, c->id, "QUERY_STRING", c->iri.query);
475 741b69be 2021-09-26 op 	fcgi_send_param(f->bev, c->id, "REMOTE_ADDR", addr);
476 741b69be 2021-09-26 op 	fcgi_send_param(f->bev, c->id, "REMOTE_HOST", addr);
477 741b69be 2021-09-26 op 	fcgi_send_param(f->bev, c->id, "REQUEST_METHOD", "");
478 741b69be 2021-09-26 op 	fcgi_send_param(f->bev, c->id, "SERVER_NAME", c->iri.host);
479 741b69be 2021-09-26 op 	fcgi_send_param(f->bev, c->id, "SERVER_PROTOCOL", "GEMINI");
480 741b69be 2021-09-26 op 	fcgi_send_param(f->bev, c->id, "SERVER_SOFTWARE", GMID_VERSION);
481 f740b61b 2021-06-11 op 
482 f740b61b 2021-06-11 op 	if (tls_peer_cert_provided(c->ctx)) {
483 741b69be 2021-09-26 op 		fcgi_send_param(f->bev, c->id, "AUTH_TYPE", "CERTIFICATE");
484 741b69be 2021-09-26 op 		fcgi_send_param(f->bev, c->id, "REMOTE_USER",
485 f740b61b 2021-06-11 op 		    tls_peer_cert_subject(c->ctx));
486 741b69be 2021-09-26 op 		fcgi_send_param(f->bev, c->id, "TLS_CLIENT_ISSUER",
487 f740b61b 2021-06-11 op 		    tls_peer_cert_issuer(c->ctx));
488 741b69be 2021-09-26 op 		fcgi_send_param(f->bev, c->id, "TLS_CLIENT_HASH",
489 f740b61b 2021-06-11 op 		    tls_peer_cert_hash(c->ctx));
490 741b69be 2021-09-26 op 		fcgi_send_param(f->bev, c->id, "TLS_VERSION",
491 f740b61b 2021-06-11 op 		    tls_conn_version(c->ctx));
492 741b69be 2021-09-26 op 		fcgi_send_param(f->bev, c->id, "TLS_CIPHER",
493 f740b61b 2021-06-11 op 		    tls_conn_cipher(c->ctx));
494 8ad1c570 2021-05-09 op 
495 f740b61b 2021-06-11 op 		snprintf(buf, sizeof(buf), "%d",
496 f740b61b 2021-06-11 op 		    tls_conn_cipher_strength(c->ctx));
497 741b69be 2021-09-26 op 		fcgi_send_param(f->bev, c->id, "TLS_CIPHER_STRENGTH", buf);
498 f740b61b 2021-06-11 op 
499 f740b61b 2021-06-11 op 		tim = tls_peer_cert_notbefore(c->ctx);
500 f740b61b 2021-06-11 op 		strftime(buf, sizeof(buf), "%FT%TZ",
501 f740b61b 2021-06-11 op 		    gmtime_r(&tim, &tminfo));
502 741b69be 2021-09-26 op 		fcgi_send_param(f->bev, c->id, "TLS_CLIENT_NOT_BEFORE", buf);
503 f740b61b 2021-06-11 op 
504 f740b61b 2021-06-11 op 		tim = tls_peer_cert_notafter(c->ctx);
505 f740b61b 2021-06-11 op 		strftime(buf, sizeof(buf), "%FT%TZ",
506 f740b61b 2021-06-11 op 		    gmtime_r(&tim, &tminfo));
507 741b69be 2021-09-26 op 		fcgi_send_param(f->bev, c->id, "TLS_CLIENT_NOT_AFTER", buf);
508 f740b61b 2021-06-11 op 
509 f740b61b 2021-06-11 op 		TAILQ_FOREACH(p, &c->host->params, envs) {
510 741b69be 2021-09-26 op 			fcgi_send_param(f->bev, c->id, p->name, p->value);
511 f740b61b 2021-06-11 op 		}
512 f740b61b 2021-06-11 op 	} else
513 741b69be 2021-09-26 op 		fcgi_send_param(f->bev, c->id, "AUTH_TYPE", "");
514 f740b61b 2021-06-11 op 
515 741b69be 2021-09-26 op 	if (fcgi_end_param(f->bev, c->id) == -1)
516 741b69be 2021-09-26 op 		fcgi_error(f->bev, EVBUFFER_ERROR, f);
517 8ad1c570 2021-05-09 op }