op public repos

Blob

Date:: Mon Aug 16 10:35:02 2021 UTC
Message:: add some heuristics to interpret user-provided URLs
Actions:: History | Blame | Raw File
1 /*
2  * Copyright (c) 2021 Omar Polo <op@omarpolo.com>
3  *
4  * Permission to use, copy, modify, and distribute this software for any
5  * purpose with or without fee is hereby granted, provided that the above
6  * copyright notice and this permission notice appear in all copies.
7  *
8  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
15  */
16 
17 #include "compat.h"
18 
19 #include <sys/socket.h>
20 #include <sys/wait.h>
21 
22 #include <errno.h>
23 #include <getopt.h>
24 #include <signal.h>
25 #include <stdio.h>
26 #include <stdlib.h>
27 #include <string.h>
28 #include <unistd.h>
29 
30 #include "defaults.h"
31 #include "minibuffer.h"
32 #include "parser.h"
33 #include "session.h"
34 #include "telescope.h"
35 #include "ui.h"
36 
37 static struct option longopts[] = {
38 	{"colors",	no_argument,	NULL,	'c'},
39 	{"help",	no_argument,	NULL,	'h'},
40 	{"version",	no_argument,	NULL,	'v'},
41 	{NULL,		0,		NULL,	0},
42 };
43 
44 static const char *opts = "Cc:hnT:v";
45 
46 /*
47  * Used to know when we're finished loading.
48  */
49 int			 operating;
50 
51 static struct imsgev	*iev_fs, *iev_net;
52 
53 struct tabshead		 tabshead = TAILQ_HEAD_INITIALIZER(tabshead);
54 struct proxylist	 proxies = TAILQ_HEAD_INITIALIZER(proxies);
55 
56 enum telescope_process {
57 	PROC_UI,
58 	PROC_FS,
59 	PROC_NET,
60 };
61 
62 #define CANNOT_FETCH		0
63 #define TOO_MUCH_REDIRECTS	1
64 #define MALFORMED_RESPONSE	2
65 #define UNKNOWN_TYPE_OR_CSET	3
66 #define UNKNOWN_PROTOCOL	4
67 
68 /* XXX: keep in sync with normalize_code */
69 const char *err_pages[70] = {
70 	[CANNOT_FETCH]		= "# Couldn't load the page\n",
71 	[TOO_MUCH_REDIRECTS]	= "# Too much redirects\n",
72 	[MALFORMED_RESPONSE]	= "# Got a malformed response\n",
73 	[UNKNOWN_TYPE_OR_CSET]	= "# Unsupported type or charset\n",
74 	[UNKNOWN_PROTOCOL]	= "# Unknown protocol\n",
75 
76 	[10] = "# Input required\n",
77 	[11] = "# Input required\n",
78 	[40] = "# Temporary failure\n",
79 	[41] = "# Server unavailable\n",
80 	[42] = "# CGI error\n",
81 	[43] = "# Proxy error\n",
82 	[44] = "# Slow down\n",
83 	[50] = "# Permanent failure\n",
84 	[51] = "# Not found\n",
85 	[52] = "# Gone\n",
86 	[53] = "# Proxy request refused\n",
87 	[59] = "# Bad request\n",
88 	[60] = "# Client certificate required\n",
89 	[61] = "# Certificate not authorised\n",
90 	[62] = "# Certificate not valid\n"
91 };
92 
93 static void		 die(void) __attribute__((__noreturn__));
94 static struct tab	*tab_by_id(uint32_t);
95 static void		 handle_imsg_err(struct imsg *, size_t);
96 static void		 handle_imsg_check_cert(struct imsg *, size_t);
97 static void		 handle_check_cert_user_choice(int, struct tab *);
98 static void		 handle_maybe_save_new_cert(int, struct tab *);
99 static void		 handle_imsg_got_code(struct imsg *, size_t);
100 static void		 handle_imsg_got_meta(struct imsg *, size_t);
101 static void		 handle_maybe_save_page(int, struct tab *);
102 static void		 handle_save_page_path(const char *, struct tab *);
103 static void		 handle_imsg_file_opened(struct imsg *, size_t);
104 static void		 handle_imsg_buf(struct imsg *, size_t);
105 static void		 handle_imsg_eof(struct imsg *, size_t);
106 static void		 handle_imsg_bookmark_ok(struct imsg *, size_t);
107 static void		 handle_imsg_save_cert_ok(struct imsg *, size_t);
108 static void		 handle_imsg_update_cert_ok(struct imsg *, size_t);
109 static void		 handle_dispatch_imsg(int, short, void *);
110 static int		 load_about_url(struct tab *, const char *);
111 static int		 load_file_url(struct tab *, const char *);
112 static int		 load_finger_url(struct tab *, const char *);
113 static int		 load_gemini_url(struct tab *, const char *);
114 static int		 load_gopher_url(struct tab *, const char *);
115 static int		 load_via_proxy(struct tab *, const char *,
116 			     struct proxy *);
117 static int		 make_request(struct tab *, struct get_req *, int,
118 			     const char *);
119 static int		 make_fs_request(struct tab *, int, const char *);
120 static int		 do_load_url(struct tab *, const char *, const char *);
121 static pid_t		 start_child(enum telescope_process, const char *, int);
122 
123 static struct proto {
124 	const char	*schema;
125 	const char	*port;
126 	int		 (*loadfn)(struct tab *, const char *);
127 } protos[] = {
128 	{"about",	NULL,	load_about_url},
129 	{"file",	NULL,	load_file_url},
130 	{"finger",	"79",	load_finger_url},
131 	{"gemini",	"1965",	load_gemini_url},
132 	{"gopher",	"70",	load_gopher_url},
133 	{NULL, NULL, NULL},
134 };
135 
136 static imsg_handlerfn *handlers[] = {
137 	[IMSG_ERR] = handle_imsg_err,
138 	[IMSG_CHECK_CERT] = handle_imsg_check_cert,
139 	[IMSG_GOT_CODE] = handle_imsg_got_code,
140 	[IMSG_GOT_META] = handle_imsg_got_meta,
141 	[IMSG_BUF] = handle_imsg_buf,
142 	[IMSG_EOF] = handle_imsg_eof,
143 	[IMSG_BOOKMARK_OK] = handle_imsg_bookmark_ok,
144 	[IMSG_SAVE_CERT_OK] = handle_imsg_save_cert_ok,
145 	[IMSG_UPDATE_CERT_OK] = handle_imsg_update_cert_ok,
146 	[IMSG_FILE_OPENED] = handle_imsg_file_opened,
147 };
148 
149 static struct ohash	certs;
150 
151 static void __attribute__((__noreturn__))
152 die(void)
153 {
154 	abort(); 		/* TODO */
155 }
156 
157 static struct tab *
158 tab_by_id(uint32_t id)
159 {
160 	struct tab *t;
161 
162 	TAILQ_FOREACH(t, &tabshead, tabs) {
163 		if (t->id == id)
164 			return t;
165 	}
166 
167 	return NULL;
168 }
169 
170 static void
171 handle_imsg_err(struct imsg *imsg, size_t datalen)
172 {
173 	struct tab	*tab;
174 	char		*page;
175 
176 	if ((tab = tab_by_id(imsg->hdr.peerid)) == NULL)
177 		return;
178 
179 	page = imsg->data;
180 	page[datalen-1] = '\0';
181 
182 	if (asprintf(&page, "# Error loading %s\n\n> %s\n",
183 	    tab->hist_cur->h, page) == -1)
184 		die();
185 	load_page_from_str(tab, page);
186 	free(page);
187 }
188 
189 static void
190 handle_imsg_check_cert(struct imsg *imsg, size_t datalen)
191 {
192 	const char		*hash, *host, *port;
193 	int			 tofu_res;
194 	struct tofu_entry	*e;
195 	struct tab		*tab;
196 
197 	hash = imsg->data;
198 	if (hash[datalen-1] != '\0')
199 		abort();
200 
201 	if ((tab = tab_by_id(imsg->hdr.peerid)) == NULL)
202 		return;
203 
204 	if (tab->proxy != NULL) {
205 		host = tab->proxy->host;
206 		port = tab->proxy->port;
207 	} else {
208 		host = tab->uri.host;
209 		port = tab->uri.port;
210 	}
211 
212 	if ((e = tofu_lookup(&certs, host, port)) == NULL) {
213 		/* TODO: an update in libressl/libretls changed
214 		 * significantly.  Find a better approach at storing
215 		 * the certs! */
216 		if (datalen > sizeof(e->hash))
217 			abort();
218 
219 		tofu_res = 1;	/* trust on first use */
220 		if ((e = calloc(1, sizeof(*e))) == NULL)
221 			abort();
222 		strlcpy(e->domain, host, sizeof(e->domain));
223 		if (*port != '\0' && strcmp(port, "1965")) {
224 			strlcat(e->domain, ":", sizeof(e->domain));
225 			strlcat(e->domain, port, sizeof(e->domain));
226 		}
227 		strlcpy(e->hash, hash, sizeof(e->hash));
228 		tofu_add(&certs, e);
229 		ui_send_fs(IMSG_SAVE_CERT, tab->id, e, sizeof(*e));
230 	} else
231 		tofu_res = !strcmp(hash, e->hash);
232 
233 	if (tofu_res) {
234 		if (e->verified == -1)
235 			tab->trust = TS_TEMP_TRUSTED;
236 		else if (e->verified == 1)
237 			tab->trust = TS_VERIFIED;
238 		else
239 			tab->trust = TS_TRUSTED;
240 
241 		ui_send_net(IMSG_CERT_STATUS, imsg->hdr.peerid,
242 		    &tofu_res, sizeof(tofu_res));
243 	} else {
244 		tab->trust = TS_UNTRUSTED;
245 		load_page_from_str(tab, "# Certificate mismatch\n");
246 		if ((tab->cert = strdup(hash)) == NULL)
247 			die();
248 		ui_yornp("Certificate mismatch.  Proceed?",
249 		    handle_check_cert_user_choice, tab);
250 	}
251 }
252 
253 static void
254 handle_check_cert_user_choice(int accept, struct tab *tab)
255 {
256 	ui_send_net(IMSG_CERT_STATUS, tab->id, &accept,
257 	    sizeof(accept));
258 
259 	if (accept) {
260 		/*
261 		 * trust the certificate for this session only.  If
262 		 * the page results in a redirect while we're asking
263 		 * the user to save, we'll end up with an invalid
264 		 * tabid (one request == one tab id).  It also makes
265 		 * sense to save it for the current session if the
266 		 * user accepted it.
267 		 */
268 		tofu_temp_trust(&certs, tab->uri.host, tab->uri.port,
269 		    tab->cert);
270 
271 		ui_yornp("Save the new certificate?",
272 		    handle_maybe_save_new_cert, tab);
273 	} else {
274 		free(tab->cert);
275 		tab->cert = NULL;
276 	}
277 }
278 
279 static void
280 handle_maybe_save_new_cert(int accept, struct tab *tab)
281 {
282 	struct tofu_entry *e;
283 	const char *host, *port;
284 
285 	if (tab->proxy != NULL) {
286 		host = tab->proxy->host;
287 		port = tab->proxy->port;
288 	} else {
289 		host = tab->uri.host;
290 		port = tab->uri.port;
291 	}
292 
293 	if (!accept)
294 		goto end;
295 
296 	if ((e = calloc(1, sizeof(*e))) == NULL)
297 		die();
298 
299 	strlcpy(e->domain, host, sizeof(e->domain));
300 	if (*port != '\0' && strcmp(port, "1965")) {
301 		strlcat(e->domain, ":", sizeof(e->domain));
302 		strlcat(e->domain, port, sizeof(e->domain));
303 	}
304 	strlcpy(e->hash, tab->cert, sizeof(e->hash));
305 	ui_send_fs(IMSG_UPDATE_CERT, 0, e, sizeof(*e));
306 
307 	tofu_update(&certs, e);
308 
309 	tab->trust = TS_TRUSTED;
310 
311 end:
312 	free(tab->cert);
313 	tab->cert = NULL;
314 }
315 
316 static inline int
317 normalize_code(int n)
318 {
319 	if (n < 20) {
320 		if (n == 10 || n == 11)
321 			return n;
322 		return 10;
323 	} else if (n < 30) {
324 		return 20;
325 	} else if (n < 40) {
326 		if (n == 30 || n == 31)
327 			return n;
328 		return 30;
329 	} else if (n < 50) {
330 		if (n <= 44)
331 			return n;
332 		return 40;
333 	} else if (n < 60) {
334 		if (n <= 53 || n == 59)
335 			return n;
336 		return 50;
337 	} else if (n < 70) {
338 		if (n <= 62)
339 			return n;
340 		return 60;
341 	} else
342 		return MALFORMED_RESPONSE;
343 }
344 
345 static void
346 handle_imsg_got_code(struct imsg *imsg, size_t datalen)
347 {
348 	struct tab	*tab;
349 
350 	if ((tab = tab_by_id(imsg->hdr.peerid)) == NULL)
351 		return;
352 
353 	if (sizeof(tab->code) != datalen)
354 		die();
355 
356 	memcpy(&tab->code, imsg->data, sizeof(tab->code));
357 	tab->code = normalize_code(tab->code);
358 	if (tab->code != 30 && tab->code != 31)
359 		tab->redirect_count = 0;
360 }
361 
362 static void
363 handle_imsg_got_meta(struct imsg *imsg, size_t datalen)
364 {
365 	struct tab	*tab;
366 
367 	if ((tab = tab_by_id(imsg->hdr.peerid)) == NULL)
368 		return;
369 
370 	if (sizeof(tab->meta) <= datalen)
371 		die();
372 
373 	memcpy(tab->meta, imsg->data, datalen);
374 
375 	if (tab->code < 10) {	/* internal errors */
376 		load_page_from_str(tab, err_pages[tab->code]);
377 	} else if (tab->code < 20) {	/* 1x */
378 		load_page_from_str(tab, err_pages[tab->code]);
379 		ui_require_input(tab, tab->code == 11, PROTO_GEMINI);
380 	} else if (tab->code == 20) {
381 		if (setup_parser_for(tab)) {
382 			ui_send_net(IMSG_PROCEED, tab->id, NULL, 0);
383 		} else {
384 			load_page_from_str(tab,
385 			    err_pages[UNKNOWN_TYPE_OR_CSET]);
386 			ui_yornp("Can't display page, save it?",
387 			    handle_maybe_save_page, tab);
388 		}
389 	} else if (tab->code < 40) { /* 3x */
390 		tab->redirect_count++;
391 
392 		/* TODO: make customizable? */
393 		if (tab->redirect_count > 5) {
394 			load_page_from_str(tab,
395 			    err_pages[TOO_MUCH_REDIRECTS]);
396 		} else
397 			do_load_url(tab, tab->meta, NULL);
398 	} else { /* 4x, 5x & 6x */
399 		load_page_from_str(tab, err_pages[tab->code]);
400 	}
401 }
402 
403 static void
404 handle_maybe_save_page(int dosave, struct tab *tab)
405 {
406 	if (dosave)
407 		ui_read("Save to path", handle_save_page_path, tab);
408 	else
409 		stop_tab(tab);
410 }
411 
412 static void
413 handle_save_page_path(const char *path, struct tab *tab)
414 {
415 	if (path == NULL) {
416 		stop_tab(tab);
417 		return;
418 	}
419 
420 	tab->path = strdup(path);
421 
422 	ui_send_fs(IMSG_FILE_OPEN, tab->id, path, strlen(path)+1);
423 }
424 
425 static void
426 handle_imsg_file_opened(struct imsg *imsg, size_t datalen)
427 {
428 	struct tab	*tab;
429 	char		*page;
430 	const char	*e;
431 	int		 l;
432 
433 	if ((tab = tab_by_id(imsg->hdr.peerid)) == NULL) {
434 		if (imsg->fd != -1)
435 			close(imsg->fd);
436 		return;
437 	}
438 
439 	if (imsg->fd == -1) {
440 		stop_tab(tab);
441 
442 		e = imsg->data;
443 		if (e[datalen-1] != '\0')
444 			die();
445 		l = asprintf(&page, "# Can't open file\n\n> %s: %s\n",
446 		    tab->path, e);
447 		if (l == -1)
448 			die();
449 		load_page_from_str(tab, page);
450 		free(page);
451 	} else {
452 		tab->fd = imsg->fd;
453 		ui_send_net(IMSG_PROCEED, tab->id, NULL, 0);
454 	}
455 }
456 
457 static void
458 handle_imsg_buf(struct imsg *imsg, size_t datalen)
459 {
460 	struct tab	*tab;
461 	int		 l;
462 	char		*page, buf[FMT_SCALED_STRSIZE] = {0};
463 
464 	if ((tab = tab_by_id(imsg->hdr.peerid)) == NULL)
465 		return;
466 
467 	tab->bytes += datalen;
468 	if (tab->fd == -1) {
469 		if (!parser_parse(tab, imsg->data, datalen))
470 			die();
471 	} else {
472 		write(tab->fd, imsg->data, datalen);
473 		fmt_scaled(tab->bytes, buf);
474 		l = asprintf(&page, "Saving to \"%s\"... (%s)\n",
475 		    tab->path,
476 		    buf);
477 		if (l == -1)
478 			die();
479 		load_page_from_str(tab, page);
480 		free(page);
481 	}
482 
483 	ui_on_tab_refresh(tab);
484 }
485 
486 static void
487 handle_imsg_eof(struct imsg *imsg, size_t datalen)
488 {
489 	struct tab	*tab;
490 	int		 l;
491 	char		*page, buf[FMT_SCALED_STRSIZE] = {0};
492 
493 	if ((tab = tab_by_id(imsg->hdr.peerid)) == NULL)
494 		return;
495 
496 	if (tab->fd == -1) {
497 		if (!parser_free(tab))
498 			die();
499 	} else {
500 		fmt_scaled(tab->bytes, buf);
501 		l = asprintf(&page, "Saved to \"%s\" (%s)\n",
502 		    tab->path,
503 		    buf);
504 		if (l == -1)
505 			die();
506 		load_page_from_str(tab, page);
507 		free(page);
508 
509 		close(tab->fd);
510 		tab->fd = -1;
511 		free(tab->path);
512 		tab->path = NULL;
513 	}
514 
515 	ui_on_tab_refresh(tab);
516 	ui_on_tab_loaded(tab);
517 }
518 
519 static void
520 handle_imsg_bookmark_ok(struct imsg *imsg, size_t datalen)
521 {
522 	int res;
523 
524 	if (datalen != sizeof(res))
525 		die();
526 
527 	memcpy(&res, imsg->data, sizeof(res));
528 	if (res == 0)
529 		message("Added to bookmarks!");
530 	else
531 		message("Failed to add to bookmarks: %s",
532 		    strerror(res));
533 }
534 
535 static void
536 handle_imsg_save_cert_ok(struct imsg *imsg, size_t datalen)
537 {
538 	int res;
539 
540 	if (datalen != sizeof(res))
541 		die();
542 	memcpy(&res, imsg->data, datalen);
543 	if (res != 0)
544 		message("Failed to save the cert for: %s",
545 		    strerror(res));
546 }
547 
548 static void
549 handle_imsg_update_cert_ok(struct imsg *imsg, size_t datalen)
550 {
551 	int res;
552 
553 	if (datalen != sizeof(res))
554 		die();
555 	memcpy(&res, imsg->data, datalen);
556 	if (!res)
557 		message("Failed to update the certificate");
558 }
559 
560 static void
561 handle_dispatch_imsg(int fd, short ev, void *d)
562 {
563 	struct imsgev	*iev = d;
564 
565 	if (dispatch_imsg(iev, ev, handlers, sizeof(handlers)) == -1)
566 		err(1, "connection closed");
567 }
568 
569 static int
570 load_about_url(struct tab *tab, const char *url)
571 {
572 	tab->trust = TS_UNKNOWN;
573 	parser_init(tab, gemtext_initparser);
574 	return make_fs_request(tab, IMSG_GET, url);
575 }
576 
577 static int
578 load_file_url(struct tab *tab, const char *url)
579 {
580 	tab->trust = TS_UNKNOWN;
581 	return make_fs_request(tab, IMSG_GET_FILE, tab->uri.path);
582 }
583 
584 static int
585 load_finger_url(struct tab *tab, const char *url)
586 {
587 	struct get_req	 req;
588 	size_t		 len;
589 	char		*at;
590 
591 	memset(&req, 0, sizeof(req));
592 	strlcpy(req.port, tab->uri.port, sizeof(req.port));
593 
594 	/*
595 	 * Sometimes the finger url have the user as path component
596 	 * (e.g. finger://thelambdalab.xyz/plugd), sometimes as
597 	 * userinfo (e.g. finger://cobradile@finger.farm).
598 	 */
599 	if ((at = strchr(tab->uri.host, '@')) != NULL) {
600 		len = at - tab->uri.host;
601 		memcpy(req.req, tab->uri.host, len);
602 
603 		if (len >= sizeof(req.req))
604 			die();
605 		req.req[len] = '\0';
606 
607 		strlcpy(req.host, at+1, sizeof(req.host));
608 	} else {
609 		strlcpy(req.host, tab->uri.host, sizeof(req.host));
610 
611 		/* +1 to skip the initial `/' */
612 		strlcpy(req.req, tab->uri.path+1, sizeof(req.req));
613 	}
614 	strlcat(req.req, "\r\n", sizeof(req.req));
615 
616 	parser_init(tab, textplain_initparser);
617 	return make_request(tab, &req, PROTO_FINGER, NULL);
618 }
619 
620 static int
621 load_gemini_url(struct tab *tab, const char *url)
622 {
623 	struct get_req	 req;
624 
625 	memset(&req, 0, sizeof(req));
626 	strlcpy(req.host, tab->uri.host, sizeof(req.host));
627 	strlcpy(req.port, tab->uri.port, sizeof(req.host));
628 
629 	return make_request(tab, &req, PROTO_GEMINI, tab->hist_cur->h);
630 }
631 
632 static inline const char *
633 gopher_skip_selector(const char *path, int *ret_type)
634 {
635 	*ret_type = 0;
636 
637 	if (!strcmp(path, "/") || *path == '\0') {
638 		*ret_type = '1';
639 		return path;
640 	}
641 
642 	if (*path != '/')
643 		return path;
644 	path++;
645 
646 	switch (*ret_type = *path) {
647 	case '0':
648 	case '1':
649 	case '7':
650 		break;
651 
652 	default:
653 		*ret_type = 0;
654 		path -= 1;
655 		return path;
656 	}
657 
658 	path++;
659 	if (*path == '/')
660 		path++;
661 
662 	return path;
663 }
664 
665 static int
666 load_gopher_url(struct tab *tab, const char *url)
667 {
668 	struct get_req	 req;
669 	int		 type;
670 	const char	*path;
671 
672 	memset(&req, 0, sizeof(req));
673 	strlcpy(req.host, tab->uri.host, sizeof(req.host));
674 	strlcpy(req.port, tab->uri.port, sizeof(req.host));
675 
676 	path = gopher_skip_selector(tab->uri.path, &type);
677 	switch (type) {
678 	case '0':
679 		parser_init(tab, textplain_initparser);
680 		break;
681 	case '1':
682 		parser_init(tab, gophermap_initparser);
683 		break;
684 	case '7':
685 		ui_require_input(tab, 0, PROTO_GOPHER);
686 		return load_page_from_str(tab, err_pages[10]);
687 	default:
688 		return load_page_from_str(tab, "Unknown gopher selector");
689 	}
690 
691 	strlcpy(req.req, path, sizeof(req.req));
692 	if (*tab->uri.query != '\0') {
693 		strlcat(req.req, "?", sizeof(req.req));
694 		strlcat(req.req, tab->uri.query, sizeof(req.req));
695 	}
696 	strlcat(req.req, "\r\n", sizeof(req.req));
697 
698 	return make_request(tab, &req, PROTO_GOPHER, NULL);
699 }
700 
701 static int
702 load_via_proxy(struct tab *tab, const char *url, struct proxy *p)
703 {
704 	struct get_req req;
705 
706 	memset(&req, 0, sizeof(req));
707 	strlcpy(req.host, p->host, sizeof(req.host));
708 	strlcpy(req.port, p->port, sizeof(req.host));
709 
710 	tab->proxy = p;
711 
712 	return make_request(tab, &req, p->proto, tab->hist_cur->h);
713 }
714 
715 static int
716 make_request(struct tab *tab, struct get_req *req, int proto, const char *r)
717 {
718 	stop_tab(tab);
719 	tab->id = tab_new_id();
720 	req->proto = proto;
721 
722 	if (r != NULL) {
723 		strlcpy(req->req, r, sizeof(req->req));
724 		strlcat(req->req, "\r\n", sizeof(req->req));
725 	}
726 
727 	ui_send_net(IMSG_GET_RAW, tab->id, req, sizeof(*req));
728 
729 	/*
730 	 * So the various load_*_url can `return make_request` and
731 	 * do_load_url is happy.
732 	 */
733 	return 1;
734 }
735 
736 static int
737 make_fs_request(struct tab *tab, int type, const char *r)
738 {
739 	stop_tab(tab);
740 	tab->id = tab_new_id();
741 
742 	ui_send_fs(type, tab->id, r, strlen(r)+1);
743 
744 	/*
745 	 * So load_{about,file}_url can `return make_fs_request` and
746 	 * do_load_url is happy.
747 	 */
748 	return 1;
749 }
750 
751 void
752 gopher_send_search_req(struct tab *tab, const char *text)
753 {
754 	struct get_req	req;
755 
756 	start_loading_anim(tab);
757 
758 	memset(&req, 0, sizeof(req));
759 	strlcpy(req.host, tab->uri.host, sizeof(req.host));
760 	strlcpy(req.port, tab->uri.port, sizeof(req.host));
761 
762 	/* +2 to skip /7 */
763 	strlcpy(req.req, tab->uri.path+2, sizeof(req.req));
764 	if (*tab->uri.query != '\0') {
765 		strlcat(req.req, "?", sizeof(req.req));
766 		strlcat(req.req, tab->uri.query, sizeof(req.req));
767 	}
768 
769 	strlcat(req.req, "\t", sizeof(req.req));
770 	strlcat(req.req, text, sizeof(req.req));
771 	strlcat(req.req, "\r\n", sizeof(req.req));
772 
773 	erase_buffer(&tab->buffer);
774 	parser_init(tab, gophermap_initparser);
775 
776 	make_request(tab, &req, PROTO_GOPHER, NULL);
777 }
778 
779 /*
780  * Effectively load the given url in the given tab.  Return 1 when
781  * loading the page asynchronously, and thus when an erase_buffer can
782  * be done right after this function return, or 0 when loading the
783  * page synchronously.  In this last case, erase_buffer *MUST* be
784  * called by the handling function (such as load_page_from_str).
785  */
786 static int
787 do_load_url(struct tab *tab, const char *url, const char *base)
788 {
789 	struct phos_uri	 uri;
790 	struct proto	*p;
791 	struct proxy	*proxy;
792 	char		*t;
793 
794 	tab->proxy = NULL;
795 
796 	if (tab->fd != -1) {
797 		close(tab->fd);
798 		tab->fd = -1;
799 		free(tab->path);
800 		tab->path = NULL;
801 	}
802 
803 	tab->trust = TS_UNKNOWN;
804 
805 	if (base == NULL)
806 		memcpy(&uri, &tab->uri, sizeof(tab->uri));
807 	else
808 		phos_parse_absolute_uri(base, &uri);
809 
810 	if (!phos_resolve_uri_from_str(&uri, url, &tab->uri)) {
811 		if (asprintf(&t, "#error loading %s\n>%s\n",
812 		    url, "Can't parse the URI") == -1)
813 			die();
814 		strlcpy(tab->hist_cur->h, url, sizeof(tab->hist_cur->h));
815 		load_page_from_str(tab, t);
816 		free(t);
817 		return 0;
818 	}
819 
820 	phos_serialize_uri(&tab->uri, tab->hist_cur->h,
821 	    sizeof(tab->hist_cur->h));
822 
823 	for (p = protos; p->schema != NULL; ++p) {
824 		if (!strcmp(tab->uri.scheme, p->schema)) {
825 			/* patch the port */
826 			if (*tab->uri.port == '\0' && p->port != NULL)
827 				strlcpy(tab->uri.port, p->port,
828 				    sizeof(tab->uri.port));
829 
830 			return p->loadfn(tab, url);
831 		}
832 	}
833 
834 	TAILQ_FOREACH(proxy, &proxies, proxies) {
835 		if (!strcmp(tab->uri.scheme, proxy->match_proto))
836 			return load_via_proxy(tab, url, proxy);
837 	}
838 
839 	return load_page_from_str(tab, err_pages[UNKNOWN_PROTOCOL]);
840 }
841 
842 /*
843  * Load url in tab.  If tab is marked as lazy, only prepare the url
844  * but don't load it.  If tab is lazy and a url was already prepared,
845  * do load it!
846  */
847 void
848 load_url(struct tab *tab, const char *url, const char *base, int nohist)
849 {
850 	int lazy;
851 
852 	lazy = tab->flags & TAB_LAZY;
853 
854 	if (lazy && tab->hist_cur != NULL) {
855 		lazy = 0;
856 		tab->flags &= ~TAB_LAZY;
857 	}
858 
859 	/* can't have both nohist and lazy at the same time. */
860 	if (nohist && lazy)
861 		nohist = 0;
862 
863 	if (!nohist && (!lazy || tab->hist_cur == NULL)) {
864 		if (tab->hist_cur != NULL)
865 			hist_clear_forward(&tab->hist,
866 			    TAILQ_NEXT(tab->hist_cur, entries));
867 
868 		if ((tab->hist_cur = calloc(1, sizeof(*tab->hist_cur)))
869 		    == NULL) {
870 			event_loopbreak();
871 			return;
872 		}
873 
874 		strlcpy(tab->buffer.page.title, url,
875 		    sizeof(tab->buffer.page.title));
876 		hist_push(&tab->hist, tab->hist_cur);
877 
878 		if (lazy)
879 			strlcpy(tab->hist_cur->h, url,
880 			    sizeof(tab->hist_cur->h));
881 	}
882 
883 	if (!lazy && do_load_url(tab, url, base))
884 		erase_buffer(&tab->buffer);
885 }
886 
887 void
888 load_url_in_tab(struct tab *tab, const char *url, const char *base, int nohist)
889 {
890 	if (!operating) {
891 		load_url(tab, url, base, nohist);
892 		return;
893 	}
894 
895 	autosave_hook();
896 
897 	message("Loading %s...", url);
898 	start_loading_anim(tab);
899 	load_url(tab, url, base, nohist);
900 }
901 
902 int
903 load_previous_page(struct tab *tab)
904 {
905 	struct hist	*h;
906 
907 	if ((h = TAILQ_PREV(tab->hist_cur, mhisthead, entries)) == NULL)
908 		return 0;
909 	tab->hist_cur = h;
910 	do_load_url(tab, h->h, NULL);
911 	return 1;
912 }
913 
914 int
915 load_next_page(struct tab *tab)
916 {
917 	struct hist	*h;
918 
919 	if ((h = TAILQ_NEXT(tab->hist_cur, entries)) == NULL)
920 		return 0;
921 	tab->hist_cur = h;
922 	do_load_url(tab, h->h, NULL);
923 	return 1;
924 }
925 
926 void
927 add_to_bookmarks(const char *str)
928 {
929 	ui_send_fs(IMSG_BOOKMARK_PAGE, 0,
930 	    str, strlen(str)+1);
931 }
932 
933 /*
934  *  Given a user-entered URL, apply some heuristics to use it:
935  *
936  *  - if it's a proper url use it
937  *  - if it starts with a `./' or a `/' assume its a file:// url
938  *  - assume it's a gemini:// url
939  *
940  *  `ret' (of which len is the size) will be filled with the resulting
941  *  url.
942  */
943 void
944 humanify_url(const char *raw, char *ret, size_t len)
945 {
946 	struct phos_uri	uri;
947 	char		buf[PATH_MAX];
948 
949 	if (phos_parse_absolute_uri(raw, &uri)) {
950 		strlcpy(ret, raw, len);
951 		return;
952 	}
953 
954 	if (has_prefix(raw, "./")) {
955 		strlcpy(ret, "file://", len);
956 		getcwd(buf, sizeof(buf));
957 		strlcat(ret, buf, len);
958 		strlcat(ret, "/", len);
959 		strlcat(ret, raw+2, len);
960 		return;
961 	}
962 
963 	if (*raw == '/') {
964 		strlcpy(ret, "file://", len);
965 		strlcat(ret, raw, len);
966 		return;
967 	}
968 
969 	strlcpy(ret, "gemini://", len);
970 	strlcat(ret, raw, len);
971 }
972 
973 static pid_t
974 start_child(enum telescope_process p, const char *argv0, int fd)
975 {
976 	const char	*argv[4];
977 	int		 argc = 0;
978 	pid_t		 pid;
979 
980 	switch (pid = fork()) {
981 	case -1:
982 		die();
983 	case 0:
984 		break;
985 	default:
986 		close(fd);
987 		return pid;
988 	}
989 
990 	if (dup2(fd, 3) == -1)
991 		err(1, "cannot setup imsg fd");
992 
993 	argv[argc++] = argv0;
994 	switch (p) {
995 	case PROC_UI:
996 		errx(1, "Can't start ui process");
997 	case PROC_FS:
998 		argv[argc++] = "-Tf";
999 		break;
1000 	case PROC_NET:
1001 		argv[argc++] = "-Tn";
1002 		break;
1003 	}
1004 
1005 	argv[argc++] = NULL;
1006 	execvp(argv0, (char *const *)argv);
1007 	err(1, "execvp(%s)", argv0);
1008 }
1009 
1010 int
1011 ui_send_net(int type, uint32_t peerid, const void *data,
1012     uint16_t datalen)
1013 {
1014 	return imsg_compose_event(iev_net, type, peerid, 0, -1, data,
1015 	    datalen);
1016 }
1017 
1018 int
1019 ui_send_fs(int type, uint32_t peerid, const void *data, uint16_t datalen)
1020 {
1021 	return imsg_compose_event(iev_fs, type, peerid, 0, -1, data,
1022 	    datalen);
1023 }
1024 
1025 static void __attribute__((noreturn))
1026 usage(int r)
1027 {
1028 	fprintf(stderr, "USAGE: %s [-hnv] [-c config] [url]\n",
1029 	    getprogname());
1030 	fprintf(stderr, "version: " PACKAGE " " VERSION "\n");
1031 	exit(r);
1032 }
1033 
1034 int
1035 main(int argc, char * const *argv)
1036 {
1037 	struct imsgev	 net_ibuf, fs_ibuf;
1038 	pid_t		 pid;
1039 	int		 pipe2net[2], pipe2fs[2];
1040 	int		 ch, configtest = 0, fail = 0;
1041 	int		 has_url = 0;
1042 	int		 proc = -1;
1043 	int		 sessionfd;
1044 	int		 status;
1045 	char		 path[PATH_MAX], url[GEMINI_URL_LEN+1];
1046 	const char	*argv0;
1047 
1048 	argv0 = argv[0];
1049 
1050 	signal(SIGCHLD, SIG_IGN);
1051 	signal(SIGPIPE, SIG_IGN);
1052 
1053 	if (getenv("NO_COLOR") != NULL)
1054 		enable_colors = 0;
1055 
1056 	strlcpy(path, getenv("HOME"), sizeof(path));
1057 	strlcat(path, "/.telescope/config", sizeof(path));
1058 
1059 	while ((ch = getopt_long(argc, argv, opts, longopts, NULL)) != -1) {
1060 		switch (ch) {
1061 		case 'C':
1062 			exit(ui_print_colors());
1063 		case 'c':
1064 			fail = 1;
1065 			strlcpy(path, optarg, sizeof(path));
1066 			break;
1067 		case 'n':
1068 			configtest = 1;
1069 			break;
1070 		case 'h':
1071 			usage(0);
1072 		case 'T':
1073 			switch (*optarg) {
1074 			case 'f':
1075 				proc = PROC_FS;
1076 				break;
1077 			case 'n':
1078 				proc = PROC_NET;
1079 				break;
1080 			default:
1081 				errx(1, "invalid process spec %c",
1082 				    *optarg);
1083 			}
1084 			break;
1085 		case 'v':
1086 			printf("%s %s\n", PACKAGE_NAME, PACKAGE_VERSION);
1087 			exit(0);
1088 			break;
1089 		default:
1090 			usage(1);
1091 		}
1092 	}
1093 
1094 	argc -= optind;
1095 	argv += optind;
1096 
1097 	if (proc != -1) {
1098 		if (argc > 0)
1099 			usage(1);
1100 		else if (proc == PROC_FS)
1101 			return fs_main();
1102 		else if (proc == PROC_NET)
1103 			return net_main();
1104 		else
1105 			usage(1);
1106 	}
1107 
1108 	if (argc != 0) {
1109 		has_url = 1;
1110 		humanify_url(argv[0], url, sizeof(url));
1111 	}
1112 
1113 	/* setup keys before reading the config */
1114 	TAILQ_INIT(&global_map.m);
1115 	global_map.unhandled_input = global_key_unbound;
1116 	TAILQ_INIT(&minibuffer_map.m);
1117 
1118 	config_init();
1119 	parseconfig(path, fail);
1120 	if (configtest) {
1121 		puts("config OK");
1122 		exit(0);
1123 	}
1124 
1125 	fs_init();
1126 	if ((sessionfd = lock_session()) == -1)
1127 		errx(1, "can't lock session, is another instance of "
1128 		    "telescope already running?");
1129 
1130 	/* Start children. */
1131 	if (socketpair(AF_UNIX, SOCK_STREAM, PF_UNSPEC, pipe2fs) == -1)
1132 		err(1, "socketpair");
1133 	start_child(PROC_FS, argv0, pipe2fs[1]);
1134 	imsg_init(&fs_ibuf.ibuf, pipe2fs[0]);
1135 	iev_fs = &fs_ibuf;
1136 	iev_fs->handler = handle_dispatch_imsg;
1137 
1138 	if (socketpair(AF_UNIX, SOCK_STREAM, PF_UNSPEC, pipe2net) == -1)
1139 		err(1, "socketpair");
1140 	start_child(PROC_NET, argv0, pipe2net[1]);
1141 	imsg_init(&net_ibuf.ibuf, pipe2net[0]);
1142 	iev_net = &net_ibuf;
1143 	iev_net->handler = handle_dispatch_imsg;
1144 
1145 	setproctitle("ui");
1146 
1147 	/* initialize tofu & load certificates */
1148 	tofu_init(&certs, 5, offsetof(struct tofu_entry, domain));
1149 	load_certs(&certs);
1150 
1151 	event_init();
1152 
1153 	/* Setup event handler for the autosave */
1154 	autosave_init();
1155 
1156 	/* Setup event handlers for pipes to fs/net */
1157 	iev_fs->events = EV_READ;
1158 	event_set(&iev_fs->ev, iev_fs->ibuf.fd, iev_fs->events,
1159 	    iev_fs->handler, iev_fs);
1160 	event_add(&iev_fs->ev, NULL);
1161 
1162 	iev_net->events = EV_READ;
1163 	event_set(&iev_net->ev, iev_net->ibuf.fd, iev_net->events,
1164 	    iev_net->handler, iev_net);
1165 	event_add(&iev_net->ev, NULL);
1166 
1167 	if (ui_init()) {
1168 		load_last_session();
1169 		if (has_url || TAILQ_EMPTY(&tabshead))
1170 			new_tab(url, NULL, NULL);
1171 
1172 		sandbox_ui_process();
1173 		operating = 1;
1174 		ui_main_loop();
1175 		ui_end();
1176 	}
1177 
1178 	ui_send_fs(IMSG_QUIT, 0, NULL, 0);
1179 	ui_send_net(IMSG_QUIT, 0, NULL, 0);
1180 	imsg_flush(&iev_fs->ibuf);
1181 	imsg_flush(&iev_net->ibuf);
1182 
1183 	/* wait for children to terminate */
1184 	do {
1185 		pid = wait(&status);
1186 		if (pid == -1) {
1187 			if (errno != EINTR && errno != ECHILD)
1188 				err(1, "wait");
1189 		} else if (WIFSIGNALED(status))
1190 			warnx("child terminated; signal %d", WTERMSIG(status));
1191 	} while (pid != -1 || (pid == -1 && errno == EINTR));
1192 
1193 	close(sessionfd);
1194 
1195 	return 0;
1196 }