2 5e11c00c 2021-03-02 op * Copyright (c) 2021 Omar Polo <op@omarpolo.com>
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.
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.
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
25 5e11c00c 2021-03-02 op #include <telescope.h>
27 5e11c00c 2021-03-02 op #include <sys/types.h>
28 5e11c00c 2021-03-02 op #include <sys/socket.h>
30 5e11c00c 2021-03-02 op #include <netinet/in.h>
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>
44 5e11c00c 2021-03-02 op static struct tls_config *tlsconf;
45 5e11c00c 2021-03-02 op static struct imsgbuf *ibuf;
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**);
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 15354eed 2021-03-10 op static struct req *req_by_id_try(uint32_t);
57 5e11c00c 2021-03-02 op static void do_handshake(int, short, void*);
58 5e11c00c 2021-03-02 op static void write_request(int, short, void*);
59 5e11c00c 2021-03-02 op static void read_reply(int, short, void*);
60 5e11c00c 2021-03-02 op static void parse_reply(struct req*);
61 5e11c00c 2021-03-02 op static void copy_body(int, short, void*);
63 5e11c00c 2021-03-02 op static void check_special_page(struct req*, const char*);
65 5e11c00c 2021-03-02 op static void handle_get(struct imsg*, size_t);
66 5e11c00c 2021-03-02 op static void handle_cert_status(struct imsg*, size_t);
67 0972d8b2 2021-03-02 op static void handle_proceed(struct imsg*, size_t);
68 5e11c00c 2021-03-02 op static void handle_stop(struct imsg*, size_t);
69 5e11c00c 2021-03-02 op static void handle_quit(struct imsg*, size_t);
71 723bee54 2021-03-09 op /* TODO: making this customizable */
72 723bee54 2021-03-09 op struct timeval timeout_for_handshake = { 5, 0 };
74 5e11c00c 2021-03-02 op static imsg_handlerfn *handlers[] = {
75 5e11c00c 2021-03-02 op [IMSG_GET] = handle_get,
76 5e11c00c 2021-03-02 op [IMSG_CERT_STATUS] = handle_cert_status,
77 0972d8b2 2021-03-02 op [IMSG_PROCEED] = handle_proceed,
78 5e11c00c 2021-03-02 op [IMSG_STOP] = handle_stop,
79 5e11c00c 2021-03-02 op [IMSG_QUIT] = handle_quit,
82 5e11c00c 2021-03-02 op typedef void (*statefn)(int, short, void*);
84 5e11c00c 2021-03-02 op TAILQ_HEAD(, req) reqhead;
85 5e11c00c 2021-03-02 op /* a pending request */
87 5e11c00c 2021-03-02 op struct event ev;
88 5e11c00c 2021-03-02 op struct url url;
91 5e11c00c 2021-03-02 op struct tls *ctx;
92 5e11c00c 2021-03-02 op char buf[1024];
94 5e11c00c 2021-03-02 op TAILQ_ENTRY(req) reqs;
97 5e11c00c 2021-03-02 op static inline void
98 5e11c00c 2021-03-02 op yield_r(struct req *req, statefn fn, struct timeval *tv)
100 5e11c00c 2021-03-02 op event_once(req->fd, EV_READ, fn, req, tv);
103 5e11c00c 2021-03-02 op static inline void
104 5e11c00c 2021-03-02 op yield_w(struct req *req, statefn fn, struct timeval *tv)
106 5e11c00c 2021-03-02 op event_once(req->fd, EV_WRITE, fn, req, tv);
109 5e11c00c 2021-03-02 op static inline void
110 5e11c00c 2021-03-02 op advance_buf(struct req *req, size_t len)
112 5e11c00c 2021-03-02 op assert(len <= req->off);
114 5e11c00c 2021-03-02 op req->off -= len;
115 5e11c00c 2021-03-02 op memmove(req->buf, req->buf + len, req->off);
118 5e11c00c 2021-03-02 op static void __attribute__((__noreturn__))
121 5e11c00c 2021-03-02 op abort(); /* TODO */
124 5e11c00c 2021-03-02 op static char *
125 5e11c00c 2021-03-02 op xasprintf(const char *fmt, ...)
130 5e11c00c 2021-03-02 op va_start(ap, fmt);
131 5e11c00c 2021-03-02 op if (vasprintf(&s, fmt, ap) == -1)
139 5e11c00c 2021-03-02 op conn_towards(struct url *url, char **err)
141 5e11c00c 2021-03-02 op struct addrinfo hints, *servinfo, *p;
142 5e11c00c 2021-03-02 op int status, sock;
143 5e11c00c 2021-03-02 op const char *proto = "1965";
147 5e11c00c 2021-03-02 op if (*url->port != '\0')
148 5e11c00c 2021-03-02 op proto = url->port;
150 5e11c00c 2021-03-02 op memset(&hints, 0, sizeof(hints));
151 5e11c00c 2021-03-02 op hints.ai_family = AF_UNSPEC;
152 5e11c00c 2021-03-02 op hints.ai_socktype = SOCK_STREAM;
154 5e11c00c 2021-03-02 op if ((status = getaddrinfo(url->host, proto, &hints, &servinfo))) {
155 5e11c00c 2021-03-02 op *err = xasprintf("failed to resolve %s: %s",
156 5e11c00c 2021-03-02 op url->host, gai_strerror(status));
161 5e11c00c 2021-03-02 op for (p = servinfo; p != NULL; p = p->ai_next) {
162 5e11c00c 2021-03-02 op if ((sock = socket(p->ai_family, p->ai_socktype, p->ai_protocol)) == -1)
164 5e11c00c 2021-03-02 op if (connect(sock, p->ai_addr, p->ai_addrlen) != -1)
169 5e11c00c 2021-03-02 op if (sock == -1)
170 5e11c00c 2021-03-02 op *err = xasprintf("couldn't connect to %s", url->host);
172 5e11c00c 2021-03-02 op mark_nonblock(sock);
174 5e11c00c 2021-03-02 op freeaddrinfo(servinfo);
178 5e11c00c 2021-03-02 op static struct req *
179 5e11c00c 2021-03-02 op req_by_id(uint32_t id)
181 15354eed 2021-03-10 op struct req *r;
183 15354eed 2021-03-10 op if ((r = req_by_id_try(id)) == NULL)
188 15354eed 2021-03-10 op static struct req *
189 15354eed 2021-03-10 op req_by_id_try(uint32_t id)
191 5e11c00c 2021-03-02 op struct req *r;
193 5e11c00c 2021-03-02 op TAILQ_FOREACH(r, &reqhead, reqs) {
194 5e11c00c 2021-03-02 op if (r->id == id)
202 5e11c00c 2021-03-02 op close_conn(int fd, short ev, void *d)
204 5e11c00c 2021-03-02 op struct req *req = d;
206 5e11c00c 2021-03-02 op if (req->ctx != NULL) {
207 5e11c00c 2021-03-02 op switch (tls_close(req->ctx)) {
208 5e11c00c 2021-03-02 op case TLS_WANT_POLLIN:
209 5e11c00c 2021-03-02 op yield_r(req, close_conn, NULL);
211 5e11c00c 2021-03-02 op case TLS_WANT_POLLOUT:
212 5e11c00c 2021-03-02 op yield_w(req, close_conn, NULL);
216 5e11c00c 2021-03-02 op tls_free(req->ctx);
219 5e11c00c 2021-03-02 op TAILQ_REMOVE(&reqhead, req, reqs);
220 5e11c00c 2021-03-02 op if (req->fd != -1)
221 5e11c00c 2021-03-02 op close(req->fd);
226 5e11c00c 2021-03-02 op close_with_err(struct req *req, const char *err)
228 5e11c00c 2021-03-02 op imsg_compose(ibuf, IMSG_ERR, req->id, 0, -1, err, strlen(err)+1);
229 5e11c00c 2021-03-02 op imsg_flush(ibuf);
230 5e11c00c 2021-03-02 op close_conn(0, 0, req);
234 5e11c00c 2021-03-02 op do_handshake(int fd, short ev, void *d)
236 5e11c00c 2021-03-02 op struct req *req = d;
237 5e11c00c 2021-03-02 op const char *hash;
239 723bee54 2021-03-09 op if (ev == EV_TIMEOUT) {
240 723bee54 2021-03-09 op close_with_err(req, "Timeout loading page");
244 5e11c00c 2021-03-02 op switch (tls_handshake(req->ctx)) {
245 5e11c00c 2021-03-02 op case TLS_WANT_POLLIN:
246 5e11c00c 2021-03-02 op yield_r(req, do_handshake, NULL);
248 5e11c00c 2021-03-02 op case TLS_WANT_POLLOUT:
249 5e11c00c 2021-03-02 op yield_w(req, do_handshake, NULL);
253 5e11c00c 2021-03-02 op hash = tls_peer_cert_hash(req->ctx);
254 5e11c00c 2021-03-02 op imsg_compose(ibuf, IMSG_CHECK_CERT, req->id, 0, -1, hash, strlen(hash)+1);
255 5e11c00c 2021-03-02 op imsg_flush(ibuf);
259 5e11c00c 2021-03-02 op write_request(int fd, short ev, void *d)
261 5e11c00c 2021-03-02 op struct req *req = d;
264 5e11c00c 2021-03-02 op char buf[1024], *err;
266 5e11c00c 2021-03-02 op strlcpy(buf, "gemini://", sizeof(buf));
267 5e11c00c 2021-03-02 op strlcat(buf, req->url.host, sizeof(buf));
268 5e11c00c 2021-03-02 op strlcat(buf, "/", sizeof(buf));
269 5e11c00c 2021-03-02 op strlcat(buf, req->url.path, sizeof(buf));
271 5e11c00c 2021-03-02 op if (req->url.query[0] != '\0') {
272 5e11c00c 2021-03-02 op strlcat(buf, "?", sizeof(buf));
273 5e11c00c 2021-03-02 op strlcat(buf, req->url.query, sizeof(buf));
276 5e11c00c 2021-03-02 op len = strlcat(buf, "\r\n", sizeof(buf));
278 5e11c00c 2021-03-02 op assert(len <= sizeof(buf));
280 5e11c00c 2021-03-02 op switch (r = tls_write(req->ctx, buf, len)) {
282 5e11c00c 2021-03-02 op err = xasprintf("tls_write: %s", tls_error(req->ctx));
283 5e11c00c 2021-03-02 op close_with_err(req, err);
286 5e11c00c 2021-03-02 op case TLS_WANT_POLLIN:
287 5e11c00c 2021-03-02 op yield_r(req, write_request, NULL);
289 5e11c00c 2021-03-02 op case TLS_WANT_POLLOUT:
290 5e11c00c 2021-03-02 op yield_w(req, write_request, NULL);
293 5e11c00c 2021-03-02 op /* assume r == len */
295 5e11c00c 2021-03-02 op yield_r(req, read_reply, NULL);
301 5e11c00c 2021-03-02 op read_reply(int fd, short ev, void *d)
303 5e11c00c 2021-03-02 op struct req *req = d;
306 5e11c00c 2021-03-02 op char *buf, *e;
308 5e11c00c 2021-03-02 op buf = req->buf + req->off;
309 5e11c00c 2021-03-02 op len = sizeof(req->buf) - req->off;
311 5e11c00c 2021-03-02 op switch (r = tls_read(req->ctx, buf, len)) {
313 5e11c00c 2021-03-02 op e = xasprintf("tls_read: %s", tls_error(req->ctx));
314 5e11c00c 2021-03-02 op close_with_err(req, e);
317 5e11c00c 2021-03-02 op case TLS_WANT_POLLIN:
318 5e11c00c 2021-03-02 op yield_r(req, read_reply, NULL);
320 5e11c00c 2021-03-02 op case TLS_WANT_POLLOUT:
321 5e11c00c 2021-03-02 op yield_w(req, read_reply, NULL);
324 5e11c00c 2021-03-02 op req->off += r;
326 5e11c00c 2021-03-02 op /* TODO: really watch for \r\n not \n alone */
327 5e11c00c 2021-03-02 op if ((e = telescope_strnchr(req->buf, '\n', req->off)) != NULL)
328 5e11c00c 2021-03-02 op parse_reply(req);
329 5e11c00c 2021-03-02 op else if (req->off == sizeof(req->buf))
330 5e11c00c 2021-03-02 op close_with_err(req, "invalid response");
332 5e11c00c 2021-03-02 op yield_r(req, read_reply, NULL);
338 5e11c00c 2021-03-02 op parse_reply(struct req *req)
344 5e11c00c 2021-03-02 op if (req->off < 4)
347 5e11c00c 2021-03-02 op if (!isdigit(req->buf[0]) || !isdigit(req->buf[1]))
350 5e11c00c 2021-03-02 op code = (req->buf[0] - '0')*10 + (req->buf[1] - '0');
352 5e11c00c 2021-03-02 op if (!isspace(req->buf[2]))
355 5e11c00c 2021-03-02 op advance_buf(req, 3);
356 5e11c00c 2021-03-02 op if ((e = telescope_strnchr(req->buf, '\r', req->off)) == NULL)
361 5e11c00c 2021-03-02 op len = e - req->buf;
362 5e11c00c 2021-03-02 op imsg_compose(ibuf, IMSG_GOT_CODE, req->id, 0, -1, &code, sizeof(code));
363 5e11c00c 2021-03-02 op imsg_compose(ibuf, IMSG_GOT_META, req->id, 0, -1,
364 5e11c00c 2021-03-02 op req->buf, len);
365 5e11c00c 2021-03-02 op imsg_flush(ibuf);
367 723bee54 2021-03-09 op if (code != 20)
368 723bee54 2021-03-09 op close_conn(0, 0, req);
369 72a79cfb 2021-03-13 op advance_buf(req, len+1); /* skip \n too */
374 5e11c00c 2021-03-02 op close_with_err(req, "malformed request");
378 5e11c00c 2021-03-02 op copy_body(int fd, short ev, void *d)
380 5e11c00c 2021-03-02 op struct req *req = d;
384 72a79cfb 2021-03-13 op if (req->off != 0) {
385 72a79cfb 2021-03-13 op imsg_compose(ibuf, IMSG_BUF, req->id, 0, -1,
386 72a79cfb 2021-03-13 op req->buf, req->off);
387 72a79cfb 2021-03-13 op imsg_flush(ibuf);
390 72a79cfb 2021-03-13 op switch (r = tls_read(req->ctx, req->buf, sizeof(req->buf))) {
391 5e11c00c 2021-03-02 op case TLS_WANT_POLLIN:
392 5e11c00c 2021-03-02 op yield_r(req, copy_body, NULL);
394 5e11c00c 2021-03-02 op case TLS_WANT_POLLOUT:
395 5e11c00c 2021-03-02 op yield_w(req, copy_body, NULL);
398 5e11c00c 2021-03-02 op imsg_compose(ibuf, IMSG_EOF, req->id, 0, -1, NULL, 0);
399 5e11c00c 2021-03-02 op imsg_flush(ibuf);
400 5e11c00c 2021-03-02 op close_conn(0, 0, req);
403 72a79cfb 2021-03-13 op req->off = r;
409 5e11c00c 2021-03-02 op handle_get(struct imsg *imsg, size_t datalen)
411 5e11c00c 2021-03-02 op struct req *req;
412 5e11c00c 2021-03-02 op const char *e;
413 5e11c00c 2021-03-02 op char *data, *err = NULL;
415 5e11c00c 2021-03-02 op data = imsg->data;
417 5e11c00c 2021-03-02 op if (data[datalen-1] != '\0')
420 5e11c00c 2021-03-02 op if ((req = calloc(1, sizeof(*req))) == NULL)
423 5e11c00c 2021-03-02 op req->id = imsg->hdr.peerid;
424 71a2feab 2021-03-10 op TAILQ_INSERT_HEAD(&reqhead, req, reqs);
426 5e11c00c 2021-03-02 op if (!url_parse(imsg->data, &req->url, &e)) {
427 5e11c00c 2021-03-02 op fprintf(stderr, "failed to parse url: %s\n", e);
428 5e11c00c 2021-03-02 op close_with_err(req, e);
432 5e11c00c 2021-03-02 op if ((req->fd = conn_towards(&req->url, &err)) == -1)
434 5e11c00c 2021-03-02 op if ((req->ctx = tls_client()) == NULL)
436 5e11c00c 2021-03-02 op if (tls_configure(req->ctx, tlsconf) == -1) {
437 5e11c00c 2021-03-02 op err = xasprintf("tls_configure: %s", tls_error(req->ctx));
440 5e11c00c 2021-03-02 op if (tls_connect_socket(req->ctx, req->fd, req->url.host) == -1) {
441 5e11c00c 2021-03-02 op err = xasprintf("tls_connect_socket: %s", tls_error(req->ctx));
445 723bee54 2021-03-09 op yield_w(req, do_handshake, &timeout_for_handshake);
449 5e11c00c 2021-03-02 op close_with_err(req, err);
454 5e11c00c 2021-03-02 op handle_cert_status(struct imsg *imsg, size_t datalen)
456 5e11c00c 2021-03-02 op struct req *req;
459 5e11c00c 2021-03-02 op req = req_by_id(imsg->hdr.peerid);
461 5e11c00c 2021-03-02 op if (datalen < sizeof(is_ok))
463 5e11c00c 2021-03-02 op memcpy(&is_ok, imsg->data, sizeof(is_ok));
466 5e11c00c 2021-03-02 op yield_w(req, write_request, NULL);
468 5e11c00c 2021-03-02 op close_conn(0, 0, req);
472 0972d8b2 2021-03-02 op handle_proceed(struct imsg *imsg, size_t datalen)
474 0972d8b2 2021-03-02 op struct req *req;
476 0972d8b2 2021-03-02 op req = req_by_id(imsg->hdr.peerid);
477 0972d8b2 2021-03-02 op yield_r(req, copy_body, NULL);
481 5e11c00c 2021-03-02 op handle_stop(struct imsg *imsg, size_t datalen)
483 5e11c00c 2021-03-02 op struct req *req;
485 15354eed 2021-03-10 op if ((req = req_by_id_try(imsg->hdr.peerid)) == NULL)
487 5e11c00c 2021-03-02 op close_conn(0, 0, req);
491 5e11c00c 2021-03-02 op handle_quit(struct imsg *imsg, size_t datalen)
493 5e11c00c 2021-03-02 op event_loopbreak();
497 5e11c00c 2021-03-02 op dispatch_imsg(int fd, short ev, void *d)
499 5e11c00c 2021-03-02 op struct imsgbuf *ibuf = d;
500 5e11c00c 2021-03-02 op struct imsg imsg;
502 5e11c00c 2021-03-02 op size_t datalen;
504 5e11c00c 2021-03-02 op if ((n = imsg_read(ibuf)) == -1) {
505 5e11c00c 2021-03-02 op if (errno == EAGAIN || errno == EWOULDBLOCK)
514 5e11c00c 2021-03-02 op if ((n = imsg_get(ibuf, &imsg)) == -1)
518 5e11c00c 2021-03-02 op datalen = imsg.hdr.len - IMSG_HEADER_SIZE;
519 5e11c00c 2021-03-02 op handlers[imsg.hdr.type](&imsg, datalen);
520 5e11c00c 2021-03-02 op imsg_free(&imsg);
525 5e11c00c 2021-03-02 op client_main(struct imsgbuf *b)
529 5e11c00c 2021-03-02 op TAILQ_INIT(&reqhead);
531 5e11c00c 2021-03-02 op if ((tlsconf = tls_config_new()) == NULL)
533 5e11c00c 2021-03-02 op tls_config_insecure_noverifycert(tlsconf);
535 5e11c00c 2021-03-02 op event_init();
537 5e11c00c 2021-03-02 op event_set(&imsgev, ibuf->fd, EV_READ | EV_PERSIST, dispatch_imsg, ibuf);
538 5e11c00c 2021-03-02 op event_add(&imsgev, NULL);
540 ebdcadbf 2021-03-12 op sandbox_network_process();
542 5e11c00c 2021-03-02 op event_dispatch();