Merge branch 'bw/config-h'
[git] / config.c
1 /*
2  * GIT - The information manager from hell
3  *
4  * Copyright (C) Linus Torvalds, 2005
5  * Copyright (C) Johannes Schindelin, 2005
6  *
7  */
8 #include "cache.h"
9 #include "config.h"
10 #include "lockfile.h"
11 #include "exec_cmd.h"
12 #include "strbuf.h"
13 #include "quote.h"
14 #include "hashmap.h"
15 #include "string-list.h"
16 #include "utf8.h"
17 #include "dir.h"
18
19 struct config_source {
20         struct config_source *prev;
21         union {
22                 FILE *file;
23                 struct config_buf {
24                         const char *buf;
25                         size_t len;
26                         size_t pos;
27                 } buf;
28         } u;
29         enum config_origin_type origin_type;
30         const char *name;
31         const char *path;
32         int die_on_error;
33         int linenr;
34         int eof;
35         struct strbuf value;
36         struct strbuf var;
37
38         int (*do_fgetc)(struct config_source *c);
39         int (*do_ungetc)(int c, struct config_source *conf);
40         long (*do_ftell)(struct config_source *c);
41 };
42
43 /*
44  * These variables record the "current" config source, which
45  * can be accessed by parsing callbacks.
46  *
47  * The "cf" variable will be non-NULL only when we are actually parsing a real
48  * config source (file, blob, cmdline, etc).
49  *
50  * The "current_config_kvi" variable will be non-NULL only when we are feeding
51  * cached config from a configset into a callback.
52  *
53  * They should generally never be non-NULL at the same time. If they are both
54  * NULL, then we aren't parsing anything (and depending on the function looking
55  * at the variables, it's either a bug for it to be called in the first place,
56  * or it's a function which can be reused for non-config purposes, and should
57  * fall back to some sane behavior).
58  */
59 static struct config_source *cf;
60 static struct key_value_info *current_config_kvi;
61
62 /*
63  * Similar to the variables above, this gives access to the "scope" of the
64  * current value (repo, global, etc). For cached values, it can be found via
65  * the current_config_kvi as above. During parsing, the current value can be
66  * found in this variable. It's not part of "cf" because it transcends a single
67  * file (i.e., a file included from .git/config is still in "repo" scope).
68  */
69 static enum config_scope current_parsing_scope;
70
71 static int core_compression_seen;
72 static int pack_compression_seen;
73 static int zlib_compression_seen;
74
75 /*
76  * Default config_set that contains key-value pairs from the usual set of config
77  * config files (i.e repo specific .git/config, user wide ~/.gitconfig, XDG
78  * config file and the global /etc/gitconfig)
79  */
80 static struct config_set the_config_set;
81
82 static int config_file_fgetc(struct config_source *conf)
83 {
84         return getc_unlocked(conf->u.file);
85 }
86
87 static int config_file_ungetc(int c, struct config_source *conf)
88 {
89         return ungetc(c, conf->u.file);
90 }
91
92 static long config_file_ftell(struct config_source *conf)
93 {
94         return ftell(conf->u.file);
95 }
96
97
98 static int config_buf_fgetc(struct config_source *conf)
99 {
100         if (conf->u.buf.pos < conf->u.buf.len)
101                 return conf->u.buf.buf[conf->u.buf.pos++];
102
103         return EOF;
104 }
105
106 static int config_buf_ungetc(int c, struct config_source *conf)
107 {
108         if (conf->u.buf.pos > 0) {
109                 conf->u.buf.pos--;
110                 if (conf->u.buf.buf[conf->u.buf.pos] != c)
111                         die("BUG: config_buf can only ungetc the same character");
112                 return c;
113         }
114
115         return EOF;
116 }
117
118 static long config_buf_ftell(struct config_source *conf)
119 {
120         return conf->u.buf.pos;
121 }
122
123 #define MAX_INCLUDE_DEPTH 10
124 static const char include_depth_advice[] =
125 "exceeded maximum include depth (%d) while including\n"
126 "       %s\n"
127 "from\n"
128 "       %s\n"
129 "Do you have circular includes?";
130 static int handle_path_include(const char *path, struct config_include_data *inc)
131 {
132         int ret = 0;
133         struct strbuf buf = STRBUF_INIT;
134         char *expanded;
135
136         if (!path)
137                 return config_error_nonbool("include.path");
138
139         expanded = expand_user_path(path, 0);
140         if (!expanded)
141                 return error("could not expand include path '%s'", path);
142         path = expanded;
143
144         /*
145          * Use an absolute path as-is, but interpret relative paths
146          * based on the including config file.
147          */
148         if (!is_absolute_path(path)) {
149                 char *slash;
150
151                 if (!cf || !cf->path)
152                         return error("relative config includes must come from files");
153
154                 slash = find_last_dir_sep(cf->path);
155                 if (slash)
156                         strbuf_add(&buf, cf->path, slash - cf->path + 1);
157                 strbuf_addstr(&buf, path);
158                 path = buf.buf;
159         }
160
161         if (!access_or_die(path, R_OK, 0)) {
162                 if (++inc->depth > MAX_INCLUDE_DEPTH)
163                         die(include_depth_advice, MAX_INCLUDE_DEPTH, path,
164                             !cf ? "<unknown>" :
165                             cf->name ? cf->name :
166                             "the command line");
167                 ret = git_config_from_file(git_config_include, path, inc);
168                 inc->depth--;
169         }
170         strbuf_release(&buf);
171         free(expanded);
172         return ret;
173 }
174
175 static int prepare_include_condition_pattern(struct strbuf *pat)
176 {
177         struct strbuf path = STRBUF_INIT;
178         char *expanded;
179         int prefix = 0;
180
181         expanded = expand_user_path(pat->buf, 1);
182         if (expanded) {
183                 strbuf_reset(pat);
184                 strbuf_addstr(pat, expanded);
185                 free(expanded);
186         }
187
188         if (pat->buf[0] == '.' && is_dir_sep(pat->buf[1])) {
189                 const char *slash;
190
191                 if (!cf || !cf->path)
192                         return error(_("relative config include "
193                                        "conditionals must come from files"));
194
195                 strbuf_realpath(&path, cf->path, 1);
196                 slash = find_last_dir_sep(path.buf);
197                 if (!slash)
198                         die("BUG: how is this possible?");
199                 strbuf_splice(pat, 0, 1, path.buf, slash - path.buf);
200                 prefix = slash - path.buf + 1 /* slash */;
201         } else if (!is_absolute_path(pat->buf))
202                 strbuf_insert(pat, 0, "**/", 3);
203
204         if (pat->len && is_dir_sep(pat->buf[pat->len - 1]))
205                 strbuf_addstr(pat, "**");
206
207         strbuf_release(&path);
208         return prefix;
209 }
210
211 static int include_by_gitdir(const struct config_options *opts,
212                              const char *cond, size_t cond_len, int icase)
213 {
214         struct strbuf text = STRBUF_INIT;
215         struct strbuf pattern = STRBUF_INIT;
216         int ret = 0, prefix;
217         const char *git_dir;
218         int already_tried_absolute = 0;
219
220         if (opts->git_dir)
221                 git_dir = opts->git_dir;
222         else
223                 goto done;
224
225         strbuf_realpath(&text, git_dir, 1);
226         strbuf_add(&pattern, cond, cond_len);
227         prefix = prepare_include_condition_pattern(&pattern);
228
229 again:
230         if (prefix < 0)
231                 goto done;
232
233         if (prefix > 0) {
234                 /*
235                  * perform literal matching on the prefix part so that
236                  * any wildcard character in it can't create side effects.
237                  */
238                 if (text.len < prefix)
239                         goto done;
240                 if (!icase && strncmp(pattern.buf, text.buf, prefix))
241                         goto done;
242                 if (icase && strncasecmp(pattern.buf, text.buf, prefix))
243                         goto done;
244         }
245
246         ret = !wildmatch(pattern.buf + prefix, text.buf + prefix,
247                          icase ? WM_CASEFOLD : 0, NULL);
248
249         if (!ret && !already_tried_absolute) {
250                 /*
251                  * We've tried e.g. matching gitdir:~/work, but if
252                  * ~/work is a symlink to /mnt/storage/work
253                  * strbuf_realpath() will expand it, so the rule won't
254                  * match. Let's match against a
255                  * strbuf_add_absolute_path() version of the path,
256                  * which'll do the right thing
257                  */
258                 strbuf_reset(&text);
259                 strbuf_add_absolute_path(&text, git_dir);
260                 already_tried_absolute = 1;
261                 goto again;
262         }
263 done:
264         strbuf_release(&pattern);
265         strbuf_release(&text);
266         return ret;
267 }
268
269 static int include_condition_is_true(const struct config_options *opts,
270                                      const char *cond, size_t cond_len)
271 {
272
273         if (skip_prefix_mem(cond, cond_len, "gitdir:", &cond, &cond_len))
274                 return include_by_gitdir(opts, cond, cond_len, 0);
275         else if (skip_prefix_mem(cond, cond_len, "gitdir/i:", &cond, &cond_len))
276                 return include_by_gitdir(opts, cond, cond_len, 1);
277
278         /* unknown conditionals are always false */
279         return 0;
280 }
281
282 int git_config_include(const char *var, const char *value, void *data)
283 {
284         struct config_include_data *inc = data;
285         const char *cond, *key;
286         int cond_len;
287         int ret;
288
289         /*
290          * Pass along all values, including "include" directives; this makes it
291          * possible to query information on the includes themselves.
292          */
293         ret = inc->fn(var, value, inc->data);
294         if (ret < 0)
295                 return ret;
296
297         if (!strcmp(var, "include.path"))
298                 ret = handle_path_include(value, inc);
299
300         if (!parse_config_key(var, "includeif", &cond, &cond_len, &key) &&
301             (cond && include_condition_is_true(inc->opts, cond, cond_len)) &&
302             !strcmp(key, "path"))
303                 ret = handle_path_include(value, inc);
304
305         return ret;
306 }
307
308 void git_config_push_parameter(const char *text)
309 {
310         struct strbuf env = STRBUF_INIT;
311         const char *old = getenv(CONFIG_DATA_ENVIRONMENT);
312         if (old && *old) {
313                 strbuf_addstr(&env, old);
314                 strbuf_addch(&env, ' ');
315         }
316         sq_quote_buf(&env, text);
317         setenv(CONFIG_DATA_ENVIRONMENT, env.buf, 1);
318         strbuf_release(&env);
319 }
320
321 static inline int iskeychar(int c)
322 {
323         return isalnum(c) || c == '-';
324 }
325
326 /*
327  * Auxiliary function to sanity-check and split the key into the section
328  * identifier and variable name.
329  *
330  * Returns 0 on success, -1 when there is an invalid character in the key and
331  * -2 if there is no section name in the key.
332  *
333  * store_key - pointer to char* which will hold a copy of the key with
334  *             lowercase section and variable name
335  * baselen - pointer to int which will hold the length of the
336  *           section + subsection part, can be NULL
337  */
338 static int git_config_parse_key_1(const char *key, char **store_key, int *baselen_, int quiet)
339 {
340         int i, dot, baselen;
341         const char *last_dot = strrchr(key, '.');
342
343         /*
344          * Since "key" actually contains the section name and the real
345          * key name separated by a dot, we have to know where the dot is.
346          */
347
348         if (last_dot == NULL || last_dot == key) {
349                 if (!quiet)
350                         error("key does not contain a section: %s", key);
351                 return -CONFIG_NO_SECTION_OR_NAME;
352         }
353
354         if (!last_dot[1]) {
355                 if (!quiet)
356                         error("key does not contain variable name: %s", key);
357                 return -CONFIG_NO_SECTION_OR_NAME;
358         }
359
360         baselen = last_dot - key;
361         if (baselen_)
362                 *baselen_ = baselen;
363
364         /*
365          * Validate the key and while at it, lower case it for matching.
366          */
367         if (store_key)
368                 *store_key = xmallocz(strlen(key));
369
370         dot = 0;
371         for (i = 0; key[i]; i++) {
372                 unsigned char c = key[i];
373                 if (c == '.')
374                         dot = 1;
375                 /* Leave the extended basename untouched.. */
376                 if (!dot || i > baselen) {
377                         if (!iskeychar(c) ||
378                             (i == baselen + 1 && !isalpha(c))) {
379                                 if (!quiet)
380                                         error("invalid key: %s", key);
381                                 goto out_free_ret_1;
382                         }
383                         c = tolower(c);
384                 } else if (c == '\n') {
385                         if (!quiet)
386                                 error("invalid key (newline): %s", key);
387                         goto out_free_ret_1;
388                 }
389                 if (store_key)
390                         (*store_key)[i] = c;
391         }
392
393         return 0;
394
395 out_free_ret_1:
396         if (store_key) {
397                 free(*store_key);
398                 *store_key = NULL;
399         }
400         return -CONFIG_INVALID_KEY;
401 }
402
403 int git_config_parse_key(const char *key, char **store_key, int *baselen)
404 {
405         return git_config_parse_key_1(key, store_key, baselen, 0);
406 }
407
408 int git_config_key_is_valid(const char *key)
409 {
410         return !git_config_parse_key_1(key, NULL, NULL, 1);
411 }
412
413 int git_config_parse_parameter(const char *text,
414                                config_fn_t fn, void *data)
415 {
416         const char *value;
417         char *canonical_name;
418         struct strbuf **pair;
419         int ret;
420
421         pair = strbuf_split_str(text, '=', 2);
422         if (!pair[0])
423                 return error("bogus config parameter: %s", text);
424
425         if (pair[0]->len && pair[0]->buf[pair[0]->len - 1] == '=') {
426                 strbuf_setlen(pair[0], pair[0]->len - 1);
427                 value = pair[1] ? pair[1]->buf : "";
428         } else {
429                 value = NULL;
430         }
431
432         strbuf_trim(pair[0]);
433         if (!pair[0]->len) {
434                 strbuf_list_free(pair);
435                 return error("bogus config parameter: %s", text);
436         }
437
438         if (git_config_parse_key(pair[0]->buf, &canonical_name, NULL)) {
439                 ret = -1;
440         } else {
441                 ret = (fn(canonical_name, value, data) < 0) ? -1 : 0;
442                 free(canonical_name);
443         }
444         strbuf_list_free(pair);
445         return ret;
446 }
447
448 int git_config_from_parameters(config_fn_t fn, void *data)
449 {
450         const char *env = getenv(CONFIG_DATA_ENVIRONMENT);
451         int ret = 0;
452         char *envw;
453         const char **argv = NULL;
454         int nr = 0, alloc = 0;
455         int i;
456         struct config_source source;
457
458         if (!env)
459                 return 0;
460
461         memset(&source, 0, sizeof(source));
462         source.prev = cf;
463         source.origin_type = CONFIG_ORIGIN_CMDLINE;
464         cf = &source;
465
466         /* sq_dequote will write over it */
467         envw = xstrdup(env);
468
469         if (sq_dequote_to_argv(envw, &argv, &nr, &alloc) < 0) {
470                 ret = error("bogus format in " CONFIG_DATA_ENVIRONMENT);
471                 goto out;
472         }
473
474         for (i = 0; i < nr; i++) {
475                 if (git_config_parse_parameter(argv[i], fn, data) < 0) {
476                         ret = -1;
477                         goto out;
478                 }
479         }
480
481 out:
482         free(argv);
483         free(envw);
484         cf = source.prev;
485         return ret;
486 }
487
488 static int get_next_char(void)
489 {
490         int c = cf->do_fgetc(cf);
491
492         if (c == '\r') {
493                 /* DOS like systems */
494                 c = cf->do_fgetc(cf);
495                 if (c != '\n') {
496                         if (c != EOF)
497                                 cf->do_ungetc(c, cf);
498                         c = '\r';
499                 }
500         }
501         if (c == '\n')
502                 cf->linenr++;
503         if (c == EOF) {
504                 cf->eof = 1;
505                 cf->linenr++;
506                 c = '\n';
507         }
508         return c;
509 }
510
511 static char *parse_value(void)
512 {
513         int quote = 0, comment = 0, space = 0;
514
515         strbuf_reset(&cf->value);
516         for (;;) {
517                 int c = get_next_char();
518                 if (c == '\n') {
519                         if (quote) {
520                                 cf->linenr--;
521                                 return NULL;
522                         }
523                         return cf->value.buf;
524                 }
525                 if (comment)
526                         continue;
527                 if (isspace(c) && !quote) {
528                         if (cf->value.len)
529                                 space++;
530                         continue;
531                 }
532                 if (!quote) {
533                         if (c == ';' || c == '#') {
534                                 comment = 1;
535                                 continue;
536                         }
537                 }
538                 for (; space; space--)
539                         strbuf_addch(&cf->value, ' ');
540                 if (c == '\\') {
541                         c = get_next_char();
542                         switch (c) {
543                         case '\n':
544                                 continue;
545                         case 't':
546                                 c = '\t';
547                                 break;
548                         case 'b':
549                                 c = '\b';
550                                 break;
551                         case 'n':
552                                 c = '\n';
553                                 break;
554                         /* Some characters escape as themselves */
555                         case '\\': case '"':
556                                 break;
557                         /* Reject unknown escape sequences */
558                         default:
559                                 return NULL;
560                         }
561                         strbuf_addch(&cf->value, c);
562                         continue;
563                 }
564                 if (c == '"') {
565                         quote = 1-quote;
566                         continue;
567                 }
568                 strbuf_addch(&cf->value, c);
569         }
570 }
571
572 static int get_value(config_fn_t fn, void *data, struct strbuf *name)
573 {
574         int c;
575         char *value;
576         int ret;
577
578         /* Get the full name */
579         for (;;) {
580                 c = get_next_char();
581                 if (cf->eof)
582                         break;
583                 if (!iskeychar(c))
584                         break;
585                 strbuf_addch(name, tolower(c));
586         }
587
588         while (c == ' ' || c == '\t')
589                 c = get_next_char();
590
591         value = NULL;
592         if (c != '\n') {
593                 if (c != '=')
594                         return -1;
595                 value = parse_value();
596                 if (!value)
597                         return -1;
598         }
599         /*
600          * We already consumed the \n, but we need linenr to point to
601          * the line we just parsed during the call to fn to get
602          * accurate line number in error messages.
603          */
604         cf->linenr--;
605         ret = fn(name->buf, value, data);
606         if (ret >= 0)
607                 cf->linenr++;
608         return ret;
609 }
610
611 static int get_extended_base_var(struct strbuf *name, int c)
612 {
613         do {
614                 if (c == '\n')
615                         goto error_incomplete_line;
616                 c = get_next_char();
617         } while (isspace(c));
618
619         /* We require the format to be '[base "extension"]' */
620         if (c != '"')
621                 return -1;
622         strbuf_addch(name, '.');
623
624         for (;;) {
625                 int c = get_next_char();
626                 if (c == '\n')
627                         goto error_incomplete_line;
628                 if (c == '"')
629                         break;
630                 if (c == '\\') {
631                         c = get_next_char();
632                         if (c == '\n')
633                                 goto error_incomplete_line;
634                 }
635                 strbuf_addch(name, c);
636         }
637
638         /* Final ']' */
639         if (get_next_char() != ']')
640                 return -1;
641         return 0;
642 error_incomplete_line:
643         cf->linenr--;
644         return -1;
645 }
646
647 static int get_base_var(struct strbuf *name)
648 {
649         for (;;) {
650                 int c = get_next_char();
651                 if (cf->eof)
652                         return -1;
653                 if (c == ']')
654                         return 0;
655                 if (isspace(c))
656                         return get_extended_base_var(name, c);
657                 if (!iskeychar(c) && c != '.')
658                         return -1;
659                 strbuf_addch(name, tolower(c));
660         }
661 }
662
663 static int git_parse_source(config_fn_t fn, void *data)
664 {
665         int comment = 0;
666         int baselen = 0;
667         struct strbuf *var = &cf->var;
668         int error_return = 0;
669         char *error_msg = NULL;
670
671         /* U+FEFF Byte Order Mark in UTF8 */
672         const char *bomptr = utf8_bom;
673
674         for (;;) {
675                 int c = get_next_char();
676                 if (bomptr && *bomptr) {
677                         /* We are at the file beginning; skip UTF8-encoded BOM
678                          * if present. Sane editors won't put this in on their
679                          * own, but e.g. Windows Notepad will do it happily. */
680                         if (c == (*bomptr & 0377)) {
681                                 bomptr++;
682                                 continue;
683                         } else {
684                                 /* Do not tolerate partial BOM. */
685                                 if (bomptr != utf8_bom)
686                                         break;
687                                 /* No BOM at file beginning. Cool. */
688                                 bomptr = NULL;
689                         }
690                 }
691                 if (c == '\n') {
692                         if (cf->eof)
693                                 return 0;
694                         comment = 0;
695                         continue;
696                 }
697                 if (comment || isspace(c))
698                         continue;
699                 if (c == '#' || c == ';') {
700                         comment = 1;
701                         continue;
702                 }
703                 if (c == '[') {
704                         /* Reset prior to determining a new stem */
705                         strbuf_reset(var);
706                         if (get_base_var(var) < 0 || var->len < 1)
707                                 break;
708                         strbuf_addch(var, '.');
709                         baselen = var->len;
710                         continue;
711                 }
712                 if (!isalpha(c))
713                         break;
714                 /*
715                  * Truncate the var name back to the section header
716                  * stem prior to grabbing the suffix part of the name
717                  * and the value.
718                  */
719                 strbuf_setlen(var, baselen);
720                 strbuf_addch(var, tolower(c));
721                 if (get_value(fn, data, var) < 0)
722                         break;
723         }
724
725         switch (cf->origin_type) {
726         case CONFIG_ORIGIN_BLOB:
727                 error_msg = xstrfmt(_("bad config line %d in blob %s"),
728                                       cf->linenr, cf->name);
729                 break;
730         case CONFIG_ORIGIN_FILE:
731                 error_msg = xstrfmt(_("bad config line %d in file %s"),
732                                       cf->linenr, cf->name);
733                 break;
734         case CONFIG_ORIGIN_STDIN:
735                 error_msg = xstrfmt(_("bad config line %d in standard input"),
736                                       cf->linenr);
737                 break;
738         case CONFIG_ORIGIN_SUBMODULE_BLOB:
739                 error_msg = xstrfmt(_("bad config line %d in submodule-blob %s"),
740                                        cf->linenr, cf->name);
741                 break;
742         case CONFIG_ORIGIN_CMDLINE:
743                 error_msg = xstrfmt(_("bad config line %d in command line %s"),
744                                        cf->linenr, cf->name);
745                 break;
746         default:
747                 error_msg = xstrfmt(_("bad config line %d in %s"),
748                                       cf->linenr, cf->name);
749         }
750
751         if (cf->die_on_error)
752                 die("%s", error_msg);
753         else
754                 error_return = error("%s", error_msg);
755
756         free(error_msg);
757         return error_return;
758 }
759
760 static int parse_unit_factor(const char *end, uintmax_t *val)
761 {
762         if (!*end)
763                 return 1;
764         else if (!strcasecmp(end, "k")) {
765                 *val *= 1024;
766                 return 1;
767         }
768         else if (!strcasecmp(end, "m")) {
769                 *val *= 1024 * 1024;
770                 return 1;
771         }
772         else if (!strcasecmp(end, "g")) {
773                 *val *= 1024 * 1024 * 1024;
774                 return 1;
775         }
776         return 0;
777 }
778
779 static int git_parse_signed(const char *value, intmax_t *ret, intmax_t max)
780 {
781         if (value && *value) {
782                 char *end;
783                 intmax_t val;
784                 uintmax_t uval;
785                 uintmax_t factor = 1;
786
787                 errno = 0;
788                 val = strtoimax(value, &end, 0);
789                 if (errno == ERANGE)
790                         return 0;
791                 if (!parse_unit_factor(end, &factor)) {
792                         errno = EINVAL;
793                         return 0;
794                 }
795                 uval = labs(val);
796                 uval *= factor;
797                 if (uval > max || labs(val) > uval) {
798                         errno = ERANGE;
799                         return 0;
800                 }
801                 val *= factor;
802                 *ret = val;
803                 return 1;
804         }
805         errno = EINVAL;
806         return 0;
807 }
808
809 static int git_parse_unsigned(const char *value, uintmax_t *ret, uintmax_t max)
810 {
811         if (value && *value) {
812                 char *end;
813                 uintmax_t val;
814                 uintmax_t oldval;
815
816                 errno = 0;
817                 val = strtoumax(value, &end, 0);
818                 if (errno == ERANGE)
819                         return 0;
820                 oldval = val;
821                 if (!parse_unit_factor(end, &val)) {
822                         errno = EINVAL;
823                         return 0;
824                 }
825                 if (val > max || oldval > val) {
826                         errno = ERANGE;
827                         return 0;
828                 }
829                 *ret = val;
830                 return 1;
831         }
832         errno = EINVAL;
833         return 0;
834 }
835
836 static int git_parse_int(const char *value, int *ret)
837 {
838         intmax_t tmp;
839         if (!git_parse_signed(value, &tmp, maximum_signed_value_of_type(int)))
840                 return 0;
841         *ret = tmp;
842         return 1;
843 }
844
845 static int git_parse_int64(const char *value, int64_t *ret)
846 {
847         intmax_t tmp;
848         if (!git_parse_signed(value, &tmp, maximum_signed_value_of_type(int64_t)))
849                 return 0;
850         *ret = tmp;
851         return 1;
852 }
853
854 int git_parse_ulong(const char *value, unsigned long *ret)
855 {
856         uintmax_t tmp;
857         if (!git_parse_unsigned(value, &tmp, maximum_unsigned_value_of_type(long)))
858                 return 0;
859         *ret = tmp;
860         return 1;
861 }
862
863 static int git_parse_ssize_t(const char *value, ssize_t *ret)
864 {
865         intmax_t tmp;
866         if (!git_parse_signed(value, &tmp, maximum_signed_value_of_type(ssize_t)))
867                 return 0;
868         *ret = tmp;
869         return 1;
870 }
871
872 NORETURN
873 static void die_bad_number(const char *name, const char *value)
874 {
875         const char * error_type = (errno == ERANGE)? _("out of range"):_("invalid unit");
876
877         if (!value)
878                 value = "";
879
880         if (!(cf && cf->name))
881                 die(_("bad numeric config value '%s' for '%s': %s"),
882                     value, name, error_type);
883
884         switch (cf->origin_type) {
885         case CONFIG_ORIGIN_BLOB:
886                 die(_("bad numeric config value '%s' for '%s' in blob %s: %s"),
887                     value, name, cf->name, error_type);
888         case CONFIG_ORIGIN_FILE:
889                 die(_("bad numeric config value '%s' for '%s' in file %s: %s"),
890                     value, name, cf->name, error_type);
891         case CONFIG_ORIGIN_STDIN:
892                 die(_("bad numeric config value '%s' for '%s' in standard input: %s"),
893                     value, name, error_type);
894         case CONFIG_ORIGIN_SUBMODULE_BLOB:
895                 die(_("bad numeric config value '%s' for '%s' in submodule-blob %s: %s"),
896                     value, name, cf->name, error_type);
897         case CONFIG_ORIGIN_CMDLINE:
898                 die(_("bad numeric config value '%s' for '%s' in command line %s: %s"),
899                     value, name, cf->name, error_type);
900         default:
901                 die(_("bad numeric config value '%s' for '%s' in %s: %s"),
902                     value, name, cf->name, error_type);
903         }
904 }
905
906 int git_config_int(const char *name, const char *value)
907 {
908         int ret;
909         if (!git_parse_int(value, &ret))
910                 die_bad_number(name, value);
911         return ret;
912 }
913
914 int64_t git_config_int64(const char *name, const char *value)
915 {
916         int64_t ret;
917         if (!git_parse_int64(value, &ret))
918                 die_bad_number(name, value);
919         return ret;
920 }
921
922 unsigned long git_config_ulong(const char *name, const char *value)
923 {
924         unsigned long ret;
925         if (!git_parse_ulong(value, &ret))
926                 die_bad_number(name, value);
927         return ret;
928 }
929
930 ssize_t git_config_ssize_t(const char *name, const char *value)
931 {
932         ssize_t ret;
933         if (!git_parse_ssize_t(value, &ret))
934                 die_bad_number(name, value);
935         return ret;
936 }
937
938 int git_parse_maybe_bool(const char *value)
939 {
940         if (!value)
941                 return 1;
942         if (!*value)
943                 return 0;
944         if (!strcasecmp(value, "true")
945             || !strcasecmp(value, "yes")
946             || !strcasecmp(value, "on"))
947                 return 1;
948         if (!strcasecmp(value, "false")
949             || !strcasecmp(value, "no")
950             || !strcasecmp(value, "off"))
951                 return 0;
952         return -1;
953 }
954
955 int git_config_maybe_bool(const char *name, const char *value)
956 {
957         int v = git_parse_maybe_bool(value);
958         if (0 <= v)
959                 return v;
960         if (git_parse_int(value, &v))
961                 return !!v;
962         return -1;
963 }
964
965 int git_config_bool_or_int(const char *name, const char *value, int *is_bool)
966 {
967         int v = git_parse_maybe_bool(value);
968         if (0 <= v) {
969                 *is_bool = 1;
970                 return v;
971         }
972         *is_bool = 0;
973         return git_config_int(name, value);
974 }
975
976 int git_config_bool(const char *name, const char *value)
977 {
978         int discard;
979         return !!git_config_bool_or_int(name, value, &discard);
980 }
981
982 int git_config_string(const char **dest, const char *var, const char *value)
983 {
984         if (!value)
985                 return config_error_nonbool(var);
986         *dest = xstrdup(value);
987         return 0;
988 }
989
990 int git_config_pathname(const char **dest, const char *var, const char *value)
991 {
992         if (!value)
993                 return config_error_nonbool(var);
994         *dest = expand_user_path(value, 0);
995         if (!*dest)
996                 die(_("failed to expand user dir in: '%s'"), value);
997         return 0;
998 }
999
1000 static int git_default_core_config(const char *var, const char *value)
1001 {
1002         /* This needs a better name */
1003         if (!strcmp(var, "core.filemode")) {
1004                 trust_executable_bit = git_config_bool(var, value);
1005                 return 0;
1006         }
1007         if (!strcmp(var, "core.trustctime")) {
1008                 trust_ctime = git_config_bool(var, value);
1009                 return 0;
1010         }
1011         if (!strcmp(var, "core.checkstat")) {
1012                 if (!strcasecmp(value, "default"))
1013                         check_stat = 1;
1014                 else if (!strcasecmp(value, "minimal"))
1015                         check_stat = 0;
1016         }
1017
1018         if (!strcmp(var, "core.quotepath")) {
1019                 quote_path_fully = git_config_bool(var, value);
1020                 return 0;
1021         }
1022
1023         if (!strcmp(var, "core.symlinks")) {
1024                 has_symlinks = git_config_bool(var, value);
1025                 return 0;
1026         }
1027
1028         if (!strcmp(var, "core.ignorecase")) {
1029                 ignore_case = git_config_bool(var, value);
1030                 return 0;
1031         }
1032
1033         if (!strcmp(var, "core.attributesfile"))
1034                 return git_config_pathname(&git_attributes_file, var, value);
1035
1036         if (!strcmp(var, "core.hookspath"))
1037                 return git_config_pathname(&git_hooks_path, var, value);
1038
1039         if (!strcmp(var, "core.bare")) {
1040                 is_bare_repository_cfg = git_config_bool(var, value);
1041                 return 0;
1042         }
1043
1044         if (!strcmp(var, "core.ignorestat")) {
1045                 assume_unchanged = git_config_bool(var, value);
1046                 return 0;
1047         }
1048
1049         if (!strcmp(var, "core.prefersymlinkrefs")) {
1050                 prefer_symlink_refs = git_config_bool(var, value);
1051                 return 0;
1052         }
1053
1054         if (!strcmp(var, "core.logallrefupdates")) {
1055                 if (value && !strcasecmp(value, "always"))
1056                         log_all_ref_updates = LOG_REFS_ALWAYS;
1057                 else if (git_config_bool(var, value))
1058                         log_all_ref_updates = LOG_REFS_NORMAL;
1059                 else
1060                         log_all_ref_updates = LOG_REFS_NONE;
1061                 return 0;
1062         }
1063
1064         if (!strcmp(var, "core.warnambiguousrefs")) {
1065                 warn_ambiguous_refs = git_config_bool(var, value);
1066                 return 0;
1067         }
1068
1069         if (!strcmp(var, "core.abbrev")) {
1070                 if (!value)
1071                         return config_error_nonbool(var);
1072                 if (!strcasecmp(value, "auto"))
1073                         default_abbrev = -1;
1074                 else {
1075                         int abbrev = git_config_int(var, value);
1076                         if (abbrev < minimum_abbrev || abbrev > 40)
1077                                 return error("abbrev length out of range: %d", abbrev);
1078                         default_abbrev = abbrev;
1079                 }
1080                 return 0;
1081         }
1082
1083         if (!strcmp(var, "core.disambiguate"))
1084                 return set_disambiguate_hint_config(var, value);
1085
1086         if (!strcmp(var, "core.loosecompression")) {
1087                 int level = git_config_int(var, value);
1088                 if (level == -1)
1089                         level = Z_DEFAULT_COMPRESSION;
1090                 else if (level < 0 || level > Z_BEST_COMPRESSION)
1091                         die(_("bad zlib compression level %d"), level);
1092                 zlib_compression_level = level;
1093                 zlib_compression_seen = 1;
1094                 return 0;
1095         }
1096
1097         if (!strcmp(var, "core.compression")) {
1098                 int level = git_config_int(var, value);
1099                 if (level == -1)
1100                         level = Z_DEFAULT_COMPRESSION;
1101                 else if (level < 0 || level > Z_BEST_COMPRESSION)
1102                         die(_("bad zlib compression level %d"), level);
1103                 core_compression_level = level;
1104                 core_compression_seen = 1;
1105                 if (!zlib_compression_seen)
1106                         zlib_compression_level = level;
1107                 if (!pack_compression_seen)
1108                         pack_compression_level = level;
1109                 return 0;
1110         }
1111
1112         if (!strcmp(var, "core.packedgitwindowsize")) {
1113                 int pgsz_x2 = getpagesize() * 2;
1114                 packed_git_window_size = git_config_ulong(var, value);
1115
1116                 /* This value must be multiple of (pagesize * 2) */
1117                 packed_git_window_size /= pgsz_x2;
1118                 if (packed_git_window_size < 1)
1119                         packed_git_window_size = 1;
1120                 packed_git_window_size *= pgsz_x2;
1121                 return 0;
1122         }
1123
1124         if (!strcmp(var, "core.bigfilethreshold")) {
1125                 big_file_threshold = git_config_ulong(var, value);
1126                 return 0;
1127         }
1128
1129         if (!strcmp(var, "core.packedgitlimit")) {
1130                 packed_git_limit = git_config_ulong(var, value);
1131                 return 0;
1132         }
1133
1134         if (!strcmp(var, "core.deltabasecachelimit")) {
1135                 delta_base_cache_limit = git_config_ulong(var, value);
1136                 return 0;
1137         }
1138
1139         if (!strcmp(var, "core.autocrlf")) {
1140                 if (value && !strcasecmp(value, "input")) {
1141                         auto_crlf = AUTO_CRLF_INPUT;
1142                         return 0;
1143                 }
1144                 auto_crlf = git_config_bool(var, value);
1145                 return 0;
1146         }
1147
1148         if (!strcmp(var, "core.safecrlf")) {
1149                 if (value && !strcasecmp(value, "warn")) {
1150                         safe_crlf = SAFE_CRLF_WARN;
1151                         return 0;
1152                 }
1153                 safe_crlf = git_config_bool(var, value);
1154                 return 0;
1155         }
1156
1157         if (!strcmp(var, "core.eol")) {
1158                 if (value && !strcasecmp(value, "lf"))
1159                         core_eol = EOL_LF;
1160                 else if (value && !strcasecmp(value, "crlf"))
1161                         core_eol = EOL_CRLF;
1162                 else if (value && !strcasecmp(value, "native"))
1163                         core_eol = EOL_NATIVE;
1164                 else
1165                         core_eol = EOL_UNSET;
1166                 return 0;
1167         }
1168
1169         if (!strcmp(var, "core.notesref")) {
1170                 notes_ref_name = xstrdup(value);
1171                 return 0;
1172         }
1173
1174         if (!strcmp(var, "core.editor"))
1175                 return git_config_string(&editor_program, var, value);
1176
1177         if (!strcmp(var, "core.commentchar")) {
1178                 if (!value)
1179                         return config_error_nonbool(var);
1180                 else if (!strcasecmp(value, "auto"))
1181                         auto_comment_line_char = 1;
1182                 else if (value[0] && !value[1]) {
1183                         comment_line_char = value[0];
1184                         auto_comment_line_char = 0;
1185                 } else
1186                         return error("core.commentChar should only be one character");
1187                 return 0;
1188         }
1189
1190         if (!strcmp(var, "core.askpass"))
1191                 return git_config_string(&askpass_program, var, value);
1192
1193         if (!strcmp(var, "core.excludesfile"))
1194                 return git_config_pathname(&excludes_file, var, value);
1195
1196         if (!strcmp(var, "core.whitespace")) {
1197                 if (!value)
1198                         return config_error_nonbool(var);
1199                 whitespace_rule_cfg = parse_whitespace_rule(value);
1200                 return 0;
1201         }
1202
1203         if (!strcmp(var, "core.fsyncobjectfiles")) {
1204                 fsync_object_files = git_config_bool(var, value);
1205                 return 0;
1206         }
1207
1208         if (!strcmp(var, "core.preloadindex")) {
1209                 core_preload_index = git_config_bool(var, value);
1210                 return 0;
1211         }
1212
1213         if (!strcmp(var, "core.createobject")) {
1214                 if (!strcmp(value, "rename"))
1215                         object_creation_mode = OBJECT_CREATION_USES_RENAMES;
1216                 else if (!strcmp(value, "link"))
1217                         object_creation_mode = OBJECT_CREATION_USES_HARDLINKS;
1218                 else
1219                         die(_("invalid mode for object creation: %s"), value);
1220                 return 0;
1221         }
1222
1223         if (!strcmp(var, "core.sparsecheckout")) {
1224                 core_apply_sparse_checkout = git_config_bool(var, value);
1225                 return 0;
1226         }
1227
1228         if (!strcmp(var, "core.precomposeunicode")) {
1229                 precomposed_unicode = git_config_bool(var, value);
1230                 return 0;
1231         }
1232
1233         if (!strcmp(var, "core.protecthfs")) {
1234                 protect_hfs = git_config_bool(var, value);
1235                 return 0;
1236         }
1237
1238         if (!strcmp(var, "core.protectntfs")) {
1239                 protect_ntfs = git_config_bool(var, value);
1240                 return 0;
1241         }
1242
1243         if (!strcmp(var, "core.hidedotfiles")) {
1244                 if (value && !strcasecmp(value, "dotgitonly"))
1245                         hide_dotfiles = HIDE_DOTFILES_DOTGITONLY;
1246                 else
1247                         hide_dotfiles = git_config_bool(var, value);
1248                 return 0;
1249         }
1250
1251         /* Add other config variables here and to Documentation/config.txt. */
1252         return 0;
1253 }
1254
1255 static int git_default_i18n_config(const char *var, const char *value)
1256 {
1257         if (!strcmp(var, "i18n.commitencoding"))
1258                 return git_config_string(&git_commit_encoding, var, value);
1259
1260         if (!strcmp(var, "i18n.logoutputencoding"))
1261                 return git_config_string(&git_log_output_encoding, var, value);
1262
1263         /* Add other config variables here and to Documentation/config.txt. */
1264         return 0;
1265 }
1266
1267 static int git_default_branch_config(const char *var, const char *value)
1268 {
1269         if (!strcmp(var, "branch.autosetupmerge")) {
1270                 if (value && !strcasecmp(value, "always")) {
1271                         git_branch_track = BRANCH_TRACK_ALWAYS;
1272                         return 0;
1273                 }
1274                 git_branch_track = git_config_bool(var, value);
1275                 return 0;
1276         }
1277         if (!strcmp(var, "branch.autosetuprebase")) {
1278                 if (!value)
1279                         return config_error_nonbool(var);
1280                 else if (!strcmp(value, "never"))
1281                         autorebase = AUTOREBASE_NEVER;
1282                 else if (!strcmp(value, "local"))
1283                         autorebase = AUTOREBASE_LOCAL;
1284                 else if (!strcmp(value, "remote"))
1285                         autorebase = AUTOREBASE_REMOTE;
1286                 else if (!strcmp(value, "always"))
1287                         autorebase = AUTOREBASE_ALWAYS;
1288                 else
1289                         return error("malformed value for %s", var);
1290                 return 0;
1291         }
1292
1293         /* Add other config variables here and to Documentation/config.txt. */
1294         return 0;
1295 }
1296
1297 static int git_default_push_config(const char *var, const char *value)
1298 {
1299         if (!strcmp(var, "push.default")) {
1300                 if (!value)
1301                         return config_error_nonbool(var);
1302                 else if (!strcmp(value, "nothing"))
1303                         push_default = PUSH_DEFAULT_NOTHING;
1304                 else if (!strcmp(value, "matching"))
1305                         push_default = PUSH_DEFAULT_MATCHING;
1306                 else if (!strcmp(value, "simple"))
1307                         push_default = PUSH_DEFAULT_SIMPLE;
1308                 else if (!strcmp(value, "upstream"))
1309                         push_default = PUSH_DEFAULT_UPSTREAM;
1310                 else if (!strcmp(value, "tracking")) /* deprecated */
1311                         push_default = PUSH_DEFAULT_UPSTREAM;
1312                 else if (!strcmp(value, "current"))
1313                         push_default = PUSH_DEFAULT_CURRENT;
1314                 else {
1315                         error("malformed value for %s: %s", var, value);
1316                         return error("Must be one of nothing, matching, simple, "
1317                                      "upstream or current.");
1318                 }
1319                 return 0;
1320         }
1321
1322         /* Add other config variables here and to Documentation/config.txt. */
1323         return 0;
1324 }
1325
1326 static int git_default_mailmap_config(const char *var, const char *value)
1327 {
1328         if (!strcmp(var, "mailmap.file"))
1329                 return git_config_pathname(&git_mailmap_file, var, value);
1330         if (!strcmp(var, "mailmap.blob"))
1331                 return git_config_string(&git_mailmap_blob, var, value);
1332
1333         /* Add other config variables here and to Documentation/config.txt. */
1334         return 0;
1335 }
1336
1337 int git_default_config(const char *var, const char *value, void *dummy)
1338 {
1339         if (starts_with(var, "core."))
1340                 return git_default_core_config(var, value);
1341
1342         if (starts_with(var, "user."))
1343                 return git_ident_config(var, value, dummy);
1344
1345         if (starts_with(var, "i18n."))
1346                 return git_default_i18n_config(var, value);
1347
1348         if (starts_with(var, "branch."))
1349                 return git_default_branch_config(var, value);
1350
1351         if (starts_with(var, "push."))
1352                 return git_default_push_config(var, value);
1353
1354         if (starts_with(var, "mailmap."))
1355                 return git_default_mailmap_config(var, value);
1356
1357         if (starts_with(var, "advice."))
1358                 return git_default_advice_config(var, value);
1359
1360         if (!strcmp(var, "pager.color") || !strcmp(var, "color.pager")) {
1361                 pager_use_color = git_config_bool(var,value);
1362                 return 0;
1363         }
1364
1365         if (!strcmp(var, "pack.packsizelimit")) {
1366                 pack_size_limit_cfg = git_config_ulong(var, value);
1367                 return 0;
1368         }
1369
1370         if (!strcmp(var, "pack.compression")) {
1371                 int level = git_config_int(var, value);
1372                 if (level == -1)
1373                         level = Z_DEFAULT_COMPRESSION;
1374                 else if (level < 0 || level > Z_BEST_COMPRESSION)
1375                         die(_("bad pack compression level %d"), level);
1376                 pack_compression_level = level;
1377                 pack_compression_seen = 1;
1378                 return 0;
1379         }
1380
1381         /* Add other config variables here and to Documentation/config.txt. */
1382         return 0;
1383 }
1384
1385 /*
1386  * All source specific fields in the union, die_on_error, name and the callbacks
1387  * fgetc, ungetc, ftell of top need to be initialized before calling
1388  * this function.
1389  */
1390 static int do_config_from(struct config_source *top, config_fn_t fn, void *data)
1391 {
1392         int ret;
1393
1394         /* push config-file parsing state stack */
1395         top->prev = cf;
1396         top->linenr = 1;
1397         top->eof = 0;
1398         strbuf_init(&top->value, 1024);
1399         strbuf_init(&top->var, 1024);
1400         cf = top;
1401
1402         ret = git_parse_source(fn, data);
1403
1404         /* pop config-file parsing state stack */
1405         strbuf_release(&top->value);
1406         strbuf_release(&top->var);
1407         cf = top->prev;
1408
1409         return ret;
1410 }
1411
1412 static int do_config_from_file(config_fn_t fn,
1413                 const enum config_origin_type origin_type,
1414                 const char *name, const char *path, FILE *f,
1415                 void *data)
1416 {
1417         struct config_source top;
1418
1419         top.u.file = f;
1420         top.origin_type = origin_type;
1421         top.name = name;
1422         top.path = path;
1423         top.die_on_error = 1;
1424         top.do_fgetc = config_file_fgetc;
1425         top.do_ungetc = config_file_ungetc;
1426         top.do_ftell = config_file_ftell;
1427
1428         return do_config_from(&top, fn, data);
1429 }
1430
1431 static int git_config_from_stdin(config_fn_t fn, void *data)
1432 {
1433         return do_config_from_file(fn, CONFIG_ORIGIN_STDIN, "", NULL, stdin, data);
1434 }
1435
1436 int git_config_from_file(config_fn_t fn, const char *filename, void *data)
1437 {
1438         int ret = -1;
1439         FILE *f;
1440
1441         f = fopen_or_warn(filename, "r");
1442         if (f) {
1443                 flockfile(f);
1444                 ret = do_config_from_file(fn, CONFIG_ORIGIN_FILE, filename, filename, f, data);
1445                 funlockfile(f);
1446                 fclose(f);
1447         }
1448         return ret;
1449 }
1450
1451 int git_config_from_mem(config_fn_t fn, const enum config_origin_type origin_type,
1452                         const char *name, const char *buf, size_t len, void *data)
1453 {
1454         struct config_source top;
1455
1456         top.u.buf.buf = buf;
1457         top.u.buf.len = len;
1458         top.u.buf.pos = 0;
1459         top.origin_type = origin_type;
1460         top.name = name;
1461         top.path = NULL;
1462         top.die_on_error = 0;
1463         top.do_fgetc = config_buf_fgetc;
1464         top.do_ungetc = config_buf_ungetc;
1465         top.do_ftell = config_buf_ftell;
1466
1467         return do_config_from(&top, fn, data);
1468 }
1469
1470 int git_config_from_blob_sha1(config_fn_t fn,
1471                               const char *name,
1472                               const unsigned char *sha1,
1473                               void *data)
1474 {
1475         enum object_type type;
1476         char *buf;
1477         unsigned long size;
1478         int ret;
1479
1480         buf = read_sha1_file(sha1, &type, &size);
1481         if (!buf)
1482                 return error("unable to load config blob object '%s'", name);
1483         if (type != OBJ_BLOB) {
1484                 free(buf);
1485                 return error("reference '%s' does not point to a blob", name);
1486         }
1487
1488         ret = git_config_from_mem(fn, CONFIG_ORIGIN_BLOB, name, buf, size, data);
1489         free(buf);
1490
1491         return ret;
1492 }
1493
1494 static int git_config_from_blob_ref(config_fn_t fn,
1495                                     const char *name,
1496                                     void *data)
1497 {
1498         unsigned char sha1[20];
1499
1500         if (get_sha1(name, sha1) < 0)
1501                 return error("unable to resolve config blob '%s'", name);
1502         return git_config_from_blob_sha1(fn, name, sha1, data);
1503 }
1504
1505 const char *git_etc_gitconfig(void)
1506 {
1507         static const char *system_wide;
1508         if (!system_wide)
1509                 system_wide = system_path(ETC_GITCONFIG);
1510         return system_wide;
1511 }
1512
1513 /*
1514  * Parse environment variable 'k' as a boolean (in various
1515  * possible spellings); if missing, use the default value 'def'.
1516  */
1517 int git_env_bool(const char *k, int def)
1518 {
1519         const char *v = getenv(k);
1520         return v ? git_config_bool(k, v) : def;
1521 }
1522
1523 /*
1524  * Parse environment variable 'k' as ulong with possibly a unit
1525  * suffix; if missing, use the default value 'val'.
1526  */
1527 unsigned long git_env_ulong(const char *k, unsigned long val)
1528 {
1529         const char *v = getenv(k);
1530         if (v && !git_parse_ulong(v, &val))
1531                 die("failed to parse %s", k);
1532         return val;
1533 }
1534
1535 int git_config_system(void)
1536 {
1537         return !git_env_bool("GIT_CONFIG_NOSYSTEM", 0);
1538 }
1539
1540 static int do_git_config_sequence(const struct config_options *opts,
1541                                   config_fn_t fn, void *data)
1542 {
1543         int ret = 0;
1544         char *xdg_config = xdg_config_home("config");
1545         char *user_config = expand_user_path("~/.gitconfig", 0);
1546         char *repo_config;
1547
1548         if (opts->commondir)
1549                 repo_config = mkpathdup("%s/config", opts->commondir);
1550         else
1551                 repo_config = NULL;
1552
1553         current_parsing_scope = CONFIG_SCOPE_SYSTEM;
1554         if (git_config_system() && !access_or_die(git_etc_gitconfig(), R_OK, 0))
1555                 ret += git_config_from_file(fn, git_etc_gitconfig(),
1556                                             data);
1557
1558         current_parsing_scope = CONFIG_SCOPE_GLOBAL;
1559         if (xdg_config && !access_or_die(xdg_config, R_OK, ACCESS_EACCES_OK))
1560                 ret += git_config_from_file(fn, xdg_config, data);
1561
1562         if (user_config && !access_or_die(user_config, R_OK, ACCESS_EACCES_OK))
1563                 ret += git_config_from_file(fn, user_config, data);
1564
1565         current_parsing_scope = CONFIG_SCOPE_REPO;
1566         if (repo_config && !access_or_die(repo_config, R_OK, 0))
1567                 ret += git_config_from_file(fn, repo_config, data);
1568
1569         current_parsing_scope = CONFIG_SCOPE_CMDLINE;
1570         if (git_config_from_parameters(fn, data) < 0)
1571                 die(_("unable to parse command-line config"));
1572
1573         current_parsing_scope = CONFIG_SCOPE_UNKNOWN;
1574         free(xdg_config);
1575         free(user_config);
1576         free(repo_config);
1577         return ret;
1578 }
1579
1580 int config_with_options(config_fn_t fn, void *data,
1581                         struct git_config_source *config_source,
1582                         const struct config_options *opts)
1583 {
1584         struct config_include_data inc = CONFIG_INCLUDE_INIT;
1585
1586         if (opts->respect_includes) {
1587                 inc.fn = fn;
1588                 inc.data = data;
1589                 inc.opts = opts;
1590                 fn = git_config_include;
1591                 data = &inc;
1592         }
1593
1594         /*
1595          * If we have a specific filename, use it. Otherwise, follow the
1596          * regular lookup sequence.
1597          */
1598         if (config_source && config_source->use_stdin)
1599                 return git_config_from_stdin(fn, data);
1600         else if (config_source && config_source->file)
1601                 return git_config_from_file(fn, config_source->file, data);
1602         else if (config_source && config_source->blob)
1603                 return git_config_from_blob_ref(fn, config_source->blob, data);
1604
1605         return do_git_config_sequence(opts, fn, data);
1606 }
1607
1608 static void git_config_raw(config_fn_t fn, void *data)
1609 {
1610         struct config_options opts = {0};
1611
1612         opts.respect_includes = 1;
1613         if (have_git_dir()) {
1614                 opts.commondir = get_git_common_dir();
1615                 opts.git_dir = get_git_dir();
1616         }
1617
1618         if (config_with_options(fn, data, NULL, &opts) < 0)
1619                 /*
1620                  * config_with_options() normally returns only
1621                  * zero, as most errors are fatal, and
1622                  * non-fatal potential errors are guarded by "if"
1623                  * statements that are entered only when no error is
1624                  * possible.
1625                  *
1626                  * If we ever encounter a non-fatal error, it means
1627                  * something went really wrong and we should stop
1628                  * immediately.
1629                  */
1630                 die(_("unknown error occurred while reading the configuration files"));
1631 }
1632
1633 static void configset_iter(struct config_set *cs, config_fn_t fn, void *data)
1634 {
1635         int i, value_index;
1636         struct string_list *values;
1637         struct config_set_element *entry;
1638         struct configset_list *list = &cs->list;
1639
1640         for (i = 0; i < list->nr; i++) {
1641                 entry = list->items[i].e;
1642                 value_index = list->items[i].value_index;
1643                 values = &entry->value_list;
1644
1645                 current_config_kvi = values->items[value_index].util;
1646
1647                 if (fn(entry->key, values->items[value_index].string, data) < 0)
1648                         git_die_config_linenr(entry->key,
1649                                               current_config_kvi->filename,
1650                                               current_config_kvi->linenr);
1651
1652                 current_config_kvi = NULL;
1653         }
1654 }
1655
1656 void read_early_config(config_fn_t cb, void *data)
1657 {
1658         struct config_options opts = {0};
1659         struct strbuf commondir = STRBUF_INIT;
1660         struct strbuf gitdir = STRBUF_INIT;
1661
1662         opts.respect_includes = 1;
1663
1664         if (have_git_dir()) {
1665                 opts.commondir = get_git_common_dir();
1666                 opts.git_dir = get_git_dir();
1667         /*
1668          * When setup_git_directory() was not yet asked to discover the
1669          * GIT_DIR, we ask discover_git_directory() to figure out whether there
1670          * is any repository config we should use (but unlike
1671          * setup_git_directory_gently(), no global state is changed, most
1672          * notably, the current working directory is still the same after the
1673          * call).
1674          */
1675         } else if (!discover_git_directory(&commondir, &gitdir)) {
1676                 opts.commondir = commondir.buf;
1677                 opts.git_dir = gitdir.buf;
1678         }
1679
1680         config_with_options(cb, data, NULL, &opts);
1681
1682         strbuf_release(&commondir);
1683         strbuf_release(&gitdir);
1684 }
1685
1686 static void git_config_check_init(void);
1687
1688 void git_config(config_fn_t fn, void *data)
1689 {
1690         git_config_check_init();
1691         configset_iter(&the_config_set, fn, data);
1692 }
1693
1694 static struct config_set_element *configset_find_element(struct config_set *cs, const char *key)
1695 {
1696         struct config_set_element k;
1697         struct config_set_element *found_entry;
1698         char *normalized_key;
1699         /*
1700          * `key` may come from the user, so normalize it before using it
1701          * for querying entries from the hashmap.
1702          */
1703         if (git_config_parse_key(key, &normalized_key, NULL))
1704                 return NULL;
1705
1706         hashmap_entry_init(&k, strhash(normalized_key));
1707         k.key = normalized_key;
1708         found_entry = hashmap_get(&cs->config_hash, &k, NULL);
1709         free(normalized_key);
1710         return found_entry;
1711 }
1712
1713 static int configset_add_value(struct config_set *cs, const char *key, const char *value)
1714 {
1715         struct config_set_element *e;
1716         struct string_list_item *si;
1717         struct configset_list_item *l_item;
1718         struct key_value_info *kv_info = xmalloc(sizeof(*kv_info));
1719
1720         e = configset_find_element(cs, key);
1721         /*
1722          * Since the keys are being fed by git_config*() callback mechanism, they
1723          * are already normalized. So simply add them without any further munging.
1724          */
1725         if (!e) {
1726                 e = xmalloc(sizeof(*e));
1727                 hashmap_entry_init(e, strhash(key));
1728                 e->key = xstrdup(key);
1729                 string_list_init(&e->value_list, 1);
1730                 hashmap_add(&cs->config_hash, e);
1731         }
1732         si = string_list_append_nodup(&e->value_list, xstrdup_or_null(value));
1733
1734         ALLOC_GROW(cs->list.items, cs->list.nr + 1, cs->list.alloc);
1735         l_item = &cs->list.items[cs->list.nr++];
1736         l_item->e = e;
1737         l_item->value_index = e->value_list.nr - 1;
1738
1739         if (!cf)
1740                 die("BUG: configset_add_value has no source");
1741         if (cf->name) {
1742                 kv_info->filename = strintern(cf->name);
1743                 kv_info->linenr = cf->linenr;
1744                 kv_info->origin_type = cf->origin_type;
1745         } else {
1746                 /* for values read from `git_config_from_parameters()` */
1747                 kv_info->filename = NULL;
1748                 kv_info->linenr = -1;
1749                 kv_info->origin_type = CONFIG_ORIGIN_CMDLINE;
1750         }
1751         kv_info->scope = current_parsing_scope;
1752         si->util = kv_info;
1753
1754         return 0;
1755 }
1756
1757 static int config_set_element_cmp(const struct config_set_element *e1,
1758                                  const struct config_set_element *e2, const void *unused)
1759 {
1760         return strcmp(e1->key, e2->key);
1761 }
1762
1763 void git_configset_init(struct config_set *cs)
1764 {
1765         hashmap_init(&cs->config_hash, (hashmap_cmp_fn)config_set_element_cmp, 0);
1766         cs->hash_initialized = 1;
1767         cs->list.nr = 0;
1768         cs->list.alloc = 0;
1769         cs->list.items = NULL;
1770 }
1771
1772 void git_configset_clear(struct config_set *cs)
1773 {
1774         struct config_set_element *entry;
1775         struct hashmap_iter iter;
1776         if (!cs->hash_initialized)
1777                 return;
1778
1779         hashmap_iter_init(&cs->config_hash, &iter);
1780         while ((entry = hashmap_iter_next(&iter))) {
1781                 free(entry->key);
1782                 string_list_clear(&entry->value_list, 1);
1783         }
1784         hashmap_free(&cs->config_hash, 1);
1785         cs->hash_initialized = 0;
1786         free(cs->list.items);
1787         cs->list.nr = 0;
1788         cs->list.alloc = 0;
1789         cs->list.items = NULL;
1790 }
1791
1792 static int config_set_callback(const char *key, const char *value, void *cb)
1793 {
1794         struct config_set *cs = cb;
1795         configset_add_value(cs, key, value);
1796         return 0;
1797 }
1798
1799 int git_configset_add_file(struct config_set *cs, const char *filename)
1800 {
1801         return git_config_from_file(config_set_callback, filename, cs);
1802 }
1803
1804 int git_configset_get_value(struct config_set *cs, const char *key, const char **value)
1805 {
1806         const struct string_list *values = NULL;
1807         /*
1808          * Follows "last one wins" semantic, i.e., if there are multiple matches for the
1809          * queried key in the files of the configset, the value returned will be the last
1810          * value in the value list for that key.
1811          */
1812         values = git_configset_get_value_multi(cs, key);
1813
1814         if (!values)
1815                 return 1;
1816         assert(values->nr > 0);
1817         *value = values->items[values->nr - 1].string;
1818         return 0;
1819 }
1820
1821 const struct string_list *git_configset_get_value_multi(struct config_set *cs, const char *key)
1822 {
1823         struct config_set_element *e = configset_find_element(cs, key);
1824         return e ? &e->value_list : NULL;
1825 }
1826
1827 int git_configset_get_string_const(struct config_set *cs, const char *key, const char **dest)
1828 {
1829         const char *value;
1830         if (!git_configset_get_value(cs, key, &value))
1831                 return git_config_string(dest, key, value);
1832         else
1833                 return 1;
1834 }
1835
1836 int git_configset_get_string(struct config_set *cs, const char *key, char **dest)
1837 {
1838         return git_configset_get_string_const(cs, key, (const char **)dest);
1839 }
1840
1841 int git_configset_get_int(struct config_set *cs, const char *key, int *dest)
1842 {
1843         const char *value;
1844         if (!git_configset_get_value(cs, key, &value)) {
1845                 *dest = git_config_int(key, value);
1846                 return 0;
1847         } else
1848                 return 1;
1849 }
1850
1851 int git_configset_get_ulong(struct config_set *cs, const char *key, unsigned long *dest)
1852 {
1853         const char *value;
1854         if (!git_configset_get_value(cs, key, &value)) {
1855                 *dest = git_config_ulong(key, value);
1856                 return 0;
1857         } else
1858                 return 1;
1859 }
1860
1861 int git_configset_get_bool(struct config_set *cs, const char *key, int *dest)
1862 {
1863         const char *value;
1864         if (!git_configset_get_value(cs, key, &value)) {
1865                 *dest = git_config_bool(key, value);
1866                 return 0;
1867         } else
1868                 return 1;
1869 }
1870
1871 int git_configset_get_bool_or_int(struct config_set *cs, const char *key,
1872                                 int *is_bool, int *dest)
1873 {
1874         const char *value;
1875         if (!git_configset_get_value(cs, key, &value)) {
1876                 *dest = git_config_bool_or_int(key, value, is_bool);
1877                 return 0;
1878         } else
1879                 return 1;
1880 }
1881
1882 int git_configset_get_maybe_bool(struct config_set *cs, const char *key, int *dest)
1883 {
1884         const char *value;
1885         if (!git_configset_get_value(cs, key, &value)) {
1886                 *dest = git_config_maybe_bool(key, value);
1887                 if (*dest == -1)
1888                         return -1;
1889                 return 0;
1890         } else
1891                 return 1;
1892 }
1893
1894 int git_configset_get_pathname(struct config_set *cs, const char *key, const char **dest)
1895 {
1896         const char *value;
1897         if (!git_configset_get_value(cs, key, &value))
1898                 return git_config_pathname(dest, key, value);
1899         else
1900                 return 1;
1901 }
1902
1903 static void git_config_check_init(void)
1904 {
1905         if (the_config_set.hash_initialized)
1906                 return;
1907         git_configset_init(&the_config_set);
1908         git_config_raw(config_set_callback, &the_config_set);
1909 }
1910
1911 void git_config_clear(void)
1912 {
1913         if (!the_config_set.hash_initialized)
1914                 return;
1915         git_configset_clear(&the_config_set);
1916 }
1917
1918 int git_config_get_value(const char *key, const char **value)
1919 {
1920         git_config_check_init();
1921         return git_configset_get_value(&the_config_set, key, value);
1922 }
1923
1924 const struct string_list *git_config_get_value_multi(const char *key)
1925 {
1926         git_config_check_init();
1927         return git_configset_get_value_multi(&the_config_set, key);
1928 }
1929
1930 int git_config_get_string_const(const char *key, const char **dest)
1931 {
1932         int ret;
1933         git_config_check_init();
1934         ret = git_configset_get_string_const(&the_config_set, key, dest);
1935         if (ret < 0)
1936                 git_die_config(key, NULL);
1937         return ret;
1938 }
1939
1940 int git_config_get_string(const char *key, char **dest)
1941 {
1942         git_config_check_init();
1943         return git_config_get_string_const(key, (const char **)dest);
1944 }
1945
1946 int git_config_get_int(const char *key, int *dest)
1947 {
1948         git_config_check_init();
1949         return git_configset_get_int(&the_config_set, key, dest);
1950 }
1951
1952 int git_config_get_ulong(const char *key, unsigned long *dest)
1953 {
1954         git_config_check_init();
1955         return git_configset_get_ulong(&the_config_set, key, dest);
1956 }
1957
1958 int git_config_get_bool(const char *key, int *dest)
1959 {
1960         git_config_check_init();
1961         return git_configset_get_bool(&the_config_set, key, dest);
1962 }
1963
1964 int git_config_get_bool_or_int(const char *key, int *is_bool, int *dest)
1965 {
1966         git_config_check_init();
1967         return git_configset_get_bool_or_int(&the_config_set, key, is_bool, dest);
1968 }
1969
1970 int git_config_get_maybe_bool(const char *key, int *dest)
1971 {
1972         git_config_check_init();
1973         return git_configset_get_maybe_bool(&the_config_set, key, dest);
1974 }
1975
1976 int git_config_get_pathname(const char *key, const char **dest)
1977 {
1978         int ret;
1979         git_config_check_init();
1980         ret = git_configset_get_pathname(&the_config_set, key, dest);
1981         if (ret < 0)
1982                 git_die_config(key, NULL);
1983         return ret;
1984 }
1985
1986 int git_config_get_expiry(const char *key, const char **output)
1987 {
1988         int ret = git_config_get_string_const(key, output);
1989         if (ret)
1990                 return ret;
1991         if (strcmp(*output, "now")) {
1992                 timestamp_t now = approxidate("now");
1993                 if (approxidate(*output) >= now)
1994                         git_die_config(key, _("Invalid %s: '%s'"), key, *output);
1995         }
1996         return ret;
1997 }
1998
1999 int git_config_get_untracked_cache(void)
2000 {
2001         int val = -1;
2002         const char *v;
2003
2004         /* Hack for test programs like test-dump-untracked-cache */
2005         if (ignore_untracked_cache_config)
2006                 return -1;
2007
2008         if (!git_config_get_maybe_bool("core.untrackedcache", &val))
2009                 return val;
2010
2011         if (!git_config_get_value("core.untrackedcache", &v)) {
2012                 if (!strcasecmp(v, "keep"))
2013                         return -1;
2014
2015                 error(_("unknown core.untrackedCache value '%s'; "
2016                         "using 'keep' default value"), v);
2017                 return -1;
2018         }
2019
2020         return -1; /* default value */
2021 }
2022
2023 int git_config_get_split_index(void)
2024 {
2025         int val;
2026
2027         if (!git_config_get_maybe_bool("core.splitindex", &val))
2028                 return val;
2029
2030         return -1; /* default value */
2031 }
2032
2033 int git_config_get_max_percent_split_change(void)
2034 {
2035         int val = -1;
2036
2037         if (!git_config_get_int("splitindex.maxpercentchange", &val)) {
2038                 if (0 <= val && val <= 100)
2039                         return val;
2040
2041                 return error(_("splitIndex.maxPercentChange value '%d' "
2042                                "should be between 0 and 100"), val);
2043         }
2044
2045         return -1; /* default value */
2046 }
2047
2048 NORETURN
2049 void git_die_config_linenr(const char *key, const char *filename, int linenr)
2050 {
2051         if (!filename)
2052                 die(_("unable to parse '%s' from command-line config"), key);
2053         else
2054                 die(_("bad config variable '%s' in file '%s' at line %d"),
2055                     key, filename, linenr);
2056 }
2057
2058 NORETURN __attribute__((format(printf, 2, 3)))
2059 void git_die_config(const char *key, const char *err, ...)
2060 {
2061         const struct string_list *values;
2062         struct key_value_info *kv_info;
2063
2064         if (err) {
2065                 va_list params;
2066                 va_start(params, err);
2067                 vreportf("error: ", err, params);
2068                 va_end(params);
2069         }
2070         values = git_config_get_value_multi(key);
2071         kv_info = values->items[values->nr - 1].util;
2072         git_die_config_linenr(key, kv_info->filename, kv_info->linenr);
2073 }
2074
2075 /*
2076  * Find all the stuff for git_config_set() below.
2077  */
2078
2079 static struct {
2080         int baselen;
2081         char *key;
2082         int do_not_match;
2083         regex_t *value_regex;
2084         int multi_replace;
2085         size_t *offset;
2086         unsigned int offset_alloc;
2087         enum { START, SECTION_SEEN, SECTION_END_SEEN, KEY_SEEN } state;
2088         int seen;
2089 } store;
2090
2091 static int matches(const char *key, const char *value)
2092 {
2093         if (strcmp(key, store.key))
2094                 return 0; /* not ours */
2095         if (!store.value_regex)
2096                 return 1; /* always matches */
2097         if (store.value_regex == CONFIG_REGEX_NONE)
2098                 return 0; /* never matches */
2099
2100         return store.do_not_match ^
2101                 (value && !regexec(store.value_regex, value, 0, NULL, 0));
2102 }
2103
2104 static int store_aux(const char *key, const char *value, void *cb)
2105 {
2106         const char *ep;
2107         size_t section_len;
2108
2109         switch (store.state) {
2110         case KEY_SEEN:
2111                 if (matches(key, value)) {
2112                         if (store.seen == 1 && store.multi_replace == 0) {
2113                                 warning(_("%s has multiple values"), key);
2114                         }
2115
2116                         ALLOC_GROW(store.offset, store.seen + 1,
2117                                    store.offset_alloc);
2118
2119                         store.offset[store.seen] = cf->do_ftell(cf);
2120                         store.seen++;
2121                 }
2122                 break;
2123         case SECTION_SEEN:
2124                 /*
2125                  * What we are looking for is in store.key (both
2126                  * section and var), and its section part is baselen
2127                  * long.  We found key (again, both section and var).
2128                  * We would want to know if this key is in the same
2129                  * section as what we are looking for.  We already
2130                  * know we are in the same section as what should
2131                  * hold store.key.
2132                  */
2133                 ep = strrchr(key, '.');
2134                 section_len = ep - key;
2135
2136                 if ((section_len != store.baselen) ||
2137                     memcmp(key, store.key, section_len+1)) {
2138                         store.state = SECTION_END_SEEN;
2139                         break;
2140                 }
2141
2142                 /*
2143                  * Do not increment matches: this is no match, but we
2144                  * just made sure we are in the desired section.
2145                  */
2146                 ALLOC_GROW(store.offset, store.seen + 1,
2147                            store.offset_alloc);
2148                 store.offset[store.seen] = cf->do_ftell(cf);
2149                 /* fallthru */
2150         case SECTION_END_SEEN:
2151         case START:
2152                 if (matches(key, value)) {
2153                         ALLOC_GROW(store.offset, store.seen + 1,
2154                                    store.offset_alloc);
2155                         store.offset[store.seen] = cf->do_ftell(cf);
2156                         store.state = KEY_SEEN;
2157                         store.seen++;
2158                 } else {
2159                         if (strrchr(key, '.') - key == store.baselen &&
2160                               !strncmp(key, store.key, store.baselen)) {
2161                                         store.state = SECTION_SEEN;
2162                                         ALLOC_GROW(store.offset,
2163                                                    store.seen + 1,
2164                                                    store.offset_alloc);
2165                                         store.offset[store.seen] = cf->do_ftell(cf);
2166                         }
2167                 }
2168         }
2169         return 0;
2170 }
2171
2172 static int write_error(const char *filename)
2173 {
2174         error("failed to write new configuration file %s", filename);
2175
2176         /* Same error code as "failed to rename". */
2177         return 4;
2178 }
2179
2180 static int store_write_section(int fd, const char *key)
2181 {
2182         const char *dot;
2183         int i, success;
2184         struct strbuf sb = STRBUF_INIT;
2185
2186         dot = memchr(key, '.', store.baselen);
2187         if (dot) {
2188                 strbuf_addf(&sb, "[%.*s \"", (int)(dot - key), key);
2189                 for (i = dot - key + 1; i < store.baselen; i++) {
2190                         if (key[i] == '"' || key[i] == '\\')
2191                                 strbuf_addch(&sb, '\\');
2192                         strbuf_addch(&sb, key[i]);
2193                 }
2194                 strbuf_addstr(&sb, "\"]\n");
2195         } else {
2196                 strbuf_addf(&sb, "[%.*s]\n", store.baselen, key);
2197         }
2198
2199         success = write_in_full(fd, sb.buf, sb.len) == sb.len;
2200         strbuf_release(&sb);
2201
2202         return success;
2203 }
2204
2205 static int store_write_pair(int fd, const char *key, const char *value)
2206 {
2207         int i, success;
2208         int length = strlen(key + store.baselen + 1);
2209         const char *quote = "";
2210         struct strbuf sb = STRBUF_INIT;
2211
2212         /*
2213          * Check to see if the value needs to be surrounded with a dq pair.
2214          * Note that problematic characters are always backslash-quoted; this
2215          * check is about not losing leading or trailing SP and strings that
2216          * follow beginning-of-comment characters (i.e. ';' and '#') by the
2217          * configuration parser.
2218          */
2219         if (value[0] == ' ')
2220                 quote = "\"";
2221         for (i = 0; value[i]; i++)
2222                 if (value[i] == ';' || value[i] == '#')
2223                         quote = "\"";
2224         if (i && value[i - 1] == ' ')
2225                 quote = "\"";
2226
2227         strbuf_addf(&sb, "\t%.*s = %s",
2228                     length, key + store.baselen + 1, quote);
2229
2230         for (i = 0; value[i]; i++)
2231                 switch (value[i]) {
2232                 case '\n':
2233                         strbuf_addstr(&sb, "\\n");
2234                         break;
2235                 case '\t':
2236                         strbuf_addstr(&sb, "\\t");
2237                         break;
2238                 case '"':
2239                 case '\\':
2240                         strbuf_addch(&sb, '\\');
2241                 default:
2242                         strbuf_addch(&sb, value[i]);
2243                         break;
2244                 }
2245         strbuf_addf(&sb, "%s\n", quote);
2246
2247         success = write_in_full(fd, sb.buf, sb.len) == sb.len;
2248         strbuf_release(&sb);
2249
2250         return success;
2251 }
2252
2253 static ssize_t find_beginning_of_line(const char *contents, size_t size,
2254         size_t offset_, int *found_bracket)
2255 {
2256         size_t equal_offset = size, bracket_offset = size;
2257         ssize_t offset;
2258
2259 contline:
2260         for (offset = offset_-2; offset > 0
2261                         && contents[offset] != '\n'; offset--)
2262                 switch (contents[offset]) {
2263                         case '=': equal_offset = offset; break;
2264                         case ']': bracket_offset = offset; break;
2265                 }
2266         if (offset > 0 && contents[offset-1] == '\\') {
2267                 offset_ = offset;
2268                 goto contline;
2269         }
2270         if (bracket_offset < equal_offset) {
2271                 *found_bracket = 1;
2272                 offset = bracket_offset+1;
2273         } else
2274                 offset++;
2275
2276         return offset;
2277 }
2278
2279 int git_config_set_in_file_gently(const char *config_filename,
2280                                   const char *key, const char *value)
2281 {
2282         return git_config_set_multivar_in_file_gently(config_filename, key, value, NULL, 0);
2283 }
2284
2285 void git_config_set_in_file(const char *config_filename,
2286                             const char *key, const char *value)
2287 {
2288         git_config_set_multivar_in_file(config_filename, key, value, NULL, 0);
2289 }
2290
2291 int git_config_set_gently(const char *key, const char *value)
2292 {
2293         return git_config_set_multivar_gently(key, value, NULL, 0);
2294 }
2295
2296 void git_config_set(const char *key, const char *value)
2297 {
2298         git_config_set_multivar(key, value, NULL, 0);
2299 }
2300
2301 /*
2302  * If value==NULL, unset in (remove from) config,
2303  * if value_regex!=NULL, disregard key/value pairs where value does not match.
2304  * if value_regex==CONFIG_REGEX_NONE, do not match any existing values
2305  *     (only add a new one)
2306  * if multi_replace==0, nothing, or only one matching key/value is replaced,
2307  *     else all matching key/values (regardless how many) are removed,
2308  *     before the new pair is written.
2309  *
2310  * Returns 0 on success.
2311  *
2312  * This function does this:
2313  *
2314  * - it locks the config file by creating ".git/config.lock"
2315  *
2316  * - it then parses the config using store_aux() as validator to find
2317  *   the position on the key/value pair to replace. If it is to be unset,
2318  *   it must be found exactly once.
2319  *
2320  * - the config file is mmap()ed and the part before the match (if any) is
2321  *   written to the lock file, then the changed part and the rest.
2322  *
2323  * - the config file is removed and the lock file rename()d to it.
2324  *
2325  */
2326 int git_config_set_multivar_in_file_gently(const char *config_filename,
2327                                            const char *key, const char *value,
2328                                            const char *value_regex,
2329                                            int multi_replace)
2330 {
2331         int fd = -1, in_fd = -1;
2332         int ret;
2333         struct lock_file *lock = NULL;
2334         char *filename_buf = NULL;
2335         char *contents = NULL;
2336         size_t contents_sz;
2337
2338         /* parse-key returns negative; flip the sign to feed exit(3) */
2339         ret = 0 - git_config_parse_key(key, &store.key, &store.baselen);
2340         if (ret)
2341                 goto out_free;
2342
2343         store.multi_replace = multi_replace;
2344
2345         if (!config_filename)
2346                 config_filename = filename_buf = git_pathdup("config");
2347
2348         /*
2349          * The lock serves a purpose in addition to locking: the new
2350          * contents of .git/config will be written into it.
2351          */
2352         lock = xcalloc(1, sizeof(struct lock_file));
2353         fd = hold_lock_file_for_update(lock, config_filename, 0);
2354         if (fd < 0) {
2355                 error_errno("could not lock config file %s", config_filename);
2356                 free(store.key);
2357                 ret = CONFIG_NO_LOCK;
2358                 goto out_free;
2359         }
2360
2361         /*
2362          * If .git/config does not exist yet, write a minimal version.
2363          */
2364         in_fd = open(config_filename, O_RDONLY);
2365         if ( in_fd < 0 ) {
2366                 free(store.key);
2367
2368                 if ( ENOENT != errno ) {
2369                         error_errno("opening %s", config_filename);
2370                         ret = CONFIG_INVALID_FILE; /* same as "invalid config file" */
2371                         goto out_free;
2372                 }
2373                 /* if nothing to unset, error out */
2374                 if (value == NULL) {
2375                         ret = CONFIG_NOTHING_SET;
2376                         goto out_free;
2377                 }
2378
2379                 store.key = (char *)key;
2380                 if (!store_write_section(fd, key) ||
2381                     !store_write_pair(fd, key, value))
2382                         goto write_err_out;
2383         } else {
2384                 struct stat st;
2385                 size_t copy_begin, copy_end;
2386                 int i, new_line = 0;
2387
2388                 if (value_regex == NULL)
2389                         store.value_regex = NULL;
2390                 else if (value_regex == CONFIG_REGEX_NONE)
2391                         store.value_regex = CONFIG_REGEX_NONE;
2392                 else {
2393                         if (value_regex[0] == '!') {
2394                                 store.do_not_match = 1;
2395                                 value_regex++;
2396                         } else
2397                                 store.do_not_match = 0;
2398
2399                         store.value_regex = (regex_t*)xmalloc(sizeof(regex_t));
2400                         if (regcomp(store.value_regex, value_regex,
2401                                         REG_EXTENDED)) {
2402                                 error("invalid pattern: %s", value_regex);
2403                                 free(store.value_regex);
2404                                 ret = CONFIG_INVALID_PATTERN;
2405                                 goto out_free;
2406                         }
2407                 }
2408
2409                 ALLOC_GROW(store.offset, 1, store.offset_alloc);
2410                 store.offset[0] = 0;
2411                 store.state = START;
2412                 store.seen = 0;
2413
2414                 /*
2415                  * After this, store.offset will contain the *end* offset
2416                  * of the last match, or remain at 0 if no match was found.
2417                  * As a side effect, we make sure to transform only a valid
2418                  * existing config file.
2419                  */
2420                 if (git_config_from_file(store_aux, config_filename, NULL)) {
2421                         error("invalid config file %s", config_filename);
2422                         free(store.key);
2423                         if (store.value_regex != NULL &&
2424                             store.value_regex != CONFIG_REGEX_NONE) {
2425                                 regfree(store.value_regex);
2426                                 free(store.value_regex);
2427                         }
2428                         ret = CONFIG_INVALID_FILE;
2429                         goto out_free;
2430                 }
2431
2432                 free(store.key);
2433                 if (store.value_regex != NULL &&
2434                     store.value_regex != CONFIG_REGEX_NONE) {
2435                         regfree(store.value_regex);
2436                         free(store.value_regex);
2437                 }
2438
2439                 /* if nothing to unset, or too many matches, error out */
2440                 if ((store.seen == 0 && value == NULL) ||
2441                                 (store.seen > 1 && multi_replace == 0)) {
2442                         ret = CONFIG_NOTHING_SET;
2443                         goto out_free;
2444                 }
2445
2446                 if (fstat(in_fd, &st) == -1) {
2447                         error_errno(_("fstat on %s failed"), config_filename);
2448                         ret = CONFIG_INVALID_FILE;
2449                         goto out_free;
2450                 }
2451
2452                 contents_sz = xsize_t(st.st_size);
2453                 contents = xmmap_gently(NULL, contents_sz, PROT_READ,
2454                                         MAP_PRIVATE, in_fd, 0);
2455                 if (contents == MAP_FAILED) {
2456                         if (errno == ENODEV && S_ISDIR(st.st_mode))
2457                                 errno = EISDIR;
2458                         error_errno("unable to mmap '%s'", config_filename);
2459                         ret = CONFIG_INVALID_FILE;
2460                         contents = NULL;
2461                         goto out_free;
2462                 }
2463                 close(in_fd);
2464                 in_fd = -1;
2465
2466                 if (chmod(get_lock_file_path(lock), st.st_mode & 07777) < 0) {
2467                         error_errno("chmod on %s failed", get_lock_file_path(lock));
2468                         ret = CONFIG_NO_WRITE;
2469                         goto out_free;
2470                 }
2471
2472                 if (store.seen == 0)
2473                         store.seen = 1;
2474
2475                 for (i = 0, copy_begin = 0; i < store.seen; i++) {
2476                         if (store.offset[i] == 0) {
2477                                 store.offset[i] = copy_end = contents_sz;
2478                         } else if (store.state != KEY_SEEN) {
2479                                 copy_end = store.offset[i];
2480                         } else
2481                                 copy_end = find_beginning_of_line(
2482                                         contents, contents_sz,
2483                                         store.offset[i]-2, &new_line);
2484
2485                         if (copy_end > 0 && contents[copy_end-1] != '\n')
2486                                 new_line = 1;
2487
2488                         /* write the first part of the config */
2489                         if (copy_end > copy_begin) {
2490                                 if (write_in_full(fd, contents + copy_begin,
2491                                                   copy_end - copy_begin) <
2492                                     copy_end - copy_begin)
2493                                         goto write_err_out;
2494                                 if (new_line &&
2495                                     write_str_in_full(fd, "\n") != 1)
2496                                         goto write_err_out;
2497                         }
2498                         copy_begin = store.offset[i];
2499                 }
2500
2501                 /* write the pair (value == NULL means unset) */
2502                 if (value != NULL) {
2503                         if (store.state == START) {
2504                                 if (!store_write_section(fd, key))
2505                                         goto write_err_out;
2506                         }
2507                         if (!store_write_pair(fd, key, value))
2508                                 goto write_err_out;
2509                 }
2510
2511                 /* write the rest of the config */
2512                 if (copy_begin < contents_sz)
2513                         if (write_in_full(fd, contents + copy_begin,
2514                                           contents_sz - copy_begin) <
2515                             contents_sz - copy_begin)
2516                                 goto write_err_out;
2517
2518                 munmap(contents, contents_sz);
2519                 contents = NULL;
2520         }
2521
2522         if (commit_lock_file(lock) < 0) {
2523                 error_errno("could not write config file %s", config_filename);
2524                 ret = CONFIG_NO_WRITE;
2525                 lock = NULL;
2526                 goto out_free;
2527         }
2528
2529         /*
2530          * lock is committed, so don't try to roll it back below.
2531          * NOTE: Since lockfile.c keeps a linked list of all created
2532          * lock_file structures, it isn't safe to free(lock).  It's
2533          * better to just leave it hanging around.
2534          */
2535         lock = NULL;
2536         ret = 0;
2537
2538         /* Invalidate the config cache */
2539         git_config_clear();
2540
2541 out_free:
2542         if (lock)
2543                 rollback_lock_file(lock);
2544         free(filename_buf);
2545         if (contents)
2546                 munmap(contents, contents_sz);
2547         if (in_fd >= 0)
2548                 close(in_fd);
2549         return ret;
2550
2551 write_err_out:
2552         ret = write_error(get_lock_file_path(lock));
2553         goto out_free;
2554
2555 }
2556
2557 void git_config_set_multivar_in_file(const char *config_filename,
2558                                      const char *key, const char *value,
2559                                      const char *value_regex, int multi_replace)
2560 {
2561         if (!git_config_set_multivar_in_file_gently(config_filename, key, value,
2562                                                     value_regex, multi_replace))
2563                 return;
2564         if (value)
2565                 die(_("could not set '%s' to '%s'"), key, value);
2566         else
2567                 die(_("could not unset '%s'"), key);
2568 }
2569
2570 int git_config_set_multivar_gently(const char *key, const char *value,
2571                                    const char *value_regex, int multi_replace)
2572 {
2573         return git_config_set_multivar_in_file_gently(NULL, key, value, value_regex,
2574                                                       multi_replace);
2575 }
2576
2577 void git_config_set_multivar(const char *key, const char *value,
2578                              const char *value_regex, int multi_replace)
2579 {
2580         git_config_set_multivar_in_file(NULL, key, value, value_regex,
2581                                         multi_replace);
2582 }
2583
2584 static int section_name_match (const char *buf, const char *name)
2585 {
2586         int i = 0, j = 0, dot = 0;
2587         if (buf[i] != '[')
2588                 return 0;
2589         for (i = 1; buf[i] && buf[i] != ']'; i++) {
2590                 if (!dot && isspace(buf[i])) {
2591                         dot = 1;
2592                         if (name[j++] != '.')
2593                                 break;
2594                         for (i++; isspace(buf[i]); i++)
2595                                 ; /* do nothing */
2596                         if (buf[i] != '"')
2597                                 break;
2598                         continue;
2599                 }
2600                 if (buf[i] == '\\' && dot)
2601                         i++;
2602                 else if (buf[i] == '"' && dot) {
2603                         for (i++; isspace(buf[i]); i++)
2604                                 ; /* do_nothing */
2605                         break;
2606                 }
2607                 if (buf[i] != name[j++])
2608                         break;
2609         }
2610         if (buf[i] == ']' && name[j] == 0) {
2611                 /*
2612                  * We match, now just find the right length offset by
2613                  * gobbling up any whitespace after it, as well
2614                  */
2615                 i++;
2616                 for (; buf[i] && isspace(buf[i]); i++)
2617                         ; /* do nothing */
2618                 return i;
2619         }
2620         return 0;
2621 }
2622
2623 static int section_name_is_ok(const char *name)
2624 {
2625         /* Empty section names are bogus. */
2626         if (!*name)
2627                 return 0;
2628
2629         /*
2630          * Before a dot, we must be alphanumeric or dash. After the first dot,
2631          * anything goes, so we can stop checking.
2632          */
2633         for (; *name && *name != '.'; name++)
2634                 if (*name != '-' && !isalnum(*name))
2635                         return 0;
2636         return 1;
2637 }
2638
2639 /* if new_name == NULL, the section is removed instead */
2640 int git_config_rename_section_in_file(const char *config_filename,
2641                                       const char *old_name, const char *new_name)
2642 {
2643         int ret = 0, remove = 0;
2644         char *filename_buf = NULL;
2645         struct lock_file *lock;
2646         int out_fd;
2647         char buf[1024];
2648         FILE *config_file = NULL;
2649         struct stat st;
2650
2651         if (new_name && !section_name_is_ok(new_name)) {
2652                 ret = error("invalid section name: %s", new_name);
2653                 goto out_no_rollback;
2654         }
2655
2656         if (!config_filename)
2657                 config_filename = filename_buf = git_pathdup("config");
2658
2659         lock = xcalloc(1, sizeof(struct lock_file));
2660         out_fd = hold_lock_file_for_update(lock, config_filename, 0);
2661         if (out_fd < 0) {
2662                 ret = error("could not lock config file %s", config_filename);
2663                 goto out;
2664         }
2665
2666         if (!(config_file = fopen(config_filename, "rb"))) {
2667                 ret = warn_on_fopen_errors(config_filename);
2668                 if (ret)
2669                         goto out;
2670                 /* no config file means nothing to rename, no error */
2671                 goto commit_and_out;
2672         }
2673
2674         if (fstat(fileno(config_file), &st) == -1) {
2675                 ret = error_errno(_("fstat on %s failed"), config_filename);
2676                 goto out;
2677         }
2678
2679         if (chmod(get_lock_file_path(lock), st.st_mode & 07777) < 0) {
2680                 ret = error_errno("chmod on %s failed",
2681                                   get_lock_file_path(lock));
2682                 goto out;
2683         }
2684
2685         while (fgets(buf, sizeof(buf), config_file)) {
2686                 int i;
2687                 int length;
2688                 char *output = buf;
2689                 for (i = 0; buf[i] && isspace(buf[i]); i++)
2690                         ; /* do nothing */
2691                 if (buf[i] == '[') {
2692                         /* it's a section */
2693                         int offset = section_name_match(&buf[i], old_name);
2694                         if (offset > 0) {
2695                                 ret++;
2696                                 if (new_name == NULL) {
2697                                         remove = 1;
2698                                         continue;
2699                                 }
2700                                 store.baselen = strlen(new_name);
2701                                 if (!store_write_section(out_fd, new_name)) {
2702                                         ret = write_error(get_lock_file_path(lock));
2703                                         goto out;
2704                                 }
2705                                 /*
2706                                  * We wrote out the new section, with
2707                                  * a newline, now skip the old
2708                                  * section's length
2709                                  */
2710                                 output += offset + i;
2711                                 if (strlen(output) > 0) {
2712                                         /*
2713                                          * More content means there's
2714                                          * a declaration to put on the
2715                                          * next line; indent with a
2716                                          * tab
2717                                          */
2718                                         output -= 1;
2719                                         output[0] = '\t';
2720                                 }
2721                         }
2722                         remove = 0;
2723                 }
2724                 if (remove)
2725                         continue;
2726                 length = strlen(output);
2727                 if (write_in_full(out_fd, output, length) != length) {
2728                         ret = write_error(get_lock_file_path(lock));
2729                         goto out;
2730                 }
2731         }
2732         fclose(config_file);
2733         config_file = NULL;
2734 commit_and_out:
2735         if (commit_lock_file(lock) < 0)
2736                 ret = error_errno("could not write config file %s",
2737                                   config_filename);
2738 out:
2739         if (config_file)
2740                 fclose(config_file);
2741         rollback_lock_file(lock);
2742 out_no_rollback:
2743         free(filename_buf);
2744         return ret;
2745 }
2746
2747 int git_config_rename_section(const char *old_name, const char *new_name)
2748 {
2749         return git_config_rename_section_in_file(NULL, old_name, new_name);
2750 }
2751
2752 /*
2753  * Call this to report error for your variable that should not
2754  * get a boolean value (i.e. "[my] var" means "true").
2755  */
2756 #undef config_error_nonbool
2757 int config_error_nonbool(const char *var)
2758 {
2759         return error("missing value for '%s'", var);
2760 }
2761
2762 int parse_config_key(const char *var,
2763                      const char *section,
2764                      const char **subsection, int *subsection_len,
2765                      const char **key)
2766 {
2767         const char *dot;
2768
2769         /* Does it start with "section." ? */
2770         if (!skip_prefix(var, section, &var) || *var != '.')
2771                 return -1;
2772
2773         /*
2774          * Find the key; we don't know yet if we have a subsection, but we must
2775          * parse backwards from the end, since the subsection may have dots in
2776          * it, too.
2777          */
2778         dot = strrchr(var, '.');
2779         *key = dot + 1;
2780
2781         /* Did we have a subsection at all? */
2782         if (dot == var) {
2783                 if (subsection) {
2784                         *subsection = NULL;
2785                         *subsection_len = 0;
2786                 }
2787         }
2788         else {
2789                 if (!subsection)
2790                         return -1;
2791                 *subsection = var + 1;
2792                 *subsection_len = dot - *subsection;
2793         }
2794
2795         return 0;
2796 }
2797
2798 const char *current_config_origin_type(void)
2799 {
2800         int type;
2801         if (current_config_kvi)
2802                 type = current_config_kvi->origin_type;
2803         else if(cf)
2804                 type = cf->origin_type;
2805         else
2806                 die("BUG: current_config_origin_type called outside config callback");
2807
2808         switch (type) {
2809         case CONFIG_ORIGIN_BLOB:
2810                 return "blob";
2811         case CONFIG_ORIGIN_FILE:
2812                 return "file";
2813         case CONFIG_ORIGIN_STDIN:
2814                 return "standard input";
2815         case CONFIG_ORIGIN_SUBMODULE_BLOB:
2816                 return "submodule-blob";
2817         case CONFIG_ORIGIN_CMDLINE:
2818                 return "command line";
2819         default:
2820                 die("BUG: unknown config origin type");
2821         }
2822 }
2823
2824 const char *current_config_name(void)
2825 {
2826         const char *name;
2827         if (current_config_kvi)
2828                 name = current_config_kvi->filename;
2829         else if (cf)
2830                 name = cf->name;
2831         else
2832                 die("BUG: current_config_name called outside config callback");
2833         return name ? name : "";
2834 }
2835
2836 enum config_scope current_config_scope(void)
2837 {
2838         if (current_config_kvi)
2839                 return current_config_kvi->scope;
2840         else
2841                 return current_parsing_scope;
2842 }