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