Add the --color-words option to the diff options family
[git/git.git] / diff.c
CommitLineData
6973dcae
JH
1/*
2 * Copyright (C) 2005 Junio C Hamano
3 */
4#include <sys/types.h>
5#include <sys/wait.h>
6#include <signal.h>
7#include "cache.h"
8#include "quote.h"
9#include "diff.h"
10#include "diffcore.h"
051308f6 11#include "delta.h"
6973dcae
JH
12#include "xdiff-interface.h"
13
14static int use_size_cache;
15
b68ea12e 16static int diff_detect_rename_default = 0;
801235c5
JH
17static int diff_rename_limit_default = -1;
18static int diff_use_color_default = 0;
6973dcae 19
f5b571fc
TH
20/* "\033[1;38;5;2xx;48;5;2xxm\0" is 23 bytes */
21static char diff_colors[][24] = {
f37399e6
TH
22 "\033[m", /* reset */
23 "", /* normal */
24 "\033[1m", /* bold */
25 "\033[36m", /* cyan */
26 "\033[31m", /* red */
ce436973
JK
27 "\033[32m", /* green */
28 "\033[33m" /* yellow */
cd112cef
JS
29};
30
801235c5
JH
31static int parse_diff_color_slot(const char *var, int ofs)
32{
33 if (!strcasecmp(var+ofs, "plain"))
34 return DIFF_PLAIN;
35 if (!strcasecmp(var+ofs, "meta"))
36 return DIFF_METAINFO;
37 if (!strcasecmp(var+ofs, "frag"))
38 return DIFF_FRAGINFO;
39 if (!strcasecmp(var+ofs, "old"))
40 return DIFF_FILE_OLD;
41 if (!strcasecmp(var+ofs, "new"))
42 return DIFF_FILE_NEW;
ce436973
JK
43 if (!strcasecmp(var+ofs, "commit"))
44 return DIFF_COMMIT;
801235c5
JH
45 die("bad config variable '%s'", var);
46}
47
f37399e6 48static int parse_color(const char *name, int len)
801235c5 49{
f37399e6
TH
50 static const char * const color_names[] = {
51 "normal", "black", "red", "green", "yellow",
52 "blue", "magenta", "cyan", "white"
53 };
f5b571fc 54 char *end;
f37399e6
TH
55 int i;
56 for (i = 0; i < ARRAY_SIZE(color_names); i++) {
57 const char *str = color_names[i];
58 if (!strncasecmp(name, str, len) && !str[len])
59 return i - 1;
60 }
f5b571fc
TH
61 i = strtol(name, &end, 10);
62 if (*name && !*end && i >= -1 && i <= 255)
63 return i;
f37399e6
TH
64 return -2;
65}
66
67static int parse_attr(const char *name, int len)
68{
69 static const int attr_values[] = { 1, 2, 4, 5, 7 };
70 static const char * const attr_names[] = {
71 "bold", "dim", "ul", "blink", "reverse"
72 };
73 int i;
74 for (i = 0; i < ARRAY_SIZE(attr_names); i++) {
75 const char *str = attr_names[i];
76 if (!strncasecmp(name, str, len) && !str[len])
77 return attr_values[i];
78 }
79 return -1;
80}
81
82static void parse_diff_color_value(const char *value, const char *var, char *dst)
83{
84 const char *ptr = value;
85 int attr = -1;
86 int fg = -2;
87 int bg = -2;
88
89 if (!strcasecmp(value, "reset")) {
90 strcpy(dst, "\033[m");
91 return;
92 }
93
94 /* [fg [bg]] [attr] */
95 while (*ptr) {
96 const char *word = ptr;
97 int val, len = 0;
98
99 while (word[len] && !isspace(word[len]))
100 len++;
101
102 ptr = word + len;
103 while (*ptr && isspace(*ptr))
104 ptr++;
105
106 val = parse_color(word, len);
107 if (val >= -1) {
108 if (fg == -2) {
109 fg = val;
110 continue;
111 }
112 if (bg == -2) {
113 bg = val;
114 continue;
115 }
116 goto bad;
117 }
118 val = parse_attr(word, len);
119 if (val < 0 || attr != -1)
120 goto bad;
121 attr = val;
122 }
123
124 if (attr >= 0 || fg >= 0 || bg >= 0) {
125 int sep = 0;
126
127 *dst++ = '\033';
128 *dst++ = '[';
129 if (attr >= 0) {
130 *dst++ = '0' + attr;
131 sep++;
132 }
133 if (fg >= 0) {
134 if (sep++)
135 *dst++ = ';';
f5b571fc
TH
136 if (fg < 8) {
137 *dst++ = '3';
138 *dst++ = '0' + fg;
139 } else {
140 dst += sprintf(dst, "38;5;%d", fg);
141 }
f37399e6
TH
142 }
143 if (bg >= 0) {
144 if (sep++)
145 *dst++ = ';';
f5b571fc
TH
146 if (bg < 8) {
147 *dst++ = '4';
148 *dst++ = '0' + bg;
149 } else {
150 dst += sprintf(dst, "48;5;%d", bg);
151 }
f37399e6
TH
152 }
153 *dst++ = 'm';
154 }
155 *dst = 0;
156 return;
157bad:
801235c5
JH
158 die("bad config value '%s' for variable '%s'", value, var);
159}
160
83ad63cf
JH
161/*
162 * These are to give UI layer defaults.
163 * The core-level commands such as git-diff-files should
164 * never be affected by the setting of diff.renames
165 * the user happens to have in the configuration file.
166 */
167int git_diff_ui_config(const char *var, const char *value)
801235c5
JH
168{
169 if (!strcmp(var, "diff.renamelimit")) {
170 diff_rename_limit_default = git_config_int(var, value);
171 return 0;
172 }
173 if (!strcmp(var, "diff.color")) {
174 if (!value)
175 diff_use_color_default = 1; /* bool */
a0c2089c
JH
176 else if (!strcasecmp(value, "auto")) {
177 diff_use_color_default = 0;
aa086eb8 178 if (isatty(1) || (pager_in_use && pager_use_color)) {
a0c2089c
JH
179 char *term = getenv("TERM");
180 if (term && strcmp(term, "dumb"))
181 diff_use_color_default = 1;
182 }
183 }
801235c5
JH
184 else if (!strcasecmp(value, "never"))
185 diff_use_color_default = 0;
186 else if (!strcasecmp(value, "always"))
187 diff_use_color_default = 1;
188 else
189 diff_use_color_default = git_config_bool(var, value);
190 return 0;
191 }
b68ea12e
EW
192 if (!strcmp(var, "diff.renames")) {
193 if (!value)
194 diff_detect_rename_default = DIFF_DETECT_RENAME;
195 else if (!strcasecmp(value, "copies") ||
196 !strcasecmp(value, "copy"))
197 diff_detect_rename_default = DIFF_DETECT_COPY;
198 else if (git_config_bool(var,value))
199 diff_detect_rename_default = DIFF_DETECT_RENAME;
200 return 0;
201 }
801235c5
JH
202 if (!strncmp(var, "diff.color.", 11)) {
203 int slot = parse_diff_color_slot(var, 11);
f37399e6 204 parse_diff_color_value(value, var, diff_colors[slot]);
801235c5
JH
205 return 0;
206 }
207 return git_default_config(var, value);
208}
209
6973dcae
JH
210static char *quote_one(const char *str)
211{
212 int needlen;
213 char *xp;
214
215 if (!str)
216 return NULL;
217 needlen = quote_c_style(str, NULL, NULL, 0);
218 if (!needlen)
219 return strdup(str);
220 xp = xmalloc(needlen + 1);
221 quote_c_style(str, xp, NULL, 0);
222 return xp;
223}
224
225static char *quote_two(const char *one, const char *two)
226{
227 int need_one = quote_c_style(one, NULL, NULL, 1);
228 int need_two = quote_c_style(two, NULL, NULL, 1);
229 char *xp;
230
231 if (need_one + need_two) {
232 if (!need_one) need_one = strlen(one);
233 if (!need_two) need_one = strlen(two);
234
235 xp = xmalloc(need_one + need_two + 3);
236 xp[0] = '"';
237 quote_c_style(one, xp + 1, NULL, 1);
238 quote_c_style(two, xp + need_one + 1, NULL, 1);
239 strcpy(xp + need_one + need_two + 1, "\"");
240 return xp;
241 }
242 need_one = strlen(one);
243 need_two = strlen(two);
244 xp = xmalloc(need_one + need_two + 1);
245 strcpy(xp, one);
246 strcpy(xp + need_one, two);
247 return xp;
248}
249
250static const char *external_diff(void)
251{
252 static const char *external_diff_cmd = NULL;
253 static int done_preparing = 0;
254
255 if (done_preparing)
256 return external_diff_cmd;
257 external_diff_cmd = getenv("GIT_EXTERNAL_DIFF");
258 done_preparing = 1;
259 return external_diff_cmd;
260}
261
262#define TEMPFILE_PATH_LEN 50
263
264static struct diff_tempfile {
265 const char *name; /* filename external diff should read from */
266 char hex[41];
267 char mode[10];
268 char tmp_path[TEMPFILE_PATH_LEN];
269} diff_temp[2];
270
271static int count_lines(const char *data, int size)
272{
273 int count, ch, completely_empty = 1, nl_just_seen = 0;
274 count = 0;
275 while (0 < size--) {
276 ch = *data++;
277 if (ch == '\n') {
278 count++;
279 nl_just_seen = 1;
280 completely_empty = 0;
281 }
282 else {
283 nl_just_seen = 0;
284 completely_empty = 0;
285 }
286 }
287 if (completely_empty)
288 return 0;
289 if (!nl_just_seen)
290 count++; /* no trailing newline */
291 return count;
292}
293
294static void print_line_count(int count)
295{
296 switch (count) {
297 case 0:
298 printf("0,0");
299 break;
300 case 1:
301 printf("1");
302 break;
303 default:
304 printf("1,%d", count);
305 break;
306 }
307}
308
309static void copy_file(int prefix, const char *data, int size)
310{
311 int ch, nl_just_seen = 1;
312 while (0 < size--) {
313 ch = *data++;
314 if (nl_just_seen)
315 putchar(prefix);
316 putchar(ch);
317 if (ch == '\n')
318 nl_just_seen = 1;
319 else
320 nl_just_seen = 0;
321 }
322 if (!nl_just_seen)
323 printf("\n\\ No newline at end of file\n");
324}
325
326static void emit_rewrite_diff(const char *name_a,
327 const char *name_b,
328 struct diff_filespec *one,
329 struct diff_filespec *two)
330{
331 int lc_a, lc_b;
332 diff_populate_filespec(one, 0);
333 diff_populate_filespec(two, 0);
334 lc_a = count_lines(one->data, one->size);
335 lc_b = count_lines(two->data, two->size);
336 printf("--- %s\n+++ %s\n@@ -", name_a, name_b);
337 print_line_count(lc_a);
338 printf(" +");
339 print_line_count(lc_b);
340 printf(" @@\n");
341 if (lc_a)
342 copy_file('-', one->data, one->size);
343 if (lc_b)
344 copy_file('+', two->data, two->size);
345}
346
347static int fill_mmfile(mmfile_t *mf, struct diff_filespec *one)
348{
349 if (!DIFF_FILE_VALID(one)) {
d2543b8e 350 mf->ptr = (char *)""; /* does not matter */
6973dcae
JH
351 mf->size = 0;
352 return 0;
353 }
354 else if (diff_populate_filespec(one, 0))
355 return -1;
356 mf->ptr = one->data;
357 mf->size = one->size;
358 return 0;
359}
360
f59a59e2
JS
361struct diff_words_buffer {
362 mmfile_t text;
363 long alloc;
364 long current; /* output pointer */
365 int suppressed_newline;
366};
367
368static void diff_words_append(char *line, unsigned long len,
369 struct diff_words_buffer *buffer)
370{
371 if (buffer->text.size + len > buffer->alloc) {
372 buffer->alloc = (buffer->text.size + len) * 3 / 2;
373 buffer->text.ptr = xrealloc(buffer->text.ptr, buffer->alloc);
374 }
375 line++;
376 len--;
377 memcpy(buffer->text.ptr + buffer->text.size, line, len);
378 buffer->text.size += len;
379}
380
381struct diff_words_data {
382 struct xdiff_emit_state xm;
383 struct diff_words_buffer minus, plus;
384};
385
386static void print_word(struct diff_words_buffer *buffer, int len, int color,
387 int suppress_newline)
388{
389 const char *ptr;
390 int eol = 0;
391
392 if (len == 0)
393 return;
394
395 ptr = buffer->text.ptr + buffer->current;
396 buffer->current += len;
397
398 if (ptr[len - 1] == '\n') {
399 eol = 1;
400 len--;
401 }
402
403 fputs(diff_get_color(1, color), stdout);
404 fwrite(ptr, len, 1, stdout);
405 fputs(diff_get_color(1, DIFF_RESET), stdout);
406
407 if (eol) {
408 if (suppress_newline)
409 buffer->suppressed_newline = 1;
410 else
411 putchar('\n');
412 }
413}
414
415static void fn_out_diff_words_aux(void *priv, char *line, unsigned long len)
416{
417 struct diff_words_data *diff_words = priv;
418
419 if (diff_words->minus.suppressed_newline) {
420 if (line[0] != '+')
421 putchar('\n');
422 diff_words->minus.suppressed_newline = 0;
423 }
424
425 len--;
426 switch (line[0]) {
427 case '-':
428 print_word(&diff_words->minus, len, DIFF_FILE_OLD, 1);
429 break;
430 case '+':
431 print_word(&diff_words->plus, len, DIFF_FILE_NEW, 0);
432 break;
433 case ' ':
434 print_word(&diff_words->plus, len, DIFF_PLAIN, 0);
435 diff_words->minus.current += len;
436 break;
437 }
438}
439
440/* this executes the word diff on the accumulated buffers */
441static void diff_words_show(struct diff_words_data *diff_words)
442{
443 xpparam_t xpp;
444 xdemitconf_t xecfg;
445 xdemitcb_t ecb;
446 mmfile_t minus, plus;
447 int i;
448
449 minus.size = diff_words->minus.text.size;
450 minus.ptr = xmalloc(minus.size);
451 memcpy(minus.ptr, diff_words->minus.text.ptr, minus.size);
452 for (i = 0; i < minus.size; i++)
453 if (isspace(minus.ptr[i]))
454 minus.ptr[i] = '\n';
455 diff_words->minus.current = 0;
456
457 plus.size = diff_words->plus.text.size;
458 plus.ptr = xmalloc(plus.size);
459 memcpy(plus.ptr, diff_words->plus.text.ptr, plus.size);
460 for (i = 0; i < plus.size; i++)
461 if (isspace(plus.ptr[i]))
462 plus.ptr[i] = '\n';
463 diff_words->plus.current = 0;
464
465 xpp.flags = XDF_NEED_MINIMAL;
466 xecfg.ctxlen = diff_words->minus.alloc + diff_words->plus.alloc;
467 xecfg.flags = 0;
468 ecb.outf = xdiff_outf;
469 ecb.priv = diff_words;
470 diff_words->xm.consume = fn_out_diff_words_aux;
471 xdl_diff(&minus, &plus, &xpp, &xecfg, &ecb);
472
473 free(minus.ptr);
474 free(plus.ptr);
475 diff_words->minus.text.size = diff_words->plus.text.size = 0;
476
477 if (diff_words->minus.suppressed_newline) {
478 putchar('\n');
479 diff_words->minus.suppressed_newline = 0;
480 }
481}
482
6973dcae 483struct emit_callback {
cd112cef
JS
484 struct xdiff_emit_state xm;
485 int nparents, color_diff;
6973dcae 486 const char **label_path;
f59a59e2 487 struct diff_words_data *diff_words;
6973dcae
JH
488};
489
f59a59e2
JS
490static void free_diff_words_data(struct emit_callback *ecbdata)
491{
492 if (ecbdata->diff_words) {
493 /* flush buffers */
494 if (ecbdata->diff_words->minus.text.size ||
495 ecbdata->diff_words->plus.text.size)
496 diff_words_show(ecbdata->diff_words);
497
498 if (ecbdata->diff_words->minus.text.ptr)
499 free (ecbdata->diff_words->minus.text.ptr);
500 if (ecbdata->diff_words->plus.text.ptr)
501 free (ecbdata->diff_words->plus.text.ptr);
502 free(ecbdata->diff_words);
503 ecbdata->diff_words = NULL;
504 }
505}
506
ce436973 507const char *diff_get_color(int diff_use_color, enum color_diff ix)
cd112cef
JS
508{
509 if (diff_use_color)
50f575fc
LT
510 return diff_colors[ix];
511 return "";
cd112cef
JS
512}
513
514static void fn_out_consume(void *priv, char *line, unsigned long len)
6973dcae
JH
515{
516 int i;
517 struct emit_callback *ecbdata = priv;
ce436973
JK
518 const char *set = diff_get_color(ecbdata->color_diff, DIFF_METAINFO);
519 const char *reset = diff_get_color(ecbdata->color_diff, DIFF_RESET);
6973dcae
JH
520
521 if (ecbdata->label_path[0]) {
50f575fc
LT
522 printf("%s--- %s%s\n", set, ecbdata->label_path[0], reset);
523 printf("%s+++ %s%s\n", set, ecbdata->label_path[1], reset);
6973dcae
JH
524 ecbdata->label_path[0] = ecbdata->label_path[1] = NULL;
525 }
cd112cef
JS
526
527 /* This is not really necessary for now because
528 * this codepath only deals with two-way diffs.
529 */
530 for (i = 0; i < len && line[i] == '@'; i++)
531 ;
532 if (2 <= i && i < len && line[i] == ' ') {
533 ecbdata->nparents = i - 1;
ce436973 534 set = diff_get_color(ecbdata->color_diff, DIFF_FRAGINFO);
cd112cef
JS
535 }
536 else if (len < ecbdata->nparents)
50f575fc 537 set = reset;
cd112cef
JS
538 else {
539 int nparents = ecbdata->nparents;
540 int color = DIFF_PLAIN;
f59a59e2
JS
541 if (ecbdata->diff_words && nparents != 1)
542 /* fall back to normal diff */
543 free_diff_words_data(ecbdata);
544 if (ecbdata->diff_words) {
545 if (line[0] == '-') {
546 diff_words_append(line, len,
547 &ecbdata->diff_words->minus);
548 return;
549 } else if (line[0] == '+') {
550 diff_words_append(line, len,
551 &ecbdata->diff_words->plus);
552 return;
553 }
554 if (ecbdata->diff_words->minus.text.size ||
555 ecbdata->diff_words->plus.text.size)
556 diff_words_show(ecbdata->diff_words);
557 line++;
558 len--;
559 } else
560 for (i = 0; i < nparents && len; i++) {
561 if (line[i] == '-')
562 color = DIFF_FILE_OLD;
563 else if (line[i] == '+')
564 color = DIFF_FILE_NEW;
565 }
ce436973 566 set = diff_get_color(ecbdata->color_diff, color);
cd112cef 567 }
50f575fc
LT
568 if (len > 0 && line[len-1] == '\n')
569 len--;
c9c95bbc
SF
570 fputs (set, stdout);
571 fwrite (line, len, 1, stdout);
572 puts (reset);
6973dcae
JH
573}
574
575static char *pprint_rename(const char *a, const char *b)
576{
577 const char *old = a;
578 const char *new = b;
579 char *name = NULL;
580 int pfx_length, sfx_length;
581 int len_a = strlen(a);
582 int len_b = strlen(b);
583
584 /* Find common prefix */
585 pfx_length = 0;
586 while (*old && *new && *old == *new) {
587 if (*old == '/')
588 pfx_length = old - a + 1;
589 old++;
590 new++;
591 }
592
593 /* Find common suffix */
594 old = a + len_a;
595 new = b + len_b;
596 sfx_length = 0;
597 while (a <= old && b <= new && *old == *new) {
598 if (*old == '/')
599 sfx_length = len_a - (old - a);
600 old--;
601 new--;
602 }
603
604 /*
605 * pfx{mid-a => mid-b}sfx
606 * {pfx-a => pfx-b}sfx
607 * pfx{sfx-a => sfx-b}
608 * name-a => name-b
609 */
610 if (pfx_length + sfx_length) {
cc908b82
JH
611 int a_midlen = len_a - pfx_length - sfx_length;
612 int b_midlen = len_b - pfx_length - sfx_length;
613 if (a_midlen < 0) a_midlen = 0;
614 if (b_midlen < 0) b_midlen = 0;
615
e3008464 616 name = xmalloc(pfx_length + a_midlen + b_midlen + sfx_length + 7);
6973dcae
JH
617 sprintf(name, "%.*s{%.*s => %.*s}%s",
618 pfx_length, a,
cc908b82
JH
619 a_midlen, a + pfx_length,
620 b_midlen, b + pfx_length,
6973dcae
JH
621 a + len_a - sfx_length);
622 }
623 else {
624 name = xmalloc(len_a + len_b + 5);
625 sprintf(name, "%s => %s", a, b);
626 }
627 return name;
628}
629
630struct diffstat_t {
631 struct xdiff_emit_state xm;
632
633 int nr;
634 int alloc;
635 struct diffstat_file {
636 char *name;
637 unsigned is_unmerged:1;
638 unsigned is_binary:1;
639 unsigned is_renamed:1;
640 unsigned int added, deleted;
641 } **files;
642};
643
644static struct diffstat_file *diffstat_add(struct diffstat_t *diffstat,
645 const char *name_a,
646 const char *name_b)
647{
648 struct diffstat_file *x;
649 x = xcalloc(sizeof (*x), 1);
650 if (diffstat->nr == diffstat->alloc) {
651 diffstat->alloc = alloc_nr(diffstat->alloc);
652 diffstat->files = xrealloc(diffstat->files,
653 diffstat->alloc * sizeof(x));
654 }
655 diffstat->files[diffstat->nr++] = x;
656 if (name_b) {
657 x->name = pprint_rename(name_a, name_b);
658 x->is_renamed = 1;
659 }
660 else
661 x->name = strdup(name_a);
662 return x;
663}
664
665static void diffstat_consume(void *priv, char *line, unsigned long len)
666{
667 struct diffstat_t *diffstat = priv;
668 struct diffstat_file *x = diffstat->files[diffstat->nr - 1];
669
670 if (line[0] == '+')
671 x->added++;
672 else if (line[0] == '-')
673 x->deleted++;
674}
675
676static const char pluses[] = "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++";
677static const char minuses[]= "----------------------------------------------------------------------";
698ce6f8 678const char mime_boundary_leader[] = "------------";
6973dcae
JH
679
680static void show_stats(struct diffstat_t* data)
681{
6973dcae
JH
682 int i, len, add, del, total, adds = 0, dels = 0;
683 int max, max_change = 0, max_len = 0;
684 int total_files = data->nr;
685
686 if (data->nr == 0)
687 return;
688
689 for (i = 0; i < data->nr; i++) {
690 struct diffstat_file *file = data->files[i];
691
692 len = strlen(file->name);
693 if (max_len < len)
694 max_len = len;
695
696 if (file->is_binary || file->is_unmerged)
697 continue;
698 if (max_change < file->added + file->deleted)
699 max_change = file->added + file->deleted;
700 }
701
702 for (i = 0; i < data->nr; i++) {
d2543b8e 703 const char *prefix = "";
6973dcae
JH
704 char *name = data->files[i]->name;
705 int added = data->files[i]->added;
706 int deleted = data->files[i]->deleted;
707
708 if (0 < (len = quote_c_style(name, NULL, NULL, 0))) {
709 char *qname = xmalloc(len + 1);
710 quote_c_style(name, qname, NULL, 0);
711 free(name);
712 data->files[i]->name = name = qname;
713 }
714
715 /*
716 * "scale" the filename
717 */
718 len = strlen(name);
719 max = max_len;
720 if (max > 50)
721 max = 50;
722 if (len > max) {
723 char *slash;
724 prefix = "...";
725 max -= 3;
726 name += len - max;
727 slash = strchr(name, '/');
728 if (slash)
729 name = slash;
730 }
731 len = max;
732
733 /*
734 * scale the add/delete
735 */
736 max = max_change;
737 if (max + len > 70)
738 max = 70 - len;
739
740 if (data->files[i]->is_binary) {
741 printf(" %s%-*s | Bin\n", prefix, len, name);
742 goto free_diffstat_file;
743 }
744 else if (data->files[i]->is_unmerged) {
745 printf(" %s%-*s | Unmerged\n", prefix, len, name);
746 goto free_diffstat_file;
747 }
748 else if (!data->files[i]->is_renamed &&
749 (added + deleted == 0)) {
750 total_files--;
751 goto free_diffstat_file;
752 }
753
754 add = added;
755 del = deleted;
756 total = add + del;
757 adds += add;
758 dels += del;
759
760 if (max_change > 0) {
761 total = (total * max + max_change / 2) / max_change;
762 add = (add * max + max_change / 2) / max_change;
763 del = total - add;
764 }
765 printf(" %s%-*s |%5d %.*s%.*s\n", prefix,
766 len, name, added + deleted,
767 add, pluses, del, minuses);
768 free_diffstat_file:
769 free(data->files[i]->name);
770 free(data->files[i]);
771 }
772 free(data->files);
773 printf(" %d files changed, %d insertions(+), %d deletions(-)\n",
774 total_files, adds, dels);
775}
776
88246898
JS
777struct checkdiff_t {
778 struct xdiff_emit_state xm;
779 const char *filename;
780 int lineno;
781};
782
783static void checkdiff_consume(void *priv, char *line, unsigned long len)
784{
785 struct checkdiff_t *data = priv;
786
787 if (line[0] == '+') {
788 int i, spaces = 0;
789
790 data->lineno++;
791
792 /* check space before tab */
793 for (i = 1; i < len && (line[i] == ' ' || line[i] == '\t'); i++)
794 if (line[i] == ' ')
795 spaces++;
796 if (line[i - 1] == '\t' && spaces)
797 printf("%s:%d: space before tab:%.*s\n",
798 data->filename, data->lineno, (int)len, line);
799
800 /* check white space at line end */
801 if (line[len - 1] == '\n')
802 len--;
803 if (isspace(line[len - 1]))
804 printf("%s:%d: white space at end: %.*s\n",
805 data->filename, data->lineno, (int)len, line);
806 } else if (line[0] == ' ')
807 data->lineno++;
808 else if (line[0] == '@') {
809 char *plus = strchr(line, '+');
810 if (plus)
9e848163 811 data->lineno = strtol(plus, NULL, 10);
88246898
JS
812 else
813 die("invalid diff");
814 }
815}
816
0660626c
JH
817static unsigned char *deflate_it(char *data,
818 unsigned long size,
819 unsigned long *result_size)
051308f6 820{
0660626c
JH
821 int bound;
822 unsigned char *deflated;
823 z_stream stream;
824
825 memset(&stream, 0, sizeof(stream));
12f6c308 826 deflateInit(&stream, zlib_compression_level);
0660626c
JH
827 bound = deflateBound(&stream, size);
828 deflated = xmalloc(bound);
829 stream.next_out = deflated;
830 stream.avail_out = bound;
831
832 stream.next_in = (unsigned char *)data;
833 stream.avail_in = size;
834 while (deflate(&stream, Z_FINISH) == Z_OK)
835 ; /* nothing */
836 deflateEnd(&stream);
837 *result_size = stream.total_out;
838 return deflated;
051308f6
JH
839}
840
0660626c 841static void emit_binary_diff(mmfile_t *one, mmfile_t *two)
051308f6 842{
0660626c
JH
843 void *cp;
844 void *delta;
845 void *deflated;
846 void *data;
847 unsigned long orig_size;
848 unsigned long delta_size;
849 unsigned long deflate_size;
850 unsigned long data_size;
051308f6 851
0660626c
JH
852 printf("GIT binary patch\n");
853 /* We could do deflated delta, or we could do just deflated two,
854 * whichever is smaller.
051308f6 855 */
0660626c
JH
856 delta = NULL;
857 deflated = deflate_it(two->ptr, two->size, &deflate_size);
858 if (one->size && two->size) {
859 delta = diff_delta(one->ptr, one->size,
860 two->ptr, two->size,
861 &delta_size, deflate_size);
862 if (delta) {
863 void *to_free = delta;
864 orig_size = delta_size;
865 delta = deflate_it(delta, delta_size, &delta_size);
866 free(to_free);
051308f6
JH
867 }
868 }
051308f6 869
0660626c
JH
870 if (delta && delta_size < deflate_size) {
871 printf("delta %lu\n", orig_size);
872 free(deflated);
873 data = delta;
874 data_size = delta_size;
875 }
876 else {
877 printf("literal %lu\n", two->size);
878 free(delta);
879 data = deflated;
880 data_size = deflate_size;
881 }
051308f6 882
0660626c
JH
883 /* emit data encoded in base85 */
884 cp = data;
885 while (data_size) {
886 int bytes = (52 < data_size) ? 52 : data_size;
051308f6 887 char line[70];
0660626c 888 data_size -= bytes;
051308f6
JH
889 if (bytes <= 26)
890 line[0] = bytes + 'A' - 1;
891 else
892 line[0] = bytes - 26 + 'a' - 1;
893 encode_85(line + 1, cp, bytes);
1d7f171c 894 cp = (char *) cp + bytes;
051308f6
JH
895 puts(line);
896 }
897 printf("\n");
0660626c 898 free(data);
051308f6
JH
899}
900
6973dcae
JH
901#define FIRST_FEW_BYTES 8000
902static int mmfile_is_binary(mmfile_t *mf)
903{
904 long sz = mf->size;
905 if (FIRST_FEW_BYTES < sz)
906 sz = FIRST_FEW_BYTES;
907 if (memchr(mf->ptr, 0, sz))
908 return 1;
909 return 0;
910}
911
912static void builtin_diff(const char *name_a,
913 const char *name_b,
914 struct diff_filespec *one,
915 struct diff_filespec *two,
916 const char *xfrm_msg,
051308f6 917 struct diff_options *o,
6973dcae
JH
918 int complete_rewrite)
919{
920 mmfile_t mf1, mf2;
921 const char *lbl[2];
922 char *a_one, *b_two;
ce436973
JK
923 const char *set = diff_get_color(o->color_diff, DIFF_METAINFO);
924 const char *reset = diff_get_color(o->color_diff, DIFF_RESET);
6973dcae
JH
925
926 a_one = quote_two("a/", name_a);
927 b_two = quote_two("b/", name_b);
928 lbl[0] = DIFF_FILE_VALID(one) ? a_one : "/dev/null";
929 lbl[1] = DIFF_FILE_VALID(two) ? b_two : "/dev/null";
50f575fc 930 printf("%sdiff --git %s %s%s\n", set, a_one, b_two, reset);
6973dcae
JH
931 if (lbl[0][0] == '/') {
932 /* /dev/null */
50f575fc
LT
933 printf("%snew file mode %06o%s\n", set, two->mode, reset);
934 if (xfrm_msg && xfrm_msg[0])
935 printf("%s%s%s\n", set, xfrm_msg, reset);
6973dcae
JH
936 }
937 else if (lbl[1][0] == '/') {
50f575fc
LT
938 printf("%sdeleted file mode %06o%s\n", set, one->mode, reset);
939 if (xfrm_msg && xfrm_msg[0])
940 printf("%s%s%s\n", set, xfrm_msg, reset);
6973dcae
JH
941 }
942 else {
943 if (one->mode != two->mode) {
50f575fc
LT
944 printf("%sold mode %06o%s\n", set, one->mode, reset);
945 printf("%snew mode %06o%s\n", set, two->mode, reset);
cd112cef 946 }
50f575fc
LT
947 if (xfrm_msg && xfrm_msg[0])
948 printf("%s%s%s\n", set, xfrm_msg, reset);
6973dcae
JH
949 /*
950 * we do not run diff between different kind
951 * of objects.
952 */
953 if ((one->mode ^ two->mode) & S_IFMT)
954 goto free_ab_and_return;
955 if (complete_rewrite) {
956 emit_rewrite_diff(name_a, name_b, one, two);
957 goto free_ab_and_return;
958 }
959 }
960
961 if (fill_mmfile(&mf1, one) < 0 || fill_mmfile(&mf2, two) < 0)
962 die("unable to read files to diff");
963
6d64ea96 964 if (!o->text && (mmfile_is_binary(&mf1) || mmfile_is_binary(&mf2))) {
0660626c
JH
965 /* Quite common confusing case */
966 if (mf1.size == mf2.size &&
967 !memcmp(mf1.ptr, mf2.ptr, mf1.size))
968 goto free_ab_and_return;
969 if (o->binary)
051308f6
JH
970 emit_binary_diff(&mf1, &mf2);
971 else
972 printf("Binary files %s and %s differ\n",
973 lbl[0], lbl[1]);
974 }
6973dcae
JH
975 else {
976 /* Crazy xdl interfaces.. */
977 const char *diffopts = getenv("GIT_DIFF_OPTS");
978 xpparam_t xpp;
979 xdemitconf_t xecfg;
980 xdemitcb_t ecb;
981 struct emit_callback ecbdata;
982
cd112cef 983 memset(&ecbdata, 0, sizeof(ecbdata));
6973dcae 984 ecbdata.label_path = lbl;
cd112cef 985 ecbdata.color_diff = o->color_diff;
0d21efa5 986 xpp.flags = XDF_NEED_MINIMAL | o->xdl_opts;
ee1e5412 987 xecfg.ctxlen = o->context;
6973dcae
JH
988 xecfg.flags = XDL_EMIT_FUNCNAMES;
989 if (!diffopts)
990 ;
991 else if (!strncmp(diffopts, "--unified=", 10))
992 xecfg.ctxlen = strtoul(diffopts + 10, NULL, 10);
993 else if (!strncmp(diffopts, "-u", 2))
994 xecfg.ctxlen = strtoul(diffopts + 2, NULL, 10);
cd112cef 995 ecb.outf = xdiff_outf;
6973dcae 996 ecb.priv = &ecbdata;
cd112cef 997 ecbdata.xm.consume = fn_out_consume;
f59a59e2
JS
998 if (o->color_diff_words)
999 ecbdata.diff_words =
1000 xcalloc(1, sizeof(struct diff_words_data));
6973dcae 1001 xdl_diff(&mf1, &mf2, &xpp, &xecfg, &ecb);
f59a59e2
JS
1002 if (o->color_diff_words)
1003 free_diff_words_data(&ecbdata);
6973dcae
JH
1004 }
1005
1006 free_ab_and_return:
1007 free(a_one);
1008 free(b_two);
1009 return;
1010}
1011
1012static void builtin_diffstat(const char *name_a, const char *name_b,
1013 struct diff_filespec *one,
1014 struct diff_filespec *two,
710158e3 1015 struct diffstat_t *diffstat,
0d21efa5 1016 struct diff_options *o,
710158e3 1017 int complete_rewrite)
6973dcae
JH
1018{
1019 mmfile_t mf1, mf2;
1020 struct diffstat_file *data;
1021
1022 data = diffstat_add(diffstat, name_a, name_b);
1023
1024 if (!one || !two) {
1025 data->is_unmerged = 1;
1026 return;
1027 }
710158e3
JH
1028 if (complete_rewrite) {
1029 diff_populate_filespec(one, 0);
1030 diff_populate_filespec(two, 0);
1031 data->deleted = count_lines(one->data, one->size);
1032 data->added = count_lines(two->data, two->size);
1033 return;
1034 }
6973dcae
JH
1035 if (fill_mmfile(&mf1, one) < 0 || fill_mmfile(&mf2, two) < 0)
1036 die("unable to read files to diff");
1037
1038 if (mmfile_is_binary(&mf1) || mmfile_is_binary(&mf2))
1039 data->is_binary = 1;
1040 else {
1041 /* Crazy xdl interfaces.. */
1042 xpparam_t xpp;
1043 xdemitconf_t xecfg;
1044 xdemitcb_t ecb;
1045
0d21efa5 1046 xpp.flags = XDF_NEED_MINIMAL | o->xdl_opts;
6973dcae
JH
1047 xecfg.ctxlen = 0;
1048 xecfg.flags = 0;
1049 ecb.outf = xdiff_outf;
1050 ecb.priv = diffstat;
1051 xdl_diff(&mf1, &mf2, &xpp, &xecfg, &ecb);
1052 }
1053}
1054
88246898
JS
1055static void builtin_checkdiff(const char *name_a, const char *name_b,
1056 struct diff_filespec *one,
1057 struct diff_filespec *two)
1058{
1059 mmfile_t mf1, mf2;
1060 struct checkdiff_t data;
1061
1062 if (!two)
1063 return;
1064
1065 memset(&data, 0, sizeof(data));
1066 data.xm.consume = checkdiff_consume;
1067 data.filename = name_b ? name_b : name_a;
1068 data.lineno = 0;
1069
1070 if (fill_mmfile(&mf1, one) < 0 || fill_mmfile(&mf2, two) < 0)
1071 die("unable to read files to diff");
1072
1073 if (mmfile_is_binary(&mf2))
1074 return;
1075 else {
1076 /* Crazy xdl interfaces.. */
1077 xpparam_t xpp;
1078 xdemitconf_t xecfg;
1079 xdemitcb_t ecb;
1080
1081 xpp.flags = XDF_NEED_MINIMAL;
1082 xecfg.ctxlen = 0;
1083 xecfg.flags = 0;
1084 ecb.outf = xdiff_outf;
1085 ecb.priv = &data;
1086 xdl_diff(&mf1, &mf2, &xpp, &xecfg, &ecb);
1087 }
1088}
1089
6973dcae
JH
1090struct diff_filespec *alloc_filespec(const char *path)
1091{
1092 int namelen = strlen(path);
1093 struct diff_filespec *spec = xmalloc(sizeof(*spec) + namelen + 1);
1094
1095 memset(spec, 0, sizeof(*spec));
1096 spec->path = (char *)(spec + 1);
1097 memcpy(spec->path, path, namelen+1);
1098 return spec;
1099}
1100
1101void fill_filespec(struct diff_filespec *spec, const unsigned char *sha1,
1102 unsigned short mode)
1103{
1104 if (mode) {
1105 spec->mode = canon_mode(mode);
1106 memcpy(spec->sha1, sha1, 20);
1107 spec->sha1_valid = !!memcmp(sha1, null_sha1, 20);
1108 }
1109}
1110
1111/*
1112 * Given a name and sha1 pair, if the dircache tells us the file in
1113 * the work tree has that object contents, return true, so that
1114 * prepare_temp_file() does not have to inflate and extract.
1115 */
1116static int work_tree_matches(const char *name, const unsigned char *sha1)
1117{
1118 struct cache_entry *ce;
1119 struct stat st;
1120 int pos, len;
1121
1122 /* We do not read the cache ourselves here, because the
1123 * benchmark with my previous version that always reads cache
1124 * shows that it makes things worse for diff-tree comparing
1125 * two linux-2.6 kernel trees in an already checked out work
1126 * tree. This is because most diff-tree comparisons deal with
1127 * only a small number of files, while reading the cache is
1128 * expensive for a large project, and its cost outweighs the
1129 * savings we get by not inflating the object to a temporary
1130 * file. Practically, this code only helps when we are used
1131 * by diff-cache --cached, which does read the cache before
1132 * calling us.
1133 */
1134 if (!active_cache)
1135 return 0;
1136
1137 len = strlen(name);
1138 pos = cache_name_pos(name, len);
1139 if (pos < 0)
1140 return 0;
1141 ce = active_cache[pos];
1142 if ((lstat(name, &st) < 0) ||
1143 !S_ISREG(st.st_mode) || /* careful! */
1144 ce_match_stat(ce, &st, 0) ||
1145 memcmp(sha1, ce->sha1, 20))
1146 return 0;
1147 /* we return 1 only when we can stat, it is a regular file,
1148 * stat information matches, and sha1 recorded in the cache
1149 * matches. I.e. we know the file in the work tree really is
1150 * the same as the <name, sha1> pair.
1151 */
1152 return 1;
1153}
1154
1155static struct sha1_size_cache {
1156 unsigned char sha1[20];
1157 unsigned long size;
1158} **sha1_size_cache;
1159static int sha1_size_cache_nr, sha1_size_cache_alloc;
1160
1161static struct sha1_size_cache *locate_size_cache(unsigned char *sha1,
1162 int find_only,
1163 unsigned long size)
1164{
1165 int first, last;
1166 struct sha1_size_cache *e;
1167
1168 first = 0;
1169 last = sha1_size_cache_nr;
1170 while (last > first) {
1171 int cmp, next = (last + first) >> 1;
1172 e = sha1_size_cache[next];
1173 cmp = memcmp(e->sha1, sha1, 20);
1174 if (!cmp)
1175 return e;
1176 if (cmp < 0) {
1177 last = next;
1178 continue;
1179 }
1180 first = next+1;
1181 }
1182 /* not found */
1183 if (find_only)
1184 return NULL;
1185 /* insert to make it at "first" */
1186 if (sha1_size_cache_alloc <= sha1_size_cache_nr) {
1187 sha1_size_cache_alloc = alloc_nr(sha1_size_cache_alloc);
1188 sha1_size_cache = xrealloc(sha1_size_cache,
1189 sha1_size_cache_alloc *
1190 sizeof(*sha1_size_cache));
1191 }
1192 sha1_size_cache_nr++;
1193 if (first < sha1_size_cache_nr)
1194 memmove(sha1_size_cache + first + 1, sha1_size_cache + first,
1195 (sha1_size_cache_nr - first - 1) *
1196 sizeof(*sha1_size_cache));
1197 e = xmalloc(sizeof(struct sha1_size_cache));
1198 sha1_size_cache[first] = e;
1199 memcpy(e->sha1, sha1, 20);
1200 e->size = size;
1201 return e;
1202}
1203
1204/*
1205 * While doing rename detection and pickaxe operation, we may need to
1206 * grab the data for the blob (or file) for our own in-core comparison.
1207 * diff_filespec has data and size fields for this purpose.
1208 */
1209int diff_populate_filespec(struct diff_filespec *s, int size_only)
1210{
1211 int err = 0;
1212 if (!DIFF_FILE_VALID(s))
1213 die("internal error: asking to populate invalid file.");
1214 if (S_ISDIR(s->mode))
1215 return -1;
1216
1217 if (!use_size_cache)
1218 size_only = 0;
1219
1220 if (s->data)
1221 return err;
1222 if (!s->sha1_valid ||
1223 work_tree_matches(s->path, s->sha1)) {
1224 struct stat st;
1225 int fd;
1226 if (lstat(s->path, &st) < 0) {
1227 if (errno == ENOENT) {
1228 err_empty:
1229 err = -1;
1230 empty:
d2543b8e 1231 s->data = (char *)"";
6973dcae
JH
1232 s->size = 0;
1233 return err;
1234 }
1235 }
1236 s->size = st.st_size;
1237 if (!s->size)
1238 goto empty;
1239 if (size_only)
1240 return 0;
1241 if (S_ISLNK(st.st_mode)) {
1242 int ret;
1243 s->data = xmalloc(s->size);
1244 s->should_free = 1;
1245 ret = readlink(s->path, s->data, s->size);
1246 if (ret < 0) {
1247 free(s->data);
1248 goto err_empty;
1249 }
1250 return 0;
1251 }
1252 fd = open(s->path, O_RDONLY);
1253 if (fd < 0)
1254 goto err_empty;
1255 s->data = mmap(NULL, s->size, PROT_READ, MAP_PRIVATE, fd, 0);
1256 close(fd);
1257 if (s->data == MAP_FAILED)
1258 goto err_empty;
1259 s->should_munmap = 1;
1260 }
1261 else {
1262 char type[20];
1263 struct sha1_size_cache *e;
1264
1265 if (size_only) {
1266 e = locate_size_cache(s->sha1, 1, 0);
1267 if (e) {
1268 s->size = e->size;
1269 return 0;
1270 }
1271 if (!sha1_object_info(s->sha1, type, &s->size))
1272 locate_size_cache(s->sha1, 0, s->size);
1273 }
1274 else {
1275 s->data = read_sha1_file(s->sha1, type, &s->size);
1276 s->should_free = 1;
1277 }
1278 }
1279 return 0;
1280}
1281
1282void diff_free_filespec_data(struct diff_filespec *s)
1283{
1284 if (s->should_free)
1285 free(s->data);
1286 else if (s->should_munmap)
1287 munmap(s->data, s->size);
1288 s->should_free = s->should_munmap = 0;
1289 s->data = NULL;
1290 free(s->cnt_data);
1291 s->cnt_data = NULL;
1292}
1293
1294static void prep_temp_blob(struct diff_tempfile *temp,
1295 void *blob,
1296 unsigned long size,
1297 const unsigned char *sha1,
1298 int mode)
1299{
1300 int fd;
1301
1302 fd = git_mkstemp(temp->tmp_path, TEMPFILE_PATH_LEN, ".diff_XXXXXX");
1303 if (fd < 0)
1304 die("unable to create temp-file");
1305 if (write(fd, blob, size) != size)
1306 die("unable to write temp-file");
1307 close(fd);
1308 temp->name = temp->tmp_path;
1309 strcpy(temp->hex, sha1_to_hex(sha1));
1310 temp->hex[40] = 0;
1311 sprintf(temp->mode, "%06o", mode);
1312}
1313
1314static void prepare_temp_file(const char *name,
1315 struct diff_tempfile *temp,
1316 struct diff_filespec *one)
1317{
1318 if (!DIFF_FILE_VALID(one)) {
1319 not_a_valid_file:
1320 /* A '-' entry produces this for file-2, and
1321 * a '+' entry produces this for file-1.
1322 */
1323 temp->name = "/dev/null";
1324 strcpy(temp->hex, ".");
1325 strcpy(temp->mode, ".");
1326 return;
1327 }
1328
1329 if (!one->sha1_valid ||
1330 work_tree_matches(name, one->sha1)) {
1331 struct stat st;
1332 if (lstat(name, &st) < 0) {
1333 if (errno == ENOENT)
1334 goto not_a_valid_file;
1335 die("stat(%s): %s", name, strerror(errno));
1336 }
1337 if (S_ISLNK(st.st_mode)) {
1338 int ret;
1339 char buf[PATH_MAX + 1]; /* ought to be SYMLINK_MAX */
1340 if (sizeof(buf) <= st.st_size)
1341 die("symlink too long: %s", name);
1342 ret = readlink(name, buf, st.st_size);
1343 if (ret < 0)
1344 die("readlink(%s)", name);
1345 prep_temp_blob(temp, buf, st.st_size,
1346 (one->sha1_valid ?
1347 one->sha1 : null_sha1),
1348 (one->sha1_valid ?
1349 one->mode : S_IFLNK));
1350 }
1351 else {
1352 /* we can borrow from the file in the work tree */
1353 temp->name = name;
1354 if (!one->sha1_valid)
1355 strcpy(temp->hex, sha1_to_hex(null_sha1));
1356 else
1357 strcpy(temp->hex, sha1_to_hex(one->sha1));
1358 /* Even though we may sometimes borrow the
1359 * contents from the work tree, we always want
1360 * one->mode. mode is trustworthy even when
1361 * !(one->sha1_valid), as long as
1362 * DIFF_FILE_VALID(one).
1363 */
1364 sprintf(temp->mode, "%06o", one->mode);
1365 }
1366 return;
1367 }
1368 else {
1369 if (diff_populate_filespec(one, 0))
1370 die("cannot read data blob for %s", one->path);
1371 prep_temp_blob(temp, one->data, one->size,
1372 one->sha1, one->mode);
1373 }
1374}
1375
1376static void remove_tempfile(void)
1377{
1378 int i;
1379
1380 for (i = 0; i < 2; i++)
1381 if (diff_temp[i].name == diff_temp[i].tmp_path) {
1382 unlink(diff_temp[i].name);
1383 diff_temp[i].name = NULL;
1384 }
1385}
1386
1387static void remove_tempfile_on_signal(int signo)
1388{
1389 remove_tempfile();
1390 signal(SIGINT, SIG_DFL);
1391 raise(signo);
1392}
1393
1394static int spawn_prog(const char *pgm, const char **arg)
1395{
1396 pid_t pid;
1397 int status;
1398
1399 fflush(NULL);
1400 pid = fork();
1401 if (pid < 0)
1402 die("unable to fork");
1403 if (!pid) {
1404 execvp(pgm, (char *const*) arg);
1405 exit(255);
1406 }
1407
1408 while (waitpid(pid, &status, 0) < 0) {
1409 if (errno == EINTR)
1410 continue;
1411 return -1;
1412 }
1413
1414 /* Earlier we did not check the exit status because
1415 * diff exits non-zero if files are different, and
1416 * we are not interested in knowing that. It was a
1417 * mistake which made it harder to quit a diff-*
1418 * session that uses the git-apply-patch-script as
1419 * the GIT_EXTERNAL_DIFF. A custom GIT_EXTERNAL_DIFF
1420 * should also exit non-zero only when it wants to
1421 * abort the entire diff-* session.
1422 */
1423 if (WIFEXITED(status) && !WEXITSTATUS(status))
1424 return 0;
1425 return -1;
1426}
1427
1428/* An external diff command takes:
1429 *
1430 * diff-cmd name infile1 infile1-sha1 infile1-mode \
1431 * infile2 infile2-sha1 infile2-mode [ rename-to ]
1432 *
1433 */
1434static void run_external_diff(const char *pgm,
1435 const char *name,
1436 const char *other,
1437 struct diff_filespec *one,
1438 struct diff_filespec *two,
1439 const char *xfrm_msg,
1440 int complete_rewrite)
1441{
1442 const char *spawn_arg[10];
1443 struct diff_tempfile *temp = diff_temp;
1444 int retval;
1445 static int atexit_asked = 0;
1446 const char *othername;
1447 const char **arg = &spawn_arg[0];
1448
1449 othername = (other? other : name);
1450 if (one && two) {
1451 prepare_temp_file(name, &temp[0], one);
1452 prepare_temp_file(othername, &temp[1], two);
1453 if (! atexit_asked &&
1454 (temp[0].name == temp[0].tmp_path ||
1455 temp[1].name == temp[1].tmp_path)) {
1456 atexit_asked = 1;
1457 atexit(remove_tempfile);
1458 }
1459 signal(SIGINT, remove_tempfile_on_signal);
1460 }
1461
1462 if (one && two) {
1463 *arg++ = pgm;
1464 *arg++ = name;
1465 *arg++ = temp[0].name;
1466 *arg++ = temp[0].hex;
1467 *arg++ = temp[0].mode;
1468 *arg++ = temp[1].name;
1469 *arg++ = temp[1].hex;
1470 *arg++ = temp[1].mode;
1471 if (other) {
1472 *arg++ = other;
1473 *arg++ = xfrm_msg;
1474 }
1475 } else {
1476 *arg++ = pgm;
1477 *arg++ = name;
1478 }
1479 *arg = NULL;
1480 retval = spawn_prog(pgm, spawn_arg);
1481 remove_tempfile();
1482 if (retval) {
1483 fprintf(stderr, "external diff died, stopping at %s.\n", name);
1484 exit(1);
1485 }
1486}
1487
1488static void run_diff_cmd(const char *pgm,
1489 const char *name,
1490 const char *other,
1491 struct diff_filespec *one,
1492 struct diff_filespec *two,
1493 const char *xfrm_msg,
051308f6 1494 struct diff_options *o,
6973dcae
JH
1495 int complete_rewrite)
1496{
1497 if (pgm) {
1498 run_external_diff(pgm, name, other, one, two, xfrm_msg,
1499 complete_rewrite);
1500 return;
1501 }
1502 if (one && two)
1503 builtin_diff(name, other ? other : name,
051308f6 1504 one, two, xfrm_msg, o, complete_rewrite);
6973dcae
JH
1505 else
1506 printf("* Unmerged path %s\n", name);
1507}
1508
1509static void diff_fill_sha1_info(struct diff_filespec *one)
1510{
1511 if (DIFF_FILE_VALID(one)) {
1512 if (!one->sha1_valid) {
1513 struct stat st;
1514 if (lstat(one->path, &st) < 0)
1515 die("stat %s", one->path);
1516 if (index_path(one->sha1, one->path, &st, 0))
1517 die("cannot hash %s\n", one->path);
1518 }
1519 }
1520 else
1521 memset(one->sha1, 0, 20);
1522}
1523
1524static void run_diff(struct diff_filepair *p, struct diff_options *o)
1525{
1526 const char *pgm = external_diff();
1527 char msg[PATH_MAX*2+300], *xfrm_msg;
1528 struct diff_filespec *one;
1529 struct diff_filespec *two;
1530 const char *name;
1531 const char *other;
1532 char *name_munged, *other_munged;
1533 int complete_rewrite = 0;
1534 int len;
1535
1536 if (DIFF_PAIR_UNMERGED(p)) {
1537 /* unmerged */
051308f6 1538 run_diff_cmd(pgm, p->one->path, NULL, NULL, NULL, NULL, o, 0);
6973dcae
JH
1539 return;
1540 }
1541
1542 name = p->one->path;
1543 other = (strcmp(name, p->two->path) ? p->two->path : NULL);
1544 name_munged = quote_one(name);
1545 other_munged = quote_one(other);
1546 one = p->one; two = p->two;
1547
1548 diff_fill_sha1_info(one);
1549 diff_fill_sha1_info(two);
1550
1551 len = 0;
1552 switch (p->status) {
1553 case DIFF_STATUS_COPIED:
1554 len += snprintf(msg + len, sizeof(msg) - len,
1555 "similarity index %d%%\n"
1556 "copy from %s\n"
1557 "copy to %s\n",
1558 (int)(0.5 + p->score * 100.0/MAX_SCORE),
1559 name_munged, other_munged);
1560 break;
1561 case DIFF_STATUS_RENAMED:
1562 len += snprintf(msg + len, sizeof(msg) - len,
1563 "similarity index %d%%\n"
1564 "rename from %s\n"
1565 "rename to %s\n",
1566 (int)(0.5 + p->score * 100.0/MAX_SCORE),
1567 name_munged, other_munged);
1568 break;
1569 case DIFF_STATUS_MODIFIED:
1570 if (p->score) {
1571 len += snprintf(msg + len, sizeof(msg) - len,
1572 "dissimilarity index %d%%\n",
1573 (int)(0.5 + p->score *
1574 100.0/MAX_SCORE));
1575 complete_rewrite = 1;
1576 break;
1577 }
1578 /* fallthru */
1579 default:
1580 /* nothing */
1581 ;
1582 }
1583
1584 if (memcmp(one->sha1, two->sha1, 20)) {
6973dcae 1585 int abbrev = o->full_index ? 40 : DEFAULT_ABBREV;
6973dcae
JH
1586
1587 len += snprintf(msg + len, sizeof(msg) - len,
1588 "index %.*s..%.*s",
dcb3450f
LT
1589 abbrev, sha1_to_hex(one->sha1),
1590 abbrev, sha1_to_hex(two->sha1));
6973dcae
JH
1591 if (one->mode == two->mode)
1592 len += snprintf(msg + len, sizeof(msg) - len,
1593 " %06o", one->mode);
1594 len += snprintf(msg + len, sizeof(msg) - len, "\n");
1595 }
1596
1597 if (len)
1598 msg[--len] = 0;
1599 xfrm_msg = len ? msg : NULL;
1600
1601 if (!pgm &&
1602 DIFF_FILE_VALID(one) && DIFF_FILE_VALID(two) &&
1603 (S_IFMT & one->mode) != (S_IFMT & two->mode)) {
1604 /* a filepair that changes between file and symlink
1605 * needs to be split into deletion and creation.
1606 */
1607 struct diff_filespec *null = alloc_filespec(two->path);
051308f6 1608 run_diff_cmd(NULL, name, other, one, null, xfrm_msg, o, 0);
6973dcae
JH
1609 free(null);
1610 null = alloc_filespec(one->path);
051308f6 1611 run_diff_cmd(NULL, name, other, null, two, xfrm_msg, o, 0);
6973dcae
JH
1612 free(null);
1613 }
1614 else
051308f6 1615 run_diff_cmd(pgm, name, other, one, two, xfrm_msg, o,
6973dcae
JH
1616 complete_rewrite);
1617
1618 free(name_munged);
1619 free(other_munged);
1620}
1621
1622static void run_diffstat(struct diff_filepair *p, struct diff_options *o,
1623 struct diffstat_t *diffstat)
1624{
1625 const char *name;
1626 const char *other;
710158e3 1627 int complete_rewrite = 0;
6973dcae
JH
1628
1629 if (DIFF_PAIR_UNMERGED(p)) {
1630 /* unmerged */
0d21efa5 1631 builtin_diffstat(p->one->path, NULL, NULL, NULL, diffstat, o, 0);
6973dcae
JH
1632 return;
1633 }
1634
1635 name = p->one->path;
1636 other = (strcmp(name, p->two->path) ? p->two->path : NULL);
1637
1638 diff_fill_sha1_info(p->one);
1639 diff_fill_sha1_info(p->two);
1640
710158e3
JH
1641 if (p->status == DIFF_STATUS_MODIFIED && p->score)
1642 complete_rewrite = 1;
0d21efa5 1643 builtin_diffstat(name, other, p->one, p->two, diffstat, o, complete_rewrite);
6973dcae
JH
1644}
1645
88246898
JS
1646static void run_checkdiff(struct diff_filepair *p, struct diff_options *o)
1647{
1648 const char *name;
1649 const char *other;
1650
1651 if (DIFF_PAIR_UNMERGED(p)) {
1652 /* unmerged */
1653 return;
1654 }
1655
1656 name = p->one->path;
1657 other = (strcmp(name, p->two->path) ? p->two->path : NULL);
1658
1659 diff_fill_sha1_info(p->one);
1660 diff_fill_sha1_info(p->two);
1661
1662 builtin_checkdiff(name, other, p->one, p->two);
1663}
1664
6973dcae
JH
1665void diff_setup(struct diff_options *options)
1666{
1667 memset(options, 0, sizeof(*options));
6973dcae
JH
1668 options->line_termination = '\n';
1669 options->break_opt = -1;
1670 options->rename_limit = -1;
ee1e5412 1671 options->context = 3;
3969cf7d 1672 options->msg_sep = "";
6973dcae
JH
1673
1674 options->change = diff_change;
1675 options->add_remove = diff_addremove;
801235c5 1676 options->color_diff = diff_use_color_default;
b68ea12e 1677 options->detect_rename = diff_detect_rename_default;
6973dcae
JH
1678}
1679
1680int diff_setup_done(struct diff_options *options)
1681{
03b9d560
JH
1682 if (options->find_copies_harder)
1683 options->detect_rename = DIFF_DETECT_COPY;
1684
c6744349
TH
1685 if (options->output_format & (DIFF_FORMAT_NAME |
1686 DIFF_FORMAT_NAME_STATUS |
1687 DIFF_FORMAT_CHECKDIFF |
1688 DIFF_FORMAT_NO_OUTPUT))
1689 options->output_format &= ~(DIFF_FORMAT_RAW |
1690 DIFF_FORMAT_DIFFSTAT |
1691 DIFF_FORMAT_SUMMARY |
1692 DIFF_FORMAT_PATCH);
1693
6973dcae
JH
1694 /*
1695 * These cases always need recursive; we do not drop caller-supplied
1696 * recursive bits for other formats here.
1697 */
c6744349
TH
1698 if (options->output_format & (DIFF_FORMAT_PATCH |
1699 DIFF_FORMAT_DIFFSTAT |
1700 DIFF_FORMAT_CHECKDIFF))
6973dcae 1701 options->recursive = 1;
5e363541 1702 /*
3969cf7d 1703 * Also pickaxe would not work very well if you do not say recursive
5e363541 1704 */
3969cf7d
JH
1705 if (options->pickaxe)
1706 options->recursive = 1;
5e363541 1707
6973dcae
JH
1708 if (options->detect_rename && options->rename_limit < 0)
1709 options->rename_limit = diff_rename_limit_default;
1710 if (options->setup & DIFF_SETUP_USE_CACHE) {
1711 if (!active_cache)
1712 /* read-cache does not die even when it fails
1713 * so it is safe for us to do this here. Also
1714 * it does not smudge active_cache or active_nr
1715 * when it fails, so we do not have to worry about
1716 * cleaning it up ourselves either.
1717 */
1718 read_cache();
1719 }
1720 if (options->setup & DIFF_SETUP_USE_SIZE_CACHE)
1721 use_size_cache = 1;
1722 if (options->abbrev <= 0 || 40 < options->abbrev)
1723 options->abbrev = 40; /* full */
1724
1725 return 0;
1726}
1727
d2543b8e 1728static int opt_arg(const char *arg, int arg_short, const char *arg_long, int *val)
ee1e5412
LT
1729{
1730 char c, *eq;
1731 int len;
1732
1733 if (*arg != '-')
1734 return 0;
1735 c = *++arg;
1736 if (!c)
1737 return 0;
1738 if (c == arg_short) {
1739 c = *++arg;
1740 if (!c)
1741 return 1;
1742 if (val && isdigit(c)) {
1743 char *end;
1744 int n = strtoul(arg, &end, 10);
1745 if (*end)
1746 return 0;
1747 *val = n;
1748 return 1;
1749 }
1750 return 0;
1751 }
1752 if (c != '-')
1753 return 0;
1754 arg++;
1755 eq = strchr(arg, '=');
1756 if (eq)
1757 len = eq - arg;
1758 else
1759 len = strlen(arg);
1760 if (!len || strncmp(arg, arg_long, len))
1761 return 0;
1762 if (eq) {
1763 int n;
1764 char *end;
1765 if (!isdigit(*++eq))
1766 return 0;
1767 n = strtoul(eq, &end, 10);
1768 if (*end)
1769 return 0;
1770 *val = n;
1771 }
1772 return 1;
1773}
1774
6973dcae
JH
1775int diff_opt_parse(struct diff_options *options, const char **av, int ac)
1776{
1777 const char *arg = av[0];
1778 if (!strcmp(arg, "-p") || !strcmp(arg, "-u"))
c6744349 1779 options->output_format |= DIFF_FORMAT_PATCH;
ee1e5412 1780 else if (opt_arg(arg, 'U', "unified", &options->context))
c6744349 1781 options->output_format |= DIFF_FORMAT_PATCH;
a610786f
TH
1782 else if (!strcmp(arg, "--raw"))
1783 options->output_format |= DIFF_FORMAT_RAW;
6973dcae 1784 else if (!strcmp(arg, "--patch-with-raw")) {
c6744349 1785 options->output_format |= DIFF_FORMAT_PATCH | DIFF_FORMAT_RAW;
6973dcae
JH
1786 }
1787 else if (!strcmp(arg, "--stat"))
c6744349 1788 options->output_format |= DIFF_FORMAT_DIFFSTAT;
88246898 1789 else if (!strcmp(arg, "--check"))
c6744349 1790 options->output_format |= DIFF_FORMAT_CHECKDIFF;
4bbd261b 1791 else if (!strcmp(arg, "--summary"))
c6744349 1792 options->output_format |= DIFF_FORMAT_SUMMARY;
6973dcae 1793 else if (!strcmp(arg, "--patch-with-stat")) {
c6744349 1794 options->output_format |= DIFF_FORMAT_PATCH | DIFF_FORMAT_DIFFSTAT;
6973dcae
JH
1795 }
1796 else if (!strcmp(arg, "-z"))
1797 options->line_termination = 0;
1798 else if (!strncmp(arg, "-l", 2))
1799 options->rename_limit = strtoul(arg+2, NULL, 10);
1800 else if (!strcmp(arg, "--full-index"))
1801 options->full_index = 1;
0660626c 1802 else if (!strcmp(arg, "--binary")) {
c6744349 1803 options->output_format |= DIFF_FORMAT_PATCH;
0660626c
JH
1804 options->full_index = options->binary = 1;
1805 }
63ac4501 1806 else if (!strcmp(arg, "-a") || !strcmp(arg, "--text")) {
6d64ea96
SF
1807 options->text = 1;
1808 }
6973dcae 1809 else if (!strcmp(arg, "--name-only"))
c6744349 1810 options->output_format |= DIFF_FORMAT_NAME;
6973dcae 1811 else if (!strcmp(arg, "--name-status"))
c6744349 1812 options->output_format |= DIFF_FORMAT_NAME_STATUS;
6973dcae
JH
1813 else if (!strcmp(arg, "-R"))
1814 options->reverse_diff = 1;
1815 else if (!strncmp(arg, "-S", 2))
1816 options->pickaxe = arg + 2;
c6744349
TH
1817 else if (!strcmp(arg, "-s")) {
1818 options->output_format |= DIFF_FORMAT_NO_OUTPUT;
1819 }
6973dcae
JH
1820 else if (!strncmp(arg, "-O", 2))
1821 options->orderfile = arg + 2;
1822 else if (!strncmp(arg, "--diff-filter=", 14))
1823 options->filter = arg + 14;
1824 else if (!strcmp(arg, "--pickaxe-all"))
1825 options->pickaxe_opts = DIFF_PICKAXE_ALL;
1826 else if (!strcmp(arg, "--pickaxe-regex"))
1827 options->pickaxe_opts = DIFF_PICKAXE_REGEX;
1828 else if (!strncmp(arg, "-B", 2)) {
1829 if ((options->break_opt =
1830 diff_scoreopt_parse(arg)) == -1)
1831 return -1;
1832 }
1833 else if (!strncmp(arg, "-M", 2)) {
1834 if ((options->rename_score =
1835 diff_scoreopt_parse(arg)) == -1)
1836 return -1;
1837 options->detect_rename = DIFF_DETECT_RENAME;
1838 }
1839 else if (!strncmp(arg, "-C", 2)) {
1840 if ((options->rename_score =
1841 diff_scoreopt_parse(arg)) == -1)
1842 return -1;
1843 options->detect_rename = DIFF_DETECT_COPY;
1844 }
1845 else if (!strcmp(arg, "--find-copies-harder"))
1846 options->find_copies_harder = 1;
1847 else if (!strcmp(arg, "--abbrev"))
1848 options->abbrev = DEFAULT_ABBREV;
1849 else if (!strncmp(arg, "--abbrev=", 9)) {
1850 options->abbrev = strtoul(arg + 9, NULL, 10);
1851 if (options->abbrev < MINIMUM_ABBREV)
1852 options->abbrev = MINIMUM_ABBREV;
1853 else if (40 < options->abbrev)
1854 options->abbrev = 40;
1855 }
cd112cef
JS
1856 else if (!strcmp(arg, "--color"))
1857 options->color_diff = 1;
fef88bb0
JH
1858 else if (!strcmp(arg, "--no-color"))
1859 options->color_diff = 0;
0d21efa5
JS
1860 else if (!strcmp(arg, "-w") || !strcmp(arg, "--ignore-all-space"))
1861 options->xdl_opts |= XDF_IGNORE_WHITESPACE;
1862 else if (!strcmp(arg, "-b") || !strcmp(arg, "--ignore-space-change"))
1863 options->xdl_opts |= XDF_IGNORE_WHITESPACE_CHANGE;
f59a59e2
JS
1864 else if (!strcmp(arg, "--color-words"))
1865 options->color_diff = options->color_diff_words = 1;
b68ea12e
EW
1866 else if (!strcmp(arg, "--no-renames"))
1867 options->detect_rename = 0;
6973dcae
JH
1868 else
1869 return 0;
1870 return 1;
1871}
1872
1873static int parse_num(const char **cp_p)
1874{
1875 unsigned long num, scale;
1876 int ch, dot;
1877 const char *cp = *cp_p;
1878
1879 num = 0;
1880 scale = 1;
1881 dot = 0;
1882 for(;;) {
1883 ch = *cp;
1884 if ( !dot && ch == '.' ) {
1885 scale = 1;
1886 dot = 1;
1887 } else if ( ch == '%' ) {
1888 scale = dot ? scale*100 : 100;
1889 cp++; /* % is always at the end */
1890 break;
1891 } else if ( ch >= '0' && ch <= '9' ) {
1892 if ( scale < 100000 ) {
1893 scale *= 10;
1894 num = (num*10) + (ch-'0');
1895 }
1896 } else {
1897 break;
1898 }
1899 cp++;
1900 }
1901 *cp_p = cp;
1902
1903 /* user says num divided by scale and we say internally that
1904 * is MAX_SCORE * num / scale.
1905 */
1906 return (num >= scale) ? MAX_SCORE : (MAX_SCORE * num / scale);
1907}
1908
1909int diff_scoreopt_parse(const char *opt)
1910{
1911 int opt1, opt2, cmd;
1912
1913 if (*opt++ != '-')
1914 return -1;
1915 cmd = *opt++;
1916 if (cmd != 'M' && cmd != 'C' && cmd != 'B')
1917 return -1; /* that is not a -M, -C nor -B option */
1918
1919 opt1 = parse_num(&opt);
1920 if (cmd != 'B')
1921 opt2 = 0;
1922 else {
1923 if (*opt == 0)
1924 opt2 = 0;
1925 else if (*opt != '/')
1926 return -1; /* we expect -B80/99 or -B80 */
1927 else {
1928 opt++;
1929 opt2 = parse_num(&opt);
1930 }
1931 }
1932 if (*opt != 0)
1933 return -1;
1934 return opt1 | (opt2 << 16);
1935}
1936
1937struct diff_queue_struct diff_queued_diff;
1938
1939void diff_q(struct diff_queue_struct *queue, struct diff_filepair *dp)
1940{
1941 if (queue->alloc <= queue->nr) {
1942 queue->alloc = alloc_nr(queue->alloc);
1943 queue->queue = xrealloc(queue->queue,
1944 sizeof(dp) * queue->alloc);
1945 }
1946 queue->queue[queue->nr++] = dp;
1947}
1948
1949struct diff_filepair *diff_queue(struct diff_queue_struct *queue,
1950 struct diff_filespec *one,
1951 struct diff_filespec *two)
1952{
ef677686 1953 struct diff_filepair *dp = xcalloc(1, sizeof(*dp));
6973dcae
JH
1954 dp->one = one;
1955 dp->two = two;
6973dcae
JH
1956 if (queue)
1957 diff_q(queue, dp);
1958 return dp;
1959}
1960
1961void diff_free_filepair(struct diff_filepair *p)
1962{
1963 diff_free_filespec_data(p->one);
1964 diff_free_filespec_data(p->two);
1965 free(p->one);
1966 free(p->two);
1967 free(p);
1968}
1969
1970/* This is different from find_unique_abbrev() in that
1971 * it stuffs the result with dots for alignment.
1972 */
1973const char *diff_unique_abbrev(const unsigned char *sha1, int len)
1974{
1975 int abblen;
1976 const char *abbrev;
1977 if (len == 40)
1978 return sha1_to_hex(sha1);
1979
1980 abbrev = find_unique_abbrev(sha1, len);
1981 if (!abbrev)
1982 return sha1_to_hex(sha1);
1983 abblen = strlen(abbrev);
1984 if (abblen < 37) {
1985 static char hex[41];
1986 if (len < abblen && abblen <= len + 2)
1987 sprintf(hex, "%s%.*s", abbrev, len+3-abblen, "..");
1988 else
1989 sprintf(hex, "%s...", abbrev);
1990 return hex;
1991 }
1992 return sha1_to_hex(sha1);
1993}
1994
1995static void diff_flush_raw(struct diff_filepair *p,
c6744349 1996 struct diff_options *options)
6973dcae
JH
1997{
1998 int two_paths;
1999 char status[10];
2000 int abbrev = options->abbrev;
2001 const char *path_one, *path_two;
c6744349
TH
2002 int inter_name_termination = '\t';
2003 int line_termination = options->line_termination;
2004
2005 if (!line_termination)
2006 inter_name_termination = 0;
6973dcae
JH
2007
2008 path_one = p->one->path;
2009 path_two = p->two->path;
2010 if (line_termination) {
2011 path_one = quote_one(path_one);
2012 path_two = quote_one(path_two);
2013 }
2014
2015 if (p->score)
2016 sprintf(status, "%c%03d", p->status,
2017 (int)(0.5 + p->score * 100.0/MAX_SCORE));
2018 else {
2019 status[0] = p->status;
2020 status[1] = 0;
2021 }
2022 switch (p->status) {
2023 case DIFF_STATUS_COPIED:
2024 case DIFF_STATUS_RENAMED:
2025 two_paths = 1;
2026 break;
2027 case DIFF_STATUS_ADDED:
2028 case DIFF_STATUS_DELETED:
2029 two_paths = 0;
2030 break;
2031 default:
2032 two_paths = 0;
2033 break;
2034 }
c6744349 2035 if (!(options->output_format & DIFF_FORMAT_NAME_STATUS)) {
6973dcae
JH
2036 printf(":%06o %06o %s ",
2037 p->one->mode, p->two->mode,
2038 diff_unique_abbrev(p->one->sha1, abbrev));
2039 printf("%s ",
2040 diff_unique_abbrev(p->two->sha1, abbrev));
2041 }
2042 printf("%s%c%s", status, inter_name_termination, path_one);
2043 if (two_paths)
2044 printf("%c%s", inter_name_termination, path_two);
2045 putchar(line_termination);
2046 if (path_one != p->one->path)
2047 free((void*)path_one);
2048 if (path_two != p->two->path)
2049 free((void*)path_two);
2050}
2051
d2543b8e 2052static void diff_flush_name(struct diff_filepair *p, int line_termination)
6973dcae
JH
2053{
2054 char *path = p->two->path;
2055
2056 if (line_termination)
2057 path = quote_one(p->two->path);
6973dcae
JH
2058 printf("%s%c", path, line_termination);
2059 if (p->two->path != path)
2060 free(path);
2061}
2062
2063int diff_unmodified_pair(struct diff_filepair *p)
2064{
2065 /* This function is written stricter than necessary to support
2066 * the currently implemented transformers, but the idea is to
2067 * let transformers to produce diff_filepairs any way they want,
2068 * and filter and clean them up here before producing the output.
2069 */
2070 struct diff_filespec *one, *two;
2071
2072 if (DIFF_PAIR_UNMERGED(p))
2073 return 0; /* unmerged is interesting */
2074
2075 one = p->one;
2076 two = p->two;
2077
2078 /* deletion, addition, mode or type change
2079 * and rename are all interesting.
2080 */
2081 if (DIFF_FILE_VALID(one) != DIFF_FILE_VALID(two) ||
2082 DIFF_PAIR_MODE_CHANGED(p) ||
2083 strcmp(one->path, two->path))
2084 return 0;
2085
2086 /* both are valid and point at the same path. that is, we are
2087 * dealing with a change.
2088 */
2089 if (one->sha1_valid && two->sha1_valid &&
2090 !memcmp(one->sha1, two->sha1, sizeof(one->sha1)))
2091 return 1; /* no change */
2092 if (!one->sha1_valid && !two->sha1_valid)
2093 return 1; /* both look at the same file on the filesystem. */
2094 return 0;
2095}
2096
2097static void diff_flush_patch(struct diff_filepair *p, struct diff_options *o)
2098{
2099 if (diff_unmodified_pair(p))
2100 return;
2101
2102 if ((DIFF_FILE_VALID(p->one) && S_ISDIR(p->one->mode)) ||
2103 (DIFF_FILE_VALID(p->two) && S_ISDIR(p->two->mode)))
2104 return; /* no tree diffs in patch format */
2105
2106 run_diff(p, o);
2107}
2108
2109static void diff_flush_stat(struct diff_filepair *p, struct diff_options *o,
2110 struct diffstat_t *diffstat)
2111{
2112 if (diff_unmodified_pair(p))
2113 return;
2114
2115 if ((DIFF_FILE_VALID(p->one) && S_ISDIR(p->one->mode)) ||
2116 (DIFF_FILE_VALID(p->two) && S_ISDIR(p->two->mode)))
2117 return; /* no tree diffs in patch format */
2118
2119 run_diffstat(p, o, diffstat);
2120}
2121
88246898
JS
2122static void diff_flush_checkdiff(struct diff_filepair *p,
2123 struct diff_options *o)
2124{
2125 if (diff_unmodified_pair(p))
2126 return;
2127
2128 if ((DIFF_FILE_VALID(p->one) && S_ISDIR(p->one->mode)) ||
2129 (DIFF_FILE_VALID(p->two) && S_ISDIR(p->two->mode)))
2130 return; /* no tree diffs in patch format */
2131
2132 run_checkdiff(p, o);
2133}
2134
6973dcae
JH
2135int diff_queue_is_empty(void)
2136{
2137 struct diff_queue_struct *q = &diff_queued_diff;
2138 int i;
2139 for (i = 0; i < q->nr; i++)
2140 if (!diff_unmodified_pair(q->queue[i]))
2141 return 0;
2142 return 1;
2143}
2144
2145#if DIFF_DEBUG
2146void diff_debug_filespec(struct diff_filespec *s, int x, const char *one)
2147{
2148 fprintf(stderr, "queue[%d] %s (%s) %s %06o %s\n",
2149 x, one ? one : "",
2150 s->path,
2151 DIFF_FILE_VALID(s) ? "valid" : "invalid",
2152 s->mode,
2153 s->sha1_valid ? sha1_to_hex(s->sha1) : "");
2154 fprintf(stderr, "queue[%d] %s size %lu flags %d\n",
2155 x, one ? one : "",
2156 s->size, s->xfrm_flags);
2157}
2158
2159void diff_debug_filepair(const struct diff_filepair *p, int i)
2160{
2161 diff_debug_filespec(p->one, i, "one");
2162 diff_debug_filespec(p->two, i, "two");
2163 fprintf(stderr, "score %d, status %c stays %d broken %d\n",
2164 p->score, p->status ? p->status : '?',
2165 p->source_stays, p->broken_pair);
2166}
2167
2168void diff_debug_queue(const char *msg, struct diff_queue_struct *q)
2169{
2170 int i;
2171 if (msg)
2172 fprintf(stderr, "%s\n", msg);
2173 fprintf(stderr, "q->nr = %d\n", q->nr);
2174 for (i = 0; i < q->nr; i++) {
2175 struct diff_filepair *p = q->queue[i];
2176 diff_debug_filepair(p, i);
2177 }
2178}
2179#endif
2180
2181static void diff_resolve_rename_copy(void)
2182{
2183 int i, j;
2184 struct diff_filepair *p, *pp;
2185 struct diff_queue_struct *q = &diff_queued_diff;
2186
2187 diff_debug_queue("resolve-rename-copy", q);
2188
2189 for (i = 0; i < q->nr; i++) {
2190 p = q->queue[i];
2191 p->status = 0; /* undecided */
2192 if (DIFF_PAIR_UNMERGED(p))
2193 p->status = DIFF_STATUS_UNMERGED;
2194 else if (!DIFF_FILE_VALID(p->one))
2195 p->status = DIFF_STATUS_ADDED;
2196 else if (!DIFF_FILE_VALID(p->two))
2197 p->status = DIFF_STATUS_DELETED;
2198 else if (DIFF_PAIR_TYPE_CHANGED(p))
2199 p->status = DIFF_STATUS_TYPE_CHANGED;
2200
2201 /* from this point on, we are dealing with a pair
2202 * whose both sides are valid and of the same type, i.e.
2203 * either in-place edit or rename/copy edit.
2204 */
2205 else if (DIFF_PAIR_RENAME(p)) {
2206 if (p->source_stays) {
2207 p->status = DIFF_STATUS_COPIED;
2208 continue;
2209 }
2210 /* See if there is some other filepair that
2211 * copies from the same source as us. If so
2212 * we are a copy. Otherwise we are either a
2213 * copy if the path stays, or a rename if it
2214 * does not, but we already handled "stays" case.
2215 */
2216 for (j = i + 1; j < q->nr; j++) {
2217 pp = q->queue[j];
2218 if (strcmp(pp->one->path, p->one->path))
2219 continue; /* not us */
2220 if (!DIFF_PAIR_RENAME(pp))
2221 continue; /* not a rename/copy */
2222 /* pp is a rename/copy from the same source */
2223 p->status = DIFF_STATUS_COPIED;
2224 break;
2225 }
2226 if (!p->status)
2227 p->status = DIFF_STATUS_RENAMED;
2228 }
2229 else if (memcmp(p->one->sha1, p->two->sha1, 20) ||
2230 p->one->mode != p->two->mode)
2231 p->status = DIFF_STATUS_MODIFIED;
2232 else {
2233 /* This is a "no-change" entry and should not
2234 * happen anymore, but prepare for broken callers.
2235 */
2236 error("feeding unmodified %s to diffcore",
2237 p->one->path);
2238 p->status = DIFF_STATUS_UNKNOWN;
2239 }
2240 }
2241 diff_debug_queue("resolve-rename-copy done", q);
2242}
2243
c6744349 2244static int check_pair_status(struct diff_filepair *p)
6973dcae 2245{
6973dcae
JH
2246 switch (p->status) {
2247 case DIFF_STATUS_UNKNOWN:
c6744349 2248 return 0;
6973dcae
JH
2249 case 0:
2250 die("internal error in diff-resolve-rename-copy");
6973dcae 2251 default:
c6744349 2252 return 1;
6973dcae
JH
2253 }
2254}
2255
c6744349
TH
2256static void flush_one_pair(struct diff_filepair *p, struct diff_options *opt)
2257{
2258 int fmt = opt->output_format;
2259
2260 if (fmt & DIFF_FORMAT_CHECKDIFF)
2261 diff_flush_checkdiff(p, opt);
2262 else if (fmt & (DIFF_FORMAT_RAW | DIFF_FORMAT_NAME_STATUS))
2263 diff_flush_raw(p, opt);
2264 else if (fmt & DIFF_FORMAT_NAME)
2265 diff_flush_name(p, opt->line_termination);
2266}
2267
4bbd261b
SE
2268static void show_file_mode_name(const char *newdelete, struct diff_filespec *fs)
2269{
2270 if (fs->mode)
2271 printf(" %s mode %06o %s\n", newdelete, fs->mode, fs->path);
2272 else
2273 printf(" %s %s\n", newdelete, fs->path);
2274}
2275
2276
2277static void show_mode_change(struct diff_filepair *p, int show_name)
2278{
2279 if (p->one->mode && p->two->mode && p->one->mode != p->two->mode) {
2280 if (show_name)
2281 printf(" mode change %06o => %06o %s\n",
2282 p->one->mode, p->two->mode, p->two->path);
2283 else
2284 printf(" mode change %06o => %06o\n",
2285 p->one->mode, p->two->mode);
2286 }
2287}
2288
2289static void show_rename_copy(const char *renamecopy, struct diff_filepair *p)
2290{
2291 const char *old, *new;
2292
2293 /* Find common prefix */
2294 old = p->one->path;
2295 new = p->two->path;
2296 while (1) {
2297 const char *slash_old, *slash_new;
2298 slash_old = strchr(old, '/');
2299 slash_new = strchr(new, '/');
2300 if (!slash_old ||
2301 !slash_new ||
2302 slash_old - old != slash_new - new ||
2303 memcmp(old, new, slash_new - new))
2304 break;
2305 old = slash_old + 1;
2306 new = slash_new + 1;
2307 }
2308 /* p->one->path thru old is the common prefix, and old and new
2309 * through the end of names are renames
2310 */
2311 if (old != p->one->path)
2312 printf(" %s %.*s{%s => %s} (%d%%)\n", renamecopy,
2313 (int)(old - p->one->path), p->one->path,
2314 old, new, (int)(0.5 + p->score * 100.0/MAX_SCORE));
2315 else
2316 printf(" %s %s => %s (%d%%)\n", renamecopy,
2317 p->one->path, p->two->path,
2318 (int)(0.5 + p->score * 100.0/MAX_SCORE));
2319 show_mode_change(p, 0);
2320}
2321
2322static void diff_summary(struct diff_filepair *p)
2323{
2324 switch(p->status) {
2325 case DIFF_STATUS_DELETED:
2326 show_file_mode_name("delete", p->one);
2327 break;
2328 case DIFF_STATUS_ADDED:
2329 show_file_mode_name("create", p->two);
2330 break;
2331 case DIFF_STATUS_COPIED:
2332 show_rename_copy("copy", p);
2333 break;
2334 case DIFF_STATUS_RENAMED:
2335 show_rename_copy("rename", p);
2336 break;
2337 default:
2338 if (p->score) {
2339 printf(" rewrite %s (%d%%)\n", p->two->path,
2340 (int)(0.5 + p->score * 100.0/MAX_SCORE));
2341 show_mode_change(p, 0);
2342 } else show_mode_change(p, 1);
2343 break;
2344 }
2345}
2346
fcb3d0ad
JS
2347struct patch_id_t {
2348 struct xdiff_emit_state xm;
2349 SHA_CTX *ctx;
2350 int patchlen;
2351};
2352
2353static int remove_space(char *line, int len)
2354{
2355 int i;
2356 char *dst = line;
2357 unsigned char c;
2358
2359 for (i = 0; i < len; i++)
2360 if (!isspace((c = line[i])))
2361 *dst++ = c;
2362
2363 return dst - line;
2364}
2365
2366static void patch_id_consume(void *priv, char *line, unsigned long len)
2367{
2368 struct patch_id_t *data = priv;
2369 int new_len;
2370
2371 /* Ignore line numbers when computing the SHA1 of the patch */
2372 if (!strncmp(line, "@@ -", 4))
2373 return;
2374
2375 new_len = remove_space(line, len);
2376
2377 SHA1_Update(data->ctx, line, new_len);
2378 data->patchlen += new_len;
2379}
2380
2381/* returns 0 upon success, and writes result into sha1 */
2382static int diff_get_patch_id(struct diff_options *options, unsigned char *sha1)
2383{
2384 struct diff_queue_struct *q = &diff_queued_diff;
2385 int i;
2386 SHA_CTX ctx;
2387 struct patch_id_t data;
2388 char buffer[PATH_MAX * 4 + 20];
2389
2390 SHA1_Init(&ctx);
2391 memset(&data, 0, sizeof(struct patch_id_t));
2392 data.ctx = &ctx;
2393 data.xm.consume = patch_id_consume;
2394
2395 for (i = 0; i < q->nr; i++) {
2396 xpparam_t xpp;
2397 xdemitconf_t xecfg;
2398 xdemitcb_t ecb;
2399 mmfile_t mf1, mf2;
2400 struct diff_filepair *p = q->queue[i];
2401 int len1, len2;
2402
2403 if (p->status == 0)
2404 return error("internal diff status error");
2405 if (p->status == DIFF_STATUS_UNKNOWN)
2406 continue;
2407 if (diff_unmodified_pair(p))
2408 continue;
2409 if ((DIFF_FILE_VALID(p->one) && S_ISDIR(p->one->mode)) ||
2410 (DIFF_FILE_VALID(p->two) && S_ISDIR(p->two->mode)))
2411 continue;
2412 if (DIFF_PAIR_UNMERGED(p))
2413 continue;
2414
2415 diff_fill_sha1_info(p->one);
2416 diff_fill_sha1_info(p->two);
2417 if (fill_mmfile(&mf1, p->one) < 0 ||
2418 fill_mmfile(&mf2, p->two) < 0)
2419 return error("unable to read files to diff");
2420
2421 /* Maybe hash p->two? into the patch id? */
2422 if (mmfile_is_binary(&mf2))
2423 continue;
2424
2425 len1 = remove_space(p->one->path, strlen(p->one->path));
2426 len2 = remove_space(p->two->path, strlen(p->two->path));
2427 if (p->one->mode == 0)
2428 len1 = snprintf(buffer, sizeof(buffer),
2429 "diff--gita/%.*sb/%.*s"
2430 "newfilemode%06o"
2431 "---/dev/null"
2432 "+++b/%.*s",
2433 len1, p->one->path,
2434 len2, p->two->path,
2435 p->two->mode,
2436 len2, p->two->path);
2437 else if (p->two->mode == 0)
2438 len1 = snprintf(buffer, sizeof(buffer),
2439 "diff--gita/%.*sb/%.*s"
2440 "deletedfilemode%06o"
2441 "---a/%.*s"
2442 "+++/dev/null",
2443 len1, p->one->path,
2444 len2, p->two->path,
2445 p->one->mode,
2446 len1, p->one->path);
2447 else
2448 len1 = snprintf(buffer, sizeof(buffer),
2449 "diff--gita/%.*sb/%.*s"
2450 "---a/%.*s"
2451 "+++b/%.*s",
2452 len1, p->one->path,
2453 len2, p->two->path,
2454 len1, p->one->path,
2455 len2, p->two->path);
2456 SHA1_Update(&ctx, buffer, len1);
2457
2458 xpp.flags = XDF_NEED_MINIMAL;
2459 xecfg.ctxlen = 3;
9fdc3bb5 2460 xecfg.flags = XDL_EMIT_FUNCNAMES;
fcb3d0ad
JS
2461 ecb.outf = xdiff_outf;
2462 ecb.priv = &data;
2463 xdl_diff(&mf1, &mf2, &xpp, &xecfg, &ecb);
2464 }
2465
2466 SHA1_Final(sha1, &ctx);
2467 return 0;
2468}
2469
2470int diff_flush_patch_id(struct diff_options *options, unsigned char *sha1)
2471{
2472 struct diff_queue_struct *q = &diff_queued_diff;
2473 int i;
2474 int result = diff_get_patch_id(options, sha1);
2475
2476 for (i = 0; i < q->nr; i++)
2477 diff_free_filepair(q->queue[i]);
2478
2479 free(q->queue);
2480 q->queue = NULL;
2481 q->nr = q->alloc = 0;
2482
2483 return result;
2484}
2485
946c3784 2486static int is_summary_empty(const struct diff_queue_struct *q)
6973dcae 2487{
6973dcae 2488 int i;
6973dcae 2489
946c3784
TH
2490 for (i = 0; i < q->nr; i++) {
2491 const struct diff_filepair *p = q->queue[i];
2492
2493 switch (p->status) {
2494 case DIFF_STATUS_DELETED:
2495 case DIFF_STATUS_ADDED:
2496 case DIFF_STATUS_COPIED:
2497 case DIFF_STATUS_RENAMED:
2498 return 0;
2499 default:
2500 if (p->score)
2501 return 0;
2502 if (p->one->mode && p->two->mode &&
2503 p->one->mode != p->two->mode)
2504 return 0;
2505 break;
2506 }
6973dcae 2507 }
946c3784
TH
2508 return 1;
2509}
2510
6973dcae
JH
2511void diff_flush(struct diff_options *options)
2512{
2513 struct diff_queue_struct *q = &diff_queued_diff;
c6744349 2514 int i, output_format = options->output_format;
946c3784 2515 int separator = 0;
6973dcae 2516
c6744349
TH
2517 /*
2518 * Order: raw, stat, summary, patch
2519 * or: name/name-status/checkdiff (other bits clear)
2520 */
946c3784
TH
2521 if (!q->nr)
2522 goto free_queue;
6973dcae 2523
c6744349
TH
2524 if (output_format & (DIFF_FORMAT_RAW |
2525 DIFF_FORMAT_NAME |
2526 DIFF_FORMAT_NAME_STATUS |
2527 DIFF_FORMAT_CHECKDIFF)) {
6973dcae
JH
2528 for (i = 0; i < q->nr; i++) {
2529 struct diff_filepair *p = q->queue[i];
c6744349
TH
2530 if (check_pair_status(p))
2531 flush_one_pair(p, options);
6973dcae 2532 }
946c3784 2533 separator++;
6973dcae 2534 }
c6744349
TH
2535
2536 if (output_format & DIFF_FORMAT_DIFFSTAT) {
5e2b0636 2537 struct diffstat_t diffstat;
c6744349 2538
5e2b0636
TH
2539 memset(&diffstat, 0, sizeof(struct diffstat_t));
2540 diffstat.xm.consume = diffstat_consume;
6973dcae
JH
2541 for (i = 0; i < q->nr; i++) {
2542 struct diff_filepair *p = q->queue[i];
c6744349 2543 if (check_pair_status(p))
5e2b0636 2544 diff_flush_stat(p, options, &diffstat);
6973dcae 2545 }
5e2b0636 2546 show_stats(&diffstat);
3969cf7d 2547 separator++;
6973dcae
JH
2548 }
2549
946c3784 2550 if (output_format & DIFF_FORMAT_SUMMARY && !is_summary_empty(q)) {
c6744349
TH
2551 for (i = 0; i < q->nr; i++)
2552 diff_summary(q->queue[i]);
3969cf7d 2553 separator++;
6973dcae
JH
2554 }
2555
c6744349 2556 if (output_format & DIFF_FORMAT_PATCH) {
946c3784
TH
2557 if (separator) {
2558 if (options->stat_sep) {
2559 /* attach patch instead of inline */
c6744349 2560 fputs(options->stat_sep, stdout);
946c3784 2561 } else {
c6744349 2562 putchar(options->line_termination);
946c3784 2563 }
c6744349
TH
2564 }
2565
2566 for (i = 0; i < q->nr; i++) {
2567 struct diff_filepair *p = q->queue[i];
2568 if (check_pair_status(p))
2569 diff_flush_patch(p, options);
2570 }
4bbd261b
SE
2571 }
2572
c6744349
TH
2573 for (i = 0; i < q->nr; i++)
2574 diff_free_filepair(q->queue[i]);
946c3784 2575free_queue:
6973dcae
JH
2576 free(q->queue);
2577 q->queue = NULL;
2578 q->nr = q->alloc = 0;
2579}
2580
2581static void diffcore_apply_filter(const char *filter)
2582{
2583 int i;
2584 struct diff_queue_struct *q = &diff_queued_diff;
2585 struct diff_queue_struct outq;
2586 outq.queue = NULL;
2587 outq.nr = outq.alloc = 0;
2588
2589 if (!filter)
2590 return;
2591
2592 if (strchr(filter, DIFF_STATUS_FILTER_AON)) {
2593 int found;
2594 for (i = found = 0; !found && i < q->nr; i++) {
2595 struct diff_filepair *p = q->queue[i];
2596 if (((p->status == DIFF_STATUS_MODIFIED) &&
2597 ((p->score &&
2598 strchr(filter, DIFF_STATUS_FILTER_BROKEN)) ||
2599 (!p->score &&
2600 strchr(filter, DIFF_STATUS_MODIFIED)))) ||
2601 ((p->status != DIFF_STATUS_MODIFIED) &&
2602 strchr(filter, p->status)))
2603 found++;
2604 }
2605 if (found)
2606 return;
2607
2608 /* otherwise we will clear the whole queue
2609 * by copying the empty outq at the end of this
2610 * function, but first clear the current entries
2611 * in the queue.
2612 */
2613 for (i = 0; i < q->nr; i++)
2614 diff_free_filepair(q->queue[i]);
2615 }
2616 else {
2617 /* Only the matching ones */
2618 for (i = 0; i < q->nr; i++) {
2619 struct diff_filepair *p = q->queue[i];
2620
2621 if (((p->status == DIFF_STATUS_MODIFIED) &&
2622 ((p->score &&
2623 strchr(filter, DIFF_STATUS_FILTER_BROKEN)) ||
2624 (!p->score &&
2625 strchr(filter, DIFF_STATUS_MODIFIED)))) ||
2626 ((p->status != DIFF_STATUS_MODIFIED) &&
2627 strchr(filter, p->status)))
2628 diff_q(&outq, p);
2629 else
2630 diff_free_filepair(p);
2631 }
2632 }
2633 free(q->queue);
2634 *q = outq;
2635}
2636
2637void diffcore_std(struct diff_options *options)
2638{
2639 if (options->break_opt != -1)
2640 diffcore_break(options->break_opt);
2641 if (options->detect_rename)
2642 diffcore_rename(options);
2643 if (options->break_opt != -1)
2644 diffcore_merge_broken();
2645 if (options->pickaxe)
2646 diffcore_pickaxe(options->pickaxe, options->pickaxe_opts);
2647 if (options->orderfile)
2648 diffcore_order(options->orderfile);
2649 diff_resolve_rename_copy();
2650 diffcore_apply_filter(options->filter);
2651}
2652
2653
2654void diffcore_std_no_resolve(struct diff_options *options)
2655{
2656 if (options->pickaxe)
2657 diffcore_pickaxe(options->pickaxe, options->pickaxe_opts);
2658 if (options->orderfile)
2659 diffcore_order(options->orderfile);
2660 diffcore_apply_filter(options->filter);
2661}
2662
2663void diff_addremove(struct diff_options *options,
2664 int addremove, unsigned mode,
2665 const unsigned char *sha1,
2666 const char *base, const char *path)
2667{
2668 char concatpath[PATH_MAX];
2669 struct diff_filespec *one, *two;
2670
2671 /* This may look odd, but it is a preparation for
2672 * feeding "there are unchanged files which should
2673 * not produce diffs, but when you are doing copy
2674 * detection you would need them, so here they are"
2675 * entries to the diff-core. They will be prefixed
2676 * with something like '=' or '*' (I haven't decided
2677 * which but should not make any difference).
2678 * Feeding the same new and old to diff_change()
2679 * also has the same effect.
2680 * Before the final output happens, they are pruned after
2681 * merged into rename/copy pairs as appropriate.
2682 */
2683 if (options->reverse_diff)
2684 addremove = (addremove == '+' ? '-' :
2685 addremove == '-' ? '+' : addremove);
2686
2687 if (!path) path = "";
2688 sprintf(concatpath, "%s%s", base, path);
2689 one = alloc_filespec(concatpath);
2690 two = alloc_filespec(concatpath);
2691
2692 if (addremove != '+')
2693 fill_filespec(one, sha1, mode);
2694 if (addremove != '-')
2695 fill_filespec(two, sha1, mode);
2696
2697 diff_queue(&diff_queued_diff, one, two);
2698}
2699
2700void diff_change(struct diff_options *options,
2701 unsigned old_mode, unsigned new_mode,
2702 const unsigned char *old_sha1,
2703 const unsigned char *new_sha1,
2704 const char *base, const char *path)
2705{
2706 char concatpath[PATH_MAX];
2707 struct diff_filespec *one, *two;
2708
2709 if (options->reverse_diff) {
2710 unsigned tmp;
2711 const unsigned char *tmp_c;
2712 tmp = old_mode; old_mode = new_mode; new_mode = tmp;
2713 tmp_c = old_sha1; old_sha1 = new_sha1; new_sha1 = tmp_c;
2714 }
2715 if (!path) path = "";
2716 sprintf(concatpath, "%s%s", base, path);
2717 one = alloc_filespec(concatpath);
2718 two = alloc_filespec(concatpath);
2719 fill_filespec(one, old_sha1, old_mode);
2720 fill_filespec(two, new_sha1, new_mode);
2721
2722 diff_queue(&diff_queued_diff, one, two);
2723}
2724
2725void diff_unmerge(struct diff_options *options,
2726 const char *path)
2727{
2728 struct diff_filespec *one, *two;
2729 one = alloc_filespec(path);
2730 two = alloc_filespec(path);
2731 diff_queue(&diff_queued_diff, one, two);
2732}