commit.c

   1 #include <ctype.h>
   2 #include "tag.h"
   3 #include "commit.h"
   4 #include "cache.h"
   5
   6 struct sort_node
   7 {
   8         /*
   9          * the number of children of the associated commit
  10          * that also occur in the list being sorted.
  11          */
  12         unsigned int indegree;
  13
  14         /*
  15          * reference to original list item that we will re-use
  16          * on output.
  17          */
  18         struct commit_list * list_item;
  19
  20 };
  21
  22 const char *commit_type = "commit";
  23
  24 enum cmit_fmt get_commit_format(const char *arg)
  25 {
  26         if (!*arg)
  27                 return CMIT_FMT_DEFAULT;
  28         if (!strcmp(arg, "=raw"))
  29                 return CMIT_FMT_RAW;
  30         if (!strcmp(arg, "=medium"))
  31                 return CMIT_FMT_MEDIUM;
  32         if (!strcmp(arg, "=short"))
  33                 return CMIT_FMT_SHORT;
  34         if (!strcmp(arg, "=full"))
  35                 return CMIT_FMT_FULL;
  36         die("invalid --pretty format");
  37 }
  38
  39 static struct commit *check_commit(struct object *obj, const unsigned char *sha1)
  40 {
  41         if (obj->type != commit_type) {
  42                 error("Object %s is a %s, not a commit",
  43                       sha1_to_hex(sha1), obj->type);
  44                 return NULL;
  45         }
  46         return (struct commit *) obj;
  47 }
  48
  49 struct commit *lookup_commit_reference(const unsigned char *sha1)
  50 {
  51         struct object *obj = parse_object(sha1);
  52
  53         if (!obj)
  54                 return NULL;
  55         while (obj->type == tag_type)
  56                 obj = parse_object(((struct tag *)obj)->tagged->sha1);
  57
  58         return check_commit(obj, sha1);
  59 }
  60
  61 struct commit *lookup_commit(const unsigned char *sha1)
  62 {
  63         struct object *obj = lookup_object(sha1);
  64         if (!obj) {
  65                 struct commit *ret = xmalloc(sizeof(struct commit));
  66                 memset(ret, 0, sizeof(struct commit));
  67                 created_object(sha1, &ret->object);
  68                 ret->object.type = commit_type;
  69                 return ret;
  70         }
  71         if (!obj->type)
  72                 obj->type = commit_type;
  73         return check_commit(obj, sha1);
  74 }
  75
  76 static unsigned long parse_commit_date(const char *buf)
  77 {
  78         unsigned long date;
  79
  80         if (memcmp(buf, "author", 6))
  81                 return 0;
  82         while (*buf++ != '\n')
  83                 /* nada */;
  84         if (memcmp(buf, "committer", 9))
  85                 return 0;
  86         while (*buf++ != '>')
  87                 /* nada */;
  88         date = strtoul(buf, NULL, 10);
  89         if (date == ULONG_MAX)
  90                 date = 0;
  91         return date;
  92 }
  93
  94 int parse_commit_buffer(struct commit *item, void *buffer, unsigned long size)
  95 {
  96         void *bufptr = buffer;
  97         unsigned char parent[20];
  98         struct commit_list **pptr;
  99
 100         if (item->object.parsed)
 101                 return 0;
 102         item->object.parsed = 1;
 103         get_sha1_hex(bufptr + 5, parent);
 104         item->tree = lookup_tree(parent);
 105         if (item->tree)
 106                 add_ref(&item->object, &item->tree->object);
 107         bufptr += 46; /* "tree " + "hex sha1" + "\n" */
 108         pptr = &item->parents;
 109         while (!memcmp(bufptr, "parent ", 7) &&
 110                !get_sha1_hex(bufptr + 7, parent)) {
 111                 struct commit *new_parent = lookup_commit(parent);
 112                 if (new_parent) {
 113                         pptr = &commit_list_insert(new_parent, pptr)->next;
 114                         add_ref(&item->object, &new_parent->object);
 115                 }
 116                 bufptr += 48;
 117         }
 118         item->date = parse_commit_date(bufptr);
 119         return 0;
 120 }
 121
 122 int parse_commit(struct commit *item)
 123 {
 124         char type[20];
 125         void *buffer;
 126         unsigned long size;
 127         int ret;
 128
 129         if (item->object.parsed)
 130                 return 0;
 131         buffer = read_sha1_file(item->object.sha1, type, &size);
 132         if (!buffer)
 133                 return error("Could not read %s",
 134                              sha1_to_hex(item->object.sha1));
 135         if (strcmp(type, commit_type)) {
 136                 free(buffer);
 137                 return error("Object %s not a commit",
 138                              sha1_to_hex(item->object.sha1));
 139         }
 140         ret = parse_commit_buffer(item, buffer, size);
 141         if (!ret) {
 142                 item->buffer = buffer;
 143                 return 0;
 144         }
 145         free(buffer);
 146         return ret;
 147 }
 148
 149 struct commit_list *commit_list_insert(struct commit *item, struct commit_list **list_p)
 150 {
 151         struct commit_list *new_list = xmalloc(sizeof(struct commit_list));
 152         new_list->item = item;
 153         new_list->next = *list_p;
 154         *list_p = new_list;
 155         return new_list;
 156 }
 157
 158 void free_commit_list(struct commit_list *list)
 159 {
 160         while (list) {
 161                 struct commit_list *temp = list;
 162                 list = temp->next;
 163                 free(temp);
 164         }
 165 }
 166
 167 struct commit_list * insert_by_date(struct commit *item, struct commit_list **list)
 168 {
 169         struct commit_list **pp = list;
 170         struct commit_list *p;
 171         while ((p = *pp) != NULL) {
 172                 if (p->item->date < item->date) {
 173                         break;
 174                 }
 175                 pp = &p->next;
 176         }
 177         return commit_list_insert(item, pp);
 178 }
 179
 180
 181 void sort_by_date(struct commit_list **list)
 182 {
 183         struct commit_list *ret = NULL;
 184         while (*list) {
 185                 insert_by_date((*list)->item, &ret);
 186                 *list = (*list)->next;
 187         }
 188         *list = ret;
 189 }
 190
 191 struct commit *pop_most_recent_commit(struct commit_list **list,
 192                                       unsigned int mark)
 193 {
 194         struct commit *ret = (*list)->item;
 195         struct commit_list *parents = ret->parents;
 196         struct commit_list *old = *list;
 197
 198         *list = (*list)->next;
 199         free(old);
 200
 201         while (parents) {
 202                 struct commit *commit = parents->item;
 203                 parse_commit(commit);
 204                 if (!(commit->object.flags & mark)) {
 205                         commit->object.flags |= mark;
 206                         insert_by_date(commit, list);
 207                 }
 208                 parents = parents->next;
 209         }
 210         return ret;
 211 }
 212
 213 /*
 214  * Generic support for pretty-printing the header
 215  */
 216 static int get_one_line(const char *msg, unsigned long len)
 217 {
 218         int ret = 0;
 219
 220         while (len--) {
 221                 char c = *msg++;
 222                 ret++;
 223                 if (c == '\n')
 224                         break;
 225                 if (!c)
 226                         return 0;
 227         }
 228         return ret;
 229 }
 230
 231 static int add_user_info(const char *what, enum cmit_fmt fmt, char *buf, const char *line)
 232 {
 233         char *date;
 234         unsigned int namelen;
 235         unsigned long time;
 236         int tz, ret;
 237
 238         date = strchr(line, '>');
 239         if (!date)
 240                 return 0;
 241         namelen = ++date - line;
 242         time = strtoul(date, &date, 10);
 243         tz = strtol(date, NULL, 10);
 244
 245         ret = sprintf(buf, "%s: %.*s\n", what, namelen, line);
 246         if (fmt == CMIT_FMT_MEDIUM)
 247                 ret += sprintf(buf + ret, "Date:   %s\n", show_date(time, tz));
 248         return ret;
 249 }
 250
 251 static int is_empty_line(const char *line, int len)
 252 {
 253         while (len && isspace(line[len-1]))
 254                 len--;
 255         return !len;
 256 }
 257
 258 static int add_parent_info(enum cmit_fmt fmt, char *buf, const char *line, int parents)
 259 {
 260         int offset = 0;
 261         switch (parents) {
 262         case 1:
 263                 break;
 264         case 2:
 265                 /* Go back to the previous line: 40 characters of previous parent, and one '\n' */
 266                 offset = sprintf(buf, "Merge: %.40s\n", line-41);
 267                 /* Fallthrough */
 268         default:
 269                 /* Replace the previous '\n' with a space */
 270                 buf[offset-1] = ' ';
 271                 offset += sprintf(buf + offset, "%.40s\n", line+7);
 272         }
 273         return offset;
 274 }
 275
 276 unsigned long pretty_print_commit(enum cmit_fmt fmt, const char *msg, unsigned long len, char *buf, unsigned long space)
 277 {
 278         int hdr = 1, body = 0;
 279         unsigned long offset = 0;
 280         int parents = 0;
 281
 282         for (;;) {
 283                 const char *line = msg;
 284                 int linelen = get_one_line(msg, len);
 285
 286                 if (!linelen)
 287                         break;
 288
 289                 /*
 290                  * We want some slop for indentation and a possible
 291                  * final "...". Thus the "+ 20".
 292                  */
 293                 if (offset + linelen + 20 > space) {
 294                         memcpy(buf + offset, "    ...\n", 8);
 295                         offset += 8;
 296                         break;
 297                 }
 298
 299                 msg += linelen;
 300                 len -= linelen;
 301                 if (hdr) {
 302                         if (linelen == 1) {
 303                                 hdr = 0;
 304                                 buf[offset++] = '\n';
 305                                 continue;
 306                         }
 307                         if (fmt == CMIT_FMT_RAW) {
 308                                 memcpy(buf + offset, line, linelen);
 309                                 offset += linelen;
 310                                 continue;
 311                         }
 312                         if (!memcmp(line, "parent ", 7)) {
 313                                 if (linelen != 48)
 314                                         die("bad parent line in commit");
 315                                 offset += add_parent_info(fmt, buf + offset, line, ++parents);
 316                         }
 317                         if (!memcmp(line, "author ", 7))
 318                                 offset += add_user_info("Author", fmt, buf + offset, line + 7);
 319                         if (fmt == CMIT_FMT_FULL) {
 320                                 if (!memcmp(line, "committer ", 10))
 321                                         offset += add_user_info("Commit", fmt, buf + offset, line + 10);
 322                         }
 323                         continue;
 324                 }
 325
 326                 if (is_empty_line(line, linelen)) {
 327                         if (!body)
 328                                 continue;
 329                         if (fmt == CMIT_FMT_SHORT)
 330                                 break;
 331                 } else {
 332                         body = 1;
 333                 }
 334                 memset(buf + offset, ' ', 4);
 335                 memcpy(buf + offset + 4, line, linelen);
 336                 offset += linelen + 4;
 337         }
 338         /* Make sure there is an EOLN */
 339         if (buf[offset - 1] != '\n')
 340                 buf[offset++] = '\n';
 341         buf[offset] = '\0';
 342         return offset;
 343 }
 344
 345 struct commit *pop_commit(struct commit_list **stack)
 346 {
 347         struct commit_list *top = *stack;
 348         struct commit *item = top ? top->item : NULL;
 349
 350         if (top) {
 351                 *stack = top->next;
 352                 free(top);
 353         }
 354         return item;
 355 }
 356
 357 int count_parents(struct commit * commit)
 358 {
 359         int count = 0;
 360         struct commit_list * parents = commit->parents;
 361         for (count=0;parents; parents=parents->next,count++)
 362           ;
 363         return count;
 364 }
 365
 366 /*
 367  * Performs an in-place topological sort on the list supplied.
 368  */
 369 void sort_in_topological_order(struct commit_list ** list)
 370 {
 371         struct commit_list * next = *list;
 372         struct commit_list * work = NULL;
 373         struct commit_list ** pptr = list;
 374         struct sort_node * nodes;
 375         struct sort_node * next_nodes;
 376         int count = 0;
 377
 378         /* determine the size of the list */
 379         while (next) {
 380                 next = next->next;
 381                 count++;
 382         }
 383         /* allocate an array to help sort the list */
 384         nodes = xcalloc(count, sizeof(*nodes));
 385         /* link the list to the array */
 386         next_nodes = nodes;
 387         next=*list;
 388         while (next) {
 389                 next_nodes->list_item = next;
 390                 next->item->object.util = next_nodes;
 391                 next_nodes++;
 392                 next = next->next;
 393         }
 394         /* update the indegree */
 395         next=*list;
 396         while (next) {
 397                 struct commit_list * parents = next->item->parents;
 398                 while (parents) {
 399                         struct commit * parent=parents->item;
 400                         struct sort_node * pn = (struct sort_node *)parent->object.util;
 401
 402                         if (pn)
 403                                 pn->indegree++;
 404                         parents=parents->next;
 405                 }
 406                 next=next->next;
 407         }
 408         /*
 409          * find the tips
 410          *
 411          * tips are nodes not reachable from any other node in the list
 412          *
 413          * the tips serve as a starting set for the work queue.
 414          */
 415         next=*list;
 416         while (next) {
 417                 struct sort_node * node = (struct sort_node *)next->item->object.util;
 418
 419                 if (node->indegree == 0) {
 420                         commit_list_insert(next->item, &work);
 421                 }
 422                 next=next->next;
 423         }
 424         /* process the list in topological order */
 425         while (work) {
 426                 struct commit * work_item = pop_commit(&work);
 427                 struct sort_node * work_node = (struct sort_node *)work_item->object.util;
 428                 struct commit_list * parents = work_item->parents;
 429
 430                 while (parents) {
 431                         struct commit * parent=parents->item;
 432                         struct sort_node * pn = (struct sort_node *)parent->object.util;
 433
 434                         if (pn) {
 435                                 /*
 436                                  * parents are only enqueued for emission
 437                                  * when all their children have been emitted thereby
 438                                  * guaranteeing topological order.
 439                                  */
 440                                 pn->indegree--;
 441                                 if (!pn->indegree)
 442                                         commit_list_insert(parent, &work);
 443                         }
 444                         parents=parents->next;
 445                 }
 446                 /*
 447                  * work_item is a commit all of whose children
 448                  * have already been emitted. we can emit it now.
 449                  */
 450                 *pptr = work_node->list_item;
 451                 pptr = &(*pptr)->next;
 452                 *pptr = NULL;
 453                 work_item->object.util = NULL;
 454         }
 455         free(nodes);
 456 }