repack: pack objects mentioned by the index
[git] / diffcore-pickaxe.c
1 /*
2  * Copyright (C) 2005 Junio C Hamano
3  * Copyright (C) 2010 Google Inc.
4  */
5 #include "cache.h"
6 #include "diff.h"
7 #include "diffcore.h"
8 #include "xdiff-interface.h"
9 #include "kwset.h"
10
11 typedef int (*pickaxe_fn)(mmfile_t *one, mmfile_t *two,
12                           struct diff_options *o,
13                           regex_t *regexp, kwset_t kws);
14
15 struct diffgrep_cb {
16         regex_t *regexp;
17         int hit;
18 };
19
20 static void diffgrep_consume(void *priv, char *line, unsigned long len)
21 {
22         struct diffgrep_cb *data = priv;
23         regmatch_t regmatch;
24         int hold;
25
26         if (line[0] != '+' && line[0] != '-')
27                 return;
28         if (data->hit)
29                 /*
30                  * NEEDSWORK: we should have a way to terminate the
31                  * caller early.
32                  */
33                 return;
34         /* Yuck -- line ought to be "const char *"! */
35         hold = line[len];
36         line[len] = '\0';
37         data->hit = !regexec(data->regexp, line + 1, 1, &regmatch, 0);
38         line[len] = hold;
39 }
40
41 static int diff_grep(mmfile_t *one, mmfile_t *two,
42                      struct diff_options *o,
43                      regex_t *regexp, kwset_t kws)
44 {
45         regmatch_t regmatch;
46         struct diffgrep_cb ecbdata;
47         xpparam_t xpp;
48         xdemitconf_t xecfg;
49
50         if (!one)
51                 return !regexec(regexp, two->ptr, 1, &regmatch, 0);
52         if (!two)
53                 return !regexec(regexp, one->ptr, 1, &regmatch, 0);
54
55         /*
56          * We have both sides; need to run textual diff and see if
57          * the pattern appears on added/deleted lines.
58          */
59         memset(&xpp, 0, sizeof(xpp));
60         memset(&xecfg, 0, sizeof(xecfg));
61         ecbdata.regexp = regexp;
62         ecbdata.hit = 0;
63         xecfg.ctxlen = o->context;
64         xecfg.interhunkctxlen = o->interhunkcontext;
65         xdi_diff_outf(one, two, diffgrep_consume, &ecbdata,
66                       &xpp, &xecfg);
67         return ecbdata.hit;
68 }
69
70 static unsigned int contains(mmfile_t *mf, regex_t *regexp, kwset_t kws)
71 {
72         unsigned int cnt;
73         unsigned long sz;
74         const char *data;
75
76         sz = mf->size;
77         data = mf->ptr;
78         cnt = 0;
79
80         if (regexp) {
81                 regmatch_t regmatch;
82                 int flags = 0;
83
84                 assert(data[sz] == '\0');
85                 while (*data && !regexec(regexp, data, 1, &regmatch, flags)) {
86                         flags |= REG_NOTBOL;
87                         data += regmatch.rm_eo;
88                         if (*data && regmatch.rm_so == regmatch.rm_eo)
89                                 data++;
90                         cnt++;
91                 }
92
93         } else { /* Classic exact string match */
94                 while (sz) {
95                         struct kwsmatch kwsm;
96                         size_t offset = kwsexec(kws, data, sz, &kwsm);
97                         if (offset == -1)
98                                 break;
99                         sz -= offset + kwsm.size[0];
100                         data += offset + kwsm.size[0];
101                         cnt++;
102                 }
103         }
104         return cnt;
105 }
106
107 static int has_changes(mmfile_t *one, mmfile_t *two,
108                        struct diff_options *o,
109                        regex_t *regexp, kwset_t kws)
110 {
111         unsigned int one_contains = one ? contains(one, regexp, kws) : 0;
112         unsigned int two_contains = two ? contains(two, regexp, kws) : 0;
113         return one_contains != two_contains;
114 }
115
116 static int pickaxe_match(struct diff_filepair *p, struct diff_options *o,
117                          regex_t *regexp, kwset_t kws, pickaxe_fn fn)
118 {
119         struct userdiff_driver *textconv_one = NULL;
120         struct userdiff_driver *textconv_two = NULL;
121         mmfile_t mf1, mf2;
122         int ret;
123
124         if (!o->pickaxe[0])
125                 return 0;
126
127         /* ignore unmerged */
128         if (!DIFF_FILE_VALID(p->one) && !DIFF_FILE_VALID(p->two))
129                 return 0;
130
131         if (DIFF_OPT_TST(o, ALLOW_TEXTCONV)) {
132                 textconv_one = get_textconv(p->one);
133                 textconv_two = get_textconv(p->two);
134         }
135
136         /*
137          * If we have an unmodified pair, we know that the count will be the
138          * same and don't even have to load the blobs. Unless textconv is in
139          * play, _and_ we are using two different textconv filters (e.g.,
140          * because a pair is an exact rename with different textconv attributes
141          * for each side, which might generate different content).
142          */
143         if (textconv_one == textconv_two && diff_unmodified_pair(p))
144                 return 0;
145
146         mf1.size = fill_textconv(textconv_one, p->one, &mf1.ptr);
147         mf2.size = fill_textconv(textconv_two, p->two, &mf2.ptr);
148
149         ret = fn(DIFF_FILE_VALID(p->one) ? &mf1 : NULL,
150                  DIFF_FILE_VALID(p->two) ? &mf2 : NULL,
151                  o, regexp, kws);
152
153         if (textconv_one)
154                 free(mf1.ptr);
155         if (textconv_two)
156                 free(mf2.ptr);
157         diff_free_filespec_data(p->one);
158         diff_free_filespec_data(p->two);
159
160         return ret;
161 }
162
163 static void pickaxe(struct diff_queue_struct *q, struct diff_options *o,
164                     regex_t *regexp, kwset_t kws, pickaxe_fn fn)
165 {
166         int i;
167         struct diff_queue_struct outq;
168
169         DIFF_QUEUE_CLEAR(&outq);
170
171         if (o->pickaxe_opts & DIFF_PICKAXE_ALL) {
172                 /* Showing the whole changeset if needle exists */
173                 for (i = 0; i < q->nr; i++) {
174                         struct diff_filepair *p = q->queue[i];
175                         if (pickaxe_match(p, o, regexp, kws, fn))
176                                 return; /* do not munge the queue */
177                 }
178
179                 /*
180                  * Otherwise we will clear the whole queue by copying
181                  * the empty outq at the end of this function, but
182                  * first clear the current entries in the queue.
183                  */
184                 for (i = 0; i < q->nr; i++)
185                         diff_free_filepair(q->queue[i]);
186         } else {
187                 /* Showing only the filepairs that has the needle */
188                 for (i = 0; i < q->nr; i++) {
189                         struct diff_filepair *p = q->queue[i];
190                         if (pickaxe_match(p, o, regexp, kws, fn))
191                                 diff_q(&outq, p);
192                         else
193                                 diff_free_filepair(p);
194                 }
195         }
196
197         free(q->queue);
198         *q = outq;
199 }
200
201 void diffcore_pickaxe(struct diff_options *o)
202 {
203         const char *needle = o->pickaxe;
204         int opts = o->pickaxe_opts;
205         regex_t regex, *regexp = NULL;
206         kwset_t kws = NULL;
207
208         if (opts & (DIFF_PICKAXE_REGEX | DIFF_PICKAXE_KIND_G)) {
209                 int err;
210                 int cflags = REG_EXTENDED | REG_NEWLINE;
211                 if (DIFF_OPT_TST(o, PICKAXE_IGNORE_CASE))
212                         cflags |= REG_ICASE;
213                 err = regcomp(&regex, needle, cflags);
214                 if (err) {
215                         /* The POSIX.2 people are surely sick */
216                         char errbuf[1024];
217                         regerror(err, &regex, errbuf, 1024);
218                         regfree(&regex);
219                         die("invalid regex: %s", errbuf);
220                 }
221                 regexp = &regex;
222         } else {
223                 kws = kwsalloc(DIFF_OPT_TST(o, PICKAXE_IGNORE_CASE)
224                                ? tolower_trans_tbl : NULL);
225                 kwsincr(kws, needle, strlen(needle));
226                 kwsprep(kws);
227         }
228
229         /* Might want to warn when both S and G are on; I don't care... */
230         pickaxe(&diff_queued_diff, o, regexp, kws,
231                 (opts & DIFF_PICKAXE_KIND_G) ? diff_grep : has_changes);
232
233         if (regexp)
234                 regfree(regexp);
235         else
236                 kwsfree(kws);
237         return;
238 }