1 5e11c00c 2021-03-02 op /*
  2 5e11c00c 2021-03-02 op  * Copyright (c) 2021 Omar Polo <op@omarpolo.com>
  3 5e11c00c 2021-03-02 op  *
  4 5e11c00c 2021-03-02 op  * Permission to use, copy, modify, and distribute this software for any
  5 5e11c00c 2021-03-02 op  * purpose with or without fee is hereby granted, provided that the above
  6 5e11c00c 2021-03-02 op  * copyright notice and this permission notice appear in all copies.
  7 5e11c00c 2021-03-02 op  *
  8 5e11c00c 2021-03-02 op  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
  9 5e11c00c 2021-03-02 op  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 10 5e11c00c 2021-03-02 op  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 11 5e11c00c 2021-03-02 op  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 12 5e11c00c 2021-03-02 op  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 13 5e11c00c 2021-03-02 op  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 14 5e11c00c 2021-03-02 op  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 15 5e11c00c 2021-03-02 op  */
 16 5e11c00c 2021-03-02 op 
 17 5e11c00c 2021-03-02 op /*
 18 5e11c00c 2021-03-02 op  * TODO:
 19 5e11c00c 2021-03-02 op  *  - move the various
 20 5e11c00c 2021-03-02 op  *	imsg_compose(...);
 21 5e11c00c 2021-03-02 op  *	imsg_flush(...);
 22 5e11c00c 2021-03-02 op  *    to something more asynchronous
 23 5e11c00c 2021-03-02 op  */
 24 5e11c00c 2021-03-02 op 
 25 5e11c00c 2021-03-02 op #include <telescope.h>
 26 5e11c00c 2021-03-02 op 
 27 5e11c00c 2021-03-02 op #include <sys/types.h>
 28 5e11c00c 2021-03-02 op #include <sys/socket.h>
 29 5e11c00c 2021-03-02 op 
 30 5e11c00c 2021-03-02 op #include <netinet/in.h>
 31 5e11c00c 2021-03-02 op 
 32 5e11c00c 2021-03-02 op #include <assert.h>
 33 5e11c00c 2021-03-02 op #include <ctype.h>
 34 5e11c00c 2021-03-02 op #include <errno.h>
 35 5e11c00c 2021-03-02 op #include <event.h>
 36 5e11c00c 2021-03-02 op #include <netdb.h>
 37 5e11c00c 2021-03-02 op #include <stdarg.h>
 38 5e11c00c 2021-03-02 op #include <stdio.h>
 39 5e11c00c 2021-03-02 op #include <stdlib.h>
 40 5e11c00c 2021-03-02 op #include <string.h>
 41 5e11c00c 2021-03-02 op #include <tls.h>
 42 5e11c00c 2021-03-02 op #include <unistd.h>
 43 5e11c00c 2021-03-02 op 
 44 5e11c00c 2021-03-02 op static struct tls_config	*tlsconf;
 45 5e11c00c 2021-03-02 op static struct imsgbuf		*ibuf;
 46 5e11c00c 2021-03-02 op 
 47 5e11c00c 2021-03-02 op struct req;
 48 5e11c00c 2021-03-02 op 
 49 5e11c00c 2021-03-02 op static void		 die(void) __attribute__((__noreturn__));
 50 5e11c00c 2021-03-02 op static char		*xasprintf(const char*, ...);
 51 5e11c00c 2021-03-02 op static int 		 conn_towards(struct url*, char**);
 52 5e11c00c 2021-03-02 op 
 53 5e11c00c 2021-03-02 op static void		 close_with_err(struct req*, const char *err);
 54 5e11c00c 2021-03-02 op static struct req	*req_by_id(uint32_t);
 55 5e11c00c 2021-03-02 op 
 56 5e11c00c 2021-03-02 op static void		 do_handshake(int, short, void*);
 57 5e11c00c 2021-03-02 op static void		 write_request(int, short, void*);
 58 5e11c00c 2021-03-02 op static void		 read_reply(int, short, void*);
 59 5e11c00c 2021-03-02 op static void		 parse_reply(struct req*);
 60 5e11c00c 2021-03-02 op static void		 copy_body(int, short, void*);
 61 5e11c00c 2021-03-02 op 
 62 5e11c00c 2021-03-02 op static void		 check_special_page(struct req*, const char*);
 63 5e11c00c 2021-03-02 op 
 64 5e11c00c 2021-03-02 op static void		 handle_get(struct imsg*, size_t);
 65 5e11c00c 2021-03-02 op static void		 handle_cert_status(struct imsg*, size_t);
 66 5e11c00c 2021-03-02 op static void		 handle_stop(struct imsg*, size_t);
 67 5e11c00c 2021-03-02 op static void		 handle_quit(struct imsg*, size_t);
 68 5e11c00c 2021-03-02 op 
 69 5e11c00c 2021-03-02 op static imsg_handlerfn *handlers[] = {
 70 5e11c00c 2021-03-02 op 	[IMSG_GET] = handle_get,
 71 5e11c00c 2021-03-02 op 	[IMSG_CERT_STATUS] = handle_cert_status,
 72 5e11c00c 2021-03-02 op 	[IMSG_STOP] = handle_stop,
 73 5e11c00c 2021-03-02 op 	[IMSG_QUIT] = handle_quit,
 74 5e11c00c 2021-03-02 op };
 75 5e11c00c 2021-03-02 op 
 76 5e11c00c 2021-03-02 op typedef void (*statefn)(int, short, void*);
 77 5e11c00c 2021-03-02 op 
 78 5e11c00c 2021-03-02 op TAILQ_HEAD(, req) reqhead;
 79 5e11c00c 2021-03-02 op /* a pending request */
 80 5e11c00c 2021-03-02 op struct req {
 81 5e11c00c 2021-03-02 op 	struct event		 ev;
 82 5e11c00c 2021-03-02 op 	struct url		 url;
 83 5e11c00c 2021-03-02 op 	uint32_t		 id;
 84 5e11c00c 2021-03-02 op 	int			 fd;
 85 5e11c00c 2021-03-02 op 	struct tls		*ctx;
 86 5e11c00c 2021-03-02 op 	char			 buf[1024];
 87 5e11c00c 2021-03-02 op 	size_t			 off;
 88 5e11c00c 2021-03-02 op 	TAILQ_ENTRY(req)	 reqs;
 89 5e11c00c 2021-03-02 op };
 90 5e11c00c 2021-03-02 op 
 91 5e11c00c 2021-03-02 op static inline void
 92 5e11c00c 2021-03-02 op yield_r(struct req *req, statefn fn, struct timeval *tv)
 93 5e11c00c 2021-03-02 op {
 94 5e11c00c 2021-03-02 op 	event_once(req->fd, EV_READ, fn, req, tv);
 95 5e11c00c 2021-03-02 op }
 96 5e11c00c 2021-03-02 op 
 97 5e11c00c 2021-03-02 op static inline void
 98 5e11c00c 2021-03-02 op yield_w(struct req *req, statefn fn, struct timeval *tv)
 99 5e11c00c 2021-03-02 op {
100 5e11c00c 2021-03-02 op 	event_once(req->fd, EV_WRITE, fn, req, tv);
101 5e11c00c 2021-03-02 op }
102 5e11c00c 2021-03-02 op 
103 5e11c00c 2021-03-02 op static inline void
104 5e11c00c 2021-03-02 op advance_buf(struct req *req, size_t len)
105 5e11c00c 2021-03-02 op {
106 5e11c00c 2021-03-02 op 	assert(len <= req->off);
107 5e11c00c 2021-03-02 op 
108 5e11c00c 2021-03-02 op 	req->off -= len;
109 5e11c00c 2021-03-02 op 	memmove(req->buf, req->buf + len, req->off);
110 5e11c00c 2021-03-02 op }
111 5e11c00c 2021-03-02 op 
112 5e11c00c 2021-03-02 op static void __attribute__((__noreturn__))
113 5e11c00c 2021-03-02 op die(void)
114 5e11c00c 2021-03-02 op {
115 5e11c00c 2021-03-02 op 	abort(); 		/* TODO */
116 5e11c00c 2021-03-02 op }
117 5e11c00c 2021-03-02 op 
118 5e11c00c 2021-03-02 op static char *
119 5e11c00c 2021-03-02 op xasprintf(const char *fmt, ...)
120 5e11c00c 2021-03-02 op {
121 5e11c00c 2021-03-02 op 	va_list ap;
122 5e11c00c 2021-03-02 op 	char *s;
123 5e11c00c 2021-03-02 op 
124 5e11c00c 2021-03-02 op 	va_start(ap, fmt);
125 5e11c00c 2021-03-02 op 	if (vasprintf(&s, fmt, ap) == -1)
126 5e11c00c 2021-03-02 op 		s = NULL;
127 5e11c00c 2021-03-02 op 	va_end(ap);
128 5e11c00c 2021-03-02 op 
129 5e11c00c 2021-03-02 op 	return s;
130 5e11c00c 2021-03-02 op }
131 5e11c00c 2021-03-02 op 
132 5e11c00c 2021-03-02 op static int
133 5e11c00c 2021-03-02 op conn_towards(struct url *url, char **err)
134 5e11c00c 2021-03-02 op {
135 5e11c00c 2021-03-02 op 	struct addrinfo	 hints, *servinfo, *p;
136 5e11c00c 2021-03-02 op 	int		 status, sock;
137 5e11c00c 2021-03-02 op 	const char	*proto = "1965";
138 5e11c00c 2021-03-02 op 
139 5e11c00c 2021-03-02 op 	*err = NULL;
140 5e11c00c 2021-03-02 op 
141 5e11c00c 2021-03-02 op 	if (*url->port != '\0')
142 5e11c00c 2021-03-02 op 		proto = url->port;
143 5e11c00c 2021-03-02 op 
144 5e11c00c 2021-03-02 op 	memset(&hints, 0, sizeof(hints));
145 5e11c00c 2021-03-02 op 	hints.ai_family = AF_UNSPEC;
146 5e11c00c 2021-03-02 op 	hints.ai_socktype = SOCK_STREAM;
147 5e11c00c 2021-03-02 op 
148 5e11c00c 2021-03-02 op 	if ((status = getaddrinfo(url->host, proto, &hints, &servinfo))) {
149 5e11c00c 2021-03-02 op 		*err = xasprintf("failed to resolve %s: %s",
150 5e11c00c 2021-03-02 op 		    url->host, gai_strerror(status));
151 5e11c00c 2021-03-02 op 		return -1;
152 5e11c00c 2021-03-02 op 	}
153 5e11c00c 2021-03-02 op 
154 5e11c00c 2021-03-02 op 	sock = -1;
155 5e11c00c 2021-03-02 op 	for (p = servinfo; p != NULL; p = p->ai_next) {
156 5e11c00c 2021-03-02 op 		if ((sock = socket(p->ai_family, p->ai_socktype, p->ai_protocol)) == -1)
157 5e11c00c 2021-03-02 op 			continue;
158 5e11c00c 2021-03-02 op 		if (connect(sock, p->ai_addr, p->ai_addrlen) != -1)
159 5e11c00c 2021-03-02 op 			break;
160 5e11c00c 2021-03-02 op 		close(sock);
161 5e11c00c 2021-03-02 op 	}
162 5e11c00c 2021-03-02 op 
163 5e11c00c 2021-03-02 op 	if (sock == -1)
164 5e11c00c 2021-03-02 op 		*err = xasprintf("couldn't connect to %s", url->host);
165 5e11c00c 2021-03-02 op 	else
166 5e11c00c 2021-03-02 op 		mark_nonblock(sock);
167 5e11c00c 2021-03-02 op 
168 5e11c00c 2021-03-02 op 	freeaddrinfo(servinfo);
169 5e11c00c 2021-03-02 op 	return sock;
170 5e11c00c 2021-03-02 op }
171 5e11c00c 2021-03-02 op 
172 5e11c00c 2021-03-02 op static struct req *
173 5e11c00c 2021-03-02 op req_by_id(uint32_t id)
174 5e11c00c 2021-03-02 op {
175 5e11c00c 2021-03-02 op 	struct req *r;
176 5e11c00c 2021-03-02 op 
177 5e11c00c 2021-03-02 op 	TAILQ_FOREACH(r, &reqhead, reqs) {
178 5e11c00c 2021-03-02 op 		if (r->id == id)
179 5e11c00c 2021-03-02 op 			return r;
180 5e11c00c 2021-03-02 op 	}
181 5e11c00c 2021-03-02 op 
182 5e11c00c 2021-03-02 op 	die();
183 5e11c00c 2021-03-02 op }
184 5e11c00c 2021-03-02 op 
185 5e11c00c 2021-03-02 op static void
186 5e11c00c 2021-03-02 op close_conn(int fd, short ev, void *d)
187 5e11c00c 2021-03-02 op {
188 5e11c00c 2021-03-02 op 	struct req	*req = d;
189 5e11c00c 2021-03-02 op 
190 5e11c00c 2021-03-02 op 	if (req->ctx != NULL) {
191 5e11c00c 2021-03-02 op 		switch (tls_close(req->ctx)) {
192 5e11c00c 2021-03-02 op 		case TLS_WANT_POLLIN:
193 5e11c00c 2021-03-02 op 			yield_r(req, close_conn, NULL);
194 5e11c00c 2021-03-02 op 			return;
195 5e11c00c 2021-03-02 op 		case TLS_WANT_POLLOUT:
196 5e11c00c 2021-03-02 op 			yield_w(req, close_conn, NULL);
197 5e11c00c 2021-03-02 op 			return;
198 5e11c00c 2021-03-02 op 		}
199 5e11c00c 2021-03-02 op 
200 5e11c00c 2021-03-02 op 		tls_free(req->ctx);
201 5e11c00c 2021-03-02 op 	}
202 5e11c00c 2021-03-02 op 
203 5e11c00c 2021-03-02 op 	TAILQ_REMOVE(&reqhead, req, reqs);
204 5e11c00c 2021-03-02 op 	if (req->fd != -1)
205 5e11c00c 2021-03-02 op 		close(req->fd);
206 5e11c00c 2021-03-02 op 	free(req);
207 5e11c00c 2021-03-02 op }
208 5e11c00c 2021-03-02 op 
209 5e11c00c 2021-03-02 op static void
210 5e11c00c 2021-03-02 op close_with_err(struct req *req, const char *err)
211 5e11c00c 2021-03-02 op {
212 5e11c00c 2021-03-02 op 	imsg_compose(ibuf, IMSG_ERR, req->id, 0, -1, err, strlen(err)+1);
213 5e11c00c 2021-03-02 op 	imsg_flush(ibuf);
214 5e11c00c 2021-03-02 op 	close_conn(0, 0, req);
215 5e11c00c 2021-03-02 op }
216 5e11c00c 2021-03-02 op 
217 5e11c00c 2021-03-02 op static void
218 5e11c00c 2021-03-02 op do_handshake(int fd, short ev, void *d)
219 5e11c00c 2021-03-02 op {
220 5e11c00c 2021-03-02 op 	struct req	*req = d;
221 5e11c00c 2021-03-02 op 	const char	*hash;
222 5e11c00c 2021-03-02 op 
223 5e11c00c 2021-03-02 op 	switch (tls_handshake(req->ctx)) {
224 5e11c00c 2021-03-02 op 	case TLS_WANT_POLLIN:
225 5e11c00c 2021-03-02 op 		yield_r(req, do_handshake, NULL);
226 5e11c00c 2021-03-02 op 		return;
227 5e11c00c 2021-03-02 op 	case TLS_WANT_POLLOUT:
228 5e11c00c 2021-03-02 op 		yield_w(req, do_handshake, NULL);
229 5e11c00c 2021-03-02 op 		return;
230 5e11c00c 2021-03-02 op 	}
231 5e11c00c 2021-03-02 op 
232 5e11c00c 2021-03-02 op 	hash = tls_peer_cert_hash(req->ctx);
233 5e11c00c 2021-03-02 op 	imsg_compose(ibuf, IMSG_CHECK_CERT, req->id, 0, -1, hash, strlen(hash)+1);
234 5e11c00c 2021-03-02 op 	imsg_flush(ibuf);
235 5e11c00c 2021-03-02 op }
236 5e11c00c 2021-03-02 op 
237 5e11c00c 2021-03-02 op static void
238 5e11c00c 2021-03-02 op write_request(int fd, short ev, void *d)
239 5e11c00c 2021-03-02 op {
240 5e11c00c 2021-03-02 op 	struct req	*req = d;
241 5e11c00c 2021-03-02 op 	ssize_t		 r;
242 5e11c00c 2021-03-02 op 	size_t		 len;
243 5e11c00c 2021-03-02 op 	char		 buf[1024], *err;
244 5e11c00c 2021-03-02 op 
245 5e11c00c 2021-03-02 op 	strlcpy(buf, "gemini://", sizeof(buf));
246 5e11c00c 2021-03-02 op 	strlcat(buf, req->url.host, sizeof(buf));
247 5e11c00c 2021-03-02 op 	strlcat(buf, "/", sizeof(buf));
248 5e11c00c 2021-03-02 op 	strlcat(buf, req->url.path, sizeof(buf));
249 5e11c00c 2021-03-02 op 
250 5e11c00c 2021-03-02 op 	if (req->url.query[0] != '\0') {
251 5e11c00c 2021-03-02 op 		strlcat(buf, "?", sizeof(buf));
252 5e11c00c 2021-03-02 op 		strlcat(buf, req->url.query, sizeof(buf));
253 5e11c00c 2021-03-02 op 	}
254 5e11c00c 2021-03-02 op 
255 5e11c00c 2021-03-02 op 	len = strlcat(buf, "\r\n", sizeof(buf));
256 5e11c00c 2021-03-02 op 
257 5e11c00c 2021-03-02 op 	assert(len <= sizeof(buf));
258 5e11c00c 2021-03-02 op 
259 5e11c00c 2021-03-02 op 	switch (r = tls_write(req->ctx, buf, len)) {
260 5e11c00c 2021-03-02 op 	case -1:
261 5e11c00c 2021-03-02 op 		err = xasprintf("tls_write: %s", tls_error(req->ctx));
262 5e11c00c 2021-03-02 op 		close_with_err(req, err);
263 5e11c00c 2021-03-02 op 		free(err);
264 5e11c00c 2021-03-02 op 		break;
265 5e11c00c 2021-03-02 op 	case TLS_WANT_POLLIN:
266 5e11c00c 2021-03-02 op 		yield_r(req, write_request, NULL);
267 5e11c00c 2021-03-02 op 		break;
268 5e11c00c 2021-03-02 op 	case TLS_WANT_POLLOUT:
269 5e11c00c 2021-03-02 op 		yield_w(req, write_request, NULL);
270 5e11c00c 2021-03-02 op 		break;
271 5e11c00c 2021-03-02 op 	default:
272 5e11c00c 2021-03-02 op 		/* assume r == len */
273 5e11c00c 2021-03-02 op 		(void)r;
274 5e11c00c 2021-03-02 op 		yield_r(req, read_reply, NULL);
275 5e11c00c 2021-03-02 op 		break;
276 5e11c00c 2021-03-02 op 	}
277 5e11c00c 2021-03-02 op }
278 5e11c00c 2021-03-02 op 
279 5e11c00c 2021-03-02 op static void
280 5e11c00c 2021-03-02 op read_reply(int fd, short ev, void *d)
281 5e11c00c 2021-03-02 op {
282 5e11c00c 2021-03-02 op 	struct req	*req = d;
283 5e11c00c 2021-03-02 op 	size_t		 len;
284 5e11c00c 2021-03-02 op 	ssize_t		 r;
285 5e11c00c 2021-03-02 op 	char		*buf, *e;
286 5e11c00c 2021-03-02 op 
287 5e11c00c 2021-03-02 op 	buf = req->buf + req->off;
288 5e11c00c 2021-03-02 op 	len = sizeof(req->buf) - req->off;
289 5e11c00c 2021-03-02 op 
290 5e11c00c 2021-03-02 op 	switch (r = tls_read(req->ctx, buf, len)) {
291 5e11c00c 2021-03-02 op 	case -1:
292 5e11c00c 2021-03-02 op 		e = xasprintf("tls_read: %s", tls_error(req->ctx));
293 5e11c00c 2021-03-02 op 		close_with_err(req, e);
294 5e11c00c 2021-03-02 op 		free(e);
295 5e11c00c 2021-03-02 op 		break;
296 5e11c00c 2021-03-02 op 	case TLS_WANT_POLLIN:
297 5e11c00c 2021-03-02 op 		yield_r(req, read_reply, NULL);
298 5e11c00c 2021-03-02 op 		break;
299 5e11c00c 2021-03-02 op 	case TLS_WANT_POLLOUT:
300 5e11c00c 2021-03-02 op 		yield_w(req, read_reply, NULL);
301 5e11c00c 2021-03-02 op 		break;
302 5e11c00c 2021-03-02 op 	default:
303 5e11c00c 2021-03-02 op 		req->off += r;
304 5e11c00c 2021-03-02 op 
305 5e11c00c 2021-03-02 op 		/* TODO: really watch for \r\n not \n alone */
306 5e11c00c 2021-03-02 op 		if ((e = telescope_strnchr(req->buf, '\n', req->off)) != NULL)
307 5e11c00c 2021-03-02 op 			parse_reply(req);
308 5e11c00c 2021-03-02 op 		else if (req->off == sizeof(req->buf))
309 5e11c00c 2021-03-02 op 			close_with_err(req, "invalid response");
310 5e11c00c 2021-03-02 op 		else
311 5e11c00c 2021-03-02 op 			yield_r(req, read_reply, NULL);
312 5e11c00c 2021-03-02 op 		break;
313 5e11c00c 2021-03-02 op 	}
314 5e11c00c 2021-03-02 op }
315 5e11c00c 2021-03-02 op 
316 5e11c00c 2021-03-02 op static void
317 5e11c00c 2021-03-02 op parse_reply(struct req *req)
318 5e11c00c 2021-03-02 op {
319 5e11c00c 2021-03-02 op 	int	 code;
320 5e11c00c 2021-03-02 op 	char	*e;
321 5e11c00c 2021-03-02 op 	size_t	 len;
322 5e11c00c 2021-03-02 op 
323 5e11c00c 2021-03-02 op 	if (req->off < 4)
324 5e11c00c 2021-03-02 op 		goto err;
325 5e11c00c 2021-03-02 op 
326 5e11c00c 2021-03-02 op 	if (!isdigit(req->buf[0]) || !isdigit(req->buf[1]))
327 5e11c00c 2021-03-02 op 		goto err;
328 5e11c00c 2021-03-02 op 
329 5e11c00c 2021-03-02 op 	code = (req->buf[0] - '0')*10 + (req->buf[1] - '0');
330 5e11c00c 2021-03-02 op 
331 5e11c00c 2021-03-02 op 	if (!isspace(req->buf[2]))
332 5e11c00c 2021-03-02 op 		goto err;
333 5e11c00c 2021-03-02 op 
334 5e11c00c 2021-03-02 op 	advance_buf(req, 3);
335 5e11c00c 2021-03-02 op 	if ((e = telescope_strnchr(req->buf, '\r', req->off)) == NULL)
336 5e11c00c 2021-03-02 op 		goto err;
337 5e11c00c 2021-03-02 op 
338 5e11c00c 2021-03-02 op 	*e = '\0';
339 5e11c00c 2021-03-02 op 	e++;
340 5e11c00c 2021-03-02 op 	len = e - req->buf;
341 5e11c00c 2021-03-02 op 	imsg_compose(ibuf, IMSG_GOT_CODE, req->id, 0, -1, &code, sizeof(code));
342 5e11c00c 2021-03-02 op 	imsg_compose(ibuf, IMSG_GOT_META, req->id, 0, -1,
343 5e11c00c 2021-03-02 op 	    req->buf, len);
344 5e11c00c 2021-03-02 op 	imsg_flush(ibuf);
345 5e11c00c 2021-03-02 op 
346 5e11c00c 2021-03-02 op 	yield_r(req, copy_body, NULL);
347 5e11c00c 2021-03-02 op 	return;
348 5e11c00c 2021-03-02 op 
349 5e11c00c 2021-03-02 op err:
350 5e11c00c 2021-03-02 op 	close_with_err(req, "malformed request");
351 5e11c00c 2021-03-02 op }
352 5e11c00c 2021-03-02 op 
353 5e11c00c 2021-03-02 op static void
354 5e11c00c 2021-03-02 op copy_body(int fd, short ev, void *d)
355 5e11c00c 2021-03-02 op {
356 5e11c00c 2021-03-02 op 	struct req	*req = d;
357 5e11c00c 2021-03-02 op 	char		 buf[BUFSIZ];
358 5e11c00c 2021-03-02 op 	ssize_t		 r;
359 5e11c00c 2021-03-02 op 
360 5e11c00c 2021-03-02 op 	for (;;) {
361 5e11c00c 2021-03-02 op 		switch (r = tls_read(req->ctx, buf, sizeof(buf))) {
362 5e11c00c 2021-03-02 op 		case TLS_WANT_POLLIN:
363 5e11c00c 2021-03-02 op 			yield_r(req, copy_body, NULL);
364 5e11c00c 2021-03-02 op 			return;
365 5e11c00c 2021-03-02 op 		case TLS_WANT_POLLOUT:
366 5e11c00c 2021-03-02 op 			yield_w(req, copy_body, NULL);
367 5e11c00c 2021-03-02 op 			return;
368 5e11c00c 2021-03-02 op 		case -1:
369 5e11c00c 2021-03-02 op 		case 0:
370 5e11c00c 2021-03-02 op 			imsg_compose(ibuf, IMSG_EOF, req->id, 0, -1, NULL, 0);
371 5e11c00c 2021-03-02 op 			imsg_flush(ibuf);
372 5e11c00c 2021-03-02 op 			close_conn(0, 0, req);
373 5e11c00c 2021-03-02 op 			return;
374 5e11c00c 2021-03-02 op 		default:
375 5e11c00c 2021-03-02 op 			imsg_compose(ibuf, IMSG_BUF, req->id, 0, -1, buf, r);
376 5e11c00c 2021-03-02 op 			imsg_flush(ibuf);
377 5e11c00c 2021-03-02 op 			break;
378 5e11c00c 2021-03-02 op 		}
379 5e11c00c 2021-03-02 op 	}
380 5e11c00c 2021-03-02 op }
381 5e11c00c 2021-03-02 op 
382 5e11c00c 2021-03-02 op static int
383 5e11c00c 2021-03-02 op serve_special_page(struct req *req, const char *url)
384 5e11c00c 2021-03-02 op {
385 5e11c00c 2021-03-02 op 	int		 code = 20;
386 5e11c00c 2021-03-02 op 	const char	*meta = "text/gemini";
387 5e11c00c 2021-03-02 op 
388 5e11c00c 2021-03-02 op 	if (strcmp(url, "about:new"))
389 5e11c00c 2021-03-02 op 		return 0;
390 5e11c00c 2021-03-02 op 
391 5e11c00c 2021-03-02 op 	imsg_compose(ibuf, IMSG_GOT_CODE, req->id, 0, -1, &code, sizeof(code));
392 5e11c00c 2021-03-02 op 	imsg_compose(ibuf, IMSG_GOT_META, req->id, 0, -1, meta, strlen(meta)+1);
393 5e11c00c 2021-03-02 op 	imsg_compose(ibuf, IMSG_BUF, req->id, 0, -1, about_new, strlen(about_new));
394 5e11c00c 2021-03-02 op 	imsg_compose(ibuf, IMSG_EOF, req->id, 0, -1, NULL, 0);
395 5e11c00c 2021-03-02 op 	imsg_flush(ibuf);
396 5e11c00c 2021-03-02 op 
397 5e11c00c 2021-03-02 op 	/* don't close_page here, since req is not added to requests
398 5e11c00c 2021-03-02 op 	 * queue */
399 5e11c00c 2021-03-02 op 	free(req);
400 5e11c00c 2021-03-02 op 	return 1;
401 5e11c00c 2021-03-02 op }
402 5e11c00c 2021-03-02 op 
403 5e11c00c 2021-03-02 op static void
404 5e11c00c 2021-03-02 op handle_get(struct imsg *imsg, size_t datalen)
405 5e11c00c 2021-03-02 op {
406 5e11c00c 2021-03-02 op 	struct req	*req;
407 5e11c00c 2021-03-02 op 	const char	*e;
408 5e11c00c 2021-03-02 op 	char		*data, *err = NULL;
409 5e11c00c 2021-03-02 op 
410 5e11c00c 2021-03-02 op 	data = imsg->data;
411 5e11c00c 2021-03-02 op 
412 5e11c00c 2021-03-02 op 	if (data[datalen-1] != '\0')
413 5e11c00c 2021-03-02 op 		die();
414 5e11c00c 2021-03-02 op 
415 5e11c00c 2021-03-02 op 	if ((req = calloc(1, sizeof(*req))) == NULL)
416 5e11c00c 2021-03-02 op 		die();
417 5e11c00c 2021-03-02 op 
418 5e11c00c 2021-03-02 op 	req->id = imsg->hdr.peerid;
419 5e11c00c 2021-03-02 op 
420 5e11c00c 2021-03-02 op 	if (serve_special_page(req, data))
421 5e11c00c 2021-03-02 op 		return;
422 5e11c00c 2021-03-02 op 
423 5e11c00c 2021-03-02 op         if (!url_parse(imsg->data, &req->url, &e)) {
424 5e11c00c 2021-03-02 op 		fprintf(stderr, "failed to parse url: %s\n", e);
425 5e11c00c 2021-03-02 op 		close_with_err(req, e);
426 5e11c00c 2021-03-02 op 		return;
427 5e11c00c 2021-03-02 op 	}
428 5e11c00c 2021-03-02 op 
429 5e11c00c 2021-03-02 op 	if ((req->fd = conn_towards(&req->url, &err)) == -1)
430 5e11c00c 2021-03-02 op 		goto err;
431 5e11c00c 2021-03-02 op 	if ((req->ctx = tls_client()) == NULL)
432 5e11c00c 2021-03-02 op 		goto err;
433 5e11c00c 2021-03-02 op 	if (tls_configure(req->ctx, tlsconf) == -1) {
434 5e11c00c 2021-03-02 op 		err = xasprintf("tls_configure: %s", tls_error(req->ctx));
435 5e11c00c 2021-03-02 op 		goto err;
436 5e11c00c 2021-03-02 op 	}
437 5e11c00c 2021-03-02 op 	if (tls_connect_socket(req->ctx, req->fd, req->url.host) == -1) {
438 5e11c00c 2021-03-02 op 		err = xasprintf("tls_connect_socket: %s", tls_error(req->ctx));
439 5e11c00c 2021-03-02 op 		goto err;
440 5e11c00c 2021-03-02 op 	}
441 5e11c00c 2021-03-02 op 
442 5e11c00c 2021-03-02 op 	TAILQ_INSERT_HEAD(&reqhead, req, reqs);
443 5e11c00c 2021-03-02 op 	yield_w(req, do_handshake, NULL);
444 5e11c00c 2021-03-02 op 	return;
445 5e11c00c 2021-03-02 op 
446 5e11c00c 2021-03-02 op err:
447 5e11c00c 2021-03-02 op         close_with_err(req, err);
448 5e11c00c 2021-03-02 op 	free(err);
449 5e11c00c 2021-03-02 op }
450 5e11c00c 2021-03-02 op 
451 5e11c00c 2021-03-02 op static void
452 5e11c00c 2021-03-02 op handle_cert_status(struct imsg *imsg, size_t datalen)
453 5e11c00c 2021-03-02 op {
454 5e11c00c 2021-03-02 op 	struct req	*req;
455 5e11c00c 2021-03-02 op 	int		 is_ok;
456 5e11c00c 2021-03-02 op 
457 5e11c00c 2021-03-02 op 	req = req_by_id(imsg->hdr.peerid);
458 5e11c00c 2021-03-02 op 
459 5e11c00c 2021-03-02 op 	if (datalen < sizeof(is_ok))
460 5e11c00c 2021-03-02 op 		die();
461 5e11c00c 2021-03-02 op 	memcpy(&is_ok, imsg->data, sizeof(is_ok));
462 5e11c00c 2021-03-02 op 
463 5e11c00c 2021-03-02 op 	if (is_ok)
464 5e11c00c 2021-03-02 op 		yield_w(req, write_request, NULL);
465 5e11c00c 2021-03-02 op 	else
466 5e11c00c 2021-03-02 op 		close_conn(0, 0, req);
467 5e11c00c 2021-03-02 op }
468 5e11c00c 2021-03-02 op 
469 5e11c00c 2021-03-02 op static void
470 5e11c00c 2021-03-02 op handle_stop(struct imsg *imsg, size_t datalen)
471 5e11c00c 2021-03-02 op {
472 5e11c00c 2021-03-02 op 	struct req	*req;
473 5e11c00c 2021-03-02 op 
474 5e11c00c 2021-03-02 op 	req = req_by_id(imsg->hdr.peerid);
475 5e11c00c 2021-03-02 op 	close_conn(0, 0, req);
476 5e11c00c 2021-03-02 op }
477 5e11c00c 2021-03-02 op 
478 5e11c00c 2021-03-02 op static void
479 5e11c00c 2021-03-02 op handle_quit(struct imsg *imsg, size_t datalen)
480 5e11c00c 2021-03-02 op {
481 5e11c00c 2021-03-02 op 	event_loopbreak();
482 5e11c00c 2021-03-02 op }
483 5e11c00c 2021-03-02 op 
484 5e11c00c 2021-03-02 op static void
485 5e11c00c 2021-03-02 op dispatch_imsg(int fd, short ev, void *d)
486 5e11c00c 2021-03-02 op {
487 5e11c00c 2021-03-02 op 	struct imsgbuf	*ibuf = d;
488 5e11c00c 2021-03-02 op 	struct imsg	 imsg;
489 5e11c00c 2021-03-02 op 	ssize_t		 n;
490 5e11c00c 2021-03-02 op 	size_t		 datalen;
491 5e11c00c 2021-03-02 op 
492 5e11c00c 2021-03-02 op 	if ((n = imsg_read(ibuf)) == -1) {
493 5e11c00c 2021-03-02 op 		if (errno == EAGAIN || errno == EWOULDBLOCK)
494 5e11c00c 2021-03-02 op 			return;
495 5e11c00c 2021-03-02 op 		die();
496 5e11c00c 2021-03-02 op 	}
497 5e11c00c 2021-03-02 op 
498 5e11c00c 2021-03-02 op 	if (n == 0)
499 5e11c00c 2021-03-02 op 		die();
500 5e11c00c 2021-03-02 op 
501 5e11c00c 2021-03-02 op 	for (;;) {
502 5e11c00c 2021-03-02 op 		if ((n = imsg_get(ibuf, &imsg)) == -1)
503 5e11c00c 2021-03-02 op 			die();
504 5e11c00c 2021-03-02 op 		if (n == 0)
505 5e11c00c 2021-03-02 op 			return;
506 5e11c00c 2021-03-02 op 		datalen = imsg.hdr.len - IMSG_HEADER_SIZE;
507 5e11c00c 2021-03-02 op 		handlers[imsg.hdr.type](&imsg, datalen);
508 5e11c00c 2021-03-02 op 		imsg_free(&imsg);
509 5e11c00c 2021-03-02 op 	}
510 5e11c00c 2021-03-02 op }
511 5e11c00c 2021-03-02 op 
512 5e11c00c 2021-03-02 op int
513 5e11c00c 2021-03-02 op client_main(struct imsgbuf *b)
514 5e11c00c 2021-03-02 op {
515 5e11c00c 2021-03-02 op 	ibuf = b;
516 5e11c00c 2021-03-02 op 
517 5e11c00c 2021-03-02 op 	TAILQ_INIT(&reqhead);
518 5e11c00c 2021-03-02 op 
519 5e11c00c 2021-03-02 op 	if ((tlsconf = tls_config_new()) == NULL)
520 5e11c00c 2021-03-02 op 		die();
521 5e11c00c 2021-03-02 op 	tls_config_insecure_noverifycert(tlsconf);
522 5e11c00c 2021-03-02 op 
523 5e11c00c 2021-03-02 op 	event_init();
524 5e11c00c 2021-03-02 op 
525 5e11c00c 2021-03-02 op 	event_set(&imsgev, ibuf->fd, EV_READ | EV_PERSIST, dispatch_imsg, ibuf);
526 5e11c00c 2021-03-02 op 	event_add(&imsgev, NULL);
527 5e11c00c 2021-03-02 op 
528 5e11c00c 2021-03-02 op 	event_dispatch();
529 5e11c00c 2021-03-02 op 	return 0;
530 5e11c00c 2021-03-02 op }