1 /*
2  * Copyright (c) 2016, 2019, 2020-2022 Tracey Emery <tracey@traceyemery.net>
3  * Copyright (c) 2015 Mike Larkin <mlarkin@openbsd.org>
4  * Copyright (c) 2014 Reyk Floeter <reyk@openbsd.org>
5  * Copyright (c) 2013 David Gwynne <dlg@openbsd.org>
6  * Copyright (c) 2013 Florian Obser <florian@openbsd.org>
7  *
8  * Permission to use, copy, modify, and distribute this software for any
9  * purpose with or without fee is hereby granted, provided that the above
10  * copyright notice and this permission notice appear in all copies.
11  *
12  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
13  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
14  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
15  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
16  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
17  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
18  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
19  */
20 
21 #include <net/if.h>
22 #include <netinet/in.h>
23 #include <sys/queue.h>
24 #include <sys/stat.h>
25 #include <sys/types.h>
26 
27 #include <ctype.h>
28 #include <dirent.h>
29 #include <errno.h>
30 #include <event.h>
31 #include <fcntl.h>
32 #include <imsg.h>
33 #include <sha1.h>
34 #include <sha2.h>
35 #include <stdio.h>
36 #include <stdlib.h>
37 #include <string.h>
38 #include <unistd.h>
39 
40 #include "got_error.h"
41 #include "got_object.h"
42 #include "got_reference.h"
43 #include "got_repository.h"
44 #include "got_path.h"
45 #include "got_cancel.h"
46 #include "got_worktree.h"
47 #include "got_diff.h"
48 #include "got_commit_graph.h"
49 #include "got_blame.h"
50 #include "got_privsep.h"
51 
52 #include "proc.h"
53 #include "gotwebd.h"
54 #include "tmpl.h"
55 
56 static const struct querystring_keys querystring_keys[] = {
57 	{ "action",		ACTION },
58 	{ "commit",		COMMIT },
59 	{ "file",		RFILE },
60 	{ "folder",		FOLDER },
61 	{ "headref",		HEADREF },
62 	{ "index_page",		INDEX_PAGE },
63 	{ "path",		PATH },
64 	{ "page",		PAGE },
65 };
66 
67 static const struct action_keys action_keys[] = {
68 	{ "blame",	BLAME },
69 	{ "blob",	BLOB },
70 	{ "blobraw",	BLOBRAW },
71 	{ "briefs",	BRIEFS },
72 	{ "commits",	COMMITS },
73 	{ "diff",	DIFF },
74 	{ "error",	ERR },
75 	{ "index",	INDEX },
76 	{ "summary",	SUMMARY },
77 	{ "tag",	TAG },
78 	{ "tags",	TAGS },
79 	{ "tree",	TREE },
80 	{ "rss",	RSS },
81 };
82 
83 static const struct got_error *gotweb_init_querystring(struct querystring **);
84 static const struct got_error *gotweb_parse_querystring(struct querystring **,
85     char *);
86 static const struct got_error *gotweb_assign_querystring(struct querystring **,
87     char *, char *);
88 static const struct got_error *gotweb_render_index(struct request *);
89 static const struct got_error *gotweb_init_repo_dir(struct repo_dir **,
90     const char *);
91 static const struct got_error *gotweb_load_got_path(struct request *c,
92     struct repo_dir *);
93 static const struct got_error *gotweb_get_repo_description(char **,
94     struct server *, const char *, int);
95 static const struct got_error *gotweb_get_clone_url(char **, struct server *,
96     const char *, int);
97 
98 static void gotweb_free_querystring(struct querystring *);
99 static void gotweb_free_repo_dir(struct repo_dir *);
100 
101 struct server *gotweb_get_server(uint8_t *, uint8_t *);
102 
103 static int
104 gotweb_reply(struct request *c, int status, const char *ctype,
105     struct gotweb_url *location)
106 {
107 	const char	*csp;
108 
109 	if (status != 200 && fcgi_printf(c, "Status: %d\r\n", status) == -1)
110 		return -1;
111 
112 	if (location) {
113 		if (fcgi_puts(c->tp, "Location: ") == -1 ||
114 		    gotweb_render_url(c, location) == -1 ||
115 		    fcgi_puts(c->tp, "\r\n") == -1)
116 			return -1;
117 	}
118 
119 	csp = "Content-Security-Policy: default-src 'self'; "
120 	    "script-src 'none'; object-src 'none';\r\n";
121 	if (fcgi_puts(c->tp, csp) == -1)
122 		return -1;
123 
124 	if (ctype && fcgi_printf(c, "Content-Type: %s\r\n", ctype) == -1)
125 		return -1;
126 
127 	return fcgi_puts(c->tp, "\r\n");
128 }
129 
130 static int
131 gotweb_reply_file(struct request *c, const char *ctype, const char *file,
132     const char *suffix)
133 {
134 	int r;
135 
136 	r = fcgi_printf(c, "Content-Disposition: attachment; "
137 	    "filename=%s%s\r\n", file, suffix ? suffix : "");
138 	if (r == -1)
139 		return -1;
140 	return gotweb_reply(c, 200, ctype, NULL);
141 }
142 
143 void
144 gotweb_process_request(struct request *c)
145 {
146 	const struct got_error *error = NULL, *error2 = NULL;
147 	struct got_blob_object *blob = NULL;
148 	struct server *srv = NULL;
149 	struct querystring *qs = NULL;
150 	struct repo_dir *repo_dir = NULL;
151 	struct got_reflist_head refs;
152 	FILE *fp = NULL;
153 	uint8_t err[] = "gotwebd experienced an error: ";
154 	int r, html = 0, fd = -1;
155 
156 	TAILQ_INIT(&refs);
157 
158 	/* init the transport */
159 	error = gotweb_init_transport(&c->t);
160 	if (error) {
161 		log_warnx("%s: %s", __func__, error->msg);
162 		return;
163 	}
164 	/* don't process any further if client disconnected */
165 	if (c->sock->client_status == CLIENT_DISCONNECT)
166 		return;
167 	/* get the gotwebd server */
168 	srv = gotweb_get_server(c->server_name, c->http_host);
169 	if (srv == NULL) {
170 		log_warnx("%s: error server is NULL", __func__);
171 		goto err;
172 	}
173 	c->srv = srv;
174 	/* parse our querystring */
175 	error = gotweb_init_querystring(&qs);
176 	if (error) {
177 		log_warnx("%s: %s", __func__, error->msg);
178 		goto err;
179 	}
180 	c->t->qs = qs;
181 	error = gotweb_parse_querystring(&qs, c->querystring);
182 	if (error) {
183 		log_warnx("%s: %s", __func__, error->msg);
184 		goto err;
185 	}
186 
187 	/*
188 	 * certain actions require a commit id in the querystring. this stops
189 	 * bad actors from exploiting this by manually manipulating the
190 	 * querystring.
191 	 */
192 
193 	if (qs->action == BLAME || qs->action == BLOB ||
194 	    qs->action == BLOBRAW || qs->action == DIFF) {
195 		if (qs->commit == NULL) {
196 			error2 = got_error(GOT_ERR_QUERYSTRING);
197 			goto render;
198 		}
199 	}
200 
201 	if (qs->action != INDEX) {
202 		error = gotweb_init_repo_dir(&repo_dir, qs->path);
203 		if (error)
204 			goto done;
205 		error = gotweb_load_got_path(c, repo_dir);
206 		c->t->repo_dir = repo_dir;
207 		if (error && error->code != GOT_ERR_LONELY_PACKIDX)
208 			goto err;
209 	}
210 
211 	if (qs->action == BLOBRAW) {
212 		const uint8_t *buf;
213 		size_t len;
214 		int binary, r;
215 
216 		error = got_get_repo_commits(c, 1);
217 		if (error)
218 			goto done;
219 
220 		error2 = got_open_blob_for_output(&blob, &fd, &binary, c);
221 		if (error2)
222 			goto render;
223 
224 		if (binary)
225 			r = gotweb_reply_file(c, "application/octet-stream",
226 			    qs->file, NULL);
227 		else
228 			r = gotweb_reply(c, 200, "text/plain", NULL);
229 		if (r == -1)
230 			goto done;
231 
232 		for (;;) {
233 			error = got_object_blob_read_block(&len, blob);
234 			if (error)
235 				goto done;
236 			if (len == 0)
237 				break;
238 			buf = got_object_blob_get_read_buf(blob);
239 			if (fcgi_gen_binary_response(c, buf, len) == -1)
240 				goto done;
241 		}
242 
243 		goto done;
244 	}
245 
246 	if (qs->action == BLOB) {
247 		int binary;
248 		struct gotweb_url url = {
249 			.index_page = -1,
250 			.page = -1,
251 			.action = BLOBRAW,
252 			.path = qs->path,
253 			.commit = qs->commit,
254 			.folder = qs->folder,
255 			.file = qs->file,
256 		};
257 
258 		error = got_get_repo_commits(c, 1);
259 		if (error)
260 			goto done;
261 
262 		error2 = got_open_blob_for_output(&blob, &fd, &binary, c);
263 		if (error2)
264 			goto render;
265 		if (binary) {
266 			gotweb_reply(c, 302, NULL, &url);
267 			goto done;
268 		}
269 	}
270 
271 	if (qs->action == RSS) {
272 		const char *ctype = "application/rss+xml;charset=utf-8";
273 
274 		if (gotweb_reply_file(c, ctype, repo_dir->name, ".rss") == -1)
275 			goto done;
276 
277 		error = got_get_repo_tags(c, D_MAXSLCOMMDISP);
278 		if (error) {
279 			log_warnx("%s: %s", __func__, error->msg);
280 			goto err;
281 		}
282 		if (gotweb_render_rss(c->tp) == -1)
283 			goto err;
284 		goto done;
285 	}
286 
287 render:
288 	if (gotweb_reply(c, 200, "text/html", NULL) == -1)
289 		goto done;
290 	html = 1;
291 
292 	if (gotweb_render_header(c->tp) == -1)
293 		goto err;
294 
295 	if (error2) {
296 		error = error2;
297 		goto err;
298 	}
299 
300 	switch(qs->action) {
301 	case BLAME:
302 		error = got_get_repo_commits(c, 1);
303 		if (error) {
304 			log_warnx("%s: %s", __func__, error->msg);
305 			goto err;
306 		}
307 		if (gotweb_render_blame(c->tp) == -1)
308 			goto done;
309 		break;
310 	case BLOB:
311 		if (gotweb_render_blob(c->tp, blob) == -1)
312 			goto err;
313 		break;
314 	case BRIEFS:
315 		if (gotweb_render_briefs(c->tp) == -1)
316 			goto err;
317 		break;
318 	case COMMITS:
319 		error = got_get_repo_commits(c, srv->max_commits_display);
320 		if (error) {
321 			log_warnx("%s: %s", __func__, error->msg);
322 			goto err;
323 		}
324 		if (gotweb_render_commits(c->tp) == -1)
325 			goto err;
326 		break;
327 	case DIFF:
328 		error = got_get_repo_commits(c, 1);
329 		if (error) {
330 			log_warnx("%s: %s", __func__, error->msg);
331 			goto err;
332 		}
333 		error = got_open_diff_for_output(&fp, &fd, c);
334 		if (error) {
335 			log_warnx("%s: %s", __func__, error->msg);
336 			goto err;
337 		}
338 		if (gotweb_render_diff(c->tp, fp) == -1)
339 			goto err;
340 		break;
341 	case INDEX:
342 		error = gotweb_render_index(c);
343 		if (error) {
344 			log_warnx("%s: %s", __func__, error->msg);
345 			goto err;
346 		}
347 		break;
348 	case SUMMARY:
349 		error = got_ref_list(&refs, c->t->repo, "refs/heads",
350 		    got_ref_cmp_by_name, NULL);
351 		if (error) {
352 			log_warnx("%s: got_ref_list: %s", __func__,
353 			    error->msg);
354 			goto err;
355 		}
356 		qs->action = TAGS;
357 		error = got_get_repo_tags(c, D_MAXSLCOMMDISP);
358 		if (error) {
359 			log_warnx("%s: got_get_repo_tags: %s", __func__,
360 			    error->msg);
361 			goto err;
362 		}
363 		qs->action = SUMMARY;
364 		if (gotweb_render_summary(c->tp, &refs) == -1)
365 			goto done;
366 		break;
367 	case TAG:
368 		error = got_get_repo_tags(c, 1);
369 		if (error) {
370 			log_warnx("%s: %s", __func__, error->msg);
371 			goto err;
372 		}
373 		if (c->t->tag_count == 0) {
374 			error = got_error_msg(GOT_ERR_BAD_OBJ_ID,
375 			    "bad commit id");
376 			goto err;
377 		}
378 		if (gotweb_render_tag(c->tp) == -1)
379 			goto done;
380 		break;
381 	case TAGS:
382 		error = got_get_repo_tags(c, srv->max_commits_display);
383 		if (error) {
384 			log_warnx("%s: %s", __func__, error->msg);
385 			goto err;
386 		}
387 		if (gotweb_render_tags(c->tp) == -1)
388 			goto done;
389 		break;
390 	case TREE:
391 		error = got_get_repo_commits(c, 1);
392 		if (error) {
393 			log_warnx("%s: %s", __func__, error->msg);
394 			goto err;
395 		}
396 		if (gotweb_render_tree(c->tp) == -1)
397 			goto err;
398 		break;
399 	case ERR:
400 	default:
401 		r = fcgi_printf(c, "<div id='err_content'>%s</div>\n",
402 		    "Erorr: Bad Querystring");
403 		if (r == -1)
404 			goto err;
405 		break;
406 	}
407 
408 	goto done;
409 err:
410 	if (html && fcgi_printf(c, "<div id='err_content'>") == -1)
411 		return;
412 	if (fcgi_printf(c, "\n%s", err) == -1)
413 		return;
414 	if (error) {
415 		if (fcgi_printf(c, "%s", error->msg) == -1)
416 			return;
417 	} else {
418 		if (fcgi_printf(c, "see daemon logs for details") == -1)
419 			return;
420 	}
421 	if (html && fcgi_printf(c, "</div>\n") == -1)
422 		return;
423 done:
424 	if (blob)
425 		got_object_blob_close(blob);
426 	if (fp) {
427 		error = got_gotweb_flushfile(fp, fd);
428 		if (error)
429 			log_warnx("%s: got_gotweb_flushfile failure: %s",
430 			    __func__, error->msg);
431 		fd = -1;
432 	}
433 	if (fd != -1)
434 		close(fd);
435 	if (html && srv != NULL)
436 		gotweb_render_footer(c->tp);
437 
438 	got_ref_list_free(&refs);
439 }
440 
441 struct server *
442 gotweb_get_server(uint8_t *server_name, uint8_t *subdomain)
443 {
444 	struct server *srv = NULL;
445 
446 	/* check against the server name first */
447 	if (strlen(server_name) > 0)
448 		TAILQ_FOREACH(srv, &gotwebd_env->servers, entry)
449 			if (strcmp(srv->name, server_name) == 0)
450 				goto done;
451 
452 	/* check against subdomain second */
453 	if (strlen(subdomain) > 0)
454 		TAILQ_FOREACH(srv, &gotwebd_env->servers, entry)
455 			if (strcmp(srv->name, subdomain) == 0)
456 				goto done;
457 
458 	/* if those fail, send first server */
459 	TAILQ_FOREACH(srv, &gotwebd_env->servers, entry)
460 		if (srv != NULL)
461 			break;
462 done:
463 	return srv;
464 };
465 
466 const struct got_error *
467 gotweb_init_transport(struct transport **t)
468 {
469 	const struct got_error *error = NULL;
470 
471 	*t = calloc(1, sizeof(**t));
472 	if (*t == NULL)
473 		return got_error_from_errno2("%s: calloc", __func__);
474 
475 	TAILQ_INIT(&(*t)->repo_commits);
476 	TAILQ_INIT(&(*t)->repo_tags);
477 
478 	(*t)->repo = NULL;
479 	(*t)->repo_dir = NULL;
480 	(*t)->qs = NULL;
481 	(*t)->next_id = NULL;
482 	(*t)->prev_id = NULL;
483 	(*t)->next_disp = 0;
484 	(*t)->prev_disp = 0;
485 
486 	return error;
487 }
488 
489 static const struct got_error *
490 gotweb_init_querystring(struct querystring **qs)
491 {
492 	const struct got_error *error = NULL;
493 
494 	*qs = calloc(1, sizeof(**qs));
495 	if (*qs == NULL)
496 		return got_error_from_errno2("%s: calloc", __func__);
497 
498 	(*qs)->headref = strdup("HEAD");
499 	if ((*qs)->headref == NULL) {
500 		free(*qs);
501 		*qs = NULL;
502 		return got_error_from_errno2("%s: strdup", __func__);
503 	}
504 
505 	(*qs)->action = INDEX;
506 	(*qs)->commit = NULL;
507 	(*qs)->file = NULL;
508 	(*qs)->folder = NULL;
509 	(*qs)->index_page = 0;
510 	(*qs)->path = NULL;
511 
512 	return error;
513 }
514 
515 static const struct got_error *
516 gotweb_parse_querystring(struct querystring **qs, char *qst)
517 {
518 	const struct got_error *error = NULL;
519 	char *tok1 = NULL, *tok1_pair = NULL, *tok1_end = NULL;
520 	char *tok2 = NULL, *tok2_pair = NULL, *tok2_end = NULL;
521 
522 	if (qst == NULL)
523 		return error;
524 
525 	tok1 = strdup(qst);
526 	if (tok1 == NULL)
527 		return got_error_from_errno2("%s: strdup", __func__);
528 
529 	tok1_pair = tok1;
530 	tok1_end = tok1;
531 
532 	while (tok1_pair != NULL) {
533 		strsep(&tok1_end, "&");
534 
535 		tok2 = strdup(tok1_pair);
536 		if (tok2 == NULL) {
537 			free(tok1);
538 			return got_error_from_errno2("%s: strdup", __func__);
539 		}
540 
541 		tok2_pair = tok2;
542 		tok2_end = tok2;
543 
544 		while (tok2_pair != NULL) {
545 			strsep(&tok2_end, "=");
546 			if (tok2_end) {
547 				error = gotweb_assign_querystring(qs, tok2_pair,
548 				    tok2_end);
549 				if (error)
550 					goto err;
551 			}
552 			tok2_pair = tok2_end;
553 		}
554 		free(tok2);
555 		tok1_pair = tok1_end;
556 	}
557 	free(tok1);
558 	return error;
559 err:
560 	free(tok2);
561 	free(tok1);
562 	return error;
563 }
564 
565 /*
566  * Adapted from usr.sbin/httpd/httpd.c url_decode.
567  */
568 static const struct got_error *
569 gotweb_urldecode(char *url)
570 {
571 	char		*p, *q;
572 	char		 hex[3];
573 	unsigned long	 x;
574 
575 	hex[2] = '\0';
576 	p = q = url;
577 
578 	while (*p != '\0') {
579 		switch (*p) {
580 		case '%':
581 			/* Encoding character is followed by two hex chars */
582 			if (!isxdigit((unsigned char)p[1]) ||
583 			    !isxdigit((unsigned char)p[2]) ||
584 			    (p[1] == '0' && p[2] == '0'))
585 				return got_error(GOT_ERR_BAD_QUERYSTRING);
586 
587 			hex[0] = p[1];
588 			hex[1] = p[2];
589 
590 			/*
591 			 * We don't have to validate "hex" because it is
592 			 * guaranteed to include two hex chars followed by nul.
593 			 */
594 			x = strtoul(hex, NULL, 16);
595 			*q = (char)x;
596 			p += 2;
597 			break;
598 		default:
599 			*q = *p;
600 			break;
601 		}
602 		p++;
603 		q++;
604 	}
605 	*q = '\0';
606 
607 	return NULL;
608 }
609 
610 static const struct got_error *
611 gotweb_assign_querystring(struct querystring **qs, char *key, char *value)
612 {
613 	const struct got_error *error = NULL;
614 	const char *errstr;
615 	int a_cnt, el_cnt;
616 
617 	error = gotweb_urldecode(value);
618 	if (error)
619 		return error;
620 
621 	for (el_cnt = 0; el_cnt < QSELEM__MAX; el_cnt++) {
622 		if (strcmp(key, querystring_keys[el_cnt].name) != 0)
623 			continue;
624 
625 		switch (querystring_keys[el_cnt].element) {
626 		case ACTION:
627 			for (a_cnt = 0; a_cnt < ACTIONS__MAX; a_cnt++) {
628 				if (strcmp(value, action_keys[a_cnt].name) != 0)
629 					continue;
630 				else if (strcmp(value,
631 				    action_keys[a_cnt].name) == 0){
632 					(*qs)->action =
633 					    action_keys[a_cnt].action;
634 					goto qa_found;
635 				}
636 			}
637 			(*qs)->action = ERR;
638 qa_found:
639 			break;
640 		case COMMIT:
641 			(*qs)->commit = strdup(value);
642 			if ((*qs)->commit == NULL) {
643 				error = got_error_from_errno2("%s: strdup",
644 				    __func__);
645 				goto done;
646 			}
647 			break;
648 		case RFILE:
649 			(*qs)->file = strdup(value);
650 			if ((*qs)->file == NULL) {
651 				error = got_error_from_errno2("%s: strdup",
652 				    __func__);
653 				goto done;
654 			}
655 			break;
656 		case FOLDER:
657 			(*qs)->folder = strdup(value);
658 			if ((*qs)->folder == NULL) {
659 				error = got_error_from_errno2("%s: strdup",
660 				    __func__);
661 				goto done;
662 			}
663 			break;
664 		case HEADREF:
665 			free((*qs)->headref);
666 			(*qs)->headref = strdup(value);
667 			if ((*qs)->headref == NULL) {
668 				error = got_error_from_errno2("%s: strdup",
669 				    __func__);
670 				goto done;
671 			}
672 			break;
673 		case INDEX_PAGE:
674 			if (strlen(value) == 0)
675 				break;
676 			(*qs)->index_page = strtonum(value, INT64_MIN,
677 			    INT64_MAX, &errstr);
678 			if (errstr) {
679 				error = got_error_from_errno3("%s: strtonum %s",
680 				    __func__, errstr);
681 				goto done;
682 			}
683 			if ((*qs)->index_page < 0)
684 				(*qs)->index_page = 0;
685 			break;
686 		case PATH:
687 			(*qs)->path = strdup(value);
688 			if ((*qs)->path == NULL) {
689 				error = got_error_from_errno2("%s: strdup",
690 				    __func__);
691 				goto done;
692 			}
693 			break;
694 		case PAGE:
695 			if (strlen(value) == 0)
696 				break;
697 			(*qs)->page = strtonum(value, INT64_MIN,
698 			    INT64_MAX, &errstr);
699 			if (errstr) {
700 				error = got_error_from_errno3("%s: strtonum %s",
701 				    __func__, errstr);
702 				goto done;
703 			}
704 			if ((*qs)->page < 0)
705 				(*qs)->page = 0;
706 			break;
707 		default:
708 			break;
709 		}
710 	}
711 done:
712 	return error;
713 }
714 
715 void
716 gotweb_free_repo_tag(struct repo_tag *rt)
717 {
718 	if (rt != NULL) {
719 		free(rt->commit_id);
720 		free(rt->tag_name);
721 		free(rt->tag_commit);
722 		free(rt->commit_msg);
723 		free(rt->tagger);
724 	}
725 	free(rt);
726 }
727 
728 void
729 gotweb_free_repo_commit(struct repo_commit *rc)
730 {
731 	if (rc != NULL) {
732 		free(rc->path);
733 		free(rc->refs_str);
734 		free(rc->commit_id);
735 		free(rc->parent_id);
736 		free(rc->tree_id);
737 		free(rc->author);
738 		free(rc->committer);
739 		free(rc->commit_msg);
740 	}
741 	free(rc);
742 }
743 
744 static void
745 gotweb_free_querystring(struct querystring *qs)
746 {
747 	if (qs != NULL) {
748 		free(qs->commit);
749 		free(qs->file);
750 		free(qs->folder);
751 		free(qs->headref);
752 		free(qs->path);
753 	}
754 	free(qs);
755 }
756 
757 static void
758 gotweb_free_repo_dir(struct repo_dir *repo_dir)
759 {
760 	if (repo_dir != NULL) {
761 		free(repo_dir->name);
762 		free(repo_dir->owner);
763 		free(repo_dir->description);
764 		free(repo_dir->url);
765 		free(repo_dir->path);
766 	}
767 	free(repo_dir);
768 }
769 
770 void
771 gotweb_free_transport(struct transport *t)
772 {
773 	struct repo_commit *rc = NULL, *trc = NULL;
774 	struct repo_tag *rt = NULL, *trt = NULL;
775 
776 	TAILQ_FOREACH_SAFE(rc, &t->repo_commits, entry, trc) {
777 		TAILQ_REMOVE(&t->repo_commits, rc, entry);
778 		gotweb_free_repo_commit(rc);
779 	}
780 	TAILQ_FOREACH_SAFE(rt, &t->repo_tags, entry, trt) {
781 		TAILQ_REMOVE(&t->repo_tags, rt, entry);
782 		gotweb_free_repo_tag(rt);
783 	}
784 	gotweb_free_repo_dir(t->repo_dir);
785 	gotweb_free_querystring(t->qs);
786 	free(t->more_id);
787 	free(t->next_id);
788 	free(t->prev_id);
789 	free(t);
790 }
791 
792 void
793 gotweb_get_navs(struct request *c, struct gotweb_url *prev, int *have_prev,
794     struct gotweb_url *next, int *have_next)
795 {
796 	struct transport *t = c->t;
797 	struct querystring *qs = t->qs;
798 	struct server *srv = c->srv;
799 
800 	*have_prev = *have_next = 0;
801 
802 	switch(qs->action) {
803 	case INDEX:
804 		if (qs->index_page > 0) {
805 			*have_prev = 1;
806 			*prev = (struct gotweb_url){
807 				.action = -1,
808 				.index_page = qs->index_page - 1,
809 				.page = -1,
810 			};
811 		}
812 		if (t->next_disp == srv->max_repos_display &&
813 		    t->repos_total != (qs->index_page + 1) *
814 		    srv->max_repos_display) {
815 			*have_next = 1;
816 			*next = (struct gotweb_url){
817 				.action = -1,
818 				.index_page = qs->index_page + 1,
819 				.page = -1,
820 			};
821 		}
822 		break;
823 	case TAGS:
824 		if (t->prev_id && qs->commit != NULL &&
825 		    strcmp(qs->commit, t->prev_id) != 0) {
826 			*have_prev = 1;
827 			*prev = (struct gotweb_url){
828 				.action = TAGS,
829 				.index_page = -1,
830 				.page = qs->page - 1,
831 				.path = qs->path,
832 				.commit = t->prev_id,
833 				.headref = qs->headref,
834 			};
835 		}
836 		if (t->next_id) {
837 			*have_next = 1;
838 			*next = (struct gotweb_url){
839 				.action = TAGS,
840 				.index_page = -1,
841 				.page = qs->page + 1,
842 				.path = qs->path,
843 				.commit = t->next_id,
844 				.headref = qs->headref,
845 			};
846 		}
847 		break;
848 	}
849 }
850 
851 static const struct got_error *
852 gotweb_render_index(struct request *c)
853 {
854 	const struct got_error *error = NULL;
855 	struct server *srv = c->srv;
856 	struct transport *t = c->t;
857 	struct querystring *qs = t->qs;
858 	struct repo_dir *repo_dir = NULL;
859 	struct dirent **sd_dent = NULL;
860 	unsigned int d_cnt, d_i, d_disp = 0;
861 	unsigned int d_skipped = 0;
862 	int type;
863 
864 	d_cnt = scandir(srv->repos_path, &sd_dent, NULL, alphasort);
865 	if (d_cnt == -1) {
866 		sd_dent = NULL;
867 		error = got_error_from_errno2("scandir", srv->repos_path);
868 		goto done;
869 	}
870 
871 	if (gotweb_render_repo_table_hdr(c->tp) == -1)
872 		goto done;
873 
874 	for (d_i = 0; d_i < d_cnt; d_i++) {
875 		if (srv->max_repos > 0 && t->prev_disp == srv->max_repos)
876 			break;
877 
878 		if (strcmp(sd_dent[d_i]->d_name, ".") == 0 ||
879 		    strcmp(sd_dent[d_i]->d_name, "..") == 0) {
880 			d_skipped++;
881 			continue;
882 		}
883 
884 		error = got_path_dirent_type(&type, srv->repos_path,
885 		    sd_dent[d_i]);
886 		if (error)
887 			goto done;
888 		if (type != DT_DIR) {
889 			d_skipped++;
890 			continue;
891 		}
892 
893 		if (qs->index_page > 0 && (qs->index_page *
894 		    srv->max_repos_display) > t->prev_disp) {
895 			t->prev_disp++;
896 			continue;
897 		}
898 
899 		error = gotweb_init_repo_dir(&repo_dir, sd_dent[d_i]->d_name);
900 		if (error)
901 			goto done;
902 
903 		error = gotweb_load_got_path(c, repo_dir);
904 		if (error && error->code == GOT_ERR_NOT_GIT_REPO) {
905 			error = NULL;
906 			gotweb_free_repo_dir(repo_dir);
907 			repo_dir = NULL;
908 			d_skipped++;
909 			continue;
910 		}
911 		if (error && error->code != GOT_ERR_LONELY_PACKIDX)
912 			goto done;
913 
914 		d_disp++;
915 		t->prev_disp++;
916 
917 		if (gotweb_render_repo_fragment(c->tp, repo_dir) == -1)
918 			goto done;
919 
920 		gotweb_free_repo_dir(repo_dir);
921 		repo_dir = NULL;
922 		t->next_disp++;
923 		if (d_disp == srv->max_repos_display)
924 			break;
925 	}
926 	t->repos_total = d_cnt - d_skipped;
927 
928 	if (srv->max_repos_display == 0)
929 		goto done;
930 	if (srv->max_repos > 0 && srv->max_repos < srv->max_repos_display)
931 		goto done;
932 	if (t->repos_total <= srv->max_repos ||
933 	    t->repos_total <= srv->max_repos_display)
934 		goto done;
935 
936 	if (gotweb_render_navs(c->tp) == -1)
937 		goto done;
938 done:
939 	if (sd_dent) {
940 		for (d_i = 0; d_i < d_cnt; d_i++)
941 			free(sd_dent[d_i]);
942 		free(sd_dent);
943 	}
944 	return error;
945 }
946 
947 static inline int
948 should_urlencode(int c)
949 {
950 	if (c <= ' ' || c >= 127)
951 		return 1;
952 
953 	switch (c) {
954 		/* gen-delim */
955 	case ':':
956 	case '/':
957 	case '?':
958 	case '#':
959 	case '[':
960 	case ']':
961 	case '@':
962 		/* sub-delims */
963 	case '!':
964 	case '$':
965 	case '&':
966 	case '\'':
967 	case '(':
968 	case ')':
969 	case '*':
970 	case '+':
971 	case ',':
972 	case ';':
973 	case '=':
974 		/* needed because the URLs are embedded into the HTML */
975 	case '\"':
976 		return 1;
977 	default:
978 		return 0;
979 	}
980 }
981 
982 static char *
983 gotweb_urlencode(const char *str)
984 {
985 	const char *s;
986 	char *escaped;
987 	size_t i, len;
988 	int a, b;
989 
990 	len = 0;
991 	for (s = str; *s; ++s) {
992 		len++;
993 		if (should_urlencode(*s))
994 			len += 2;
995 	}
996 
997 	escaped = calloc(1, len + 1);
998 	if (escaped == NULL)
999 		return NULL;
1000 
1001 	i = 0;
1002 	for (s = str; *s; ++s) {
1003 		if (should_urlencode(*s)) {
1004 			a = (*s & 0xF0) >> 4;
1005 			b = (*s & 0x0F);
1006 
1007 			escaped[i++] = '%';
1008 			escaped[i++] = a <= 9 ? ('0' + a) : ('7' + a);
1009 			escaped[i++] = b <= 9 ? ('0' + b) : ('7' + b);
1010 		} else
1011 			escaped[i++] = *s;
1012 	}
1013 
1014 	return escaped;
1015 }
1016 
1017 const char *
1018 gotweb_action_name(int action)
1019 {
1020 	switch (action) {
1021 	case BLAME:
1022 		return "blame";
1023 	case BLOB:
1024 		return "blob";
1025 	case BLOBRAW:
1026 		return "blobraw";
1027 	case BRIEFS:
1028 		return "briefs";
1029 	case COMMITS:
1030 		return "commits";
1031 	case DIFF:
1032 		return "diff";
1033 	case ERR:
1034 		return "err";
1035 	case INDEX:
1036 		return "index";
1037 	case SUMMARY:
1038 		return "summary";
1039 	case TAG:
1040 		return "tag";
1041 	case TAGS:
1042 		return "tags";
1043 	case TREE:
1044 		return "tree";
1045 	case RSS:
1046 		return "rss";
1047 	default:
1048 		return NULL;
1049 	}
1050 }
1051 
1052 int
1053 gotweb_render_url(struct request *c, struct gotweb_url *url)
1054 {
1055 	const char *sep = "?", *action;
1056 	char *tmp;
1057 	int r;
1058 
1059 	action = gotweb_action_name(url->action);
1060 	if (action != NULL) {
1061 		if (fcgi_printf(c, "?action=%s", action) == -1)
1062 			return -1;
1063 		sep = "&";
1064 	}
1065 
1066 	if (url->commit) {
1067 		if (fcgi_printf(c, "%scommit=%s", sep, url->commit) == -1)
1068 			return -1;
1069 		sep = "&";
1070 	}
1071 
1072 	if (url->previd) {
1073 		if (fcgi_printf(c, "%sprevid=%s", sep, url->previd) == -1)
1074 			return -1;
1075 		sep = "&";
1076 	}
1077 
1078 	if (url->prevset) {
1079 		if (fcgi_printf(c, "%sprevset=%s", sep, url->prevset) == -1)
1080 			return -1;
1081 		sep = "&";
1082 	}
1083 
1084 	if (url->file) {
1085 		tmp = gotweb_urlencode(url->file);
1086 		if (tmp == NULL)
1087 			return -1;
1088 		r = fcgi_printf(c, "%sfile=%s", sep, tmp);
1089 		free(tmp);
1090 		if (r == -1)
1091 			return -1;
1092 		sep = "&";
1093 	}
1094 
1095 	if (url->folder) {
1096 		tmp = gotweb_urlencode(url->folder);
1097 		if (tmp == NULL)
1098 			return -1;
1099 		r = fcgi_printf(c, "%sfolder=%s", sep, tmp);
1100 		free(tmp);
1101 		if (r == -1)
1102 			return -1;
1103 		sep = "&";
1104 	}
1105 
1106 	if (url->headref) {
1107 		tmp = gotweb_urlencode(url->headref);
1108 		if (tmp == NULL)
1109 			return -1;
1110 		r = fcgi_printf(c, "%sheadref=%s", sep, url->headref);
1111 		free(tmp);
1112 		if (r == -1)
1113 			return -1;
1114 		sep = "&";
1115 	}
1116 
1117 	if (url->index_page != -1) {
1118 		if (fcgi_printf(c, "%sindex_page=%d", sep,
1119 		    url->index_page) == -1)
1120 			return -1;
1121 		sep = "&";
1122 	}
1123 
1124 	if (url->path) {
1125 		tmp = gotweb_urlencode(url->path);
1126 		if (tmp == NULL)
1127 			return -1;
1128 		r = fcgi_printf(c, "%spath=%s", sep, tmp);
1129 		free(tmp);
1130 		if (r == -1)
1131 			return -1;
1132 		sep = "&";
1133 	}
1134 
1135 	if (url->page != -1) {
1136 		if (fcgi_printf(c, "%spage=%d", sep, url->page) == -1)
1137 			return -1;
1138 		sep = "&";
1139 	}
1140 
1141 	return 0;
1142 }
1143 
1144 int
1145 gotweb_render_absolute_url(struct request *c, struct gotweb_url *url)
1146 {
1147 	struct template	*tp = c->tp;
1148 	const char	*proto = c->https ? "https" : "http";
1149 
1150 	if (fcgi_puts(tp, proto) == -1 ||
1151 	    fcgi_puts(tp, "://") == -1 ||
1152 	    tp_htmlescape(tp, c->server_name) == -1 ||
1153 	    tp_htmlescape(tp, c->document_uri) == -1)
1154 		return -1;
1155 
1156 	return gotweb_render_url(c, url);
1157 }
1158 
1159 static struct got_repository *
1160 find_cached_repo(struct server *srv, const char *path)
1161 {
1162 	int i;
1163 
1164 	for (i = 0; i < srv->ncached_repos; i++) {
1165 		if (strcmp(srv->cached_repos[i].path, path) == 0)
1166 			return srv->cached_repos[i].repo;
1167 	}
1168 
1169 	return NULL;
1170 }
1171 
1172 static const struct got_error *
1173 cache_repo(struct got_repository **new, struct server *srv,
1174     struct repo_dir *repo_dir, struct socket *sock)
1175 {
1176 	const struct got_error *error = NULL;
1177 	struct got_repository *repo;
1178 	struct cached_repo *cr;
1179 	int evicted = 0;
1180 
1181 	if (srv->ncached_repos >= GOTWEBD_REPO_CACHESIZE) {
1182 		cr = &srv->cached_repos[srv->ncached_repos - 1];
1183 		error = got_repo_close(cr->repo);
1184 		memset(cr, 0, sizeof(*cr));
1185 		srv->ncached_repos--;
1186 		if (error)
1187 			return error;
1188 		memmove(&srv->cached_repos[1], &srv->cached_repos[0],
1189 		    srv->ncached_repos * sizeof(srv->cached_repos[0]));
1190 		cr = &srv->cached_repos[0];
1191 		evicted = 1;
1192 	} else {
1193 		cr = &srv->cached_repos[srv->ncached_repos];
1194 	}
1195 
1196 	error = got_repo_open(&repo, repo_dir->path, NULL, sock->pack_fds);
1197 	if (error) {
1198 		if (evicted) {
1199 			memmove(&srv->cached_repos[0], &srv->cached_repos[1],
1200 			    srv->ncached_repos * sizeof(srv->cached_repos[0]));
1201 		}
1202 		return error;
1203 	}
1204 
1205 	if (strlcpy(cr->path, repo_dir->path, sizeof(cr->path))
1206 	    >= sizeof(cr->path)) {
1207 		if (evicted) {
1208 			memmove(&srv->cached_repos[0], &srv->cached_repos[1],
1209 			    srv->ncached_repos * sizeof(srv->cached_repos[0]));
1210 		}
1211 		return got_error(GOT_ERR_NO_SPACE);
1212 	}
1213 
1214 	cr->repo = repo;
1215 	srv->ncached_repos++;
1216 	*new = repo;
1217 	return NULL;
1218 }
1219 
1220 static const struct got_error *
1221 gotweb_load_got_path(struct request *c, struct repo_dir *repo_dir)
1222 {
1223 	const struct got_error *error = NULL;
1224 	struct socket *sock = c->sock;
1225 	struct server *srv = c->srv;
1226 	struct transport *t = c->t;
1227 	struct got_repository *repo = NULL;
1228 	DIR *dt;
1229 	char *dir_test;
1230 
1231 	if (asprintf(&dir_test, "%s/%s/%s", srv->repos_path, repo_dir->name,
1232 	    GOTWEB_GIT_DIR) == -1)
1233 		return got_error_from_errno("asprintf");
1234 
1235 	dt = opendir(dir_test);
1236 	if (dt == NULL) {
1237 		free(dir_test);
1238 	} else {
1239 		repo_dir->path = dir_test;
1240 		dir_test = NULL;
1241 		goto done;
1242 	}
1243 
1244 	if (asprintf(&dir_test, "%s/%s", srv->repos_path,
1245 	    repo_dir->name) == -1)
1246 		return got_error_from_errno("asprintf");
1247 
1248 	dt = opendir(dir_test);
1249 	if (dt == NULL) {
1250 		error = got_error_path(repo_dir->name, GOT_ERR_NOT_GIT_REPO);
1251 		goto err;
1252 	} else {
1253 		repo_dir->path = dir_test;
1254 		dir_test = NULL;
1255 	}
1256 
1257 done:
1258 	if (srv->respect_exportok &&
1259 	    faccessat(dirfd(dt), "git-daemon-export-ok", F_OK, 0) == -1) {
1260 		error = got_error_path(repo_dir->name, GOT_ERR_NOT_GIT_REPO);
1261 		goto err;
1262 	}
1263 
1264 	repo = find_cached_repo(srv, repo_dir->path);
1265 	if (repo == NULL) {
1266 		error = cache_repo(&repo, srv, repo_dir, sock);
1267 		if (error)
1268 			goto err;
1269 	}
1270 	t->repo = repo;
1271 	error = gotweb_get_repo_description(&repo_dir->description, srv,
1272 	    repo_dir->path, dirfd(dt));
1273 	if (error)
1274 		goto err;
1275 	error = got_get_repo_owner(&repo_dir->owner, c);
1276 	if (error)
1277 		goto err;
1278 	error = got_get_repo_age(&repo_dir->age, c, NULL);
1279 	if (error)
1280 		goto err;
1281 	error = gotweb_get_clone_url(&repo_dir->url, srv, repo_dir->path,
1282 	    dirfd(dt));
1283 err:
1284 	free(dir_test);
1285 	if (dt != NULL && closedir(dt) == EOF && error == NULL)
1286 		error = got_error_from_errno("closedir");
1287 	return error;
1288 }
1289 
1290 static const struct got_error *
1291 gotweb_init_repo_dir(struct repo_dir **repo_dir, const char *dir)
1292 {
1293 	const struct got_error *error;
1294 
1295 	*repo_dir = calloc(1, sizeof(**repo_dir));
1296 	if (*repo_dir == NULL)
1297 		return got_error_from_errno("calloc");
1298 
1299 	if (asprintf(&(*repo_dir)->name, "%s", dir) == -1) {
1300 		error = got_error_from_errno("asprintf");
1301 		free(*repo_dir);
1302 		*repo_dir = NULL;
1303 		return error;
1304 	}
1305 	(*repo_dir)->owner = NULL;
1306 	(*repo_dir)->description = NULL;
1307 	(*repo_dir)->url = NULL;
1308 	(*repo_dir)->path = NULL;
1309 
1310 	return NULL;
1311 }
1312 
1313 static const struct got_error *
1314 gotweb_get_repo_description(char **description, struct server *srv,
1315     const char *dirpath, int dir)
1316 {
1317 	const struct got_error *error = NULL;
1318 	struct stat sb;
1319 	int fd = -1;
1320 	off_t len;
1321 
1322 	*description = NULL;
1323 	if (srv->show_repo_description == 0)
1324 		return NULL;
1325 
1326 	fd = openat(dir, "description", O_RDONLY);
1327 	if (fd == -1) {
1328 		if (errno != ENOENT && errno != EACCES) {
1329 			error = got_error_from_errno_fmt("openat %s/%s",
1330 			    dirpath, "description");
1331 		}
1332 		goto done;
1333 	}
1334 
1335 	if (fstat(fd, &sb) == -1) {
1336 		error = got_error_from_errno_fmt("fstat %s/%s",
1337 		    dirpath, "description");
1338 		goto done;
1339 	}
1340 
1341 	len = sb.st_size;
1342 	if (len > GOTWEBD_MAXDESCRSZ - 1)
1343 		len = GOTWEBD_MAXDESCRSZ - 1;
1344 
1345 	*description = calloc(len + 1, sizeof(**description));
1346 	if (*description == NULL) {
1347 		error = got_error_from_errno("calloc");
1348 		goto done;
1349 	}
1350 
1351 	if (read(fd, *description, len) == -1)
1352 		error = got_error_from_errno("read");
1353 done:
1354 	if (fd != -1 && close(fd) == -1 && error == NULL)
1355 		error = got_error_from_errno("close");
1356 	return error;
1357 }
1358 
1359 static const struct got_error *
1360 gotweb_get_clone_url(char **url, struct server *srv, const char *dirpath,
1361     int dir)
1362 {
1363 	const struct got_error *error = NULL;
1364 	struct stat sb;
1365 	int fd = -1;
1366 	off_t len;
1367 
1368 	*url = NULL;
1369 	if (srv->show_repo_cloneurl == 0)
1370 		return NULL;
1371 
1372 	fd = openat(dir, "cloneurl", O_RDONLY);
1373 	if (fd == -1) {
1374 		if (errno != ENOENT && errno != EACCES) {
1375 			error = got_error_from_errno_fmt("openat %s/%s",
1376 			    dirpath, "cloneurl");
1377 		}
1378 		goto done;
1379 	}
1380 
1381 	if (fstat(fd, &sb) == -1) {
1382 		error = got_error_from_errno_fmt("fstat %s/%s",
1383 		    dirpath, "cloneurl");
1384 		goto done;
1385 	}
1386 
1387 	len = sb.st_size;
1388 	if (len > GOTWEBD_MAXCLONEURLSZ - 1)
1389 		len = GOTWEBD_MAXCLONEURLSZ - 1;
1390 
1391 	*url = calloc(len + 1, sizeof(**url));
1392 	if (*url == NULL) {
1393 		error = got_error_from_errno("calloc");
1394 		goto done;
1395 	}
1396 
1397 	if (read(fd, *url, len) == -1)
1398 		error = got_error_from_errno("read");
1399 done:
1400 	if (fd != -1 && close(fd) == -1 && error == NULL)
1401 		error = got_error_from_errno("close");
1402 	return error;
1403 }
1404 
1405 int
1406 gotweb_render_age(struct template *tp, time_t committer_time, int ref_tm)
1407 {
1408 	struct request *c = tp->tp_arg;
1409 	struct tm tm;
1410 	long long diff_time;
1411 	const char *years = "years ago", *months = "months ago";
1412 	const char *weeks = "weeks ago", *days = "days ago";
1413 	const char *hours = "hours ago",  *minutes = "minutes ago";
1414 	const char *seconds = "seconds ago", *now = "right now";
1415 	char *s;
1416 	char datebuf[64];
1417 	size_t r;
1418 
1419 	switch (ref_tm) {
1420 	case TM_DIFF:
1421 		diff_time = time(NULL) - committer_time;
1422 		if (diff_time > 60 * 60 * 24 * 365 * 2) {
1423 			if (fcgi_printf(c, "%lld %s",
1424 			    (diff_time / 60 / 60 / 24 / 365), years) == -1)
1425 				return -1;
1426 		} else if (diff_time > 60 * 60 * 24 * (365 / 12) * 2) {
1427 			if (fcgi_printf(c, "%lld %s",
1428 			    (diff_time / 60 / 60 / 24 / (365 / 12)),
1429 			    months) == -1)
1430 				return -1;
1431 		} else if (diff_time > 60 * 60 * 24 * 7 * 2) {
1432 			if (fcgi_printf(c, "%lld %s",
1433 			    (diff_time / 60 / 60 / 24 / 7), weeks) == -1)
1434 				return -1;
1435 		} else if (diff_time > 60 * 60 * 24 * 2) {
1436 			if (fcgi_printf(c, "%lld %s",
1437 			    (diff_time / 60 / 60 / 24), days) == -1)
1438 				return -1;
1439 		} else if (diff_time > 60 * 60 * 2) {
1440 			if (fcgi_printf(c, "%lld %s",
1441 			    (diff_time / 60 / 60), hours) == -1)
1442 				return -1;
1443 		} else if (diff_time > 60 * 2) {
1444 			if (fcgi_printf(c, "%lld %s", (diff_time / 60),
1445 			    minutes) == -1)
1446 				return -1;
1447 		} else if (diff_time > 2) {
1448 			if (fcgi_printf(c, "%lld %s", diff_time,
1449 			    seconds) == -1)
1450 				return -1;
1451 		} else {
1452 			if (fcgi_puts(tp, now) == -1)
1453 				return -1;
1454 		}
1455 		break;
1456 	case TM_LONG:
1457 		if (gmtime_r(&committer_time, &tm) == NULL)
1458 			return -1;
1459 
1460 		s = asctime_r(&tm, datebuf);
1461 		if (s == NULL)
1462 			return -1;
1463 
1464 		if (fcgi_puts(tp, datebuf) == -1 ||
1465 		    fcgi_puts(tp, " UTC") == -1)
1466 			return -1;
1467 		break;
1468 	case TM_RFC822:
1469 		if (gmtime_r(&committer_time, &tm) == NULL)
1470 			return -1;
1471 
1472 		r = strftime(datebuf, sizeof(datebuf),
1473 		    "%a, %d %b %Y %H:%M:%S GMT", &tm);
1474 		if (r == 0)
1475 			return -1;
1476 
1477 		if (fcgi_puts(tp, datebuf) == -1)
1478 			return -1;
1479 		break;
1480 	}
1481 	return 0;
1482 }