merge-tree.c

   1 #include "cache.h"
   2 #include "tree-walk.h"
   3 #include "xdiff-interface.h"
   4 #include "blob.h"
   5
   6 static const char merge_tree_usage[] = "git-merge-tree <base-tree> <branch1> <branch2>";
   7 static int resolve_directories = 1;
   8
   9 struct merge_list {
  10         struct merge_list *next;
  11         struct merge_list *link;        /* other stages for this object */
  12
  13         unsigned int stage : 2,
  14                      flags : 30;
  15         unsigned int mode;
  16         const char *path;
  17         struct blob *blob;
  18 };
  19
  20 static struct merge_list *merge_result, **merge_result_end = &merge_result;
  21
  22 static void add_merge_entry(struct merge_list *entry)
  23 {
  24         *merge_result_end = entry;
  25         merge_result_end = &entry->next;
  26 }
  27
  28 static void merge_trees(struct tree_desc t[3], const char *base);
  29
  30 static const char *explanation(struct merge_list *entry)
  31 {
  32         switch (entry->stage) {
  33         case 0:
  34                 return "merged";
  35         case 3:
  36                 return "added in remote";
  37         case 2:
  38                 if (entry->link)
  39                         return "added in both";
  40                 return "added in local";
  41         }
  42
  43         /* Existed in base */
  44         entry = entry->link;
  45         if (!entry)
  46                 return "removed in both";
  47
  48         if (entry->link)
  49                 return "changed in both";
  50
  51         if (entry->stage == 3)
  52                 return "removed in local";
  53         return "removed in remote";
  54 }
  55
  56 extern void *merge_file(struct blob *, struct blob *, struct blob *, unsigned long *);
  57
  58 static void *result(struct merge_list *entry, unsigned long *size)
  59 {
  60         char type[20];
  61         struct blob *base, *our, *their;
  62
  63         if (!entry->stage)
  64                 return read_sha1_file(entry->blob->object.sha1, type, size);
  65         base = NULL;
  66         if (entry->stage == 1) {
  67                 base = entry->blob;
  68                 entry = entry->link;
  69         }
  70         our = NULL;
  71         if (entry && entry->stage == 2) {
  72                 our = entry->blob;
  73                 entry = entry->link;
  74         }
  75         their = NULL;
  76         if (entry)
  77                 their = entry->blob;
  78         return merge_file(base, our, their, size);
  79 }
  80
  81 static void *origin(struct merge_list *entry, unsigned long *size)
  82 {
  83         char type[20];
  84         while (entry) {
  85                 if (entry->stage == 2)
  86                         return read_sha1_file(entry->blob->object.sha1, type, size);
  87                 entry = entry->link;
  88         }
  89         return NULL;
  90 }
  91
  92 static int show_outf(void *priv_, mmbuffer_t *mb, int nbuf)
  93 {
  94         int i;
  95         for (i = 0; i < nbuf; i++)
  96                 printf("%.*s", (int) mb[i].size, mb[i].ptr);
  97         return 0;
  98 }
  99
 100 static void show_diff(struct merge_list *entry)
 101 {
 102         unsigned long size;
 103         mmfile_t src, dst;
 104         xpparam_t xpp;
 105         xdemitconf_t xecfg;
 106         xdemitcb_t ecb;
 107
 108         xpp.flags = XDF_NEED_MINIMAL;
 109         xecfg.ctxlen = 3;
 110         xecfg.flags = 0;
 111         ecb.outf = show_outf;
 112         ecb.priv = NULL;
 113
 114         src.ptr = origin(entry, &size);
 115         if (!src.ptr)
 116                 size = 0;
 117         src.size = size;
 118         dst.ptr = result(entry, &size);
 119         if (!dst.ptr)
 120                 size = 0;
 121         dst.size = size;
 122         xdl_diff(&src, &dst, &xpp, &xecfg, &ecb);
 123         free(src.ptr);
 124         free(dst.ptr);
 125 }
 126
 127 static void show_result_list(struct merge_list *entry)
 128 {
 129         printf("%s\n", explanation(entry));
 130         do {
 131                 struct merge_list *link = entry->link;
 132                 static const char *desc[4] = { "result", "base", "our", "their" };
 133                 printf("  %-6s %o %s %s\n", desc[entry->stage], entry->mode, sha1_to_hex(entry->blob->object.sha1), entry->path);
 134                 entry = link;
 135         } while (entry);
 136 }
 137
 138 static void show_result(void)
 139 {
 140         struct merge_list *walk;
 141
 142         walk = merge_result;
 143         while (walk) {
 144                 show_result_list(walk);
 145                 show_diff(walk);
 146                 walk = walk->next;
 147         }
 148 }
 149
 150 /* An empty entry never compares same, not even to another empty entry */
 151 static int same_entry(struct name_entry *a, struct name_entry *b)
 152 {
 153         return  a->sha1 &&
 154                 b->sha1 &&
 155                 !memcmp(a->sha1, b->sha1, 20) &&
 156                 a->mode == b->mode;
 157 }
 158
 159 static struct merge_list *create_entry(unsigned stage, unsigned mode, const unsigned char *sha1, const char *path)
 160 {
 161         struct merge_list *res = xmalloc(sizeof(*res));
 162
 163         memset(res, 0, sizeof(*res));
 164         res->stage = stage;
 165         res->path = path;
 166         res->mode = mode;
 167         res->blob = lookup_blob(sha1);
 168         return res;
 169 }
 170
 171 static void resolve(const char *base, struct name_entry *branch1, struct name_entry *result)
 172 {
 173         struct merge_list *orig, *final;
 174         const char *path;
 175
 176         /* If it's already branch1, don't bother showing it */
 177         if (!branch1)
 178                 return;
 179
 180         path = strdup(mkpath("%s%s", base, result->path));
 181         orig = create_entry(2, branch1->mode, branch1->sha1, path);
 182         final = create_entry(0, result->mode, result->sha1, path);
 183
 184         final->link = orig;
 185
 186         add_merge_entry(final);
 187 }
 188
 189 static int unresolved_directory(const char *base, struct name_entry n[3])
 190 {
 191         int baselen;
 192         char *newbase;
 193         struct name_entry *p;
 194         struct tree_desc t[3];
 195         void *buf0, *buf1, *buf2;
 196
 197         if (!resolve_directories)
 198                 return 0;
 199         p = n;
 200         if (!p->mode) {
 201                 p++;
 202                 if (!p->mode)
 203                         p++;
 204         }
 205         if (!S_ISDIR(p->mode))
 206                 return 0;
 207         baselen = strlen(base);
 208         newbase = xmalloc(baselen + p->pathlen + 2);
 209         memcpy(newbase, base, baselen);
 210         memcpy(newbase + baselen, p->path, p->pathlen);
 211         memcpy(newbase + baselen + p->pathlen, "/", 2);
 212
 213         buf0 = fill_tree_descriptor(t+0, n[0].sha1);
 214         buf1 = fill_tree_descriptor(t+1, n[1].sha1);
 215         buf2 = fill_tree_descriptor(t+2, n[2].sha1);
 216         merge_trees(t, newbase);
 217
 218         free(buf0);
 219         free(buf1);
 220         free(buf2);
 221         free(newbase);
 222         return 1;
 223 }
 224
 225
 226 static struct merge_list *link_entry(unsigned stage, const char *base, struct name_entry *n, struct merge_list *entry)
 227 {
 228         const char *path;
 229         struct merge_list *link;
 230
 231         if (!n->mode)
 232                 return entry;
 233         if (entry)
 234                 path = entry->path;
 235         else
 236                 path = strdup(mkpath("%s%s", base, n->path));
 237         link = create_entry(stage, n->mode, n->sha1, path);
 238         link->link = entry;
 239         return link;
 240 }
 241
 242 static void unresolved(const char *base, struct name_entry n[3])
 243 {
 244         struct merge_list *entry = NULL;
 245
 246         if (unresolved_directory(base, n))
 247                 return;
 248
 249         /*
 250          * Do them in reverse order so that the resulting link
 251          * list has the stages in order - link_entry adds new
 252          * links at the front.
 253          */
 254         entry = link_entry(3, base, n + 2, entry);
 255         entry = link_entry(2, base, n + 1, entry);
 256         entry = link_entry(1, base, n + 0, entry);
 257
 258         add_merge_entry(entry);
 259 }
 260
 261 /*
 262  * Merge two trees together (t[1] and t[2]), using a common base (t[0])
 263  * as the origin.
 264  *
 265  * This walks the (sorted) trees in lock-step, checking every possible
 266  * name. Note that directories automatically sort differently from other
 267  * files (see "base_name_compare"), so you'll never see file/directory
 268  * conflicts, because they won't ever compare the same.
 269  *
 270  * IOW, if a directory changes to a filename, it will automatically be
 271  * seen as the directory going away, and the filename being created.
 272  *
 273  * Think of this as a three-way diff.
 274  *
 275  * The output will be either:
 276  *  - successful merge
 277  *       "0 mode sha1 filename"
 278  *    NOTE NOTE NOTE! FIXME! We really really need to walk the index
 279  *    in parallel with this too!
 280  *
 281  *  - conflict:
 282  *      "1 mode sha1 filename"
 283  *      "2 mode sha1 filename"
 284  *      "3 mode sha1 filename"
 285  *    where not all of the 1/2/3 lines may exist, of course.
 286  *
 287  * The successful merge rules are the same as for the three-way merge
 288  * in git-read-tree.
 289  */
 290 static void threeway_callback(int n, unsigned long mask, struct name_entry *entry, const char *base)
 291 {
 292         /* Same in both? */
 293         if (same_entry(entry+1, entry+2)) {
 294                 if (entry[0].sha1) {
 295                         resolve(base, NULL, entry+1);
 296                         return;
 297                 }
 298         }
 299
 300         if (same_entry(entry+0, entry+1)) {
 301                 if (entry[2].sha1 && !S_ISDIR(entry[2].mode)) {
 302                         resolve(base, entry+1, entry+2);
 303                         return;
 304                 }
 305         }
 306
 307         if (same_entry(entry+0, entry+2)) {
 308                 if (entry[1].sha1 && !S_ISDIR(entry[1].mode)) {
 309                         resolve(base, NULL, entry+1);
 310                         return;
 311                 }
 312         }
 313
 314         unresolved(base, entry);
 315 }
 316
 317 static void merge_trees(struct tree_desc t[3], const char *base)
 318 {
 319         traverse_trees(3, t, base, threeway_callback);
 320 }
 321
 322 static void *get_tree_descriptor(struct tree_desc *desc, const char *rev)
 323 {
 324         unsigned char sha1[20];
 325         void *buf;
 326
 327         if (get_sha1(rev, sha1))
 328                 die("unknown rev %s", rev);
 329         buf = fill_tree_descriptor(desc, sha1);
 330         if (!buf)
 331                 die("%s is not a tree", rev);
 332         return buf;
 333 }
 334
 335 int main(int argc, char **argv)
 336 {
 337         struct tree_desc t[3];
 338         void *buf1, *buf2, *buf3;
 339
 340         if (argc < 4)
 341                 usage(merge_tree_usage);
 342
 343         buf1 = get_tree_descriptor(t+0, argv[1]);
 344         buf2 = get_tree_descriptor(t+1, argv[2]);
 345         buf3 = get_tree_descriptor(t+2, argv[3]);
 346         merge_trees(t, "");
 347         free(buf1);
 348         free(buf2);
 349         free(buf3);
 350
 351         show_result();
 352         return 0;
 353 }