1 b0a6bcf7 2022-09-13 op /*
  2 b0a6bcf7 2022-09-13 op  * Copyright (c) 2022 Omar Polo <op@omarpolo.com>
  3 b0a6bcf7 2022-09-13 op  * Copyright (c) 2006 - 2015 Reyk Floeter <reyk@openbsd.org>
  4 b0a6bcf7 2022-09-13 op  *
  5 b0a6bcf7 2022-09-13 op  * Permission to use, copy, modify, and distribute this software for any
  6 b0a6bcf7 2022-09-13 op  * purpose with or without fee is hereby granted, provided that the above
  7 b0a6bcf7 2022-09-13 op  * copyright notice and this permission notice appear in all copies.
  8 b0a6bcf7 2022-09-13 op  *
  9 b0a6bcf7 2022-09-13 op  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 10 b0a6bcf7 2022-09-13 op  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 11 b0a6bcf7 2022-09-13 op  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 12 b0a6bcf7 2022-09-13 op  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 13 b0a6bcf7 2022-09-13 op  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 14 b0a6bcf7 2022-09-13 op  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 15 b0a6bcf7 2022-09-13 op  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 16 b0a6bcf7 2022-09-13 op  */
 17 b0a6bcf7 2022-09-13 op 
 18 b0a6bcf7 2022-09-13 op #include <sys/types.h>
 19 b0a6bcf7 2022-09-13 op #include <sys/queue.h>
 20 b0a6bcf7 2022-09-13 op #include <sys/tree.h>
 21 b0a6bcf7 2022-09-13 op #include <sys/socket.h>
 22 b0a6bcf7 2022-09-13 op #include <sys/uio.h>
 23 b0a6bcf7 2022-09-13 op 
 24 b0a6bcf7 2022-09-13 op #include <netinet/in.h>
 25 b0a6bcf7 2022-09-13 op #include <arpa/inet.h>
 26 b0a6bcf7 2022-09-13 op #include <netdb.h>
 27 b0a6bcf7 2022-09-13 op 
 28 b0a6bcf7 2022-09-13 op #include <asr.h>
 29 b0a6bcf7 2022-09-13 op #include <ctype.h>
 30 b0a6bcf7 2022-09-13 op #include <errno.h>
 31 b0a6bcf7 2022-09-13 op #include <event.h>
 32 b0a6bcf7 2022-09-13 op #include <limits.h>
 33 b0a6bcf7 2022-09-13 op #include <stdlib.h>
 34 b0a6bcf7 2022-09-13 op #include <stdint.h>
 35 b0a6bcf7 2022-09-13 op #include <stdio.h>
 36 b0a6bcf7 2022-09-13 op #include <string.h>
 37 b0a6bcf7 2022-09-13 op #include <imsg.h>
 38 b0a6bcf7 2022-09-13 op #include <tls.h>
 39 b0a6bcf7 2022-09-13 op #include <unistd.h>
 40 b0a6bcf7 2022-09-13 op 
 41 b0a6bcf7 2022-09-13 op #include "log.h"
 42 b0a6bcf7 2022-09-13 op #include "proc.h"
 43 b0a6bcf7 2022-09-13 op 
 44 b0a6bcf7 2022-09-13 op #include "galileo.h"
 45 b0a6bcf7 2022-09-13 op 
 46 b0a6bcf7 2022-09-13 op #define MINIMUM(a, b)	((a) < (b) ? (a) : (b))
 47 b0a6bcf7 2022-09-13 op 
 48 b0a6bcf7 2022-09-13 op /* provided by OpenBSD' base libevent but not in any header? */
 49 b0a6bcf7 2022-09-13 op extern void	 bufferevent_read_pressure_cb(struct evbuffer *, size_t,
 50 b0a6bcf7 2022-09-13 op 		    size_t, void *);
 51 b0a6bcf7 2022-09-13 op 
 52 b0a6bcf7 2022-09-13 op void	proxy_init(struct privsep *, struct privsep_proc *, void *);
 53 b0a6bcf7 2022-09-13 op int	proxy_launch(struct galileo *);
 54 b0a6bcf7 2022-09-13 op void	proxy_accept(int, short, void *);
 55 b0a6bcf7 2022-09-13 op void	proxy_inflight_dec(const char *);
 56 b0a6bcf7 2022-09-13 op int	proxy_dispatch_parent(int, struct privsep_proc *, struct imsg *);
 57 b0a6bcf7 2022-09-13 op void	proxy_resolved(struct asr_result *, void *);
 58 b0a6bcf7 2022-09-13 op void	proxy_connect(int, short, void *);
 59 b0a6bcf7 2022-09-13 op void	proxy_read(struct bufferevent *, void *);
 60 b0a6bcf7 2022-09-13 op void	proxy_write(struct bufferevent *, void *);
 61 b0a6bcf7 2022-09-13 op void	proxy_error(struct bufferevent *, short, void *);
 62 b0a6bcf7 2022-09-13 op int	proxy_bufferevent_add(struct event *, int);
 63 b0a6bcf7 2022-09-13 op void	proxy_tls_writecb(int, short, void *);
 64 b0a6bcf7 2022-09-13 op void	proxy_tls_readcb(int, short, void *);
 65 b0a6bcf7 2022-09-13 op 
 66 b0a6bcf7 2022-09-13 op static struct privsep_proc procs[] = {
 67 b0a6bcf7 2022-09-13 op 	{ "parent",	PROC_PARENT, proxy_dispatch_parent },
 68 b0a6bcf7 2022-09-13 op };
 69 b0a6bcf7 2022-09-13 op 
 70 b0a6bcf7 2022-09-13 op volatile int proxy_clients;
 71 b0a6bcf7 2022-09-13 op volatile int proxy_inflight;
 72 b0a6bcf7 2022-09-13 op uint32_t proxy_fcg_id;
 73 b0a6bcf7 2022-09-13 op 
 74 b0a6bcf7 2022-09-13 op void
 75 b0a6bcf7 2022-09-13 op proxy(struct privsep *ps, struct privsep_proc *p)
 76 b0a6bcf7 2022-09-13 op {
 77 b0a6bcf7 2022-09-13 op 	proc_run(ps, p, procs, nitems(procs), proxy_init, NULL);
 78 b0a6bcf7 2022-09-13 op }
 79 b0a6bcf7 2022-09-13 op 
 80 b0a6bcf7 2022-09-13 op void
 81 b0a6bcf7 2022-09-13 op proxy_init(struct privsep *ps, struct privsep_proc *p, void *arg)
 82 b0a6bcf7 2022-09-13 op {
 83 b0a6bcf7 2022-09-13 op 	if (config_init(ps->ps_env) == -1)
 84 b0a6bcf7 2022-09-13 op 		fatal("failed to initialize configuration");
 85 b0a6bcf7 2022-09-13 op 
 86 b0a6bcf7 2022-09-13 op 	/* We use a custom shutdown callback */
 87 b0a6bcf7 2022-09-13 op 	/* p->p_shutdown = proxy_shutdown */
 88 b0a6bcf7 2022-09-13 op 
 89 b0a6bcf7 2022-09-13 op 	if (pledge("stdio recvfd unix inet dns", NULL) == -1)
 90 b0a6bcf7 2022-09-13 op 		fatal("pledge");
 91 b0a6bcf7 2022-09-13 op }
 92 b0a6bcf7 2022-09-13 op 
 93 b0a6bcf7 2022-09-13 op int
 94 b0a6bcf7 2022-09-13 op proxy_launch(struct galileo *env)
 95 b0a6bcf7 2022-09-13 op {
 96 b0a6bcf7 2022-09-13 op 	event_add(&env->sc_evsock, NULL);
 97 b0a6bcf7 2022-09-13 op 	return (0);
 98 b0a6bcf7 2022-09-13 op }
 99 b0a6bcf7 2022-09-13 op 
100 b0a6bcf7 2022-09-13 op void
101 b0a6bcf7 2022-09-13 op proxy_purge(struct server *srv)
102 b0a6bcf7 2022-09-13 op {
103 b0a6bcf7 2022-09-13 op }
104 b0a6bcf7 2022-09-13 op 
105 b0a6bcf7 2022-09-13 op void
106 b0a6bcf7 2022-09-13 op proxy_accept(int fd, short event, void *arg)
107 b0a6bcf7 2022-09-13 op {
108 b0a6bcf7 2022-09-13 op 	struct galileo	*env = arg;
109 b0a6bcf7 2022-09-13 op 
110 b0a6bcf7 2022-09-13 op 	log_debug("%s", __func__);
111 b0a6bcf7 2022-09-13 op 	fcgi_accept(env);
112 b0a6bcf7 2022-09-13 op }
113 b0a6bcf7 2022-09-13 op 
114 b0a6bcf7 2022-09-13 op void
115 b0a6bcf7 2022-09-13 op proxy_inflight_dec(const char *why)
116 b0a6bcf7 2022-09-13 op {
117 b0a6bcf7 2022-09-13 op 	proxy_inflight--;
118 b0a6bcf7 2022-09-13 op 	log_debug("%s: inflight decremented, now %d, %s",
119 b0a6bcf7 2022-09-13 op 	    __func__, proxy_inflight, why);
120 b0a6bcf7 2022-09-13 op }
121 b0a6bcf7 2022-09-13 op 
122 b0a6bcf7 2022-09-13 op int
123 b0a6bcf7 2022-09-13 op proxy_dispatch_parent(int fd, struct privsep_proc *p, struct imsg *imsg)
124 b0a6bcf7 2022-09-13 op {
125 b0a6bcf7 2022-09-13 op 	struct privsep	*ps = p->p_ps;
126 b0a6bcf7 2022-09-13 op 	struct galileo	*env = ps->ps_env;
127 b0a6bcf7 2022-09-13 op 
128 b0a6bcf7 2022-09-13 op 	switch (imsg->hdr.type) {
129 b0a6bcf7 2022-09-13 op 	case IMSG_CFG_SRV:
130 b0a6bcf7 2022-09-13 op 		if (config_getserver(env, imsg) == -1)
131 b0a6bcf7 2022-09-13 op 			fatal("config_getproxy");
132 b0a6bcf7 2022-09-13 op 		break;
133 b0a6bcf7 2022-09-13 op 	case IMSG_CFG_SOCK:
134 b0a6bcf7 2022-09-13 op 		/* XXX: improve */
135 b0a6bcf7 2022-09-13 op 
136 b0a6bcf7 2022-09-13 op 		if (env->sc_sock_fd != -1) {
137 b0a6bcf7 2022-09-13 op 			event_del(&env->sc_evsock);
138 b0a6bcf7 2022-09-13 op 			close(env->sc_sock_fd);
139 b0a6bcf7 2022-09-13 op 		}
140 b0a6bcf7 2022-09-13 op 
141 b0a6bcf7 2022-09-13 op 		env->sc_sock_fd = config_getsock(env, imsg);
142 b0a6bcf7 2022-09-13 op 		if (env->sc_sock_fd == -1)
143 b0a6bcf7 2022-09-13 op 			fatal("config_getsock");
144 b0a6bcf7 2022-09-13 op 
145 b0a6bcf7 2022-09-13 op 		event_set(&env->sc_evsock, env->sc_sock_fd,
146 b0a6bcf7 2022-09-13 op 		    EV_READ | EV_PERSIST, proxy_accept, env);
147 b0a6bcf7 2022-09-13 op 		event_add(&env->sc_evsock, NULL);
148 b0a6bcf7 2022-09-13 op 		/* evtimer_set(&env->sc_evpause, proxy_accept_paused, env); */
149 b0a6bcf7 2022-09-13 op 		break;
150 b0a6bcf7 2022-09-13 op 	case IMSG_CFG_DONE:
151 b0a6bcf7 2022-09-13 op 		log_debug("config done!");
152 b0a6bcf7 2022-09-13 op 		break;
153 b0a6bcf7 2022-09-13 op 	case IMSG_CTL_START:
154 b0a6bcf7 2022-09-13 op 		proxy_launch(env);
155 b0a6bcf7 2022-09-13 op 		break;
156 b0a6bcf7 2022-09-13 op 	default:
157 b0a6bcf7 2022-09-13 op 		log_warnx("unknown message %d", imsg->hdr.type);
158 b0a6bcf7 2022-09-13 op 		return (-1);
159 b0a6bcf7 2022-09-13 op 	}
160 b0a6bcf7 2022-09-13 op 
161 b0a6bcf7 2022-09-13 op 	return (0);
162 b0a6bcf7 2022-09-13 op }
163 b0a6bcf7 2022-09-13 op 
164 b0a6bcf7 2022-09-13 op static struct proxy_config *
165 b0a6bcf7 2022-09-13 op proxy_server_match(struct galileo *env, struct client *clt)
166 b0a6bcf7 2022-09-13 op {
167 b0a6bcf7 2022-09-13 op 	struct server		*srv;
168 b0a6bcf7 2022-09-13 op 
169 b0a6bcf7 2022-09-13 op 	if (clt->clt_server_name == NULL)
170 b0a6bcf7 2022-09-13 op 		return NULL;
171 b0a6bcf7 2022-09-13 op 
172 b0a6bcf7 2022-09-13 op 	TAILQ_FOREACH(srv, &env->sc_servers, srv_entry) {
173 b0a6bcf7 2022-09-13 op 		if (!strcmp(clt->clt_server_name, srv->srv_conf.host))
174 b0a6bcf7 2022-09-13 op 			return &srv->srv_conf;
175 b0a6bcf7 2022-09-13 op 	}
176 b0a6bcf7 2022-09-13 op 
177 b0a6bcf7 2022-09-13 op 	return NULL;
178 b0a6bcf7 2022-09-13 op }
179 b0a6bcf7 2022-09-13 op 
180 b0a6bcf7 2022-09-13 op void
181 b0a6bcf7 2022-09-13 op proxy_start_request(struct galileo *env, struct client *clt)
182 b0a6bcf7 2022-09-13 op {
183 b0a6bcf7 2022-09-13 op 	struct addrinfo		 hints;
184 b0a6bcf7 2022-09-13 op 	struct asr_query	*query;
185 b0a6bcf7 2022-09-13 op 	char			 port[32];
186 b0a6bcf7 2022-09-13 op 
187 b0a6bcf7 2022-09-13 op 	if ((clt->clt_pc = proxy_server_match(env, clt)) == NULL) {
188 b0a6bcf7 2022-09-13 op 		if (clt_printf(clt, "Status: 501\r\n\r\n") == -1)
189 b0a6bcf7 2022-09-13 op 			return;
190 b0a6bcf7 2022-09-13 op 		fcgi_end_request(clt, 1);
191 b0a6bcf7 2022-09-13 op 		return;
192 b0a6bcf7 2022-09-13 op 	}
193 b0a6bcf7 2022-09-13 op 
194 b0a6bcf7 2022-09-13 op 	(void)snprintf(port, sizeof(port), "%d", clt->clt_pc->proxy_port);
195 b0a6bcf7 2022-09-13 op 
196 b0a6bcf7 2022-09-13 op 	memset(&hints, 0, sizeof(hints));
197 b0a6bcf7 2022-09-13 op 	hints.ai_family = AF_UNSPEC;
198 b0a6bcf7 2022-09-13 op 	hints.ai_socktype = SOCK_STREAM;
199 b0a6bcf7 2022-09-13 op 
200 b0a6bcf7 2022-09-13 op 	query = getaddrinfo_async(clt->clt_pc->proxy_addr, port, &hints, NULL);
201 b0a6bcf7 2022-09-13 op 	if (query == NULL) {
202 b0a6bcf7 2022-09-13 op 		log_warn("getaddrinfo_async");
203 b0a6bcf7 2022-09-13 op 		fcgi_abort_request(clt);
204 b0a6bcf7 2022-09-13 op 		return;
205 b0a6bcf7 2022-09-13 op 	}
206 b0a6bcf7 2022-09-13 op 
207 b0a6bcf7 2022-09-13 op 	clt->clt_evasr = event_asr_run(query, proxy_resolved, clt);
208 b0a6bcf7 2022-09-13 op 	if (clt->clt_evasr == NULL) {
209 b0a6bcf7 2022-09-13 op 		log_warn("event_asr_run");
210 b0a6bcf7 2022-09-13 op 		asr_abort(query);
211 b0a6bcf7 2022-09-13 op 		fcgi_abort_request(clt);
212 b0a6bcf7 2022-09-13 op 		return;
213 b0a6bcf7 2022-09-13 op 	}
214 b0a6bcf7 2022-09-13 op }
215 b0a6bcf7 2022-09-13 op 
216 b0a6bcf7 2022-09-13 op void
217 b0a6bcf7 2022-09-13 op proxy_resolved(struct asr_result *res, void *d)
218 b0a6bcf7 2022-09-13 op {
219 b0a6bcf7 2022-09-13 op 	struct client		*clt = d;
220 b0a6bcf7 2022-09-13 op 	struct proxy_config	*pc = clt->clt_pc;
221 b0a6bcf7 2022-09-13 op 
222 b0a6bcf7 2022-09-13 op 	clt->clt_evasr = NULL;
223 b0a6bcf7 2022-09-13 op 
224 b0a6bcf7 2022-09-13 op 	if (res->ar_gai_errno != 0) {
225 b0a6bcf7 2022-09-13 op 		log_warnx("failed to resolve %s:%d: %s",
226 b0a6bcf7 2022-09-13 op 		    pc->proxy_addr, pc->proxy_port,
227 b0a6bcf7 2022-09-13 op 		    gai_strerror(res->ar_gai_errno));
228 b0a6bcf7 2022-09-13 op 		if (clt_printf(clt, "Status: 501\r\n") == -1)
229 b0a6bcf7 2022-09-13 op 			return;
230 b0a6bcf7 2022-09-13 op 		if (clt_printf(clt, "Content-Type: text/plain\r\n") == -1)
231 b0a6bcf7 2022-09-13 op 			return;
232 b0a6bcf7 2022-09-13 op 		if (clt_printf(clt, "Proxy error; connection failed") == -1)
233 b0a6bcf7 2022-09-13 op 			return;
234 b0a6bcf7 2022-09-13 op 		fcgi_end_request(clt, 1);
235 b0a6bcf7 2022-09-13 op 		return;
236 b0a6bcf7 2022-09-13 op 	}
237 b0a6bcf7 2022-09-13 op 
238 b0a6bcf7 2022-09-13 op 	clt->clt_addrinfo = res->ar_addrinfo;
239 b0a6bcf7 2022-09-13 op 	clt->clt_p = clt->clt_addrinfo;
240 b0a6bcf7 2022-09-13 op 	proxy_connect(-1, 0, clt);
241 b0a6bcf7 2022-09-13 op }
242 b0a6bcf7 2022-09-13 op 
243 b0a6bcf7 2022-09-13 op void
244 b0a6bcf7 2022-09-13 op proxy_connect(int fd, short ev, void *d)
245 b0a6bcf7 2022-09-13 op {
246 b0a6bcf7 2022-09-13 op 	struct client		*clt = d;
247 b0a6bcf7 2022-09-13 op 	struct evbuffer		*out;
248 b0a6bcf7 2022-09-13 op 	struct addrinfo		*p;
249 b0a6bcf7 2022-09-13 op 	struct tls_config	*conf;
250 b0a6bcf7 2022-09-13 op 	struct timeval		 conntv = {5, 0};
251 b0a6bcf7 2022-09-13 op 	int			 err = 0;
252 b0a6bcf7 2022-09-13 op 	socklen_t		 len = sizeof(err);
253 b0a6bcf7 2022-09-13 op 
254 b0a6bcf7 2022-09-13 op again:
255 b0a6bcf7 2022-09-13 op 	if (clt->clt_p == NULL)
256 b0a6bcf7 2022-09-13 op 		goto err;
257 b0a6bcf7 2022-09-13 op 
258 b0a6bcf7 2022-09-13 op 	if (clt->clt_fd != -1) {
259 b0a6bcf7 2022-09-13 op 		if (getsockopt(clt->clt_fd, SOL_SOCKET, SO_ERROR, &err, &len)
260 b0a6bcf7 2022-09-13 op 		    == -1)
261 b0a6bcf7 2022-09-13 op 			goto err;
262 b0a6bcf7 2022-09-13 op 		if (err != 0) {
263 b0a6bcf7 2022-09-13 op 			errno = err;
264 b0a6bcf7 2022-09-13 op 			goto err;
265 b0a6bcf7 2022-09-13 op 		}
266 b0a6bcf7 2022-09-13 op 		goto done;
267 b0a6bcf7 2022-09-13 op 	}
268 b0a6bcf7 2022-09-13 op 
269 b0a6bcf7 2022-09-13 op 	p = clt->clt_p;
270 b0a6bcf7 2022-09-13 op 	clt->clt_fd = socket(p->ai_family, p->ai_socktype | SOCK_NONBLOCK,
271 b0a6bcf7 2022-09-13 op 	    p->ai_protocol);
272 b0a6bcf7 2022-09-13 op 	if (clt->clt_fd == -1) {
273 b0a6bcf7 2022-09-13 op 		clt->clt_p = clt->clt_p->ai_next;
274 b0a6bcf7 2022-09-13 op 		goto again;
275 b0a6bcf7 2022-09-13 op 	}
276 b0a6bcf7 2022-09-13 op 
277 b0a6bcf7 2022-09-13 op 	if (connect(clt->clt_fd, p->ai_addr, p->ai_addrlen) == 0)
278 b0a6bcf7 2022-09-13 op 		goto done;
279 b0a6bcf7 2022-09-13 op 
280 b0a6bcf7 2022-09-13 op 	clt->clt_evconn_live = 1;
281 b0a6bcf7 2022-09-13 op 	event_set(&clt->clt_evconn, clt->clt_fd, EV_WRITE, proxy_connect, clt);
282 b0a6bcf7 2022-09-13 op 	event_add(&clt->clt_evconn, &conntv);
283 b0a6bcf7 2022-09-13 op 	return;
284 b0a6bcf7 2022-09-13 op 
285 b0a6bcf7 2022-09-13 op done:
286 b0a6bcf7 2022-09-13 op 	clt->clt_evconn_live = 0;
287 b0a6bcf7 2022-09-13 op 	freeaddrinfo(clt->clt_addrinfo);
288 b0a6bcf7 2022-09-13 op 	clt->clt_addrinfo = clt->clt_p = NULL;
289 b0a6bcf7 2022-09-13 op 
290 b0a6bcf7 2022-09-13 op 	/* initialize TLS for Gemini */
291 b0a6bcf7 2022-09-13 op 	if ((conf = tls_config_new()) == NULL) {
292 b0a6bcf7 2022-09-13 op 		log_warn("tls_config_new failed");
293 b0a6bcf7 2022-09-13 op 		goto err;
294 b0a6bcf7 2022-09-13 op 	}
295 b0a6bcf7 2022-09-13 op 
296 b0a6bcf7 2022-09-13 op 	tls_config_insecure_noverifycert(conf);
297 b0a6bcf7 2022-09-13 op 
298 b0a6bcf7 2022-09-13 op 	if ((clt->clt_ctx = tls_client()) == NULL) {
299 b0a6bcf7 2022-09-13 op 		log_warnx("tls_client failed");
300 b0a6bcf7 2022-09-13 op 		tls_config_free(conf);
301 b0a6bcf7 2022-09-13 op 		goto err;
302 b0a6bcf7 2022-09-13 op 	}
303 b0a6bcf7 2022-09-13 op 
304 b0a6bcf7 2022-09-13 op 	if (tls_configure(clt->clt_ctx, conf) == -1) {
305 b0a6bcf7 2022-09-13 op 		log_warnx("tls_configure failed");
306 b0a6bcf7 2022-09-13 op 		tls_config_free(conf);
307 b0a6bcf7 2022-09-13 op 		goto err;
308 b0a6bcf7 2022-09-13 op 	}
309 b0a6bcf7 2022-09-13 op 
310 b0a6bcf7 2022-09-13 op 	tls_config_free(conf);
311 b0a6bcf7 2022-09-13 op 
312 b0a6bcf7 2022-09-13 op 	if (tls_connect_socket(clt->clt_ctx, clt->clt_fd,
313 b0a6bcf7 2022-09-13 op 	    clt->clt_pc->proxy_name) == -1) {
314 b0a6bcf7 2022-09-13 op 		log_warnx("tls_connect_socket failed");
315 b0a6bcf7 2022-09-13 op 		goto err;
316 b0a6bcf7 2022-09-13 op 	}
317 b0a6bcf7 2022-09-13 op 
318 b0a6bcf7 2022-09-13 op 	clt->clt_bev = bufferevent_new(clt->clt_fd, proxy_read, proxy_write,
319 b0a6bcf7 2022-09-13 op 	    proxy_error, clt);
320 b0a6bcf7 2022-09-13 op 	if (clt->clt_bev == NULL) {
321 b0a6bcf7 2022-09-13 op 		log_warn("bufferevent_new");
322 b0a6bcf7 2022-09-13 op 		goto err;
323 b0a6bcf7 2022-09-13 op 	}
324 b0a6bcf7 2022-09-13 op 	out = EVBUFFER_OUTPUT(clt->clt_bev);
325 b0a6bcf7 2022-09-13 op 
326 b0a6bcf7 2022-09-13 op 	event_set(&clt->clt_bev->ev_read, clt->clt_fd, EV_READ,
327 b0a6bcf7 2022-09-13 op 	    proxy_tls_readcb, clt->clt_bev);
328 b0a6bcf7 2022-09-13 op 	event_set(&clt->clt_bev->ev_write, clt->clt_fd, EV_WRITE,
329 b0a6bcf7 2022-09-13 op 	    proxy_tls_writecb, clt->clt_bev);
330 b0a6bcf7 2022-09-13 op 
331 b0a6bcf7 2022-09-13 op 	/* bufferevent_settimeout(); */
332 b0a6bcf7 2022-09-13 op 	bufferevent_enable(clt->clt_bev, EV_READ|EV_WRITE);
333 b0a6bcf7 2022-09-13 op 
334 b0a6bcf7 2022-09-13 op 	/* TODO: compute the URL */
335 b0a6bcf7 2022-09-13 op 	if (evbuffer_add_printf(out, "gemini://localhost/\r\n") == -1) {
336 b0a6bcf7 2022-09-13 op 		log_warn("bufferevent_printf failed");
337 b0a6bcf7 2022-09-13 op 		goto err;
338 b0a6bcf7 2022-09-13 op 	}
339 b0a6bcf7 2022-09-13 op 
340 b0a6bcf7 2022-09-13 op 	return;
341 b0a6bcf7 2022-09-13 op 
342 b0a6bcf7 2022-09-13 op err:
343 b0a6bcf7 2022-09-13 op 	log_warn("failed to connect to %s:%d",
344 b0a6bcf7 2022-09-13 op 	    clt->clt_pc->proxy_addr, clt->clt_pc->proxy_port);
345 b0a6bcf7 2022-09-13 op 	if (clt_printf(clt, "Status: 501\r\n") == -1)
346 b0a6bcf7 2022-09-13 op 		return;
347 b0a6bcf7 2022-09-13 op 	if (clt_printf(clt, "Content-Type: text/plain\r\n") == -1)
348 b0a6bcf7 2022-09-13 op 		return;
349 b0a6bcf7 2022-09-13 op 	if (clt_printf(clt, "Proxy error; connection failed") == -1)
350 b0a6bcf7 2022-09-13 op 		return;
351 b0a6bcf7 2022-09-13 op 	fcgi_end_request(clt, 1);
352 b0a6bcf7 2022-09-13 op }
353 b0a6bcf7 2022-09-13 op 
354 b0a6bcf7 2022-09-13 op void
355 b0a6bcf7 2022-09-13 op proxy_read(struct bufferevent *bev, void *d)
356 b0a6bcf7 2022-09-13 op {
357 b0a6bcf7 2022-09-13 op 	struct client		*clt = d;
358 b0a6bcf7 2022-09-13 op 	struct evbuffer		*src = EVBUFFER_INPUT(bev);
359 b0a6bcf7 2022-09-13 op 	char			*hdr;
360 b0a6bcf7 2022-09-13 op 	size_t			 len;
361 b0a6bcf7 2022-09-13 op 	int			 code;
362 b0a6bcf7 2022-09-13 op 
363 b0a6bcf7 2022-09-13 op 	if (clt->clt_headersdone) {
364 b0a6bcf7 2022-09-13 op 	copy:
365 b0a6bcf7 2022-09-13 op 		clt_write_bufferevent(clt, bev);
366 b0a6bcf7 2022-09-13 op 		return;
367 b0a6bcf7 2022-09-13 op 	}
368 b0a6bcf7 2022-09-13 op 
369 b0a6bcf7 2022-09-13 op 	hdr = evbuffer_readln(src, &len, EVBUFFER_EOL_CRLF_STRICT);
370 b0a6bcf7 2022-09-13 op 	if (hdr == NULL) {
371 b0a6bcf7 2022-09-13 op 		if (EVBUFFER_LENGTH(src) >= 1026)
372 b0a6bcf7 2022-09-13 op 			proxy_error(bev, EV_READ, clt);
373 b0a6bcf7 2022-09-13 op 		return;
374 b0a6bcf7 2022-09-13 op 	}
375 b0a6bcf7 2022-09-13 op 
376 b0a6bcf7 2022-09-13 op 	if (len < 4 ||
377 b0a6bcf7 2022-09-13 op 	    !isdigit((unsigned char)hdr[0]) ||
378 b0a6bcf7 2022-09-13 op 	    !isdigit((unsigned char)hdr[1]) ||
379 b0a6bcf7 2022-09-13 op 	    hdr[2] != ' ') {
380 b0a6bcf7 2022-09-13 op 		log_warnx("invalid ");
381 b0a6bcf7 2022-09-13 op 		free(hdr);
382 b0a6bcf7 2022-09-13 op 		proxy_error(bev, EV_READ, clt);
383 b0a6bcf7 2022-09-13 op 		return;
384 b0a6bcf7 2022-09-13 op 	}
385 b0a6bcf7 2022-09-13 op 
386 b0a6bcf7 2022-09-13 op 	code = (hdr[0] - '0') * 10 + (hdr[1] - '0');
387 b0a6bcf7 2022-09-13 op 	if (code != 20) {
388 b0a6bcf7 2022-09-13 op 		log_warnx("un-handled gemini reply status %d", code);
389 b0a6bcf7 2022-09-13 op 		free(hdr);
390 b0a6bcf7 2022-09-13 op 		proxy_error(bev, EV_READ, clt);
391 b0a6bcf7 2022-09-13 op 		return;
392 b0a6bcf7 2022-09-13 op 	}
393 b0a6bcf7 2022-09-13 op 
394 b0a6bcf7 2022-09-13 op 	if (clt_printf(clt, "Content-Type: %s\r\n", &hdr[4]) == -1)
395 b0a6bcf7 2022-09-13 op 		return;
396 b0a6bcf7 2022-09-13 op 	if (clt_printf(clt, "\r\n") == -1)
397 b0a6bcf7 2022-09-13 op 		return;
398 b0a6bcf7 2022-09-13 op 
399 b0a6bcf7 2022-09-13 op 	clt->clt_headersdone = 1;
400 b0a6bcf7 2022-09-13 op 	goto copy;
401 b0a6bcf7 2022-09-13 op }
402 b0a6bcf7 2022-09-13 op 
403 b0a6bcf7 2022-09-13 op void
404 b0a6bcf7 2022-09-13 op proxy_write(struct bufferevent *bev, void *d)
405 b0a6bcf7 2022-09-13 op {
406 b0a6bcf7 2022-09-13 op 	return;
407 b0a6bcf7 2022-09-13 op }
408 b0a6bcf7 2022-09-13 op 
409 b0a6bcf7 2022-09-13 op void
410 b0a6bcf7 2022-09-13 op proxy_error(struct bufferevent *bev, short err, void *d)
411 b0a6bcf7 2022-09-13 op {
412 b0a6bcf7 2022-09-13 op 	struct client		*clt = d;
413 b0a6bcf7 2022-09-13 op 	int			 status = !(err & EVBUFFER_EOF);
414 b0a6bcf7 2022-09-13 op 
415 b0a6bcf7 2022-09-13 op 	log_debug("proxy error, shutting down the connection (err: %x)",
416 b0a6bcf7 2022-09-13 op 	    err);
417 b0a6bcf7 2022-09-13 op 
418 b0a6bcf7 2022-09-13 op 	if (!clt->clt_headersdone) {
419 b0a6bcf7 2022-09-13 op 		if (clt_printf(clt, "Status: 501\r\n") == -1)
420 b0a6bcf7 2022-09-13 op 			return;
421 b0a6bcf7 2022-09-13 op 		if (clt_printf(clt, "Content-Type: text/plain\r\n") == -1)
422 b0a6bcf7 2022-09-13 op 			return;
423 b0a6bcf7 2022-09-13 op 		if (clt_printf(clt, "Proxy error\n") == -1)
424 b0a6bcf7 2022-09-13 op 			return;
425 b0a6bcf7 2022-09-13 op 	}
426 b0a6bcf7 2022-09-13 op 
427 b0a6bcf7 2022-09-13 op 	fcgi_end_request(clt, status);
428 b0a6bcf7 2022-09-13 op }
429 b0a6bcf7 2022-09-13 op 
430 b0a6bcf7 2022-09-13 op void
431 b0a6bcf7 2022-09-13 op proxy_tls_readcb(int fd, short event, void *arg)
432 b0a6bcf7 2022-09-13 op {
433 b0a6bcf7 2022-09-13 op 	struct bufferevent	*bufev = arg;
434 b0a6bcf7 2022-09-13 op 	struct client		*clt = bufev->cbarg;
435 b0a6bcf7 2022-09-13 op 	char			 rbuf[IBUF_READ_SIZE];
436 b0a6bcf7 2022-09-13 op 	int			 what = EVBUFFER_READ;
437 b0a6bcf7 2022-09-13 op 	int			 howmuch = IBUF_READ_SIZE;
438 b0a6bcf7 2022-09-13 op 	ssize_t			 ret;
439 b0a6bcf7 2022-09-13 op 	size_t			 len;
440 b0a6bcf7 2022-09-13 op 
441 b0a6bcf7 2022-09-13 op 	if (event == EV_TIMEOUT) {
442 b0a6bcf7 2022-09-13 op 		what |= EVBUFFER_TIMEOUT;
443 b0a6bcf7 2022-09-13 op 		goto err;
444 b0a6bcf7 2022-09-13 op 	}
445 b0a6bcf7 2022-09-13 op 
446 b0a6bcf7 2022-09-13 op 	if (bufev->wm_read.high != 0)
447 b0a6bcf7 2022-09-13 op 		howmuch = MINIMUM(sizeof(rbuf), bufev->wm_read.high);
448 b0a6bcf7 2022-09-13 op 
449 b0a6bcf7 2022-09-13 op 	ret = tls_read(clt->clt_ctx, rbuf, howmuch);
450 b0a6bcf7 2022-09-13 op 	if (ret == TLS_WANT_POLLIN || ret == TLS_WANT_POLLOUT) {
451 b0a6bcf7 2022-09-13 op 		goto retry;
452 b0a6bcf7 2022-09-13 op 	} else if (ret == -1) {
453 b0a6bcf7 2022-09-13 op 		what |= EVBUFFER_ERROR;
454 b0a6bcf7 2022-09-13 op 		goto err;
455 b0a6bcf7 2022-09-13 op 	}
456 b0a6bcf7 2022-09-13 op 	len = ret;
457 b0a6bcf7 2022-09-13 op 
458 b0a6bcf7 2022-09-13 op 	if (len == 0) {
459 b0a6bcf7 2022-09-13 op 		what |= EVBUFFER_EOF;
460 b0a6bcf7 2022-09-13 op 		goto err;
461 b0a6bcf7 2022-09-13 op 	}
462 b0a6bcf7 2022-09-13 op 
463 b0a6bcf7 2022-09-13 op 	if (evbuffer_add(bufev->input, rbuf, len) == -1) {
464 b0a6bcf7 2022-09-13 op 		what |= EVBUFFER_ERROR;
465 b0a6bcf7 2022-09-13 op 		goto err;
466 b0a6bcf7 2022-09-13 op 	}
467 b0a6bcf7 2022-09-13 op 
468 b0a6bcf7 2022-09-13 op 	proxy_bufferevent_add(&bufev->ev_read, bufev->timeout_read);
469 b0a6bcf7 2022-09-13 op 
470 b0a6bcf7 2022-09-13 op 	len = EVBUFFER_LENGTH(bufev->input);
471 b0a6bcf7 2022-09-13 op 	if (bufev->wm_read.low != 0 && len < bufev->wm_read.low)
472 b0a6bcf7 2022-09-13 op 		return;
473 b0a6bcf7 2022-09-13 op 	if (bufev->wm_read.high != 0 && len > bufev->wm_read.high) {
474 b0a6bcf7 2022-09-13 op 		struct evbuffer *buf = bufev->input;
475 b0a6bcf7 2022-09-13 op 		event_del(&bufev->ev_read);
476 b0a6bcf7 2022-09-13 op 		evbuffer_setcb(buf, bufferevent_read_pressure_cb, bufev);
477 b0a6bcf7 2022-09-13 op 		return;
478 b0a6bcf7 2022-09-13 op 	}
479 b0a6bcf7 2022-09-13 op 
480 b0a6bcf7 2022-09-13 op 	if (bufev->readcb != NULL)
481 b0a6bcf7 2022-09-13 op 		(*bufev->readcb)(bufev, bufev->cbarg);
482 b0a6bcf7 2022-09-13 op 	return;
483 b0a6bcf7 2022-09-13 op 
484 b0a6bcf7 2022-09-13 op retry:
485 b0a6bcf7 2022-09-13 op 	proxy_bufferevent_add(&bufev->ev_read, bufev->timeout_read);
486 b0a6bcf7 2022-09-13 op 	return;
487 b0a6bcf7 2022-09-13 op 
488 b0a6bcf7 2022-09-13 op err:
489 b0a6bcf7 2022-09-13 op 	(*bufev->errorcb)(bufev, what, bufev->cbarg);
490 b0a6bcf7 2022-09-13 op }
491 b0a6bcf7 2022-09-13 op 
492 b0a6bcf7 2022-09-13 op int
493 b0a6bcf7 2022-09-13 op proxy_bufferevent_add(struct event *ev, int timeout)
494 b0a6bcf7 2022-09-13 op {
495 b0a6bcf7 2022-09-13 op 	struct timeval tv, *ptv = NULL;
496 b0a6bcf7 2022-09-13 op 
497 b0a6bcf7 2022-09-13 op 	if (timeout) {
498 b0a6bcf7 2022-09-13 op 		timerclear(&tv);
499 b0a6bcf7 2022-09-13 op 		tv.tv_sec = timeout;
500 b0a6bcf7 2022-09-13 op 		ptv = &tv;
501 b0a6bcf7 2022-09-13 op 	}
502 b0a6bcf7 2022-09-13 op 
503 b0a6bcf7 2022-09-13 op 	return (event_add(ev, ptv));
504 b0a6bcf7 2022-09-13 op }
505 b0a6bcf7 2022-09-13 op 
506 b0a6bcf7 2022-09-13 op void
507 b0a6bcf7 2022-09-13 op proxy_tls_writecb(int fd, short event, void *arg)
508 b0a6bcf7 2022-09-13 op {
509 b0a6bcf7 2022-09-13 op 	struct bufferevent	*bufev = arg;
510 b0a6bcf7 2022-09-13 op 	struct client		*clt = bufev->cbarg;
511 b0a6bcf7 2022-09-13 op 	ssize_t			 ret;
512 b0a6bcf7 2022-09-13 op 	short			 what = EVBUFFER_WRITE;
513 b0a6bcf7 2022-09-13 op 	size_t			 len;
514 b0a6bcf7 2022-09-13 op 
515 b0a6bcf7 2022-09-13 op 	if (event == EV_TIMEOUT) {
516 b0a6bcf7 2022-09-13 op 		what |= EVBUFFER_TIMEOUT;
517 b0a6bcf7 2022-09-13 op 		goto err;
518 b0a6bcf7 2022-09-13 op 	}
519 b0a6bcf7 2022-09-13 op 
520 b0a6bcf7 2022-09-13 op 	if (EVBUFFER_LENGTH(bufev->output)) {
521 b0a6bcf7 2022-09-13 op 		ret = tls_write(clt->clt_ctx,
522 b0a6bcf7 2022-09-13 op 		    EVBUFFER_DATA(bufev->output),
523 b0a6bcf7 2022-09-13 op 		    EVBUFFER_LENGTH(bufev->output));
524 b0a6bcf7 2022-09-13 op 		if (ret == TLS_WANT_POLLIN || ret == TLS_WANT_POLLOUT) {
525 b0a6bcf7 2022-09-13 op 			goto retry;
526 b0a6bcf7 2022-09-13 op 		} else if (ret == -1) {
527 b0a6bcf7 2022-09-13 op 			what |= EVBUFFER_ERROR;
528 b0a6bcf7 2022-09-13 op 			goto err;
529 b0a6bcf7 2022-09-13 op 		}
530 b0a6bcf7 2022-09-13 op 		len = ret;
531 b0a6bcf7 2022-09-13 op 		evbuffer_drain(bufev->output, len);
532 b0a6bcf7 2022-09-13 op 	}
533 b0a6bcf7 2022-09-13 op 
534 b0a6bcf7 2022-09-13 op 	if (EVBUFFER_LENGTH(bufev->output) != 0)
535 b0a6bcf7 2022-09-13 op 		proxy_bufferevent_add(&bufev->ev_write, bufev->timeout_write);
536 b0a6bcf7 2022-09-13 op 
537 b0a6bcf7 2022-09-13 op 	if (bufev->writecb != NULL &&
538 b0a6bcf7 2022-09-13 op 	    EVBUFFER_LENGTH(bufev->output) <= bufev->wm_write.low)
539 b0a6bcf7 2022-09-13 op 		(*bufev->writecb)(bufev, bufev->cbarg);
540 b0a6bcf7 2022-09-13 op 	return;
541 b0a6bcf7 2022-09-13 op 
542 b0a6bcf7 2022-09-13 op retry:
543 b0a6bcf7 2022-09-13 op 	proxy_bufferevent_add(&bufev->ev_write, bufev->timeout_write);
544 b0a6bcf7 2022-09-13 op 	return;
545 b0a6bcf7 2022-09-13 op 
546 b0a6bcf7 2022-09-13 op err:
547 b0a6bcf7 2022-09-13 op 	(*bufev->errorcb)(bufev, what, bufev->cbarg);
548 b0a6bcf7 2022-09-13 op }
549 b0a6bcf7 2022-09-13 op 
550 b0a6bcf7 2022-09-13 op void
551 b0a6bcf7 2022-09-13 op proxy_client_free(struct client *clt)
552 b0a6bcf7 2022-09-13 op {
553 b0a6bcf7 2022-09-13 op 	if (clt->clt_evasr)
554 b0a6bcf7 2022-09-13 op 		event_asr_abort(clt->clt_evasr);
555 b0a6bcf7 2022-09-13 op 
556 b0a6bcf7 2022-09-13 op 	if (clt->clt_addrinfo)
557 b0a6bcf7 2022-09-13 op 		freeaddrinfo(clt->clt_addrinfo);
558 b0a6bcf7 2022-09-13 op 
559 b0a6bcf7 2022-09-13 op 	if (clt->clt_evconn_live)
560 b0a6bcf7 2022-09-13 op 		event_del(&clt->clt_evconn);
561 b0a6bcf7 2022-09-13 op 
562 b0a6bcf7 2022-09-13 op 	if (clt->clt_fd != -1)
563 b0a6bcf7 2022-09-13 op 		close(clt->clt_fd);
564 b0a6bcf7 2022-09-13 op 
565 b0a6bcf7 2022-09-13 op 	if (clt->clt_ctx)
566 b0a6bcf7 2022-09-13 op 		tls_free(clt->clt_ctx);
567 b0a6bcf7 2022-09-13 op 
568 b0a6bcf7 2022-09-13 op 	if (clt->clt_bev)
569 b0a6bcf7 2022-09-13 op 		bufferevent_free(clt->clt_bev);
570 b0a6bcf7 2022-09-13 op 
571 b0a6bcf7 2022-09-13 op 	free(clt->clt_server_name);
572 b0a6bcf7 2022-09-13 op 	free(clt->clt_script_name);
573 b0a6bcf7 2022-09-13 op 	free(clt->clt_path_info);
574 b0a6bcf7 2022-09-13 op 	free(clt);
575 b0a6bcf7 2022-09-13 op }