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