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 	DIR *d;
860 	struct dirent **sd_dent = NULL;
861 	unsigned int d_cnt, d_i, d_disp = 0;
862 	unsigned int d_skipped = 0;
863 	int type;
864 
865 	d = opendir(srv->repos_path);
866 	if (d == NULL) {
867 		error = got_error_from_errno2("opendir", srv->repos_path);
868 		return error;
869 	}
870 
871 	d_cnt = scandir(srv->repos_path, &sd_dent, NULL, alphasort);
872 	if (d_cnt == -1) {
873 		sd_dent = NULL;
874 		error = got_error_from_errno2("scandir", srv->repos_path);
875 		goto done;
876 	}
877 
878 	if (gotweb_render_repo_table_hdr(c->tp) == -1)
879 		goto done;
880 
881 	for (d_i = 0; d_i < d_cnt; d_i++) {
882 		if (srv->max_repos > 0 && t->prev_disp == srv->max_repos)
883 			break;
884 
885 		if (strcmp(sd_dent[d_i]->d_name, ".") == 0 ||
886 		    strcmp(sd_dent[d_i]->d_name, "..") == 0) {
887 			d_skipped++;
888 			continue;
889 		}
890 
891 		error = got_path_dirent_type(&type, srv->repos_path,
892 		    sd_dent[d_i]);
893 		if (error)
894 			goto done;
895 		if (type != DT_DIR) {
896 			d_skipped++;
897 			continue;
898 		}
899 
900 		if (qs->index_page > 0 && (qs->index_page *
901 		    srv->max_repos_display) > t->prev_disp) {
902 			t->prev_disp++;
903 			continue;
904 		}
905 
906 		error = gotweb_init_repo_dir(&repo_dir, sd_dent[d_i]->d_name);
907 		if (error)
908 			goto done;
909 
910 		error = gotweb_load_got_path(c, repo_dir);
911 		if (error && error->code == GOT_ERR_NOT_GIT_REPO) {
912 			error = NULL;
913 			gotweb_free_repo_dir(repo_dir);
914 			repo_dir = NULL;
915 			d_skipped++;
916 			continue;
917 		}
918 		if (error && error->code != GOT_ERR_LONELY_PACKIDX)
919 			goto done;
920 
921 		d_disp++;
922 		t->prev_disp++;
923 
924 		if (gotweb_render_repo_fragment(c->tp, repo_dir) == -1)
925 			goto done;
926 
927 		gotweb_free_repo_dir(repo_dir);
928 		repo_dir = NULL;
929 		t->next_disp++;
930 		if (d_disp == srv->max_repos_display)
931 			break;
932 	}
933 	t->repos_total = d_cnt - d_skipped;
934 
935 	if (srv->max_repos_display == 0)
936 		goto done;
937 	if (srv->max_repos > 0 && srv->max_repos < srv->max_repos_display)
938 		goto done;
939 	if (t->repos_total <= srv->max_repos ||
940 	    t->repos_total <= srv->max_repos_display)
941 		goto done;
942 
943 	if (gotweb_render_navs(c->tp) == -1)
944 		goto done;
945 done:
946 	if (sd_dent) {
947 		for (d_i = 0; d_i < d_cnt; d_i++)
948 			free(sd_dent[d_i]);
949 		free(sd_dent);
950 	}
951 	if (d != NULL && closedir(d) == EOF && error == NULL)
952 		error = got_error_from_errno("closedir");
953 	return error;
954 }
955 
956 static inline int
957 should_urlencode(int c)
958 {
959 	if (c <= ' ' || c >= 127)
960 		return 1;
961 
962 	switch (c) {
963 		/* gen-delim */
964 	case ':':
965 	case '/':
966 	case '?':
967 	case '#':
968 	case '[':
969 	case ']':
970 	case '@':
971 		/* sub-delims */
972 	case '!':
973 	case '$':
974 	case '&':
975 	case '\'':
976 	case '(':
977 	case ')':
978 	case '*':
979 	case '+':
980 	case ',':
981 	case ';':
982 	case '=':
983 		/* needed because the URLs are embedded into the HTML */
984 	case '\"':
985 		return 1;
986 	default:
987 		return 0;
988 	}
989 }
990 
991 static char *
992 gotweb_urlencode(const char *str)
993 {
994 	const char *s;
995 	char *escaped;
996 	size_t i, len;
997 	int a, b;
998 
999 	len = 0;
1000 	for (s = str; *s; ++s) {
1001 		len++;
1002 		if (should_urlencode(*s))
1003 			len += 2;
1004 	}
1005 
1006 	escaped = calloc(1, len + 1);
1007 	if (escaped == NULL)
1008 		return NULL;
1009 
1010 	i = 0;
1011 	for (s = str; *s; ++s) {
1012 		if (should_urlencode(*s)) {
1013 			a = (*s & 0xF0) >> 4;
1014 			b = (*s & 0x0F);
1015 
1016 			escaped[i++] = '%';
1017 			escaped[i++] = a <= 9 ? ('0' + a) : ('7' + a);
1018 			escaped[i++] = b <= 9 ? ('0' + b) : ('7' + b);
1019 		} else
1020 			escaped[i++] = *s;
1021 	}
1022 
1023 	return escaped;
1024 }
1025 
1026 const char *
1027 gotweb_action_name(int action)
1028 {
1029 	switch (action) {
1030 	case BLAME:
1031 		return "blame";
1032 	case BLOB:
1033 		return "blob";
1034 	case BLOBRAW:
1035 		return "blobraw";
1036 	case BRIEFS:
1037 		return "briefs";
1038 	case COMMITS:
1039 		return "commits";
1040 	case DIFF:
1041 		return "diff";
1042 	case ERR:
1043 		return "err";
1044 	case INDEX:
1045 		return "index";
1046 	case SUMMARY:
1047 		return "summary";
1048 	case TAG:
1049 		return "tag";
1050 	case TAGS:
1051 		return "tags";
1052 	case TREE:
1053 		return "tree";
1054 	case RSS:
1055 		return "rss";
1056 	default:
1057 		return NULL;
1058 	}
1059 }
1060 
1061 int
1062 gotweb_render_url(struct request *c, struct gotweb_url *url)
1063 {
1064 	const char *sep = "?", *action;
1065 	char *tmp;
1066 	int r;
1067 
1068 	action = gotweb_action_name(url->action);
1069 	if (action != NULL) {
1070 		if (fcgi_printf(c, "?action=%s", action) == -1)
1071 			return -1;
1072 		sep = "&";
1073 	}
1074 
1075 	if (url->commit) {
1076 		if (fcgi_printf(c, "%scommit=%s", sep, url->commit) == -1)
1077 			return -1;
1078 		sep = "&";
1079 	}
1080 
1081 	if (url->previd) {
1082 		if (fcgi_printf(c, "%sprevid=%s", sep, url->previd) == -1)
1083 			return -1;
1084 		sep = "&";
1085 	}
1086 
1087 	if (url->prevset) {
1088 		if (fcgi_printf(c, "%sprevset=%s", sep, url->prevset) == -1)
1089 			return -1;
1090 		sep = "&";
1091 	}
1092 
1093 	if (url->file) {
1094 		tmp = gotweb_urlencode(url->file);
1095 		if (tmp == NULL)
1096 			return -1;
1097 		r = fcgi_printf(c, "%sfile=%s", sep, tmp);
1098 		free(tmp);
1099 		if (r == -1)
1100 			return -1;
1101 		sep = "&";
1102 	}
1103 
1104 	if (url->folder) {
1105 		tmp = gotweb_urlencode(url->folder);
1106 		if (tmp == NULL)
1107 			return -1;
1108 		r = fcgi_printf(c, "%sfolder=%s", sep, tmp);
1109 		free(tmp);
1110 		if (r == -1)
1111 			return -1;
1112 		sep = "&";
1113 	}
1114 
1115 	if (url->headref) {
1116 		tmp = gotweb_urlencode(url->headref);
1117 		if (tmp == NULL)
1118 			return -1;
1119 		r = fcgi_printf(c, "%sheadref=%s", sep, url->headref);
1120 		free(tmp);
1121 		if (r == -1)
1122 			return -1;
1123 		sep = "&";
1124 	}
1125 
1126 	if (url->index_page != -1) {
1127 		if (fcgi_printf(c, "%sindex_page=%d", sep,
1128 		    url->index_page) == -1)
1129 			return -1;
1130 		sep = "&";
1131 	}
1132 
1133 	if (url->path) {
1134 		tmp = gotweb_urlencode(url->path);
1135 		if (tmp == NULL)
1136 			return -1;
1137 		r = fcgi_printf(c, "%spath=%s", sep, tmp);
1138 		free(tmp);
1139 		if (r == -1)
1140 			return -1;
1141 		sep = "&";
1142 	}
1143 
1144 	if (url->page != -1) {
1145 		if (fcgi_printf(c, "%spage=%d", sep, url->page) == -1)
1146 			return -1;
1147 		sep = "&";
1148 	}
1149 
1150 	return 0;
1151 }
1152 
1153 int
1154 gotweb_render_absolute_url(struct request *c, struct gotweb_url *url)
1155 {
1156 	struct template	*tp = c->tp;
1157 	const char	*proto = c->https ? "https" : "http";
1158 
1159 	if (fcgi_puts(tp, proto) == -1 ||
1160 	    fcgi_puts(tp, "://") == -1 ||
1161 	    tp_htmlescape(tp, c->server_name) == -1 ||
1162 	    tp_htmlescape(tp, c->document_uri) == -1)
1163 		return -1;
1164 
1165 	return gotweb_render_url(c, url);
1166 }
1167 
1168 static struct got_repository *
1169 find_cached_repo(struct server *srv, const char *path)
1170 {
1171 	int i;
1172 
1173 	for (i = 0; i < srv->ncached_repos; i++) {
1174 		if (strcmp(srv->cached_repos[i].path, path) == 0)
1175 			return srv->cached_repos[i].repo;
1176 	}
1177 
1178 	return NULL;
1179 }
1180 
1181 static const struct got_error *
1182 cache_repo(struct got_repository **new, struct server *srv,
1183     struct repo_dir *repo_dir, struct socket *sock)
1184 {
1185 	const struct got_error *error = NULL;
1186 	struct got_repository *repo;
1187 	struct cached_repo *cr;
1188 	int evicted = 0;
1189 
1190 	if (srv->ncached_repos >= GOTWEBD_REPO_CACHESIZE) {
1191 		cr = &srv->cached_repos[srv->ncached_repos - 1];
1192 		error = got_repo_close(cr->repo);
1193 		memset(cr, 0, sizeof(*cr));
1194 		srv->ncached_repos--;
1195 		if (error)
1196 			return error;
1197 		memmove(&srv->cached_repos[1], &srv->cached_repos[0],
1198 		    srv->ncached_repos * sizeof(srv->cached_repos[0]));
1199 		cr = &srv->cached_repos[0];
1200 		evicted = 1;
1201 	} else {
1202 		cr = &srv->cached_repos[srv->ncached_repos];
1203 	}
1204 
1205 	error = got_repo_open(&repo, repo_dir->path, NULL, sock->pack_fds);
1206 	if (error) {
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 error;
1212 	}
1213 
1214 	if (strlcpy(cr->path, repo_dir->path, sizeof(cr->path))
1215 	    >= sizeof(cr->path)) {
1216 		if (evicted) {
1217 			memmove(&srv->cached_repos[0], &srv->cached_repos[1],
1218 			    srv->ncached_repos * sizeof(srv->cached_repos[0]));
1219 		}
1220 		return got_error(GOT_ERR_NO_SPACE);
1221 	}
1222 
1223 	cr->repo = repo;
1224 	srv->ncached_repos++;
1225 	*new = repo;
1226 	return NULL;
1227 }
1228 
1229 static const struct got_error *
1230 gotweb_load_got_path(struct request *c, struct repo_dir *repo_dir)
1231 {
1232 	const struct got_error *error = NULL;
1233 	struct socket *sock = c->sock;
1234 	struct server *srv = c->srv;
1235 	struct transport *t = c->t;
1236 	struct got_repository *repo = NULL;
1237 	DIR *dt;
1238 	char *dir_test;
1239 
1240 	if (asprintf(&dir_test, "%s/%s/%s", srv->repos_path, repo_dir->name,
1241 	    GOTWEB_GIT_DIR) == -1)
1242 		return got_error_from_errno("asprintf");
1243 
1244 	dt = opendir(dir_test);
1245 	if (dt == NULL) {
1246 		free(dir_test);
1247 	} else {
1248 		repo_dir->path = dir_test;
1249 		dir_test = NULL;
1250 		goto done;
1251 	}
1252 
1253 	if (asprintf(&dir_test, "%s/%s", srv->repos_path,
1254 	    repo_dir->name) == -1)
1255 		return got_error_from_errno("asprintf");
1256 
1257 	dt = opendir(dir_test);
1258 	if (dt == NULL) {
1259 		error = got_error_path(repo_dir->name, GOT_ERR_NOT_GIT_REPO);
1260 		goto err;
1261 	} else {
1262 		repo_dir->path = dir_test;
1263 		dir_test = NULL;
1264 	}
1265 
1266 done:
1267 	if (srv->respect_exportok &&
1268 	    faccessat(dirfd(dt), "git-daemon-export-ok", F_OK, 0) == -1) {
1269 		error = got_error_path(repo_dir->name, GOT_ERR_NOT_GIT_REPO);
1270 		goto err;
1271 	}
1272 
1273 	repo = find_cached_repo(srv, repo_dir->path);
1274 	if (repo == NULL) {
1275 		error = cache_repo(&repo, srv, repo_dir, sock);
1276 		if (error)
1277 			goto err;
1278 	}
1279 	t->repo = repo;
1280 	error = gotweb_get_repo_description(&repo_dir->description, srv,
1281 	    repo_dir->path, dirfd(dt));
1282 	if (error)
1283 		goto err;
1284 	error = got_get_repo_owner(&repo_dir->owner, c);
1285 	if (error)
1286 		goto err;
1287 	error = got_get_repo_age(&repo_dir->age, c, NULL);
1288 	if (error)
1289 		goto err;
1290 	error = gotweb_get_clone_url(&repo_dir->url, srv, repo_dir->path,
1291 	    dirfd(dt));
1292 err:
1293 	free(dir_test);
1294 	if (dt != NULL && closedir(dt) == EOF && error == NULL)
1295 		error = got_error_from_errno("closedir");
1296 	return error;
1297 }
1298 
1299 static const struct got_error *
1300 gotweb_init_repo_dir(struct repo_dir **repo_dir, const char *dir)
1301 {
1302 	const struct got_error *error;
1303 
1304 	*repo_dir = calloc(1, sizeof(**repo_dir));
1305 	if (*repo_dir == NULL)
1306 		return got_error_from_errno("calloc");
1307 
1308 	if (asprintf(&(*repo_dir)->name, "%s", dir) == -1) {
1309 		error = got_error_from_errno("asprintf");
1310 		free(*repo_dir);
1311 		*repo_dir = NULL;
1312 		return error;
1313 	}
1314 	(*repo_dir)->owner = NULL;
1315 	(*repo_dir)->description = NULL;
1316 	(*repo_dir)->url = NULL;
1317 	(*repo_dir)->path = NULL;
1318 
1319 	return NULL;
1320 }
1321 
1322 static const struct got_error *
1323 gotweb_get_repo_description(char **description, struct server *srv,
1324     const char *dirpath, int dir)
1325 {
1326 	const struct got_error *error = NULL;
1327 	struct stat sb;
1328 	int fd = -1;
1329 	off_t len;
1330 
1331 	*description = NULL;
1332 	if (srv->show_repo_description == 0)
1333 		return NULL;
1334 
1335 	fd = openat(dir, "description", O_RDONLY);
1336 	if (fd == -1) {
1337 		if (errno != ENOENT && errno != EACCES) {
1338 			error = got_error_from_errno_fmt("openat %s/%s",
1339 			    dirpath, "description");
1340 		}
1341 		goto done;
1342 	}
1343 
1344 	if (fstat(fd, &sb) == -1) {
1345 		error = got_error_from_errno_fmt("fstat %s/%s",
1346 		    dirpath, "description");
1347 		goto done;
1348 	}
1349 
1350 	len = sb.st_size;
1351 	if (len > GOTWEBD_MAXDESCRSZ - 1)
1352 		len = GOTWEBD_MAXDESCRSZ - 1;
1353 
1354 	*description = calloc(len + 1, sizeof(**description));
1355 	if (*description == NULL) {
1356 		error = got_error_from_errno("calloc");
1357 		goto done;
1358 	}
1359 
1360 	if (read(fd, *description, len) == -1)
1361 		error = got_error_from_errno("read");
1362 done:
1363 	if (fd != -1 && close(fd) == -1 && error == NULL)
1364 		error = got_error_from_errno("close");
1365 	return error;
1366 }
1367 
1368 static const struct got_error *
1369 gotweb_get_clone_url(char **url, struct server *srv, const char *dirpath,
1370     int dir)
1371 {
1372 	const struct got_error *error = NULL;
1373 	struct stat sb;
1374 	int fd = -1;
1375 	off_t len;
1376 
1377 	*url = NULL;
1378 	if (srv->show_repo_cloneurl == 0)
1379 		return NULL;
1380 
1381 	fd = openat(dir, "cloneurl", O_RDONLY);
1382 	if (fd == -1) {
1383 		if (errno != ENOENT && errno != EACCES) {
1384 			error = got_error_from_errno_fmt("openat %s/%s",
1385 			    dirpath, "cloneurl");
1386 		}
1387 		goto done;
1388 	}
1389 
1390 	if (fstat(fd, &sb) == -1) {
1391 		error = got_error_from_errno_fmt("fstat %s/%s",
1392 		    dirpath, "cloneurl");
1393 		goto done;
1394 	}
1395 
1396 	len = sb.st_size;
1397 	if (len > GOTWEBD_MAXCLONEURLSZ - 1)
1398 		len = GOTWEBD_MAXCLONEURLSZ - 1;
1399 
1400 	*url = calloc(len + 1, sizeof(**url));
1401 	if (*url == NULL) {
1402 		error = got_error_from_errno("calloc");
1403 		goto done;
1404 	}
1405 
1406 	if (read(fd, *url, len) == -1)
1407 		error = got_error_from_errno("read");
1408 done:
1409 	if (fd != -1 && close(fd) == -1 && error == NULL)
1410 		error = got_error_from_errno("close");
1411 	return error;
1412 }
1413 
1414 int
1415 gotweb_render_age(struct template *tp, time_t committer_time, int ref_tm)
1416 {
1417 	struct request *c = tp->tp_arg;
1418 	struct tm tm;
1419 	long long diff_time;
1420 	const char *years = "years ago", *months = "months ago";
1421 	const char *weeks = "weeks ago", *days = "days ago";
1422 	const char *hours = "hours ago",  *minutes = "minutes ago";
1423 	const char *seconds = "seconds ago", *now = "right now";
1424 	char *s;
1425 	char datebuf[64];
1426 	size_t r;
1427 
1428 	switch (ref_tm) {
1429 	case TM_DIFF:
1430 		diff_time = time(NULL) - committer_time;
1431 		if (diff_time > 60 * 60 * 24 * 365 * 2) {
1432 			if (fcgi_printf(c, "%lld %s",
1433 			    (diff_time / 60 / 60 / 24 / 365), years) == -1)
1434 				return -1;
1435 		} else if (diff_time > 60 * 60 * 24 * (365 / 12) * 2) {
1436 			if (fcgi_printf(c, "%lld %s",
1437 			    (diff_time / 60 / 60 / 24 / (365 / 12)),
1438 			    months) == -1)
1439 				return -1;
1440 		} else if (diff_time > 60 * 60 * 24 * 7 * 2) {
1441 			if (fcgi_printf(c, "%lld %s",
1442 			    (diff_time / 60 / 60 / 24 / 7), weeks) == -1)
1443 				return -1;
1444 		} else if (diff_time > 60 * 60 * 24 * 2) {
1445 			if (fcgi_printf(c, "%lld %s",
1446 			    (diff_time / 60 / 60 / 24), days) == -1)
1447 				return -1;
1448 		} else if (diff_time > 60 * 60 * 2) {
1449 			if (fcgi_printf(c, "%lld %s",
1450 			    (diff_time / 60 / 60), hours) == -1)
1451 				return -1;
1452 		} else if (diff_time > 60 * 2) {
1453 			if (fcgi_printf(c, "%lld %s", (diff_time / 60),
1454 			    minutes) == -1)
1455 				return -1;
1456 		} else if (diff_time > 2) {
1457 			if (fcgi_printf(c, "%lld %s", diff_time,
1458 			    seconds) == -1)
1459 				return -1;
1460 		} else {
1461 			if (fcgi_puts(tp, now) == -1)
1462 				return -1;
1463 		}
1464 		break;
1465 	case TM_LONG:
1466 		if (gmtime_r(&committer_time, &tm) == NULL)
1467 			return -1;
1468 
1469 		s = asctime_r(&tm, datebuf);
1470 		if (s == NULL)
1471 			return -1;
1472 
1473 		if (fcgi_puts(tp, datebuf) == -1 ||
1474 		    fcgi_puts(tp, " UTC") == -1)
1475 			return -1;
1476 		break;
1477 	case TM_RFC822:
1478 		if (gmtime_r(&committer_time, &tm) == NULL)
1479 			return -1;
1480 
1481 		r = strftime(datebuf, sizeof(datebuf),
1482 		    "%a, %d %b %Y %H:%M:%S GMT", &tm);
1483 		if (r == 0)
1484 			return -1;
1485 
1486 		if (fcgi_puts(tp, datebuf) == -1)
1487 			return -1;
1488 		break;
1489 	}
1490 	return 0;
1491 }