git.oblomov.eu Git - git/blob - diff.c

   1 /*
   2  * Copyright (C) 2005 Junio C Hamano
   3  */
   4 #include "cache.h"
   5 #include "tempfile.h"
   6 #include "quote.h"
   7 #include "diff.h"
   8 #include "diffcore.h"
   9 #include "delta.h"
  10 #include "xdiff-interface.h"
  11 #include "color.h"
  12 #include "attr.h"
  13 #include "run-command.h"
  14 #include "utf8.h"
  15 #include "userdiff.h"
  16 #include "submodule-config.h"
  17 #include "submodule.h"
  18 #include "ll-merge.h"
  19 #include "string-list.h"
  20 #include "argv-array.h"
  21 #include "graph.h"
  22
  23 #ifdef NO_FAST_WORKING_DIRECTORY
  24 #define FAST_WORKING_DIRECTORY 0
  25 #else
  26 #define FAST_WORKING_DIRECTORY 1
  27 #endif
  28
  29 static int diff_detect_rename_default;
  30 static int diff_indent_heuristic; /* experimental */
  31 static int diff_compaction_heuristic; /* experimental */
  32 static int diff_rename_limit_default = 400;
  33 static int diff_suppress_blank_empty;
  34 static int diff_use_color_default = -1;
  35 static int diff_context_default = 3;
  36 static const char *diff_word_regex_cfg;
  37 static const char *external_diff_cmd_cfg;
  38 static const char *diff_order_file_cfg;
  39 int diff_auto_refresh_index = 1;
  40 static int diff_mnemonic_prefix;
  41 static int diff_no_prefix;
  42 static int diff_stat_graph_width;
  43 static int diff_dirstat_permille_default = 30;
  44 static struct diff_options default_diff_options;
  45 static long diff_algorithm;
  46 static unsigned ws_error_highlight_default = WSEH_NEW;
  47
  48 static char diff_colors[][COLOR_MAXLEN] = {
  49         GIT_COLOR_RESET,
  50         GIT_COLOR_NORMAL,       /* CONTEXT */
  51         GIT_COLOR_BOLD,         /* METAINFO */
  52         GIT_COLOR_CYAN,         /* FRAGINFO */
  53         GIT_COLOR_RED,          /* OLD */
  54         GIT_COLOR_GREEN,        /* NEW */
  55         GIT_COLOR_YELLOW,       /* COMMIT */
  56         GIT_COLOR_BG_RED,       /* WHITESPACE */
  57         GIT_COLOR_NORMAL,       /* FUNCINFO */
  58 };
  59
  60 static NORETURN void die_want_option(const char *option_name)
  61 {
  62         die(_("option '%s' requires a value"), option_name);
  63 }
  64
  65 static int parse_diff_color_slot(const char *var)
  66 {
  67         if (!strcasecmp(var, "context") || !strcasecmp(var, "plain"))
  68                 return DIFF_CONTEXT;
  69         if (!strcasecmp(var, "meta"))
  70                 return DIFF_METAINFO;
  71         if (!strcasecmp(var, "frag"))
  72                 return DIFF_FRAGINFO;
  73         if (!strcasecmp(var, "old"))
  74                 return DIFF_FILE_OLD;
  75         if (!strcasecmp(var, "new"))
  76                 return DIFF_FILE_NEW;
  77         if (!strcasecmp(var, "commit"))
  78                 return DIFF_COMMIT;
  79         if (!strcasecmp(var, "whitespace"))
  80                 return DIFF_WHITESPACE;
  81         if (!strcasecmp(var, "func"))
  82                 return DIFF_FUNCINFO;
  83         return -1;
  84 }
  85
  86 static int parse_dirstat_params(struct diff_options *options, const char *params_string,
  87                                 struct strbuf *errmsg)
  88 {
  89         char *params_copy = xstrdup(params_string);
  90         struct string_list params = STRING_LIST_INIT_NODUP;
  91         int ret = 0;
  92         int i;
  93
  94         if (*params_copy)
  95                 string_list_split_in_place(&params, params_copy, ',', -1);
  96         for (i = 0; i < params.nr; i++) {
  97                 const char *p = params.items[i].string;
  98                 if (!strcmp(p, "changes")) {
  99                         DIFF_OPT_CLR(options, DIRSTAT_BY_LINE);
 100                         DIFF_OPT_CLR(options, DIRSTAT_BY_FILE);
 101                 } else if (!strcmp(p, "lines")) {
 102                         DIFF_OPT_SET(options, DIRSTAT_BY_LINE);
 103                         DIFF_OPT_CLR(options, DIRSTAT_BY_FILE);
 104                 } else if (!strcmp(p, "files")) {
 105                         DIFF_OPT_CLR(options, DIRSTAT_BY_LINE);
 106                         DIFF_OPT_SET(options, DIRSTAT_BY_FILE);
 107                 } else if (!strcmp(p, "noncumulative")) {
 108                         DIFF_OPT_CLR(options, DIRSTAT_CUMULATIVE);
 109                 } else if (!strcmp(p, "cumulative")) {
 110                         DIFF_OPT_SET(options, DIRSTAT_CUMULATIVE);
 111                 } else if (isdigit(*p)) {
 112                         char *end;
 113                         int permille = strtoul(p, &end, 10) * 10;
 114                         if (*end == '.' && isdigit(*++end)) {
 115                                 /* only use first digit */
 116                                 permille += *end - '0';
 117                                 /* .. and ignore any further digits */
 118                                 while (isdigit(*++end))
 119                                         ; /* nothing */
 120                         }
 121                         if (!*end)
 122                                 options->dirstat_permille = permille;
 123                         else {
 124                                 strbuf_addf(errmsg, _("  Failed to parse dirstat cut-off percentage '%s'\n"),
 125                                             p);
 126                                 ret++;
 127                         }
 128                 } else {
 129                         strbuf_addf(errmsg, _("  Unknown dirstat parameter '%s'\n"), p);
 130                         ret++;
 131                 }
 132
 133         }
 134         string_list_clear(&params, 0);
 135         free(params_copy);
 136         return ret;
 137 }
 138
 139 static int parse_submodule_params(struct diff_options *options, const char *value)
 140 {
 141         if (!strcmp(value, "log"))
 142                 options->submodule_format = DIFF_SUBMODULE_LOG;
 143         else if (!strcmp(value, "short"))
 144                 options->submodule_format = DIFF_SUBMODULE_SHORT;
 145         else if (!strcmp(value, "diff"))
 146                 options->submodule_format = DIFF_SUBMODULE_INLINE_DIFF;
 147         else
 148                 return -1;
 149         return 0;
 150 }
 151
 152 static int git_config_rename(const char *var, const char *value)
 153 {
 154         if (!value)
 155                 return DIFF_DETECT_RENAME;
 156         if (!strcasecmp(value, "copies") || !strcasecmp(value, "copy"))
 157                 return  DIFF_DETECT_COPY;
 158         return git_config_bool(var,value) ? DIFF_DETECT_RENAME : 0;
 159 }
 160
 161 long parse_algorithm_value(const char *value)
 162 {
 163         if (!value)
 164                 return -1;
 165         else if (!strcasecmp(value, "myers") || !strcasecmp(value, "default"))
 166                 return 0;
 167         else if (!strcasecmp(value, "minimal"))
 168                 return XDF_NEED_MINIMAL;
 169         else if (!strcasecmp(value, "patience"))
 170                 return XDF_PATIENCE_DIFF;
 171         else if (!strcasecmp(value, "histogram"))
 172                 return XDF_HISTOGRAM_DIFF;
 173         return -1;
 174 }
 175
 176 static int parse_one_token(const char **arg, const char *token)
 177 {
 178         const char *rest;
 179         if (skip_prefix(*arg, token, &rest) && (!*rest || *rest == ',')) {
 180                 *arg = rest;
 181                 return 1;
 182         }
 183         return 0;
 184 }
 185
 186 static int parse_ws_error_highlight(const char *arg)
 187 {
 188         const char *orig_arg = arg;
 189         unsigned val = 0;
 190
 191         while (*arg) {
 192                 if (parse_one_token(&arg, "none"))
 193                         val = 0;
 194                 else if (parse_one_token(&arg, "default"))
 195                         val = WSEH_NEW;
 196                 else if (parse_one_token(&arg, "all"))
 197                         val = WSEH_NEW | WSEH_OLD | WSEH_CONTEXT;
 198                 else if (parse_one_token(&arg, "new"))
 199                         val |= WSEH_NEW;
 200                 else if (parse_one_token(&arg, "old"))
 201                         val |= WSEH_OLD;
 202                 else if (parse_one_token(&arg, "context"))
 203                         val |= WSEH_CONTEXT;
 204                 else {
 205                         return -1 - (int)(arg - orig_arg);
 206                 }
 207                 if (*arg)
 208                         arg++;
 209         }
 210         return val;
 211 }
 212
 213 /*
 214  * These are to give UI layer defaults.
 215  * The core-level commands such as git-diff-files should
 216  * never be affected by the setting of diff.renames
 217  * the user happens to have in the configuration file.
 218  */
 219 void init_diff_ui_defaults(void)
 220 {
 221         diff_detect_rename_default = 1;
 222 }
 223
 224 int git_diff_heuristic_config(const char *var, const char *value, void *cb)
 225 {
 226         if (!strcmp(var, "diff.indentheuristic")) {
 227                 diff_indent_heuristic = git_config_bool(var, value);
 228                 if (diff_indent_heuristic)
 229                         diff_compaction_heuristic = 0;
 230         }
 231         if (!strcmp(var, "diff.compactionheuristic")) {
 232                 diff_compaction_heuristic = git_config_bool(var, value);
 233                 if (diff_compaction_heuristic)
 234                         diff_indent_heuristic = 0;
 235         }
 236         return 0;
 237 }
 238
 239 int git_diff_ui_config(const char *var, const char *value, void *cb)
 240 {
 241         if (!strcmp(var, "diff.color") || !strcmp(var, "color.diff")) {
 242                 diff_use_color_default = git_config_colorbool(var, value);
 243                 return 0;
 244         }
 245         if (!strcmp(var, "diff.context")) {
 246                 diff_context_default = git_config_int(var, value);
 247                 if (diff_context_default < 0)
 248                         return -1;
 249                 return 0;
 250         }
 251         if (!strcmp(var, "diff.renames")) {
 252                 diff_detect_rename_default = git_config_rename(var, value);
 253                 return 0;
 254         }
 255         if (!strcmp(var, "diff.autorefreshindex")) {
 256                 diff_auto_refresh_index = git_config_bool(var, value);
 257                 return 0;
 258         }
 259         if (!strcmp(var, "diff.mnemonicprefix")) {
 260                 diff_mnemonic_prefix = git_config_bool(var, value);
 261                 return 0;
 262         }
 263         if (!strcmp(var, "diff.noprefix")) {
 264                 diff_no_prefix = git_config_bool(var, value);
 265                 return 0;
 266         }
 267         if (!strcmp(var, "diff.statgraphwidth")) {
 268                 diff_stat_graph_width = git_config_int(var, value);
 269                 return 0;
 270         }
 271         if (!strcmp(var, "diff.external"))
 272                 return git_config_string(&external_diff_cmd_cfg, var, value);
 273         if (!strcmp(var, "diff.wordregex"))
 274                 return git_config_string(&diff_word_regex_cfg, var, value);
 275         if (!strcmp(var, "diff.orderfile"))
 276                 return git_config_pathname(&diff_order_file_cfg, var, value);
 277
 278         if (!strcmp(var, "diff.ignoresubmodules"))
 279                 handle_ignore_submodules_arg(&default_diff_options, value);
 280
 281         if (!strcmp(var, "diff.submodule")) {
 282                 if (parse_submodule_params(&default_diff_options, value))
 283                         warning(_("Unknown value for 'diff.submodule' config variable: '%s'"),
 284                                 value);
 285                 return 0;
 286         }
 287
 288         if (!strcmp(var, "diff.algorithm")) {
 289                 diff_algorithm = parse_algorithm_value(value);
 290                 if (diff_algorithm < 0)
 291                         return -1;
 292                 return 0;
 293         }
 294
 295         if (git_diff_heuristic_config(var, value, cb) < 0)
 296                 return -1;
 297
 298         if (!strcmp(var, "diff.wserrorhighlight")) {
 299                 int val = parse_ws_error_highlight(value);
 300                 if (val < 0)
 301                         return -1;
 302                 ws_error_highlight_default = val;
 303                 return 0;
 304         }
 305
 306         if (git_color_config(var, value, cb) < 0)
 307                 return -1;
 308
 309         return git_diff_basic_config(var, value, cb);
 310 }
 311
 312 int git_diff_basic_config(const char *var, const char *value, void *cb)
 313 {
 314         const char *name;
 315
 316         if (!strcmp(var, "diff.renamelimit")) {
 317                 diff_rename_limit_default = git_config_int(var, value);
 318                 return 0;
 319         }
 320
 321         if (userdiff_config(var, value) < 0)
 322                 return -1;
 323
 324         if (skip_prefix(var, "diff.color.", &name) ||
 325             skip_prefix(var, "color.diff.", &name)) {
 326                 int slot = parse_diff_color_slot(name);
 327                 if (slot < 0)
 328                         return 0;
 329                 if (!value)
 330                         return config_error_nonbool(var);
 331                 return color_parse(value, diff_colors[slot]);
 332         }
 333
 334         /* like GNU diff's --suppress-blank-empty option  */
 335         if (!strcmp(var, "diff.suppressblankempty") ||
 336                         /* for backwards compatibility */
 337                         !strcmp(var, "diff.suppress-blank-empty")) {
 338                 diff_suppress_blank_empty = git_config_bool(var, value);
 339                 return 0;
 340         }
 341
 342         if (!strcmp(var, "diff.dirstat")) {
 343                 struct strbuf errmsg = STRBUF_INIT;
 344                 default_diff_options.dirstat_permille = diff_dirstat_permille_default;
 345                 if (parse_dirstat_params(&default_diff_options, value, &errmsg))
 346                         warning(_("Found errors in 'diff.dirstat' config variable:\n%s"),
 347                                 errmsg.buf);
 348                 strbuf_release(&errmsg);
 349                 diff_dirstat_permille_default = default_diff_options.dirstat_permille;
 350                 return 0;
 351         }
 352
 353         if (starts_with(var, "submodule."))
 354                 return parse_submodule_config_option(var, value);
 355
 356         return git_default_config(var, value, cb);
 357 }
 358
 359 static char *quote_two(const char *one, const char *two)
 360 {
 361         int need_one = quote_c_style(one, NULL, NULL, 1);
 362         int need_two = quote_c_style(two, NULL, NULL, 1);
 363         struct strbuf res = STRBUF_INIT;
 364
 365         if (need_one + need_two) {
 366                 strbuf_addch(&res, '"');
 367                 quote_c_style(one, &res, NULL, 1);
 368                 quote_c_style(two, &res, NULL, 1);
 369                 strbuf_addch(&res, '"');
 370         } else {
 371                 strbuf_addstr(&res, one);
 372                 strbuf_addstr(&res, two);
 373         }
 374         return strbuf_detach(&res, NULL);
 375 }
 376
 377 static const char *external_diff(void)
 378 {
 379         static const char *external_diff_cmd = NULL;
 380         static int done_preparing = 0;
 381
 382         if (done_preparing)
 383                 return external_diff_cmd;
 384         external_diff_cmd = getenv("GIT_EXTERNAL_DIFF");
 385         if (!external_diff_cmd)
 386                 external_diff_cmd = external_diff_cmd_cfg;
 387         done_preparing = 1;
 388         return external_diff_cmd;
 389 }
 390
 391 /*
 392  * Keep track of files used for diffing. Sometimes such an entry
 393  * refers to a temporary file, sometimes to an existing file, and
 394  * sometimes to "/dev/null".
 395  */
 396 static struct diff_tempfile {
 397         /*
 398          * filename external diff should read from, or NULL if this
 399          * entry is currently not in use:
 400          */
 401         const char *name;
 402
 403         char hex[GIT_SHA1_HEXSZ + 1];
 404         char mode[10];
 405
 406         /*
 407          * If this diff_tempfile instance refers to a temporary file,
 408          * this tempfile object is used to manage its lifetime.
 409          */
 410         struct tempfile tempfile;
 411 } diff_temp[2];
 412
 413 typedef unsigned long (*sane_truncate_fn)(char *line, unsigned long len);
 414
 415 struct emit_callback {
 416         int color_diff;
 417         unsigned ws_rule;
 418         int blank_at_eof_in_preimage;
 419         int blank_at_eof_in_postimage;
 420         int lno_in_preimage;
 421         int lno_in_postimage;
 422         sane_truncate_fn truncate;
 423         const char **label_path;
 424         struct diff_words_data *diff_words;
 425         struct diff_options *opt;
 426         struct strbuf *header;
 427 };
 428
 429 static int count_lines(const char *data, int size)
 430 {
 431         int count, ch, completely_empty = 1, nl_just_seen = 0;
 432         count = 0;
 433         while (0 < size--) {
 434                 ch = *data++;
 435                 if (ch == '\n') {
 436                         count++;
 437                         nl_just_seen = 1;
 438                         completely_empty = 0;
 439                 }
 440                 else {
 441                         nl_just_seen = 0;
 442                         completely_empty = 0;
 443                 }
 444         }
 445         if (completely_empty)
 446                 return 0;
 447         if (!nl_just_seen)
 448                 count++; /* no trailing newline */
 449         return count;
 450 }
 451
 452 static int fill_mmfile(mmfile_t *mf, struct diff_filespec *one)
 453 {
 454         if (!DIFF_FILE_VALID(one)) {
 455                 mf->ptr = (char *)""; /* does not matter */
 456                 mf->size = 0;
 457                 return 0;
 458         }
 459         else if (diff_populate_filespec(one, 0))
 460                 return -1;
 461
 462         mf->ptr = one->data;
 463         mf->size = one->size;
 464         return 0;
 465 }
 466
 467 /* like fill_mmfile, but only for size, so we can avoid retrieving blob */
 468 static unsigned long diff_filespec_size(struct diff_filespec *one)
 469 {
 470         if (!DIFF_FILE_VALID(one))
 471                 return 0;
 472         diff_populate_filespec(one, CHECK_SIZE_ONLY);
 473         return one->size;
 474 }
 475
 476 static int count_trailing_blank(mmfile_t *mf, unsigned ws_rule)
 477 {
 478         char *ptr = mf->ptr;
 479         long size = mf->size;
 480         int cnt = 0;
 481
 482         if (!size)
 483                 return cnt;
 484         ptr += size - 1; /* pointing at the very end */
 485         if (*ptr != '\n')
 486                 ; /* incomplete line */
 487         else
 488                 ptr--; /* skip the last LF */
 489         while (mf->ptr < ptr) {
 490                 char *prev_eol;
 491                 for (prev_eol = ptr; mf->ptr <= prev_eol; prev_eol--)
 492                         if (*prev_eol == '\n')
 493                                 break;
 494                 if (!ws_blank_line(prev_eol + 1, ptr - prev_eol, ws_rule))
 495                         break;
 496                 cnt++;
 497                 ptr = prev_eol - 1;
 498         }
 499         return cnt;
 500 }
 501
 502 static void check_blank_at_eof(mmfile_t *mf1, mmfile_t *mf2,
 503                                struct emit_callback *ecbdata)
 504 {
 505         int l1, l2, at;
 506         unsigned ws_rule = ecbdata->ws_rule;
 507         l1 = count_trailing_blank(mf1, ws_rule);
 508         l2 = count_trailing_blank(mf2, ws_rule);
 509         if (l2 <= l1) {
 510                 ecbdata->blank_at_eof_in_preimage = 0;
 511                 ecbdata->blank_at_eof_in_postimage = 0;
 512                 return;
 513         }
 514         at = count_lines(mf1->ptr, mf1->size);
 515         ecbdata->blank_at_eof_in_preimage = (at - l1) + 1;
 516
 517         at = count_lines(mf2->ptr, mf2->size);
 518         ecbdata->blank_at_eof_in_postimage = (at - l2) + 1;
 519 }
 520
 521 static void emit_line_0(struct diff_options *o, const char *set, const char *reset,
 522                         int first, const char *line, int len)
 523 {
 524         int has_trailing_newline, has_trailing_carriage_return;
 525         int nofirst;
 526         FILE *file = o->file;
 527
 528         fputs(diff_line_prefix(o), file);
 529
 530         if (len == 0) {
 531                 has_trailing_newline = (first == '\n');
 532                 has_trailing_carriage_return = (!has_trailing_newline &&
 533                                                 (first == '\r'));
 534                 nofirst = has_trailing_newline || has_trailing_carriage_return;
 535         } else {
 536                 has_trailing_newline = (len > 0 && line[len-1] == '\n');
 537                 if (has_trailing_newline)
 538                         len--;
 539                 has_trailing_carriage_return = (len > 0 && line[len-1] == '\r');
 540                 if (has_trailing_carriage_return)
 541                         len--;
 542                 nofirst = 0;
 543         }
 544
 545         if (len || !nofirst) {
 546                 fputs(set, file);
 547                 if (!nofirst)
 548                         fputc(first, file);
 549                 fwrite(line, len, 1, file);
 550                 fputs(reset, file);
 551         }
 552         if (has_trailing_carriage_return)
 553                 fputc('\r', file);
 554         if (has_trailing_newline)
 555                 fputc('\n', file);
 556 }
 557
 558 static void emit_line(struct diff_options *o, const char *set, const char *reset,
 559                       const char *line, int len)
 560 {
 561         emit_line_0(o, set, reset, line[0], line+1, len-1);
 562 }
 563
 564 static int new_blank_line_at_eof(struct emit_callback *ecbdata, const char *line, int len)
 565 {
 566         if (!((ecbdata->ws_rule & WS_BLANK_AT_EOF) &&
 567               ecbdata->blank_at_eof_in_preimage &&
 568               ecbdata->blank_at_eof_in_postimage &&
 569               ecbdata->blank_at_eof_in_preimage <= ecbdata->lno_in_preimage &&
 570               ecbdata->blank_at_eof_in_postimage <= ecbdata->lno_in_postimage))
 571                 return 0;
 572         return ws_blank_line(line, len, ecbdata->ws_rule);
 573 }
 574
 575 static void emit_line_checked(const char *reset,
 576                               struct emit_callback *ecbdata,
 577                               const char *line, int len,
 578                               enum color_diff color,
 579                               unsigned ws_error_highlight,
 580                               char sign)
 581 {
 582         const char *set = diff_get_color(ecbdata->color_diff, color);
 583         const char *ws = NULL;
 584
 585         if (ecbdata->opt->ws_error_highlight & ws_error_highlight) {
 586                 ws = diff_get_color(ecbdata->color_diff, DIFF_WHITESPACE);
 587                 if (!*ws)
 588                         ws = NULL;
 589         }
 590
 591         if (!ws)
 592                 emit_line_0(ecbdata->opt, set, reset, sign, line, len);
 593         else if (sign == '+' && new_blank_line_at_eof(ecbdata, line, len))
 594                 /* Blank line at EOF - paint '+' as well */
 595                 emit_line_0(ecbdata->opt, ws, reset, sign, line, len);
 596         else {
 597                 /* Emit just the prefix, then the rest. */
 598                 emit_line_0(ecbdata->opt, set, reset, sign, "", 0);
 599                 ws_check_emit(line, len, ecbdata->ws_rule,
 600                               ecbdata->opt->file, set, reset, ws);
 601         }
 602 }
 603
 604 static void emit_add_line(const char *reset,
 605                           struct emit_callback *ecbdata,
 606                           const char *line, int len)
 607 {
 608         emit_line_checked(reset, ecbdata, line, len,
 609                           DIFF_FILE_NEW, WSEH_NEW, '+');
 610 }
 611
 612 static void emit_del_line(const char *reset,
 613                           struct emit_callback *ecbdata,
 614                           const char *line, int len)
 615 {
 616         emit_line_checked(reset, ecbdata, line, len,
 617                           DIFF_FILE_OLD, WSEH_OLD, '-');
 618 }
 619
 620 static void emit_context_line(const char *reset,
 621                               struct emit_callback *ecbdata,
 622                               const char *line, int len)
 623 {
 624         emit_line_checked(reset, ecbdata, line, len,
 625                           DIFF_CONTEXT, WSEH_CONTEXT, ' ');
 626 }
 627
 628 static void emit_hunk_header(struct emit_callback *ecbdata,
 629                              const char *line, int len)
 630 {
 631         const char *context = diff_get_color(ecbdata->color_diff, DIFF_CONTEXT);
 632         const char *frag = diff_get_color(ecbdata->color_diff, DIFF_FRAGINFO);
 633         const char *func = diff_get_color(ecbdata->color_diff, DIFF_FUNCINFO);
 634         const char *reset = diff_get_color(ecbdata->color_diff, DIFF_RESET);
 635         static const char atat[2] = { '@', '@' };
 636         const char *cp, *ep;
 637         struct strbuf msgbuf = STRBUF_INIT;
 638         int org_len = len;
 639         int i = 1;
 640
 641         /*
 642          * As a hunk header must begin with "@@ -<old>, +<new> @@",
 643          * it always is at least 10 bytes long.
 644          */
 645         if (len < 10 ||
 646             memcmp(line, atat, 2) ||
 647             !(ep = memmem(line + 2, len - 2, atat, 2))) {
 648                 emit_line(ecbdata->opt, context, reset, line, len);
 649                 return;
 650         }
 651         ep += 2; /* skip over @@ */
 652
 653         /* The hunk header in fraginfo color */
 654         strbuf_addstr(&msgbuf, frag);
 655         strbuf_add(&msgbuf, line, ep - line);
 656         strbuf_addstr(&msgbuf, reset);
 657
 658         /*
 659          * trailing "\r\n"
 660          */
 661         for ( ; i < 3; i++)
 662                 if (line[len - i] == '\r' || line[len - i] == '\n')
 663                         len--;
 664
 665         /* blank before the func header */
 666         for (cp = ep; ep - line < len; ep++)
 667                 if (*ep != ' ' && *ep != '\t')
 668                         break;
 669         if (ep != cp) {
 670                 strbuf_addstr(&msgbuf, context);
 671                 strbuf_add(&msgbuf, cp, ep - cp);
 672                 strbuf_addstr(&msgbuf, reset);
 673         }
 674
 675         if (ep < line + len) {
 676                 strbuf_addstr(&msgbuf, func);
 677                 strbuf_add(&msgbuf, ep, line + len - ep);
 678                 strbuf_addstr(&msgbuf, reset);
 679         }
 680
 681         strbuf_add(&msgbuf, line + len, org_len - len);
 682         emit_line(ecbdata->opt, "", "", msgbuf.buf, msgbuf.len);
 683         strbuf_release(&msgbuf);
 684 }
 685
 686 static struct diff_tempfile *claim_diff_tempfile(void) {
 687         int i;
 688         for (i = 0; i < ARRAY_SIZE(diff_temp); i++)
 689                 if (!diff_temp[i].name)
 690                         return diff_temp + i;
 691         die("BUG: diff is failing to clean up its tempfiles");
 692 }
 693
 694 static void remove_tempfile(void)
 695 {
 696         int i;
 697         for (i = 0; i < ARRAY_SIZE(diff_temp); i++) {
 698                 if (is_tempfile_active(&diff_temp[i].tempfile))
 699                         delete_tempfile(&diff_temp[i].tempfile);
 700                 diff_temp[i].name = NULL;
 701         }
 702 }
 703
 704 static void print_line_count(FILE *file, int count)
 705 {
 706         switch (count) {
 707         case 0:
 708                 fprintf(file, "0,0");
 709                 break;
 710         case 1:
 711                 fprintf(file, "1");
 712                 break;
 713         default:
 714                 fprintf(file, "1,%d", count);
 715                 break;
 716         }
 717 }
 718
 719 static void emit_rewrite_lines(struct emit_callback *ecb,
 720                                int prefix, const char *data, int size)
 721 {
 722         const char *endp = NULL;
 723         static const char *nneof = " No newline at end of file\n";
 724         const char *reset = diff_get_color(ecb->color_diff, DIFF_RESET);
 725
 726         while (0 < size) {
 727                 int len;
 728
 729                 endp = memchr(data, '\n', size);
 730                 len = endp ? (endp - data + 1) : size;
 731                 if (prefix != '+') {
 732                         ecb->lno_in_preimage++;
 733                         emit_del_line(reset, ecb, data, len);
 734                 } else {
 735                         ecb->lno_in_postimage++;
 736                         emit_add_line(reset, ecb, data, len);
 737                 }
 738                 size -= len;
 739                 data += len;
 740         }
 741         if (!endp) {
 742                 const char *context = diff_get_color(ecb->color_diff,
 743                                                      DIFF_CONTEXT);
 744                 putc('\n', ecb->opt->file);
 745                 emit_line_0(ecb->opt, context, reset, '\\',
 746                             nneof, strlen(nneof));
 747         }
 748 }
 749
 750 static void emit_rewrite_diff(const char *name_a,
 751                               const char *name_b,
 752                               struct diff_filespec *one,
 753                               struct diff_filespec *two,
 754                               struct userdiff_driver *textconv_one,
 755                               struct userdiff_driver *textconv_two,
 756                               struct diff_options *o)
 757 {
 758         int lc_a, lc_b;
 759         const char *name_a_tab, *name_b_tab;
 760         const char *metainfo = diff_get_color(o->use_color, DIFF_METAINFO);
 761         const char *fraginfo = diff_get_color(o->use_color, DIFF_FRAGINFO);
 762         const char *reset = diff_get_color(o->use_color, DIFF_RESET);
 763         static struct strbuf a_name = STRBUF_INIT, b_name = STRBUF_INIT;
 764         const char *a_prefix, *b_prefix;
 765         char *data_one, *data_two;
 766         size_t size_one, size_two;
 767         struct emit_callback ecbdata;
 768         const char *line_prefix = diff_line_prefix(o);
 769
 770         if (diff_mnemonic_prefix && DIFF_OPT_TST(o, REVERSE_DIFF)) {
 771                 a_prefix = o->b_prefix;
 772                 b_prefix = o->a_prefix;
 773         } else {
 774                 a_prefix = o->a_prefix;
 775                 b_prefix = o->b_prefix;
 776         }
 777
 778         name_a += (*name_a == '/');
 779         name_b += (*name_b == '/');
 780         name_a_tab = strchr(name_a, ' ') ? "\t" : "";
 781         name_b_tab = strchr(name_b, ' ') ? "\t" : "";
 782
 783         strbuf_reset(&a_name);
 784         strbuf_reset(&b_name);
 785         quote_two_c_style(&a_name, a_prefix, name_a, 0);
 786         quote_two_c_style(&b_name, b_prefix, name_b, 0);
 787
 788         size_one = fill_textconv(textconv_one, one, &data_one);
 789         size_two = fill_textconv(textconv_two, two, &data_two);
 790
 791         memset(&ecbdata, 0, sizeof(ecbdata));
 792         ecbdata.color_diff = want_color(o->use_color);
 793         ecbdata.ws_rule = whitespace_rule(name_b);
 794         ecbdata.opt = o;
 795         if (ecbdata.ws_rule & WS_BLANK_AT_EOF) {
 796                 mmfile_t mf1, mf2;
 797                 mf1.ptr = (char *)data_one;
 798                 mf2.ptr = (char *)data_two;
 799                 mf1.size = size_one;
 800                 mf2.size = size_two;
 801                 check_blank_at_eof(&mf1, &mf2, &ecbdata);
 802         }
 803         ecbdata.lno_in_preimage = 1;
 804         ecbdata.lno_in_postimage = 1;
 805
 806         lc_a = count_lines(data_one, size_one);
 807         lc_b = count_lines(data_two, size_two);
 808         fprintf(o->file,
 809                 "%s%s--- %s%s%s\n%s%s+++ %s%s%s\n%s%s@@ -",
 810                 line_prefix, metainfo, a_name.buf, name_a_tab, reset,
 811                 line_prefix, metainfo, b_name.buf, name_b_tab, reset,
 812                 line_prefix, fraginfo);
 813         if (!o->irreversible_delete)
 814                 print_line_count(o->file, lc_a);
 815         else
 816                 fprintf(o->file, "?,?");
 817         fprintf(o->file, " +");
 818         print_line_count(o->file, lc_b);
 819         fprintf(o->file, " @@%s\n", reset);
 820         if (lc_a && !o->irreversible_delete)
 821                 emit_rewrite_lines(&ecbdata, '-', data_one, size_one);
 822         if (lc_b)
 823                 emit_rewrite_lines(&ecbdata, '+', data_two, size_two);
 824         if (textconv_one)
 825                 free((char *)data_one);
 826         if (textconv_two)
 827                 free((char *)data_two);
 828 }
 829
 830 struct diff_words_buffer {
 831         mmfile_t text;
 832         long alloc;
 833         struct diff_words_orig {
 834                 const char *begin, *end;
 835         } *orig;
 836         int orig_nr, orig_alloc;
 837 };
 838
 839 static void diff_words_append(char *line, unsigned long len,
 840                 struct diff_words_buffer *buffer)
 841 {
 842         ALLOC_GROW(buffer->text.ptr, buffer->text.size + len, buffer->alloc);
 843         line++;
 844         len--;
 845         memcpy(buffer->text.ptr + buffer->text.size, line, len);
 846         buffer->text.size += len;
 847         buffer->text.ptr[buffer->text.size] = '\0';
 848 }
 849
 850 struct diff_words_style_elem {
 851         const char *prefix;
 852         const char *suffix;
 853         const char *color; /* NULL; filled in by the setup code if
 854                             * color is enabled */
 855 };
 856
 857 struct diff_words_style {
 858         enum diff_words_type type;
 859         struct diff_words_style_elem new, old, ctx;
 860         const char *newline;
 861 };
 862
 863 static struct diff_words_style diff_words_styles[] = {
 864         { DIFF_WORDS_PORCELAIN, {"+", "\n"}, {"-", "\n"}, {" ", "\n"}, "~\n" },
 865         { DIFF_WORDS_PLAIN, {"{+", "+}"}, {"[-", "-]"}, {"", ""}, "\n" },
 866         { DIFF_WORDS_COLOR, {"", ""}, {"", ""}, {"", ""}, "\n" }
 867 };
 868
 869 struct diff_words_data {
 870         struct diff_words_buffer minus, plus;
 871         const char *current_plus;
 872         int last_minus;
 873         struct diff_options *opt;
 874         regex_t *word_regex;
 875         enum diff_words_type type;
 876         struct diff_words_style *style;
 877 };
 878
 879 static int fn_out_diff_words_write_helper(FILE *fp,
 880                                           struct diff_words_style_elem *st_el,
 881                                           const char *newline,
 882                                           size_t count, const char *buf,
 883                                           const char *line_prefix)
 884 {
 885         int print = 0;
 886
 887         while (count) {
 888                 char *p = memchr(buf, '\n', count);
 889                 if (print)
 890                         fputs(line_prefix, fp);
 891                 if (p != buf) {
 892                         if (st_el->color && fputs(st_el->color, fp) < 0)
 893                                 return -1;
 894                         if (fputs(st_el->prefix, fp) < 0 ||
 895                             fwrite(buf, p ? p - buf : count, 1, fp) != 1 ||
 896                             fputs(st_el->suffix, fp) < 0)
 897                                 return -1;
 898                         if (st_el->color && *st_el->color
 899                             && fputs(GIT_COLOR_RESET, fp) < 0)
 900                                 return -1;
 901                 }
 902                 if (!p)
 903                         return 0;
 904                 if (fputs(newline, fp) < 0)
 905                         return -1;
 906                 count -= p + 1 - buf;
 907                 buf = p + 1;
 908                 print = 1;
 909         }
 910         return 0;
 911 }
 912
 913 /*
 914  * '--color-words' algorithm can be described as:
 915  *
 916  *   1. collect a the minus/plus lines of a diff hunk, divided into
 917  *      minus-lines and plus-lines;
 918  *
 919  *   2. break both minus-lines and plus-lines into words and
 920  *      place them into two mmfile_t with one word for each line;
 921  *
 922  *   3. use xdiff to run diff on the two mmfile_t to get the words level diff;
 923  *
 924  * And for the common parts of the both file, we output the plus side text.
 925  * diff_words->current_plus is used to trace the current position of the plus file
 926  * which printed. diff_words->last_minus is used to trace the last minus word
 927  * printed.
 928  *
 929  * For '--graph' to work with '--color-words', we need to output the graph prefix
 930  * on each line of color words output. Generally, there are two conditions on
 931  * which we should output the prefix.
 932  *
 933  *   1. diff_words->last_minus == 0 &&
 934  *      diff_words->current_plus == diff_words->plus.text.ptr
 935  *
 936  *      that is: the plus text must start as a new line, and if there is no minus
 937  *      word printed, a graph prefix must be printed.
 938  *
 939  *   2. diff_words->current_plus > diff_words->plus.text.ptr &&
 940  *      *(diff_words->current_plus - 1) == '\n'
 941  *
 942  *      that is: a graph prefix must be printed following a '\n'
 943  */
 944 static int color_words_output_graph_prefix(struct diff_words_data *diff_words)
 945 {
 946         if ((diff_words->last_minus == 0 &&
 947                 diff_words->current_plus == diff_words->plus.text.ptr) ||
 948                 (diff_words->current_plus > diff_words->plus.text.ptr &&
 949                 *(diff_words->current_plus - 1) == '\n')) {
 950                 return 1;
 951         } else {
 952                 return 0;
 953         }
 954 }
 955
 956 static void fn_out_diff_words_aux(void *priv, char *line, unsigned long len)
 957 {
 958         struct diff_words_data *diff_words = priv;
 959         struct diff_words_style *style = diff_words->style;
 960         int minus_first, minus_len, plus_first, plus_len;
 961         const char *minus_begin, *minus_end, *plus_begin, *plus_end;
 962         struct diff_options *opt = diff_words->opt;
 963         const char *line_prefix;
 964
 965         if (line[0] != '@' || parse_hunk_header(line, len,
 966                         &minus_first, &minus_len, &plus_first, &plus_len))
 967                 return;
 968
 969         assert(opt);
 970         line_prefix = diff_line_prefix(opt);
 971
 972         /* POSIX requires that first be decremented by one if len == 0... */
 973         if (minus_len) {
 974                 minus_begin = diff_words->minus.orig[minus_first].begin;
 975                 minus_end =
 976                         diff_words->minus.orig[minus_first + minus_len - 1].end;
 977         } else
 978                 minus_begin = minus_end =
 979                         diff_words->minus.orig[minus_first].end;
 980
 981         if (plus_len) {
 982                 plus_begin = diff_words->plus.orig[plus_first].begin;
 983                 plus_end = diff_words->plus.orig[plus_first + plus_len - 1].end;
 984         } else
 985                 plus_begin = plus_end = diff_words->plus.orig[plus_first].end;
 986
 987         if (color_words_output_graph_prefix(diff_words)) {
 988                 fputs(line_prefix, diff_words->opt->file);
 989         }
 990         if (diff_words->current_plus != plus_begin) {
 991                 fn_out_diff_words_write_helper(diff_words->opt->file,
 992                                 &style->ctx, style->newline,
 993                                 plus_begin - diff_words->current_plus,
 994                                 diff_words->current_plus, line_prefix);
 995                 if (*(plus_begin - 1) == '\n')
 996                         fputs(line_prefix, diff_words->opt->file);
 997         }
 998         if (minus_begin != minus_end) {
 999                 fn_out_diff_words_write_helper(diff_words->opt->file,
1000                                 &style->old, style->newline,
1001                                 minus_end - minus_begin, minus_begin,
1002                                 line_prefix);
1003         }
1004         if (plus_begin != plus_end) {
1005                 fn_out_diff_words_write_helper(diff_words->opt->file,
1006                                 &style->new, style->newline,
1007                                 plus_end - plus_begin, plus_begin,
1008                                 line_prefix);
1009         }
1010
1011         diff_words->current_plus = plus_end;
1012         diff_words->last_minus = minus_first;
1013 }
1014
1015 /* This function starts looking at *begin, and returns 0 iff a word was found. */
1016 static int find_word_boundaries(mmfile_t *buffer, regex_t *word_regex,
1017                 int *begin, int *end)
1018 {
1019         if (word_regex && *begin < buffer->size) {
1020                 regmatch_t match[1];
1021                 if (!regexec_buf(word_regex, buffer->ptr + *begin,
1022                                  buffer->size - *begin, 1, match, 0)) {
1023                         char *p = memchr(buffer->ptr + *begin + match[0].rm_so,
1024                                         '\n', match[0].rm_eo - match[0].rm_so);
1025                         *end = p ? p - buffer->ptr : match[0].rm_eo + *begin;
1026                         *begin += match[0].rm_so;
1027                         return *begin >= *end;
1028                 }
1029                 return -1;
1030         }
1031
1032         /* find the next word */
1033         while (*begin < buffer->size && isspace(buffer->ptr[*begin]))
1034                 (*begin)++;
1035         if (*begin >= buffer->size)
1036                 return -1;
1037
1038         /* find the end of the word */
1039         *end = *begin + 1;
1040         while (*end < buffer->size && !isspace(buffer->ptr[*end]))
1041                 (*end)++;
1042
1043         return 0;
1044 }
1045
1046 /*
1047  * This function splits the words in buffer->text, stores the list with
1048  * newline separator into out, and saves the offsets of the original words
1049  * in buffer->orig.
1050  */
1051 static void diff_words_fill(struct diff_words_buffer *buffer, mmfile_t *out,
1052                 regex_t *word_regex)
1053 {
1054         int i, j;
1055         long alloc = 0;
1056
1057         out->size = 0;
1058         out->ptr = NULL;
1059
1060         /* fake an empty "0th" word */
1061         ALLOC_GROW(buffer->orig, 1, buffer->orig_alloc);
1062         buffer->orig[0].begin = buffer->orig[0].end = buffer->text.ptr;
1063         buffer->orig_nr = 1;
1064
1065         for (i = 0; i < buffer->text.size; i++) {
1066                 if (find_word_boundaries(&buffer->text, word_regex, &i, &j))
1067                         return;
1068
1069                 /* store original boundaries */
1070                 ALLOC_GROW(buffer->orig, buffer->orig_nr + 1,
1071                                 buffer->orig_alloc);
1072                 buffer->orig[buffer->orig_nr].begin = buffer->text.ptr + i;
1073                 buffer->orig[buffer->orig_nr].end = buffer->text.ptr + j;
1074                 buffer->orig_nr++;
1075
1076                 /* store one word */
1077                 ALLOC_GROW(out->ptr, out->size + j - i + 1, alloc);
1078                 memcpy(out->ptr + out->size, buffer->text.ptr + i, j - i);
1079                 out->ptr[out->size + j - i] = '\n';
1080                 out->size += j - i + 1;
1081
1082                 i = j - 1;
1083         }
1084 }
1085
1086 /* this executes the word diff on the accumulated buffers */
1087 static void diff_words_show(struct diff_words_data *diff_words)
1088 {
1089         xpparam_t xpp;
1090         xdemitconf_t xecfg;
1091         mmfile_t minus, plus;
1092         struct diff_words_style *style = diff_words->style;
1093
1094         struct diff_options *opt = diff_words->opt;
1095         const char *line_prefix;
1096
1097         assert(opt);
1098         line_prefix = diff_line_prefix(opt);
1099
1100         /* special case: only removal */
1101         if (!diff_words->plus.text.size) {
1102                 fputs(line_prefix, diff_words->opt->file);
1103                 fn_out_diff_words_write_helper(diff_words->opt->file,
1104                         &style->old, style->newline,
1105                         diff_words->minus.text.size,
1106                         diff_words->minus.text.ptr, line_prefix);
1107                 diff_words->minus.text.size = 0;
1108                 return;
1109         }
1110
1111         diff_words->current_plus = diff_words->plus.text.ptr;
1112         diff_words->last_minus = 0;
1113
1114         memset(&xpp, 0, sizeof(xpp));
1115         memset(&xecfg, 0, sizeof(xecfg));
1116         diff_words_fill(&diff_words->minus, &minus, diff_words->word_regex);
1117         diff_words_fill(&diff_words->plus, &plus, diff_words->word_regex);
1118         xpp.flags = 0;
1119         /* as only the hunk header will be parsed, we need a 0-context */
1120         xecfg.ctxlen = 0;
1121         if (xdi_diff_outf(&minus, &plus, fn_out_diff_words_aux, diff_words,
1122                           &xpp, &xecfg))
1123                 die("unable to generate word diff");
1124         free(minus.ptr);
1125         free(plus.ptr);
1126         if (diff_words->current_plus != diff_words->plus.text.ptr +
1127                         diff_words->plus.text.size) {
1128                 if (color_words_output_graph_prefix(diff_words))
1129                         fputs(line_prefix, diff_words->opt->file);
1130                 fn_out_diff_words_write_helper(diff_words->opt->file,
1131                         &style->ctx, style->newline,
1132                         diff_words->plus.text.ptr + diff_words->plus.text.size
1133                         - diff_words->current_plus, diff_words->current_plus,
1134                         line_prefix);
1135         }
1136         diff_words->minus.text.size = diff_words->plus.text.size = 0;
1137 }
1138
1139 /* In "color-words" mode, show word-diff of words accumulated in the buffer */
1140 static void diff_words_flush(struct emit_callback *ecbdata)
1141 {
1142         if (ecbdata->diff_words->minus.text.size ||
1143             ecbdata->diff_words->plus.text.size)
1144                 diff_words_show(ecbdata->diff_words);
1145 }
1146
1147 static void diff_filespec_load_driver(struct diff_filespec *one)
1148 {
1149         /* Use already-loaded driver */
1150         if (one->driver)
1151                 return;
1152
1153         if (S_ISREG(one->mode))
1154                 one->driver = userdiff_find_by_path(one->path);
1155
1156         /* Fallback to default settings */
1157         if (!one->driver)
1158                 one->driver = userdiff_find_by_name("default");
1159 }
1160
1161 static const char *userdiff_word_regex(struct diff_filespec *one)
1162 {
1163         diff_filespec_load_driver(one);
1164         return one->driver->word_regex;
1165 }
1166
1167 static void init_diff_words_data(struct emit_callback *ecbdata,
1168                                  struct diff_options *orig_opts,
1169                                  struct diff_filespec *one,
1170                                  struct diff_filespec *two)
1171 {
1172         int i;
1173         struct diff_options *o = xmalloc(sizeof(struct diff_options));
1174         memcpy(o, orig_opts, sizeof(struct diff_options));
1175
1176         ecbdata->diff_words =
1177                 xcalloc(1, sizeof(struct diff_words_data));
1178         ecbdata->diff_words->type = o->word_diff;
1179         ecbdata->diff_words->opt = o;
1180         if (!o->word_regex)
1181                 o->word_regex = userdiff_word_regex(one);
1182         if (!o->word_regex)
1183                 o->word_regex = userdiff_word_regex(two);
1184         if (!o->word_regex)
1185                 o->word_regex = diff_word_regex_cfg;
1186         if (o->word_regex) {
1187                 ecbdata->diff_words->word_regex = (regex_t *)
1188                         xmalloc(sizeof(regex_t));
1189                 if (regcomp(ecbdata->diff_words->word_regex,
1190                             o->word_regex,
1191                             REG_EXTENDED | REG_NEWLINE))
1192                         die ("Invalid regular expression: %s",
1193                              o->word_regex);
1194         }
1195         for (i = 0; i < ARRAY_SIZE(diff_words_styles); i++) {
1196                 if (o->word_diff == diff_words_styles[i].type) {
1197                         ecbdata->diff_words->style =
1198                                 &diff_words_styles[i];
1199                         break;
1200                 }
1201         }
1202         if (want_color(o->use_color)) {
1203                 struct diff_words_style *st = ecbdata->diff_words->style;
1204                 st->old.color = diff_get_color_opt(o, DIFF_FILE_OLD);
1205                 st->new.color = diff_get_color_opt(o, DIFF_FILE_NEW);
1206                 st->ctx.color = diff_get_color_opt(o, DIFF_CONTEXT);
1207         }
1208 }
1209
1210 static void free_diff_words_data(struct emit_callback *ecbdata)
1211 {
1212         if (ecbdata->diff_words) {
1213                 diff_words_flush(ecbdata);
1214                 free (ecbdata->diff_words->opt);
1215                 free (ecbdata->diff_words->minus.text.ptr);
1216                 free (ecbdata->diff_words->minus.orig);
1217                 free (ecbdata->diff_words->plus.text.ptr);
1218                 free (ecbdata->diff_words->plus.orig);
1219                 if (ecbdata->diff_words->word_regex) {
1220                         regfree(ecbdata->diff_words->word_regex);
1221                         free(ecbdata->diff_words->word_regex);
1222                 }
1223                 free(ecbdata->diff_words);
1224                 ecbdata->diff_words = NULL;
1225         }
1226 }
1227
1228 const char *diff_get_color(int diff_use_color, enum color_diff ix)
1229 {
1230         if (want_color(diff_use_color))
1231                 return diff_colors[ix];
1232         return "";
1233 }
1234
1235 const char *diff_line_prefix(struct diff_options *opt)
1236 {
1237         struct strbuf *msgbuf;
1238         if (!opt->output_prefix)
1239                 return "";
1240
1241         msgbuf = opt->output_prefix(opt, opt->output_prefix_data);
1242         return msgbuf->buf;
1243 }
1244
1245 static unsigned long sane_truncate_line(struct emit_callback *ecb, char *line, unsigned long len)
1246 {
1247         const char *cp;
1248         unsigned long allot;
1249         size_t l = len;
1250
1251         if (ecb->truncate)
1252                 return ecb->truncate(line, len);
1253         cp = line;
1254         allot = l;
1255         while (0 < l) {
1256                 (void) utf8_width(&cp, &l);
1257                 if (!cp)
1258                         break; /* truncated in the middle? */
1259         }
1260         return allot - l;
1261 }
1262
1263 static void find_lno(const char *line, struct emit_callback *ecbdata)
1264 {
1265         const char *p;
1266         ecbdata->lno_in_preimage = 0;
1267         ecbdata->lno_in_postimage = 0;
1268         p = strchr(line, '-');
1269         if (!p)
1270                 return; /* cannot happen */
1271         ecbdata->lno_in_preimage = strtol(p + 1, NULL, 10);
1272         p = strchr(p, '+');
1273         if (!p)
1274                 return; /* cannot happen */
1275         ecbdata->lno_in_postimage = strtol(p + 1, NULL, 10);
1276 }
1277
1278 static void fn_out_consume(void *priv, char *line, unsigned long len)
1279 {
1280         struct emit_callback *ecbdata = priv;
1281         const char *meta = diff_get_color(ecbdata->color_diff, DIFF_METAINFO);
1282         const char *context = diff_get_color(ecbdata->color_diff, DIFF_CONTEXT);
1283         const char *reset = diff_get_color(ecbdata->color_diff, DIFF_RESET);
1284         struct diff_options *o = ecbdata->opt;
1285         const char *line_prefix = diff_line_prefix(o);
1286
1287         o->found_changes = 1;
1288
1289         if (ecbdata->header) {
1290                 fprintf(o->file, "%s", ecbdata->header->buf);
1291                 strbuf_reset(ecbdata->header);
1292                 ecbdata->header = NULL;
1293         }
1294
1295         if (ecbdata->label_path[0]) {
1296                 const char *name_a_tab, *name_b_tab;
1297
1298                 name_a_tab = strchr(ecbdata->label_path[0], ' ') ? "\t" : "";
1299                 name_b_tab = strchr(ecbdata->label_path[1], ' ') ? "\t" : "";
1300
1301                 fprintf(o->file, "%s%s--- %s%s%s\n",
1302                         line_prefix, meta, ecbdata->label_path[0], reset, name_a_tab);
1303                 fprintf(o->file, "%s%s+++ %s%s%s\n",
1304                         line_prefix, meta, ecbdata->label_path[1], reset, name_b_tab);
1305                 ecbdata->label_path[0] = ecbdata->label_path[1] = NULL;
1306         }
1307
1308         if (diff_suppress_blank_empty
1309             && len == 2 && line[0] == ' ' && line[1] == '\n') {
1310                 line[0] = '\n';
1311                 len = 1;
1312         }
1313
1314         if (line[0] == '@') {
1315                 if (ecbdata->diff_words)
1316                         diff_words_flush(ecbdata);
1317                 len = sane_truncate_line(ecbdata, line, len);
1318                 find_lno(line, ecbdata);
1319                 emit_hunk_header(ecbdata, line, len);
1320                 if (line[len-1] != '\n')
1321                         putc('\n', o->file);
1322                 return;
1323         }
1324
1325         if (ecbdata->diff_words) {
1326                 if (line[0] == '-') {
1327                         diff_words_append(line, len,
1328                                           &ecbdata->diff_words->minus);
1329                         return;
1330                 } else if (line[0] == '+') {
1331                         diff_words_append(line, len,
1332                                           &ecbdata->diff_words->plus);
1333                         return;
1334                 } else if (starts_with(line, "\\ ")) {
1335                         /*
1336                          * Eat the "no newline at eof" marker as if we
1337                          * saw a "+" or "-" line with nothing on it,
1338                          * and return without diff_words_flush() to
1339                          * defer processing. If this is the end of
1340                          * preimage, more "+" lines may come after it.
1341                          */
1342                         return;
1343                 }
1344                 diff_words_flush(ecbdata);
1345                 if (ecbdata->diff_words->type == DIFF_WORDS_PORCELAIN) {
1346                         emit_line(o, context, reset, line, len);
1347                         fputs("~\n", o->file);
1348                 } else {
1349                         /*
1350                          * Skip the prefix character, if any.  With
1351                          * diff_suppress_blank_empty, there may be
1352                          * none.
1353                          */
1354                         if (line[0] != '\n') {
1355                               line++;
1356                               len--;
1357                         }
1358                         emit_line(o, context, reset, line, len);
1359                 }
1360                 return;
1361         }
1362
1363         switch (line[0]) {
1364         case '+':
1365                 ecbdata->lno_in_postimage++;
1366                 emit_add_line(reset, ecbdata, line + 1, len - 1);
1367                 break;
1368         case '-':
1369                 ecbdata->lno_in_preimage++;
1370                 emit_del_line(reset, ecbdata, line + 1, len - 1);
1371                 break;
1372         case ' ':
1373                 ecbdata->lno_in_postimage++;
1374                 ecbdata->lno_in_preimage++;
1375                 emit_context_line(reset, ecbdata, line + 1, len - 1);
1376                 break;
1377         default:
1378                 /* incomplete line at the end */
1379                 ecbdata->lno_in_preimage++;
1380                 emit_line(o, diff_get_color(ecbdata->color_diff, DIFF_CONTEXT),
1381                           reset, line, len);
1382                 break;
1383         }
1384 }
1385
1386 static char *pprint_rename(const char *a, const char *b)
1387 {
1388         const char *old = a;
1389         const char *new = b;
1390         struct strbuf name = STRBUF_INIT;
1391         int pfx_length, sfx_length;
1392         int pfx_adjust_for_slash;
1393         int len_a = strlen(a);
1394         int len_b = strlen(b);
1395         int a_midlen, b_midlen;
1396         int qlen_a = quote_c_style(a, NULL, NULL, 0);
1397         int qlen_b = quote_c_style(b, NULL, NULL, 0);
1398
1399         if (qlen_a || qlen_b) {
1400                 quote_c_style(a, &name, NULL, 0);
1401                 strbuf_addstr(&name, " => ");
1402                 quote_c_style(b, &name, NULL, 0);
1403                 return strbuf_detach(&name, NULL);
1404         }
1405
1406         /* Find common prefix */
1407         pfx_length = 0;
1408         while (*old && *new && *old == *new) {
1409                 if (*old == '/')
1410                         pfx_length = old - a + 1;
1411                 old++;
1412                 new++;
1413         }
1414
1415         /* Find common suffix */
1416         old = a + len_a;
1417         new = b + len_b;
1418         sfx_length = 0;
1419         /*
1420          * If there is a common prefix, it must end in a slash.  In
1421          * that case we let this loop run 1 into the prefix to see the
1422          * same slash.
1423          *
1424          * If there is no common prefix, we cannot do this as it would
1425          * underrun the input strings.
1426          */
1427         pfx_adjust_for_slash = (pfx_length ? 1 : 0);
1428         while (a + pfx_length - pfx_adjust_for_slash <= old &&
1429                b + pfx_length - pfx_adjust_for_slash <= new &&
1430                *old == *new) {
1431                 if (*old == '/')
1432                         sfx_length = len_a - (old - a);
1433                 old--;
1434                 new--;
1435         }
1436
1437         /*
1438          * pfx{mid-a => mid-b}sfx
1439          * {pfx-a => pfx-b}sfx
1440          * pfx{sfx-a => sfx-b}
1441          * name-a => name-b
1442          */
1443         a_midlen = len_a - pfx_length - sfx_length;
1444         b_midlen = len_b - pfx_length - sfx_length;
1445         if (a_midlen < 0)
1446                 a_midlen = 0;
1447         if (b_midlen < 0)
1448                 b_midlen = 0;
1449
1450         strbuf_grow(&name, pfx_length + a_midlen + b_midlen + sfx_length + 7);
1451         if (pfx_length + sfx_length) {
1452                 strbuf_add(&name, a, pfx_length);
1453                 strbuf_addch(&name, '{');
1454         }
1455         strbuf_add(&name, a + pfx_length, a_midlen);
1456         strbuf_addstr(&name, " => ");
1457         strbuf_add(&name, b + pfx_length, b_midlen);
1458         if (pfx_length + sfx_length) {
1459                 strbuf_addch(&name, '}');
1460                 strbuf_add(&name, a + len_a - sfx_length, sfx_length);
1461         }
1462         return strbuf_detach(&name, NULL);
1463 }
1464
1465 struct diffstat_t {
1466         int nr;
1467         int alloc;
1468         struct diffstat_file {
1469                 char *from_name;
1470                 char *name;
1471                 char *print_name;
1472                 unsigned is_unmerged:1;
1473                 unsigned is_binary:1;
1474                 unsigned is_renamed:1;
1475                 unsigned is_interesting:1;
1476                 uintmax_t added, deleted;
1477         } **files;
1478 };
1479
1480 static struct diffstat_file *diffstat_add(struct diffstat_t *diffstat,
1481                                           const char *name_a,
1482                                           const char *name_b)
1483 {
1484         struct diffstat_file *x;
1485         x = xcalloc(1, sizeof(*x));
1486         ALLOC_GROW(diffstat->files, diffstat->nr + 1, diffstat->alloc);
1487         diffstat->files[diffstat->nr++] = x;
1488         if (name_b) {
1489                 x->from_name = xstrdup(name_a);
1490                 x->name = xstrdup(name_b);
1491                 x->is_renamed = 1;
1492         }
1493         else {
1494                 x->from_name = NULL;
1495                 x->name = xstrdup(name_a);
1496         }
1497         return x;
1498 }
1499
1500 static void diffstat_consume(void *priv, char *line, unsigned long len)
1501 {
1502         struct diffstat_t *diffstat = priv;
1503         struct diffstat_file *x = diffstat->files[diffstat->nr - 1];
1504
1505         if (line[0] == '+')
1506                 x->added++;
1507         else if (line[0] == '-')
1508                 x->deleted++;
1509 }
1510
1511 const char mime_boundary_leader[] = "------------";
1512
1513 static int scale_linear(int it, int width, int max_change)
1514 {
1515         if (!it)
1516                 return 0;
1517         /*
1518          * make sure that at least one '-' or '+' is printed if
1519          * there is any change to this path. The easiest way is to
1520          * scale linearly as if the alloted width is one column shorter
1521          * than it is, and then add 1 to the result.
1522          */
1523         return 1 + (it * (width - 1) / max_change);
1524 }
1525
1526 static void show_name(FILE *file,
1527                       const char *prefix, const char *name, int len)
1528 {
1529         fprintf(file, " %s%-*s |", prefix, len, name);
1530 }
1531
1532 static void show_graph(FILE *file, char ch, int cnt, const char *set, const char *reset)
1533 {
1534         if (cnt <= 0)
1535                 return;
1536         fprintf(file, "%s", set);
1537         while (cnt--)
1538                 putc(ch, file);
1539         fprintf(file, "%s", reset);
1540 }
1541
1542 static void fill_print_name(struct diffstat_file *file)
1543 {
1544         char *pname;
1545
1546         if (file->print_name)
1547                 return;
1548
1549         if (!file->is_renamed) {
1550                 struct strbuf buf = STRBUF_INIT;
1551                 if (quote_c_style(file->name, &buf, NULL, 0)) {
1552                         pname = strbuf_detach(&buf, NULL);
1553                 } else {
1554                         pname = file->name;
1555                         strbuf_release(&buf);
1556                 }
1557         } else {
1558                 pname = pprint_rename(file->from_name, file->name);
1559         }
1560         file->print_name = pname;
1561 }
1562
1563 int print_stat_summary(FILE *fp, int files, int insertions, int deletions)
1564 {
1565         struct strbuf sb = STRBUF_INIT;
1566         int ret;
1567
1568         if (!files) {
1569                 assert(insertions == 0 && deletions == 0);
1570                 return fprintf(fp, "%s\n", " 0 files changed");
1571         }
1572
1573         strbuf_addf(&sb,
1574                     (files == 1) ? " %d file changed" : " %d files changed",
1575                     files);
1576
1577         /*
1578          * For binary diff, the caller may want to print "x files
1579          * changed" with insertions == 0 && deletions == 0.
1580          *
1581          * Not omitting "0 insertions(+), 0 deletions(-)" in this case
1582          * is probably less confusing (i.e skip over "2 files changed
1583          * but nothing about added/removed lines? Is this a bug in Git?").
1584          */
1585         if (insertions || deletions == 0) {
1586                 strbuf_addf(&sb,
1587                             (insertions == 1) ? ", %d insertion(+)" : ", %d insertions(+)",
1588                             insertions);
1589         }
1590
1591         if (deletions || insertions == 0) {
1592                 strbuf_addf(&sb,
1593                             (deletions == 1) ? ", %d deletion(-)" : ", %d deletions(-)",
1594                             deletions);
1595         }
1596         strbuf_addch(&sb, '\n');
1597         ret = fputs(sb.buf, fp);
1598         strbuf_release(&sb);
1599         return ret;
1600 }
1601
1602 static void show_stats(struct diffstat_t *data, struct diff_options *options)
1603 {
1604         int i, len, add, del, adds = 0, dels = 0;
1605         uintmax_t max_change = 0, max_len = 0;
1606         int total_files = data->nr, count;
1607         int width, name_width, graph_width, number_width = 0, bin_width = 0;
1608         const char *reset, *add_c, *del_c;
1609         const char *line_prefix = "";
1610         int extra_shown = 0;
1611
1612         if (data->nr == 0)
1613                 return;
1614
1615         line_prefix = diff_line_prefix(options);
1616         count = options->stat_count ? options->stat_count : data->nr;
1617
1618         reset = diff_get_color_opt(options, DIFF_RESET);
1619         add_c = diff_get_color_opt(options, DIFF_FILE_NEW);
1620         del_c = diff_get_color_opt(options, DIFF_FILE_OLD);
1621
1622         /*
1623          * Find the longest filename and max number of changes
1624          */
1625         for (i = 0; (i < count) && (i < data->nr); i++) {
1626                 struct diffstat_file *file = data->files[i];
1627                 uintmax_t change = file->added + file->deleted;
1628
1629                 if (!file->is_interesting && (change == 0)) {
1630                         count++; /* not shown == room for one more */
1631                         continue;
1632                 }
1633                 fill_print_name(file);
1634                 len = strlen(file->print_name);
1635                 if (max_len < len)
1636                         max_len = len;
1637
1638                 if (file->is_unmerged) {
1639                         /* "Unmerged" is 8 characters */
1640                         bin_width = bin_width < 8 ? 8 : bin_width;
1641                         continue;
1642                 }
1643                 if (file->is_binary) {
1644                         /* "Bin XXX -> YYY bytes" */
1645                         int w = 14 + decimal_width(file->added)
1646                                 + decimal_width(file->deleted);
1647                         bin_width = bin_width < w ? w : bin_width;
1648                         /* Display change counts aligned with "Bin" */
1649                         number_width = 3;
1650                         continue;
1651                 }
1652
1653                 if (max_change < change)
1654                         max_change = change;
1655         }
1656         count = i; /* where we can stop scanning in data->files[] */
1657
1658         /*
1659          * We have width = stat_width or term_columns() columns total.
1660          * We want a maximum of min(max_len, stat_name_width) for the name part.
1661          * We want a maximum of min(max_change, stat_graph_width) for the +- part.
1662          * We also need 1 for " " and 4 + decimal_width(max_change)
1663          * for " | NNNN " and one the empty column at the end, altogether
1664          * 6 + decimal_width(max_change).
1665          *
1666          * If there's not enough space, we will use the smaller of
1667          * stat_name_width (if set) and 5/8*width for the filename,
1668          * and the rest for constant elements + graph part, but no more
1669          * than stat_graph_width for the graph part.
1670          * (5/8 gives 50 for filename and 30 for the constant parts + graph
1671          * for the standard terminal size).
1672          *
1673          * In other words: stat_width limits the maximum width, and
1674          * stat_name_width fixes the maximum width of the filename,
1675          * and is also used to divide available columns if there
1676          * aren't enough.
1677          *
1678          * Binary files are displayed with "Bin XXX -> YYY bytes"
1679          * instead of the change count and graph. This part is treated
1680          * similarly to the graph part, except that it is not
1681          * "scaled". If total width is too small to accommodate the
1682          * guaranteed minimum width of the filename part and the
1683          * separators and this message, this message will "overflow"
1684          * making the line longer than the maximum width.
1685          */
1686
1687         if (options->stat_width == -1)
1688                 width = term_columns() - strlen(line_prefix);
1689         else
1690                 width = options->stat_width ? options->stat_width : 80;
1691         number_width = decimal_width(max_change) > number_width ?
1692                 decimal_width(max_change) : number_width;
1693
1694         if (options->stat_graph_width == -1)
1695                 options->stat_graph_width = diff_stat_graph_width;
1696
1697         /*
1698          * Guarantee 3/8*16==6 for the graph part
1699          * and 5/8*16==10 for the filename part
1700          */
1701         if (width < 16 + 6 + number_width)
1702                 width = 16 + 6 + number_width;
1703
1704         /*
1705          * First assign sizes that are wanted, ignoring available width.
1706          * strlen("Bin XXX -> YYY bytes") == bin_width, and the part
1707          * starting from "XXX" should fit in graph_width.
1708          */
1709         graph_width = max_change + 4 > bin_width ? max_change : bin_width - 4;
1710         if (options->stat_graph_width &&
1711             options->stat_graph_width < graph_width)
1712                 graph_width = options->stat_graph_width;
1713
1714         name_width = (options->stat_name_width > 0 &&
1715                       options->stat_name_width < max_len) ?
1716                 options->stat_name_width : max_len;
1717
1718         /*
1719          * Adjust adjustable widths not to exceed maximum width
1720          */
1721         if (name_width + number_width + 6 + graph_width > width) {
1722                 if (graph_width > width * 3/8 - number_width - 6) {
1723                         graph_width = width * 3/8 - number_width - 6;
1724                         if (graph_width < 6)
1725                                 graph_width = 6;
1726                 }
1727
1728                 if (options->stat_graph_width &&
1729                     graph_width > options->stat_graph_width)
1730                         graph_width = options->stat_graph_width;
1731                 if (name_width > width - number_width - 6 - graph_width)
1732                         name_width = width - number_width - 6 - graph_width;
1733                 else
1734                         graph_width = width - number_width - 6 - name_width;
1735         }
1736
1737         /*
1738          * From here name_width is the width of the name area,
1739          * and graph_width is the width of the graph area.
1740          * max_change is used to scale graph properly.
1741          */
1742         for (i = 0; i < count; i++) {
1743                 const char *prefix = "";
1744                 struct diffstat_file *file = data->files[i];
1745                 char *name = file->print_name;
1746                 uintmax_t added = file->added;
1747                 uintmax_t deleted = file->deleted;
1748                 int name_len;
1749
1750                 if (!file->is_interesting && (added + deleted == 0))
1751                         continue;
1752
1753                 /*
1754                  * "scale" the filename
1755                  */
1756                 len = name_width;
1757                 name_len = strlen(name);
1758                 if (name_width < name_len) {
1759                         char *slash;
1760                         prefix = "...";
1761                         len -= 3;
1762                         name += name_len - len;
1763                         slash = strchr(name, '/');
1764                         if (slash)
1765                                 name = slash;
1766                 }
1767
1768                 if (file->is_binary) {
1769                         fprintf(options->file, "%s", line_prefix);
1770                         show_name(options->file, prefix, name, len);
1771                         fprintf(options->file, " %*s", number_width, "Bin");
1772                         if (!added && !deleted) {
1773                                 putc('\n', options->file);
1774                                 continue;
1775                         }
1776                         fprintf(options->file, " %s%"PRIuMAX"%s",
1777                                 del_c, deleted, reset);
1778                         fprintf(options->file, " -> ");
1779                         fprintf(options->file, "%s%"PRIuMAX"%s",
1780                                 add_c, added, reset);
1781                         fprintf(options->file, " bytes");
1782                         fprintf(options->file, "\n");
1783                         continue;
1784                 }
1785                 else if (file->is_unmerged) {
1786                         fprintf(options->file, "%s", line_prefix);
1787                         show_name(options->file, prefix, name, len);
1788                         fprintf(options->file, " Unmerged\n");
1789                         continue;
1790                 }
1791
1792                 /*
1793                  * scale the add/delete
1794                  */
1795                 add = added;
1796                 del = deleted;
1797
1798                 if (graph_width <= max_change) {
1799                         int total = scale_linear(add + del, graph_width, max_change);
1800                         if (total < 2 && add && del)
1801                                 /* width >= 2 due to the sanity check */
1802                                 total = 2;
1803                         if (add < del) {
1804                                 add = scale_linear(add, graph_width, max_change);
1805                                 del = total - add;
1806                         } else {
1807                                 del = scale_linear(del, graph_width, max_change);
1808                                 add = total - del;
1809                         }
1810                 }
1811                 fprintf(options->file, "%s", line_prefix);
1812                 show_name(options->file, prefix, name, len);
1813                 fprintf(options->file, " %*"PRIuMAX"%s",
1814                         number_width, added + deleted,
1815                         added + deleted ? " " : "");
1816                 show_graph(options->file, '+', add, add_c, reset);
1817                 show_graph(options->file, '-', del, del_c, reset);
1818                 fprintf(options->file, "\n");
1819         }
1820
1821         for (i = 0; i < data->nr; i++) {
1822                 struct diffstat_file *file = data->files[i];
1823                 uintmax_t added = file->added;
1824                 uintmax_t deleted = file->deleted;
1825
1826                 if (file->is_unmerged ||
1827                     (!file->is_interesting && (added + deleted == 0))) {
1828                         total_files--;
1829                         continue;
1830                 }
1831
1832                 if (!file->is_binary) {
1833                         adds += added;
1834                         dels += deleted;
1835                 }
1836                 if (i < count)
1837                         continue;
1838                 if (!extra_shown)
1839                         fprintf(options->file, "%s ...\n", line_prefix);
1840                 extra_shown = 1;
1841         }
1842         fprintf(options->file, "%s", line_prefix);
1843         print_stat_summary(options->file, total_files, adds, dels);
1844 }
1845
1846 static void show_shortstats(struct diffstat_t *data, struct diff_options *options)
1847 {
1848         int i, adds = 0, dels = 0, total_files = data->nr;
1849
1850         if (data->nr == 0)
1851                 return;
1852
1853         for (i = 0; i < data->nr; i++) {
1854                 int added = data->files[i]->added;
1855                 int deleted= data->files[i]->deleted;
1856
1857                 if (data->files[i]->is_unmerged ||
1858                     (!data->files[i]->is_interesting && (added + deleted == 0))) {
1859                         total_files--;
1860                 } else if (!data->files[i]->is_binary) { /* don't count bytes */
1861                         adds += added;
1862                         dels += deleted;
1863                 }
1864         }
1865         fprintf(options->file, "%s", diff_line_prefix(options));
1866         print_stat_summary(options->file, total_files, adds, dels);
1867 }
1868
1869 static void show_numstat(struct diffstat_t *data, struct diff_options *options)
1870 {
1871         int i;
1872
1873         if (data->nr == 0)
1874                 return;
1875
1876         for (i = 0; i < data->nr; i++) {
1877                 struct diffstat_file *file = data->files[i];
1878
1879                 fprintf(options->file, "%s", diff_line_prefix(options));
1880
1881                 if (file->is_binary)
1882                         fprintf(options->file, "-\t-\t");
1883                 else
1884                         fprintf(options->file,
1885                                 "%"PRIuMAX"\t%"PRIuMAX"\t",
1886                                 file->added, file->deleted);
1887                 if (options->line_termination) {
1888                         fill_print_name(file);
1889                         if (!file->is_renamed)
1890                                 write_name_quoted(file->name, options->file,
1891                                                   options->line_termination);
1892                         else {
1893                                 fputs(file->print_name, options->file);
1894                                 putc(options->line_termination, options->file);
1895                         }
1896                 } else {
1897                         if (file->is_renamed) {
1898                                 putc('\0', options->file);
1899                                 write_name_quoted(file->from_name, options->file, '\0');
1900                         }
1901                         write_name_quoted(file->name, options->file, '\0');
1902                 }
1903         }
1904 }
1905
1906 struct dirstat_file {
1907         const char *name;
1908         unsigned long changed;
1909 };
1910
1911 struct dirstat_dir {
1912         struct dirstat_file *files;
1913         int alloc, nr, permille, cumulative;
1914 };
1915
1916 static long gather_dirstat(struct diff_options *opt, struct dirstat_dir *dir,
1917                 unsigned long changed, const char *base, int baselen)
1918 {
1919         unsigned long this_dir = 0;
1920         unsigned int sources = 0;
1921         const char *line_prefix = diff_line_prefix(opt);
1922
1923         while (dir->nr) {
1924                 struct dirstat_file *f = dir->files;
1925                 int namelen = strlen(f->name);
1926                 unsigned long this;
1927                 char *slash;
1928
1929                 if (namelen < baselen)
1930                         break;
1931                 if (memcmp(f->name, base, baselen))
1932                         break;
1933                 slash = strchr(f->name + baselen, '/');
1934                 if (slash) {
1935                         int newbaselen = slash + 1 - f->name;
1936                         this = gather_dirstat(opt, dir, changed, f->name, newbaselen);
1937                         sources++;
1938                 } else {
1939                         this = f->changed;
1940                         dir->files++;
1941                         dir->nr--;
1942                         sources += 2;
1943                 }
1944                 this_dir += this;
1945         }
1946
1947         /*
1948          * We don't report dirstat's for
1949          *  - the top level
1950          *  - or cases where everything came from a single directory
1951          *    under this directory (sources == 1).
1952          */
1953         if (baselen && sources != 1) {
1954                 if (this_dir) {
1955                         int permille = this_dir * 1000 / changed;
1956                         if (permille >= dir->permille) {
1957                                 fprintf(opt->file, "%s%4d.%01d%% %.*s\n", line_prefix,
1958                                         permille / 10, permille % 10, baselen, base);
1959                                 if (!dir->cumulative)
1960                                         return 0;
1961                         }
1962                 }
1963         }
1964         return this_dir;
1965 }
1966
1967 static int dirstat_compare(const void *_a, const void *_b)
1968 {
1969         const struct dirstat_file *a = _a;
1970         const struct dirstat_file *b = _b;
1971         return strcmp(a->name, b->name);
1972 }
1973
1974 static void show_dirstat(struct diff_options *options)
1975 {
1976         int i;
1977         unsigned long changed;
1978         struct dirstat_dir dir;
1979         struct diff_queue_struct *q = &diff_queued_diff;
1980
1981         dir.files = NULL;
1982         dir.alloc = 0;
1983         dir.nr = 0;
1984         dir.permille = options->dirstat_permille;
1985         dir.cumulative = DIFF_OPT_TST(options, DIRSTAT_CUMULATIVE);
1986
1987         changed = 0;
1988         for (i = 0; i < q->nr; i++) {
1989                 struct diff_filepair *p = q->queue[i];
1990                 const char *name;
1991                 unsigned long copied, added, damage;
1992                 int content_changed;
1993
1994                 name = p->two->path ? p->two->path : p->one->path;
1995
1996                 if (p->one->oid_valid && p->two->oid_valid)
1997                         content_changed = oidcmp(&p->one->oid, &p->two->oid);
1998                 else
1999                         content_changed = 1;
2000
2001                 if (!content_changed) {
2002                         /*
2003                          * The SHA1 has not changed, so pre-/post-content is
2004                          * identical. We can therefore skip looking at the
2005                          * file contents altogether.
2006                          */
2007                         damage = 0;
2008                         goto found_damage;
2009                 }
2010
2011                 if (DIFF_OPT_TST(options, DIRSTAT_BY_FILE)) {
2012                         /*
2013                          * In --dirstat-by-file mode, we don't really need to
2014                          * look at the actual file contents at all.
2015                          * The fact that the SHA1 changed is enough for us to
2016                          * add this file to the list of results
2017                          * (with each file contributing equal damage).
2018                          */
2019                         damage = 1;
2020                         goto found_damage;
2021                 }
2022
2023                 if (DIFF_FILE_VALID(p->one) && DIFF_FILE_VALID(p->two)) {
2024                         diff_populate_filespec(p->one, 0);
2025                         diff_populate_filespec(p->two, 0);
2026                         diffcore_count_changes(p->one, p->two, NULL, NULL, 0,
2027                                                &copied, &added);
2028                         diff_free_filespec_data(p->one);
2029                         diff_free_filespec_data(p->two);
2030                 } else if (DIFF_FILE_VALID(p->one)) {
2031                         diff_populate_filespec(p->one, CHECK_SIZE_ONLY);
2032                         copied = added = 0;
2033                         diff_free_filespec_data(p->one);
2034                 } else if (DIFF_FILE_VALID(p->two)) {
2035                         diff_populate_filespec(p->two, CHECK_SIZE_ONLY);
2036                         copied = 0;
2037                         added = p->two->size;
2038                         diff_free_filespec_data(p->two);
2039                 } else
2040                         continue;
2041
2042                 /*
2043                  * Original minus copied is the removed material,
2044                  * added is the new material.  They are both damages
2045                  * made to the preimage.
2046                  * If the resulting damage is zero, we know that
2047                  * diffcore_count_changes() considers the two entries to
2048                  * be identical, but since content_changed is true, we
2049                  * know that there must have been _some_ kind of change,
2050                  * so we force all entries to have damage > 0.
2051                  */
2052                 damage = (p->one->size - copied) + added;
2053                 if (!damage)
2054                         damage = 1;
2055
2056 found_damage:
2057                 ALLOC_GROW(dir.files, dir.nr + 1, dir.alloc);
2058                 dir.files[dir.nr].name = name;
2059                 dir.files[dir.nr].changed = damage;
2060                 changed += damage;
2061                 dir.nr++;
2062         }
2063
2064         /* This can happen even with many files, if everything was renames */
2065         if (!changed)
2066                 return;
2067
2068         /* Show all directories with more than x% of the changes */
2069         QSORT(dir.files, dir.nr, dirstat_compare);
2070         gather_dirstat(options, &dir, changed, "", 0);
2071 }
2072
2073 static void show_dirstat_by_line(struct diffstat_t *data, struct diff_options *options)
2074 {
2075         int i;
2076         unsigned long changed;
2077         struct dirstat_dir dir;
2078
2079         if (data->nr == 0)
2080                 return;
2081
2082         dir.files = NULL;
2083         dir.alloc = 0;
2084         dir.nr = 0;
2085         dir.permille = options->dirstat_permille;
2086         dir.cumulative = DIFF_OPT_TST(options, DIRSTAT_CUMULATIVE);
2087
2088         changed = 0;
2089         for (i = 0; i < data->nr; i++) {
2090                 struct diffstat_file *file = data->files[i];
2091                 unsigned long damage = file->added + file->deleted;
2092                 if (file->is_binary)
2093                         /*
2094                          * binary files counts bytes, not lines. Must find some
2095                          * way to normalize binary bytes vs. textual lines.
2096                          * The following heuristic assumes that there are 64
2097                          * bytes per "line".
2098                          * This is stupid and ugly, but very cheap...
2099                          */
2100                         damage = (damage + 63) / 64;
2101                 ALLOC_GROW(dir.files, dir.nr + 1, dir.alloc);
2102                 dir.files[dir.nr].name = file->name;
2103                 dir.files[dir.nr].changed = damage;
2104                 changed += damage;
2105                 dir.nr++;
2106         }
2107
2108         /* This can happen even with many files, if everything was renames */
2109         if (!changed)
2110                 return;
2111
2112         /* Show all directories with more than x% of the changes */
2113         QSORT(dir.files, dir.nr, dirstat_compare);
2114         gather_dirstat(options, &dir, changed, "", 0);
2115 }
2116
2117 static void free_diffstat_info(struct diffstat_t *diffstat)
2118 {
2119         int i;
2120         for (i = 0; i < diffstat->nr; i++) {
2121                 struct diffstat_file *f = diffstat->files[i];
2122                 if (f->name != f->print_name)
2123                         free(f->print_name);
2124                 free(f->name);
2125                 free(f->from_name);
2126                 free(f);
2127         }
2128         free(diffstat->files);
2129 }
2130
2131 struct checkdiff_t {
2132         const char *filename;
2133         int lineno;
2134         int conflict_marker_size;
2135         struct diff_options *o;
2136         unsigned ws_rule;
2137         unsigned status;
2138 };
2139
2140 static int is_conflict_marker(const char *line, int marker_size, unsigned long len)
2141 {
2142         char firstchar;
2143         int cnt;
2144
2145         if (len < marker_size + 1)
2146                 return 0;
2147         firstchar = line[0];
2148         switch (firstchar) {
2149         case '=': case '>': case '<': case '|':
2150                 break;
2151         default:
2152                 return 0;
2153         }
2154         for (cnt = 1; cnt < marker_size; cnt++)
2155                 if (line[cnt] != firstchar)
2156                         return 0;
2157         /* line[1] thru line[marker_size-1] are same as firstchar */
2158         if (len < marker_size + 1 || !isspace(line[marker_size]))
2159                 return 0;
2160         return 1;
2161 }
2162
2163 static void checkdiff_consume(void *priv, char *line, unsigned long len)
2164 {
2165         struct checkdiff_t *data = priv;
2166         int marker_size = data->conflict_marker_size;
2167         const char *ws = diff_get_color(data->o->use_color, DIFF_WHITESPACE);
2168         const char *reset = diff_get_color(data->o->use_color, DIFF_RESET);
2169         const char *set = diff_get_color(data->o->use_color, DIFF_FILE_NEW);
2170         char *err;
2171         const char *line_prefix;
2172
2173         assert(data->o);
2174         line_prefix = diff_line_prefix(data->o);
2175
2176         if (line[0] == '+') {
2177                 unsigned bad;
2178                 data->lineno++;
2179                 if (is_conflict_marker(line + 1, marker_size, len - 1)) {
2180                         data->status |= 1;
2181                         fprintf(data->o->file,
2182                                 "%s%s:%d: leftover conflict marker\n",
2183                                 line_prefix, data->filename, data->lineno);
2184                 }
2185                 bad = ws_check(line + 1, len - 1, data->ws_rule);
2186                 if (!bad)
2187                         return;
2188                 data->status |= bad;
2189                 err = whitespace_error_string(bad);
2190                 fprintf(data->o->file, "%s%s:%d: %s.\n",
2191                         line_prefix, data->filename, data->lineno, err);
2192                 free(err);
2193                 emit_line(data->o, set, reset, line, 1);
2194                 ws_check_emit(line + 1, len - 1, data->ws_rule,
2195                               data->o->file, set, reset, ws);
2196         } else if (line[0] == ' ') {
2197                 data->lineno++;
2198         } else if (line[0] == '@') {
2199                 char *plus = strchr(line, '+');
2200                 if (plus)
2201                         data->lineno = strtol(plus, NULL, 10) - 1;
2202                 else
2203                         die("invalid diff");
2204         }
2205 }
2206
2207 static unsigned char *deflate_it(char *data,
2208                                  unsigned long size,
2209                                  unsigned long *result_size)
2210 {
2211         int bound;
2212         unsigned char *deflated;
2213         git_zstream stream;
2214
2215         git_deflate_init(&stream, zlib_compression_level);
2216         bound = git_deflate_bound(&stream, size);
2217         deflated = xmalloc(bound);
2218         stream.next_out = deflated;
2219         stream.avail_out = bound;
2220
2221         stream.next_in = (unsigned char *)data;
2222         stream.avail_in = size;
2223         while (git_deflate(&stream, Z_FINISH) == Z_OK)
2224                 ; /* nothing */
2225         git_deflate_end(&stream);
2226         *result_size = stream.total_out;
2227         return deflated;
2228 }
2229
2230 static void emit_binary_diff_body(FILE *file, mmfile_t *one, mmfile_t *two,
2231                                   const char *prefix)
2232 {
2233         void *cp;
2234         void *delta;
2235         void *deflated;
2236         void *data;
2237         unsigned long orig_size;
2238         unsigned long delta_size;
2239         unsigned long deflate_size;
2240         unsigned long data_size;
2241
2242         /* We could do deflated delta, or we could do just deflated two,
2243          * whichever is smaller.
2244          */
2245         delta = NULL;
2246         deflated = deflate_it(two->ptr, two->size, &deflate_size);
2247         if (one->size && two->size) {
2248                 delta = diff_delta(one->ptr, one->size,
2249                                    two->ptr, two->size,
2250                                    &delta_size, deflate_size);
2251                 if (delta) {
2252                         void *to_free = delta;
2253                         orig_size = delta_size;
2254                         delta = deflate_it(delta, delta_size, &delta_size);
2255                         free(to_free);
2256                 }
2257         }
2258
2259         if (delta && delta_size < deflate_size) {
2260                 fprintf(file, "%sdelta %lu\n", prefix, orig_size);
2261                 free(deflated);
2262                 data = delta;
2263                 data_size = delta_size;
2264         }
2265         else {
2266                 fprintf(file, "%sliteral %lu\n", prefix, two->size);
2267                 free(delta);
2268                 data = deflated;
2269                 data_size = deflate_size;
2270         }
2271
2272         /* emit data encoded in base85 */
2273         cp = data;
2274         while (data_size) {
2275                 int bytes = (52 < data_size) ? 52 : data_size;
2276                 char line[70];
2277                 data_size -= bytes;
2278                 if (bytes <= 26)
2279                         line[0] = bytes + 'A' - 1;
2280                 else
2281                         line[0] = bytes - 26 + 'a' - 1;
2282                 encode_85(line + 1, cp, bytes);
2283                 cp = (char *) cp + bytes;
2284                 fprintf(file, "%s", prefix);
2285                 fputs(line, file);
2286                 fputc('\n', file);
2287         }
2288         fprintf(file, "%s\n", prefix);
2289         free(data);
2290 }
2291
2292 static void emit_binary_diff(FILE *file, mmfile_t *one, mmfile_t *two,
2293                              const char *prefix)
2294 {
2295         fprintf(file, "%sGIT binary patch\n", prefix);
2296         emit_binary_diff_body(file, one, two, prefix);
2297         emit_binary_diff_body(file, two, one, prefix);
2298 }
2299
2300 int diff_filespec_is_binary(struct diff_filespec *one)
2301 {
2302         if (one->is_binary == -1) {
2303                 diff_filespec_load_driver(one);
2304                 if (one->driver->binary != -1)
2305                         one->is_binary = one->driver->binary;
2306                 else {
2307                         if (!one->data && DIFF_FILE_VALID(one))
2308                                 diff_populate_filespec(one, CHECK_BINARY);
2309                         if (one->is_binary == -1 && one->data)
2310                                 one->is_binary = buffer_is_binary(one->data,
2311                                                 one->size);
2312                         if (one->is_binary == -1)
2313                                 one->is_binary = 0;
2314                 }
2315         }
2316         return one->is_binary;
2317 }
2318
2319 static const struct userdiff_funcname *diff_funcname_pattern(struct diff_filespec *one)
2320 {
2321         diff_filespec_load_driver(one);
2322         return one->driver->funcname.pattern ? &one->driver->funcname : NULL;
2323 }
2324
2325 void diff_set_mnemonic_prefix(struct diff_options *options, const char *a, const char *b)
2326 {
2327         if (!options->a_prefix)
2328                 options->a_prefix = a;
2329         if (!options->b_prefix)
2330                 options->b_prefix = b;
2331 }
2332
2333 struct userdiff_driver *get_textconv(struct diff_filespec *one)
2334 {
2335         if (!DIFF_FILE_VALID(one))
2336                 return NULL;
2337
2338         diff_filespec_load_driver(one);
2339         return userdiff_get_textconv(one->driver);
2340 }
2341
2342 static void builtin_diff(const char *name_a,
2343                          const char *name_b,
2344                          struct diff_filespec *one,
2345                          struct diff_filespec *two,
2346                          const char *xfrm_msg,
2347                          int must_show_header,
2348                          struct diff_options *o,
2349                          int complete_rewrite)
2350 {
2351         mmfile_t mf1, mf2;
2352         const char *lbl[2];
2353         char *a_one, *b_two;
2354         const char *meta = diff_get_color_opt(o, DIFF_METAINFO);
2355         const char *reset = diff_get_color_opt(o, DIFF_RESET);
2356         const char *a_prefix, *b_prefix;
2357         struct userdiff_driver *textconv_one = NULL;
2358         struct userdiff_driver *textconv_two = NULL;
2359         struct strbuf header = STRBUF_INIT;
2360         const char *line_prefix = diff_line_prefix(o);
2361
2362         diff_set_mnemonic_prefix(o, "a/", "b/");
2363         if (DIFF_OPT_TST(o, REVERSE_DIFF)) {
2364                 a_prefix = o->b_prefix;
2365                 b_prefix = o->a_prefix;
2366         } else {
2367                 a_prefix = o->a_prefix;
2368                 b_prefix = o->b_prefix;
2369         }
2370
2371         if (o->submodule_format == DIFF_SUBMODULE_LOG &&
2372             (!one->mode || S_ISGITLINK(one->mode)) &&
2373             (!two->mode || S_ISGITLINK(two->mode))) {
2374                 const char *del = diff_get_color_opt(o, DIFF_FILE_OLD);
2375                 const char *add = diff_get_color_opt(o, DIFF_FILE_NEW);
2376                 show_submodule_summary(o->file, one->path ? one->path : two->path,
2377                                 line_prefix,
2378                                 &one->oid, &two->oid,
2379                                 two->dirty_submodule,
2380                                 meta, del, add, reset);
2381                 return;
2382         } else if (o->submodule_format == DIFF_SUBMODULE_INLINE_DIFF &&
2383                    (!one->mode || S_ISGITLINK(one->mode)) &&
2384                    (!two->mode || S_ISGITLINK(two->mode))) {
2385                 const char *del = diff_get_color_opt(o, DIFF_FILE_OLD);
2386                 const char *add = diff_get_color_opt(o, DIFF_FILE_NEW);
2387                 show_submodule_inline_diff(o->file, one->path ? one->path : two->path,
2388                                 line_prefix,
2389                                 &one->oid, &two->oid,
2390                                 two->dirty_submodule,
2391                                 meta, del, add, reset, o);
2392                 return;
2393         }
2394
2395         if (DIFF_OPT_TST(o, ALLOW_TEXTCONV)) {
2396                 textconv_one = get_textconv(one);
2397                 textconv_two = get_textconv(two);
2398         }
2399
2400         /* Never use a non-valid filename anywhere if at all possible */
2401         name_a = DIFF_FILE_VALID(one) ? name_a : name_b;
2402         name_b = DIFF_FILE_VALID(two) ? name_b : name_a;
2403
2404         a_one = quote_two(a_prefix, name_a + (*name_a == '/'));
2405         b_two = quote_two(b_prefix, name_b + (*name_b == '/'));
2406         lbl[0] = DIFF_FILE_VALID(one) ? a_one : "/dev/null";
2407         lbl[1] = DIFF_FILE_VALID(two) ? b_two : "/dev/null";
2408         strbuf_addf(&header, "%s%sdiff --git %s %s%s\n", line_prefix, meta, a_one, b_two, reset);
2409         if (lbl[0][0] == '/') {
2410                 /* /dev/null */
2411                 strbuf_addf(&header, "%s%snew file mode %06o%s\n", line_prefix, meta, two->mode, reset);
2412                 if (xfrm_msg)
2413                         strbuf_addstr(&header, xfrm_msg);
2414                 must_show_header = 1;
2415         }
2416         else if (lbl[1][0] == '/') {
2417                 strbuf_addf(&header, "%s%sdeleted file mode %06o%s\n", line_prefix, meta, one->mode, reset);
2418                 if (xfrm_msg)
2419                         strbuf_addstr(&header, xfrm_msg);
2420                 must_show_header = 1;
2421         }
2422         else {
2423                 if (one->mode != two->mode) {
2424                         strbuf_addf(&header, "%s%sold mode %06o%s\n", line_prefix, meta, one->mode, reset);
2425                         strbuf_addf(&header, "%s%snew mode %06o%s\n", line_prefix, meta, two->mode, reset);
2426                         must_show_header = 1;
2427                 }
2428                 if (xfrm_msg)
2429                         strbuf_addstr(&header, xfrm_msg);
2430
2431                 /*
2432                  * we do not run diff between different kind
2433                  * of objects.
2434                  */
2435                 if ((one->mode ^ two->mode) & S_IFMT)
2436                         goto free_ab_and_return;
2437                 if (complete_rewrite &&
2438                     (textconv_one || !diff_filespec_is_binary(one)) &&
2439                     (textconv_two || !diff_filespec_is_binary(two))) {
2440                         fprintf(o->file, "%s", header.buf);
2441                         strbuf_reset(&header);
2442                         emit_rewrite_diff(name_a, name_b, one, two,
2443                                                 textconv_one, textconv_two, o);
2444                         o->found_changes = 1;
2445                         goto free_ab_and_return;
2446                 }
2447         }
2448
2449         if (o->irreversible_delete && lbl[1][0] == '/') {
2450                 fprintf(o->file, "%s", header.buf);
2451                 strbuf_reset(&header);
2452                 goto free_ab_and_return;
2453         } else if (!DIFF_OPT_TST(o, TEXT) &&
2454             ( (!textconv_one && diff_filespec_is_binary(one)) ||
2455               (!textconv_two && diff_filespec_is_binary(two)) )) {
2456                 if (!one->data && !two->data &&
2457                     S_ISREG(one->mode) && S_ISREG(two->mode) &&
2458                     !DIFF_OPT_TST(o, BINARY)) {
2459                         if (!oidcmp(&one->oid, &two->oid)) {
2460                                 if (must_show_header)
2461                                         fprintf(o->file, "%s", header.buf);
2462                                 goto free_ab_and_return;
2463                         }
2464                         fprintf(o->file, "%s", header.buf);
2465                         fprintf(o->file, "%sBinary files %s and %s differ\n",
2466                                 line_prefix, lbl[0], lbl[1]);
2467                         goto free_ab_and_return;
2468                 }
2469                 if (fill_mmfile(&mf1, one) < 0 || fill_mmfile(&mf2, two) < 0)
2470                         die("unable to read files to diff");
2471                 /* Quite common confusing case */
2472                 if (mf1.size == mf2.size &&
2473                     !memcmp(mf1.ptr, mf2.ptr, mf1.size)) {
2474                         if (must_show_header)
2475                                 fprintf(o->file, "%s", header.buf);
2476                         goto free_ab_and_return;
2477                 }
2478                 fprintf(o->file, "%s", header.buf);
2479                 strbuf_reset(&header);
2480                 if (DIFF_OPT_TST(o, BINARY))
2481                         emit_binary_diff(o->file, &mf1, &mf2, line_prefix);
2482                 else
2483                         fprintf(o->file, "%sBinary files %s and %s differ\n",
2484                                 line_prefix, lbl[0], lbl[1]);
2485                 o->found_changes = 1;
2486         } else {
2487                 /* Crazy xdl interfaces.. */
2488                 const char *diffopts = getenv("GIT_DIFF_OPTS");
2489                 const char *v;
2490                 xpparam_t xpp;
2491                 xdemitconf_t xecfg;
2492                 struct emit_callback ecbdata;
2493                 const struct userdiff_funcname *pe;
2494
2495                 if (must_show_header) {
2496                         fprintf(o->file, "%s", header.buf);
2497                         strbuf_reset(&header);
2498                 }
2499
2500                 mf1.size = fill_textconv(textconv_one, one, &mf1.ptr);
2501                 mf2.size = fill_textconv(textconv_two, two, &mf2.ptr);
2502
2503                 pe = diff_funcname_pattern(one);
2504                 if (!pe)
2505                         pe = diff_funcname_pattern(two);
2506
2507                 memset(&xpp, 0, sizeof(xpp));
2508                 memset(&xecfg, 0, sizeof(xecfg));
2509                 memset(&ecbdata, 0, sizeof(ecbdata));
2510                 ecbdata.label_path = lbl;
2511                 ecbdata.color_diff = want_color(o->use_color);
2512                 ecbdata.ws_rule = whitespace_rule(name_b);
2513                 if (ecbdata.ws_rule & WS_BLANK_AT_EOF)
2514                         check_blank_at_eof(&mf1, &mf2, &ecbdata);
2515                 ecbdata.opt = o;
2516                 ecbdata.header = header.len ? &header : NULL;
2517                 xpp.flags = o->xdl_opts;
2518                 xecfg.ctxlen = o->context;
2519                 xecfg.interhunkctxlen = o->interhunkcontext;
2520                 xecfg.flags = XDL_EMIT_FUNCNAMES;
2521                 if (DIFF_OPT_TST(o, FUNCCONTEXT))
2522                         xecfg.flags |= XDL_EMIT_FUNCCONTEXT;
2523                 if (pe)
2524                         xdiff_set_find_func(&xecfg, pe->pattern, pe->cflags);
2525                 if (!diffopts)
2526                         ;
2527                 else if (skip_prefix(diffopts, "--unified=", &v))
2528                         xecfg.ctxlen = strtoul(v, NULL, 10);
2529                 else if (skip_prefix(diffopts, "-u", &v))
2530                         xecfg.ctxlen = strtoul(v, NULL, 10);
2531                 if (o->word_diff)
2532                         init_diff_words_data(&ecbdata, o, one, two);
2533                 if (xdi_diff_outf(&mf1, &mf2, fn_out_consume, &ecbdata,
2534                                   &xpp, &xecfg))
2535                         die("unable to generate diff for %s", one->path);
2536                 if (o->word_diff)
2537                         free_diff_words_data(&ecbdata);
2538                 if (textconv_one)
2539                         free(mf1.ptr);
2540                 if (textconv_two)
2541                         free(mf2.ptr);
2542                 xdiff_clear_find_func(&xecfg);
2543         }
2544
2545  free_ab_and_return:
2546         strbuf_release(&header);
2547         diff_free_filespec_data(one);
2548         diff_free_filespec_data(two);
2549         free(a_one);
2550         free(b_two);
2551         return;
2552 }
2553
2554 static void builtin_diffstat(const char *name_a, const char *name_b,
2555                              struct diff_filespec *one,
2556                              struct diff_filespec *two,
2557                              struct diffstat_t *diffstat,
2558                              struct diff_options *o,
2559                              struct diff_filepair *p)
2560 {
2561         mmfile_t mf1, mf2;
2562         struct diffstat_file *data;
2563         int same_contents;
2564         int complete_rewrite = 0;
2565
2566         if (!DIFF_PAIR_UNMERGED(p)) {
2567                 if (p->status == DIFF_STATUS_MODIFIED && p->score)
2568                         complete_rewrite = 1;
2569         }
2570
2571         data = diffstat_add(diffstat, name_a, name_b);
2572         data->is_interesting = p->status != DIFF_STATUS_UNKNOWN;
2573
2574         if (!one || !two) {
2575                 data->is_unmerged = 1;
2576                 return;
2577         }
2578
2579         same_contents = !oidcmp(&one->oid, &two->oid);
2580
2581         if (diff_filespec_is_binary(one) || diff_filespec_is_binary(two)) {
2582                 data->is_binary = 1;
2583                 if (same_contents) {
2584                         data->added = 0;
2585                         data->deleted = 0;
2586                 } else {
2587                         data->added = diff_filespec_size(two);
2588                         data->deleted = diff_filespec_size(one);
2589                 }
2590         }
2591
2592         else if (complete_rewrite) {
2593                 diff_populate_filespec(one, 0);
2594                 diff_populate_filespec(two, 0);
2595                 data->deleted = count_lines(one->data, one->size);
2596                 data->added = count_lines(two->data, two->size);
2597         }
2598
2599         else if (!same_contents) {
2600                 /* Crazy xdl interfaces.. */
2601                 xpparam_t xpp;
2602                 xdemitconf_t xecfg;
2603
2604                 if (fill_mmfile(&mf1, one) < 0 || fill_mmfile(&mf2, two) < 0)
2605                         die("unable to read files to diff");
2606
2607                 memset(&xpp, 0, sizeof(xpp));
2608                 memset(&xecfg, 0, sizeof(xecfg));
2609                 xpp.flags = o->xdl_opts;
2610                 xecfg.ctxlen = o->context;
2611                 xecfg.interhunkctxlen = o->interhunkcontext;
2612                 if (xdi_diff_outf(&mf1, &mf2, diffstat_consume, diffstat,
2613                                   &xpp, &xecfg))
2614                         die("unable to generate diffstat for %s", one->path);
2615         }
2616
2617         diff_free_filespec_data(one);
2618         diff_free_filespec_data(two);
2619 }
2620
2621 static void builtin_checkdiff(const char *name_a, const char *name_b,
2622                               const char *attr_path,
2623                               struct diff_filespec *one,
2624                               struct diff_filespec *two,
2625                               struct diff_options *o)
2626 {
2627         mmfile_t mf1, mf2;
2628         struct checkdiff_t data;
2629
2630         if (!two)
2631                 return;
2632
2633         memset(&data, 0, sizeof(data));
2634         data.filename = name_b ? name_b : name_a;
2635         data.lineno = 0;
2636         data.o = o;
2637         data.ws_rule = whitespace_rule(attr_path);
2638         data.conflict_marker_size = ll_merge_marker_size(attr_path);
2639
2640         if (fill_mmfile(&mf1, one) < 0 || fill_mmfile(&mf2, two) < 0)
2641                 die("unable to read files to diff");
2642
2643         /*
2644          * All the other codepaths check both sides, but not checking
2645          * the "old" side here is deliberate.  We are checking the newly
2646          * introduced changes, and as long as the "new" side is text, we
2647          * can and should check what it introduces.
2648          */
2649         if (diff_filespec_is_binary(two))
2650                 goto free_and_return;
2651         else {
2652                 /* Crazy xdl interfaces.. */
2653                 xpparam_t xpp;
2654                 xdemitconf_t xecfg;
2655
2656                 memset(&xpp, 0, sizeof(xpp));
2657                 memset(&xecfg, 0, sizeof(xecfg));
2658                 xecfg.ctxlen = 1; /* at least one context line */
2659                 xpp.flags = 0;
2660                 if (xdi_diff_outf(&mf1, &mf2, checkdiff_consume, &data,
2661                                   &xpp, &xecfg))
2662                         die("unable to generate checkdiff for %s", one->path);
2663
2664                 if (data.ws_rule & WS_BLANK_AT_EOF) {
2665                         struct emit_callback ecbdata;
2666                         int blank_at_eof;
2667
2668                         ecbdata.ws_rule = data.ws_rule;
2669                         check_blank_at_eof(&mf1, &mf2, &ecbdata);
2670                         blank_at_eof = ecbdata.blank_at_eof_in_postimage;
2671
2672                         if (blank_at_eof) {
2673                                 static char *err;
2674                                 if (!err)
2675                                         err = whitespace_error_string(WS_BLANK_AT_EOF);
2676                                 fprintf(o->file, "%s:%d: %s.\n",
2677                                         data.filename, blank_at_eof, err);
2678                                 data.status = 1; /* report errors */
2679                         }
2680                 }
2681         }
2682  free_and_return:
2683         diff_free_filespec_data(one);
2684         diff_free_filespec_data(two);
2685         if (data.status)
2686                 DIFF_OPT_SET(o, CHECK_FAILED);
2687 }
2688
2689 struct diff_filespec *alloc_filespec(const char *path)
2690 {
2691         struct diff_filespec *spec;
2692
2693         FLEXPTR_ALLOC_STR(spec, path, path);
2694         spec->count = 1;
2695         spec->is_binary = -1;
2696         return spec;
2697 }
2698
2699 void free_filespec(struct diff_filespec *spec)
2700 {
2701         if (!--spec->count) {
2702                 diff_free_filespec_data(spec);
2703                 free(spec);
2704         }
2705 }
2706
2707 void fill_filespec(struct diff_filespec *spec, const unsigned char *sha1,
2708                    int sha1_valid, unsigned short mode)
2709 {
2710         if (mode) {
2711                 spec->mode = canon_mode(mode);
2712                 hashcpy(spec->oid.hash, sha1);
2713                 spec->oid_valid = sha1_valid;
2714         }
2715 }
2716
2717 /*
2718  * Given a name and sha1 pair, if the index tells us the file in
2719  * the work tree has that object contents, return true, so that
2720  * prepare_temp_file() does not have to inflate and extract.
2721  */
2722 static int reuse_worktree_file(const char *name, const unsigned char *sha1, int want_file)
2723 {
2724         const struct cache_entry *ce;
2725         struct stat st;
2726         int pos, len;
2727
2728         /*
2729          * We do not read the cache ourselves here, because the
2730          * benchmark with my previous version that always reads cache
2731          * shows that it makes things worse for diff-tree comparing
2732          * two linux-2.6 kernel trees in an already checked out work
2733          * tree.  This is because most diff-tree comparisons deal with
2734          * only a small number of files, while reading the cache is
2735          * expensive for a large project, and its cost outweighs the
2736          * savings we get by not inflating the object to a temporary
2737          * file.  Practically, this code only helps when we are used
2738          * by diff-cache --cached, which does read the cache before
2739          * calling us.
2740          */
2741         if (!active_cache)
2742                 return 0;
2743
2744         /* We want to avoid the working directory if our caller
2745          * doesn't need the data in a normal file, this system
2746          * is rather slow with its stat/open/mmap/close syscalls,
2747          * and the object is contained in a pack file.  The pack
2748          * is probably already open and will be faster to obtain
2749          * the data through than the working directory.  Loose
2750          * objects however would tend to be slower as they need
2751          * to be individually opened and inflated.
2752          */
2753         if (!FAST_WORKING_DIRECTORY && !want_file && has_sha1_pack(sha1))
2754                 return 0;
2755
2756         /*
2757          * Similarly, if we'd have to convert the file contents anyway, that
2758          * makes the optimization not worthwhile.
2759          */
2760         if (!want_file && would_convert_to_git(name))
2761                 return 0;
2762
2763         len = strlen(name);
2764         pos = cache_name_pos(name, len);
2765         if (pos < 0)
2766                 return 0;
2767         ce = active_cache[pos];
2768
2769         /*
2770          * This is not the sha1 we are looking for, or
2771          * unreusable because it is not a regular file.
2772          */
2773         if (hashcmp(sha1, ce->oid.hash) || !S_ISREG(ce->ce_mode))
2774                 return 0;
2775
2776         /*
2777          * If ce is marked as "assume unchanged", there is no
2778          * guarantee that work tree matches what we are looking for.
2779          */
2780         if ((ce->ce_flags & CE_VALID) || ce_skip_worktree(ce))
2781                 return 0;
2782
2783         /*
2784          * If ce matches the file in the work tree, we can reuse it.
2785          */
2786         if (ce_uptodate(ce) ||
2787             (!lstat(name, &st) && !ce_match_stat(ce, &st, 0)))
2788                 return 1;
2789
2790         return 0;
2791 }
2792
2793 static int diff_populate_gitlink(struct diff_filespec *s, int size_only)
2794 {
2795         struct strbuf buf = STRBUF_INIT;
2796         char *dirty = "";
2797
2798         /* Are we looking at the work tree? */
2799         if (s->dirty_submodule)
2800                 dirty = "-dirty";
2801
2802         strbuf_addf(&buf, "Subproject commit %s%s\n",
2803                     oid_to_hex(&s->oid), dirty);
2804         s->size = buf.len;
2805         if (size_only) {
2806                 s->data = NULL;
2807                 strbuf_release(&buf);
2808         } else {
2809                 s->data = strbuf_detach(&buf, NULL);
2810                 s->should_free = 1;
2811         }
2812         return 0;
2813 }
2814
2815 /*
2816  * While doing rename detection and pickaxe operation, we may need to
2817  * grab the data for the blob (or file) for our own in-core comparison.
2818  * diff_filespec has data and size fields for this purpose.
2819  */
2820 int diff_populate_filespec(struct diff_filespec *s, unsigned int flags)
2821 {
2822         int size_only = flags & CHECK_SIZE_ONLY;
2823         int err = 0;
2824         /*
2825          * demote FAIL to WARN to allow inspecting the situation
2826          * instead of refusing.
2827          */
2828         enum safe_crlf crlf_warn = (safe_crlf == SAFE_CRLF_FAIL
2829                                     ? SAFE_CRLF_WARN
2830                                     : safe_crlf);
2831
2832         if (!DIFF_FILE_VALID(s))
2833                 die("internal error: asking to populate invalid file.");
2834         if (S_ISDIR(s->mode))
2835                 return -1;
2836
2837         if (s->data)
2838                 return 0;
2839
2840         if (size_only && 0 < s->size)
2841                 return 0;
2842
2843         if (S_ISGITLINK(s->mode))
2844                 return diff_populate_gitlink(s, size_only);
2845
2846         if (!s->oid_valid ||
2847             reuse_worktree_file(s->path, s->oid.hash, 0)) {
2848                 struct strbuf buf = STRBUF_INIT;
2849                 struct stat st;
2850                 int fd;
2851
2852                 if (lstat(s->path, &st) < 0) {
2853                         if (errno == ENOENT) {
2854                         err_empty:
2855                                 err = -1;
2856                         empty:
2857                                 s->data = (char *)"";
2858                                 s->size = 0;
2859                                 return err;
2860                         }
2861                 }
2862                 s->size = xsize_t(st.st_size);
2863                 if (!s->size)
2864                         goto empty;
2865                 if (S_ISLNK(st.st_mode)) {
2866                         struct strbuf sb = STRBUF_INIT;
2867
2868                         if (strbuf_readlink(&sb, s->path, s->size))
2869                                 goto err_empty;
2870                         s->size = sb.len;
2871                         s->data = strbuf_detach(&sb, NULL);
2872                         s->should_free = 1;
2873                         return 0;
2874                 }
2875                 if (size_only)
2876                         return 0;
2877                 if ((flags & CHECK_BINARY) &&
2878                     s->size > big_file_threshold && s->is_binary == -1) {
2879                         s->is_binary = 1;
2880                         return 0;
2881                 }
2882                 fd = open(s->path, O_RDONLY);
2883                 if (fd < 0)
2884                         goto err_empty;
2885                 s->data = xmmap(NULL, s->size, PROT_READ, MAP_PRIVATE, fd, 0);
2886                 close(fd);
2887                 s->should_munmap = 1;
2888
2889                 /*
2890                  * Convert from working tree format to canonical git format
2891                  */
2892                 if (convert_to_git(s->path, s->data, s->size, &buf, crlf_warn)) {
2893                         size_t size = 0;
2894                         munmap(s->data, s->size);
2895                         s->should_munmap = 0;
2896                         s->data = strbuf_detach(&buf, &size);
2897                         s->size = size;
2898                         s->should_free = 1;
2899                 }
2900         }
2901         else {
2902                 enum object_type type;
2903                 if (size_only || (flags & CHECK_BINARY)) {
2904                         type = sha1_object_info(s->oid.hash, &s->size);
2905                         if (type < 0)
2906                                 die("unable to read %s",
2907                                     oid_to_hex(&s->oid));
2908                         if (size_only)
2909                                 return 0;
2910                         if (s->size > big_file_threshold && s->is_binary == -1) {
2911                                 s->is_binary = 1;
2912                                 return 0;
2913                         }
2914                 }
2915                 s->data = read_sha1_file(s->oid.hash, &type, &s->size);
2916                 if (!s->data)
2917                         die("unable to read %s", oid_to_hex(&s->oid));
2918                 s->should_free = 1;
2919         }
2920         return 0;
2921 }
2922
2923 void diff_free_filespec_blob(struct diff_filespec *s)
2924 {
2925         if (s->should_free)
2926                 free(s->data);
2927         else if (s->should_munmap)
2928                 munmap(s->data, s->size);
2929
2930         if (s->should_free || s->should_munmap) {
2931                 s->should_free = s->should_munmap = 0;
2932                 s->data = NULL;
2933         }
2934 }
2935
2936 void diff_free_filespec_data(struct diff_filespec *s)
2937 {
2938         diff_free_filespec_blob(s);
2939         free(s->cnt_data);
2940         s->cnt_data = NULL;
2941 }
2942
2943 static void prep_temp_blob(const char *path, struct diff_tempfile *temp,
2944                            void *blob,
2945                            unsigned long size,
2946                            const struct object_id *oid,
2947                            int mode)
2948 {
2949         int fd;
2950         struct strbuf buf = STRBUF_INIT;
2951         struct strbuf template = STRBUF_INIT;
2952         char *path_dup = xstrdup(path);
2953         const char *base = basename(path_dup);
2954
2955         /* Generate "XXXXXX_basename.ext" */
2956         strbuf_addstr(&template, "XXXXXX_");
2957         strbuf_addstr(&template, base);
2958
2959         fd = mks_tempfile_ts(&temp->tempfile, template.buf, strlen(base) + 1);
2960         if (fd < 0)
2961                 die_errno("unable to create temp-file");
2962         if (convert_to_working_tree(path,
2963                         (const char *)blob, (size_t)size, &buf)) {
2964                 blob = buf.buf;
2965                 size = buf.len;
2966         }
2967         if (write_in_full(fd, blob, size) != size)
2968                 die_errno("unable to write temp-file");
2969         close_tempfile(&temp->tempfile);
2970         temp->name = get_tempfile_path(&temp->tempfile);
2971         oid_to_hex_r(temp->hex, oid);
2972         xsnprintf(temp->mode, sizeof(temp->mode), "%06o", mode);
2973         strbuf_release(&buf);
2974         strbuf_release(&template);
2975         free(path_dup);
2976 }
2977
2978 static struct diff_tempfile *prepare_temp_file(const char *name,
2979                 struct diff_filespec *one)
2980 {
2981         struct diff_tempfile *temp = claim_diff_tempfile();
2982
2983         if (!DIFF_FILE_VALID(one)) {
2984         not_a_valid_file:
2985                 /* A '-' entry produces this for file-2, and
2986                  * a '+' entry produces this for file-1.
2987                  */
2988                 temp->name = "/dev/null";
2989                 xsnprintf(temp->hex, sizeof(temp->hex), ".");
2990                 xsnprintf(temp->mode, sizeof(temp->mode), ".");
2991                 return temp;
2992         }
2993
2994         if (!S_ISGITLINK(one->mode) &&
2995             (!one->oid_valid ||
2996              reuse_worktree_file(name, one->oid.hash, 1))) {
2997                 struct stat st;
2998                 if (lstat(name, &st) < 0) {
2999                         if (errno == ENOENT)
3000                                 goto not_a_valid_file;
3001                         die_errno("stat(%s)", name);
3002                 }
3003                 if (S_ISLNK(st.st_mode)) {
3004                         struct strbuf sb = STRBUF_INIT;
3005                         if (strbuf_readlink(&sb, name, st.st_size) < 0)
3006                                 die_errno("readlink(%s)", name);
3007                         prep_temp_blob(name, temp, sb.buf, sb.len,
3008                                        (one->oid_valid ?
3009                                         &one->oid : &null_oid),
3010                                        (one->oid_valid ?
3011                                         one->mode : S_IFLNK));
3012                         strbuf_release(&sb);
3013                 }
3014                 else {
3015                         /* we can borrow from the file in the work tree */
3016                         temp->name = name;
3017                         if (!one->oid_valid)
3018                                 sha1_to_hex_r(temp->hex, null_sha1);
3019                         else
3020                                 sha1_to_hex_r(temp->hex, one->oid.hash);
3021                         /* Even though we may sometimes borrow the
3022                          * contents from the work tree, we always want
3023                          * one->mode.  mode is trustworthy even when
3024                          * !(one->sha1_valid), as long as
3025                          * DIFF_FILE_VALID(one).
3026                          */
3027                         xsnprintf(temp->mode, sizeof(temp->mode), "%06o", one->mode);
3028                 }
3029                 return temp;
3030         }
3031         else {
3032                 if (diff_populate_filespec(one, 0))
3033                         die("cannot read data blob for %s", one->path);
3034                 prep_temp_blob(name, temp, one->data, one->size,
3035                                &one->oid, one->mode);
3036         }
3037         return temp;
3038 }
3039
3040 static void add_external_diff_name(struct argv_array *argv,
3041                                    const char *name,
3042                                    struct diff_filespec *df)
3043 {
3044         struct diff_tempfile *temp = prepare_temp_file(name, df);
3045         argv_array_push(argv, temp->name);
3046         argv_array_push(argv, temp->hex);
3047         argv_array_push(argv, temp->mode);
3048 }
3049
3050 /* An external diff command takes:
3051  *
3052  * diff-cmd name infile1 infile1-sha1 infile1-mode \
3053  *               infile2 infile2-sha1 infile2-mode [ rename-to ]
3054  *
3055  */
3056 static void run_external_diff(const char *pgm,
3057                               const char *name,
3058                               const char *other,
3059                               struct diff_filespec *one,
3060                               struct diff_filespec *two,
3061                               const char *xfrm_msg,
3062                               int complete_rewrite,
3063                               struct diff_options *o)
3064 {
3065         struct argv_array argv = ARGV_ARRAY_INIT;
3066         struct argv_array env = ARGV_ARRAY_INIT;
3067         struct diff_queue_struct *q = &diff_queued_diff;
3068
3069         argv_array_push(&argv, pgm);
3070         argv_array_push(&argv, name);
3071
3072         if (one && two) {
3073                 add_external_diff_name(&argv, name, one);
3074                 if (!other)
3075                         add_external_diff_name(&argv, name, two);
3076                 else {
3077                         add_external_diff_name(&argv, other, two);
3078                         argv_array_push(&argv, other);
3079                         argv_array_push(&argv, xfrm_msg);
3080                 }
3081         }
3082
3083         argv_array_pushf(&env, "GIT_DIFF_PATH_COUNTER=%d", ++o->diff_path_counter);
3084         argv_array_pushf(&env, "GIT_DIFF_PATH_TOTAL=%d", q->nr);
3085
3086         if (run_command_v_opt_cd_env(argv.argv, RUN_USING_SHELL, NULL, env.argv))
3087                 die(_("external diff died, stopping at %s"), name);
3088
3089         remove_tempfile();
3090         argv_array_clear(&argv);
3091         argv_array_clear(&env);
3092 }
3093
3094 static int similarity_index(struct diff_filepair *p)
3095 {
3096         return p->score * 100 / MAX_SCORE;
3097 }
3098
3099 static void fill_metainfo(struct strbuf *msg,
3100                           const char *name,
3101                           const char *other,
3102                           struct diff_filespec *one,
3103                           struct diff_filespec *two,
3104                           struct diff_options *o,
3105                           struct diff_filepair *p,
3106                           int *must_show_header,
3107                           int use_color)
3108 {
3109         const char *set = diff_get_color(use_color, DIFF_METAINFO);
3110         const char *reset = diff_get_color(use_color, DIFF_RESET);
3111         const char *line_prefix = diff_line_prefix(o);
3112
3113         *must_show_header = 1;
3114         strbuf_init(msg, PATH_MAX * 2 + 300);
3115         switch (p->status) {
3116         case DIFF_STATUS_COPIED:
3117                 strbuf_addf(msg, "%s%ssimilarity index %d%%",
3118                             line_prefix, set, similarity_index(p));
3119                 strbuf_addf(msg, "%s\n%s%scopy from ",
3120                             reset,  line_prefix, set);
3121                 quote_c_style(name, msg, NULL, 0);
3122                 strbuf_addf(msg, "%s\n%s%scopy to ", reset, line_prefix, set);
3123                 quote_c_style(other, msg, NULL, 0);
3124                 strbuf_addf(msg, "%s\n", reset);
3125                 break;
3126         case DIFF_STATUS_RENAMED:
3127                 strbuf_addf(msg, "%s%ssimilarity index %d%%",
3128                             line_prefix, set, similarity_index(p));
3129                 strbuf_addf(msg, "%s\n%s%srename from ",
3130                             reset, line_prefix, set);
3131                 quote_c_style(name, msg, NULL, 0);
3132                 strbuf_addf(msg, "%s\n%s%srename to ",
3133                             reset, line_prefix, set);
3134                 quote_c_style(other, msg, NULL, 0);
3135                 strbuf_addf(msg, "%s\n", reset);
3136                 break;
3137         case DIFF_STATUS_MODIFIED:
3138                 if (p->score) {
3139                         strbuf_addf(msg, "%s%sdissimilarity index %d%%%s\n",
3140                                     line_prefix,
3141                                     set, similarity_index(p), reset);
3142                         break;
3143                 }
3144                 /* fallthru */
3145         default:
3146                 *must_show_header = 0;
3147         }
3148         if (one && two && oidcmp(&one->oid, &two->oid)) {
3149                 int abbrev = DIFF_OPT_TST(o, FULL_INDEX) ? 40 : DEFAULT_ABBREV;
3150
3151                 if (DIFF_OPT_TST(o, BINARY)) {
3152                         mmfile_t mf;
3153                         if ((!fill_mmfile(&mf, one) && diff_filespec_is_binary(one)) ||
3154                             (!fill_mmfile(&mf, two) && diff_filespec_is_binary(two)))
3155                                 abbrev = 40;
3156                 }
3157                 strbuf_addf(msg, "%s%sindex %s..", line_prefix, set,
3158                             find_unique_abbrev(one->oid.hash, abbrev));
3159                 strbuf_add_unique_abbrev(msg, two->oid.hash, abbrev);
3160                 if (one->mode == two->mode)
3161                         strbuf_addf(msg, " %06o", one->mode);
3162                 strbuf_addf(msg, "%s\n", reset);
3163         }
3164 }
3165
3166 static void run_diff_cmd(const char *pgm,
3167                          const char *name,
3168                          const char *other,
3169                          const char *attr_path,
3170                          struct diff_filespec *one,
3171                          struct diff_filespec *two,
3172                          struct strbuf *msg,
3173                          struct diff_options *o,
3174                          struct diff_filepair *p)
3175 {
3176         const char *xfrm_msg = NULL;
3177         int complete_rewrite = (p->status == DIFF_STATUS_MODIFIED) && p->score;
3178         int must_show_header = 0;
3179
3180
3181         if (DIFF_OPT_TST(o, ALLOW_EXTERNAL)) {
3182                 struct userdiff_driver *drv = userdiff_find_by_path(attr_path);
3183                 if (drv && drv->external)
3184                         pgm = drv->external;
3185         }
3186
3187         if (msg) {
3188                 /*
3189                  * don't use colors when the header is intended for an
3190                  * external diff driver
3191                  */
3192                 fill_metainfo(msg, name, other, one, two, o, p,
3193                               &must_show_header,
3194                               want_color(o->use_color) && !pgm);
3195                 xfrm_msg = msg->len ? msg->buf : NULL;
3196         }
3197
3198         if (pgm) {
3199                 run_external_diff(pgm, name, other, one, two, xfrm_msg,
3200                                   complete_rewrite, o);
3201                 return;
3202         }
3203         if (one && two)
3204                 builtin_diff(name, other ? other : name,
3205                              one, two, xfrm_msg, must_show_header,
3206                              o, complete_rewrite);
3207         else
3208                 fprintf(o->file, "* Unmerged path %s\n", name);
3209 }
3210
3211 static void diff_fill_sha1_info(struct diff_filespec *one)
3212 {
3213         if (DIFF_FILE_VALID(one)) {
3214                 if (!one->oid_valid) {
3215                         struct stat st;
3216                         if (one->is_stdin) {
3217                                 oidclr(&one->oid);
3218                                 return;
3219                         }
3220                         if (lstat(one->path, &st) < 0)
3221                                 die_errno("stat '%s'", one->path);
3222                         if (index_path(one->oid.hash, one->path, &st, 0))
3223                                 die("cannot hash %s", one->path);
3224                 }
3225         }
3226         else
3227                 oidclr(&one->oid);
3228 }
3229
3230 static void strip_prefix(int prefix_length, const char **namep, const char **otherp)
3231 {
3232         /* Strip the prefix but do not molest /dev/null and absolute paths */
3233         if (*namep && **namep != '/') {
3234                 *namep += prefix_length;
3235                 if (**namep == '/')
3236                         ++*namep;
3237         }
3238         if (*otherp && **otherp != '/') {
3239                 *otherp += prefix_length;
3240                 if (**otherp == '/')
3241                         ++*otherp;
3242         }
3243 }
3244
3245 static void run_diff(struct diff_filepair *p, struct diff_options *o)
3246 {
3247         const char *pgm = external_diff();
3248         struct strbuf msg;
3249         struct diff_filespec *one = p->one;
3250         struct diff_filespec *two = p->two;
3251         const char *name;
3252         const char *other;
3253         const char *attr_path;
3254
3255         name  = p->one->path;
3256         other = (strcmp(name, p->two->path) ? p->two->path : NULL);
3257         attr_path = name;
3258         if (o->prefix_length)
3259                 strip_prefix(o->prefix_length, &name, &other);
3260
3261         if (!DIFF_OPT_TST(o, ALLOW_EXTERNAL))
3262                 pgm = NULL;
3263
3264         if (DIFF_PAIR_UNMERGED(p)) {
3265                 run_diff_cmd(pgm, name, NULL, attr_path,
3266                              NULL, NULL, NULL, o, p);
3267                 return;
3268         }
3269
3270         diff_fill_sha1_info(one);
3271         diff_fill_sha1_info(two);
3272
3273         if (!pgm &&
3274             DIFF_FILE_VALID(one) && DIFF_FILE_VALID(two) &&
3275             (S_IFMT & one->mode) != (S_IFMT & two->mode)) {
3276                 /*
3277                  * a filepair that changes between file and symlink
3278                  * needs to be split into deletion and creation.
3279                  */
3280                 struct diff_filespec *null = alloc_filespec(two->path);
3281                 run_diff_cmd(NULL, name, other, attr_path,
3282                              one, null, &msg, o, p);
3283                 free(null);
3284                 strbuf_release(&msg);
3285
3286                 null = alloc_filespec(one->path);
3287                 run_diff_cmd(NULL, name, other, attr_path,
3288                              null, two, &msg, o, p);
3289                 free(null);
3290         }
3291         else
3292                 run_diff_cmd(pgm, name, other, attr_path,
3293                              one, two, &msg, o, p);
3294
3295         strbuf_release(&msg);
3296 }
3297
3298 static void run_diffstat(struct diff_filepair *p, struct diff_options *o,
3299                          struct diffstat_t *diffstat)
3300 {
3301         const char *name;
3302         const char *other;
3303
3304         if (DIFF_PAIR_UNMERGED(p)) {
3305                 /* unmerged */
3306                 builtin_diffstat(p->one->path, NULL, NULL, NULL, diffstat, o, p);
3307                 return;
3308         }
3309
3310         name = p->one->path;
3311         other = (strcmp(name, p->two->path) ? p->two->path : NULL);
3312
3313         if (o->prefix_length)
3314                 strip_prefix(o->prefix_length, &name, &other);
3315
3316         diff_fill_sha1_info(p->one);
3317         diff_fill_sha1_info(p->two);
3318
3319         builtin_diffstat(name, other, p->one, p->two, diffstat, o, p);
3320 }
3321
3322 static void run_checkdiff(struct diff_filepair *p, struct diff_options *o)
3323 {
3324         const char *name;
3325         const char *other;
3326         const char *attr_path;
3327
3328         if (DIFF_PAIR_UNMERGED(p)) {
3329                 /* unmerged */
3330                 return;
3331         }
3332
3333         name = p->one->path;
3334         other = (strcmp(name, p->two->path) ? p->two->path : NULL);
3335         attr_path = other ? other : name;
3336
3337         if (o->prefix_length)
3338                 strip_prefix(o->prefix_length, &name, &other);
3339
3340         diff_fill_sha1_info(p->one);
3341         diff_fill_sha1_info(p->two);
3342
3343         builtin_checkdiff(name, other, attr_path, p->one, p->two, o);
3344 }
3345
3346 void diff_setup(struct diff_options *options)
3347 {
3348         memcpy(options, &default_diff_options, sizeof(*options));
3349
3350         options->file = stdout;
3351
3352         options->line_termination = '\n';
3353         options->break_opt = -1;
3354         options->rename_limit = -1;
3355         options->dirstat_permille = diff_dirstat_permille_default;
3356         options->context = diff_context_default;
3357         options->ws_error_highlight = ws_error_highlight_default;
3358         DIFF_OPT_SET(options, RENAME_EMPTY);
3359
3360         /* pathchange left =NULL by default */
3361         options->change = diff_change;
3362         options->add_remove = diff_addremove;
3363         options->use_color = diff_use_color_default;
3364         options->detect_rename = diff_detect_rename_default;
3365         options->xdl_opts |= diff_algorithm;
3366         if (diff_indent_heuristic)
3367                 DIFF_XDL_SET(options, INDENT_HEURISTIC);
3368         else if (diff_compaction_heuristic)
3369                 DIFF_XDL_SET(options, COMPACTION_HEURISTIC);
3370
3371         options->orderfile = diff_order_file_cfg;
3372
3373         if (diff_no_prefix) {
3374                 options->a_prefix = options->b_prefix = "";
3375         } else if (!diff_mnemonic_prefix) {
3376                 options->a_prefix = "a/";
3377                 options->b_prefix = "b/";
3378         }
3379 }
3380
3381 void diff_setup_done(struct diff_options *options)
3382 {
3383         int count = 0;
3384
3385         if (options->set_default)
3386                 options->set_default(options);
3387
3388         if (options->output_format & DIFF_FORMAT_NAME)
3389                 count++;
3390         if (options->output_format & DIFF_FORMAT_NAME_STATUS)
3391                 count++;
3392         if (options->output_format & DIFF_FORMAT_CHECKDIFF)
3393                 count++;
3394         if (options->output_format & DIFF_FORMAT_NO_OUTPUT)
3395                 count++;
3396         if (count > 1)
3397                 die(_("--name-only, --name-status, --check and -s are mutually exclusive"));
3398
3399         /*
3400          * Most of the time we can say "there are changes"
3401          * only by checking if there are changed paths, but
3402          * --ignore-whitespace* options force us to look
3403          * inside contents.
3404          */
3405
3406         if (DIFF_XDL_TST(options, IGNORE_WHITESPACE) ||
3407             DIFF_XDL_TST(options, IGNORE_WHITESPACE_CHANGE) ||
3408             DIFF_XDL_TST(options, IGNORE_WHITESPACE_AT_EOL))
3409                 DIFF_OPT_SET(options, DIFF_FROM_CONTENTS);
3410         else
3411                 DIFF_OPT_CLR(options, DIFF_FROM_CONTENTS);
3412
3413         if (DIFF_OPT_TST(options, FIND_COPIES_HARDER))
3414                 options->detect_rename = DIFF_DETECT_COPY;
3415
3416         if (!DIFF_OPT_TST(options, RELATIVE_NAME))
3417                 options->prefix = NULL;
3418         if (options->prefix)
3419                 options->prefix_length = strlen(options->prefix);
3420         else
3421                 options->prefix_length = 0;
3422
3423         if (options->output_format & (DIFF_FORMAT_NAME |
3424                                       DIFF_FORMAT_NAME_STATUS |
3425                                       DIFF_FORMAT_CHECKDIFF |
3426                                       DIFF_FORMAT_NO_OUTPUT))
3427                 options->output_format &= ~(DIFF_FORMAT_RAW |
3428                                             DIFF_FORMAT_NUMSTAT |
3429                                             DIFF_FORMAT_DIFFSTAT |
3430                                             DIFF_FORMAT_SHORTSTAT |
3431                                             DIFF_FORMAT_DIRSTAT |
3432                                             DIFF_FORMAT_SUMMARY |
3433                                             DIFF_FORMAT_PATCH);
3434
3435         /*
3436          * These cases always need recursive; we do not drop caller-supplied
3437          * recursive bits for other formats here.
3438          */
3439         if (options->output_format & (DIFF_FORMAT_PATCH |
3440                                       DIFF_FORMAT_NUMSTAT |
3441                                       DIFF_FORMAT_DIFFSTAT |
3442                                       DIFF_FORMAT_SHORTSTAT |
3443                                       DIFF_FORMAT_DIRSTAT |
3444                                       DIFF_FORMAT_SUMMARY |
3445                                       DIFF_FORMAT_CHECKDIFF))
3446                 DIFF_OPT_SET(options, RECURSIVE);
3447         /*
3448          * Also pickaxe would not work very well if you do not say recursive
3449          */
3450         if (options->pickaxe)
3451                 DIFF_OPT_SET(options, RECURSIVE);
3452         /*
3453          * When patches are generated, submodules diffed against the work tree
3454          * must be checked for dirtiness too so it can be shown in the output
3455          */
3456         if (options->output_format & DIFF_FORMAT_PATCH)
3457                 DIFF_OPT_SET(options, DIRTY_SUBMODULES);
3458
3459         if (options->detect_rename && options->rename_limit < 0)
3460                 options->rename_limit = diff_rename_limit_default;
3461         if (options->setup & DIFF_SETUP_USE_CACHE) {
3462                 if (!active_cache)
3463                         /* read-cache does not die even when it fails
3464                          * so it is safe for us to do this here.  Also
3465                          * it does not smudge active_cache or active_nr
3466                          * when it fails, so we do not have to worry about
3467                          * cleaning it up ourselves either.
3468                          */
3469                         read_cache();
3470         }
3471         if (options->abbrev <= 0 || 40 < options->abbrev)
3472                 options->abbrev = 40; /* full */
3473
3474         /*
3475          * It does not make sense to show the first hit we happened
3476          * to have found.  It does not make sense not to return with
3477          * exit code in such a case either.
3478          */
3479         if (DIFF_OPT_TST(options, QUICK)) {
3480                 options->output_format = DIFF_FORMAT_NO_OUTPUT;
3481                 DIFF_OPT_SET(options, EXIT_WITH_STATUS);
3482         }
3483
3484         options->diff_path_counter = 0;
3485
3486         if (DIFF_OPT_TST(options, FOLLOW_RENAMES) && options->pathspec.nr != 1)
3487                 die(_("--follow requires exactly one pathspec"));
3488 }
3489
3490 static int opt_arg(const char *arg, int arg_short, const char *arg_long, int *val)
3491 {
3492         char c, *eq;
3493         int len;
3494
3495         if (*arg != '-')
3496                 return 0;
3497         c = *++arg;
3498         if (!c)
3499                 return 0;
3500         if (c == arg_short) {
3501                 c = *++arg;
3502                 if (!c)
3503                         return 1;
3504                 if (val && isdigit(c)) {
3505                         char *end;
3506                         int n = strtoul(arg, &end, 10);
3507                         if (*end)
3508                                 return 0;
3509                         *val = n;
3510                         return 1;
3511                 }
3512                 return 0;
3513         }
3514         if (c != '-')
3515                 return 0;
3516         arg++;
3517         eq = strchrnul(arg, '=');
3518         len = eq - arg;
3519         if (!len || strncmp(arg, arg_long, len))
3520                 return 0;
3521         if (*eq) {
3522                 int n;
3523                 char *end;
3524                 if (!isdigit(*++eq))
3525                         return 0;
3526                 n = strtoul(eq, &end, 10);
3527                 if (*end)
3528                         return 0;
3529                 *val = n;
3530         }
3531         return 1;
3532 }
3533
3534 static int diff_scoreopt_parse(const char *opt);
3535
3536 static inline int short_opt(char opt, const char **argv,
3537                             const char **optarg)
3538 {
3539         const char *arg = argv[0];
3540         if (arg[0] != '-' || arg[1] != opt)
3541                 return 0;
3542         if (arg[2] != '\0') {
3543                 *optarg = arg + 2;
3544                 return 1;
3545         }
3546         if (!argv[1])
3547                 die("Option '%c' requires a value", opt);
3548         *optarg = argv[1];
3549         return 2;
3550 }
3551
3552 int parse_long_opt(const char *opt, const char **argv,
3553                    const char **optarg)
3554 {
3555         const char *arg = argv[0];
3556         if (!skip_prefix(arg, "--", &arg))
3557                 return 0;
3558         if (!skip_prefix(arg, opt, &arg))
3559                 return 0;
3560         if (*arg == '=') { /* stuck form: --option=value */
3561                 *optarg = arg + 1;
3562                 return 1;
3563         }
3564         if (*arg != '\0')
3565                 return 0;
3566         /* separate form: --option value */
3567         if (!argv[1])
3568                 die("Option '--%s' requires a value", opt);
3569         *optarg = argv[1];
3570         return 2;
3571 }
3572
3573 static int stat_opt(struct diff_options *options, const char **av)
3574 {
3575         const char *arg = av[0];
3576         char *end;
3577         int width = options->stat_width;
3578         int name_width = options->stat_name_width;
3579         int graph_width = options->stat_graph_width;
3580         int count = options->stat_count;
3581         int argcount = 1;
3582
3583         if (!skip_prefix(arg, "--stat", &arg))
3584                 die("BUG: stat option does not begin with --stat: %s", arg);
3585         end = (char *)arg;
3586
3587         switch (*arg) {
3588         case '-':
3589                 if (skip_prefix(arg, "-width", &arg)) {
3590                         if (*arg == '=')
3591                                 width = strtoul(arg + 1, &end, 10);
3592                         else if (!*arg && !av[1])
3593                                 die_want_option("--stat-width");
3594                         else if (!*arg) {
3595                                 width = strtoul(av[1], &end, 10);
3596                                 argcount = 2;
3597                         }
3598                 } else if (skip_prefix(arg, "-name-width", &arg)) {
3599                         if (*arg == '=')
3600                                 name_width = strtoul(arg + 1, &end, 10);
3601                         else if (!*arg && !av[1])
3602                                 die_want_option("--stat-name-width");
3603                         else if (!*arg) {
3604                                 name_width = strtoul(av[1], &end, 10);
3605                                 argcount = 2;
3606                         }
3607                 } else if (skip_prefix(arg, "-graph-width", &arg)) {
3608                         if (*arg == '=')
3609                                 graph_width = strtoul(arg + 1, &end, 10);
3610                         else if (!*arg && !av[1])
3611                                 die_want_option("--stat-graph-width");
3612                         else if (!*arg) {
3613                                 graph_width = strtoul(av[1], &end, 10);
3614                                 argcount = 2;
3615                         }
3616                 } else if (skip_prefix(arg, "-count", &arg)) {
3617                         if (*arg == '=')
3618                                 count = strtoul(arg + 1, &end, 10);
3619                         else if (!*arg && !av[1])
3620                                 die_want_option("--stat-count");
3621                         else if (!*arg) {
3622                                 count = strtoul(av[1], &end, 10);
3623                                 argcount = 2;
3624                         }
3625                 }
3626                 break;
3627         case '=':
3628                 width = strtoul(arg+1, &end, 10);
3629                 if (*end == ',')
3630                         name_width = strtoul(end+1, &end, 10);
3631                 if (*end == ',')
3632                         count = strtoul(end+1, &end, 10);
3633         }
3634
3635         /* Important! This checks all the error cases! */
3636         if (*end)
3637                 return 0;
3638         options->output_format |= DIFF_FORMAT_DIFFSTAT;
3639         options->stat_name_width = name_width;
3640         options->stat_graph_width = graph_width;
3641         options->stat_width = width;
3642         options->stat_count = count;
3643         return argcount;
3644 }
3645
3646 static int parse_dirstat_opt(struct diff_options *options, const char *params)
3647 {
3648         struct strbuf errmsg = STRBUF_INIT;
3649         if (parse_dirstat_params(options, params, &errmsg))
3650                 die(_("Failed to parse --dirstat/-X option parameter:\n%s"),
3651                     errmsg.buf);
3652         strbuf_release(&errmsg);
3653         /*
3654          * The caller knows a dirstat-related option is given from the command
3655          * line; allow it to say "return this_function();"
3656          */
3657         options->output_format |= DIFF_FORMAT_DIRSTAT;
3658         return 1;
3659 }
3660
3661 static int parse_submodule_opt(struct diff_options *options, const char *value)
3662 {
3663         if (parse_submodule_params(options, value))
3664                 die(_("Failed to parse --submodule option parameter: '%s'"),
3665                         value);
3666         return 1;
3667 }
3668
3669 static const char diff_status_letters[] = {
3670         DIFF_STATUS_ADDED,
3671         DIFF_STATUS_COPIED,
3672         DIFF_STATUS_DELETED,
3673         DIFF_STATUS_MODIFIED,
3674         DIFF_STATUS_RENAMED,
3675         DIFF_STATUS_TYPE_CHANGED,
3676         DIFF_STATUS_UNKNOWN,
3677         DIFF_STATUS_UNMERGED,
3678         DIFF_STATUS_FILTER_AON,
3679         DIFF_STATUS_FILTER_BROKEN,
3680         '\0',
3681 };
3682
3683 static unsigned int filter_bit['Z' + 1];
3684
3685 static void prepare_filter_bits(void)
3686 {
3687         int i;
3688
3689         if (!filter_bit[DIFF_STATUS_ADDED]) {
3690                 for (i = 0; diff_status_letters[i]; i++)
3691                         filter_bit[(int) diff_status_letters[i]] = (1 << i);
3692         }
3693 }
3694
3695 static unsigned filter_bit_tst(char status, const struct diff_options *opt)
3696 {
3697         return opt->filter & filter_bit[(int) status];
3698 }
3699
3700 static int parse_diff_filter_opt(const char *optarg, struct diff_options *opt)
3701 {
3702         int i, optch;
3703
3704         prepare_filter_bits();
3705
3706         /*
3707          * If there is a negation e.g. 'd' in the input, and we haven't
3708          * initialized the filter field with another --diff-filter, start
3709          * from full set of bits, except for AON.
3710          */
3711         if (!opt->filter) {
3712                 for (i = 0; (optch = optarg[i]) != '\0'; i++) {
3713                         if (optch < 'a' || 'z' < optch)
3714                                 continue;
3715                         opt->filter = (1 << (ARRAY_SIZE(diff_status_letters) - 1)) - 1;
3716                         opt->filter &= ~filter_bit[DIFF_STATUS_FILTER_AON];
3717                         break;
3718                 }
3719         }
3720
3721         for (i = 0; (optch = optarg[i]) != '\0'; i++) {
3722                 unsigned int bit;
3723                 int negate;
3724
3725                 if ('a' <= optch && optch <= 'z') {
3726                         negate = 1;
3727                         optch = toupper(optch);
3728                 } else {
3729                         negate = 0;
3730                 }
3731
3732                 bit = (0 <= optch && optch <= 'Z') ? filter_bit[optch] : 0;
3733                 if (!bit)
3734                         return optarg[i];
3735                 if (negate)
3736                         opt->filter &= ~bit;
3737                 else
3738                         opt->filter |= bit;
3739         }
3740         return 0;
3741 }
3742
3743 static void enable_patch_output(int *fmt) {
3744         *fmt &= ~DIFF_FORMAT_NO_OUTPUT;
3745         *fmt |= DIFF_FORMAT_PATCH;
3746 }
3747
3748 static int parse_ws_error_highlight_opt(struct diff_options *opt, const char *arg)
3749 {
3750         int val = parse_ws_error_highlight(arg);
3751
3752         if (val < 0) {
3753                 error("unknown value after ws-error-highlight=%.*s",
3754                       -1 - val, arg);
3755                 return 0;
3756         }
3757         opt->ws_error_highlight = val;
3758         return 1;
3759 }
3760
3761 int diff_opt_parse(struct diff_options *options,
3762                    const char **av, int ac, const char *prefix)
3763 {
3764         const char *arg = av[0];
3765         const char *optarg;
3766         int argcount;
3767
3768         if (!prefix)
3769                 prefix = "";
3770
3771         /* Output format options */
3772         if (!strcmp(arg, "-p") || !strcmp(arg, "-u") || !strcmp(arg, "--patch")
3773             || opt_arg(arg, 'U', "unified", &options->context))
3774                 enable_patch_output(&options->output_format);
3775         else if (!strcmp(arg, "--raw"))
3776                 options->output_format |= DIFF_FORMAT_RAW;
3777         else if (!strcmp(arg, "--patch-with-raw")) {
3778                 enable_patch_output(&options->output_format);
3779                 options->output_format |= DIFF_FORMAT_RAW;
3780         } else if (!strcmp(arg, "--numstat"))
3781                 options->output_format |= DIFF_FORMAT_NUMSTAT;
3782         else if (!strcmp(arg, "--shortstat"))
3783                 options->output_format |= DIFF_FORMAT_SHORTSTAT;
3784         else if (!strcmp(arg, "-X") || !strcmp(arg, "--dirstat"))
3785                 return parse_dirstat_opt(options, "");
3786         else if (skip_prefix(arg, "-X", &arg))
3787                 return parse_dirstat_opt(options, arg);
3788         else if (skip_prefix(arg, "--dirstat=", &arg))
3789                 return parse_dirstat_opt(options, arg);
3790         else if (!strcmp(arg, "--cumulative"))
3791                 return parse_dirstat_opt(options, "cumulative");
3792         else if (!strcmp(arg, "--dirstat-by-file"))
3793                 return parse_dirstat_opt(options, "files");
3794         else if (skip_prefix(arg, "--dirstat-by-file=", &arg)) {
3795                 parse_dirstat_opt(options, "files");
3796                 return parse_dirstat_opt(options, arg);
3797         }
3798         else if (!strcmp(arg, "--check"))
3799                 options->output_format |= DIFF_FORMAT_CHECKDIFF;
3800         else if (!strcmp(arg, "--summary"))
3801                 options->output_format |= DIFF_FORMAT_SUMMARY;
3802         else if (!strcmp(arg, "--patch-with-stat")) {
3803                 enable_patch_output(&options->output_format);
3804                 options->output_format |= DIFF_FORMAT_DIFFSTAT;
3805         } else if (!strcmp(arg, "--name-only"))
3806                 options->output_format |= DIFF_FORMAT_NAME;
3807         else if (!strcmp(arg, "--name-status"))
3808                 options->output_format |= DIFF_FORMAT_NAME_STATUS;
3809         else if (!strcmp(arg, "-s") || !strcmp(arg, "--no-patch"))
3810                 options->output_format |= DIFF_FORMAT_NO_OUTPUT;
3811         else if (starts_with(arg, "--stat"))
3812                 /* --stat, --stat-width, --stat-name-width, or --stat-count */
3813                 return stat_opt(options, av);
3814
3815         /* renames options */
3816         else if (starts_with(arg, "-B") || starts_with(arg, "--break-rewrites=") ||
3817                  !strcmp(arg, "--break-rewrites")) {
3818                 if ((options->break_opt = diff_scoreopt_parse(arg)) == -1)
3819                         return error("invalid argument to -B: %s", arg+2);
3820         }
3821         else if (starts_with(arg, "-M") || starts_with(arg, "--find-renames=") ||
3822                  !strcmp(arg, "--find-renames")) {
3823                 if ((options->rename_score = diff_scoreopt_parse(arg)) == -1)
3824                         return error("invalid argument to -M: %s", arg+2);
3825                 options->detect_rename = DIFF_DETECT_RENAME;
3826         }
3827         else if (!strcmp(arg, "-D") || !strcmp(arg, "--irreversible-delete")) {
3828                 options->irreversible_delete = 1;
3829         }
3830         else if (starts_with(arg, "-C") || starts_with(arg, "--find-copies=") ||
3831                  !strcmp(arg, "--find-copies")) {
3832                 if (options->detect_rename == DIFF_DETECT_COPY)
3833                         DIFF_OPT_SET(options, FIND_COPIES_HARDER);
3834                 if ((options->rename_score = diff_scoreopt_parse(arg)) == -1)
3835                         return error("invalid argument to -C: %s", arg+2);
3836                 options->detect_rename = DIFF_DETECT_COPY;
3837         }
3838         else if (!strcmp(arg, "--no-renames"))
3839                 options->detect_rename = 0;
3840         else if (!strcmp(arg, "--rename-empty"))
3841                 DIFF_OPT_SET(options, RENAME_EMPTY);
3842         else if (!strcmp(arg, "--no-rename-empty"))
3843                 DIFF_OPT_CLR(options, RENAME_EMPTY);
3844         else if (!strcmp(arg, "--relative"))
3845                 DIFF_OPT_SET(options, RELATIVE_NAME);
3846         else if (skip_prefix(arg, "--relative=", &arg)) {
3847                 DIFF_OPT_SET(options, RELATIVE_NAME);
3848                 options->prefix = arg;
3849         }
3850
3851         /* xdiff options */
3852         else if (!strcmp(arg, "--minimal"))
3853                 DIFF_XDL_SET(options, NEED_MINIMAL);
3854         else if (!strcmp(arg, "--no-minimal"))
3855                 DIFF_XDL_CLR(options, NEED_MINIMAL);
3856         else if (!strcmp(arg, "-w") || !strcmp(arg, "--ignore-all-space"))
3857                 DIFF_XDL_SET(options, IGNORE_WHITESPACE);
3858         else if (!strcmp(arg, "-b") || !strcmp(arg, "--ignore-space-change"))
3859                 DIFF_XDL_SET(options, IGNORE_WHITESPACE_CHANGE);
3860         else if (!strcmp(arg, "--ignore-space-at-eol"))
3861                 DIFF_XDL_SET(options, IGNORE_WHITESPACE_AT_EOL);
3862         else if (!strcmp(arg, "--ignore-blank-lines"))
3863                 DIFF_XDL_SET(options, IGNORE_BLANK_LINES);
3864         else if (!strcmp(arg, "--indent-heuristic")) {
3865                 DIFF_XDL_SET(options, INDENT_HEURISTIC);
3866                 DIFF_XDL_CLR(options, COMPACTION_HEURISTIC);
3867         } else if (!strcmp(arg, "--no-indent-heuristic"))
3868                 DIFF_XDL_CLR(options, INDENT_HEURISTIC);
3869         else if (!strcmp(arg, "--compaction-heuristic")) {
3870                 DIFF_XDL_SET(options, COMPACTION_HEURISTIC);
3871                 DIFF_XDL_CLR(options, INDENT_HEURISTIC);
3872         } else if (!strcmp(arg, "--no-compaction-heuristic"))
3873                 DIFF_XDL_CLR(options, COMPACTION_HEURISTIC);
3874         else if (!strcmp(arg, "--patience"))
3875                 options->xdl_opts = DIFF_WITH_ALG(options, PATIENCE_DIFF);
3876         else if (!strcmp(arg, "--histogram"))
3877                 options->xdl_opts = DIFF_WITH_ALG(options, HISTOGRAM_DIFF);
3878         else if ((argcount = parse_long_opt("diff-algorithm", av, &optarg))) {
3879                 long value = parse_algorithm_value(optarg);
3880                 if (value < 0)
3881                         return error("option diff-algorithm accepts \"myers\", "
3882                                      "\"minimal\", \"patience\" and \"histogram\"");
3883                 /* clear out previous settings */
3884                 DIFF_XDL_CLR(options, NEED_MINIMAL);
3885                 options->xdl_opts &= ~XDF_DIFF_ALGORITHM_MASK;
3886                 options->xdl_opts |= value;
3887                 return argcount;
3888         }
3889
3890         /* flags options */
3891         else if (!strcmp(arg, "--binary")) {
3892                 enable_patch_output(&options->output_format);
3893                 DIFF_OPT_SET(options, BINARY);
3894         }
3895         else if (!strcmp(arg, "--full-index"))
3896                 DIFF_OPT_SET(options, FULL_INDEX);
3897         else if (!strcmp(arg, "-a") || !strcmp(arg, "--text"))
3898                 DIFF_OPT_SET(options, TEXT);
3899         else if (!strcmp(arg, "-R"))
3900                 DIFF_OPT_SET(options, REVERSE_DIFF);
3901         else if (!strcmp(arg, "--find-copies-harder"))
3902                 DIFF_OPT_SET(options, FIND_COPIES_HARDER);
3903         else if (!strcmp(arg, "--follow"))
3904                 DIFF_OPT_SET(options, FOLLOW_RENAMES);
3905         else if (!strcmp(arg, "--no-follow")) {
3906                 DIFF_OPT_CLR(options, FOLLOW_RENAMES);
3907                 DIFF_OPT_CLR(options, DEFAULT_FOLLOW_RENAMES);
3908         } else if (!strcmp(arg, "--color"))
3909                 options->use_color = 1;
3910         else if (skip_prefix(arg, "--color=", &arg)) {
3911                 int value = git_config_colorbool(NULL, arg);
3912                 if (value < 0)
3913                         return error("option `color' expects \"always\", \"auto\", or \"never\"");
3914                 options->use_color = value;
3915         }
3916         else if (!strcmp(arg, "--no-color"))
3917                 options->use_color = 0;
3918         else if (!strcmp(arg, "--color-words")) {
3919                 options->use_color = 1;
3920                 options->word_diff = DIFF_WORDS_COLOR;
3921         }
3922         else if (skip_prefix(arg, "--color-words=", &arg)) {
3923                 options->use_color = 1;
3924                 options->word_diff = DIFF_WORDS_COLOR;
3925                 options->word_regex = arg;
3926         }
3927         else if (!strcmp(arg, "--word-diff")) {
3928                 if (options->word_diff == DIFF_WORDS_NONE)
3929                         options->word_diff = DIFF_WORDS_PLAIN;
3930         }
3931         else if (skip_prefix(arg, "--word-diff=", &arg)) {
3932                 if (!strcmp(arg, "plain"))
3933                         options->word_diff = DIFF_WORDS_PLAIN;
3934                 else if (!strcmp(arg, "color")) {
3935                         options->use_color = 1;
3936                         options->word_diff = DIFF_WORDS_COLOR;
3937                 }
3938                 else if (!strcmp(arg, "porcelain"))
3939                         options->word_diff = DIFF_WORDS_PORCELAIN;
3940                 else if (!strcmp(arg, "none"))
3941                         options->word_diff = DIFF_WORDS_NONE;
3942                 else
3943                         die("bad --word-diff argument: %s", arg);
3944         }
3945         else if ((argcount = parse_long_opt("word-diff-regex", av, &optarg))) {
3946                 if (options->word_diff == DIFF_WORDS_NONE)
3947                         options->word_diff = DIFF_WORDS_PLAIN;
3948                 options->word_regex = optarg;
3949                 return argcount;
3950         }
3951         else if (!strcmp(arg, "--exit-code"))
3952                 DIFF_OPT_SET(options, EXIT_WITH_STATUS);
3953         else if (!strcmp(arg, "--quiet"))
3954                 DIFF_OPT_SET(options, QUICK);
3955         else if (!strcmp(arg, "--ext-diff"))
3956                 DIFF_OPT_SET(options, ALLOW_EXTERNAL);
3957         else if (!strcmp(arg, "--no-ext-diff"))
3958                 DIFF_OPT_CLR(options, ALLOW_EXTERNAL);
3959         else if (!strcmp(arg, "--textconv"))
3960                 DIFF_OPT_SET(options, ALLOW_TEXTCONV);
3961         else if (!strcmp(arg, "--no-textconv"))
3962                 DIFF_OPT_CLR(options, ALLOW_TEXTCONV);
3963         else if (!strcmp(arg, "--ignore-submodules")) {
3964                 DIFF_OPT_SET(options, OVERRIDE_SUBMODULE_CONFIG);
3965                 handle_ignore_submodules_arg(options, "all");
3966         } else if (skip_prefix(arg, "--ignore-submodules=", &arg)) {
3967                 DIFF_OPT_SET(options, OVERRIDE_SUBMODULE_CONFIG);
3968                 handle_ignore_submodules_arg(options, arg);
3969         } else if (!strcmp(arg, "--submodule"))
3970                 options->submodule_format = DIFF_SUBMODULE_LOG;
3971         else if (skip_prefix(arg, "--submodule=", &arg))
3972                 return parse_submodule_opt(options, arg);
3973         else if (skip_prefix(arg, "--ws-error-highlight=", &arg))
3974                 return parse_ws_error_highlight_opt(options, arg);
3975
3976         /* misc options */
3977         else if (!strcmp(arg, "-z"))
3978                 options->line_termination = 0;
3979         else if ((argcount = short_opt('l', av, &optarg))) {
3980                 options->rename_limit = strtoul(optarg, NULL, 10);
3981                 return argcount;
3982         }
3983         else if ((argcount = short_opt('S', av, &optarg))) {
3984                 options->pickaxe = optarg;
3985                 options->pickaxe_opts |= DIFF_PICKAXE_KIND_S;
3986                 return argcount;
3987         } else if ((argcount = short_opt('G', av, &optarg))) {
3988                 options->pickaxe = optarg;
3989                 options->pickaxe_opts |= DIFF_PICKAXE_KIND_G;
3990                 return argcount;
3991         }
3992         else if (!strcmp(arg, "--pickaxe-all"))
3993                 options->pickaxe_opts |= DIFF_PICKAXE_ALL;
3994         else if (!strcmp(arg, "--pickaxe-regex"))
3995                 options->pickaxe_opts |= DIFF_PICKAXE_REGEX;
3996         else if ((argcount = short_opt('O', av, &optarg))) {
3997                 const char *path = prefix_filename(prefix, strlen(prefix), optarg);
3998                 options->orderfile = xstrdup(path);
3999                 return argcount;
4000         }
4001         else if ((argcount = parse_long_opt("diff-filter", av, &optarg))) {
4002                 int offending = parse_diff_filter_opt(optarg, options);
4003                 if (offending)
4004                         die("unknown change class '%c' in --diff-filter=%s",
4005                             offending, optarg);
4006                 return argcount;
4007         }
4008         else if (!strcmp(arg, "--abbrev"))
4009                 options->abbrev = DEFAULT_ABBREV;
4010         else if (skip_prefix(arg, "--abbrev=", &arg)) {
4011                 options->abbrev = strtoul(arg, NULL, 10);
4012                 if (options->abbrev < MINIMUM_ABBREV)
4013                         options->abbrev = MINIMUM_ABBREV;
4014                 else if (40 < options->abbrev)
4015                         options->abbrev = 40;
4016         }
4017         else if ((argcount = parse_long_opt("src-prefix", av, &optarg))) {
4018                 options->a_prefix = optarg;
4019                 return argcount;
4020         }
4021         else if ((argcount = parse_long_opt("line-prefix", av, &optarg))) {
4022                 options->line_prefix = optarg;
4023                 options->line_prefix_length = strlen(options->line_prefix);
4024                 graph_setup_line_prefix(options);
4025                 return argcount;
4026         }
4027         else if ((argcount = parse_long_opt("dst-prefix", av, &optarg))) {
4028                 options->b_prefix = optarg;
4029                 return argcount;
4030         }
4031         else if (!strcmp(arg, "--no-prefix"))
4032                 options->a_prefix = options->b_prefix = "";
4033         else if (opt_arg(arg, '\0', "inter-hunk-context",
4034                          &options->interhunkcontext))
4035                 ;
4036         else if (!strcmp(arg, "-W"))
4037                 DIFF_OPT_SET(options, FUNCCONTEXT);
4038         else if (!strcmp(arg, "--function-context"))
4039                 DIFF_OPT_SET(options, FUNCCONTEXT);
4040         else if (!strcmp(arg, "--no-function-context"))
4041                 DIFF_OPT_CLR(options, FUNCCONTEXT);
4042         else if ((argcount = parse_long_opt("output", av, &optarg))) {
4043                 const char *path = prefix_filename(prefix, strlen(prefix), optarg);
4044                 options->file = fopen(path, "w");
4045                 if (!options->file)
4046                         die_errno("Could not open '%s'", path);
4047                 options->close_file = 1;
4048                 if (options->use_color != GIT_COLOR_ALWAYS)
4049                         options->use_color = GIT_COLOR_NEVER;
4050                 return argcount;
4051         } else
4052                 return 0;
4053         return 1;
4054 }
4055
4056 int parse_rename_score(const char **cp_p)
4057 {
4058         unsigned long num, scale;
4059         int ch, dot;
4060         const char *cp = *cp_p;
4061
4062         num = 0;
4063         scale = 1;
4064         dot = 0;
4065         for (;;) {
4066                 ch = *cp;
4067                 if ( !dot && ch == '.' ) {
4068                         scale = 1;
4069                         dot = 1;
4070                 } else if ( ch == '%' ) {
4071                         scale = dot ? scale*100 : 100;
4072                         cp++;   /* % is always at the end */
4073                         break;
4074                 } else if ( ch >= '0' && ch <= '9' ) {
4075                         if ( scale < 100000 ) {
4076                                 scale *= 10;
4077                                 num = (num*10) + (ch-'0');
4078                         }
4079                 } else {
4080                         break;
4081                 }
4082                 cp++;
4083         }
4084         *cp_p = cp;
4085
4086         /* user says num divided by scale and we say internally that
4087          * is MAX_SCORE * num / scale.
4088          */
4089         return (int)((num >= scale) ? MAX_SCORE : (MAX_SCORE * num / scale));
4090 }
4091
4092 static int diff_scoreopt_parse(const char *opt)
4093 {
4094         int opt1, opt2, cmd;
4095
4096         if (*opt++ != '-')
4097                 return -1;
4098         cmd = *opt++;
4099         if (cmd == '-') {
4100                 /* convert the long-form arguments into short-form versions */
4101                 if (skip_prefix(opt, "break-rewrites", &opt)) {
4102                         if (*opt == 0 || *opt++ == '=')
4103                                 cmd = 'B';
4104                 } else if (skip_prefix(opt, "find-copies", &opt)) {
4105                         if (*opt == 0 || *opt++ == '=')
4106                                 cmd = 'C';
4107                 } else if (skip_prefix(opt, "find-renames", &opt)) {
4108                         if (*opt == 0 || *opt++ == '=')
4109                                 cmd = 'M';
4110                 }
4111         }
4112         if (cmd != 'M' && cmd != 'C' && cmd != 'B')
4113                 return -1; /* that is not a -M, -C, or -B option */
4114
4115         opt1 = parse_rename_score(&opt);
4116         if (cmd != 'B')
4117                 opt2 = 0;
4118         else {
4119                 if (*opt == 0)
4120                         opt2 = 0;
4121                 else if (*opt != '/')
4122                         return -1; /* we expect -B80/99 or -B80 */
4123                 else {
4124                         opt++;
4125                         opt2 = parse_rename_score(&opt);
4126                 }
4127         }
4128         if (*opt != 0)
4129                 return -1;
4130         return opt1 | (opt2 << 16);
4131 }
4132
4133 struct diff_queue_struct diff_queued_diff;
4134
4135 void diff_q(struct diff_queue_struct *queue, struct diff_filepair *dp)
4136 {
4137         ALLOC_GROW(queue->queue, queue->nr + 1, queue->alloc);
4138         queue->queue[queue->nr++] = dp;
4139 }
4140
4141 struct diff_filepair *diff_queue(struct diff_queue_struct *queue,
4142                                  struct diff_filespec *one,
4143                                  struct diff_filespec *two)
4144 {
4145         struct diff_filepair *dp = xcalloc(1, sizeof(*dp));
4146         dp->one = one;
4147         dp->two = two;
4148         if (queue)
4149                 diff_q(queue, dp);
4150         return dp;
4151 }
4152
4153 void diff_free_filepair(struct diff_filepair *p)
4154 {
4155         free_filespec(p->one);
4156         free_filespec(p->two);
4157         free(p);
4158 }
4159
4160 /*
4161  * This is different from find_unique_abbrev() in that
4162  * it stuffs the result with dots for alignment.
4163  */
4164 const char *diff_unique_abbrev(const unsigned char *sha1, int len)
4165 {
4166         int abblen;
4167         const char *abbrev;
4168         if (len == 40)
4169                 return sha1_to_hex(sha1);
4170
4171         abbrev = find_unique_abbrev(sha1, len);
4172         abblen = strlen(abbrev);
4173
4174         /*
4175          * In well-behaved cases, where the abbbreviated result is the
4176          * same as the requested length, append three dots after the
4177          * abbreviation (hence the whole logic is limited to the case
4178          * where abblen < 37); when the actual abbreviated result is a
4179          * bit longer than the requested length, we reduce the number
4180          * of dots so that they match the well-behaved ones.  However,
4181          * if the actual abbreviation is longer than the requested
4182          * length by more than three, we give up on aligning, and add
4183          * three dots anyway, to indicate that the output is not the
4184          * full object name.  Yes, this may be suboptimal, but this
4185          * appears only in "diff --raw --abbrev" output and it is not
4186          * worth the effort to change it now.  Note that this would
4187          * likely to work fine when the automatic sizing of default
4188          * abbreviation length is used--we would be fed -1 in "len" in
4189          * that case, and will end up always appending three-dots, but
4190          * the automatic sizing is supposed to give abblen that ensures
4191          * uniqueness across all objects (statistically speaking).
4192          */
4193         if (abblen < 37) {
4194                 static char hex[41];
4195                 if (len < abblen && abblen <= len + 2)
4196                         xsnprintf(hex, sizeof(hex), "%s%.*s", abbrev, len+3-abblen, "..");
4197                 else
4198                         xsnprintf(hex, sizeof(hex), "%s...", abbrev);
4199                 return hex;
4200         }
4201         return sha1_to_hex(sha1);
4202 }
4203
4204 static void diff_flush_raw(struct diff_filepair *p, struct diff_options *opt)
4205 {
4206         int line_termination = opt->line_termination;
4207         int inter_name_termination = line_termination ? '\t' : '\0';
4208
4209         fprintf(opt->file, "%s", diff_line_prefix(opt));
4210         if (!(opt->output_format & DIFF_FORMAT_NAME_STATUS)) {
4211                 fprintf(opt->file, ":%06o %06o %s ", p->one->mode, p->two->mode,
4212                         diff_unique_abbrev(p->one->oid.hash, opt->abbrev));
4213                 fprintf(opt->file, "%s ",
4214                         diff_unique_abbrev(p->two->oid.hash, opt->abbrev));
4215         }
4216         if (p->score) {
4217                 fprintf(opt->file, "%c%03d%c", p->status, similarity_index(p),
4218                         inter_name_termination);
4219         } else {
4220                 fprintf(opt->file, "%c%c", p->status, inter_name_termination);
4221         }
4222
4223         if (p->status == DIFF_STATUS_COPIED ||
4224             p->status == DIFF_STATUS_RENAMED) {
4225                 const char *name_a, *name_b;
4226                 name_a = p->one->path;
4227                 name_b = p->two->path;
4228                 strip_prefix(opt->prefix_length, &name_a, &name_b);
4229                 write_name_quoted(name_a, opt->file, inter_name_termination);
4230                 write_name_quoted(name_b, opt->file, line_termination);
4231         } else {
4232                 const char *name_a, *name_b;
4233                 name_a = p->one->mode ? p->one->path : p->two->path;
4234                 name_b = NULL;
4235                 strip_prefix(opt->prefix_length, &name_a, &name_b);
4236                 write_name_quoted(name_a, opt->file, line_termination);
4237         }
4238 }
4239
4240 int diff_unmodified_pair(struct diff_filepair *p)
4241 {
4242         /* This function is written stricter than necessary to support
4243          * the currently implemented transformers, but the idea is to
4244          * let transformers to produce diff_filepairs any way they want,
4245          * and filter and clean them up here before producing the output.
4246          */
4247         struct diff_filespec *one = p->one, *two = p->two;
4248
4249         if (DIFF_PAIR_UNMERGED(p))
4250                 return 0; /* unmerged is interesting */
4251
4252         /* deletion, addition, mode or type change
4253          * and rename are all interesting.
4254          */
4255         if (DIFF_FILE_VALID(one) != DIFF_FILE_VALID(two) ||
4256             DIFF_PAIR_MODE_CHANGED(p) ||
4257             strcmp(one->path, two->path))
4258                 return 0;
4259
4260         /* both are valid and point at the same path.  that is, we are
4261          * dealing with a change.
4262          */
4263         if (one->oid_valid && two->oid_valid &&
4264             !oidcmp(&one->oid, &two->oid) &&
4265             !one->dirty_submodule && !two->dirty_submodule)
4266                 return 1; /* no change */
4267         if (!one->oid_valid && !two->oid_valid)
4268                 return 1; /* both look at the same file on the filesystem. */
4269         return 0;
4270 }
4271
4272 static void diff_flush_patch(struct diff_filepair *p, struct diff_options *o)
4273 {
4274         if (diff_unmodified_pair(p))
4275                 return;
4276
4277         if ((DIFF_FILE_VALID(p->one) && S_ISDIR(p->one->mode)) ||
4278             (DIFF_FILE_VALID(p->two) && S_ISDIR(p->two->mode)))
4279                 return; /* no tree diffs in patch format */
4280
4281         run_diff(p, o);
4282 }
4283
4284 static void diff_flush_stat(struct diff_filepair *p, struct diff_options *o,
4285                             struct diffstat_t *diffstat)
4286 {
4287         if (diff_unmodified_pair(p))
4288                 return;
4289
4290         if ((DIFF_FILE_VALID(p->one) && S_ISDIR(p->one->mode)) ||
4291             (DIFF_FILE_VALID(p->two) && S_ISDIR(p->two->mode)))
4292                 return; /* no useful stat for tree diffs */
4293
4294         run_diffstat(p, o, diffstat);
4295 }
4296
4297 static void diff_flush_checkdiff(struct diff_filepair *p,
4298                 struct diff_options *o)
4299 {
4300         if (diff_unmodified_pair(p))
4301                 return;
4302
4303         if ((DIFF_FILE_VALID(p->one) && S_ISDIR(p->one->mode)) ||
4304             (DIFF_FILE_VALID(p->two) && S_ISDIR(p->two->mode)))
4305                 return; /* nothing to check in tree diffs */
4306
4307         run_checkdiff(p, o);
4308 }
4309
4310 int diff_queue_is_empty(void)
4311 {
4312         struct diff_queue_struct *q = &diff_queued_diff;
4313         int i;
4314         for (i = 0; i < q->nr; i++)
4315                 if (!diff_unmodified_pair(q->queue[i]))
4316                         return 0;
4317         return 1;
4318 }
4319
4320 #if DIFF_DEBUG
4321 void diff_debug_filespec(struct diff_filespec *s, int x, const char *one)
4322 {
4323         fprintf(stderr, "queue[%d] %s (%s) %s %06o %s\n",
4324                 x, one ? one : "",
4325                 s->path,
4326                 DIFF_FILE_VALID(s) ? "valid" : "invalid",
4327                 s->mode,
4328                 s->oid_valid ? oid_to_hex(&s->oid) : "");
4329         fprintf(stderr, "queue[%d] %s size %lu\n",
4330                 x, one ? one : "",
4331                 s->size);
4332 }
4333
4334 void diff_debug_filepair(const struct diff_filepair *p, int i)
4335 {
4336         diff_debug_filespec(p->one, i, "one");
4337         diff_debug_filespec(p->two, i, "two");
4338         fprintf(stderr, "score %d, status %c rename_used %d broken %d\n",
4339                 p->score, p->status ? p->status : '?',
4340                 p->one->rename_used, p->broken_pair);
4341 }
4342
4343 void diff_debug_queue(const char *msg, struct diff_queue_struct *q)
4344 {
4345         int i;
4346         if (msg)
4347                 fprintf(stderr, "%s\n", msg);
4348         fprintf(stderr, "q->nr = %d\n", q->nr);
4349         for (i = 0; i < q->nr; i++) {
4350                 struct diff_filepair *p = q->queue[i];
4351                 diff_debug_filepair(p, i);
4352         }
4353 }
4354 #endif
4355
4356 static void diff_resolve_rename_copy(void)
4357 {
4358         int i;
4359         struct diff_filepair *p;
4360         struct diff_queue_struct *q = &diff_queued_diff;
4361
4362         diff_debug_queue("resolve-rename-copy", q);
4363
4364         for (i = 0; i < q->nr; i++) {
4365                 p = q->queue[i];
4366                 p->status = 0; /* undecided */
4367                 if (DIFF_PAIR_UNMERGED(p))
4368                         p->status = DIFF_STATUS_UNMERGED;
4369                 else if (!DIFF_FILE_VALID(p->one))
4370                         p->status = DIFF_STATUS_ADDED;
4371                 else if (!DIFF_FILE_VALID(p->two))
4372                         p->status = DIFF_STATUS_DELETED;
4373                 else if (DIFF_PAIR_TYPE_CHANGED(p))
4374                         p->status = DIFF_STATUS_TYPE_CHANGED;
4375
4376                 /* from this point on, we are dealing with a pair
4377                  * whose both sides are valid and of the same type, i.e.
4378                  * either in-place edit or rename/copy edit.
4379                  */
4380                 else if (DIFF_PAIR_RENAME(p)) {
4381                         /*
4382                          * A rename might have re-connected a broken
4383                          * pair up, causing the pathnames to be the
4384                          * same again. If so, that's not a rename at
4385                          * all, just a modification..
4386                          *
4387                          * Otherwise, see if this source was used for
4388                          * multiple renames, in which case we decrement
4389                          * the count, and call it a copy.
4390                          */
4391                         if (!strcmp(p->one->path, p->two->path))
4392                                 p->status = DIFF_STATUS_MODIFIED;
4393                         else if (--p->one->rename_used > 0)
4394                                 p->status = DIFF_STATUS_COPIED;
4395                         else
4396                                 p->status = DIFF_STATUS_RENAMED;
4397                 }
4398                 else if (oidcmp(&p->one->oid, &p->two->oid) ||
4399                          p->one->mode != p->two->mode ||
4400                          p->one->dirty_submodule ||
4401                          p->two->dirty_submodule ||
4402                          is_null_oid(&p->one->oid))
4403                         p->status = DIFF_STATUS_MODIFIED;
4404                 else {
4405                         /* This is a "no-change" entry and should not
4406                          * happen anymore, but prepare for broken callers.
4407                          */
4408                         error("feeding unmodified %s to diffcore",
4409                               p->one->path);
4410                         p->status = DIFF_STATUS_UNKNOWN;
4411                 }
4412         }
4413         diff_debug_queue("resolve-rename-copy done", q);
4414 }
4415
4416 static int check_pair_status(struct diff_filepair *p)
4417 {
4418         switch (p->status) {
4419         case DIFF_STATUS_UNKNOWN:
4420                 return 0;
4421         case 0:
4422                 die("internal error in diff-resolve-rename-copy");
4423         default:
4424                 return 1;
4425         }
4426 }
4427
4428 static void flush_one_pair(struct diff_filepair *p, struct diff_options *opt)
4429 {
4430         int fmt = opt->output_format;
4431
4432         if (fmt & DIFF_FORMAT_CHECKDIFF)
4433                 diff_flush_checkdiff(p, opt);
4434         else if (fmt & (DIFF_FORMAT_RAW | DIFF_FORMAT_NAME_STATUS))
4435                 diff_flush_raw(p, opt);
4436         else if (fmt & DIFF_FORMAT_NAME) {
4437                 const char *name_a, *name_b;
4438                 name_a = p->two->path;
4439                 name_b = NULL;
4440                 strip_prefix(opt->prefix_length, &name_a, &name_b);
4441                 write_name_quoted(name_a, opt->file, opt->line_termination);
4442         }
4443 }
4444
4445 static void show_file_mode_name(FILE *file, const char *newdelete, struct diff_filespec *fs)
4446 {
4447         if (fs->mode)
4448                 fprintf(file, " %s mode %06o ", newdelete, fs->mode);
4449         else
4450                 fprintf(file, " %s ", newdelete);
4451         write_name_quoted(fs->path, file, '\n');
4452 }
4453
4454
4455 static void show_mode_change(FILE *file, struct diff_filepair *p, int show_name,
4456                 const char *line_prefix)
4457 {
4458         if (p->one->mode && p->two->mode && p->one->mode != p->two->mode) {
4459                 fprintf(file, "%s mode change %06o => %06o%c", line_prefix, p->one->mode,
4460                         p->two->mode, show_name ? ' ' : '\n');
4461                 if (show_name) {
4462                         write_name_quoted(p->two->path, file, '\n');
4463                 }
4464         }
4465 }
4466
4467 static void show_rename_copy(FILE *file, const char *renamecopy, struct diff_filepair *p,
4468                         const char *line_prefix)
4469 {
4470         char *names = pprint_rename(p->one->path, p->two->path);
4471
4472         fprintf(file, " %s %s (%d%%)\n", renamecopy, names, similarity_index(p));
4473         free(names);
4474         show_mode_change(file, p, 0, line_prefix);
4475 }
4476
4477 static void diff_summary(struct diff_options *opt, struct diff_filepair *p)
4478 {
4479         FILE *file = opt->file;
4480         const char *line_prefix = diff_line_prefix(opt);
4481
4482         switch(p->status) {
4483         case DIFF_STATUS_DELETED:
4484                 fputs(line_prefix, file);
4485                 show_file_mode_name(file, "delete", p->one);
4486                 break;
4487         case DIFF_STATUS_ADDED:
4488                 fputs(line_prefix, file);
4489                 show_file_mode_name(file, "create", p->two);
4490                 break;
4491         case DIFF_STATUS_COPIED:
4492                 fputs(line_prefix, file);
4493                 show_rename_copy(file, "copy", p, line_prefix);
4494                 break;
4495         case DIFF_STATUS_RENAMED:
4496                 fputs(line_prefix, file);
4497                 show_rename_copy(file, "rename", p, line_prefix);
4498                 break;
4499         default:
4500                 if (p->score) {
4501                         fprintf(file, "%s rewrite ", line_prefix);
4502                         write_name_quoted(p->two->path, file, ' ');
4503                         fprintf(file, "(%d%%)\n", similarity_index(p));
4504                 }
4505                 show_mode_change(file, p, !p->score, line_prefix);
4506                 break;
4507         }
4508 }
4509
4510 struct patch_id_t {
4511         git_SHA_CTX *ctx;
4512         int patchlen;
4513 };
4514
4515 static int remove_space(char *line, int len)
4516 {
4517         int i;
4518         char *dst = line;
4519         unsigned char c;
4520
4521         for (i = 0; i < len; i++)
4522                 if (!isspace((c = line[i])))
4523                         *dst++ = c;
4524
4525         return dst - line;
4526 }
4527
4528 static void patch_id_consume(void *priv, char *line, unsigned long len)
4529 {
4530         struct patch_id_t *data = priv;
4531         int new_len;
4532
4533         /* Ignore line numbers when computing the SHA1 of the patch */
4534         if (starts_with(line, "@@ -"))
4535                 return;
4536
4537         new_len = remove_space(line, len);
4538
4539         git_SHA1_Update(data->ctx, line, new_len);
4540         data->patchlen += new_len;
4541 }
4542
4543 /* returns 0 upon success, and writes result into sha1 */
4544 static int diff_get_patch_id(struct diff_options *options, unsigned char *sha1, int diff_header_only)
4545 {
4546         struct diff_queue_struct *q = &diff_queued_diff;
4547         int i;
4548         git_SHA_CTX ctx;
4549         struct patch_id_t data;
4550         char buffer[PATH_MAX * 4 + 20];
4551
4552         git_SHA1_Init(&ctx);
4553         memset(&data, 0, sizeof(struct patch_id_t));
4554         data.ctx = &ctx;
4555
4556         for (i = 0; i < q->nr; i++) {
4557                 xpparam_t xpp;
4558                 xdemitconf_t xecfg;
4559                 mmfile_t mf1, mf2;
4560                 struct diff_filepair *p = q->queue[i];
4561                 int len1, len2;
4562
4563                 memset(&xpp, 0, sizeof(xpp));
4564                 memset(&xecfg, 0, sizeof(xecfg));
4565                 if (p->status == 0)
4566                         return error("internal diff status error");
4567                 if (p->status == DIFF_STATUS_UNKNOWN)
4568                         continue;
4569                 if (diff_unmodified_pair(p))
4570                         continue;
4571                 if ((DIFF_FILE_VALID(p->one) && S_ISDIR(p->one->mode)) ||
4572                     (DIFF_FILE_VALID(p->two) && S_ISDIR(p->two->mode)))
4573                         continue;
4574                 if (DIFF_PAIR_UNMERGED(p))
4575                         continue;
4576
4577                 diff_fill_sha1_info(p->one);
4578                 diff_fill_sha1_info(p->two);
4579
4580                 len1 = remove_space(p->one->path, strlen(p->one->path));
4581                 len2 = remove_space(p->two->path, strlen(p->two->path));
4582                 if (p->one->mode == 0)
4583                         len1 = snprintf(buffer, sizeof(buffer),
4584                                         "diff--gita/%.*sb/%.*s"
4585                                         "newfilemode%06o"
4586                                         "---/dev/null"
4587                                         "+++b/%.*s",
4588                                         len1, p->one->path,
4589                                         len2, p->two->path,
4590                                         p->two->mode,
4591                                         len2, p->two->path);
4592                 else if (p->two->mode == 0)
4593                         len1 = snprintf(buffer, sizeof(buffer),
4594                                         "diff--gita/%.*sb/%.*s"
4595                                         "deletedfilemode%06o"
4596                                         "---a/%.*s"
4597                                         "+++/dev/null",
4598                                         len1, p->one->path,
4599                                         len2, p->two->path,
4600                                         p->one->mode,
4601                                         len1, p->one->path);
4602                 else
4603                         len1 = snprintf(buffer, sizeof(buffer),
4604                                         "diff--gita/%.*sb/%.*s"
4605                                         "---a/%.*s"
4606                                         "+++b/%.*s",
4607                                         len1, p->one->path,
4608                                         len2, p->two->path,
4609                                         len1, p->one->path,
4610                                         len2, p->two->path);
4611                 git_SHA1_Update(&ctx, buffer, len1);
4612
4613                 if (diff_header_only)
4614                         continue;
4615
4616                 if (fill_mmfile(&mf1, p->one) < 0 ||
4617                     fill_mmfile(&mf2, p->two) < 0)
4618                         return error("unable to read files to diff");
4619
4620                 if (diff_filespec_is_binary(p->one) ||
4621                     diff_filespec_is_binary(p->two)) {
4622                         git_SHA1_Update(&ctx, oid_to_hex(&p->one->oid),
4623                                         40);
4624                         git_SHA1_Update(&ctx, oid_to_hex(&p->two->oid),
4625                                         40);
4626                         continue;
4627                 }
4628
4629                 xpp.flags = 0;
4630                 xecfg.ctxlen = 3;
4631                 xecfg.flags = 0;
4632                 if (xdi_diff_outf(&mf1, &mf2, patch_id_consume, &data,
4633                                   &xpp, &xecfg))
4634                         return error("unable to generate patch-id diff for %s",
4635                                      p->one->path);
4636         }
4637
4638         git_SHA1_Final(sha1, &ctx);
4639         return 0;
4640 }
4641
4642 int diff_flush_patch_id(struct diff_options *options, unsigned char *sha1, int diff_header_only)
4643 {
4644         struct diff_queue_struct *q = &diff_queued_diff;
4645         int i;
4646         int result = diff_get_patch_id(options, sha1, diff_header_only);
4647
4648         for (i = 0; i < q->nr; i++)
4649                 diff_free_filepair(q->queue[i]);
4650
4651         free(q->queue);
4652         DIFF_QUEUE_CLEAR(q);
4653
4654         return result;
4655 }
4656
4657 static int is_summary_empty(const struct diff_queue_struct *q)
4658 {
4659         int i;
4660
4661         for (i = 0; i < q->nr; i++) {
4662                 const struct diff_filepair *p = q->queue[i];
4663
4664                 switch (p->status) {
4665                 case DIFF_STATUS_DELETED:
4666                 case DIFF_STATUS_ADDED:
4667                 case DIFF_STATUS_COPIED:
4668                 case DIFF_STATUS_RENAMED:
4669                         return 0;
4670                 default:
4671                         if (p->score)
4672                                 return 0;
4673                         if (p->one->mode && p->two->mode &&
4674                             p->one->mode != p->two->mode)
4675                                 return 0;
4676                         break;
4677                 }
4678         }
4679         return 1;
4680 }
4681
4682 static const char rename_limit_warning[] =
4683 "inexact rename detection was skipped due to too many files.";
4684
4685 static const char degrade_cc_to_c_warning[] =
4686 "only found copies from modified paths due to too many files.";
4687
4688 static const char rename_limit_advice[] =
4689 "you may want to set your %s variable to at least "
4690 "%d and retry the command.";
4691
4692 void diff_warn_rename_limit(const char *varname, int needed, int degraded_cc)
4693 {
4694         if (degraded_cc)
4695                 warning(degrade_cc_to_c_warning);
4696         else if (needed)
4697                 warning(rename_limit_warning);
4698         else
4699                 return;
4700         if (0 < needed && needed < 32767)
4701                 warning(rename_limit_advice, varname, needed);
4702 }
4703
4704 void diff_flush(struct diff_options *options)
4705 {
4706         struct diff_queue_struct *q = &diff_queued_diff;
4707         int i, output_format = options->output_format;
4708         int separator = 0;
4709         int dirstat_by_line = 0;
4710
4711         /*
4712          * Order: raw, stat, summary, patch
4713          * or:    name/name-status/checkdiff (other bits clear)
4714          */
4715         if (!q->nr)
4716                 goto free_queue;
4717
4718         if (output_format & (DIFF_FORMAT_RAW |
4719                              DIFF_FORMAT_NAME |
4720                              DIFF_FORMAT_NAME_STATUS |
4721                              DIFF_FORMAT_CHECKDIFF)) {
4722                 for (i = 0; i < q->nr; i++) {
4723                         struct diff_filepair *p = q->queue[i];
4724                         if (check_pair_status(p))
4725                                 flush_one_pair(p, options);
4726                 }
4727                 separator++;
4728         }
4729
4730         if (output_format & DIFF_FORMAT_DIRSTAT && DIFF_OPT_TST(options, DIRSTAT_BY_LINE))
4731                 dirstat_by_line = 1;
4732
4733         if (output_format & (DIFF_FORMAT_DIFFSTAT|DIFF_FORMAT_SHORTSTAT|DIFF_FORMAT_NUMSTAT) ||
4734             dirstat_by_line) {
4735                 struct diffstat_t diffstat;
4736
4737                 memset(&diffstat, 0, sizeof(struct diffstat_t));
4738                 for (i = 0; i < q->nr; i++) {
4739                         struct diff_filepair *p = q->queue[i];
4740                         if (check_pair_status(p))
4741                                 diff_flush_stat(p, options, &diffstat);
4742                 }
4743                 if (output_format & DIFF_FORMAT_NUMSTAT)
4744                         show_numstat(&diffstat, options);
4745                 if (output_format & DIFF_FORMAT_DIFFSTAT)
4746                         show_stats(&diffstat, options);
4747                 if (output_format & DIFF_FORMAT_SHORTSTAT)
4748                         show_shortstats(&diffstat, options);
4749                 if (output_format & DIFF_FORMAT_DIRSTAT && dirstat_by_line)
4750                         show_dirstat_by_line(&diffstat, options);
4751                 free_diffstat_info(&diffstat);
4752                 separator++;
4753         }
4754         if ((output_format & DIFF_FORMAT_DIRSTAT) && !dirstat_by_line)
4755                 show_dirstat(options);
4756
4757         if (output_format & DIFF_FORMAT_SUMMARY && !is_summary_empty(q)) {
4758                 for (i = 0; i < q->nr; i++) {
4759                         diff_summary(options, q->queue[i]);
4760                 }
4761                 separator++;
4762         }
4763
4764         if (output_format & DIFF_FORMAT_NO_OUTPUT &&
4765             DIFF_OPT_TST(options, EXIT_WITH_STATUS) &&
4766             DIFF_OPT_TST(options, DIFF_FROM_CONTENTS)) {
4767                 /*
4768                  * run diff_flush_patch for the exit status. setting
4769                  * options->file to /dev/null should be safe, because we
4770                  * aren't supposed to produce any output anyway.
4771                  */
4772                 if (options->close_file)
4773                         fclose(options->file);
4774                 options->file = fopen("/dev/null", "w");
4775                 if (!options->file)
4776                         die_errno("Could not open /dev/null");
4777                 options->close_file = 1;
4778                 for (i = 0; i < q->nr; i++) {
4779                         struct diff_filepair *p = q->queue[i];
4780                         if (check_pair_status(p))
4781                                 diff_flush_patch(p, options);
4782                         if (options->found_changes)
4783                                 break;
4784                 }
4785         }
4786
4787         if (output_format & DIFF_FORMAT_PATCH) {
4788                 if (separator) {
4789                         fprintf(options->file, "%s%c",
4790                                 diff_line_prefix(options),
4791                                 options->line_termination);
4792                         if (options->stat_sep) {
4793                                 /* attach patch instead of inline */
4794                                 fputs(options->stat_sep, options->file);
4795                         }
4796                 }
4797
4798                 for (i = 0; i < q->nr; i++) {
4799                         struct diff_filepair *p = q->queue[i];
4800                         if (check_pair_status(p))
4801                                 diff_flush_patch(p, options);
4802                 }
4803         }
4804
4805         if (output_format & DIFF_FORMAT_CALLBACK)
4806                 options->format_callback(q, options, options->format_callback_data);
4807
4808         for (i = 0; i < q->nr; i++)
4809                 diff_free_filepair(q->queue[i]);
4810 free_queue:
4811         free(q->queue);
4812         DIFF_QUEUE_CLEAR(q);
4813         if (options->close_file)
4814                 fclose(options->file);
4815
4816         /*
4817          * Report the content-level differences with HAS_CHANGES;
4818          * diff_addremove/diff_change does not set the bit when
4819          * DIFF_FROM_CONTENTS is in effect (e.g. with -w).
4820          */
4821         if (DIFF_OPT_TST(options, DIFF_FROM_CONTENTS)) {
4822                 if (options->found_changes)
4823                         DIFF_OPT_SET(options, HAS_CHANGES);
4824                 else
4825                         DIFF_OPT_CLR(options, HAS_CHANGES);
4826         }
4827 }
4828
4829 static int match_filter(const struct diff_options *options, const struct diff_filepair *p)
4830 {
4831         return (((p->status == DIFF_STATUS_MODIFIED) &&
4832                  ((p->score &&
4833                    filter_bit_tst(DIFF_STATUS_FILTER_BROKEN, options)) ||
4834                   (!p->score &&
4835                    filter_bit_tst(DIFF_STATUS_MODIFIED, options)))) ||
4836                 ((p->status != DIFF_STATUS_MODIFIED) &&
4837                  filter_bit_tst(p->status, options)));
4838 }
4839
4840 static void diffcore_apply_filter(struct diff_options *options)
4841 {
4842         int i;
4843         struct diff_queue_struct *q = &diff_queued_diff;
4844         struct diff_queue_struct outq;
4845
4846         DIFF_QUEUE_CLEAR(&outq);
4847
4848         if (!options->filter)
4849                 return;
4850
4851         if (filter_bit_tst(DIFF_STATUS_FILTER_AON, options)) {
4852                 int found;
4853                 for (i = found = 0; !found && i < q->nr; i++) {
4854                         if (match_filter(options, q->queue[i]))
4855                                 found++;
4856                 }
4857                 if (found)
4858                         return;
4859
4860                 /* otherwise we will clear the whole queue
4861                  * by copying the empty outq at the end of this
4862                  * function, but first clear the current entries
4863                  * in the queue.
4864                  */
4865                 for (i = 0; i < q->nr; i++)
4866                         diff_free_filepair(q->queue[i]);
4867         }
4868         else {
4869                 /* Only the matching ones */
4870                 for (i = 0; i < q->nr; i++) {
4871                         struct diff_filepair *p = q->queue[i];
4872                         if (match_filter(options, p))
4873                                 diff_q(&outq, p);
4874                         else
4875                                 diff_free_filepair(p);
4876                 }
4877         }
4878         free(q->queue);
4879         *q = outq;
4880 }
4881
4882 /* Check whether two filespecs with the same mode and size are identical */
4883 static int diff_filespec_is_identical(struct diff_filespec *one,
4884                                       struct diff_filespec *two)
4885 {
4886         if (S_ISGITLINK(one->mode))
4887                 return 0;
4888         if (diff_populate_filespec(one, 0))
4889                 return 0;
4890         if (diff_populate_filespec(two, 0))
4891                 return 0;
4892         return !memcmp(one->data, two->data, one->size);
4893 }
4894
4895 static int diff_filespec_check_stat_unmatch(struct diff_filepair *p)
4896 {
4897         if (p->done_skip_stat_unmatch)
4898                 return p->skip_stat_unmatch_result;
4899
4900         p->done_skip_stat_unmatch = 1;
4901         p->skip_stat_unmatch_result = 0;
4902         /*
4903          * 1. Entries that come from stat info dirtiness
4904          *    always have both sides (iow, not create/delete),
4905          *    one side of the object name is unknown, with
4906          *    the same mode and size.  Keep the ones that
4907          *    do not match these criteria.  They have real
4908          *    differences.
4909          *
4910          * 2. At this point, the file is known to be modified,
4911          *    with the same mode and size, and the object
4912          *    name of one side is unknown.  Need to inspect
4913          *    the identical contents.
4914          */
4915         if (!DIFF_FILE_VALID(p->one) || /* (1) */
4916             !DIFF_FILE_VALID(p->two) ||
4917             (p->one->oid_valid && p->two->oid_valid) ||
4918             (p->one->mode != p->two->mode) ||
4919             diff_populate_filespec(p->one, CHECK_SIZE_ONLY) ||
4920             diff_populate_filespec(p->two, CHECK_SIZE_ONLY) ||
4921             (p->one->size != p->two->size) ||
4922             !diff_filespec_is_identical(p->one, p->two)) /* (2) */
4923                 p->skip_stat_unmatch_result = 1;
4924         return p->skip_stat_unmatch_result;
4925 }
4926
4927 static void diffcore_skip_stat_unmatch(struct diff_options *diffopt)
4928 {
4929         int i;
4930         struct diff_queue_struct *q = &diff_queued_diff;
4931         struct diff_queue_struct outq;
4932         DIFF_QUEUE_CLEAR(&outq);
4933
4934         for (i = 0; i < q->nr; i++) {
4935                 struct diff_filepair *p = q->queue[i];
4936
4937                 if (diff_filespec_check_stat_unmatch(p))
4938                         diff_q(&outq, p);
4939                 else {
4940                         /*
4941                          * The caller can subtract 1 from skip_stat_unmatch
4942                          * to determine how many paths were dirty only
4943                          * due to stat info mismatch.
4944                          */
4945                         if (!DIFF_OPT_TST(diffopt, NO_INDEX))
4946                                 diffopt->skip_stat_unmatch++;
4947                         diff_free_filepair(p);
4948                 }
4949         }
4950         free(q->queue);
4951         *q = outq;
4952 }
4953
4954 static int diffnamecmp(const void *a_, const void *b_)
4955 {
4956         const struct diff_filepair *a = *((const struct diff_filepair **)a_);
4957         const struct diff_filepair *b = *((const struct diff_filepair **)b_);
4958         const char *name_a, *name_b;
4959
4960         name_a = a->one ? a->one->path : a->two->path;
4961         name_b = b->one ? b->one->path : b->two->path;
4962         return strcmp(name_a, name_b);
4963 }
4964
4965 void diffcore_fix_diff_index(struct diff_options *options)
4966 {
4967         struct diff_queue_struct *q = &diff_queued_diff;
4968         QSORT(q->queue, q->nr, diffnamecmp);
4969 }
4970
4971 void diffcore_std(struct diff_options *options)
4972 {
4973         /* NOTE please keep the following in sync with diff_tree_combined() */
4974         if (options->skip_stat_unmatch)
4975                 diffcore_skip_stat_unmatch(options);
4976         if (!options->found_follow) {
4977                 /* See try_to_follow_renames() in tree-diff.c */
4978                 if (options->break_opt != -1)
4979                         diffcore_break(options->break_opt);
4980                 if (options->detect_rename)
4981                         diffcore_rename(options);
4982                 if (options->break_opt != -1)
4983                         diffcore_merge_broken();
4984         }
4985         if (options->pickaxe)
4986                 diffcore_pickaxe(options);
4987         if (options->orderfile)
4988                 diffcore_order(options->orderfile);
4989         if (!options->found_follow)
4990                 /* See try_to_follow_renames() in tree-diff.c */
4991                 diff_resolve_rename_copy();
4992         diffcore_apply_filter(options);
4993
4994         if (diff_queued_diff.nr && !DIFF_OPT_TST(options, DIFF_FROM_CONTENTS))
4995                 DIFF_OPT_SET(options, HAS_CHANGES);
4996         else
4997                 DIFF_OPT_CLR(options, HAS_CHANGES);
4998
4999         options->found_follow = 0;
5000 }
5001
5002 int diff_result_code(struct diff_options *opt, int status)
5003 {
5004         int result = 0;
5005
5006         diff_warn_rename_limit("diff.renameLimit",
5007                                opt->needed_rename_limit,
5008                                opt->degraded_cc_to_c);
5009         if (!DIFF_OPT_TST(opt, EXIT_WITH_STATUS) &&
5010             !(opt->output_format & DIFF_FORMAT_CHECKDIFF))
5011                 return status;
5012         if (DIFF_OPT_TST(opt, EXIT_WITH_STATUS) &&
5013             DIFF_OPT_TST(opt, HAS_CHANGES))
5014                 result |= 01;
5015         if ((opt->output_format & DIFF_FORMAT_CHECKDIFF) &&
5016             DIFF_OPT_TST(opt, CHECK_FAILED))
5017                 result |= 02;
5018         return result;
5019 }
5020
5021 int diff_can_quit_early(struct diff_options *opt)
5022 {
5023         return (DIFF_OPT_TST(opt, QUICK) &&
5024                 !opt->filter &&
5025                 DIFF_OPT_TST(opt, HAS_CHANGES));
5026 }
5027
5028 /*
5029  * Shall changes to this submodule be ignored?
5030  *
5031  * Submodule changes can be configured to be ignored separately for each path,
5032  * but that configuration can be overridden from the command line.
5033  */
5034 static int is_submodule_ignored(const char *path, struct diff_options *options)
5035 {
5036         int ignored = 0;
5037         unsigned orig_flags = options->flags;
5038         if (!DIFF_OPT_TST(options, OVERRIDE_SUBMODULE_CONFIG))
5039                 set_diffopt_flags_from_submodule_config(options, path);
5040         if (DIFF_OPT_TST(options, IGNORE_SUBMODULES))
5041                 ignored = 1;
5042         options->flags = orig_flags;
5043         return ignored;
5044 }
5045
5046 void diff_addremove(struct diff_options *options,
5047                     int addremove, unsigned mode,
5048                     const unsigned char *sha1,
5049                     int sha1_valid,
5050                     const char *concatpath, unsigned dirty_submodule)
5051 {
5052         struct diff_filespec *one, *two;
5053
5054         if (S_ISGITLINK(mode) && is_submodule_ignored(concatpath, options))
5055                 return;
5056
5057         /* This may look odd, but it is a preparation for
5058          * feeding "there are unchanged files which should
5059          * not produce diffs, but when you are doing copy
5060          * detection you would need them, so here they are"
5061          * entries to the diff-core.  They will be prefixed
5062          * with something like '=' or '*' (I haven't decided
5063          * which but should not make any difference).
5064          * Feeding the same new and old to diff_change()
5065          * also has the same effect.
5066          * Before the final output happens, they are pruned after
5067          * merged into rename/copy pairs as appropriate.
5068          */
5069         if (DIFF_OPT_TST(options, REVERSE_DIFF))
5070                 addremove = (addremove == '+' ? '-' :
5071                              addremove == '-' ? '+' : addremove);
5072
5073         if (options->prefix &&
5074             strncmp(concatpath, options->prefix, options->prefix_length))
5075                 return;
5076
5077         one = alloc_filespec(concatpath);
5078         two = alloc_filespec(concatpath);
5079
5080         if (addremove != '+')
5081                 fill_filespec(one, sha1, sha1_valid, mode);
5082         if (addremove != '-') {
5083                 fill_filespec(two, sha1, sha1_valid, mode);
5084                 two->dirty_submodule = dirty_submodule;
5085         }
5086
5087         diff_queue(&diff_queued_diff, one, two);
5088         if (!DIFF_OPT_TST(options, DIFF_FROM_CONTENTS))
5089                 DIFF_OPT_SET(options, HAS_CHANGES);
5090 }
5091
5092 void diff_change(struct diff_options *options,
5093                  unsigned old_mode, unsigned new_mode,
5094                  const unsigned char *old_sha1,
5095                  const unsigned char *new_sha1,
5096                  int old_sha1_valid, int new_sha1_valid,
5097                  const char *concatpath,
5098                  unsigned old_dirty_submodule, unsigned new_dirty_submodule)
5099 {
5100         struct diff_filespec *one, *two;
5101         struct diff_filepair *p;
5102
5103         if (S_ISGITLINK(old_mode) && S_ISGITLINK(new_mode) &&
5104             is_submodule_ignored(concatpath, options))
5105                 return;
5106
5107         if (DIFF_OPT_TST(options, REVERSE_DIFF)) {
5108                 unsigned tmp;
5109                 const unsigned char *tmp_c;
5110                 tmp = old_mode; old_mode = new_mode; new_mode = tmp;
5111                 tmp_c = old_sha1; old_sha1 = new_sha1; new_sha1 = tmp_c;
5112                 tmp = old_sha1_valid; old_sha1_valid = new_sha1_valid;
5113                         new_sha1_valid = tmp;
5114                 tmp = old_dirty_submodule; old_dirty_submodule = new_dirty_submodule;
5115                         new_dirty_submodule = tmp;
5116         }
5117
5118         if (options->prefix &&
5119             strncmp(concatpath, options->prefix, options->prefix_length))
5120                 return;
5121
5122         one = alloc_filespec(concatpath);
5123         two = alloc_filespec(concatpath);
5124         fill_filespec(one, old_sha1, old_sha1_valid, old_mode);
5125         fill_filespec(two, new_sha1, new_sha1_valid, new_mode);
5126         one->dirty_submodule = old_dirty_submodule;
5127         two->dirty_submodule = new_dirty_submodule;
5128         p = diff_queue(&diff_queued_diff, one, two);
5129
5130         if (DIFF_OPT_TST(options, DIFF_FROM_CONTENTS))
5131                 return;
5132
5133         if (DIFF_OPT_TST(options, QUICK) && options->skip_stat_unmatch &&
5134             !diff_filespec_check_stat_unmatch(p))
5135                 return;
5136
5137         DIFF_OPT_SET(options, HAS_CHANGES);
5138 }
5139
5140 struct diff_filepair *diff_unmerge(struct diff_options *options, const char *path)
5141 {
5142         struct diff_filepair *pair;
5143         struct diff_filespec *one, *two;
5144
5145         if (options->prefix &&
5146             strncmp(path, options->prefix, options->prefix_length))
5147                 return NULL;
5148
5149         one = alloc_filespec(path);
5150         two = alloc_filespec(path);
5151         pair = diff_queue(&diff_queued_diff, one, two);
5152         pair->is_unmerged = 1;
5153         return pair;
5154 }
5155
5156 static char *run_textconv(const char *pgm, struct diff_filespec *spec,
5157                 size_t *outsize)
5158 {
5159         struct diff_tempfile *temp;
5160         const char *argv[3];
5161         const char **arg = argv;
5162         struct child_process child = CHILD_PROCESS_INIT;
5163         struct strbuf buf = STRBUF_INIT;
5164         int err = 0;
5165
5166         temp = prepare_temp_file(spec->path, spec);
5167         *arg++ = pgm;
5168         *arg++ = temp->name;
5169         *arg = NULL;
5170
5171         child.use_shell = 1;
5172         child.argv = argv;
5173         child.out = -1;
5174         if (start_command(&child)) {
5175                 remove_tempfile();
5176                 return NULL;
5177         }
5178
5179         if (strbuf_read(&buf, child.out, 0) < 0)
5180                 err = error("error reading from textconv command '%s'", pgm);
5181         close(child.out);
5182
5183         if (finish_command(&child) || err) {
5184                 strbuf_release(&buf);
5185                 remove_tempfile();
5186                 return NULL;
5187         }
5188         remove_tempfile();
5189
5190         return strbuf_detach(&buf, outsize);
5191 }
5192
5193 size_t fill_textconv(struct userdiff_driver *driver,
5194                      struct diff_filespec *df,
5195                      char **outbuf)
5196 {
5197         size_t size;
5198
5199         if (!driver) {
5200                 if (!DIFF_FILE_VALID(df)) {
5201                         *outbuf = "";
5202                         return 0;
5203                 }
5204                 if (diff_populate_filespec(df, 0))
5205                         die("unable to read files to diff");
5206                 *outbuf = df->data;
5207                 return df->size;
5208         }
5209
5210         if (!driver->textconv)
5211                 die("BUG: fill_textconv called with non-textconv driver");
5212
5213         if (driver->textconv_cache && df->oid_valid) {
5214                 *outbuf = notes_cache_get(driver->textconv_cache,
5215                                           df->oid.hash,
5216                                           &size);
5217                 if (*outbuf)
5218                         return size;
5219         }
5220
5221         *outbuf = run_textconv(driver->textconv, df, &size);
5222         if (!*outbuf)
5223                 die("unable to read files to diff");
5224
5225         if (driver->textconv_cache && df->oid_valid) {
5226                 /* ignore errors, as we might be in a readonly repository */
5227                 notes_cache_put(driver->textconv_cache, df->oid.hash, *outbuf,
5228                                 size);
5229                 /*
5230                  * we could save up changes and flush them all at the end,
5231                  * but we would need an extra call after all diffing is done.
5232                  * Since generating a cache entry is the slow path anyway,
5233                  * this extra overhead probably isn't a big deal.
5234                  */
5235                 notes_cache_write(driver->textconv_cache);
5236         }
5237
5238         return size;
5239 }
5240
5241 void setup_diff_pager(struct diff_options *opt)
5242 {
5243         /*
5244          * If the user asked for our exit code, then either they want --quiet
5245          * or --exit-code. We should definitely not bother with a pager in the
5246          * former case, as we will generate no output. Since we still properly
5247          * report our exit code even when a pager is run, we _could_ run a
5248          * pager with --exit-code. But since we have not done so historically,
5249          * and because it is easy to find people oneline advising "git diff
5250          * --exit-code" in hooks and other scripts, we do not do so.
5251          */
5252         if (!DIFF_OPT_TST(opt, EXIT_WITH_STATUS) &&
5253             check_pager_config("diff") != 0)
5254                 setup_pager();
5255 }