merge-recursive.con commit string_list: Add STRING_LIST_INIT macro and make use of it. (183113a)
   1/*
   2 * Recursive Merge algorithm stolen from git-merge-recursive.py by
   3 * Fredrik Kuivinen.
   4 * The thieves were Alex Riesen and Johannes Schindelin, in June/July 2006
   5 */
   6#include "advice.h"
   7#include "cache.h"
   8#include "cache-tree.h"
   9#include "commit.h"
  10#include "blob.h"
  11#include "builtin.h"
  12#include "tree-walk.h"
  13#include "diff.h"
  14#include "diffcore.h"
  15#include "tag.h"
  16#include "unpack-trees.h"
  17#include "string-list.h"
  18#include "xdiff-interface.h"
  19#include "ll-merge.h"
  20#include "attr.h"
  21#include "merge-recursive.h"
  22#include "dir.h"
  23
  24static struct tree *shift_tree_object(struct tree *one, struct tree *two,
  25                                      const char *subtree_shift)
  26{
  27        unsigned char shifted[20];
  28
  29        if (!*subtree_shift) {
  30                shift_tree(one->object.sha1, two->object.sha1, shifted, 0);
  31        } else {
  32                shift_tree_by(one->object.sha1, two->object.sha1, shifted,
  33                              subtree_shift);
  34        }
  35        if (!hashcmp(two->object.sha1, shifted))
  36                return two;
  37        return lookup_tree(shifted);
  38}
  39
  40/*
  41 * A virtual commit has (const char *)commit->util set to the name.
  42 */
  43
  44static struct commit *make_virtual_commit(struct tree *tree, const char *comment)
  45{
  46        struct commit *commit = xcalloc(1, sizeof(struct commit));
  47        commit->tree = tree;
  48        commit->util = (void*)comment;
  49        /* avoid warnings */
  50        commit->object.parsed = 1;
  51        return commit;
  52}
  53
  54/*
  55 * Since we use get_tree_entry(), which does not put the read object into
  56 * the object pool, we cannot rely on a == b.
  57 */
  58static int sha_eq(const unsigned char *a, const unsigned char *b)
  59{
  60        if (!a && !b)
  61                return 2;
  62        return a && b && hashcmp(a, b) == 0;
  63}
  64
  65/*
  66 * Since we want to write the index eventually, we cannot reuse the index
  67 * for these (temporary) data.
  68 */
  69struct stage_data
  70{
  71        struct
  72        {
  73                unsigned mode;
  74                unsigned char sha[20];
  75        } stages[4];
  76        unsigned processed:1;
  77};
  78
  79static int show(struct merge_options *o, int v)
  80{
  81        return (!o->call_depth && o->verbosity >= v) || o->verbosity >= 5;
  82}
  83
  84static void flush_output(struct merge_options *o)
  85{
  86        if (o->obuf.len) {
  87                fputs(o->obuf.buf, stdout);
  88                strbuf_reset(&o->obuf);
  89        }
  90}
  91
  92__attribute__((format (printf, 3, 4)))
  93static void output(struct merge_options *o, int v, const char *fmt, ...)
  94{
  95        int len;
  96        va_list ap;
  97
  98        if (!show(o, v))
  99                return;
 100
 101        strbuf_grow(&o->obuf, o->call_depth * 2 + 2);
 102        memset(o->obuf.buf + o->obuf.len, ' ', o->call_depth * 2);
 103        strbuf_setlen(&o->obuf, o->obuf.len + o->call_depth * 2);
 104
 105        va_start(ap, fmt);
 106        len = vsnprintf(o->obuf.buf + o->obuf.len, strbuf_avail(&o->obuf), fmt, ap);
 107        va_end(ap);
 108
 109        if (len < 0)
 110                len = 0;
 111        if (len >= strbuf_avail(&o->obuf)) {
 112                strbuf_grow(&o->obuf, len + 2);
 113                va_start(ap, fmt);
 114                len = vsnprintf(o->obuf.buf + o->obuf.len, strbuf_avail(&o->obuf), fmt, ap);
 115                va_end(ap);
 116                if (len >= strbuf_avail(&o->obuf)) {
 117                        die("this should not happen, your snprintf is broken");
 118                }
 119        }
 120        strbuf_setlen(&o->obuf, o->obuf.len + len);
 121        strbuf_add(&o->obuf, "\n", 1);
 122        if (!o->buffer_output)
 123                flush_output(o);
 124}
 125
 126static void output_commit_title(struct merge_options *o, struct commit *commit)
 127{
 128        int i;
 129        flush_output(o);
 130        for (i = o->call_depth; i--;)
 131                fputs("  ", stdout);
 132        if (commit->util)
 133                printf("virtual %s\n", (char *)commit->util);
 134        else {
 135                printf("%s ", find_unique_abbrev(commit->object.sha1, DEFAULT_ABBREV));
 136                if (parse_commit(commit) != 0)
 137                        printf("(bad commit)\n");
 138                else {
 139                        const char *s;
 140                        int len;
 141                        for (s = commit->buffer; *s; s++)
 142                                if (*s == '\n' && s[1] == '\n') {
 143                                        s += 2;
 144                                        break;
 145                                }
 146                        for (len = 0; s[len] && '\n' != s[len]; len++)
 147                                ; /* do nothing */
 148                        printf("%.*s\n", len, s);
 149                }
 150        }
 151}
 152
 153static int add_cacheinfo(unsigned int mode, const unsigned char *sha1,
 154                const char *path, int stage, int refresh, int options)
 155{
 156        struct cache_entry *ce;
 157        ce = make_cache_entry(mode, sha1 ? sha1 : null_sha1, path, stage, refresh);
 158        if (!ce)
 159                return error("addinfo_cache failed for path '%s'", path);
 160        return add_cache_entry(ce, options);
 161}
 162
 163static void init_tree_desc_from_tree(struct tree_desc *desc, struct tree *tree)
 164{
 165        parse_tree(tree);
 166        init_tree_desc(desc, tree->buffer, tree->size);
 167}
 168
 169static int git_merge_trees(int index_only,
 170                           struct tree *common,
 171                           struct tree *head,
 172                           struct tree *merge)
 173{
 174        int rc;
 175        struct tree_desc t[3];
 176        struct unpack_trees_options opts;
 177
 178        memset(&opts, 0, sizeof(opts));
 179        if (index_only)
 180                opts.index_only = 1;
 181        else
 182                opts.update = 1;
 183        opts.merge = 1;
 184        opts.head_idx = 2;
 185        opts.fn = threeway_merge;
 186        opts.src_index = &the_index;
 187        opts.dst_index = &the_index;
 188        opts.msgs = get_porcelain_error_msgs();
 189
 190        init_tree_desc_from_tree(t+0, common);
 191        init_tree_desc_from_tree(t+1, head);
 192        init_tree_desc_from_tree(t+2, merge);
 193
 194        rc = unpack_trees(3, t, &opts);
 195        cache_tree_free(&active_cache_tree);
 196        return rc;
 197}
 198
 199struct tree *write_tree_from_memory(struct merge_options *o)
 200{
 201        struct tree *result = NULL;
 202
 203        if (unmerged_cache()) {
 204                int i;
 205                fprintf(stderr, "BUG: There are unmerged index entries:\n");
 206                for (i = 0; i < active_nr; i++) {
 207                        struct cache_entry *ce = active_cache[i];
 208                        if (ce_stage(ce))
 209                                fprintf(stderr, "BUG: %d %.*s", ce_stage(ce),
 210                                        (int)ce_namelen(ce), ce->name);
 211                }
 212                die("Bug in merge-recursive.c");
 213        }
 214
 215        if (!active_cache_tree)
 216                active_cache_tree = cache_tree();
 217
 218        if (!cache_tree_fully_valid(active_cache_tree) &&
 219            cache_tree_update(active_cache_tree,
 220                              active_cache, active_nr, 0, 0) < 0)
 221                die("error building trees");
 222
 223        result = lookup_tree(active_cache_tree->sha1);
 224
 225        return result;
 226}
 227
 228static int save_files_dirs(const unsigned char *sha1,
 229                const char *base, int baselen, const char *path,
 230                unsigned int mode, int stage, void *context)
 231{
 232        int len = strlen(path);
 233        char *newpath = xmalloc(baselen + len + 1);
 234        struct merge_options *o = context;
 235
 236        memcpy(newpath, base, baselen);
 237        memcpy(newpath + baselen, path, len);
 238        newpath[baselen + len] = '\0';
 239
 240        if (S_ISDIR(mode))
 241                string_list_insert(&o->current_directory_set, newpath);
 242        else
 243                string_list_insert(&o->current_file_set, newpath);
 244        free(newpath);
 245
 246        return (S_ISDIR(mode) ? READ_TREE_RECURSIVE : 0);
 247}
 248
 249static int get_files_dirs(struct merge_options *o, struct tree *tree)
 250{
 251        int n;
 252        if (read_tree_recursive(tree, "", 0, 0, NULL, save_files_dirs, o))
 253                return 0;
 254        n = o->current_file_set.nr + o->current_directory_set.nr;
 255        return n;
 256}
 257
 258/*
 259 * Returns an index_entry instance which doesn't have to correspond to
 260 * a real cache entry in Git's index.
 261 */
 262static struct stage_data *insert_stage_data(const char *path,
 263                struct tree *o, struct tree *a, struct tree *b,
 264                struct string_list *entries)
 265{
 266        struct string_list_item *item;
 267        struct stage_data *e = xcalloc(1, sizeof(struct stage_data));
 268        get_tree_entry(o->object.sha1, path,
 269                        e->stages[1].sha, &e->stages[1].mode);
 270        get_tree_entry(a->object.sha1, path,
 271                        e->stages[2].sha, &e->stages[2].mode);
 272        get_tree_entry(b->object.sha1, path,
 273                        e->stages[3].sha, &e->stages[3].mode);
 274        item = string_list_insert(entries, path);
 275        item->util = e;
 276        return e;
 277}
 278
 279/*
 280 * Create a dictionary mapping file names to stage_data objects. The
 281 * dictionary contains one entry for every path with a non-zero stage entry.
 282 */
 283static struct string_list *get_unmerged(void)
 284{
 285        struct string_list *unmerged = xcalloc(1, sizeof(struct string_list));
 286        int i;
 287
 288        unmerged->strdup_strings = 1;
 289
 290        for (i = 0; i < active_nr; i++) {
 291                struct string_list_item *item;
 292                struct stage_data *e;
 293                struct cache_entry *ce = active_cache[i];
 294                if (!ce_stage(ce))
 295                        continue;
 296
 297                item = string_list_lookup(unmerged, ce->name);
 298                if (!item) {
 299                        item = string_list_insert(unmerged, ce->name);
 300                        item->util = xcalloc(1, sizeof(struct stage_data));
 301                }
 302                e = item->util;
 303                e->stages[ce_stage(ce)].mode = ce->ce_mode;
 304                hashcpy(e->stages[ce_stage(ce)].sha, ce->sha1);
 305        }
 306
 307        return unmerged;
 308}
 309
 310struct rename
 311{
 312        struct diff_filepair *pair;
 313        struct stage_data *src_entry;
 314        struct stage_data *dst_entry;
 315        unsigned processed:1;
 316};
 317
 318/*
 319 * Get information of all renames which occurred between 'o_tree' and
 320 * 'tree'. We need the three trees in the merge ('o_tree', 'a_tree' and
 321 * 'b_tree') to be able to associate the correct cache entries with
 322 * the rename information. 'tree' is always equal to either a_tree or b_tree.
 323 */
 324static struct string_list *get_renames(struct merge_options *o,
 325                                       struct tree *tree,
 326                                       struct tree *o_tree,
 327                                       struct tree *a_tree,
 328                                       struct tree *b_tree,
 329                                       struct string_list *entries)
 330{
 331        int i;
 332        struct string_list *renames;
 333        struct diff_options opts;
 334
 335        renames = xcalloc(1, sizeof(struct string_list));
 336        diff_setup(&opts);
 337        DIFF_OPT_SET(&opts, RECURSIVE);
 338        opts.detect_rename = DIFF_DETECT_RENAME;
 339        opts.rename_limit = o->merge_rename_limit >= 0 ? o->merge_rename_limit :
 340                            o->diff_rename_limit >= 0 ? o->diff_rename_limit :
 341                            500;
 342        opts.warn_on_too_large_rename = 1;
 343        opts.output_format = DIFF_FORMAT_NO_OUTPUT;
 344        if (diff_setup_done(&opts) < 0)
 345                die("diff setup failed");
 346        diff_tree_sha1(o_tree->object.sha1, tree->object.sha1, "", &opts);
 347        diffcore_std(&opts);
 348        for (i = 0; i < diff_queued_diff.nr; ++i) {
 349                struct string_list_item *item;
 350                struct rename *re;
 351                struct diff_filepair *pair = diff_queued_diff.queue[i];
 352                if (pair->status != 'R') {
 353                        diff_free_filepair(pair);
 354                        continue;
 355                }
 356                re = xmalloc(sizeof(*re));
 357                re->processed = 0;
 358                re->pair = pair;
 359                item = string_list_lookup(entries, re->pair->one->path);
 360                if (!item)
 361                        re->src_entry = insert_stage_data(re->pair->one->path,
 362                                        o_tree, a_tree, b_tree, entries);
 363                else
 364                        re->src_entry = item->util;
 365
 366                item = string_list_lookup(entries, re->pair->two->path);
 367                if (!item)
 368                        re->dst_entry = insert_stage_data(re->pair->two->path,
 369                                        o_tree, a_tree, b_tree, entries);
 370                else
 371                        re->dst_entry = item->util;
 372                item = string_list_insert(renames, pair->one->path);
 373                item->util = re;
 374        }
 375        opts.output_format = DIFF_FORMAT_NO_OUTPUT;
 376        diff_queued_diff.nr = 0;
 377        diff_flush(&opts);
 378        return renames;
 379}
 380
 381static int update_stages(const char *path, struct diff_filespec *o,
 382                         struct diff_filespec *a, struct diff_filespec *b,
 383                         int clear)
 384{
 385        int options = ADD_CACHE_OK_TO_ADD | ADD_CACHE_OK_TO_REPLACE;
 386        if (clear)
 387                if (remove_file_from_cache(path))
 388                        return -1;
 389        if (o)
 390                if (add_cacheinfo(o->mode, o->sha1, path, 1, 0, options))
 391                        return -1;
 392        if (a)
 393                if (add_cacheinfo(a->mode, a->sha1, path, 2, 0, options))
 394                        return -1;
 395        if (b)
 396                if (add_cacheinfo(b->mode, b->sha1, path, 3, 0, options))
 397                        return -1;
 398        return 0;
 399}
 400
 401static int remove_file(struct merge_options *o, int clean,
 402                       const char *path, int no_wd)
 403{
 404        int update_cache = o->call_depth || clean;
 405        int update_working_directory = !o->call_depth && !no_wd;
 406
 407        if (update_cache) {
 408                if (remove_file_from_cache(path))
 409                        return -1;
 410        }
 411        if (update_working_directory) {
 412                if (remove_path(path))
 413                        return -1;
 414        }
 415        return 0;
 416}
 417
 418static char *unique_path(struct merge_options *o, const char *path, const char *branch)
 419{
 420        char *newpath = xmalloc(strlen(path) + 1 + strlen(branch) + 8 + 1);
 421        int suffix = 0;
 422        struct stat st;
 423        char *p = newpath + strlen(path);
 424        strcpy(newpath, path);
 425        *(p++) = '~';
 426        strcpy(p, branch);
 427        for (; *p; ++p)
 428                if ('/' == *p)
 429                        *p = '_';
 430        while (string_list_has_string(&o->current_file_set, newpath) ||
 431               string_list_has_string(&o->current_directory_set, newpath) ||
 432               lstat(newpath, &st) == 0)
 433                sprintf(p, "_%d", suffix++);
 434
 435        string_list_insert(&o->current_file_set, newpath);
 436        return newpath;
 437}
 438
 439static void flush_buffer(int fd, const char *buf, unsigned long size)
 440{
 441        while (size > 0) {
 442                long ret = write_in_full(fd, buf, size);
 443                if (ret < 0) {
 444                        /* Ignore epipe */
 445                        if (errno == EPIPE)
 446                                break;
 447                        die_errno("merge-recursive");
 448                } else if (!ret) {
 449                        die("merge-recursive: disk full?");
 450                }
 451                size -= ret;
 452                buf += ret;
 453        }
 454}
 455
 456static int would_lose_untracked(const char *path)
 457{
 458        int pos = cache_name_pos(path, strlen(path));
 459
 460        if (pos < 0)
 461                pos = -1 - pos;
 462        while (pos < active_nr &&
 463               !strcmp(path, active_cache[pos]->name)) {
 464                /*
 465                 * If stage #0, it is definitely tracked.
 466                 * If it has stage #2 then it was tracked
 467                 * before this merge started.  All other
 468                 * cases the path was not tracked.
 469                 */
 470                switch (ce_stage(active_cache[pos])) {
 471                case 0:
 472                case 2:
 473                        return 0;
 474                }
 475                pos++;
 476        }
 477        return file_exists(path);
 478}
 479
 480static int make_room_for_path(const char *path)
 481{
 482        int status;
 483        const char *msg = "failed to create path '%s'%s";
 484
 485        status = safe_create_leading_directories_const(path);
 486        if (status) {
 487                if (status == -3) {
 488                        /* something else exists */
 489                        error(msg, path, ": perhaps a D/F conflict?");
 490                        return -1;
 491                }
 492                die(msg, path, "");
 493        }
 494
 495        /*
 496         * Do not unlink a file in the work tree if we are not
 497         * tracking it.
 498         */
 499        if (would_lose_untracked(path))
 500                return error("refusing to lose untracked file at '%s'",
 501                             path);
 502
 503        /* Successful unlink is good.. */
 504        if (!unlink(path))
 505                return 0;
 506        /* .. and so is no existing file */
 507        if (errno == ENOENT)
 508                return 0;
 509        /* .. but not some other error (who really cares what?) */
 510        return error(msg, path, ": perhaps a D/F conflict?");
 511}
 512
 513static void update_file_flags(struct merge_options *o,
 514                              const unsigned char *sha,
 515                              unsigned mode,
 516                              const char *path,
 517                              int update_cache,
 518                              int update_wd)
 519{
 520        if (o->call_depth)
 521                update_wd = 0;
 522
 523        if (update_wd) {
 524                enum object_type type;
 525                void *buf;
 526                unsigned long size;
 527
 528                if (S_ISGITLINK(mode))
 529                        /*
 530                         * We may later decide to recursively descend into
 531                         * the submodule directory and update its index
 532                         * and/or work tree, but we do not do that now.
 533                         */
 534                        goto update_index;
 535
 536                buf = read_sha1_file(sha, &type, &size);
 537                if (!buf)
 538                        die("cannot read object %s '%s'", sha1_to_hex(sha), path);
 539                if (type != OBJ_BLOB)
 540                        die("blob expected for %s '%s'", sha1_to_hex(sha), path);
 541                if (S_ISREG(mode)) {
 542                        struct strbuf strbuf = STRBUF_INIT;
 543                        if (convert_to_working_tree(path, buf, size, &strbuf)) {
 544                                free(buf);
 545                                size = strbuf.len;
 546                                buf = strbuf_detach(&strbuf, NULL);
 547                        }
 548                }
 549
 550                if (make_room_for_path(path) < 0) {
 551                        update_wd = 0;
 552                        free(buf);
 553                        goto update_index;
 554                }
 555                if (S_ISREG(mode) || (!has_symlinks && S_ISLNK(mode))) {
 556                        int fd;
 557                        if (mode & 0100)
 558                                mode = 0777;
 559                        else
 560                                mode = 0666;
 561                        fd = open(path, O_WRONLY | O_TRUNC | O_CREAT, mode);
 562                        if (fd < 0)
 563                                die_errno("failed to open '%s'", path);
 564                        flush_buffer(fd, buf, size);
 565                        close(fd);
 566                } else if (S_ISLNK(mode)) {
 567                        char *lnk = xmemdupz(buf, size);
 568                        safe_create_leading_directories_const(path);
 569                        unlink(path);
 570                        if (symlink(lnk, path))
 571                                die_errno("failed to symlink '%s'", path);
 572                        free(lnk);
 573                } else
 574                        die("do not know what to do with %06o %s '%s'",
 575                            mode, sha1_to_hex(sha), path);
 576                free(buf);
 577        }
 578 update_index:
 579        if (update_cache)
 580                add_cacheinfo(mode, sha, path, 0, update_wd, ADD_CACHE_OK_TO_ADD);
 581}
 582
 583static void update_file(struct merge_options *o,
 584                        int clean,
 585                        const unsigned char *sha,
 586                        unsigned mode,
 587                        const char *path)
 588{
 589        update_file_flags(o, sha, mode, path, o->call_depth || clean, !o->call_depth);
 590}
 591
 592/* Low level file merging, update and removal */
 593
 594struct merge_file_info
 595{
 596        unsigned char sha[20];
 597        unsigned mode;
 598        unsigned clean:1,
 599                 merge:1;
 600};
 601
 602static int merge_3way(struct merge_options *o,
 603                      mmbuffer_t *result_buf,
 604                      struct diff_filespec *one,
 605                      struct diff_filespec *a,
 606                      struct diff_filespec *b,
 607                      const char *branch1,
 608                      const char *branch2)
 609{
 610        mmfile_t orig, src1, src2;
 611        char *base_name, *name1, *name2;
 612        int merge_status;
 613        int favor;
 614
 615        if (o->call_depth)
 616                favor = 0;
 617        else {
 618                switch (o->recursive_variant) {
 619                case MERGE_RECURSIVE_OURS:
 620                        favor = XDL_MERGE_FAVOR_OURS;
 621                        break;
 622                case MERGE_RECURSIVE_THEIRS:
 623                        favor = XDL_MERGE_FAVOR_THEIRS;
 624                        break;
 625                default:
 626                        favor = 0;
 627                        break;
 628                }
 629        }
 630
 631        if (strcmp(a->path, b->path) ||
 632            (o->ancestor != NULL && strcmp(a->path, one->path) != 0)) {
 633                base_name = o->ancestor == NULL ? NULL :
 634                        xstrdup(mkpath("%s:%s", o->ancestor, one->path));
 635                name1 = xstrdup(mkpath("%s:%s", branch1, a->path));
 636                name2 = xstrdup(mkpath("%s:%s", branch2, b->path));
 637        } else {
 638                base_name = o->ancestor == NULL ? NULL :
 639                        xstrdup(mkpath("%s", o->ancestor));
 640                name1 = xstrdup(mkpath("%s", branch1));
 641                name2 = xstrdup(mkpath("%s", branch2));
 642        }
 643
 644        read_mmblob(&orig, one->sha1);
 645        read_mmblob(&src1, a->sha1);
 646        read_mmblob(&src2, b->sha1);
 647
 648        merge_status = ll_merge(result_buf, a->path, &orig, base_name,
 649                                &src1, name1, &src2, name2,
 650                                (!!o->call_depth) | (favor << 1));
 651
 652        free(name1);
 653        free(name2);
 654        free(orig.ptr);
 655        free(src1.ptr);
 656        free(src2.ptr);
 657        return merge_status;
 658}
 659
 660static struct merge_file_info merge_file(struct merge_options *o,
 661                                         struct diff_filespec *one,
 662                                         struct diff_filespec *a,
 663                                         struct diff_filespec *b,
 664                                         const char *branch1,
 665                                         const char *branch2)
 666{
 667        struct merge_file_info result;
 668        result.merge = 0;
 669        result.clean = 1;
 670
 671        if ((S_IFMT & a->mode) != (S_IFMT & b->mode)) {
 672                result.clean = 0;
 673                if (S_ISREG(a->mode)) {
 674                        result.mode = a->mode;
 675                        hashcpy(result.sha, a->sha1);
 676                } else {
 677                        result.mode = b->mode;
 678                        hashcpy(result.sha, b->sha1);
 679                }
 680        } else {
 681                if (!sha_eq(a->sha1, one->sha1) && !sha_eq(b->sha1, one->sha1))
 682                        result.merge = 1;
 683
 684                /*
 685                 * Merge modes
 686                 */
 687                if (a->mode == b->mode || a->mode == one->mode)
 688                        result.mode = b->mode;
 689                else {
 690                        result.mode = a->mode;
 691                        if (b->mode != one->mode) {
 692                                result.clean = 0;
 693                                result.merge = 1;
 694                        }
 695                }
 696
 697                if (sha_eq(a->sha1, b->sha1) || sha_eq(a->sha1, one->sha1))
 698                        hashcpy(result.sha, b->sha1);
 699                else if (sha_eq(b->sha1, one->sha1))
 700                        hashcpy(result.sha, a->sha1);
 701                else if (S_ISREG(a->mode)) {
 702                        mmbuffer_t result_buf;
 703                        int merge_status;
 704
 705                        merge_status = merge_3way(o, &result_buf, one, a, b,
 706                                                  branch1, branch2);
 707
 708                        if ((merge_status < 0) || !result_buf.ptr)
 709                                die("Failed to execute internal merge");
 710
 711                        if (write_sha1_file(result_buf.ptr, result_buf.size,
 712                                            blob_type, result.sha))
 713                                die("Unable to add %s to database",
 714                                    a->path);
 715
 716                        free(result_buf.ptr);
 717                        result.clean = (merge_status == 0);
 718                } else if (S_ISGITLINK(a->mode)) {
 719                        result.clean = 0;
 720                        hashcpy(result.sha, a->sha1);
 721                } else if (S_ISLNK(a->mode)) {
 722                        hashcpy(result.sha, a->sha1);
 723
 724                        if (!sha_eq(a->sha1, b->sha1))
 725                                result.clean = 0;
 726                } else {
 727                        die("unsupported object type in the tree");
 728                }
 729        }
 730
 731        return result;
 732}
 733
 734static void conflict_rename_rename(struct merge_options *o,
 735                                   struct rename *ren1,
 736                                   const char *branch1,
 737                                   struct rename *ren2,
 738                                   const char *branch2)
 739{
 740        char *del[2];
 741        int delp = 0;
 742        const char *ren1_dst = ren1->pair->two->path;
 743        const char *ren2_dst = ren2->pair->two->path;
 744        const char *dst_name1 = ren1_dst;
 745        const char *dst_name2 = ren2_dst;
 746        if (string_list_has_string(&o->current_directory_set, ren1_dst)) {
 747                dst_name1 = del[delp++] = unique_path(o, ren1_dst, branch1);
 748                output(o, 1, "%s is a directory in %s adding as %s instead",
 749                       ren1_dst, branch2, dst_name1);
 750                remove_file(o, 0, ren1_dst, 0);
 751        }
 752        if (string_list_has_string(&o->current_directory_set, ren2_dst)) {
 753                dst_name2 = del[delp++] = unique_path(o, ren2_dst, branch2);
 754                output(o, 1, "%s is a directory in %s adding as %s instead",
 755                       ren2_dst, branch1, dst_name2);
 756                remove_file(o, 0, ren2_dst, 0);
 757        }
 758        if (o->call_depth) {
 759                remove_file_from_cache(dst_name1);
 760                remove_file_from_cache(dst_name2);
 761                /*
 762                 * Uncomment to leave the conflicting names in the resulting tree
 763                 *
 764                 * update_file(o, 0, ren1->pair->two->sha1, ren1->pair->two->mode, dst_name1);
 765                 * update_file(o, 0, ren2->pair->two->sha1, ren2->pair->two->mode, dst_name2);
 766                 */
 767        } else {
 768                update_stages(dst_name1, NULL, ren1->pair->two, NULL, 1);
 769                update_stages(dst_name2, NULL, NULL, ren2->pair->two, 1);
 770        }
 771        while (delp--)
 772                free(del[delp]);
 773}
 774
 775static void conflict_rename_dir(struct merge_options *o,
 776                                struct rename *ren1,
 777                                const char *branch1)
 778{
 779        char *new_path = unique_path(o, ren1->pair->two->path, branch1);
 780        output(o, 1, "Renaming %s to %s instead", ren1->pair->one->path, new_path);
 781        remove_file(o, 0, ren1->pair->two->path, 0);
 782        update_file(o, 0, ren1->pair->two->sha1, ren1->pair->two->mode, new_path);
 783        free(new_path);
 784}
 785
 786static void conflict_rename_rename_2(struct merge_options *o,
 787                                     struct rename *ren1,
 788                                     const char *branch1,
 789                                     struct rename *ren2,
 790                                     const char *branch2)
 791{
 792        char *new_path1 = unique_path(o, ren1->pair->two->path, branch1);
 793        char *new_path2 = unique_path(o, ren2->pair->two->path, branch2);
 794        output(o, 1, "Renaming %s to %s and %s to %s instead",
 795               ren1->pair->one->path, new_path1,
 796               ren2->pair->one->path, new_path2);
 797        remove_file(o, 0, ren1->pair->two->path, 0);
 798        update_file(o, 0, ren1->pair->two->sha1, ren1->pair->two->mode, new_path1);
 799        update_file(o, 0, ren2->pair->two->sha1, ren2->pair->two->mode, new_path2);
 800        free(new_path2);
 801        free(new_path1);
 802}
 803
 804static int process_renames(struct merge_options *o,
 805                           struct string_list *a_renames,
 806                           struct string_list *b_renames)
 807{
 808        int clean_merge = 1, i, j;
 809        struct string_list a_by_dst = STRING_LIST_INIT_NODUP;
 810        struct string_list b_by_dst = STRING_LIST_INIT_NODUP;
 811        const struct rename *sre;
 812
 813        for (i = 0; i < a_renames->nr; i++) {
 814                sre = a_renames->items[i].util;
 815                string_list_insert(&a_by_dst, sre->pair->two->path)->util
 816                        = sre->dst_entry;
 817        }
 818        for (i = 0; i < b_renames->nr; i++) {
 819                sre = b_renames->items[i].util;
 820                string_list_insert(&b_by_dst, sre->pair->two->path)->util
 821                        = sre->dst_entry;
 822        }
 823
 824        for (i = 0, j = 0; i < a_renames->nr || j < b_renames->nr;) {
 825                char *src;
 826                struct string_list *renames1, *renames2Dst;
 827                struct rename *ren1 = NULL, *ren2 = NULL;
 828                const char *branch1, *branch2;
 829                const char *ren1_src, *ren1_dst;
 830
 831                if (i >= a_renames->nr) {
 832                        ren2 = b_renames->items[j++].util;
 833                } else if (j >= b_renames->nr) {
 834                        ren1 = a_renames->items[i++].util;
 835                } else {
 836                        int compare = strcmp(a_renames->items[i].string,
 837                                             b_renames->items[j].string);
 838                        if (compare <= 0)
 839                                ren1 = a_renames->items[i++].util;
 840                        if (compare >= 0)
 841                                ren2 = b_renames->items[j++].util;
 842                }
 843
 844                /* TODO: refactor, so that 1/2 are not needed */
 845                if (ren1) {
 846                        renames1 = a_renames;
 847                        renames2Dst = &b_by_dst;
 848                        branch1 = o->branch1;
 849                        branch2 = o->branch2;
 850                } else {
 851                        struct rename *tmp;
 852                        renames1 = b_renames;
 853                        renames2Dst = &a_by_dst;
 854                        branch1 = o->branch2;
 855                        branch2 = o->branch1;
 856                        tmp = ren2;
 857                        ren2 = ren1;
 858                        ren1 = tmp;
 859                }
 860                src = ren1->pair->one->path;
 861
 862                ren1->dst_entry->processed = 1;
 863                ren1->src_entry->processed = 1;
 864
 865                if (ren1->processed)
 866                        continue;
 867                ren1->processed = 1;
 868
 869                ren1_src = ren1->pair->one->path;
 870                ren1_dst = ren1->pair->two->path;
 871
 872                if (ren2) {
 873                        const char *ren2_src = ren2->pair->one->path;
 874                        const char *ren2_dst = ren2->pair->two->path;
 875                        /* Renamed in 1 and renamed in 2 */
 876                        if (strcmp(ren1_src, ren2_src) != 0)
 877                                die("ren1.src != ren2.src");
 878                        ren2->dst_entry->processed = 1;
 879                        ren2->processed = 1;
 880                        if (strcmp(ren1_dst, ren2_dst) != 0) {
 881                                clean_merge = 0;
 882                                output(o, 1, "CONFLICT (rename/rename): "
 883                                       "Rename \"%s\"->\"%s\" in branch \"%s\" "
 884                                       "rename \"%s\"->\"%s\" in \"%s\"%s",
 885                                       src, ren1_dst, branch1,
 886                                       src, ren2_dst, branch2,
 887                                       o->call_depth ? " (left unresolved)": "");
 888                                if (o->call_depth) {
 889                                        remove_file_from_cache(src);
 890                                        update_file(o, 0, ren1->pair->one->sha1,
 891                                                    ren1->pair->one->mode, src);
 892                                }
 893                                conflict_rename_rename(o, ren1, branch1, ren2, branch2);
 894                        } else {
 895                                struct merge_file_info mfi;
 896                                remove_file(o, 1, ren1_src, 1);
 897                                mfi = merge_file(o,
 898                                                 ren1->pair->one,
 899                                                 ren1->pair->two,
 900                                                 ren2->pair->two,
 901                                                 branch1,
 902                                                 branch2);
 903                                if (mfi.merge || !mfi.clean)
 904                                        output(o, 1, "Renaming %s->%s", src, ren1_dst);
 905
 906                                if (mfi.merge)
 907                                        output(o, 2, "Auto-merging %s", ren1_dst);
 908
 909                                if (!mfi.clean) {
 910                                        output(o, 1, "CONFLICT (content): merge conflict in %s",
 911                                               ren1_dst);
 912                                        clean_merge = 0;
 913
 914                                        if (!o->call_depth)
 915                                                update_stages(ren1_dst,
 916                                                              ren1->pair->one,
 917                                                              ren1->pair->two,
 918                                                              ren2->pair->two,
 919                                                              1 /* clear */);
 920                                }
 921                                update_file(o, mfi.clean, mfi.sha, mfi.mode, ren1_dst);
 922                        }
 923                } else {
 924                        /* Renamed in 1, maybe changed in 2 */
 925                        struct string_list_item *item;
 926                        /* we only use sha1 and mode of these */
 927                        struct diff_filespec src_other, dst_other;
 928                        int try_merge, stage = a_renames == renames1 ? 3: 2;
 929
 930                        remove_file(o, 1, ren1_src, o->call_depth || stage == 3);
 931
 932                        hashcpy(src_other.sha1, ren1->src_entry->stages[stage].sha);
 933                        src_other.mode = ren1->src_entry->stages[stage].mode;
 934                        hashcpy(dst_other.sha1, ren1->dst_entry->stages[stage].sha);
 935                        dst_other.mode = ren1->dst_entry->stages[stage].mode;
 936
 937                        try_merge = 0;
 938
 939                        if (string_list_has_string(&o->current_directory_set, ren1_dst)) {
 940                                clean_merge = 0;
 941                                output(o, 1, "CONFLICT (rename/directory): Rename %s->%s in %s "
 942                                       " directory %s added in %s",
 943                                       ren1_src, ren1_dst, branch1,
 944                                       ren1_dst, branch2);
 945                                conflict_rename_dir(o, ren1, branch1);
 946                        } else if (sha_eq(src_other.sha1, null_sha1)) {
 947                                clean_merge = 0;
 948                                output(o, 1, "CONFLICT (rename/delete): Rename %s->%s in %s "
 949                                       "and deleted in %s",
 950                                       ren1_src, ren1_dst, branch1,
 951                                       branch2);
 952                                update_file(o, 0, ren1->pair->two->sha1, ren1->pair->two->mode, ren1_dst);
 953                                if (!o->call_depth)
 954                                        update_stages(ren1_dst, NULL,
 955                                                        branch1 == o->branch1 ?
 956                                                        ren1->pair->two : NULL,
 957                                                        branch1 == o->branch1 ?
 958                                                        NULL : ren1->pair->two, 1);
 959                        } else if (!sha_eq(dst_other.sha1, null_sha1)) {
 960                                const char *new_path;
 961                                clean_merge = 0;
 962                                try_merge = 1;
 963                                output(o, 1, "CONFLICT (rename/add): Rename %s->%s in %s. "
 964                                       "%s added in %s",
 965                                       ren1_src, ren1_dst, branch1,
 966                                       ren1_dst, branch2);
 967                                if (o->call_depth) {
 968                                        struct merge_file_info mfi;
 969                                        struct diff_filespec one, a, b;
 970
 971                                        one.path = a.path = b.path =
 972                                                (char *)ren1_dst;
 973                                        hashcpy(one.sha1, null_sha1);
 974                                        one.mode = 0;
 975                                        hashcpy(a.sha1, ren1->pair->two->sha1);
 976                                        a.mode = ren1->pair->two->mode;
 977                                        hashcpy(b.sha1, dst_other.sha1);
 978                                        b.mode = dst_other.mode;
 979                                        mfi = merge_file(o, &one, &a, &b,
 980                                                         branch1,
 981                                                         branch2);
 982                                        output(o, 1, "Adding merged %s", ren1_dst);
 983                                        update_file(o, 0,
 984                                                    mfi.sha,
 985                                                    mfi.mode,
 986                                                    ren1_dst);
 987                                } else {
 988                                        new_path = unique_path(o, ren1_dst, branch2);
 989                                        output(o, 1, "Adding as %s instead", new_path);
 990                                        update_file(o, 0, dst_other.sha1, dst_other.mode, new_path);
 991                                }
 992                        } else if ((item = string_list_lookup(renames2Dst, ren1_dst))) {
 993                                ren2 = item->util;
 994                                clean_merge = 0;
 995                                ren2->processed = 1;
 996                                output(o, 1, "CONFLICT (rename/rename): "
 997                                       "Rename %s->%s in %s. "
 998                                       "Rename %s->%s in %s",
 999                                       ren1_src, ren1_dst, branch1,
1000                                       ren2->pair->one->path, ren2->pair->two->path, branch2);
1001                                conflict_rename_rename_2(o, ren1, branch1, ren2, branch2);
1002                        } else
1003                                try_merge = 1;
1004
1005                        if (try_merge) {
1006                                struct diff_filespec *one, *a, *b;
1007                                struct merge_file_info mfi;
1008                                src_other.path = (char *)ren1_src;
1009
1010                                one = ren1->pair->one;
1011                                if (a_renames == renames1) {
1012                                        a = ren1->pair->two;
1013                                        b = &src_other;
1014                                } else {
1015                                        b = ren1->pair->two;
1016                                        a = &src_other;
1017                                }
1018                                mfi = merge_file(o, one, a, b,
1019                                                o->branch1, o->branch2);
1020
1021                                if (mfi.clean &&
1022                                    sha_eq(mfi.sha, ren1->pair->two->sha1) &&
1023                                    mfi.mode == ren1->pair->two->mode)
1024                                        /*
1025                                         * This messaged is part of
1026                                         * t6022 test. If you change
1027                                         * it update the test too.
1028                                         */
1029                                        output(o, 3, "Skipped %s (merged same as existing)", ren1_dst);
1030                                else {
1031                                        if (mfi.merge || !mfi.clean)
1032                                                output(o, 1, "Renaming %s => %s", ren1_src, ren1_dst);
1033                                        if (mfi.merge)
1034                                                output(o, 2, "Auto-merging %s", ren1_dst);
1035                                        if (!mfi.clean) {
1036                                                output(o, 1, "CONFLICT (rename/modify): Merge conflict in %s",
1037                                                       ren1_dst);
1038                                                clean_merge = 0;
1039
1040                                                if (!o->call_depth)
1041                                                        update_stages(ren1_dst,
1042                                                                      one, a, b, 1);
1043                                        }
1044                                        update_file(o, mfi.clean, mfi.sha, mfi.mode, ren1_dst);
1045                                }
1046                        }
1047                }
1048        }
1049        string_list_clear(&a_by_dst, 0);
1050        string_list_clear(&b_by_dst, 0);
1051
1052        return clean_merge;
1053}
1054
1055static unsigned char *stage_sha(const unsigned char *sha, unsigned mode)
1056{
1057        return (is_null_sha1(sha) || mode == 0) ? NULL: (unsigned char *)sha;
1058}
1059
1060/* Per entry merge function */
1061static int process_entry(struct merge_options *o,
1062                         const char *path, struct stage_data *entry)
1063{
1064        /*
1065        printf("processing entry, clean cache: %s\n", index_only ? "yes": "no");
1066        print_index_entry("\tpath: ", entry);
1067        */
1068        int clean_merge = 1;
1069        unsigned o_mode = entry->stages[1].mode;
1070        unsigned a_mode = entry->stages[2].mode;
1071        unsigned b_mode = entry->stages[3].mode;
1072        unsigned char *o_sha = stage_sha(entry->stages[1].sha, o_mode);
1073        unsigned char *a_sha = stage_sha(entry->stages[2].sha, a_mode);
1074        unsigned char *b_sha = stage_sha(entry->stages[3].sha, b_mode);
1075
1076        if (o_sha && (!a_sha || !b_sha)) {
1077                /* Case A: Deleted in one */
1078                if ((!a_sha && !b_sha) ||
1079                    (sha_eq(a_sha, o_sha) && !b_sha) ||
1080                    (!a_sha && sha_eq(b_sha, o_sha))) {
1081                        /* Deleted in both or deleted in one and
1082                         * unchanged in the other */
1083                        if (a_sha)
1084                                output(o, 2, "Removing %s", path);
1085                        /* do not touch working file if it did not exist */
1086                        remove_file(o, 1, path, !a_sha);
1087                } else {
1088                        /* Deleted in one and changed in the other */
1089                        clean_merge = 0;
1090                        if (!a_sha) {
1091                                output(o, 1, "CONFLICT (delete/modify): %s deleted in %s "
1092                                       "and modified in %s. Version %s of %s left in tree.",
1093                                       path, o->branch1,
1094                                       o->branch2, o->branch2, path);
1095                                update_file(o, 0, b_sha, b_mode, path);
1096                        } else {
1097                                output(o, 1, "CONFLICT (delete/modify): %s deleted in %s "
1098                                       "and modified in %s. Version %s of %s left in tree.",
1099                                       path, o->branch2,
1100                                       o->branch1, o->branch1, path);
1101                                update_file(o, 0, a_sha, a_mode, path);
1102                        }
1103                }
1104
1105        } else if ((!o_sha && a_sha && !b_sha) ||
1106                   (!o_sha && !a_sha && b_sha)) {
1107                /* Case B: Added in one. */
1108                const char *add_branch;
1109                const char *other_branch;
1110                unsigned mode;
1111                const unsigned char *sha;
1112                const char *conf;
1113
1114                if (a_sha) {
1115                        add_branch = o->branch1;
1116                        other_branch = o->branch2;
1117                        mode = a_mode;
1118                        sha = a_sha;
1119                        conf = "file/directory";
1120                } else {
1121                        add_branch = o->branch2;
1122                        other_branch = o->branch1;
1123                        mode = b_mode;
1124                        sha = b_sha;
1125                        conf = "directory/file";
1126                }
1127                if (string_list_has_string(&o->current_directory_set, path)) {
1128                        const char *new_path = unique_path(o, path, add_branch);
1129                        clean_merge = 0;
1130                        output(o, 1, "CONFLICT (%s): There is a directory with name %s in %s. "
1131                               "Adding %s as %s",
1132                               conf, path, other_branch, path, new_path);
1133                        remove_file(o, 0, path, 0);
1134                        update_file(o, 0, sha, mode, new_path);
1135                } else {
1136                        output(o, 2, "Adding %s", path);
1137                        update_file(o, 1, sha, mode, path);
1138                }
1139        } else if (a_sha && b_sha) {
1140                /* Case C: Added in both (check for same permissions) and */
1141                /* case D: Modified in both, but differently. */
1142                const char *reason = "content";
1143                struct merge_file_info mfi;
1144                struct diff_filespec one, a, b;
1145
1146                if (!o_sha) {
1147                        reason = "add/add";
1148                        o_sha = (unsigned char *)null_sha1;
1149                }
1150                output(o, 2, "Auto-merging %s", path);
1151                one.path = a.path = b.path = (char *)path;
1152                hashcpy(one.sha1, o_sha);
1153                one.mode = o_mode;
1154                hashcpy(a.sha1, a_sha);
1155                a.mode = a_mode;
1156                hashcpy(b.sha1, b_sha);
1157                b.mode = b_mode;
1158
1159                mfi = merge_file(o, &one, &a, &b,
1160                                 o->branch1, o->branch2);
1161
1162                clean_merge = mfi.clean;
1163                if (!mfi.clean) {
1164                        if (S_ISGITLINK(mfi.mode))
1165                                reason = "submodule";
1166                        output(o, 1, "CONFLICT (%s): Merge conflict in %s",
1167                                        reason, path);
1168                }
1169                update_file(o, mfi.clean, mfi.sha, mfi.mode, path);
1170        } else if (!o_sha && !a_sha && !b_sha) {
1171                /*
1172                 * this entry was deleted altogether. a_mode == 0 means
1173                 * we had that path and want to actively remove it.
1174                 */
1175                remove_file(o, 1, path, !a_mode);
1176        } else
1177                die("Fatal merge failure, shouldn't happen.");
1178
1179        return clean_merge;
1180}
1181
1182struct unpack_trees_error_msgs get_porcelain_error_msgs(void)
1183{
1184        struct unpack_trees_error_msgs msgs = {
1185                /* would_overwrite */
1186                "Your local changes to '%s' would be overwritten by merge.  Aborting.",
1187                /* not_uptodate_file */
1188                "Your local changes to '%s' would be overwritten by merge.  Aborting.",
1189                /* not_uptodate_dir */
1190                "Updating '%s' would lose untracked files in it.  Aborting.",
1191                /* would_lose_untracked */
1192                "Untracked working tree file '%s' would be %s by merge.  Aborting",
1193                /* bind_overlap -- will not happen here */
1194                NULL,
1195        };
1196        if (advice_commit_before_merge) {
1197                msgs.would_overwrite = msgs.not_uptodate_file =
1198                        "Your local changes to '%s' would be overwritten by merge.  Aborting.\n"
1199                        "Please, commit your changes or stash them before you can merge.";
1200        }
1201        return msgs;
1202}
1203
1204int merge_trees(struct merge_options *o,
1205                struct tree *head,
1206                struct tree *merge,
1207                struct tree *common,
1208                struct tree **result)
1209{
1210        int code, clean;
1211
1212        if (o->subtree_shift) {
1213                merge = shift_tree_object(head, merge, o->subtree_shift);
1214                common = shift_tree_object(head, common, o->subtree_shift);
1215        }
1216
1217        if (sha_eq(common->object.sha1, merge->object.sha1)) {
1218                output(o, 0, "Already uptodate!");
1219                *result = head;
1220                return 1;
1221        }
1222
1223        code = git_merge_trees(o->call_depth, common, head, merge);
1224
1225        if (code != 0) {
1226                if (show(o, 4) || o->call_depth)
1227                        die("merging of trees %s and %s failed",
1228                            sha1_to_hex(head->object.sha1),
1229                            sha1_to_hex(merge->object.sha1));
1230                else
1231                        exit(128);
1232        }
1233
1234        if (unmerged_cache()) {
1235                struct string_list *entries, *re_head, *re_merge;
1236                int i;
1237                string_list_clear(&o->current_file_set, 1);
1238                string_list_clear(&o->current_directory_set, 1);
1239                get_files_dirs(o, head);
1240                get_files_dirs(o, merge);
1241
1242                entries = get_unmerged();
1243                re_head  = get_renames(o, head, common, head, merge, entries);
1244                re_merge = get_renames(o, merge, common, head, merge, entries);
1245                clean = process_renames(o, re_head, re_merge);
1246                for (i = 0; i < entries->nr; i++) {
1247                        const char *path = entries->items[i].string;
1248                        struct stage_data *e = entries->items[i].util;
1249                        if (!e->processed
1250                                && !process_entry(o, path, e))
1251                                clean = 0;
1252                }
1253
1254                string_list_clear(re_merge, 0);
1255                string_list_clear(re_head, 0);
1256                string_list_clear(entries, 1);
1257
1258        }
1259        else
1260                clean = 1;
1261
1262        if (o->call_depth)
1263                *result = write_tree_from_memory(o);
1264
1265        return clean;
1266}
1267
1268static struct commit_list *reverse_commit_list(struct commit_list *list)
1269{
1270        struct commit_list *next = NULL, *current, *backup;
1271        for (current = list; current; current = backup) {
1272                backup = current->next;
1273                current->next = next;
1274                next = current;
1275        }
1276        return next;
1277}
1278
1279/*
1280 * Merge the commits h1 and h2, return the resulting virtual
1281 * commit object and a flag indicating the cleanness of the merge.
1282 */
1283int merge_recursive(struct merge_options *o,
1284                    struct commit *h1,
1285                    struct commit *h2,
1286                    struct commit_list *ca,
1287                    struct commit **result)
1288{
1289        struct commit_list *iter;
1290        struct commit *merged_common_ancestors;
1291        struct tree *mrtree = mrtree;
1292        int clean;
1293
1294        if (show(o, 4)) {
1295                output(o, 4, "Merging:");
1296                output_commit_title(o, h1);
1297                output_commit_title(o, h2);
1298        }
1299
1300        if (!ca) {
1301                ca = get_merge_bases(h1, h2, 1);
1302                ca = reverse_commit_list(ca);
1303        }
1304
1305        if (show(o, 5)) {
1306                output(o, 5, "found %u common ancestor(s):", commit_list_count(ca));
1307                for (iter = ca; iter; iter = iter->next)
1308                        output_commit_title(o, iter->item);
1309        }
1310
1311        merged_common_ancestors = pop_commit(&ca);
1312        if (merged_common_ancestors == NULL) {
1313                /* if there is no common ancestor, make an empty tree */
1314                struct tree *tree = xcalloc(1, sizeof(struct tree));
1315
1316                tree->object.parsed = 1;
1317                tree->object.type = OBJ_TREE;
1318                pretend_sha1_file(NULL, 0, OBJ_TREE, tree->object.sha1);
1319                merged_common_ancestors = make_virtual_commit(tree, "ancestor");
1320        }
1321
1322        for (iter = ca; iter; iter = iter->next) {
1323                const char *saved_b1, *saved_b2;
1324                o->call_depth++;
1325                /*
1326                 * When the merge fails, the result contains files
1327                 * with conflict markers. The cleanness flag is
1328                 * ignored, it was never actually used, as result of
1329                 * merge_trees has always overwritten it: the committed
1330                 * "conflicts" were already resolved.
1331                 */
1332                discard_cache();
1333                saved_b1 = o->branch1;
1334                saved_b2 = o->branch2;
1335                o->branch1 = "Temporary merge branch 1";
1336                o->branch2 = "Temporary merge branch 2";
1337                merge_recursive(o, merged_common_ancestors, iter->item,
1338                                NULL, &merged_common_ancestors);
1339                o->branch1 = saved_b1;
1340                o->branch2 = saved_b2;
1341                o->call_depth--;
1342
1343                if (!merged_common_ancestors)
1344                        die("merge returned no commit");
1345        }
1346
1347        discard_cache();
1348        if (!o->call_depth)
1349                read_cache();
1350
1351        o->ancestor = "merged common ancestors";
1352        clean = merge_trees(o, h1->tree, h2->tree, merged_common_ancestors->tree,
1353                            &mrtree);
1354
1355        if (o->call_depth) {
1356                *result = make_virtual_commit(mrtree, "merged tree");
1357                commit_list_insert(h1, &(*result)->parents);
1358                commit_list_insert(h2, &(*result)->parents->next);
1359        }
1360        flush_output(o);
1361        return clean;
1362}
1363
1364static struct commit *get_ref(const unsigned char *sha1, const char *name)
1365{
1366        struct object *object;
1367
1368        object = deref_tag(parse_object(sha1), name, strlen(name));
1369        if (!object)
1370                return NULL;
1371        if (object->type == OBJ_TREE)
1372                return make_virtual_commit((struct tree*)object, name);
1373        if (object->type != OBJ_COMMIT)
1374                return NULL;
1375        if (parse_commit((struct commit *)object))
1376                return NULL;
1377        return (struct commit *)object;
1378}
1379
1380int merge_recursive_generic(struct merge_options *o,
1381                            const unsigned char *head,
1382                            const unsigned char *merge,
1383                            int num_base_list,
1384                            const unsigned char **base_list,
1385                            struct commit **result)
1386{
1387        int clean, index_fd;
1388        struct lock_file *lock = xcalloc(1, sizeof(struct lock_file));
1389        struct commit *head_commit = get_ref(head, o->branch1);
1390        struct commit *next_commit = get_ref(merge, o->branch2);
1391        struct commit_list *ca = NULL;
1392
1393        if (base_list) {
1394                int i;
1395                for (i = 0; i < num_base_list; ++i) {
1396                        struct commit *base;
1397                        if (!(base = get_ref(base_list[i], sha1_to_hex(base_list[i]))))
1398                                return error("Could not parse object '%s'",
1399                                        sha1_to_hex(base_list[i]));
1400                        commit_list_insert(base, &ca);
1401                }
1402        }
1403
1404        index_fd = hold_locked_index(lock, 1);
1405        clean = merge_recursive(o, head_commit, next_commit, ca,
1406                        result);
1407        if (active_cache_changed &&
1408                        (write_cache(index_fd, active_cache, active_nr) ||
1409                         commit_locked_index(lock)))
1410                return error("Unable to write index.");
1411
1412        return clean ? 0 : 1;
1413}
1414
1415static int merge_recursive_config(const char *var, const char *value, void *cb)
1416{
1417        struct merge_options *o = cb;
1418        if (!strcasecmp(var, "merge.verbosity")) {
1419                o->verbosity = git_config_int(var, value);
1420                return 0;
1421        }
1422        if (!strcasecmp(var, "diff.renamelimit")) {
1423                o->diff_rename_limit = git_config_int(var, value);
1424                return 0;
1425        }
1426        if (!strcasecmp(var, "merge.renamelimit")) {
1427                o->merge_rename_limit = git_config_int(var, value);
1428                return 0;
1429        }
1430        return git_xmerge_config(var, value, cb);
1431}
1432
1433void init_merge_options(struct merge_options *o)
1434{
1435        memset(o, 0, sizeof(struct merge_options));
1436        o->verbosity = 2;
1437        o->buffer_output = 1;
1438        o->diff_rename_limit = -1;
1439        o->merge_rename_limit = -1;
1440        git_config(merge_recursive_config, o);
1441        if (getenv("GIT_MERGE_VERBOSITY"))
1442                o->verbosity =
1443                        strtol(getenv("GIT_MERGE_VERBOSITY"), NULL, 10);
1444        if (o->verbosity >= 5)
1445                o->buffer_output = 0;
1446        strbuf_init(&o->obuf, 0);
1447        memset(&o->current_file_set, 0, sizeof(struct string_list));
1448        o->current_file_set.strdup_strings = 1;
1449        memset(&o->current_directory_set, 0, sizeof(struct string_list));
1450        o->current_directory_set.strdup_strings = 1;
1451}