diff-tree.con commit date.c: add "show_date()" function. (f80cd78)
   1#include <ctype.h>
   2#include "cache.h"
   3#include "diff.h"
   4
   5static int silent = 0;
   6static int verbose_header = 0;
   7static int ignore_merges = 1;
   8static int recursive = 0;
   9static int read_stdin = 0;
  10static int line_termination = '\n';
  11static int generate_patch = 0;
  12static const char *header = NULL;
  13static const char *header_prefix = "";
  14
  15// What paths are we interested in?
  16static int nr_paths = 0;
  17static char **paths = NULL;
  18static int *pathlens = NULL;
  19
  20static int diff_tree_sha1(const unsigned char *old, const unsigned char *new, const char *base);
  21
  22static void update_tree_entry(void **bufp, unsigned long *sizep)
  23{
  24        void *buf = *bufp;
  25        unsigned long size = *sizep;
  26        int len = strlen(buf) + 1 + 20;
  27
  28        if (size < len)
  29                die("corrupt tree file");
  30        *bufp = buf + len;
  31        *sizep = size - len;
  32}
  33
  34static const unsigned char *extract(void *tree, unsigned long size, const char **pathp, unsigned int *modep)
  35{
  36        int len = strlen(tree)+1;
  37        const unsigned char *sha1 = tree + len;
  38        const char *path = strchr(tree, ' ');
  39
  40        if (!path || size < len + 20 || sscanf(tree, "%o", modep) != 1)
  41                die("corrupt tree file");
  42        *pathp = path+1;
  43        return sha1;
  44}
  45
  46static char *malloc_base(const char *base, const char *path, int pathlen)
  47{
  48        int baselen = strlen(base);
  49        char *newbase = xmalloc(baselen + pathlen + 2);
  50        memcpy(newbase, base, baselen);
  51        memcpy(newbase + baselen, path, pathlen);
  52        memcpy(newbase + baselen + pathlen, "/", 2);
  53        return newbase;
  54}
  55
  56static void show_file(const char *prefix, void *tree, unsigned long size, const char *base);
  57
  58/* A whole sub-tree went away or appeared */
  59static void show_tree(const char *prefix, void *tree, unsigned long size, const char *base)
  60{
  61        while (size) {
  62                show_file(prefix, tree, size, base);
  63                update_tree_entry(&tree, &size);
  64        }
  65}
  66
  67/* A file entry went away or appeared */
  68static void show_file(const char *prefix, void *tree, unsigned long size, const char *base)
  69{
  70        unsigned mode;
  71        const char *path;
  72        const unsigned char *sha1 = extract(tree, size, &path, &mode);
  73
  74        if (header) {
  75                printf("%s", header);
  76                header = NULL;
  77        }
  78
  79        if (silent)
  80                return;
  81
  82        if (recursive && S_ISDIR(mode)) {
  83                char type[20];
  84                unsigned long size;
  85                char *newbase = malloc_base(base, path, strlen(path));
  86                void *tree;
  87
  88                tree = read_sha1_file(sha1, type, &size);
  89                if (!tree || strcmp(type, "tree"))
  90                        die("corrupt tree sha %s", sha1_to_hex(sha1));
  91
  92                show_tree(prefix, tree, size, newbase);
  93                
  94                free(tree);
  95                free(newbase);
  96                return;
  97        }
  98
  99        if (generate_patch) {
 100                if (!S_ISDIR(mode))
 101                        diff_addremove(prefix[0], mode, sha1, base, path);
 102        }
 103        else
 104                printf("%s%06o\t%s\t%s\t%s%s%c", prefix, mode,
 105                       S_ISDIR(mode) ? "tree" : "blob",
 106                       sha1_to_hex(sha1), base, path,
 107                       line_termination);
 108}
 109
 110static int compare_tree_entry(void *tree1, unsigned long size1, void *tree2, unsigned long size2, const char *base)
 111{
 112        unsigned mode1, mode2;
 113        const char *path1, *path2;
 114        const unsigned char *sha1, *sha2;
 115        int cmp, pathlen1, pathlen2;
 116        char old_sha1_hex[50];
 117
 118        sha1 = extract(tree1, size1, &path1, &mode1);
 119        sha2 = extract(tree2, size2, &path2, &mode2);
 120
 121        pathlen1 = strlen(path1);
 122        pathlen2 = strlen(path2);
 123        cmp = cache_name_compare(path1, pathlen1, path2, pathlen2);
 124        if (cmp < 0) {
 125                show_file("-", tree1, size1, base);
 126                return -1;
 127        }
 128        if (cmp > 0) {
 129                show_file("+", tree2, size2, base);
 130                return 1;
 131        }
 132        if (!memcmp(sha1, sha2, 20) && mode1 == mode2)
 133                return 0;
 134
 135        /*
 136         * If the filemode has changed to/from a directory from/to a regular
 137         * file, we need to consider it a remove and an add.
 138         */
 139        if (S_ISDIR(mode1) != S_ISDIR(mode2)) {
 140                show_file("-", tree1, size1, base);
 141                show_file("+", tree2, size2, base);
 142                return 0;
 143        }
 144
 145        if (recursive && S_ISDIR(mode1)) {
 146                int retval;
 147                char *newbase = malloc_base(base, path1, pathlen1);
 148                retval = diff_tree_sha1(sha1, sha2, newbase);
 149                free(newbase);
 150                return retval;
 151        }
 152
 153        if (header) {
 154                printf("%s", header);
 155                header = NULL;
 156        }
 157        if (silent)
 158                return 0;
 159
 160        if (generate_patch) {
 161                if (!S_ISDIR(mode1))
 162                        diff_change(mode1, mode2, sha1, sha2, base, path1);
 163        }
 164        else {
 165                strcpy(old_sha1_hex, sha1_to_hex(sha1));
 166                printf("*%06o->%06o\t%s\t%s->%s\t%s%s%c", mode1, mode2,
 167                       S_ISDIR(mode1) ? "tree" : "blob",
 168                       old_sha1_hex, sha1_to_hex(sha2), base, path1,
 169                       line_termination);
 170        }
 171        return 0;
 172}
 173
 174static int interesting(void *tree, unsigned long size, const char *base)
 175{
 176        const char *path;
 177        unsigned mode;
 178        int i;
 179        int baselen, pathlen;
 180
 181        if (!nr_paths)
 182                return 1;
 183
 184        (void)extract(tree, size, &path, &mode);
 185
 186        pathlen = strlen(path);
 187        baselen = strlen(base);
 188
 189        for (i=0; i < nr_paths; i++) {
 190                const char *match = paths[i];
 191                int matchlen = pathlens[i];
 192
 193                if (baselen >= matchlen) {
 194                        /* If it doesn't match, move along... */
 195                        if (strncmp(base, match, matchlen))
 196                                continue;
 197
 198                        /* The base is a subdirectory of a path which was specified. */
 199                        return 1;
 200                }
 201
 202                /* Does the base match? */
 203                if (strncmp(base, match, baselen))
 204                        continue;
 205
 206                match += baselen;
 207                matchlen -= baselen;
 208
 209                if (pathlen > matchlen)
 210                        continue;
 211
 212                if (strncmp(path, match, pathlen))
 213                        continue;
 214
 215                return 1;
 216        }
 217        return 0; /* No matches */
 218}
 219
 220static int diff_tree(void *tree1, unsigned long size1, void *tree2, unsigned long size2, const char *base)
 221{
 222        while (size1 | size2) {
 223                if (nr_paths && size1 && !interesting(tree1, size1, base)) {
 224                        update_tree_entry(&tree1, &size1);
 225                        continue;
 226                }
 227                if (nr_paths && size2 && !interesting(tree2, size2, base)) {
 228                        update_tree_entry(&tree2, &size2);
 229                        continue;
 230                }
 231                if (!size1) {
 232                        show_file("+", tree2, size2, base);
 233                        update_tree_entry(&tree2, &size2);
 234                        continue;
 235                }
 236                if (!size2) {
 237                        show_file("-", tree1, size1, base);
 238                        update_tree_entry(&tree1, &size1);
 239                        continue;
 240                }
 241                switch (compare_tree_entry(tree1, size1, tree2, size2, base)) {
 242                case -1:
 243                        update_tree_entry(&tree1, &size1);
 244                        continue;
 245                case 0:
 246                        update_tree_entry(&tree1, &size1);
 247                        /* Fallthrough */
 248                case 1:
 249                        update_tree_entry(&tree2, &size2);
 250                        continue;
 251                }
 252                die("diff-tree: internal error");
 253        }
 254        return 0;
 255}
 256
 257static int diff_tree_sha1(const unsigned char *old, const unsigned char *new, const char *base)
 258{
 259        void *tree1, *tree2;
 260        unsigned long size1, size2;
 261        int retval;
 262
 263        tree1 = read_object_with_reference(old, "tree", &size1, 0);
 264        if (!tree1)
 265                die("unable to read source tree (%s)", sha1_to_hex(old));
 266        tree2 = read_object_with_reference(new, "tree", &size2, 0);
 267        if (!tree2)
 268                die("unable to read destination tree (%s)", sha1_to_hex(new));
 269        retval = diff_tree(tree1, size1, tree2, size2, base);
 270        free(tree1);
 271        free(tree2);
 272        return retval;
 273}
 274
 275static int get_one_line(const char *msg, unsigned long len)
 276{
 277        int ret = 0;
 278
 279        while (len--) {
 280                ret++;
 281                if (*msg++ == '\n')
 282                        break;
 283        }
 284        return ret;
 285}
 286
 287static char *generate_header(const char *commit, const char *parent, const char *msg, unsigned long len)
 288{
 289        static char this_header[1000];
 290        int offset;
 291
 292        offset = sprintf(this_header, "%s%s (from %s)\n", header_prefix, commit, parent);
 293        if (verbose_header) {
 294                int hdr = 1;
 295
 296                for (;;) {
 297                        const char *line = msg;
 298                        int linelen = get_one_line(msg, len);
 299
 300                        if (!linelen)
 301                                break;
 302                        if (offset + linelen + 10 > sizeof(this_header))
 303                                break;
 304
 305                        msg += linelen;
 306                        len -= linelen;
 307                        if (linelen == 1)
 308                                hdr = 0;
 309                        if (hdr)
 310                                continue;
 311                        memset(this_header + offset, ' ', 4);
 312                        memcpy(this_header + offset + 4, line, linelen);
 313                        offset += linelen + 4;
 314                }
 315                this_header[offset++] = '\n';
 316                this_header[offset] = 0;
 317        }
 318
 319        return this_header;
 320}
 321
 322static int diff_tree_stdin(char *line)
 323{
 324        int len = strlen(line);
 325        unsigned char commit[20], parent[20];
 326        unsigned long size, offset;
 327        static char this_header[1000];
 328        char *buf;
 329
 330        if (!len || line[len-1] != '\n')
 331                return -1;
 332        line[len-1] = 0;
 333        if (get_sha1_hex(line, commit))
 334                return -1;
 335        if (isspace(line[40]) && !get_sha1_hex(line+41, parent)) {
 336                line[40] = 0;
 337                line[81] = 0;
 338                sprintf(this_header, "%s (from %s)\n", line, line+41);
 339                header = this_header;
 340                return diff_tree_sha1(parent, commit, "");
 341        }
 342        buf = read_object_with_reference(commit, "commit", &size, NULL);
 343        if (!buf)
 344                return -1;
 345
 346        /* More than one parent? */
 347        if (ignore_merges) {
 348                if (!memcmp(buf + 46 + 48, "parent ", 7))
 349                        return 0;
 350        }
 351
 352        line[40] = 0;
 353        offset = 46;
 354        while (offset + 48 < size && !memcmp(buf + offset, "parent ", 7)) {
 355                if (get_sha1_hex(buf + offset + 7, parent))
 356                        return -1;
 357                header = generate_header(line, sha1_to_hex(parent), buf, size);
 358                diff_tree_sha1(parent, commit, "");
 359                if (!header && verbose_header)
 360                        header_prefix = "\ndiff-tree ";
 361                offset += 48;
 362        }
 363        return -1;
 364}
 365
 366static char *diff_tree_usage =
 367"diff-tree [-p] [-r] [-z] [--stdin] [-m] [-s] [-v] <tree sha1> <tree sha1>";
 368
 369int main(int argc, char **argv)
 370{
 371        char line[1000];
 372        unsigned char old[20], new[20];
 373
 374        for (;;) {
 375                char *arg;
 376
 377                argv++;
 378                argc--;
 379                arg = *argv;
 380                if (!arg || *arg != '-')
 381                        break;
 382
 383                if (!strcmp(arg, "-")) {
 384                        argv++;
 385                        argc--;
 386                        break;
 387                }
 388                if (!strcmp(arg, "-r")) {
 389                        recursive = 1;
 390                        continue;
 391                }
 392                if (!strcmp(arg, "-p")) {
 393                        recursive = generate_patch = 1;
 394                        continue;
 395                }
 396                if (!strcmp(arg, "-z")) {
 397                        line_termination = '\0';
 398                        continue;
 399                }
 400                if (!strcmp(arg, "-m")) {
 401                        ignore_merges = 0;
 402                        continue;
 403                }
 404                if (!strcmp(arg, "-s")) {
 405                        silent = 1;
 406                        continue;
 407                }
 408                if (!strcmp(arg, "-v")) {
 409                        verbose_header = 1;
 410                        header_prefix = "diff-tree ";
 411                        continue;
 412                }
 413                if (!strcmp(arg, "--stdin")) {
 414                        read_stdin = 1;
 415                        continue;
 416                }
 417                usage(diff_tree_usage);
 418        }
 419
 420        if (!read_stdin) {
 421                if (argc < 2 || get_sha1(argv[0], old) || get_sha1(argv[1], new))
 422                        usage(diff_tree_usage);
 423                argv += 2;
 424                argc -= 2;
 425        }
 426
 427        if (argc > 0) {
 428                int i;
 429
 430                paths = argv;
 431                nr_paths = argc;
 432                pathlens = xmalloc(nr_paths * sizeof(int));
 433                for (i=0; i<nr_paths; i++)
 434                        pathlens[i] = strlen(paths[i]);
 435        }
 436
 437        if (!read_stdin)
 438                return diff_tree_sha1(old, new, "");
 439
 440        while (fgets(line, sizeof(line), stdin))
 441                diff_tree_stdin(line);
 442
 443        return 0;
 444}