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 33f4bf26 2022-09-14 op #include <fnmatch.h>
 33 b0a6bcf7 2022-09-13 op #include <limits.h>
 34 b0a6bcf7 2022-09-13 op #include <stdlib.h>
 35 b0a6bcf7 2022-09-13 op #include <stdint.h>
 36 b0a6bcf7 2022-09-13 op #include <stdio.h>
 37 b0a6bcf7 2022-09-13 op #include <string.h>
 38 b0a6bcf7 2022-09-13 op #include <imsg.h>
 39 b0a6bcf7 2022-09-13 op #include <tls.h>
 40 b0a6bcf7 2022-09-13 op #include <unistd.h>
 41 b0a6bcf7 2022-09-13 op 
 42 b0a6bcf7 2022-09-13 op #include "log.h"
 43 b0a6bcf7 2022-09-13 op #include "proc.h"
 44 b0a6bcf7 2022-09-13 op 
 45 b0a6bcf7 2022-09-13 op #include "galileo.h"
 46 b0a6bcf7 2022-09-13 op 
 47 b0a6bcf7 2022-09-13 op #define MINIMUM(a, b)	((a) < (b) ? (a) : (b))
 48 b0a6bcf7 2022-09-13 op 
 49 b0a6bcf7 2022-09-13 op /* provided by OpenBSD' base libevent but not in any header? */
 50 b0a6bcf7 2022-09-13 op extern void	 bufferevent_read_pressure_cb(struct evbuffer *, size_t,
 51 b0a6bcf7 2022-09-13 op 		    size_t, void *);
 52 b0a6bcf7 2022-09-13 op 
 53 b0a6bcf7 2022-09-13 op void	proxy_init(struct privsep *, struct privsep_proc *, void *);
 54 b0a6bcf7 2022-09-13 op int	proxy_launch(struct galileo *);
 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 c9dc4bc6 2022-09-13 op void	proxy_translate_gemtext(struct client *);
 58 b0a6bcf7 2022-09-13 op void	proxy_resolved(struct asr_result *, void *);
 59 b0a6bcf7 2022-09-13 op void	proxy_connect(int, short, void *);
 60 b0a6bcf7 2022-09-13 op void	proxy_read(struct bufferevent *, void *);
 61 b0a6bcf7 2022-09-13 op void	proxy_write(struct bufferevent *, void *);
 62 b0a6bcf7 2022-09-13 op void	proxy_error(struct bufferevent *, short, void *);
 63 b0a6bcf7 2022-09-13 op int	proxy_bufferevent_add(struct event *, int);
 64 b0a6bcf7 2022-09-13 op void	proxy_tls_writecb(int, short, void *);
 65 b0a6bcf7 2022-09-13 op void	proxy_tls_readcb(int, short, void *);
 66 b0a6bcf7 2022-09-13 op 
 67 b0a6bcf7 2022-09-13 op static struct privsep_proc procs[] = {
 68 b0a6bcf7 2022-09-13 op 	{ "parent",	PROC_PARENT, proxy_dispatch_parent },
 69 b0a6bcf7 2022-09-13 op };
 70 b0a6bcf7 2022-09-13 op 
 71 b0a6bcf7 2022-09-13 op volatile int proxy_clients;
 72 b0a6bcf7 2022-09-13 op volatile int proxy_inflight;
 73 b0a6bcf7 2022-09-13 op uint32_t proxy_fcg_id;
 74 b0a6bcf7 2022-09-13 op 
 75 b0a6bcf7 2022-09-13 op void
 76 b0a6bcf7 2022-09-13 op proxy(struct privsep *ps, struct privsep_proc *p)
 77 b0a6bcf7 2022-09-13 op {
 78 b0a6bcf7 2022-09-13 op 	proc_run(ps, p, procs, nitems(procs), proxy_init, NULL);
 79 b0a6bcf7 2022-09-13 op }
 80 b0a6bcf7 2022-09-13 op 
 81 b0a6bcf7 2022-09-13 op void
 82 b0a6bcf7 2022-09-13 op proxy_init(struct privsep *ps, struct privsep_proc *p, void *arg)
 83 b0a6bcf7 2022-09-13 op {
 84 b0a6bcf7 2022-09-13 op 	if (config_init(ps->ps_env) == -1)
 85 b0a6bcf7 2022-09-13 op 		fatal("failed to initialize configuration");
 86 b0a6bcf7 2022-09-13 op 
 87 b0a6bcf7 2022-09-13 op 	/* We use a custom shutdown callback */
 88 b0a6bcf7 2022-09-13 op 	/* p->p_shutdown = proxy_shutdown */
 89 b0a6bcf7 2022-09-13 op 
 90 b0a6bcf7 2022-09-13 op 	if (pledge("stdio recvfd unix inet dns", NULL) == -1)
 91 b0a6bcf7 2022-09-13 op 		fatal("pledge");
 92 b0a6bcf7 2022-09-13 op }
 93 b0a6bcf7 2022-09-13 op 
 94 b0a6bcf7 2022-09-13 op int
 95 b0a6bcf7 2022-09-13 op proxy_launch(struct galileo *env)
 96 b0a6bcf7 2022-09-13 op {
 97 b0a6bcf7 2022-09-13 op 	event_add(&env->sc_evsock, NULL);
 98 b0a6bcf7 2022-09-13 op 	return (0);
 99 b0a6bcf7 2022-09-13 op }
100 b0a6bcf7 2022-09-13 op 
101 b0a6bcf7 2022-09-13 op void
102 b0a6bcf7 2022-09-13 op proxy_purge(struct server *srv)
103 b0a6bcf7 2022-09-13 op {
104 b0a6bcf7 2022-09-13 op }
105 b0a6bcf7 2022-09-13 op 
106 b0a6bcf7 2022-09-13 op void
107 b0a6bcf7 2022-09-13 op proxy_inflight_dec(const char *why)
108 b0a6bcf7 2022-09-13 op {
109 b0a6bcf7 2022-09-13 op 	proxy_inflight--;
110 b0a6bcf7 2022-09-13 op 	log_debug("%s: inflight decremented, now %d, %s",
111 b0a6bcf7 2022-09-13 op 	    __func__, proxy_inflight, why);
112 b0a6bcf7 2022-09-13 op }
113 b0a6bcf7 2022-09-13 op 
114 b0a6bcf7 2022-09-13 op int
115 b0a6bcf7 2022-09-13 op proxy_dispatch_parent(int fd, struct privsep_proc *p, struct imsg *imsg)
116 b0a6bcf7 2022-09-13 op {
117 b0a6bcf7 2022-09-13 op 	struct privsep	*ps = p->p_ps;
118 b0a6bcf7 2022-09-13 op 	struct galileo	*env = ps->ps_env;
119 b0a6bcf7 2022-09-13 op 
120 b0a6bcf7 2022-09-13 op 	switch (imsg->hdr.type) {
121 b0a6bcf7 2022-09-13 op 	case IMSG_CFG_SRV:
122 b0a6bcf7 2022-09-13 op 		if (config_getserver(env, imsg) == -1)
123 b0a6bcf7 2022-09-13 op 			fatal("config_getproxy");
124 b0a6bcf7 2022-09-13 op 		break;
125 b0a6bcf7 2022-09-13 op 	case IMSG_CFG_SOCK:
126 b0a6bcf7 2022-09-13 op 		/* XXX: improve */
127 b0a6bcf7 2022-09-13 op 
128 b0a6bcf7 2022-09-13 op 		if (env->sc_sock_fd != -1) {
129 b0a6bcf7 2022-09-13 op 			event_del(&env->sc_evsock);
130 b0a6bcf7 2022-09-13 op 			close(env->sc_sock_fd);
131 b0a6bcf7 2022-09-13 op 		}
132 b0a6bcf7 2022-09-13 op 
133 b0a6bcf7 2022-09-13 op 		env->sc_sock_fd = config_getsock(env, imsg);
134 b0a6bcf7 2022-09-13 op 		if (env->sc_sock_fd == -1)
135 b0a6bcf7 2022-09-13 op 			fatal("config_getsock");
136 b0a6bcf7 2022-09-13 op 
137 b0a6bcf7 2022-09-13 op 		event_set(&env->sc_evsock, env->sc_sock_fd,
138 ea8874f1 2022-09-13 op 		    EV_READ | EV_PERSIST, fcgi_accept, env);
139 b0a6bcf7 2022-09-13 op 		event_add(&env->sc_evsock, NULL);
140 ea8874f1 2022-09-13 op 		evtimer_set(&env->sc_evpause, fcgi_accept, env);
141 b0a6bcf7 2022-09-13 op 		break;
142 b0a6bcf7 2022-09-13 op 	case IMSG_CFG_DONE:
143 b0a6bcf7 2022-09-13 op 		log_debug("config done!");
144 b0a6bcf7 2022-09-13 op 		break;
145 b0a6bcf7 2022-09-13 op 	case IMSG_CTL_START:
146 b0a6bcf7 2022-09-13 op 		proxy_launch(env);
147 b0a6bcf7 2022-09-13 op 		break;
148 b0a6bcf7 2022-09-13 op 	default:
149 b0a6bcf7 2022-09-13 op 		log_warnx("unknown message %d", imsg->hdr.type);
150 b0a6bcf7 2022-09-13 op 		return (-1);
151 c9dc4bc6 2022-09-13 op 	}
152 c9dc4bc6 2022-09-13 op 
153 c9dc4bc6 2022-09-13 op 	return (0);
154 c9dc4bc6 2022-09-13 op }
155 c9dc4bc6 2022-09-13 op 
156 c9dc4bc6 2022-09-13 op static inline int
157 c9dc4bc6 2022-09-13 op printurl(struct client *clt, const char *str)
158 c9dc4bc6 2022-09-13 op {
159 c9dc4bc6 2022-09-13 op 	for (; *str; ++str) {
160 c9dc4bc6 2022-09-13 op 		switch (*str) {
161 c9dc4bc6 2022-09-13 op 		case ' ':
162 c9dc4bc6 2022-09-13 op 		case '\t':
163 c9dc4bc6 2022-09-13 op 		case '\'':
164 c9dc4bc6 2022-09-13 op 		case '\\':
165 c9dc4bc6 2022-09-13 op 			if (clt_printf(clt, "%2X", (unsigned char)*str) == -1)
166 c9dc4bc6 2022-09-13 op 				return (-1);
167 c9dc4bc6 2022-09-13 op 			break;
168 c9dc4bc6 2022-09-13 op 		default:
169 c9dc4bc6 2022-09-13 op 			if (clt_putc(clt, *str) == -1)
170 c9dc4bc6 2022-09-13 op 				return (-1);
171 c9dc4bc6 2022-09-13 op 			break;
172 c9dc4bc6 2022-09-13 op 		}
173 c9dc4bc6 2022-09-13 op 	}
174 c9dc4bc6 2022-09-13 op 
175 c9dc4bc6 2022-09-13 op 	return (0);
176 c9dc4bc6 2022-09-13 op }
177 c9dc4bc6 2022-09-13 op 
178 c9dc4bc6 2022-09-13 op static inline int
179 c9dc4bc6 2022-09-13 op htmlescape(struct client *clt, const char *str)
180 c9dc4bc6 2022-09-13 op {
181 c9dc4bc6 2022-09-13 op 	int r;
182 c9dc4bc6 2022-09-13 op 
183 c9dc4bc6 2022-09-13 op 	for (; *str; ++str) {
184 c9dc4bc6 2022-09-13 op 		switch (*str) {
185 c9dc4bc6 2022-09-13 op 		case '<':
186 c9dc4bc6 2022-09-13 op 			r = clt_puts(clt, "&lt;");
187 c9dc4bc6 2022-09-13 op 			break;
188 c9dc4bc6 2022-09-13 op 		case '>':
189 c9dc4bc6 2022-09-13 op 			r = clt_puts(clt, "&gt;");
190 c9dc4bc6 2022-09-13 op 			break;
191 c9dc4bc6 2022-09-13 op 		case '&':
192 c9dc4bc6 2022-09-13 op 			r = clt_puts(clt, "&amp;");
193 c9dc4bc6 2022-09-13 op 			break;
194 c9dc4bc6 2022-09-13 op 		default:
195 c9dc4bc6 2022-09-13 op 			r = clt_putc(clt, *str);
196 c9dc4bc6 2022-09-13 op 			break;
197 c9dc4bc6 2022-09-13 op 		}
198 c9dc4bc6 2022-09-13 op 
199 c9dc4bc6 2022-09-13 op 		if (r == -1)
200 c9dc4bc6 2022-09-13 op 			return (-1);
201 c9dc4bc6 2022-09-13 op 	}
202 c9dc4bc6 2022-09-13 op 
203 c9dc4bc6 2022-09-13 op 	return (0);
204 c9dc4bc6 2022-09-13 op }
205 c9dc4bc6 2022-09-13 op 
206 c9dc4bc6 2022-09-13 op static int
207 c9dc4bc6 2022-09-13 op gemtext_translate_line(struct client *clt, char *line)
208 c9dc4bc6 2022-09-13 op {
209 c9dc4bc6 2022-09-13 op 	/* preformatted line / closing */
210 b9de0a74 2022-09-14 op 	if (clt->clt_translate & TR_PRE) {
211 c9dc4bc6 2022-09-13 op 		if (!strncmp(line, "```", 3)) {
212 b9de0a74 2022-09-14 op 			clt->clt_translate &= ~TR_PRE;
213 c9dc4bc6 2022-09-13 op 			return (clt_puts(clt, "</pre>"));
214 c9dc4bc6 2022-09-13 op 		}
215 c9dc4bc6 2022-09-13 op 
216 c9dc4bc6 2022-09-13 op 		if (htmlescape(clt, line) == -1)
217 c9dc4bc6 2022-09-13 op 			return (-1);
218 c9dc4bc6 2022-09-13 op 		return (clt_putc(clt, '\n'));
219 b9de0a74 2022-09-14 op 	}
220 b9de0a74 2022-09-14 op 
221 b9de0a74 2022-09-14 op 	/* bullet */
222 b9de0a74 2022-09-14 op 	if (!strncmp(line, "* ", 2)) {
223 b9de0a74 2022-09-14 op 		if (clt->clt_translate & TR_NAV) {
224 b9de0a74 2022-09-14 op 			if (clt_puts(clt, "</ul></nav>") == -1)
225 b9de0a74 2022-09-14 op 				return (-1);
226 b9de0a74 2022-09-14 op 			clt->clt_translate &= ~TR_NAV;
227 b9de0a74 2022-09-14 op 		}
228 b9de0a74 2022-09-14 op 
229 b9de0a74 2022-09-14 op 		if (!(clt->clt_translate & TR_LIST)) {
230 b9de0a74 2022-09-14 op 			if (clt_puts(clt, "<ul>") == -1)
231 b9de0a74 2022-09-14 op 				return (-1);
232 b9de0a74 2022-09-14 op 			clt->clt_translate |= TR_LIST;
233 b9de0a74 2022-09-14 op 		}
234 b9de0a74 2022-09-14 op 
235 b9de0a74 2022-09-14 op 		if (clt_puts(clt, "<li>") == -1 ||
236 b9de0a74 2022-09-14 op 		    htmlescape(clt, line + 2) == -1 ||
237 b9de0a74 2022-09-14 op 		    clt_puts(clt, "</li>") == -1)
238 b9de0a74 2022-09-14 op 			return (-1);
239 b9de0a74 2022-09-14 op 		return (0);
240 b9de0a74 2022-09-14 op 	}
241 b9de0a74 2022-09-14 op 
242 b9de0a74 2022-09-14 op 	if (clt->clt_translate & TR_LIST) {
243 b9de0a74 2022-09-14 op 		if (clt_puts(clt, "</ul>") == -1)
244 b9de0a74 2022-09-14 op 			return (-1);
245 b9de0a74 2022-09-14 op 		clt->clt_translate &= ~TR_LIST;
246 b9de0a74 2022-09-14 op 	}
247 b9de0a74 2022-09-14 op 
248 b9de0a74 2022-09-14 op 	/* link -- TODO: relativify from SCRIPT_NAME */
249 b9de0a74 2022-09-14 op 	if (!strncmp(line, "=>", 2)) {
250 b9de0a74 2022-09-14 op 		char *label;
251 b9de0a74 2022-09-14 op 
252 b9de0a74 2022-09-14 op 		line += 2;
253 b9de0a74 2022-09-14 op 		line += strspn(line, " \t");
254 b9de0a74 2022-09-14 op 
255 b9de0a74 2022-09-14 op 		label = line + strcspn(line, " \t");
256 b9de0a74 2022-09-14 op 		if (*label == '\0')
257 b9de0a74 2022-09-14 op 			label = line;
258 b9de0a74 2022-09-14 op 		else
259 b9de0a74 2022-09-14 op 			*label++ = '\0';
260 b9de0a74 2022-09-14 op 
261 33f4bf26 2022-09-14 op 		if (fnmatch("*.jpg", line, 0) == 0 ||
262 33f4bf26 2022-09-14 op 		    fnmatch("*.jpeg", line, 0) == 0 ||
263 33f4bf26 2022-09-14 op 		    fnmatch("*.gif", line, 0) == 0 ||
264 33f4bf26 2022-09-14 op 		    fnmatch("*.png", line, 0) == 0 ||
265 33f4bf26 2022-09-14 op 		    fnmatch("*.svg", line, 0) == 0 ||
266 33f4bf26 2022-09-14 op 		    fnmatch("*.webp", line, 0) == 0) {
267 33f4bf26 2022-09-14 op 			if (clt->clt_translate & TR_NAV) {
268 33f4bf26 2022-09-14 op 				if (clt_puts(clt, "</ul></nav>") == -1)
269 33f4bf26 2022-09-14 op 					return (-1);
270 33f4bf26 2022-09-14 op 				clt->clt_translate &= ~TR_NAV;
271 33f4bf26 2022-09-14 op 			}
272 33f4bf26 2022-09-14 op 
273 33f4bf26 2022-09-14 op 			if (clt_puts(clt, "<figure><a href='") == -1 ||
274 33f4bf26 2022-09-14 op 			    printurl(clt, line) == -1 ||
275 33f4bf26 2022-09-14 op 			    clt_puts(clt, "'><img src='") == -1 ||
276 33f4bf26 2022-09-14 op 			    printurl(clt, line) == -1 ||
277 33f4bf26 2022-09-14 op 			    clt_puts(clt, "' /></a><figcaption>") == -1 ||
278 33f4bf26 2022-09-14 op 			    htmlescape(clt, label) == -1 ||
279 33f4bf26 2022-09-14 op 			    clt_puts(clt, "</figcaption></figure>") == -1)
280 33f4bf26 2022-09-14 op 				return (-1);
281 33f4bf26 2022-09-14 op 
282 33f4bf26 2022-09-14 op 			return (0);
283 33f4bf26 2022-09-14 op 		}
284 33f4bf26 2022-09-14 op 
285 33f4bf26 2022-09-14 op 		if (!(clt->clt_translate & TR_NAV)) {
286 33f4bf26 2022-09-14 op 			if (clt_puts(clt, "<nav><ul>") == -1)
287 33f4bf26 2022-09-14 op 				return (-1);
288 33f4bf26 2022-09-14 op 			clt->clt_translate |= TR_NAV;
289 33f4bf26 2022-09-14 op 		}
290 33f4bf26 2022-09-14 op 
291 b9de0a74 2022-09-14 op 		if (clt_puts(clt, "<li><a href='") == -1 ||
292 b9de0a74 2022-09-14 op 		    printurl(clt, line) == -1 ||
293 b9de0a74 2022-09-14 op 		    clt_puts(clt, "'>") == -1 ||
294 b9de0a74 2022-09-14 op 		    htmlescape(clt, label) == -1 ||
295 b9de0a74 2022-09-14 op 		    clt_puts(clt, "</a></li>") == -1)
296 b9de0a74 2022-09-14 op 			return (-1);
297 b9de0a74 2022-09-14 op 
298 b9de0a74 2022-09-14 op 		return (0);
299 c9dc4bc6 2022-09-13 op 	}
300 c9dc4bc6 2022-09-13 op 
301 b9de0a74 2022-09-14 op 	if (clt->clt_translate & TR_NAV) {
302 b9de0a74 2022-09-14 op 		if (clt_puts(clt, "</ul></nav>") == -1)
303 b9de0a74 2022-09-14 op 			return (-1);
304 b9de0a74 2022-09-14 op 		clt->clt_translate &= ~TR_NAV;
305 b9de0a74 2022-09-14 op 	}
306 b9de0a74 2022-09-14 op 
307 c9dc4bc6 2022-09-13 op 	/* pre opening */
308 c9dc4bc6 2022-09-13 op 	if (!strncmp(line, "```", 3)) {
309 b9de0a74 2022-09-14 op 		clt->clt_translate |= TR_PRE;
310 c9dc4bc6 2022-09-13 op 		return (clt_puts(clt, "<pre>"));
311 c9dc4bc6 2022-09-13 op 	}
312 c9dc4bc6 2022-09-13 op 
313 c9dc4bc6 2022-09-13 op 	/* citation block */
314 c9dc4bc6 2022-09-13 op 	if (*line == '>') {
315 c9dc4bc6 2022-09-13 op 		if (clt_puts(clt, "<blockquote>") == -1 ||
316 c9dc4bc6 2022-09-13 op 		    htmlescape(clt, line + 1) == -1 ||
317 c9dc4bc6 2022-09-13 op 		    clt_puts(clt, "</blockquote>") == -1)
318 c9dc4bc6 2022-09-13 op 			return (-1);
319 c9dc4bc6 2022-09-13 op 		return (0);
320 c9dc4bc6 2022-09-13 op 	}
321 c9dc4bc6 2022-09-13 op 
322 c9dc4bc6 2022-09-13 op 	/* headings */
323 c9dc4bc6 2022-09-13 op 	if (!strncmp(line, "###", 3)) {
324 c9dc4bc6 2022-09-13 op 		if (clt_puts(clt, "<h3>") == -1 ||
325 c9dc4bc6 2022-09-13 op 		    htmlescape(clt, line + 3) == -1 ||
326 c9dc4bc6 2022-09-13 op 		    clt_puts(clt, "</h3>") == -1)
327 c9dc4bc6 2022-09-13 op 			return (-1);
328 c9dc4bc6 2022-09-13 op 		return (0);
329 c9dc4bc6 2022-09-13 op 	}
330 c9dc4bc6 2022-09-13 op 	if (!strncmp(line, "##", 2)) {
331 c9dc4bc6 2022-09-13 op 		if (clt_puts(clt, "<h2>") == -1 ||
332 c9dc4bc6 2022-09-13 op 		    htmlescape(clt, line + 2) == -1 ||
333 c9dc4bc6 2022-09-13 op 		    clt_puts(clt, "</h2>") == -1)
334 c9dc4bc6 2022-09-13 op 			return (-1);
335 c9dc4bc6 2022-09-13 op 		return (0);
336 b0a6bcf7 2022-09-13 op 	}
337 c9dc4bc6 2022-09-13 op 	if (!strncmp(line, "#", 1)) {
338 c9dc4bc6 2022-09-13 op 		if (clt_puts(clt, "<h1>") == -1 ||
339 c9dc4bc6 2022-09-13 op 		    htmlescape(clt, line + 1) == -1 ||
340 c9dc4bc6 2022-09-13 op 		    clt_puts(clt, "</h1>") == -1)
341 c9dc4bc6 2022-09-13 op 			return (-1);
342 c9dc4bc6 2022-09-13 op 		return (0);
343 c9dc4bc6 2022-09-13 op 	}
344 df5279ca 2022-09-14 op 
345 df5279ca 2022-09-14 op 	/* Not following strictly the gemini specification... */
346 df5279ca 2022-09-14 op 	if (*line == '\0')
347 df5279ca 2022-09-14 op 		return (0);
348 b0a6bcf7 2022-09-13 op 
349 c9dc4bc6 2022-09-13 op 	/* paragraph */
350 c9dc4bc6 2022-09-13 op 	if (clt_puts(clt, "<p>") == -1 ||
351 c9dc4bc6 2022-09-13 op 	    htmlescape(clt, line) == -1 ||
352 c9dc4bc6 2022-09-13 op 	    clt_puts(clt, "</p>") == -1)
353 c9dc4bc6 2022-09-13 op 		return (-1);
354 b9de0a74 2022-09-14 op 
355 b0a6bcf7 2022-09-13 op 	return (0);
356 b0a6bcf7 2022-09-13 op }
357 b0a6bcf7 2022-09-13 op 
358 c9dc4bc6 2022-09-13 op void
359 c9dc4bc6 2022-09-13 op proxy_translate_gemtext(struct client *clt)
360 c9dc4bc6 2022-09-13 op {
361 c9dc4bc6 2022-09-13 op 	struct bufferevent	*bev = clt->clt_bev;
362 c9dc4bc6 2022-09-13 op 	struct evbuffer		*src = EVBUFFER_INPUT(bev);
363 c9dc4bc6 2022-09-13 op 	char			*line;
364 c9dc4bc6 2022-09-13 op 	size_t			 len;
365 c9dc4bc6 2022-09-13 op 	int			 r;
366 c9dc4bc6 2022-09-13 op 
367 c9dc4bc6 2022-09-13 op 	for (;;) {
368 b9de0a74 2022-09-14 op 		line = evbuffer_readln(src, &len, EVBUFFER_EOL_CRLF);
369 c9dc4bc6 2022-09-13 op 		if (line == NULL)
370 c9dc4bc6 2022-09-13 op 			return;
371 c9dc4bc6 2022-09-13 op 
372 c9dc4bc6 2022-09-13 op 		r = gemtext_translate_line(clt, line);
373 c9dc4bc6 2022-09-13 op 		free(line);
374 c9dc4bc6 2022-09-13 op 		if (r == -1)
375 c9dc4bc6 2022-09-13 op 			return;
376 c9dc4bc6 2022-09-13 op 	}
377 c9dc4bc6 2022-09-13 op }
378 c9dc4bc6 2022-09-13 op 
379 b0a6bcf7 2022-09-13 op static struct proxy_config *
380 b0a6bcf7 2022-09-13 op proxy_server_match(struct galileo *env, struct client *clt)
381 b0a6bcf7 2022-09-13 op {
382 b0a6bcf7 2022-09-13 op 	struct server		*srv;
383 b0a6bcf7 2022-09-13 op 
384 b0a6bcf7 2022-09-13 op 	if (clt->clt_server_name == NULL)
385 b0a6bcf7 2022-09-13 op 		return NULL;
386 b0a6bcf7 2022-09-13 op 
387 b0a6bcf7 2022-09-13 op 	TAILQ_FOREACH(srv, &env->sc_servers, srv_entry) {
388 b0a6bcf7 2022-09-13 op 		if (!strcmp(clt->clt_server_name, srv->srv_conf.host))
389 b0a6bcf7 2022-09-13 op 			return &srv->srv_conf;
390 b0a6bcf7 2022-09-13 op 	}
391 b0a6bcf7 2022-09-13 op 
392 b0a6bcf7 2022-09-13 op 	return NULL;
393 b0a6bcf7 2022-09-13 op }
394 b0a6bcf7 2022-09-13 op 
395 b0a6bcf7 2022-09-13 op void
396 b0a6bcf7 2022-09-13 op proxy_start_request(struct galileo *env, struct client *clt)
397 b0a6bcf7 2022-09-13 op {
398 b0a6bcf7 2022-09-13 op 	struct addrinfo		 hints;
399 b0a6bcf7 2022-09-13 op 	struct asr_query	*query;
400 b0a6bcf7 2022-09-13 op 	char			 port[32];
401 b0a6bcf7 2022-09-13 op 
402 b0a6bcf7 2022-09-13 op 	if ((clt->clt_pc = proxy_server_match(env, clt)) == NULL) {
403 b0a6bcf7 2022-09-13 op 		if (clt_printf(clt, "Status: 501\r\n\r\n") == -1)
404 b0a6bcf7 2022-09-13 op 			return;
405 b0a6bcf7 2022-09-13 op 		fcgi_end_request(clt, 1);
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)snprintf(port, sizeof(port), "%d", clt->clt_pc->proxy_port);
410 b0a6bcf7 2022-09-13 op 
411 b0a6bcf7 2022-09-13 op 	memset(&hints, 0, sizeof(hints));
412 b0a6bcf7 2022-09-13 op 	hints.ai_family = AF_UNSPEC;
413 b0a6bcf7 2022-09-13 op 	hints.ai_socktype = SOCK_STREAM;
414 b0a6bcf7 2022-09-13 op 
415 b0a6bcf7 2022-09-13 op 	query = getaddrinfo_async(clt->clt_pc->proxy_addr, port, &hints, NULL);
416 b0a6bcf7 2022-09-13 op 	if (query == NULL) {
417 b0a6bcf7 2022-09-13 op 		log_warn("getaddrinfo_async");
418 b0a6bcf7 2022-09-13 op 		fcgi_abort_request(clt);
419 b0a6bcf7 2022-09-13 op 		return;
420 b0a6bcf7 2022-09-13 op 	}
421 b0a6bcf7 2022-09-13 op 
422 b0a6bcf7 2022-09-13 op 	clt->clt_evasr = event_asr_run(query, proxy_resolved, clt);
423 b0a6bcf7 2022-09-13 op 	if (clt->clt_evasr == NULL) {
424 b0a6bcf7 2022-09-13 op 		log_warn("event_asr_run");
425 b0a6bcf7 2022-09-13 op 		asr_abort(query);
426 b0a6bcf7 2022-09-13 op 		fcgi_abort_request(clt);
427 b0a6bcf7 2022-09-13 op 		return;
428 b0a6bcf7 2022-09-13 op 	}
429 b0a6bcf7 2022-09-13 op }
430 b0a6bcf7 2022-09-13 op 
431 b0a6bcf7 2022-09-13 op void
432 b0a6bcf7 2022-09-13 op proxy_resolved(struct asr_result *res, void *d)
433 b0a6bcf7 2022-09-13 op {
434 b0a6bcf7 2022-09-13 op 	struct client		*clt = d;
435 b0a6bcf7 2022-09-13 op 	struct proxy_config	*pc = clt->clt_pc;
436 b0a6bcf7 2022-09-13 op 
437 b0a6bcf7 2022-09-13 op 	clt->clt_evasr = NULL;
438 b0a6bcf7 2022-09-13 op 
439 b0a6bcf7 2022-09-13 op 	if (res->ar_gai_errno != 0) {
440 b0a6bcf7 2022-09-13 op 		log_warnx("failed to resolve %s:%d: %s",
441 b0a6bcf7 2022-09-13 op 		    pc->proxy_addr, pc->proxy_port,
442 b0a6bcf7 2022-09-13 op 		    gai_strerror(res->ar_gai_errno));
443 b0a6bcf7 2022-09-13 op 		if (clt_printf(clt, "Status: 501\r\n") == -1)
444 b0a6bcf7 2022-09-13 op 			return;
445 b0a6bcf7 2022-09-13 op 		if (clt_printf(clt, "Content-Type: text/plain\r\n") == -1)
446 b0a6bcf7 2022-09-13 op 			return;
447 b0a6bcf7 2022-09-13 op 		if (clt_printf(clt, "Proxy error; connection failed") == -1)
448 b0a6bcf7 2022-09-13 op 			return;
449 b0a6bcf7 2022-09-13 op 		fcgi_end_request(clt, 1);
450 b0a6bcf7 2022-09-13 op 		return;
451 b0a6bcf7 2022-09-13 op 	}
452 b0a6bcf7 2022-09-13 op 
453 b0a6bcf7 2022-09-13 op 	clt->clt_addrinfo = res->ar_addrinfo;
454 b0a6bcf7 2022-09-13 op 	clt->clt_p = clt->clt_addrinfo;
455 b0a6bcf7 2022-09-13 op 	proxy_connect(-1, 0, clt);
456 b0a6bcf7 2022-09-13 op }
457 b0a6bcf7 2022-09-13 op 
458 b0a6bcf7 2022-09-13 op void
459 b0a6bcf7 2022-09-13 op proxy_connect(int fd, short ev, void *d)
460 b0a6bcf7 2022-09-13 op {
461 b0a6bcf7 2022-09-13 op 	struct client		*clt = d;
462 b0a6bcf7 2022-09-13 op 	struct evbuffer		*out;
463 b0a6bcf7 2022-09-13 op 	struct addrinfo		*p;
464 b0a6bcf7 2022-09-13 op 	struct tls_config	*conf;
465 b0a6bcf7 2022-09-13 op 	struct timeval		 conntv = {5, 0};
466 b0a6bcf7 2022-09-13 op 	int			 err = 0;
467 b0a6bcf7 2022-09-13 op 	socklen_t		 len = sizeof(err);
468 b0a6bcf7 2022-09-13 op 
469 b0a6bcf7 2022-09-13 op again:
470 b0a6bcf7 2022-09-13 op 	if (clt->clt_p == NULL)
471 b0a6bcf7 2022-09-13 op 		goto err;
472 b0a6bcf7 2022-09-13 op 
473 b0a6bcf7 2022-09-13 op 	if (clt->clt_fd != -1) {
474 b0a6bcf7 2022-09-13 op 		if (getsockopt(clt->clt_fd, SOL_SOCKET, SO_ERROR, &err, &len)
475 b0a6bcf7 2022-09-13 op 		    == -1)
476 b0a6bcf7 2022-09-13 op 			goto err;
477 b0a6bcf7 2022-09-13 op 		if (err != 0) {
478 b0a6bcf7 2022-09-13 op 			errno = err;
479 b0a6bcf7 2022-09-13 op 			goto err;
480 b0a6bcf7 2022-09-13 op 		}
481 b0a6bcf7 2022-09-13 op 		goto done;
482 b0a6bcf7 2022-09-13 op 	}
483 b0a6bcf7 2022-09-13 op 
484 b0a6bcf7 2022-09-13 op 	p = clt->clt_p;
485 b0a6bcf7 2022-09-13 op 	clt->clt_fd = socket(p->ai_family, p->ai_socktype | SOCK_NONBLOCK,
486 b0a6bcf7 2022-09-13 op 	    p->ai_protocol);
487 b0a6bcf7 2022-09-13 op 	if (clt->clt_fd == -1) {
488 b0a6bcf7 2022-09-13 op 		clt->clt_p = clt->clt_p->ai_next;
489 b0a6bcf7 2022-09-13 op 		goto again;
490 b0a6bcf7 2022-09-13 op 	}
491 b0a6bcf7 2022-09-13 op 
492 b0a6bcf7 2022-09-13 op 	if (connect(clt->clt_fd, p->ai_addr, p->ai_addrlen) == 0)
493 b0a6bcf7 2022-09-13 op 		goto done;
494 b0a6bcf7 2022-09-13 op 
495 b0a6bcf7 2022-09-13 op 	clt->clt_evconn_live = 1;
496 b0a6bcf7 2022-09-13 op 	event_set(&clt->clt_evconn, clt->clt_fd, EV_WRITE, proxy_connect, clt);
497 b0a6bcf7 2022-09-13 op 	event_add(&clt->clt_evconn, &conntv);
498 b0a6bcf7 2022-09-13 op 	return;
499 b0a6bcf7 2022-09-13 op 
500 b0a6bcf7 2022-09-13 op done:
501 b0a6bcf7 2022-09-13 op 	clt->clt_evconn_live = 0;
502 b0a6bcf7 2022-09-13 op 	freeaddrinfo(clt->clt_addrinfo);
503 b0a6bcf7 2022-09-13 op 	clt->clt_addrinfo = clt->clt_p = NULL;
504 b0a6bcf7 2022-09-13 op 
505 b0a6bcf7 2022-09-13 op 	/* initialize TLS for Gemini */
506 b0a6bcf7 2022-09-13 op 	if ((conf = tls_config_new()) == NULL) {
507 b0a6bcf7 2022-09-13 op 		log_warn("tls_config_new failed");
508 b0a6bcf7 2022-09-13 op 		goto err;
509 b0a6bcf7 2022-09-13 op 	}
510 b0a6bcf7 2022-09-13 op 
511 b0a6bcf7 2022-09-13 op 	tls_config_insecure_noverifycert(conf);
512 b0a6bcf7 2022-09-13 op 
513 b0a6bcf7 2022-09-13 op 	if ((clt->clt_ctx = tls_client()) == NULL) {
514 b0a6bcf7 2022-09-13 op 		log_warnx("tls_client failed");
515 b0a6bcf7 2022-09-13 op 		tls_config_free(conf);
516 b0a6bcf7 2022-09-13 op 		goto err;
517 b0a6bcf7 2022-09-13 op 	}
518 b0a6bcf7 2022-09-13 op 
519 b0a6bcf7 2022-09-13 op 	if (tls_configure(clt->clt_ctx, conf) == -1) {
520 b0a6bcf7 2022-09-13 op 		log_warnx("tls_configure failed");
521 b0a6bcf7 2022-09-13 op 		tls_config_free(conf);
522 b0a6bcf7 2022-09-13 op 		goto err;
523 b0a6bcf7 2022-09-13 op 	}
524 b0a6bcf7 2022-09-13 op 
525 b0a6bcf7 2022-09-13 op 	tls_config_free(conf);
526 b0a6bcf7 2022-09-13 op 
527 b0a6bcf7 2022-09-13 op 	if (tls_connect_socket(clt->clt_ctx, clt->clt_fd,
528 b0a6bcf7 2022-09-13 op 	    clt->clt_pc->proxy_name) == -1) {
529 b0a6bcf7 2022-09-13 op 		log_warnx("tls_connect_socket failed");
530 b0a6bcf7 2022-09-13 op 		goto err;
531 b0a6bcf7 2022-09-13 op 	}
532 b0a6bcf7 2022-09-13 op 
533 b0a6bcf7 2022-09-13 op 	clt->clt_bev = bufferevent_new(clt->clt_fd, proxy_read, proxy_write,
534 b0a6bcf7 2022-09-13 op 	    proxy_error, clt);
535 b0a6bcf7 2022-09-13 op 	if (clt->clt_bev == NULL) {
536 b0a6bcf7 2022-09-13 op 		log_warn("bufferevent_new");
537 b0a6bcf7 2022-09-13 op 		goto err;
538 b0a6bcf7 2022-09-13 op 	}
539 b0a6bcf7 2022-09-13 op 	out = EVBUFFER_OUTPUT(clt->clt_bev);
540 b0a6bcf7 2022-09-13 op 
541 b0a6bcf7 2022-09-13 op 	event_set(&clt->clt_bev->ev_read, clt->clt_fd, EV_READ,
542 b0a6bcf7 2022-09-13 op 	    proxy_tls_readcb, clt->clt_bev);
543 b0a6bcf7 2022-09-13 op 	event_set(&clt->clt_bev->ev_write, clt->clt_fd, EV_WRITE,
544 b0a6bcf7 2022-09-13 op 	    proxy_tls_writecb, clt->clt_bev);
545 b0a6bcf7 2022-09-13 op 
546 b0a6bcf7 2022-09-13 op 	/* bufferevent_settimeout(); */
547 b0a6bcf7 2022-09-13 op 	bufferevent_enable(clt->clt_bev, EV_READ|EV_WRITE);
548 b0a6bcf7 2022-09-13 op 
549 b0a6bcf7 2022-09-13 op 	/* TODO: compute the URL */
550 ee80262d 2022-09-13 op 	if (evbuffer_add_printf(out, "gemini://%s/%s\r\n",
551 ee80262d 2022-09-13 op 	    clt->clt_pc->proxy_name, clt->clt_path_info) == -1) {
552 b0a6bcf7 2022-09-13 op 		log_warn("bufferevent_printf failed");
553 b0a6bcf7 2022-09-13 op 		goto err;
554 b0a6bcf7 2022-09-13 op 	}
555 b0a6bcf7 2022-09-13 op 
556 b0a6bcf7 2022-09-13 op 	return;
557 b0a6bcf7 2022-09-13 op 
558 b0a6bcf7 2022-09-13 op err:
559 b0a6bcf7 2022-09-13 op 	log_warn("failed to connect to %s:%d",
560 b0a6bcf7 2022-09-13 op 	    clt->clt_pc->proxy_addr, clt->clt_pc->proxy_port);
561 b0a6bcf7 2022-09-13 op 	if (clt_printf(clt, "Status: 501\r\n") == -1)
562 b0a6bcf7 2022-09-13 op 		return;
563 b0a6bcf7 2022-09-13 op 	if (clt_printf(clt, "Content-Type: text/plain\r\n") == -1)
564 b0a6bcf7 2022-09-13 op 		return;
565 b0a6bcf7 2022-09-13 op 	if (clt_printf(clt, "Proxy error; connection failed") == -1)
566 b0a6bcf7 2022-09-13 op 		return;
567 b0a6bcf7 2022-09-13 op 	fcgi_end_request(clt, 1);
568 6edd9a00 2022-09-14 op }
569 6edd9a00 2022-09-14 op 
570 6edd9a00 2022-09-14 op static inline int
571 6edd9a00 2022-09-14 op parse_mime(struct client *clt, char *mime, char *lang, size_t len)
572 6edd9a00 2022-09-14 op {
573 6edd9a00 2022-09-14 op 	char			*t, *semi;
574 6edd9a00 2022-09-14 op 
575 6edd9a00 2022-09-14 op 	if (strncmp(mime, "text/gemini", 11) != 0)
576 6edd9a00 2022-09-14 op 		return (0);
577 6edd9a00 2022-09-14 op 
578 6edd9a00 2022-09-14 op 	clt->clt_translate = TR_ENABLED;
579 6edd9a00 2022-09-14 op 
580 6edd9a00 2022-09-14 op 	if ((mime = strchr(mime, ';')) == NULL)
581 6edd9a00 2022-09-14 op 		return (0);
582 6edd9a00 2022-09-14 op 
583 6edd9a00 2022-09-14 op 	*mime++ = '\0';
584 6edd9a00 2022-09-14 op 	while ((t = strsep(&mime, ";")) != NULL) {
585 6edd9a00 2022-09-14 op 		if (!strncmp(t, "charset=", 8)) {
586 6edd9a00 2022-09-14 op 			t += 8;
587 6edd9a00 2022-09-14 op 			if (!strncasecmp(t, "utf8", 4) ||
588 6edd9a00 2022-09-14 op 			    !strncasecmp(t, "ascii", 5)) {
589 6edd9a00 2022-09-14 op 				log_debug("unknown charset %s", t);
590 6edd9a00 2022-09-14 op 				return (-1);
591 6edd9a00 2022-09-14 op 			}
592 6edd9a00 2022-09-14 op 			continue;
593 6edd9a00 2022-09-14 op 		}
594 6edd9a00 2022-09-14 op 
595 6edd9a00 2022-09-14 op 		if (!strncmp(t, "lang=", 5)) {
596 6edd9a00 2022-09-14 op 			t += 5;
597 6edd9a00 2022-09-14 op 			if ((semi = strchr(t, ';')) != NULL)
598 6edd9a00 2022-09-14 op 				*semi = '\0';
599 6edd9a00 2022-09-14 op 
600 6edd9a00 2022-09-14 op 			if (strlcpy(lang, t, len) >= len) {
601 6edd9a00 2022-09-14 op 				log_debug("lang too long: %s", t);
602 6edd9a00 2022-09-14 op 				*lang = '\0';
603 6edd9a00 2022-09-14 op 			}
604 6edd9a00 2022-09-14 op 
605 6edd9a00 2022-09-14 op 			if (semi)
606 6edd9a00 2022-09-14 op 				*semi = ';';
607 6edd9a00 2022-09-14 op 			continue;
608 6edd9a00 2022-09-14 op 		}
609 6edd9a00 2022-09-14 op 	}
610 6edd9a00 2022-09-14 op 
611 6edd9a00 2022-09-14 op 	return (0);
612 b0a6bcf7 2022-09-13 op }
613 b0a6bcf7 2022-09-13 op 
614 b0a6bcf7 2022-09-13 op void
615 b0a6bcf7 2022-09-13 op proxy_read(struct bufferevent *bev, void *d)
616 b0a6bcf7 2022-09-13 op {
617 b0a6bcf7 2022-09-13 op 	struct client		*clt = d;
618 fc1cb9ea 2022-09-14 op 	struct proxy_config	*pc = clt->clt_pc;
619 b0a6bcf7 2022-09-13 op 	struct evbuffer		*src = EVBUFFER_INPUT(bev);
620 c9dc4bc6 2022-09-13 op 	const char		*ctype;
621 6edd9a00 2022-09-14 op 	char			 lang[16];
622 6edd9a00 2022-09-14 op 	char			*hdr, *mime;
623 b0a6bcf7 2022-09-13 op 	size_t			 len;
624 b0a6bcf7 2022-09-13 op 
625 b0a6bcf7 2022-09-13 op 	if (clt->clt_headersdone) {
626 c9dc4bc6 2022-09-13 op 		if (clt->clt_translate)
627 c9dc4bc6 2022-09-13 op 			proxy_translate_gemtext(clt);
628 c9dc4bc6 2022-09-13 op 		else
629 c9dc4bc6 2022-09-13 op 			clt_write_bufferevent(clt, bev);
630 b0a6bcf7 2022-09-13 op 		return;
631 b0a6bcf7 2022-09-13 op 	}
632 b0a6bcf7 2022-09-13 op 
633 b0a6bcf7 2022-09-13 op 	hdr = evbuffer_readln(src, &len, EVBUFFER_EOL_CRLF_STRICT);
634 b0a6bcf7 2022-09-13 op 	if (hdr == NULL) {
635 b0a6bcf7 2022-09-13 op 		if (EVBUFFER_LENGTH(src) >= 1026)
636 b0a6bcf7 2022-09-13 op 			proxy_error(bev, EV_READ, clt);
637 b0a6bcf7 2022-09-13 op 		return;
638 b0a6bcf7 2022-09-13 op 	}
639 b0a6bcf7 2022-09-13 op 
640 b0a6bcf7 2022-09-13 op 	if (len < 4 ||
641 b0a6bcf7 2022-09-13 op 	    !isdigit((unsigned char)hdr[0]) ||
642 b0a6bcf7 2022-09-13 op 	    !isdigit((unsigned char)hdr[1]) ||
643 b0a6bcf7 2022-09-13 op 	    hdr[2] != ' ') {
644 b0a6bcf7 2022-09-13 op 		log_warnx("invalid ");
645 b0a6bcf7 2022-09-13 op 		proxy_error(bev, EV_READ, clt);
646 1337dc2b 2022-09-14 op 		goto err;
647 b0a6bcf7 2022-09-13 op 	}
648 b0a6bcf7 2022-09-13 op 
649 6e8f426e 2022-09-14 op 	switch (hdr[0]) {
650 6e8f426e 2022-09-14 op 	case '2':
651 6e8f426e 2022-09-14 op 		/* handled below */
652 6e8f426e 2022-09-14 op 		break;
653 6e8f426e 2022-09-14 op 	default:
654 6e8f426e 2022-09-14 op 		if (clt_puts(clt, "Status: 501\r\n") == -1)
655 1337dc2b 2022-09-14 op 			goto err;
656 6e8f426e 2022-09-14 op 		if (clt_puts(clt,
657 6e8f426e 2022-09-14 op 		    "Content-Type: text/plain;charset=utf8\r\n") == -1)
658 1337dc2b 2022-09-14 op 			goto err;
659 6e8f426e 2022-09-14 op 		if (clt_puts(clt, "\r\n") == -1)
660 1337dc2b 2022-09-14 op 			goto err;
661 6e8f426e 2022-09-14 op 		if (clt_printf(clt, "Request failed with code %c%c\n\n",
662 6e8f426e 2022-09-14 op 		    hdr[0], hdr[1]) == -1)
663 1337dc2b 2022-09-14 op 			goto err;
664 6e8f426e 2022-09-14 op 		if (clt_printf(clt, "The server says: %s\n", &hdr[3]) == -1)
665 1337dc2b 2022-09-14 op 			goto err;
666 6e8f426e 2022-09-14 op 		fcgi_end_request(clt, 1);
667 1337dc2b 2022-09-14 op 		goto err;
668 b0a6bcf7 2022-09-13 op 	}
669 b0a6bcf7 2022-09-13 op 
670 6edd9a00 2022-09-14 op 	mime = hdr + 2 + strspn(hdr + 2, " \t");
671 6edd9a00 2022-09-14 op 	if (parse_mime(clt, mime, lang, sizeof(lang)) == -1) {
672 6edd9a00 2022-09-14 op 		if (clt_puts(clt, "Status: 501\r\n") == -1)
673 1337dc2b 2022-09-14 op 			goto err;
674 6edd9a00 2022-09-14 op 		if (clt_puts(clt,
675 6edd9a00 2022-09-14 op 		    "Content-Type: text/plain;charset=utf8\r\n") == -1)
676 1337dc2b 2022-09-14 op 			goto err;
677 6edd9a00 2022-09-14 op 		if (clt_puts(clt, "\r\n") == -1)
678 1337dc2b 2022-09-14 op 			goto err;
679 6edd9a00 2022-09-14 op 		if (clt_printf(clt, "Failed to parse the Gemini response\n")
680 6edd9a00 2022-09-14 op 		    == -1)
681 6edd9a00 2022-09-14 op 		fcgi_end_request(clt, 1);
682 1337dc2b 2022-09-14 op 		goto err;
683 6edd9a00 2022-09-14 op 	}
684 6edd9a00 2022-09-14 op 
685 6edd9a00 2022-09-14 op 	if (clt->clt_translate)
686 6edd9a00 2022-09-14 op 		ctype = "text/html;charset=utf8";
687 6edd9a00 2022-09-14 op 	else
688 6edd9a00 2022-09-14 op 		ctype = mime;
689 6edd9a00 2022-09-14 op 
690 6edd9a00 2022-09-14 op 	if (clt_printf(clt, "Content-Type: %s\r\n\r\n", ctype) == -1)
691 1337dc2b 2022-09-14 op 		goto err;
692 b0a6bcf7 2022-09-13 op 
693 b0a6bcf7 2022-09-13 op 	clt->clt_headersdone = 1;
694 c9dc4bc6 2022-09-13 op 
695 c9dc4bc6 2022-09-13 op 	if (clt->clt_translate) {
696 6edd9a00 2022-09-14 op 		if (clt_puts(clt, "<!doctype html><html") == -1)
697 1337dc2b 2022-09-14 op 			goto err;
698 6edd9a00 2022-09-14 op 		if (*lang != '\0') {
699 6edd9a00 2022-09-14 op 			if (clt_puts(clt, " lang='") == -1 ||
700 6edd9a00 2022-09-14 op 			    printurl(clt, lang) == -1 ||
701 6edd9a00 2022-09-14 op 			    clt_puts(clt, "'") == -1)
702 1337dc2b 2022-09-14 op 				goto err;
703 6edd9a00 2022-09-14 op 		}
704 6edd9a00 2022-09-14 op 		if (clt_puts(clt, "><head>") == -1)
705 1337dc2b 2022-09-14 op 			goto err;
706 fc1cb9ea 2022-09-14 op 		if (*pc->stylesheet != '\0' &&
707 fc1cb9ea 2022-09-14 op 		    clt_printf(clt, "<link rel='stylesheet' href='%s' />",
708 fc1cb9ea 2022-09-14 op 		    pc->stylesheet) == -1)
709 1337dc2b 2022-09-14 op 			goto err;
710 fc1cb9ea 2022-09-14 op 		if (clt_puts(clt, "</head><body>") == -1)
711 1337dc2b 2022-09-14 op 			goto err;
712 c9dc4bc6 2022-09-13 op 	}
713 c9dc4bc6 2022-09-13 op 
714 1337dc2b 2022-09-14 op 	/*
715 1337dc2b 2022-09-14 op 	 * Trigger the read again so we proceed with the response
716 1337dc2b 2022-09-14 op 	 * body, if any.
717 1337dc2b 2022-09-14 op 	 */
718 1337dc2b 2022-09-14 op 	free(hdr);
719 1337dc2b 2022-09-14 op 	proxy_read(bev, d);
720 1337dc2b 2022-09-14 op 	return;
721 1337dc2b 2022-09-14 op 
722 1337dc2b 2022-09-14 op err:
723 1337dc2b 2022-09-14 op 	free(hdr);
724 b0a6bcf7 2022-09-13 op }
725 b0a6bcf7 2022-09-13 op 
726 b0a6bcf7 2022-09-13 op void
727 b0a6bcf7 2022-09-13 op proxy_write(struct bufferevent *bev, void *d)
728 b0a6bcf7 2022-09-13 op {
729 b0a6bcf7 2022-09-13 op 	return;
730 b0a6bcf7 2022-09-13 op }
731 b0a6bcf7 2022-09-13 op 
732 b0a6bcf7 2022-09-13 op void
733 b0a6bcf7 2022-09-13 op proxy_error(struct bufferevent *bev, short err, void *d)
734 b0a6bcf7 2022-09-13 op {
735 b0a6bcf7 2022-09-13 op 	struct client		*clt = d;
736 b0a6bcf7 2022-09-13 op 	int			 status = !(err & EVBUFFER_EOF);
737 b0a6bcf7 2022-09-13 op 
738 b0a6bcf7 2022-09-13 op 	log_debug("proxy error, shutting down the connection (err: %x)",
739 b0a6bcf7 2022-09-13 op 	    err);
740 b0a6bcf7 2022-09-13 op 
741 b0a6bcf7 2022-09-13 op 	if (!clt->clt_headersdone) {
742 b0a6bcf7 2022-09-13 op 		if (clt_printf(clt, "Status: 501\r\n") == -1)
743 b0a6bcf7 2022-09-13 op 			return;
744 b0a6bcf7 2022-09-13 op 		if (clt_printf(clt, "Content-Type: text/plain\r\n") == -1)
745 b0a6bcf7 2022-09-13 op 			return;
746 b0a6bcf7 2022-09-13 op 		if (clt_printf(clt, "Proxy error\n") == -1)
747 b0a6bcf7 2022-09-13 op 			return;
748 c9dc4bc6 2022-09-13 op 	} else if (status == 0) {
749 8fa3006a 2022-09-14 op 		if (clt_puts(clt, "<footer>") == -1 ||
750 8fa3006a 2022-09-14 op 		    clt_puts(clt, "<hr />") == -1 ||
751 8fa3006a 2022-09-14 op 		    clt_puts(clt, "<dl>") == -1 ||
752 8fa3006a 2022-09-14 op 		    clt_puts(clt, "<dt>Original URL:</dt>") == -1 ||
753 8fa3006a 2022-09-14 op 		    clt_puts(clt, "<dd><a href='gemini://") == -1 ||
754 8fa3006a 2022-09-14 op 		    printurl(clt, clt->clt_pc->proxy_name) == -1 ||
755 8fa3006a 2022-09-14 op 		    printurl(clt, clt->clt_path_info) == -1 ||
756 8fa3006a 2022-09-14 op 		    clt_puts(clt, "'>gemini://") == -1 ||
757 8fa3006a 2022-09-14 op 		    htmlescape(clt, clt->clt_pc->proxy_name) == -1 ||
758 8fa3006a 2022-09-14 op 		    htmlescape(clt, clt->clt_path_info) == -1 ||
759 8fa3006a 2022-09-14 op 		    clt_puts(clt, "</a></dd>") == -1 ||
760 8fa3006a 2022-09-14 op 		    clt_puts(clt, "</footer>") == -1)
761 8fa3006a 2022-09-14 op 			return;
762 c9dc4bc6 2022-09-13 op 		if (clt_puts(clt, "</body></html>") == -1)
763 c9dc4bc6 2022-09-13 op 			return;
764 b0a6bcf7 2022-09-13 op 	}
765 b0a6bcf7 2022-09-13 op 
766 b0a6bcf7 2022-09-13 op 	fcgi_end_request(clt, status);
767 b0a6bcf7 2022-09-13 op }
768 b0a6bcf7 2022-09-13 op 
769 b0a6bcf7 2022-09-13 op void
770 b0a6bcf7 2022-09-13 op proxy_tls_readcb(int fd, short event, void *arg)
771 b0a6bcf7 2022-09-13 op {
772 b0a6bcf7 2022-09-13 op 	struct bufferevent	*bufev = arg;
773 b0a6bcf7 2022-09-13 op 	struct client		*clt = bufev->cbarg;
774 b0a6bcf7 2022-09-13 op 	char			 rbuf[IBUF_READ_SIZE];
775 b0a6bcf7 2022-09-13 op 	int			 what = EVBUFFER_READ;
776 b0a6bcf7 2022-09-13 op 	int			 howmuch = IBUF_READ_SIZE;
777 b0a6bcf7 2022-09-13 op 	ssize_t			 ret;
778 b0a6bcf7 2022-09-13 op 	size_t			 len;
779 b0a6bcf7 2022-09-13 op 
780 b0a6bcf7 2022-09-13 op 	if (event == EV_TIMEOUT) {
781 b0a6bcf7 2022-09-13 op 		what |= EVBUFFER_TIMEOUT;
782 b0a6bcf7 2022-09-13 op 		goto err;
783 b0a6bcf7 2022-09-13 op 	}
784 b0a6bcf7 2022-09-13 op 
785 b0a6bcf7 2022-09-13 op 	if (bufev->wm_read.high != 0)
786 b0a6bcf7 2022-09-13 op 		howmuch = MINIMUM(sizeof(rbuf), bufev->wm_read.high);
787 b0a6bcf7 2022-09-13 op 
788 b0a6bcf7 2022-09-13 op 	ret = tls_read(clt->clt_ctx, rbuf, howmuch);
789 b0a6bcf7 2022-09-13 op 	if (ret == TLS_WANT_POLLIN || ret == TLS_WANT_POLLOUT) {
790 b0a6bcf7 2022-09-13 op 		goto retry;
791 b0a6bcf7 2022-09-13 op 	} else if (ret == -1) {
792 b0a6bcf7 2022-09-13 op 		what |= EVBUFFER_ERROR;
793 b0a6bcf7 2022-09-13 op 		goto err;
794 b0a6bcf7 2022-09-13 op 	}
795 b0a6bcf7 2022-09-13 op 	len = ret;
796 b0a6bcf7 2022-09-13 op 
797 b0a6bcf7 2022-09-13 op 	if (len == 0) {
798 b0a6bcf7 2022-09-13 op 		what |= EVBUFFER_EOF;
799 b0a6bcf7 2022-09-13 op 		goto err;
800 b0a6bcf7 2022-09-13 op 	}
801 b0a6bcf7 2022-09-13 op 
802 b0a6bcf7 2022-09-13 op 	if (evbuffer_add(bufev->input, rbuf, len) == -1) {
803 b0a6bcf7 2022-09-13 op 		what |= EVBUFFER_ERROR;
804 b0a6bcf7 2022-09-13 op 		goto err;
805 b0a6bcf7 2022-09-13 op 	}
806 b0a6bcf7 2022-09-13 op 
807 b0a6bcf7 2022-09-13 op 	proxy_bufferevent_add(&bufev->ev_read, bufev->timeout_read);
808 b0a6bcf7 2022-09-13 op 
809 b0a6bcf7 2022-09-13 op 	len = EVBUFFER_LENGTH(bufev->input);
810 b0a6bcf7 2022-09-13 op 	if (bufev->wm_read.low != 0 && len < bufev->wm_read.low)
811 b0a6bcf7 2022-09-13 op 		return;
812 b0a6bcf7 2022-09-13 op 	if (bufev->wm_read.high != 0 && len > bufev->wm_read.high) {
813 b0a6bcf7 2022-09-13 op 		struct evbuffer *buf = bufev->input;
814 b0a6bcf7 2022-09-13 op 		event_del(&bufev->ev_read);
815 b0a6bcf7 2022-09-13 op 		evbuffer_setcb(buf, bufferevent_read_pressure_cb, bufev);
816 b0a6bcf7 2022-09-13 op 		return;
817 b0a6bcf7 2022-09-13 op 	}
818 b0a6bcf7 2022-09-13 op 
819 b0a6bcf7 2022-09-13 op 	if (bufev->readcb != NULL)
820 b0a6bcf7 2022-09-13 op 		(*bufev->readcb)(bufev, bufev->cbarg);
821 b0a6bcf7 2022-09-13 op 	return;
822 b0a6bcf7 2022-09-13 op 
823 b0a6bcf7 2022-09-13 op retry:
824 b0a6bcf7 2022-09-13 op 	proxy_bufferevent_add(&bufev->ev_read, bufev->timeout_read);
825 b0a6bcf7 2022-09-13 op 	return;
826 b0a6bcf7 2022-09-13 op 
827 b0a6bcf7 2022-09-13 op err:
828 b0a6bcf7 2022-09-13 op 	(*bufev->errorcb)(bufev, what, bufev->cbarg);
829 b0a6bcf7 2022-09-13 op }
830 b0a6bcf7 2022-09-13 op 
831 b0a6bcf7 2022-09-13 op int
832 b0a6bcf7 2022-09-13 op proxy_bufferevent_add(struct event *ev, int timeout)
833 b0a6bcf7 2022-09-13 op {
834 b0a6bcf7 2022-09-13 op 	struct timeval tv, *ptv = NULL;
835 b0a6bcf7 2022-09-13 op 
836 b0a6bcf7 2022-09-13 op 	if (timeout) {
837 b0a6bcf7 2022-09-13 op 		timerclear(&tv);
838 b0a6bcf7 2022-09-13 op 		tv.tv_sec = timeout;
839 b0a6bcf7 2022-09-13 op 		ptv = &tv;
840 b0a6bcf7 2022-09-13 op 	}
841 b0a6bcf7 2022-09-13 op 
842 b0a6bcf7 2022-09-13 op 	return (event_add(ev, ptv));
843 b0a6bcf7 2022-09-13 op }
844 b0a6bcf7 2022-09-13 op 
845 b0a6bcf7 2022-09-13 op void
846 b0a6bcf7 2022-09-13 op proxy_tls_writecb(int fd, short event, void *arg)
847 b0a6bcf7 2022-09-13 op {
848 b0a6bcf7 2022-09-13 op 	struct bufferevent	*bufev = arg;
849 b0a6bcf7 2022-09-13 op 	struct client		*clt = bufev->cbarg;
850 b0a6bcf7 2022-09-13 op 	ssize_t			 ret;
851 b0a6bcf7 2022-09-13 op 	short			 what = EVBUFFER_WRITE;
852 b0a6bcf7 2022-09-13 op 	size_t			 len;
853 b0a6bcf7 2022-09-13 op 
854 b0a6bcf7 2022-09-13 op 	if (event == EV_TIMEOUT) {
855 b0a6bcf7 2022-09-13 op 		what |= EVBUFFER_TIMEOUT;
856 b0a6bcf7 2022-09-13 op 		goto err;
857 b0a6bcf7 2022-09-13 op 	}
858 b0a6bcf7 2022-09-13 op 
859 b0a6bcf7 2022-09-13 op 	if (EVBUFFER_LENGTH(bufev->output)) {
860 b0a6bcf7 2022-09-13 op 		ret = tls_write(clt->clt_ctx,
861 b0a6bcf7 2022-09-13 op 		    EVBUFFER_DATA(bufev->output),
862 b0a6bcf7 2022-09-13 op 		    EVBUFFER_LENGTH(bufev->output));
863 b0a6bcf7 2022-09-13 op 		if (ret == TLS_WANT_POLLIN || ret == TLS_WANT_POLLOUT) {
864 b0a6bcf7 2022-09-13 op 			goto retry;
865 b0a6bcf7 2022-09-13 op 		} else if (ret == -1) {
866 b0a6bcf7 2022-09-13 op 			what |= EVBUFFER_ERROR;
867 b0a6bcf7 2022-09-13 op 			goto err;
868 b0a6bcf7 2022-09-13 op 		}
869 b0a6bcf7 2022-09-13 op 		len = ret;
870 b0a6bcf7 2022-09-13 op 		evbuffer_drain(bufev->output, len);
871 b0a6bcf7 2022-09-13 op 	}
872 b0a6bcf7 2022-09-13 op 
873 b0a6bcf7 2022-09-13 op 	if (EVBUFFER_LENGTH(bufev->output) != 0)
874 b0a6bcf7 2022-09-13 op 		proxy_bufferevent_add(&bufev->ev_write, bufev->timeout_write);
875 b0a6bcf7 2022-09-13 op 
876 b0a6bcf7 2022-09-13 op 	if (bufev->writecb != NULL &&
877 b0a6bcf7 2022-09-13 op 	    EVBUFFER_LENGTH(bufev->output) <= bufev->wm_write.low)
878 b0a6bcf7 2022-09-13 op 		(*bufev->writecb)(bufev, bufev->cbarg);
879 b0a6bcf7 2022-09-13 op 	return;
880 b0a6bcf7 2022-09-13 op 
881 b0a6bcf7 2022-09-13 op retry:
882 b0a6bcf7 2022-09-13 op 	proxy_bufferevent_add(&bufev->ev_write, bufev->timeout_write);
883 b0a6bcf7 2022-09-13 op 	return;
884 b0a6bcf7 2022-09-13 op 
885 b0a6bcf7 2022-09-13 op err:
886 b0a6bcf7 2022-09-13 op 	(*bufev->errorcb)(bufev, what, bufev->cbarg);
887 b0a6bcf7 2022-09-13 op }
888 b0a6bcf7 2022-09-13 op 
889 b0a6bcf7 2022-09-13 op void
890 b0a6bcf7 2022-09-13 op proxy_client_free(struct client *clt)
891 b0a6bcf7 2022-09-13 op {
892 b0a6bcf7 2022-09-13 op 	if (clt->clt_evasr)
893 b0a6bcf7 2022-09-13 op 		event_asr_abort(clt->clt_evasr);
894 b0a6bcf7 2022-09-13 op 
895 b0a6bcf7 2022-09-13 op 	if (clt->clt_addrinfo)
896 b0a6bcf7 2022-09-13 op 		freeaddrinfo(clt->clt_addrinfo);
897 b0a6bcf7 2022-09-13 op 
898 b0a6bcf7 2022-09-13 op 	if (clt->clt_evconn_live)
899 b0a6bcf7 2022-09-13 op 		event_del(&clt->clt_evconn);
900 b0a6bcf7 2022-09-13 op 
901 b0a6bcf7 2022-09-13 op 	if (clt->clt_fd != -1)
902 b0a6bcf7 2022-09-13 op 		close(clt->clt_fd);
903 b0a6bcf7 2022-09-13 op 
904 b0a6bcf7 2022-09-13 op 	if (clt->clt_ctx)
905 b0a6bcf7 2022-09-13 op 		tls_free(clt->clt_ctx);
906 b0a6bcf7 2022-09-13 op 
907 b0a6bcf7 2022-09-13 op 	if (clt->clt_bev)
908 b0a6bcf7 2022-09-13 op 		bufferevent_free(clt->clt_bev);
909 b0a6bcf7 2022-09-13 op 
910 b0a6bcf7 2022-09-13 op 	free(clt->clt_server_name);
911 b0a6bcf7 2022-09-13 op 	free(clt->clt_script_name);
912 b0a6bcf7 2022-09-13 op 	free(clt->clt_path_info);
913 b0a6bcf7 2022-09-13 op 	free(clt);
914 b0a6bcf7 2022-09-13 op }