gotwebd/gotweb.c

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