Merge branch 'es/bright-colors'
[git] / builtin / sparse-checkout.c
1 #include "builtin.h"
2 #include "config.h"
3 #include "dir.h"
4 #include "parse-options.h"
5 #include "pathspec.h"
6 #include "repository.h"
7 #include "run-command.h"
8 #include "strbuf.h"
9 #include "string-list.h"
10 #include "cache.h"
11 #include "cache-tree.h"
12 #include "lockfile.h"
13 #include "resolve-undo.h"
14 #include "unpack-trees.h"
15 #include "wt-status.h"
16 #include "quote.h"
17
18 static const char *empty_base = "";
19
20 static char const * const builtin_sparse_checkout_usage[] = {
21         N_("git sparse-checkout (init|list|set|disable) <options>"),
22         NULL
23 };
24
25 static char *get_sparse_checkout_filename(void)
26 {
27         return git_pathdup("info/sparse-checkout");
28 }
29
30 static void write_patterns_to_file(FILE *fp, struct pattern_list *pl)
31 {
32         int i;
33
34         for (i = 0; i < pl->nr; i++) {
35                 struct path_pattern *p = pl->patterns[i];
36
37                 if (p->flags & PATTERN_FLAG_NEGATIVE)
38                         fprintf(fp, "!");
39
40                 fprintf(fp, "%s", p->pattern);
41
42                 if (p->flags & PATTERN_FLAG_MUSTBEDIR)
43                         fprintf(fp, "/");
44
45                 fprintf(fp, "\n");
46         }
47 }
48
49 static int sparse_checkout_list(int argc, const char **argv)
50 {
51         struct pattern_list pl;
52         char *sparse_filename;
53         int res;
54
55         memset(&pl, 0, sizeof(pl));
56
57         pl.use_cone_patterns = core_sparse_checkout_cone;
58
59         sparse_filename = get_sparse_checkout_filename();
60         res = add_patterns_from_file_to_list(sparse_filename, "", 0, &pl, NULL);
61         free(sparse_filename);
62
63         if (res < 0) {
64                 warning(_("this worktree is not sparse (sparse-checkout file may not exist)"));
65                 return 0;
66         }
67
68         if (pl.use_cone_patterns) {
69                 int i;
70                 struct pattern_entry *pe;
71                 struct hashmap_iter iter;
72                 struct string_list sl = STRING_LIST_INIT_DUP;
73
74                 hashmap_for_each_entry(&pl.recursive_hashmap, &iter, pe, ent) {
75                         /* pe->pattern starts with "/", skip it */
76                         string_list_insert(&sl, pe->pattern + 1);
77                 }
78
79                 string_list_sort(&sl);
80
81                 for (i = 0; i < sl.nr; i++) {
82                         quote_c_style(sl.items[i].string, NULL, stdout, 0);
83                         printf("\n");
84                 }
85
86                 return 0;
87         }
88
89         write_patterns_to_file(stdout, &pl);
90         clear_pattern_list(&pl);
91
92         return 0;
93 }
94
95 static int update_working_directory(struct pattern_list *pl)
96 {
97         int result = 0;
98         struct unpack_trees_options o;
99         struct lock_file lock_file = LOCK_INIT;
100         struct object_id oid;
101         struct tree *tree;
102         struct tree_desc t;
103         struct repository *r = the_repository;
104
105         if (repo_read_index_unmerged(r))
106                 die(_("you need to resolve your current index first"));
107
108         if (get_oid("HEAD", &oid))
109                 return 0;
110
111         tree = parse_tree_indirect(&oid);
112         parse_tree(tree);
113         init_tree_desc(&t, tree->buffer, tree->size);
114
115         memset(&o, 0, sizeof(o));
116         o.verbose_update = isatty(2);
117         o.merge = 1;
118         o.update = 1;
119         o.fn = oneway_merge;
120         o.head_idx = -1;
121         o.src_index = r->index;
122         o.dst_index = r->index;
123         o.skip_sparse_checkout = 0;
124         o.pl = pl;
125         o.keep_pattern_list = !!pl;
126
127         resolve_undo_clear_index(r->index);
128         setup_work_tree();
129
130         cache_tree_free(&r->index->cache_tree);
131
132         repo_hold_locked_index(r, &lock_file, LOCK_DIE_ON_ERROR);
133
134         core_apply_sparse_checkout = 1;
135         result = unpack_trees(1, &t, &o);
136
137         if (!result) {
138                 prime_cache_tree(r, r->index, tree);
139                 write_locked_index(r->index, &lock_file, COMMIT_LOCK);
140         } else
141                 rollback_lock_file(&lock_file);
142
143         return result;
144 }
145
146 static char *escaped_pattern(char *pattern)
147 {
148         char *p = pattern;
149         struct strbuf final = STRBUF_INIT;
150
151         while (*p) {
152                 if (is_glob_special(*p))
153                         strbuf_addch(&final, '\\');
154
155                 strbuf_addch(&final, *p);
156                 p++;
157         }
158
159         return strbuf_detach(&final, NULL);
160 }
161
162 static void write_cone_to_file(FILE *fp, struct pattern_list *pl)
163 {
164         int i;
165         struct pattern_entry *pe;
166         struct hashmap_iter iter;
167         struct string_list sl = STRING_LIST_INIT_DUP;
168         struct strbuf parent_pattern = STRBUF_INIT;
169
170         hashmap_for_each_entry(&pl->parent_hashmap, &iter, pe, ent) {
171                 if (hashmap_get_entry(&pl->recursive_hashmap, pe, ent, NULL))
172                         continue;
173
174                 if (!hashmap_contains_parent(&pl->recursive_hashmap,
175                                              pe->pattern,
176                                              &parent_pattern))
177                         string_list_insert(&sl, pe->pattern);
178         }
179
180         string_list_sort(&sl);
181         string_list_remove_duplicates(&sl, 0);
182
183         fprintf(fp, "/*\n!/*/\n");
184
185         for (i = 0; i < sl.nr; i++) {
186                 char *pattern = escaped_pattern(sl.items[i].string);
187
188                 if (strlen(pattern))
189                         fprintf(fp, "%s/\n!%s/*/\n", pattern, pattern);
190                 free(pattern);
191         }
192
193         string_list_clear(&sl, 0);
194
195         hashmap_for_each_entry(&pl->recursive_hashmap, &iter, pe, ent) {
196                 if (!hashmap_contains_parent(&pl->recursive_hashmap,
197                                              pe->pattern,
198                                              &parent_pattern))
199                         string_list_insert(&sl, pe->pattern);
200         }
201
202         strbuf_release(&parent_pattern);
203
204         string_list_sort(&sl);
205         string_list_remove_duplicates(&sl, 0);
206
207         for (i = 0; i < sl.nr; i++) {
208                 char *pattern = escaped_pattern(sl.items[i].string);
209                 fprintf(fp, "%s/\n", pattern);
210                 free(pattern);
211         }
212 }
213
214 static int write_patterns_and_update(struct pattern_list *pl)
215 {
216         char *sparse_filename;
217         FILE *fp;
218         int fd;
219         struct lock_file lk = LOCK_INIT;
220         int result;
221
222         sparse_filename = get_sparse_checkout_filename();
223
224         if (safe_create_leading_directories(sparse_filename))
225                 die(_("failed to create directory for sparse-checkout file"));
226
227         fd = hold_lock_file_for_update(&lk, sparse_filename,
228                                       LOCK_DIE_ON_ERROR);
229
230         result = update_working_directory(pl);
231         if (result) {
232                 rollback_lock_file(&lk);
233                 free(sparse_filename);
234                 clear_pattern_list(pl);
235                 update_working_directory(NULL);
236                 return result;
237         }
238
239         fp = xfdopen(fd, "w");
240
241         if (core_sparse_checkout_cone)
242                 write_cone_to_file(fp, pl);
243         else
244                 write_patterns_to_file(fp, pl);
245
246         fflush(fp);
247         commit_lock_file(&lk);
248
249         free(sparse_filename);
250         clear_pattern_list(pl);
251
252         return 0;
253 }
254
255 enum sparse_checkout_mode {
256         MODE_NO_PATTERNS = 0,
257         MODE_ALL_PATTERNS = 1,
258         MODE_CONE_PATTERNS = 2,
259 };
260
261 static int set_config(enum sparse_checkout_mode mode)
262 {
263         const char *config_path;
264
265         if (git_config_set_gently("extensions.worktreeConfig", "true")) {
266                 error(_("failed to set extensions.worktreeConfig setting"));
267                 return 1;
268         }
269
270         config_path = git_path("config.worktree");
271         git_config_set_in_file_gently(config_path,
272                                       "core.sparseCheckout",
273                                       mode ? "true" : NULL);
274
275         git_config_set_in_file_gently(config_path,
276                                       "core.sparseCheckoutCone",
277                                       mode == MODE_CONE_PATTERNS ? "true" : NULL);
278
279         return 0;
280 }
281
282 static char const * const builtin_sparse_checkout_init_usage[] = {
283         N_("git sparse-checkout init [--cone]"),
284         NULL
285 };
286
287 static struct sparse_checkout_init_opts {
288         int cone_mode;
289 } init_opts;
290
291 static int sparse_checkout_init(int argc, const char **argv)
292 {
293         struct pattern_list pl;
294         char *sparse_filename;
295         int res;
296         struct object_id oid;
297         int mode;
298         struct strbuf pattern = STRBUF_INIT;
299
300         static struct option builtin_sparse_checkout_init_options[] = {
301                 OPT_BOOL(0, "cone", &init_opts.cone_mode,
302                          N_("initialize the sparse-checkout in cone mode")),
303                 OPT_END(),
304         };
305
306         repo_read_index(the_repository);
307         require_clean_work_tree(the_repository,
308                                 N_("initialize sparse-checkout"), NULL, 1, 0);
309
310         argc = parse_options(argc, argv, NULL,
311                              builtin_sparse_checkout_init_options,
312                              builtin_sparse_checkout_init_usage, 0);
313
314         if (init_opts.cone_mode) {
315                 mode = MODE_CONE_PATTERNS;
316                 core_sparse_checkout_cone = 1;
317         } else
318                 mode = MODE_ALL_PATTERNS;
319
320         if (set_config(mode))
321                 return 1;
322
323         memset(&pl, 0, sizeof(pl));
324
325         sparse_filename = get_sparse_checkout_filename();
326         res = add_patterns_from_file_to_list(sparse_filename, "", 0, &pl, NULL);
327
328         /* If we already have a sparse-checkout file, use it. */
329         if (res >= 0) {
330                 free(sparse_filename);
331                 core_apply_sparse_checkout = 1;
332                 return update_working_directory(NULL);
333         }
334
335         if (get_oid("HEAD", &oid)) {
336                 FILE *fp;
337
338                 /* assume we are in a fresh repo, but update the sparse-checkout file */
339                 fp = xfopen(sparse_filename, "w");
340                 if (!fp)
341                         die(_("failed to open '%s'"), sparse_filename);
342
343                 free(sparse_filename);
344                 fprintf(fp, "/*\n!/*/\n");
345                 fclose(fp);
346                 return 0;
347         }
348
349         strbuf_addstr(&pattern, "/*");
350         add_pattern(strbuf_detach(&pattern, NULL), empty_base, 0, &pl, 0);
351         strbuf_addstr(&pattern, "!/*/");
352         add_pattern(strbuf_detach(&pattern, NULL), empty_base, 0, &pl, 0);
353
354         return write_patterns_and_update(&pl);
355 }
356
357 static void insert_recursive_pattern(struct pattern_list *pl, struct strbuf *path)
358 {
359         struct pattern_entry *e = xmalloc(sizeof(*e));
360         e->patternlen = path->len;
361         e->pattern = strbuf_detach(path, NULL);
362         hashmap_entry_init(&e->ent,
363                            ignore_case ?
364                            strihash(e->pattern) :
365                            strhash(e->pattern));
366
367         hashmap_add(&pl->recursive_hashmap, &e->ent);
368
369         while (e->patternlen) {
370                 char *slash = strrchr(e->pattern, '/');
371                 char *oldpattern = e->pattern;
372                 size_t newlen;
373
374                 if (slash == e->pattern)
375                         break;
376
377                 newlen = slash - e->pattern;
378                 e = xmalloc(sizeof(struct pattern_entry));
379                 e->patternlen = newlen;
380                 e->pattern = xstrndup(oldpattern, newlen);
381                 hashmap_entry_init(&e->ent,
382                                    ignore_case ?
383                                    strihash(e->pattern) :
384                                    strhash(e->pattern));
385
386                 if (!hashmap_get_entry(&pl->parent_hashmap, e, ent, NULL))
387                         hashmap_add(&pl->parent_hashmap, &e->ent);
388         }
389 }
390
391 static void strbuf_to_cone_pattern(struct strbuf *line, struct pattern_list *pl)
392 {
393         strbuf_trim(line);
394
395         strbuf_trim_trailing_dir_sep(line);
396
397         if (!line->len)
398                 return;
399
400         if (line->buf[0] != '/')
401                 strbuf_insertstr(line, 0, "/");
402
403         insert_recursive_pattern(pl, line);
404 }
405
406 static char const * const builtin_sparse_checkout_set_usage[] = {
407         N_("git sparse-checkout set (--stdin | <patterns>)"),
408         NULL
409 };
410
411 static struct sparse_checkout_set_opts {
412         int use_stdin;
413 } set_opts;
414
415 static int sparse_checkout_set(int argc, const char **argv, const char *prefix)
416 {
417         int i;
418         struct pattern_list pl;
419         int result;
420         int changed_config = 0;
421
422         static struct option builtin_sparse_checkout_set_options[] = {
423                 OPT_BOOL(0, "stdin", &set_opts.use_stdin,
424                          N_("read patterns from standard in")),
425                 OPT_END(),
426         };
427
428         repo_read_index(the_repository);
429         require_clean_work_tree(the_repository,
430                                 N_("set sparse-checkout patterns"), NULL, 1, 0);
431
432         memset(&pl, 0, sizeof(pl));
433
434         argc = parse_options(argc, argv, prefix,
435                              builtin_sparse_checkout_set_options,
436                              builtin_sparse_checkout_set_usage,
437                              PARSE_OPT_KEEP_UNKNOWN);
438
439         if (core_sparse_checkout_cone) {
440                 struct strbuf line = STRBUF_INIT;
441
442                 hashmap_init(&pl.recursive_hashmap, pl_hashmap_cmp, NULL, 0);
443                 hashmap_init(&pl.parent_hashmap, pl_hashmap_cmp, NULL, 0);
444                 pl.use_cone_patterns = 1;
445
446                 if (set_opts.use_stdin) {
447                         struct strbuf unquoted = STRBUF_INIT;
448                         while (!strbuf_getline(&line, stdin)) {
449                                 if (line.buf[0] == '"') {
450                                         strbuf_reset(&unquoted);
451                                         if (unquote_c_style(&unquoted, line.buf, NULL))
452                                                 die(_("unable to unquote C-style string '%s'"),
453                                                 line.buf);
454
455                                         strbuf_swap(&unquoted, &line);
456                                 }
457
458                                 strbuf_to_cone_pattern(&line, &pl);
459                         }
460
461                         strbuf_release(&unquoted);
462                 } else {
463                         for (i = 0; i < argc; i++) {
464                                 strbuf_setlen(&line, 0);
465                                 strbuf_addstr(&line, argv[i]);
466                                 strbuf_to_cone_pattern(&line, &pl);
467                         }
468                 }
469         } else {
470                 if (set_opts.use_stdin) {
471                         struct strbuf line = STRBUF_INIT;
472
473                         while (!strbuf_getline(&line, stdin)) {
474                                 size_t len;
475                                 char *buf = strbuf_detach(&line, &len);
476                                 add_pattern(buf, empty_base, 0, &pl, 0);
477                         }
478                 } else {
479                         for (i = 0; i < argc; i++)
480                                 add_pattern(argv[i], empty_base, 0, &pl, 0);
481                 }
482         }
483
484         if (!core_apply_sparse_checkout) {
485                 set_config(MODE_ALL_PATTERNS);
486                 core_apply_sparse_checkout = 1;
487                 changed_config = 1;
488         }
489
490         result = write_patterns_and_update(&pl);
491
492         if (result && changed_config)
493                 set_config(MODE_NO_PATTERNS);
494
495         clear_pattern_list(&pl);
496         return result;
497 }
498
499 static int sparse_checkout_disable(int argc, const char **argv)
500 {
501         struct pattern_list pl;
502         struct strbuf match_all = STRBUF_INIT;
503
504         repo_read_index(the_repository);
505         require_clean_work_tree(the_repository,
506                                 N_("disable sparse-checkout"), NULL, 1, 0);
507
508         memset(&pl, 0, sizeof(pl));
509         hashmap_init(&pl.recursive_hashmap, pl_hashmap_cmp, NULL, 0);
510         hashmap_init(&pl.parent_hashmap, pl_hashmap_cmp, NULL, 0);
511         pl.use_cone_patterns = 0;
512         core_apply_sparse_checkout = 1;
513
514         strbuf_addstr(&match_all, "/*");
515         add_pattern(strbuf_detach(&match_all, NULL), empty_base, 0, &pl, 0);
516
517         if (update_working_directory(&pl))
518                 die(_("error while refreshing working directory"));
519
520         clear_pattern_list(&pl);
521         return set_config(MODE_NO_PATTERNS);
522 }
523
524 int cmd_sparse_checkout(int argc, const char **argv, const char *prefix)
525 {
526         static struct option builtin_sparse_checkout_options[] = {
527                 OPT_END(),
528         };
529
530         if (argc == 2 && !strcmp(argv[1], "-h"))
531                 usage_with_options(builtin_sparse_checkout_usage,
532                                    builtin_sparse_checkout_options);
533
534         argc = parse_options(argc, argv, prefix,
535                              builtin_sparse_checkout_options,
536                              builtin_sparse_checkout_usage,
537                              PARSE_OPT_STOP_AT_NON_OPTION);
538
539         git_config(git_default_config, NULL);
540
541         if (argc > 0) {
542                 if (!strcmp(argv[0], "list"))
543                         return sparse_checkout_list(argc, argv);
544                 if (!strcmp(argv[0], "init"))
545                         return sparse_checkout_init(argc, argv);
546                 if (!strcmp(argv[0], "set"))
547                         return sparse_checkout_set(argc, argv, prefix);
548                 if (!strcmp(argv[0], "disable"))
549                         return sparse_checkout_disable(argc, argv);
550         }
551
552         usage_with_options(builtin_sparse_checkout_usage,
553                            builtin_sparse_checkout_options);
554 }