shared.c

   1 /* shared.c: global vars + some callback functions
   2  *
   3  * Copyright (C) 2006 Lars Hjemli
   4  *
   5  * Licensed under GNU General Public License v2
   6  *   (see COPYING for full license text)
   7  */
   8
   9 #include "cgit.h"
  10
  11 struct cgit_repolist cgit_repolist;
  12 struct cgit_context ctx;
  13
  14 int chk_zero(int result, char *msg)
  15 {
  16         if (result != 0)
  17                 die("%s: %s", msg, strerror(errno));
  18         return result;
  19 }
  20
  21 int chk_positive(int result, char *msg)
  22 {
  23         if (result <= 0)
  24                 die("%s: %s", msg, strerror(errno));
  25         return result;
  26 }
  27
  28 int chk_non_negative(int result, char *msg)
  29 {
  30         if (result < 0)
  31                 die("%s: %s",msg, strerror(errno));
  32         return result;
  33 }
  34
  35 struct cgit_repo *cgit_add_repo(const char *url)
  36 {
  37         struct cgit_repo *ret;
  38
  39         if (++cgit_repolist.count > cgit_repolist.length) {
  40                 if (cgit_repolist.length == 0)
  41                         cgit_repolist.length = 8;
  42                 else
  43                         cgit_repolist.length *= 2;
  44                 cgit_repolist.repos = xrealloc(cgit_repolist.repos,
  45                                                cgit_repolist.length *
  46                                                sizeof(struct cgit_repo));
  47         }
  48
  49         ret = &cgit_repolist.repos[cgit_repolist.count-1];
  50         memset(ret, 0, sizeof(struct cgit_repo));
  51         ret->url = trim_end(url, '/');
  52         ret->name = ret->url;
  53         ret->path = NULL;
  54         ret->desc = "[no description]";
  55         ret->owner = NULL;
  56         ret->section = ctx.cfg.section;
  57         ret->defbranch = "master";
  58         ret->snapshots = ctx.cfg.snapshots;
  59         ret->enable_log_filecount = ctx.cfg.enable_log_filecount;
  60         ret->enable_log_linecount = ctx.cfg.enable_log_linecount;
  61         ret->enable_remote_branches = ctx.cfg.enable_remote_branches;
  62         ret->enable_subject_links = ctx.cfg.enable_subject_links;
  63         ret->max_stats = ctx.cfg.max_stats;
  64         ret->module_link = ctx.cfg.module_link;
  65         ret->readme = NULL;
  66         ret->mtime = -1;
  67         ret->about_filter = ctx.cfg.about_filter;
  68         ret->commit_filter = ctx.cfg.commit_filter;
  69         ret->source_filter = ctx.cfg.source_filter;
  70         return ret;
  71 }
  72
  73 struct cgit_repo *cgit_get_repoinfo(const char *url)
  74 {
  75         int i;
  76         struct cgit_repo *repo;
  77
  78         for (i=0; i<cgit_repolist.count; i++) {
  79                 repo = &cgit_repolist.repos[i];
  80                 if (!strcmp(repo->url, url))
  81                         return repo;
  82         }
  83         return NULL;
  84 }
  85
  86 void *cgit_free_commitinfo(struct commitinfo *info)
  87 {
  88         free(info->author);
  89         free(info->author_email);
  90         free(info->committer);
  91         free(info->committer_email);
  92         free(info->subject);
  93         free(info->msg);
  94         free(info->msg_encoding);
  95         free(info);
  96         return NULL;
  97 }
  98
  99 char *trim_end(const char *str, char c)
 100 {
 101         int len;
 102         char *s, *t;
 103
 104         if (str == NULL)
 105                 return NULL;
 106         t = (char *)str;
 107         len = strlen(t);
 108         while(len > 0 && t[len - 1] == c)
 109                 len--;
 110
 111         if (len == 0)
 112                 return NULL;
 113
 114         c = t[len];
 115         t[len] = '\0';
 116         s = xstrdup(t);
 117         t[len] = c;
 118         return s;
 119 }
 120
 121 char *strlpart(char *txt, int maxlen)
 122 {
 123         char *result;
 124
 125         if (!txt)
 126                 return txt;
 127
 128         if (strlen(txt) <= maxlen)
 129                 return txt;
 130         result = xmalloc(maxlen + 1);
 131         memcpy(result, txt, maxlen - 3);
 132         result[maxlen-1] = result[maxlen-2] = result[maxlen-3] = '.';
 133         result[maxlen] = '\0';
 134         return result;
 135 }
 136
 137 char *strrpart(char *txt, int maxlen)
 138 {
 139         char *result;
 140
 141         if (!txt)
 142                 return txt;
 143
 144         if (strlen(txt) <= maxlen)
 145                 return txt;
 146         result = xmalloc(maxlen + 1);
 147         memcpy(result + 3, txt + strlen(txt) - maxlen + 4, maxlen - 3);
 148         result[0] = result[1] = result[2] = '.';
 149         return result;
 150 }
 151
 152 void cgit_add_ref(struct reflist *list, struct refinfo *ref)
 153 {
 154         size_t size;
 155
 156         if (list->count >= list->alloc) {
 157                 list->alloc += (list->alloc ? list->alloc : 4);
 158                 size = list->alloc * sizeof(struct refinfo *);
 159                 list->refs = xrealloc(list->refs, size);
 160         }
 161         list->refs[list->count++] = ref;
 162 }
 163
 164 struct refinfo *cgit_mk_refinfo(const char *refname, const unsigned char *sha1)
 165 {
 166         struct refinfo *ref;
 167
 168         ref = xmalloc(sizeof (struct refinfo));
 169         ref->refname = xstrdup(refname);
 170         ref->object = parse_object(sha1);
 171         switch (ref->object->type) {
 172         case OBJ_TAG:
 173                 ref->tag = cgit_parse_tag((struct tag *)ref->object);
 174                 break;
 175         case OBJ_COMMIT:
 176                 ref->commit = cgit_parse_commit((struct commit *)ref->object);
 177                 break;
 178         }
 179         return ref;
 180 }
 181
 182 int cgit_refs_cb(const char *refname, const unsigned char *sha1, int flags,
 183                   void *cb_data)
 184 {
 185         struct reflist *list = (struct reflist *)cb_data;
 186         struct refinfo *info = cgit_mk_refinfo(refname, sha1);
 187
 188         if (info)
 189                 cgit_add_ref(list, info);
 190         return 0;
 191 }
 192
 193 void cgit_diff_tree_cb(struct diff_queue_struct *q,
 194                        struct diff_options *options, void *data)
 195 {
 196         int i;
 197
 198         for (i = 0; i < q->nr; i++) {
 199                 if (q->queue[i]->status == 'U')
 200                         continue;
 201                 ((filepair_fn)data)(q->queue[i]);
 202         }
 203 }
 204
 205 static int load_mmfile(mmfile_t *file, const unsigned char *sha1)
 206 {
 207         enum object_type type;
 208
 209         if (is_null_sha1(sha1)) {
 210                 file->ptr = (char *)"";
 211                 file->size = 0;
 212         } else {
 213                 file->ptr = read_sha1_file(sha1, &type,
 214                                            (unsigned long *)&file->size);
 215         }
 216         return 1;
 217 }
 218
 219 /*
 220  * Receive diff-buffers from xdiff and concatenate them as
 221  * needed across multiple callbacks.
 222  *
 223  * This is basically a copy of xdiff-interface.c/xdiff_outf(),
 224  * ripped from git and modified to use globals instead of
 225  * a special callback-struct.
 226  */
 227 char *diffbuf = NULL;
 228 int buflen = 0;
 229
 230 int filediff_cb(void *priv, mmbuffer_t *mb, int nbuf)
 231 {
 232         int i;
 233
 234         for (i = 0; i < nbuf; i++) {
 235                 if (mb[i].ptr[mb[i].size-1] != '\n') {
 236                         /* Incomplete line */
 237                         diffbuf = xrealloc(diffbuf, buflen + mb[i].size);
 238                         memcpy(diffbuf + buflen, mb[i].ptr, mb[i].size);
 239                         buflen += mb[i].size;
 240                         continue;
 241                 }
 242
 243                 /* we have a complete line */
 244                 if (!diffbuf) {
 245                         ((linediff_fn)priv)(mb[i].ptr, mb[i].size);
 246                         continue;
 247                 }
 248                 diffbuf = xrealloc(diffbuf, buflen + mb[i].size);
 249                 memcpy(diffbuf + buflen, mb[i].ptr, mb[i].size);
 250                 ((linediff_fn)priv)(diffbuf, buflen + mb[i].size);
 251                 free(diffbuf);
 252                 diffbuf = NULL;
 253                 buflen = 0;
 254         }
 255         if (diffbuf) {
 256                 ((linediff_fn)priv)(diffbuf, buflen);
 257                 free(diffbuf);
 258                 diffbuf = NULL;
 259                 buflen = 0;
 260         }
 261         return 0;
 262 }
 263
 264 int cgit_diff_files(const unsigned char *old_sha1,
 265                     const unsigned char *new_sha1, unsigned long *old_size,
 266                     unsigned long *new_size, int *binary, int context,
 267                     int ignorews, linediff_fn fn)
 268 {
 269         mmfile_t file1, file2;
 270         xpparam_t diff_params;
 271         xdemitconf_t emit_params;
 272         xdemitcb_t emit_cb;
 273
 274         if (!load_mmfile(&file1, old_sha1) || !load_mmfile(&file2, new_sha1))
 275                 return 1;
 276
 277         *old_size = file1.size;
 278         *new_size = file2.size;
 279
 280         if ((file1.ptr && buffer_is_binary(file1.ptr, file1.size)) ||
 281             (file2.ptr && buffer_is_binary(file2.ptr, file2.size))) {
 282                 *binary = 1;
 283                 if (file1.size)
 284                         free(file1.ptr);
 285                 if (file2.size)
 286                         free(file2.ptr);
 287                 return 0;
 288         }
 289
 290         memset(&diff_params, 0, sizeof(diff_params));
 291         memset(&emit_params, 0, sizeof(emit_params));
 292         memset(&emit_cb, 0, sizeof(emit_cb));
 293         diff_params.flags = XDF_NEED_MINIMAL;
 294         if (ignorews)
 295                 diff_params.flags |= XDF_IGNORE_WHITESPACE;
 296         emit_params.ctxlen = context > 0 ? context : 3;
 297         emit_params.flags = XDL_EMIT_FUNCNAMES;
 298         emit_cb.outf = filediff_cb;
 299         emit_cb.priv = fn;
 300         xdl_diff(&file1, &file2, &diff_params, &emit_params, &emit_cb);
 301         if (file1.size)
 302                 free(file1.ptr);
 303         if (file2.size)
 304                 free(file2.ptr);
 305         return 0;
 306 }
 307
 308 void cgit_diff_tree(const unsigned char *old_sha1,
 309                     const unsigned char *new_sha1,
 310                     filepair_fn fn, const char *prefix, int ignorews)
 311 {
 312         struct diff_options opt;
 313         int ret;
 314         int prefixlen;
 315
 316         diff_setup(&opt);
 317         opt.output_format = DIFF_FORMAT_CALLBACK;
 318         opt.detect_rename = 1;
 319         opt.rename_limit = ctx.cfg.renamelimit;
 320         DIFF_OPT_SET(&opt, RECURSIVE);
 321         if (ignorews)
 322                 DIFF_XDL_SET(&opt, IGNORE_WHITESPACE);
 323         opt.format_callback = cgit_diff_tree_cb;
 324         opt.format_callback_data = fn;
 325         if (prefix) {
 326                 opt.nr_paths = 1;
 327                 opt.paths = &prefix;
 328                 prefixlen = strlen(prefix);
 329                 opt.pathlens = &prefixlen;
 330         }
 331         diff_setup_done(&opt);
 332
 333         if (old_sha1 && !is_null_sha1(old_sha1))
 334                 ret = diff_tree_sha1(old_sha1, new_sha1, "", &opt);
 335         else
 336                 ret = diff_root_tree_sha1(new_sha1, "", &opt);
 337         diffcore_std(&opt);
 338         diff_flush(&opt);
 339 }
 340
 341 void cgit_diff_commit(struct commit *commit, filepair_fn fn)
 342 {
 343         unsigned char *old_sha1 = NULL;
 344
 345         if (commit->parents)
 346                 old_sha1 = commit->parents->item->object.sha1;
 347         cgit_diff_tree(old_sha1, commit->object.sha1, fn, NULL,
 348                        ctx.qry.ignorews);
 349 }
 350
 351 int cgit_parse_snapshots_mask(const char *str)
 352 {
 353         const struct cgit_snapshot_format *f;
 354         static const char *delim = " \t,:/|;";
 355         int tl, sl, rv = 0;
 356
 357         /* favor legacy setting */
 358         if(atoi(str))
 359                 return 1;
 360         for(;;) {
 361                 str += strspn(str,delim);
 362                 tl = strcspn(str,delim);
 363                 if (!tl)
 364                         break;
 365                 for (f = cgit_snapshot_formats; f->suffix; f++) {
 366                         sl = strlen(f->suffix);
 367                         if((tl == sl && !strncmp(f->suffix, str, tl)) ||
 368                            (tl == sl-1 && !strncmp(f->suffix+1, str, tl-1))) {
 369                                 rv |= f->bit;
 370                                 break;
 371                         }
 372                 }
 373                 str += tl;
 374         }
 375         return rv;
 376 }
 377
 378 int cgit_open_filter(struct cgit_filter *filter)
 379 {
 380
 381         filter->old_stdout = chk_positive(dup(STDOUT_FILENO),
 382                 "Unable to duplicate STDOUT");
 383         chk_zero(pipe(filter->pipe_fh), "Unable to create pipe to subprocess");
 384         filter->pid = chk_non_negative(fork(), "Unable to create subprocess");
 385         if (filter->pid == 0) {
 386                 close(filter->pipe_fh[1]);
 387                 chk_non_negative(dup2(filter->pipe_fh[0], STDIN_FILENO),
 388                         "Unable to use pipe as STDIN");
 389                 execvp(filter->cmd, filter->argv);
 390                 die("Unable to exec subprocess %s: %s (%d)", filter->cmd,
 391                         strerror(errno), errno);
 392         }
 393         close(filter->pipe_fh[0]);
 394         chk_non_negative(dup2(filter->pipe_fh[1], STDOUT_FILENO),
 395                 "Unable to use pipe as STDOUT");
 396         close(filter->pipe_fh[1]);
 397         return 0;
 398 }
 399
 400 int cgit_close_filter(struct cgit_filter *filter)
 401 {
 402         chk_non_negative(dup2(filter->old_stdout, STDOUT_FILENO),
 403                 "Unable to restore STDOUT");
 404         close(filter->old_stdout);
 405         if (filter->pid < 0)
 406                 return 0;
 407         waitpid(filter->pid, &filter->exitstatus, 0);
 408         if (WIFEXITED(filter->exitstatus) && !WEXITSTATUS(filter->exitstatus))
 409                 return 0;
 410         die("Subprocess %s exited abnormally", filter->cmd);
 411 }
 412
 413 /* Read the content of the specified file into a newly allocated buffer,
 414  * zeroterminate the buffer and return 0 on success, errno otherwise.
 415  */
 416 int readfile(const char *path, char **buf, size_t *size)
 417 {
 418         int fd, e;
 419         struct stat st;
 420
 421         fd = open(path, O_RDONLY);
 422         if (fd == -1)
 423                 return errno;
 424         if (fstat(fd, &st)) {
 425                 e = errno;
 426                 close(fd);
 427                 return e;
 428         }
 429         if (!S_ISREG(st.st_mode)) {
 430                 close(fd);
 431                 return EISDIR;
 432         }
 433         *buf = xmalloc(st.st_size + 1);
 434         *size = read_in_full(fd, *buf, st.st_size);
 435         e = errno;
 436         (*buf)[*size] = '\0';
 437         close(fd);
 438         return (*size == st.st_size ? 0 : e);
 439 }
 440
 441 int is_token_char(char c)
 442 {
 443         return isalnum(c) || c == '_';
 444 }
 445
 446 /* Replace name with getenv(name), return pointer to zero-terminating char
 447  */
 448 char *expand_macro(char *name, int maxlength)
 449 {
 450         char *value;
 451         int len;
 452
 453         len = 0;
 454         value = getenv(name);
 455         if (value) {
 456                 len = strlen(value);
 457                 if (len > maxlength)
 458                         len = maxlength;
 459                 strncpy(name, value, len);
 460         }
 461         return name + len;
 462 }
 463
 464 #define EXPBUFSIZE (1024 * 8)
 465
 466 /* Replace all tokens prefixed by '$' in the specified text with the
 467  * value of the named environment variable.
 468  * NB: the return value is a static buffer, i.e. it must be strdup'd
 469  * by the caller.
 470  */
 471 char *expand_macros(const char *txt)
 472 {
 473         static char result[EXPBUFSIZE];
 474         char *p, *start;
 475         int len;
 476
 477         p = result;
 478         start = NULL;
 479         while (p < result + EXPBUFSIZE - 1 && txt && *txt) {
 480                 *p = *txt;
 481                 if (start) {
 482                         if (!is_token_char(*txt)) {
 483                                 if (p - start > 0) {
 484                                         *p = '\0';
 485                                         len = result + EXPBUFSIZE - start - 1;
 486                                         p = expand_macro(start, len) - 1;
 487                                 }
 488                                 start = NULL;
 489                                 txt--;
 490                         }
 491                         p++;
 492                         txt++;
 493                         continue;
 494                 }
 495                 if (*txt == '$') {
 496                         start = p;
 497                         txt++;
 498                         continue;
 499                 }
 500                 p++;
 501                 txt++;
 502         }
 503         *p = '\0';
 504         if (start && p - start > 0) {
 505                 len = result + EXPBUFSIZE - start - 1;
 506                 p = expand_macro(start, len);
 507                 *p = '\0';
 508         }
 509         return result;
 510 }