FIXME: hotpatch for compatibility with latest hg
[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 "exec_cmd.h"
10 #include "strbuf.h"
11 #include "quote.h"
12 #include "credential.h"
13
14 #define MAXNAME (256)
15
16 typedef struct config_file {
17         struct config_file *prev;
18         FILE *f;
19         const char *name;
20         int linenr;
21         int eof;
22         struct strbuf value;
23         char var[MAXNAME];
24 } config_file;
25
26 static config_file *cf;
27
28 static int zlib_compression_seen;
29
30 const char *config_exclusive_filename = NULL;
31
32 static void lowercase(char *p)
33 {
34         for (; *p; p++)
35                 *p = tolower(*p);
36 }
37
38 void git_config_push_parameter(const char *text)
39 {
40         struct strbuf env = STRBUF_INIT;
41         const char *old = getenv(CONFIG_DATA_ENVIRONMENT);
42         if (old) {
43                 strbuf_addstr(&env, old);
44                 strbuf_addch(&env, ' ');
45         }
46         sq_quote_buf(&env, text);
47         setenv(CONFIG_DATA_ENVIRONMENT, env.buf, 1);
48         strbuf_release(&env);
49 }
50
51 int git_config_parse_parameter(const char *text,
52                                config_fn_t fn, void *data)
53 {
54         struct strbuf **pair;
55         pair = strbuf_split_str(text, '=', 2);
56         if (!pair[0])
57                 return error("bogus config parameter: %s", text);
58         if (pair[0]->len && pair[0]->buf[pair[0]->len - 1] == '=')
59                 strbuf_setlen(pair[0], pair[0]->len - 1);
60         strbuf_trim(pair[0]);
61         if (!pair[0]->len) {
62                 strbuf_list_free(pair);
63                 return error("bogus config parameter: %s", text);
64         }
65         lowercase(pair[0]->buf);
66         if (fn(pair[0]->buf, pair[1] ? pair[1]->buf : NULL, data) < 0) {
67                 strbuf_list_free(pair);
68                 return -1;
69         }
70         strbuf_list_free(pair);
71         return 0;
72 }
73
74 int git_config_from_parameters(config_fn_t fn, void *data)
75 {
76         const char *env = getenv(CONFIG_DATA_ENVIRONMENT);
77         char *envw;
78         const char **argv = NULL;
79         int nr = 0, alloc = 0;
80         int i;
81
82         if (!env)
83                 return 0;
84         /* sq_dequote will write over it */
85         envw = xstrdup(env);
86
87         if (sq_dequote_to_argv(envw, &argv, &nr, &alloc) < 0) {
88                 free(envw);
89                 return error("bogus format in " CONFIG_DATA_ENVIRONMENT);
90         }
91
92         for (i = 0; i < nr; i++) {
93                 if (git_config_parse_parameter(argv[i], fn, data) < 0) {
94                         free(argv);
95                         free(envw);
96                         return -1;
97                 }
98         }
99
100         free(argv);
101         free(envw);
102         return nr > 0;
103 }
104
105 static int get_next_char(void)
106 {
107         int c;
108         FILE *f;
109
110         c = '\n';
111         if (cf && ((f = cf->f) != NULL)) {
112                 c = fgetc(f);
113                 if (c == '\r') {
114                         /* DOS like systems */
115                         c = fgetc(f);
116                         if (c != '\n') {
117                                 ungetc(c, f);
118                                 c = '\r';
119                         }
120                 }
121                 if (c == '\n')
122                         cf->linenr++;
123                 if (c == EOF) {
124                         cf->eof = 1;
125                         c = '\n';
126                 }
127         }
128         return c;
129 }
130
131 static char *parse_value(void)
132 {
133         int quote = 0, comment = 0, space = 0;
134
135         strbuf_reset(&cf->value);
136         for (;;) {
137                 int c = get_next_char();
138                 if (c == '\n') {
139                         if (quote)
140                                 return NULL;
141                         return cf->value.buf;
142                 }
143                 if (comment)
144                         continue;
145                 if (isspace(c) && !quote) {
146                         if (cf->value.len)
147                                 space++;
148                         continue;
149                 }
150                 if (!quote) {
151                         if (c == ';' || c == '#') {
152                                 comment = 1;
153                                 continue;
154                         }
155                 }
156                 for (; space; space--)
157                         strbuf_addch(&cf->value, ' ');
158                 if (c == '\\') {
159                         c = get_next_char();
160                         switch (c) {
161                         case '\n':
162                                 continue;
163                         case 't':
164                                 c = '\t';
165                                 break;
166                         case 'b':
167                                 c = '\b';
168                                 break;
169                         case 'n':
170                                 c = '\n';
171                                 break;
172                         /* Some characters escape as themselves */
173                         case '\\': case '"':
174                                 break;
175                         /* Reject unknown escape sequences */
176                         default:
177                                 return NULL;
178                         }
179                         strbuf_addch(&cf->value, c);
180                         continue;
181                 }
182                 if (c == '"') {
183                         quote = 1-quote;
184                         continue;
185                 }
186                 strbuf_addch(&cf->value, c);
187         }
188 }
189
190 static inline int iskeychar(int c)
191 {
192         return isalnum(c) || c == '-';
193 }
194
195 static int get_value(config_fn_t fn, void *data, char *name, unsigned int len)
196 {
197         int c;
198         char *value;
199
200         /* Get the full name */
201         for (;;) {
202                 c = get_next_char();
203                 if (cf->eof)
204                         break;
205                 if (!iskeychar(c))
206                         break;
207                 name[len++] = tolower(c);
208                 if (len >= MAXNAME)
209                         return -1;
210         }
211         name[len] = 0;
212         while (c == ' ' || c == '\t')
213                 c = get_next_char();
214
215         value = NULL;
216         if (c != '\n') {
217                 if (c != '=')
218                         return -1;
219                 value = parse_value();
220                 if (!value)
221                         return -1;
222         }
223         return fn(name, value, data);
224 }
225
226 static int get_extended_base_var(char *name, int baselen, int c)
227 {
228         do {
229                 if (c == '\n')
230                         return -1;
231                 c = get_next_char();
232         } while (isspace(c));
233
234         /* We require the format to be '[base "extension"]' */
235         if (c != '"')
236                 return -1;
237         name[baselen++] = '.';
238
239         for (;;) {
240                 int c = get_next_char();
241                 if (c == '\n')
242                         return -1;
243                 if (c == '"')
244                         break;
245                 if (c == '\\') {
246                         c = get_next_char();
247                         if (c == '\n')
248                                 return -1;
249                 }
250                 name[baselen++] = c;
251                 if (baselen > MAXNAME / 2)
252                         return -1;
253         }
254
255         /* Final ']' */
256         if (get_next_char() != ']')
257                 return -1;
258         return baselen;
259 }
260
261 static int get_base_var(char *name)
262 {
263         int baselen = 0;
264
265         for (;;) {
266                 int c = get_next_char();
267                 if (cf->eof)
268                         return -1;
269                 if (c == ']')
270                         return baselen;
271                 if (isspace(c))
272                         return get_extended_base_var(name, baselen, c);
273                 if (!iskeychar(c) && c != '.')
274                         return -1;
275                 if (baselen > MAXNAME / 2)
276                         return -1;
277                 name[baselen++] = tolower(c);
278         }
279 }
280
281 static int git_parse_file(config_fn_t fn, void *data)
282 {
283         int comment = 0;
284         int baselen = 0;
285         char *var = cf->var;
286
287         /* U+FEFF Byte Order Mark in UTF8 */
288         static const unsigned char *utf8_bom = (unsigned char *) "\xef\xbb\xbf";
289         const unsigned char *bomptr = utf8_bom;
290
291         for (;;) {
292                 int c = get_next_char();
293                 if (bomptr && *bomptr) {
294                         /* We are at the file beginning; skip UTF8-encoded BOM
295                          * if present. Sane editors won't put this in on their
296                          * own, but e.g. Windows Notepad will do it happily. */
297                         if ((unsigned char) c == *bomptr) {
298                                 bomptr++;
299                                 continue;
300                         } else {
301                                 /* Do not tolerate partial BOM. */
302                                 if (bomptr != utf8_bom)
303                                         break;
304                                 /* No BOM at file beginning. Cool. */
305                                 bomptr = NULL;
306                         }
307                 }
308                 if (c == '\n') {
309                         if (cf->eof)
310                                 return 0;
311                         comment = 0;
312                         continue;
313                 }
314                 if (comment || isspace(c))
315                         continue;
316                 if (c == '#' || c == ';') {
317                         comment = 1;
318                         continue;
319                 }
320                 if (c == '[') {
321                         baselen = get_base_var(var);
322                         if (baselen <= 0)
323                                 break;
324                         var[baselen++] = '.';
325                         var[baselen] = 0;
326                         continue;
327                 }
328                 if (!isalpha(c))
329                         break;
330                 var[baselen] = tolower(c);
331                 if (get_value(fn, data, var, baselen+1) < 0)
332                         break;
333         }
334         die("bad config file line %d in %s", cf->linenr, cf->name);
335 }
336
337 static int parse_unit_factor(const char *end, unsigned long *val)
338 {
339         if (!*end)
340                 return 1;
341         else if (!strcasecmp(end, "k")) {
342                 *val *= 1024;
343                 return 1;
344         }
345         else if (!strcasecmp(end, "m")) {
346                 *val *= 1024 * 1024;
347                 return 1;
348         }
349         else if (!strcasecmp(end, "g")) {
350                 *val *= 1024 * 1024 * 1024;
351                 return 1;
352         }
353         return 0;
354 }
355
356 static int git_parse_long(const char *value, long *ret)
357 {
358         if (value && *value) {
359                 char *end;
360                 long val = strtol(value, &end, 0);
361                 unsigned long factor = 1;
362                 if (!parse_unit_factor(end, &factor))
363                         return 0;
364                 *ret = val * factor;
365                 return 1;
366         }
367         return 0;
368 }
369
370 int git_parse_ulong(const char *value, unsigned long *ret)
371 {
372         if (value && *value) {
373                 char *end;
374                 unsigned long val = strtoul(value, &end, 0);
375                 if (!parse_unit_factor(end, &val))
376                         return 0;
377                 *ret = val;
378                 return 1;
379         }
380         return 0;
381 }
382
383 static void die_bad_config(const char *name)
384 {
385         if (cf && cf->name)
386                 die("bad config value for '%s' in %s", name, cf->name);
387         die("bad config value for '%s'", name);
388 }
389
390 int git_config_int(const char *name, const char *value)
391 {
392         long ret = 0;
393         if (!git_parse_long(value, &ret))
394                 die_bad_config(name);
395         return ret;
396 }
397
398 unsigned long git_config_ulong(const char *name, const char *value)
399 {
400         unsigned long ret;
401         if (!git_parse_ulong(value, &ret))
402                 die_bad_config(name);
403         return ret;
404 }
405
406 static int git_config_maybe_bool_text(const char *name, const char *value)
407 {
408         if (!value)
409                 return 1;
410         if (!*value)
411                 return 0;
412         if (!strcasecmp(value, "true")
413             || !strcasecmp(value, "yes")
414             || !strcasecmp(value, "on"))
415                 return 1;
416         if (!strcasecmp(value, "false")
417             || !strcasecmp(value, "no")
418             || !strcasecmp(value, "off"))
419                 return 0;
420         return -1;
421 }
422
423 int git_config_maybe_bool(const char *name, const char *value)
424 {
425         long v = git_config_maybe_bool_text(name, value);
426         if (0 <= v)
427                 return v;
428         if (git_parse_long(value, &v))
429                 return !!v;
430         return -1;
431 }
432
433 int git_config_bool_or_int(const char *name, const char *value, int *is_bool)
434 {
435         int v = git_config_maybe_bool_text(name, value);
436         if (0 <= v) {
437                 *is_bool = 1;
438                 return v;
439         }
440         *is_bool = 0;
441         return git_config_int(name, value);
442 }
443
444 int git_config_bool(const char *name, const char *value)
445 {
446         int discard;
447         return !!git_config_bool_or_int(name, value, &discard);
448 }
449
450 int git_config_string(const char **dest, const char *var, const char *value)
451 {
452         if (!value)
453                 return config_error_nonbool(var);
454         *dest = xstrdup(value);
455         return 0;
456 }
457
458 int git_config_pathname(const char **dest, const char *var, const char *value)
459 {
460         if (!value)
461                 return config_error_nonbool(var);
462         *dest = expand_user_path(value);
463         if (!*dest)
464                 die("Failed to expand user dir in: '%s'", value);
465         return 0;
466 }
467
468 static int git_default_core_config(const char *var, const char *value)
469 {
470         /* This needs a better name */
471         if (!strcmp(var, "core.filemode")) {
472                 trust_executable_bit = git_config_bool(var, value);
473                 return 0;
474         }
475         if (!strcmp(var, "core.trustctime")) {
476                 trust_ctime = git_config_bool(var, value);
477                 return 0;
478         }
479
480         if (!strcmp(var, "core.quotepath")) {
481                 quote_path_fully = git_config_bool(var, value);
482                 return 0;
483         }
484
485         if (!strcmp(var, "core.symlinks")) {
486                 has_symlinks = git_config_bool(var, value);
487                 return 0;
488         }
489
490         if (!strcmp(var, "core.ignorecase")) {
491                 ignore_case = git_config_bool(var, value);
492                 return 0;
493         }
494
495         if (!strcmp(var, "core.bare")) {
496                 is_bare_repository_cfg = git_config_bool(var, value);
497                 return 0;
498         }
499
500         if (!strcmp(var, "core.ignorestat")) {
501                 assume_unchanged = git_config_bool(var, value);
502                 return 0;
503         }
504
505         if (!strcmp(var, "core.prefersymlinkrefs")) {
506                 prefer_symlink_refs = git_config_bool(var, value);
507                 return 0;
508         }
509
510         if (!strcmp(var, "core.logallrefupdates")) {
511                 log_all_ref_updates = git_config_bool(var, value);
512                 return 0;
513         }
514
515         if (!strcmp(var, "core.warnambiguousrefs")) {
516                 warn_ambiguous_refs = git_config_bool(var, value);
517                 return 0;
518         }
519
520         if (!strcmp(var, "core.abbrev")) {
521                 int abbrev = git_config_int(var, value);
522                 if (abbrev < minimum_abbrev || abbrev > 40)
523                         return -1;
524                 default_abbrev = abbrev;
525                 return 0;
526         }
527
528         if (!strcmp(var, "core.loosecompression")) {
529                 int level = git_config_int(var, value);
530                 if (level == -1)
531                         level = Z_DEFAULT_COMPRESSION;
532                 else if (level < 0 || level > Z_BEST_COMPRESSION)
533                         die("bad zlib compression level %d", level);
534                 zlib_compression_level = level;
535                 zlib_compression_seen = 1;
536                 return 0;
537         }
538
539         if (!strcmp(var, "core.compression")) {
540                 int level = git_config_int(var, value);
541                 if (level == -1)
542                         level = Z_DEFAULT_COMPRESSION;
543                 else if (level < 0 || level > Z_BEST_COMPRESSION)
544                         die("bad zlib compression level %d", level);
545                 core_compression_level = level;
546                 core_compression_seen = 1;
547                 if (!zlib_compression_seen)
548                         zlib_compression_level = level;
549                 return 0;
550         }
551
552         if (!strcmp(var, "core.packedgitwindowsize")) {
553                 int pgsz_x2 = getpagesize() * 2;
554                 packed_git_window_size = git_config_int(var, value);
555
556                 /* This value must be multiple of (pagesize * 2) */
557                 packed_git_window_size /= pgsz_x2;
558                 if (packed_git_window_size < 1)
559                         packed_git_window_size = 1;
560                 packed_git_window_size *= pgsz_x2;
561                 return 0;
562         }
563
564         if (!strcmp(var, "core.bigfilethreshold")) {
565                 long n = git_config_int(var, value);
566                 big_file_threshold = 0 < n ? n : 0;
567                 return 0;
568         }
569
570         if (!strcmp(var, "core.packedgitlimit")) {
571                 packed_git_limit = git_config_int(var, value);
572                 return 0;
573         }
574
575         if (!strcmp(var, "core.deltabasecachelimit")) {
576                 delta_base_cache_limit = git_config_int(var, value);
577                 return 0;
578         }
579
580         if (!strcmp(var, "core.logpackaccess"))
581                 return git_config_string(&log_pack_access, var, value);
582
583         if (!strcmp(var, "core.autocrlf")) {
584                 if (value && !strcasecmp(value, "input")) {
585                         if (core_eol == EOL_CRLF)
586                                 return error("core.autocrlf=input conflicts with core.eol=crlf");
587                         auto_crlf = AUTO_CRLF_INPUT;
588                         return 0;
589                 }
590                 auto_crlf = git_config_bool(var, value);
591                 return 0;
592         }
593
594         if (!strcmp(var, "core.safecrlf")) {
595                 if (value && !strcasecmp(value, "warn")) {
596                         safe_crlf = SAFE_CRLF_WARN;
597                         return 0;
598                 }
599                 safe_crlf = git_config_bool(var, value);
600                 return 0;
601         }
602
603         if (!strcmp(var, "core.eol")) {
604                 if (value && !strcasecmp(value, "lf"))
605                         core_eol = EOL_LF;
606                 else if (value && !strcasecmp(value, "crlf"))
607                         core_eol = EOL_CRLF;
608                 else if (value && !strcasecmp(value, "native"))
609                         core_eol = EOL_NATIVE;
610                 else
611                         core_eol = EOL_UNSET;
612                 if (core_eol == EOL_CRLF && auto_crlf == AUTO_CRLF_INPUT)
613                         return error("core.autocrlf=input conflicts with core.eol=crlf");
614                 return 0;
615         }
616
617         if (!strcmp(var, "core.notesref")) {
618                 notes_ref_name = xstrdup(value);
619                 return 0;
620         }
621
622         if (!strcmp(var, "core.pager"))
623                 return git_config_string(&pager_program, var, value);
624
625         if (!strcmp(var, "core.editor"))
626                 return git_config_string(&editor_program, var, value);
627
628         if (!strcmp(var, "core.askpass"))
629                 return git_config_string(&askpass_program, var, value);
630
631         if (!strcmp(var, "core.excludesfile"))
632                 return git_config_pathname(&excludes_file, var, value);
633
634         if (!strcmp(var, "core.whitespace")) {
635                 if (!value)
636                         return config_error_nonbool(var);
637                 whitespace_rule_cfg = parse_whitespace_rule(value);
638                 return 0;
639         }
640
641         if (!strcmp(var, "core.fsyncobjectfiles")) {
642                 fsync_object_files = git_config_bool(var, value);
643                 return 0;
644         }
645
646         if (!strcmp(var, "core.preloadindex")) {
647                 core_preload_index = git_config_bool(var, value);
648                 return 0;
649         }
650
651         if (!strcmp(var, "core.createobject")) {
652                 if (!strcmp(value, "rename"))
653                         object_creation_mode = OBJECT_CREATION_USES_RENAMES;
654                 else if (!strcmp(value, "link"))
655                         object_creation_mode = OBJECT_CREATION_USES_HARDLINKS;
656                 else
657                         die("Invalid mode for object creation: %s", value);
658                 return 0;
659         }
660
661         if (!strcmp(var, "core.sparsecheckout")) {
662                 core_apply_sparse_checkout = git_config_bool(var, value);
663                 return 0;
664         }
665
666         /* Add other config variables here and to Documentation/config.txt. */
667         return 0;
668 }
669
670 static int git_default_user_config(const char *var, const char *value)
671 {
672         if (!strcmp(var, "user.name")) {
673                 if (!value)
674                         return config_error_nonbool(var);
675                 strlcpy(git_default_name, value, sizeof(git_default_name));
676                 user_ident_explicitly_given |= IDENT_NAME_GIVEN;
677                 return 0;
678         }
679
680         if (!strcmp(var, "user.email")) {
681                 if (!value)
682                         return config_error_nonbool(var);
683                 strlcpy(git_default_email, value, sizeof(git_default_email));
684                 user_ident_explicitly_given |= IDENT_MAIL_GIVEN;
685                 return 0;
686         }
687
688         /* Add other config variables here and to Documentation/config.txt. */
689         return 0;
690 }
691
692 static int git_default_i18n_config(const char *var, const char *value)
693 {
694         if (!strcmp(var, "i18n.commitencoding"))
695                 return git_config_string(&git_commit_encoding, var, value);
696
697         if (!strcmp(var, "i18n.logoutputencoding"))
698                 return git_config_string(&git_log_output_encoding, var, value);
699
700         /* Add other config variables here and to Documentation/config.txt. */
701         return 0;
702 }
703
704 static int git_default_branch_config(const char *var, const char *value)
705 {
706         if (!strcmp(var, "branch.autosetupmerge")) {
707                 if (value && !strcasecmp(value, "always")) {
708                         git_branch_track = BRANCH_TRACK_ALWAYS;
709                         return 0;
710                 }
711                 git_branch_track = git_config_bool(var, value);
712                 return 0;
713         }
714         if (!strcmp(var, "branch.autosetuprebase")) {
715                 if (!value)
716                         return config_error_nonbool(var);
717                 else if (!strcmp(value, "never"))
718                         autorebase = AUTOREBASE_NEVER;
719                 else if (!strcmp(value, "local"))
720                         autorebase = AUTOREBASE_LOCAL;
721                 else if (!strcmp(value, "remote"))
722                         autorebase = AUTOREBASE_REMOTE;
723                 else if (!strcmp(value, "always"))
724                         autorebase = AUTOREBASE_ALWAYS;
725                 else
726                         return error("Malformed value for %s", var);
727                 return 0;
728         }
729
730         /* Add other config variables here and to Documentation/config.txt. */
731         return 0;
732 }
733
734 static int git_default_push_config(const char *var, const char *value)
735 {
736         if (!strcmp(var, "push.default")) {
737                 if (!value)
738                         return config_error_nonbool(var);
739                 else if (!strcmp(value, "nothing"))
740                         push_default = PUSH_DEFAULT_NOTHING;
741                 else if (!strcmp(value, "matching"))
742                         push_default = PUSH_DEFAULT_MATCHING;
743                 else if (!strcmp(value, "upstream"))
744                         push_default = PUSH_DEFAULT_UPSTREAM;
745                 else if (!strcmp(value, "tracking")) /* deprecated */
746                         push_default = PUSH_DEFAULT_UPSTREAM;
747                 else if (!strcmp(value, "current"))
748                         push_default = PUSH_DEFAULT_CURRENT;
749                 else {
750                         error("Malformed value for %s: %s", var, value);
751                         return error("Must be one of nothing, matching, "
752                                      "tracking or current.");
753                 }
754                 return 0;
755         }
756
757         /* Add other config variables here and to Documentation/config.txt. */
758         return 0;
759 }
760
761 static int git_default_mailmap_config(const char *var, const char *value)
762 {
763         if (!strcmp(var, "mailmap.file"))
764                 return git_config_string(&git_mailmap_file, var, value);
765
766         /* Add other config variables here and to Documentation/config.txt. */
767         return 0;
768 }
769
770 int git_default_config(const char *var, const char *value, void *dummy)
771 {
772         if (!prefixcmp(var, "core."))
773                 return git_default_core_config(var, value);
774
775         if (!prefixcmp(var, "user."))
776                 return git_default_user_config(var, value);
777
778         if (!prefixcmp(var, "i18n."))
779                 return git_default_i18n_config(var, value);
780
781         if (!prefixcmp(var, "branch."))
782                 return git_default_branch_config(var, value);
783
784         if (!prefixcmp(var, "push."))
785                 return git_default_push_config(var, value);
786
787         if (!prefixcmp(var, "mailmap."))
788                 return git_default_mailmap_config(var, value);
789
790         if (!prefixcmp(var, "advice."))
791                 return git_default_advice_config(var, value);
792
793         if (!strcmp(var, "pager.color") || !strcmp(var, "color.pager")) {
794                 pager_use_color = git_config_bool(var,value);
795                 return 0;
796         }
797
798         if (!prefixcmp(var, "credential."))
799                 return git_default_credential_config(var, value);
800
801         /* Add other config variables here and to Documentation/config.txt. */
802         return 0;
803 }
804
805 int git_config_from_file(config_fn_t fn, const char *filename, void *data)
806 {
807         int ret;
808         FILE *f = fopen(filename, "r");
809
810         ret = -1;
811         if (f) {
812                 config_file top;
813
814                 /* push config-file parsing state stack */
815                 top.prev = cf;
816                 top.f = f;
817                 top.name = filename;
818                 top.linenr = 1;
819                 top.eof = 0;
820                 strbuf_init(&top.value, 1024);
821                 cf = &top;
822
823                 ret = git_parse_file(fn, data);
824
825                 /* pop config-file parsing state stack */
826                 strbuf_release(&top.value);
827                 cf = top.prev;
828
829                 fclose(f);
830         }
831         return ret;
832 }
833
834 const char *git_etc_gitconfig(void)
835 {
836         static const char *system_wide;
837         if (!system_wide)
838                 system_wide = system_path(ETC_GITCONFIG);
839         return system_wide;
840 }
841
842 int git_env_bool(const char *k, int def)
843 {
844         const char *v = getenv(k);
845         return v ? git_config_bool(k, v) : def;
846 }
847
848 int git_config_system(void)
849 {
850         return !git_env_bool("GIT_CONFIG_NOSYSTEM", 0);
851 }
852
853 int git_config_early(config_fn_t fn, void *data, const char *repo_config)
854 {
855         int ret = 0, found = 0;
856         const char *home = NULL;
857
858         /* Setting $GIT_CONFIG makes git read _only_ the given config file. */
859         if (config_exclusive_filename)
860                 return git_config_from_file(fn, config_exclusive_filename, data);
861         if (git_config_system() && !access(git_etc_gitconfig(), R_OK)) {
862                 ret += git_config_from_file(fn, git_etc_gitconfig(),
863                                             data);
864                 found += 1;
865         }
866
867         home = getenv("HOME");
868         if (home) {
869                 char *user_config = xstrdup(mkpath("%s/.gitconfig", home));
870                 if (!access(user_config, R_OK)) {
871                         ret += git_config_from_file(fn, user_config, data);
872                         found += 1;
873                 }
874                 free(user_config);
875         }
876
877         if (repo_config && !access(repo_config, R_OK)) {
878                 ret += git_config_from_file(fn, repo_config, data);
879                 found += 1;
880         }
881
882         switch (git_config_from_parameters(fn, data)) {
883         case -1: /* error */
884                 die("unable to parse command-line config");
885                 break;
886         case 0: /* found nothing */
887                 break;
888         default: /* found at least one item */
889                 found++;
890                 break;
891         }
892
893         return ret == 0 ? found : ret;
894 }
895
896 int git_config(config_fn_t fn, void *data)
897 {
898         char *repo_config = NULL;
899         int ret;
900
901         repo_config = git_pathdup("config");
902         ret = git_config_early(fn, data, repo_config);
903         if (repo_config)
904                 free(repo_config);
905         return ret;
906 }
907
908 /*
909  * Find all the stuff for git_config_set() below.
910  */
911
912 #define MAX_MATCHES 512
913
914 static struct {
915         int baselen;
916         char *key;
917         int do_not_match;
918         regex_t *value_regex;
919         int multi_replace;
920         size_t offset[MAX_MATCHES];
921         enum { START, SECTION_SEEN, SECTION_END_SEEN, KEY_SEEN } state;
922         int seen;
923 } store;
924
925 static int matches(const char *key, const char *value)
926 {
927         return !strcmp(key, store.key) &&
928                 (store.value_regex == NULL ||
929                  (store.do_not_match ^
930                   !regexec(store.value_regex, value, 0, NULL, 0)));
931 }
932
933 static int store_aux(const char *key, const char *value, void *cb)
934 {
935         const char *ep;
936         size_t section_len;
937         FILE *f = cf->f;
938
939         switch (store.state) {
940         case KEY_SEEN:
941                 if (matches(key, value)) {
942                         if (store.seen == 1 && store.multi_replace == 0) {
943                                 warning("%s has multiple values", key);
944                         } else if (store.seen >= MAX_MATCHES) {
945                                 error("too many matches for %s", key);
946                                 return 1;
947                         }
948
949                         store.offset[store.seen] = ftell(f);
950                         store.seen++;
951                 }
952                 break;
953         case SECTION_SEEN:
954                 /*
955                  * What we are looking for is in store.key (both
956                  * section and var), and its section part is baselen
957                  * long.  We found key (again, both section and var).
958                  * We would want to know if this key is in the same
959                  * section as what we are looking for.  We already
960                  * know we are in the same section as what should
961                  * hold store.key.
962                  */
963                 ep = strrchr(key, '.');
964                 section_len = ep - key;
965
966                 if ((section_len != store.baselen) ||
967                     memcmp(key, store.key, section_len+1)) {
968                         store.state = SECTION_END_SEEN;
969                         break;
970                 }
971
972                 /*
973                  * Do not increment matches: this is no match, but we
974                  * just made sure we are in the desired section.
975                  */
976                 store.offset[store.seen] = ftell(f);
977                 /* fallthru */
978         case SECTION_END_SEEN:
979         case START:
980                 if (matches(key, value)) {
981                         store.offset[store.seen] = ftell(f);
982                         store.state = KEY_SEEN;
983                         store.seen++;
984                 } else {
985                         if (strrchr(key, '.') - key == store.baselen &&
986                               !strncmp(key, store.key, store.baselen)) {
987                                         store.state = SECTION_SEEN;
988                                         store.offset[store.seen] = ftell(f);
989                         }
990                 }
991         }
992         return 0;
993 }
994
995 static int write_error(const char *filename)
996 {
997         error("failed to write new configuration file %s", filename);
998
999         /* Same error code as "failed to rename". */
1000         return 4;
1001 }
1002
1003 static int store_write_section(int fd, const char *key)
1004 {
1005         const char *dot;
1006         int i, success;
1007         struct strbuf sb = STRBUF_INIT;
1008
1009         dot = memchr(key, '.', store.baselen);
1010         if (dot) {
1011                 strbuf_addf(&sb, "[%.*s \"", (int)(dot - key), key);
1012                 for (i = dot - key + 1; i < store.baselen; i++) {
1013                         if (key[i] == '"' || key[i] == '\\')
1014                                 strbuf_addch(&sb, '\\');
1015                         strbuf_addch(&sb, key[i]);
1016                 }
1017                 strbuf_addstr(&sb, "\"]\n");
1018         } else {
1019                 strbuf_addf(&sb, "[%.*s]\n", store.baselen, key);
1020         }
1021
1022         success = write_in_full(fd, sb.buf, sb.len) == sb.len;
1023         strbuf_release(&sb);
1024
1025         return success;
1026 }
1027
1028 static int store_write_pair(int fd, const char *key, const char *value)
1029 {
1030         int i, success;
1031         int length = strlen(key + store.baselen + 1);
1032         const char *quote = "";
1033         struct strbuf sb = STRBUF_INIT;
1034
1035         /*
1036          * Check to see if the value needs to be surrounded with a dq pair.
1037          * Note that problematic characters are always backslash-quoted; this
1038          * check is about not losing leading or trailing SP and strings that
1039          * follow beginning-of-comment characters (i.e. ';' and '#') by the
1040          * configuration parser.
1041          */
1042         if (value[0] == ' ')
1043                 quote = "\"";
1044         for (i = 0; value[i]; i++)
1045                 if (value[i] == ';' || value[i] == '#')
1046                         quote = "\"";
1047         if (i && value[i - 1] == ' ')
1048                 quote = "\"";
1049
1050         strbuf_addf(&sb, "\t%.*s = %s",
1051                     length, key + store.baselen + 1, quote);
1052
1053         for (i = 0; value[i]; i++)
1054                 switch (value[i]) {
1055                 case '\n':
1056                         strbuf_addstr(&sb, "\\n");
1057                         break;
1058                 case '\t':
1059                         strbuf_addstr(&sb, "\\t");
1060                         break;
1061                 case '"':
1062                 case '\\':
1063                         strbuf_addch(&sb, '\\');
1064                 default:
1065                         strbuf_addch(&sb, value[i]);
1066                         break;
1067                 }
1068         strbuf_addf(&sb, "%s\n", quote);
1069
1070         success = write_in_full(fd, sb.buf, sb.len) == sb.len;
1071         strbuf_release(&sb);
1072
1073         return success;
1074 }
1075
1076 static ssize_t find_beginning_of_line(const char *contents, size_t size,
1077         size_t offset_, int *found_bracket)
1078 {
1079         size_t equal_offset = size, bracket_offset = size;
1080         ssize_t offset;
1081
1082 contline:
1083         for (offset = offset_-2; offset > 0
1084                         && contents[offset] != '\n'; offset--)
1085                 switch (contents[offset]) {
1086                         case '=': equal_offset = offset; break;
1087                         case ']': bracket_offset = offset; break;
1088                 }
1089         if (offset > 0 && contents[offset-1] == '\\') {
1090                 offset_ = offset;
1091                 goto contline;
1092         }
1093         if (bracket_offset < equal_offset) {
1094                 *found_bracket = 1;
1095                 offset = bracket_offset+1;
1096         } else
1097                 offset++;
1098
1099         return offset;
1100 }
1101
1102 int git_config_set_in_file(const char *config_filename,
1103                         const char *key, const char *value)
1104 {
1105         return git_config_set_multivar_in_file(config_filename, key, value, NULL, 0);
1106 }
1107
1108 int git_config_set(const char *key, const char *value)
1109 {
1110         return git_config_set_multivar(key, value, NULL, 0);
1111 }
1112
1113 /*
1114  * Auxiliary function to sanity-check and split the key into the section
1115  * identifier and variable name.
1116  *
1117  * Returns 0 on success, -1 when there is an invalid character in the key and
1118  * -2 if there is no section name in the key.
1119  *
1120  * store_key - pointer to char* which will hold a copy of the key with
1121  *             lowercase section and variable name
1122  * baselen - pointer to int which will hold the length of the
1123  *           section + subsection part, can be NULL
1124  */
1125 int git_config_parse_key(const char *key, char **store_key, int *baselen_)
1126 {
1127         int i, dot, baselen;
1128         const char *last_dot = strrchr(key, '.');
1129
1130         /*
1131          * Since "key" actually contains the section name and the real
1132          * key name separated by a dot, we have to know where the dot is.
1133          */
1134
1135         if (last_dot == NULL || last_dot == key) {
1136                 error("key does not contain a section: %s", key);
1137                 return -CONFIG_NO_SECTION_OR_NAME;
1138         }
1139
1140         if (!last_dot[1]) {
1141                 error("key does not contain variable name: %s", key);
1142                 return -CONFIG_NO_SECTION_OR_NAME;
1143         }
1144
1145         baselen = last_dot - key;
1146         if (baselen_)
1147                 *baselen_ = baselen;
1148
1149         /*
1150          * Validate the key and while at it, lower case it for matching.
1151          */
1152         *store_key = xmalloc(strlen(key) + 1);
1153
1154         dot = 0;
1155         for (i = 0; key[i]; i++) {
1156                 unsigned char c = key[i];
1157                 if (c == '.')
1158                         dot = 1;
1159                 /* Leave the extended basename untouched.. */
1160                 if (!dot || i > baselen) {
1161                         if (!iskeychar(c) ||
1162                             (i == baselen + 1 && !isalpha(c))) {
1163                                 error("invalid key: %s", key);
1164                                 goto out_free_ret_1;
1165                         }
1166                         c = tolower(c);
1167                 } else if (c == '\n') {
1168                         error("invalid key (newline): %s", key);
1169                         goto out_free_ret_1;
1170                 }
1171                 (*store_key)[i] = c;
1172         }
1173         (*store_key)[i] = 0;
1174
1175         return 0;
1176
1177 out_free_ret_1:
1178         free(*store_key);
1179         return -CONFIG_INVALID_KEY;
1180 }
1181
1182 /*
1183  * If value==NULL, unset in (remove from) config,
1184  * if value_regex!=NULL, disregard key/value pairs where value does not match.
1185  * if multi_replace==0, nothing, or only one matching key/value is replaced,
1186  *     else all matching key/values (regardless how many) are removed,
1187  *     before the new pair is written.
1188  *
1189  * Returns 0 on success.
1190  *
1191  * This function does this:
1192  *
1193  * - it locks the config file by creating ".git/config.lock"
1194  *
1195  * - it then parses the config using store_aux() as validator to find
1196  *   the position on the key/value pair to replace. If it is to be unset,
1197  *   it must be found exactly once.
1198  *
1199  * - the config file is mmap()ed and the part before the match (if any) is
1200  *   written to the lock file, then the changed part and the rest.
1201  *
1202  * - the config file is removed and the lock file rename()d to it.
1203  *
1204  */
1205 int git_config_set_multivar_in_file(const char *config_filename,
1206                                 const char *key, const char *value,
1207                                 const char *value_regex, int multi_replace)
1208 {
1209         int fd = -1, in_fd;
1210         int ret;
1211         struct lock_file *lock = NULL;
1212
1213         /* parse-key returns negative; flip the sign to feed exit(3) */
1214         ret = 0 - git_config_parse_key(key, &store.key, &store.baselen);
1215         if (ret)
1216                 goto out_free;
1217
1218         store.multi_replace = multi_replace;
1219
1220
1221         /*
1222          * The lock serves a purpose in addition to locking: the new
1223          * contents of .git/config will be written into it.
1224          */
1225         lock = xcalloc(sizeof(struct lock_file), 1);
1226         fd = hold_lock_file_for_update(lock, config_filename, 0);
1227         if (fd < 0) {
1228                 error("could not lock config file %s: %s", config_filename, strerror(errno));
1229                 free(store.key);
1230                 ret = CONFIG_NO_LOCK;
1231                 goto out_free;
1232         }
1233
1234         /*
1235          * If .git/config does not exist yet, write a minimal version.
1236          */
1237         in_fd = open(config_filename, O_RDONLY);
1238         if ( in_fd < 0 ) {
1239                 free(store.key);
1240
1241                 if ( ENOENT != errno ) {
1242                         error("opening %s: %s", config_filename,
1243                               strerror(errno));
1244                         ret = CONFIG_INVALID_FILE; /* same as "invalid config file" */
1245                         goto out_free;
1246                 }
1247                 /* if nothing to unset, error out */
1248                 if (value == NULL) {
1249                         ret = CONFIG_NOTHING_SET;
1250                         goto out_free;
1251                 }
1252
1253                 store.key = (char *)key;
1254                 if (!store_write_section(fd, key) ||
1255                     !store_write_pair(fd, key, value))
1256                         goto write_err_out;
1257         } else {
1258                 struct stat st;
1259                 char *contents;
1260                 size_t contents_sz, copy_begin, copy_end;
1261                 int i, new_line = 0;
1262
1263                 if (value_regex == NULL)
1264                         store.value_regex = NULL;
1265                 else {
1266                         if (value_regex[0] == '!') {
1267                                 store.do_not_match = 1;
1268                                 value_regex++;
1269                         } else
1270                                 store.do_not_match = 0;
1271
1272                         store.value_regex = (regex_t*)xmalloc(sizeof(regex_t));
1273                         if (regcomp(store.value_regex, value_regex,
1274                                         REG_EXTENDED)) {
1275                                 error("invalid pattern: %s", value_regex);
1276                                 free(store.value_regex);
1277                                 ret = CONFIG_INVALID_PATTERN;
1278                                 goto out_free;
1279                         }
1280                 }
1281
1282                 store.offset[0] = 0;
1283                 store.state = START;
1284                 store.seen = 0;
1285
1286                 /*
1287                  * After this, store.offset will contain the *end* offset
1288                  * of the last match, or remain at 0 if no match was found.
1289                  * As a side effect, we make sure to transform only a valid
1290                  * existing config file.
1291                  */
1292                 if (git_config_from_file(store_aux, config_filename, NULL)) {
1293                         error("invalid config file %s", config_filename);
1294                         free(store.key);
1295                         if (store.value_regex != NULL) {
1296                                 regfree(store.value_regex);
1297                                 free(store.value_regex);
1298                         }
1299                         ret = CONFIG_INVALID_FILE;
1300                         goto out_free;
1301                 }
1302
1303                 free(store.key);
1304                 if (store.value_regex != NULL) {
1305                         regfree(store.value_regex);
1306                         free(store.value_regex);
1307                 }
1308
1309                 /* if nothing to unset, or too many matches, error out */
1310                 if ((store.seen == 0 && value == NULL) ||
1311                                 (store.seen > 1 && multi_replace == 0)) {
1312                         ret = CONFIG_NOTHING_SET;
1313                         goto out_free;
1314                 }
1315
1316                 fstat(in_fd, &st);
1317                 contents_sz = xsize_t(st.st_size);
1318                 contents = xmmap(NULL, contents_sz, PROT_READ,
1319                         MAP_PRIVATE, in_fd, 0);
1320                 close(in_fd);
1321
1322                 if (store.seen == 0)
1323                         store.seen = 1;
1324
1325                 for (i = 0, copy_begin = 0; i < store.seen; i++) {
1326                         if (store.offset[i] == 0) {
1327                                 store.offset[i] = copy_end = contents_sz;
1328                         } else if (store.state != KEY_SEEN) {
1329                                 copy_end = store.offset[i];
1330                         } else
1331                                 copy_end = find_beginning_of_line(
1332                                         contents, contents_sz,
1333                                         store.offset[i]-2, &new_line);
1334
1335                         if (copy_end > 0 && contents[copy_end-1] != '\n')
1336                                 new_line = 1;
1337
1338                         /* write the first part of the config */
1339                         if (copy_end > copy_begin) {
1340                                 if (write_in_full(fd, contents + copy_begin,
1341                                                   copy_end - copy_begin) <
1342                                     copy_end - copy_begin)
1343                                         goto write_err_out;
1344                                 if (new_line &&
1345                                     write_str_in_full(fd, "\n") != 1)
1346                                         goto write_err_out;
1347                         }
1348                         copy_begin = store.offset[i];
1349                 }
1350
1351                 /* write the pair (value == NULL means unset) */
1352                 if (value != NULL) {
1353                         if (store.state == START) {
1354                                 if (!store_write_section(fd, key))
1355                                         goto write_err_out;
1356                         }
1357                         if (!store_write_pair(fd, key, value))
1358                                 goto write_err_out;
1359                 }
1360
1361                 /* write the rest of the config */
1362                 if (copy_begin < contents_sz)
1363                         if (write_in_full(fd, contents + copy_begin,
1364                                           contents_sz - copy_begin) <
1365                             contents_sz - copy_begin)
1366                                 goto write_err_out;
1367
1368                 munmap(contents, contents_sz);
1369         }
1370
1371         if (commit_lock_file(lock) < 0) {
1372                 error("could not commit config file %s", config_filename);
1373                 ret = CONFIG_NO_WRITE;
1374                 goto out_free;
1375         }
1376
1377         /*
1378          * lock is committed, so don't try to roll it back below.
1379          * NOTE: Since lockfile.c keeps a linked list of all created
1380          * lock_file structures, it isn't safe to free(lock).  It's
1381          * better to just leave it hanging around.
1382          */
1383         lock = NULL;
1384         ret = 0;
1385
1386 out_free:
1387         if (lock)
1388                 rollback_lock_file(lock);
1389         return ret;
1390
1391 write_err_out:
1392         ret = write_error(lock->filename);
1393         goto out_free;
1394
1395 }
1396
1397 int git_config_set_multivar(const char *key, const char *value,
1398                         const char *value_regex, int multi_replace)
1399 {
1400         const char *config_filename;
1401         char *buf = NULL;
1402         int ret;
1403
1404         if (config_exclusive_filename)
1405                 config_filename = config_exclusive_filename;
1406         else
1407                 config_filename = buf = git_pathdup("config");
1408
1409         ret = git_config_set_multivar_in_file(config_filename, key, value,
1410                                         value_regex, multi_replace);
1411         free(buf);
1412         return ret;
1413 }
1414
1415 static int section_name_match (const char *buf, const char *name)
1416 {
1417         int i = 0, j = 0, dot = 0;
1418         if (buf[i] != '[')
1419                 return 0;
1420         for (i = 1; buf[i] && buf[i] != ']'; i++) {
1421                 if (!dot && isspace(buf[i])) {
1422                         dot = 1;
1423                         if (name[j++] != '.')
1424                                 break;
1425                         for (i++; isspace(buf[i]); i++)
1426                                 ; /* do nothing */
1427                         if (buf[i] != '"')
1428                                 break;
1429                         continue;
1430                 }
1431                 if (buf[i] == '\\' && dot)
1432                         i++;
1433                 else if (buf[i] == '"' && dot) {
1434                         for (i++; isspace(buf[i]); i++)
1435                                 ; /* do_nothing */
1436                         break;
1437                 }
1438                 if (buf[i] != name[j++])
1439                         break;
1440         }
1441         if (buf[i] == ']' && name[j] == 0) {
1442                 /*
1443                  * We match, now just find the right length offset by
1444                  * gobbling up any whitespace after it, as well
1445                  */
1446                 i++;
1447                 for (; buf[i] && isspace(buf[i]); i++)
1448                         ; /* do nothing */
1449                 return i;
1450         }
1451         return 0;
1452 }
1453
1454 /* if new_name == NULL, the section is removed instead */
1455 int git_config_rename_section(const char *old_name, const char *new_name)
1456 {
1457         int ret = 0, remove = 0;
1458         char *config_filename;
1459         struct lock_file *lock = xcalloc(sizeof(struct lock_file), 1);
1460         int out_fd;
1461         char buf[1024];
1462         FILE *config_file;
1463
1464         if (config_exclusive_filename)
1465                 config_filename = xstrdup(config_exclusive_filename);
1466         else
1467                 config_filename = git_pathdup("config");
1468         out_fd = hold_lock_file_for_update(lock, config_filename, 0);
1469         if (out_fd < 0) {
1470                 ret = error("could not lock config file %s", config_filename);
1471                 goto out;
1472         }
1473
1474         if (!(config_file = fopen(config_filename, "rb"))) {
1475                 /* no config file means nothing to rename, no error */
1476                 goto unlock_and_out;
1477         }
1478
1479         while (fgets(buf, sizeof(buf), config_file)) {
1480                 int i;
1481                 int length;
1482                 char *output = buf;
1483                 for (i = 0; buf[i] && isspace(buf[i]); i++)
1484                         ; /* do nothing */
1485                 if (buf[i] == '[') {
1486                         /* it's a section */
1487                         int offset = section_name_match(&buf[i], old_name);
1488                         if (offset > 0) {
1489                                 ret++;
1490                                 if (new_name == NULL) {
1491                                         remove = 1;
1492                                         continue;
1493                                 }
1494                                 store.baselen = strlen(new_name);
1495                                 if (!store_write_section(out_fd, new_name)) {
1496                                         ret = write_error(lock->filename);
1497                                         goto out;
1498                                 }
1499                                 /*
1500                                  * We wrote out the new section, with
1501                                  * a newline, now skip the old
1502                                  * section's length
1503                                  */
1504                                 output += offset + i;
1505                                 if (strlen(output) > 0) {
1506                                         /*
1507                                          * More content means there's
1508                                          * a declaration to put on the
1509                                          * next line; indent with a
1510                                          * tab
1511                                          */
1512                                         output -= 1;
1513                                         output[0] = '\t';
1514                                 }
1515                         }
1516                         remove = 0;
1517                 }
1518                 if (remove)
1519                         continue;
1520                 length = strlen(output);
1521                 if (write_in_full(out_fd, output, length) != length) {
1522                         ret = write_error(lock->filename);
1523                         goto out;
1524                 }
1525         }
1526         fclose(config_file);
1527 unlock_and_out:
1528         if (commit_lock_file(lock) < 0)
1529                 ret = error("could not commit config file %s", config_filename);
1530 out:
1531         free(config_filename);
1532         return ret;
1533 }
1534
1535 /*
1536  * Call this to report error for your variable that should not
1537  * get a boolean value (i.e. "[my] var" means "true").
1538  */
1539 int config_error_nonbool(const char *var)
1540 {
1541         return error("Missing value for '%s'", var);
1542 }