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
  10 #define MAXNAME (256)
  11
  12 static FILE *config_file;
  13 static const char *config_file_name;
  14 static int config_linenr;
  15 static int zlib_compression_seen;
  16
  17 static int get_next_char(void)
  18 {
  19         int c;
  20         FILE *f;
  21
  22         c = '\n';
  23         if ((f = config_file) != NULL) {
  24                 c = fgetc(f);
  25                 if (c == '\r') {
  26                         /* DOS like systems */
  27                         c = fgetc(f);
  28                         if (c != '\n') {
  29                                 ungetc(c, f);
  30                                 c = '\r';
  31                         }
  32                 }
  33                 if (c == '\n')
  34                         config_linenr++;
  35                 if (c == EOF) {
  36                         config_file = NULL;
  37                         c = '\n';
  38                 }
  39         }
  40         return c;
  41 }
  42
  43 static char *parse_value(void)
  44 {
  45         static char value[1024];
  46         int quote = 0, comment = 0, len = 0, space = 0;
  47
  48         for (;;) {
  49                 int c = get_next_char();
  50                 if (len >= sizeof(value))
  51                         return NULL;
  52                 if (c == '\n') {
  53                         if (quote)
  54                                 return NULL;
  55                         value[len] = 0;
  56                         return value;
  57                 }
  58                 if (comment)
  59                         continue;
  60                 if (isspace(c) && !quote) {
  61                         space = 1;
  62                         continue;
  63                 }
  64                 if (!quote) {
  65                         if (c == ';' || c == '#') {
  66                                 comment = 1;
  67                                 continue;
  68                         }
  69                 }
  70                 if (space) {
  71                         if (len)
  72                                 value[len++] = ' ';
  73                         space = 0;
  74                 }
  75                 if (c == '\\') {
  76                         c = get_next_char();
  77                         switch (c) {
  78                         case '\n':
  79                                 continue;
  80                         case 't':
  81                                 c = '\t';
  82                                 break;
  83                         case 'b':
  84                                 c = '\b';
  85                                 break;
  86                         case 'n':
  87                                 c = '\n';
  88                                 break;
  89                         /* Some characters escape as themselves */
  90                         case '\\': case '"':
  91                                 break;
  92                         /* Reject unknown escape sequences */
  93                         default:
  94                                 return NULL;
  95                         }
  96                         value[len++] = c;
  97                         continue;
  98                 }
  99                 if (c == '"') {
 100                         quote = 1-quote;
 101                         continue;
 102                 }
 103                 value[len++] = c;
 104         }
 105 }
 106
 107 static inline int iskeychar(int c)
 108 {
 109         return isalnum(c) || c == '-';
 110 }
 111
 112 static int get_value(config_fn_t fn, char *name, unsigned int len)
 113 {
 114         int c;
 115         char *value;
 116
 117         /* Get the full name */
 118         for (;;) {
 119                 c = get_next_char();
 120                 if (c == EOF)
 121                         break;
 122                 if (!iskeychar(c))
 123                         break;
 124                 name[len++] = tolower(c);
 125                 if (len >= MAXNAME)
 126                         return -1;
 127         }
 128         name[len] = 0;
 129         while (c == ' ' || c == '\t')
 130                 c = get_next_char();
 131
 132         value = NULL;
 133         if (c != '\n') {
 134                 if (c != '=')
 135                         return -1;
 136                 value = parse_value();
 137                 if (!value)
 138                         return -1;
 139         }
 140         return fn(name, value);
 141 }
 142
 143 static int get_extended_base_var(char *name, int baselen, int c)
 144 {
 145         do {
 146                 if (c == '\n')
 147                         return -1;
 148                 c = get_next_char();
 149         } while (isspace(c));
 150
 151         /* We require the format to be '[base "extension"]' */
 152         if (c != '"')
 153                 return -1;
 154         name[baselen++] = '.';
 155
 156         for (;;) {
 157                 int c = get_next_char();
 158                 if (c == '\n')
 159                         return -1;
 160                 if (c == '"')
 161                         break;
 162                 if (c == '\\') {
 163                         c = get_next_char();
 164                         if (c == '\n')
 165                                 return -1;
 166                 }
 167                 name[baselen++] = c;
 168                 if (baselen > MAXNAME / 2)
 169                         return -1;
 170         }
 171
 172         /* Final ']' */
 173         if (get_next_char() != ']')
 174                 return -1;
 175         return baselen;
 176 }
 177
 178 static int get_base_var(char *name)
 179 {
 180         int baselen = 0;
 181
 182         for (;;) {
 183                 int c = get_next_char();
 184                 if (c == EOF)
 185                         return -1;
 186                 if (c == ']')
 187                         return baselen;
 188                 if (isspace(c))
 189                         return get_extended_base_var(name, baselen, c);
 190                 if (!iskeychar(c) && c != '.')
 191                         return -1;
 192                 if (baselen > MAXNAME / 2)
 193                         return -1;
 194                 name[baselen++] = tolower(c);
 195         }
 196 }
 197
 198 static int git_parse_file(config_fn_t fn)
 199 {
 200         int comment = 0;
 201         int baselen = 0;
 202         static char var[MAXNAME];
 203
 204         for (;;) {
 205                 int c = get_next_char();
 206                 if (c == '\n') {
 207                         /* EOF? */
 208                         if (!config_file)
 209                                 return 0;
 210                         comment = 0;
 211                         continue;
 212                 }
 213                 if (comment || isspace(c))
 214                         continue;
 215                 if (c == '#' || c == ';') {
 216                         comment = 1;
 217                         continue;
 218                 }
 219                 if (c == '[') {
 220                         baselen = get_base_var(var);
 221                         if (baselen <= 0)
 222                                 break;
 223                         var[baselen++] = '.';
 224                         var[baselen] = 0;
 225                         continue;
 226                 }
 227                 if (!isalpha(c))
 228                         break;
 229                 var[baselen] = tolower(c);
 230                 if (get_value(fn, var, baselen+1) < 0)
 231                         break;
 232         }
 233         die("bad config file line %d in %s", config_linenr, config_file_name);
 234 }
 235
 236 static unsigned long get_unit_factor(const char *end)
 237 {
 238         if (!*end)
 239                 return 1;
 240         else if (!strcasecmp(end, "k"))
 241                 return 1024;
 242         else if (!strcasecmp(end, "m"))
 243                 return 1024 * 1024;
 244         else if (!strcasecmp(end, "g"))
 245                 return 1024 * 1024 * 1024;
 246         die("unknown unit: '%s'", end);
 247 }
 248
 249 int git_parse_long(const char *value, long *ret)
 250 {
 251         if (value && *value) {
 252                 char *end;
 253                 long val = strtol(value, &end, 0);
 254                 *ret = val * get_unit_factor(end);
 255                 return 1;
 256         }
 257         return 0;
 258 }
 259
 260 int git_parse_ulong(const char *value, unsigned long *ret)
 261 {
 262         if (value && *value) {
 263                 char *end;
 264                 unsigned long val = strtoul(value, &end, 0);
 265                 *ret = val * get_unit_factor(end);
 266                 return 1;
 267         }
 268         return 0;
 269 }
 270
 271 int git_config_int(const char *name, const char *value)
 272 {
 273         long ret;
 274         if (!git_parse_long(value, &ret))
 275                 die("bad config value for '%s' in %s", name, config_file_name);
 276         return ret;
 277 }
 278
 279 unsigned long git_config_ulong(const char *name, const char *value)
 280 {
 281         unsigned long ret;
 282         if (!git_parse_ulong(value, &ret))
 283                 die("bad config value for '%s' in %s", name, config_file_name);
 284         return ret;
 285 }
 286
 287 int git_config_bool(const char *name, const char *value)
 288 {
 289         if (!value)
 290                 return 1;
 291         if (!*value)
 292                 return 0;
 293         if (!strcasecmp(value, "true") || !strcasecmp(value, "yes"))
 294                 return 1;
 295         if (!strcasecmp(value, "false") || !strcasecmp(value, "no"))
 296                 return 0;
 297         return git_config_int(name, value) != 0;
 298 }
 299
 300 int git_default_config(const char *var, const char *value)
 301 {
 302         /* This needs a better name */
 303         if (!strcmp(var, "core.filemode")) {
 304                 trust_executable_bit = git_config_bool(var, value);
 305                 return 0;
 306         }
 307
 308         if (!strcmp(var, "core.quotepath")) {
 309                 quote_path_fully = git_config_bool(var, value);
 310                 return 0;
 311         }
 312
 313         if (!strcmp(var, "core.symlinks")) {
 314                 has_symlinks = git_config_bool(var, value);
 315                 return 0;
 316         }
 317
 318         if (!strcmp(var, "core.bare")) {
 319                 is_bare_repository_cfg = git_config_bool(var, value);
 320                 return 0;
 321         }
 322
 323         if (!strcmp(var, "core.ignorestat")) {
 324                 assume_unchanged = git_config_bool(var, value);
 325                 return 0;
 326         }
 327
 328         if (!strcmp(var, "core.prefersymlinkrefs")) {
 329                 prefer_symlink_refs = git_config_bool(var, value);
 330                 return 0;
 331         }
 332
 333         if (!strcmp(var, "core.logallrefupdates")) {
 334                 log_all_ref_updates = git_config_bool(var, value);
 335                 return 0;
 336         }
 337
 338         if (!strcmp(var, "core.warnambiguousrefs")) {
 339                 warn_ambiguous_refs = git_config_bool(var, value);
 340                 return 0;
 341         }
 342
 343         if (!strcmp(var, "core.loosecompression")) {
 344                 int level = git_config_int(var, value);
 345                 if (level == -1)
 346                         level = Z_DEFAULT_COMPRESSION;
 347                 else if (level < 0 || level > Z_BEST_COMPRESSION)
 348                         die("bad zlib compression level %d", level);
 349                 zlib_compression_level = level;
 350                 zlib_compression_seen = 1;
 351                 return 0;
 352         }
 353
 354         if (!strcmp(var, "core.compression")) {
 355                 int level = git_config_int(var, value);
 356                 if (level == -1)
 357                         level = Z_DEFAULT_COMPRESSION;
 358                 else if (level < 0 || level > Z_BEST_COMPRESSION)
 359                         die("bad zlib compression level %d", level);
 360                 core_compression_level = level;
 361                 core_compression_seen = 1;
 362                 if (!zlib_compression_seen)
 363                         zlib_compression_level = level;
 364                 return 0;
 365         }
 366
 367         if (!strcmp(var, "core.packedgitwindowsize")) {
 368                 int pgsz_x2 = getpagesize() * 2;
 369                 packed_git_window_size = git_config_int(var, value);
 370
 371                 /* This value must be multiple of (pagesize * 2) */
 372                 packed_git_window_size /= pgsz_x2;
 373                 if (packed_git_window_size < 1)
 374                         packed_git_window_size = 1;
 375                 packed_git_window_size *= pgsz_x2;
 376                 return 0;
 377         }
 378
 379         if (!strcmp(var, "core.packedgitlimit")) {
 380                 packed_git_limit = git_config_int(var, value);
 381                 return 0;
 382         }
 383
 384         if (!strcmp(var, "core.deltabasecachelimit")) {
 385                 delta_base_cache_limit = git_config_int(var, value);
 386                 return 0;
 387         }
 388
 389         if (!strcmp(var, "core.autocrlf")) {
 390                 if (value && !strcasecmp(value, "input")) {
 391                         auto_crlf = -1;
 392                         return 0;
 393                 }
 394                 auto_crlf = git_config_bool(var, value);
 395                 return 0;
 396         }
 397
 398         if (!strcmp(var, "user.name")) {
 399                 strlcpy(git_default_name, value, sizeof(git_default_name));
 400                 return 0;
 401         }
 402
 403         if (!strcmp(var, "user.email")) {
 404                 strlcpy(git_default_email, value, sizeof(git_default_email));
 405                 return 0;
 406         }
 407
 408         if (!strcmp(var, "i18n.commitencoding")) {
 409                 git_commit_encoding = xstrdup(value);
 410                 return 0;
 411         }
 412
 413         if (!strcmp(var, "i18n.logoutputencoding")) {
 414                 git_log_output_encoding = xstrdup(value);
 415                 return 0;
 416         }
 417
 418
 419         if (!strcmp(var, "pager.color") || !strcmp(var, "color.pager")) {
 420                 pager_use_color = git_config_bool(var,value);
 421                 return 0;
 422         }
 423
 424         if (!strcmp(var, "core.pager")) {
 425                 pager_program = xstrdup(value);
 426                 return 0;
 427         }
 428
 429         if (!strcmp(var, "core.editor")) {
 430                 editor_program = xstrdup(value);
 431                 return 0;
 432         }
 433
 434         if (!strcmp(var, "core.whitespace")) {
 435                 whitespace_rule_cfg = parse_whitespace_rule(value);
 436                 return 0;
 437         }
 438
 439         /* Add other config variables here and to Documentation/config.txt. */
 440         return 0;
 441 }
 442
 443 int git_config_from_file(config_fn_t fn, const char *filename)
 444 {
 445         int ret;
 446         FILE *f = fopen(filename, "r");
 447
 448         ret = -1;
 449         if (f) {
 450                 config_file = f;
 451                 config_file_name = filename;
 452                 config_linenr = 1;
 453                 ret = git_parse_file(fn);
 454                 fclose(f);
 455                 config_file_name = NULL;
 456         }
 457         return ret;
 458 }
 459
 460 int git_config(config_fn_t fn)
 461 {
 462         int ret = 0;
 463         char *repo_config = NULL;
 464         const char *home = NULL, *filename;
 465
 466         /* $GIT_CONFIG makes git read _only_ the given config file,
 467          * $GIT_CONFIG_LOCAL will make it process it in addition to the
 468          * global config file, the same way it would the per-repository
 469          * config file otherwise. */
 470         filename = getenv(CONFIG_ENVIRONMENT);
 471         if (!filename) {
 472                 if (!access(ETC_GITCONFIG, R_OK))
 473                         ret += git_config_from_file(fn, ETC_GITCONFIG);
 474                 home = getenv("HOME");
 475                 filename = getenv(CONFIG_LOCAL_ENVIRONMENT);
 476                 if (!filename)
 477                         filename = repo_config = xstrdup(git_path("config"));
 478         }
 479
 480         if (home) {
 481                 char *user_config = xstrdup(mkpath("%s/.gitconfig", home));
 482                 if (!access(user_config, R_OK))
 483                         ret = git_config_from_file(fn, user_config);
 484                 free(user_config);
 485         }
 486
 487         ret += git_config_from_file(fn, filename);
 488         free(repo_config);
 489         return ret;
 490 }
 491
 492 /*
 493  * Find all the stuff for git_config_set() below.
 494  */
 495
 496 #define MAX_MATCHES 512
 497
 498 static struct {
 499         int baselen;
 500         char* key;
 501         int do_not_match;
 502         regex_t* value_regex;
 503         int multi_replace;
 504         size_t offset[MAX_MATCHES];
 505         enum { START, SECTION_SEEN, SECTION_END_SEEN, KEY_SEEN } state;
 506         int seen;
 507 } store;
 508
 509 static int matches(const char* key, const char* value)
 510 {
 511         return !strcmp(key, store.key) &&
 512                 (store.value_regex == NULL ||
 513                  (store.do_not_match ^
 514                   !regexec(store.value_regex, value, 0, NULL, 0)));
 515 }
 516
 517 static int store_aux(const char* key, const char* value)
 518 {
 519         const char *ep;
 520         size_t section_len;
 521
 522         switch (store.state) {
 523         case KEY_SEEN:
 524                 if (matches(key, value)) {
 525                         if (store.seen == 1 && store.multi_replace == 0) {
 526                                 fprintf(stderr,
 527                                         "Warning: %s has multiple values\n",
 528                                         key);
 529                         } else if (store.seen >= MAX_MATCHES) {
 530                                 fprintf(stderr, "Too many matches\n");
 531                                 return 1;
 532                         }
 533
 534                         store.offset[store.seen] = ftell(config_file);
 535                         store.seen++;
 536                 }
 537                 break;
 538         case SECTION_SEEN:
 539                 /*
 540                  * What we are looking for is in store.key (both
 541                  * section and var), and its section part is baselen
 542                  * long.  We found key (again, both section and var).
 543                  * We would want to know if this key is in the same
 544                  * section as what we are looking for.  We already
 545                  * know we are in the same section as what should
 546                  * hold store.key.
 547                  */
 548                 ep = strrchr(key, '.');
 549                 section_len = ep - key;
 550
 551                 if ((section_len != store.baselen) ||
 552                     memcmp(key, store.key, section_len+1)) {
 553                         store.state = SECTION_END_SEEN;
 554                         break;
 555                 }
 556
 557                 /*
 558                  * Do not increment matches: this is no match, but we
 559                  * just made sure we are in the desired section.
 560                  */
 561                 store.offset[store.seen] = ftell(config_file);
 562                 /* fallthru */
 563         case SECTION_END_SEEN:
 564         case START:
 565                 if (matches(key, value)) {
 566                         store.offset[store.seen] = ftell(config_file);
 567                         store.state = KEY_SEEN;
 568                         store.seen++;
 569                 } else {
 570                         if (strrchr(key, '.') - key == store.baselen &&
 571                               !strncmp(key, store.key, store.baselen)) {
 572                                         store.state = SECTION_SEEN;
 573                                         store.offset[store.seen] = ftell(config_file);
 574                         }
 575                 }
 576         }
 577         return 0;
 578 }
 579
 580 static int write_error(void)
 581 {
 582         fprintf(stderr, "Failed to write new configuration file\n");
 583
 584         /* Same error code as "failed to rename". */
 585         return 4;
 586 }
 587
 588 static int store_write_section(int fd, const char* key)
 589 {
 590         const char *dot = strchr(key, '.');
 591         int len1 = store.baselen, len2 = -1;
 592
 593         dot = strchr(key, '.');
 594         if (dot) {
 595                 int dotlen = dot - key;
 596                 if (dotlen < len1) {
 597                         len2 = len1 - dotlen - 1;
 598                         len1 = dotlen;
 599                 }
 600         }
 601
 602         if (write_in_full(fd, "[", 1) != 1 ||
 603             write_in_full(fd, key, len1) != len1)
 604                 return 0;
 605         if (len2 >= 0) {
 606                 if (write_in_full(fd, " \"", 2) != 2)
 607                         return 0;
 608                 while (--len2 >= 0) {
 609                         unsigned char c = *++dot;
 610                         if (c == '"')
 611                                 if (write_in_full(fd, "\\", 1) != 1)
 612                                         return 0;
 613                         if (write_in_full(fd, &c, 1) != 1)
 614                                 return 0;
 615                 }
 616                 if (write_in_full(fd, "\"", 1) != 1)
 617                         return 0;
 618         }
 619         if (write_in_full(fd, "]\n", 2) != 2)
 620                 return 0;
 621
 622         return 1;
 623 }
 624
 625 static int store_write_pair(int fd, const char* key, const char* value)
 626 {
 627         int i;
 628         int length = strlen(key+store.baselen+1);
 629         int quote = 0;
 630
 631         /* Check to see if the value needs to be quoted. */
 632         if (value[0] == ' ')
 633                 quote = 1;
 634         for (i = 0; value[i]; i++)
 635                 if (value[i] == ';' || value[i] == '#')
 636                         quote = 1;
 637         if (value[i-1] == ' ')
 638                 quote = 1;
 639
 640         if (write_in_full(fd, "\t", 1) != 1 ||
 641             write_in_full(fd, key+store.baselen+1, length) != length ||
 642             write_in_full(fd, " = ", 3) != 3)
 643                 return 0;
 644         if (quote && write_in_full(fd, "\"", 1) != 1)
 645                 return 0;
 646         for (i = 0; value[i]; i++)
 647                 switch (value[i]) {
 648                 case '\n':
 649                         if (write_in_full(fd, "\\n", 2) != 2)
 650                                 return 0;
 651                         break;
 652                 case '\t':
 653                         if (write_in_full(fd, "\\t", 2) != 2)
 654                                 return 0;
 655                         break;
 656                 case '"':
 657                 case '\\':
 658                         if (write_in_full(fd, "\\", 1) != 1)
 659                                 return 0;
 660                 default:
 661                         if (write_in_full(fd, value+i, 1) != 1)
 662                                 return 0;
 663                         break;
 664                 }
 665         if (quote && write_in_full(fd, "\"", 1) != 1)
 666                 return 0;
 667         if (write_in_full(fd, "\n", 1) != 1)
 668                 return 0;
 669         return 1;
 670 }
 671
 672 static ssize_t find_beginning_of_line(const char* contents, size_t size,
 673         size_t offset_, int* found_bracket)
 674 {
 675         size_t equal_offset = size, bracket_offset = size;
 676         ssize_t offset;
 677
 678         for (offset = offset_-2; offset > 0
 679                         && contents[offset] != '\n'; offset--)
 680                 switch (contents[offset]) {
 681                         case '=': equal_offset = offset; break;
 682                         case ']': bracket_offset = offset; break;
 683                 }
 684         if (bracket_offset < equal_offset) {
 685                 *found_bracket = 1;
 686                 offset = bracket_offset+1;
 687         } else
 688                 offset++;
 689
 690         return offset;
 691 }
 692
 693 int git_config_set(const char* key, const char* value)
 694 {
 695         return git_config_set_multivar(key, value, NULL, 0);
 696 }
 697
 698 /*
 699  * If value==NULL, unset in (remove from) config,
 700  * if value_regex!=NULL, disregard key/value pairs where value does not match.
 701  * if multi_replace==0, nothing, or only one matching key/value is replaced,
 702  *     else all matching key/values (regardless how many) are removed,
 703  *     before the new pair is written.
 704  *
 705  * Returns 0 on success.
 706  *
 707  * This function does this:
 708  *
 709  * - it locks the config file by creating ".git/config.lock"
 710  *
 711  * - it then parses the config using store_aux() as validator to find
 712  *   the position on the key/value pair to replace. If it is to be unset,
 713  *   it must be found exactly once.
 714  *
 715  * - the config file is mmap()ed and the part before the match (if any) is
 716  *   written to the lock file, then the changed part and the rest.
 717  *
 718  * - the config file is removed and the lock file rename()d to it.
 719  *
 720  */
 721 int git_config_set_multivar(const char* key, const char* value,
 722         const char* value_regex, int multi_replace)
 723 {
 724         int i, dot;
 725         int fd = -1, in_fd;
 726         int ret;
 727         char* config_filename;
 728         struct lock_file *lock = NULL;
 729         const char* last_dot = strrchr(key, '.');
 730
 731         config_filename = getenv(CONFIG_ENVIRONMENT);
 732         if (!config_filename) {
 733                 config_filename = getenv(CONFIG_LOCAL_ENVIRONMENT);
 734                 if (!config_filename)
 735                         config_filename  = git_path("config");
 736         }
 737         config_filename = xstrdup(config_filename);
 738
 739         /*
 740          * Since "key" actually contains the section name and the real
 741          * key name separated by a dot, we have to know where the dot is.
 742          */
 743
 744         if (last_dot == NULL) {
 745                 fprintf(stderr, "key does not contain a section: %s\n", key);
 746                 ret = 2;
 747                 goto out_free;
 748         }
 749         store.baselen = last_dot - key;
 750
 751         store.multi_replace = multi_replace;
 752
 753         /*
 754          * Validate the key and while at it, lower case it for matching.
 755          */
 756         store.key = xmalloc(strlen(key) + 1);
 757         dot = 0;
 758         for (i = 0; key[i]; i++) {
 759                 unsigned char c = key[i];
 760                 if (c == '.')
 761                         dot = 1;
 762                 /* Leave the extended basename untouched.. */
 763                 if (!dot || i > store.baselen) {
 764                         if (!iskeychar(c) || (i == store.baselen+1 && !isalpha(c))) {
 765                                 fprintf(stderr, "invalid key: %s\n", key);
 766                                 free(store.key);
 767                                 ret = 1;
 768                                 goto out_free;
 769                         }
 770                         c = tolower(c);
 771                 } else if (c == '\n') {
 772                         fprintf(stderr, "invalid key (newline): %s\n", key);
 773                         free(store.key);
 774                         ret = 1;
 775                         goto out_free;
 776                 }
 777                 store.key[i] = c;
 778         }
 779         store.key[i] = 0;
 780
 781         /*
 782          * The lock serves a purpose in addition to locking: the new
 783          * contents of .git/config will be written into it.
 784          */
 785         lock = xcalloc(sizeof(struct lock_file), 1);
 786         fd = hold_lock_file_for_update(lock, config_filename, 0);
 787         if (fd < 0) {
 788                 fprintf(stderr, "could not lock config file\n");
 789                 free(store.key);
 790                 ret = -1;
 791                 goto out_free;
 792         }
 793
 794         /*
 795          * If .git/config does not exist yet, write a minimal version.
 796          */
 797         in_fd = open(config_filename, O_RDONLY);
 798         if ( in_fd < 0 ) {
 799                 free(store.key);
 800
 801                 if ( ENOENT != errno ) {
 802                         error("opening %s: %s", config_filename,
 803                               strerror(errno));
 804                         ret = 3; /* same as "invalid config file" */
 805                         goto out_free;
 806                 }
 807                 /* if nothing to unset, error out */
 808                 if (value == NULL) {
 809                         ret = 5;
 810                         goto out_free;
 811                 }
 812
 813                 store.key = (char*)key;
 814                 if (!store_write_section(fd, key) ||
 815                     !store_write_pair(fd, key, value))
 816                         goto write_err_out;
 817         } else {
 818                 struct stat st;
 819                 char* contents;
 820                 size_t contents_sz, copy_begin, copy_end;
 821                 int i, new_line = 0;
 822
 823                 if (value_regex == NULL)
 824                         store.value_regex = NULL;
 825                 else {
 826                         if (value_regex[0] == '!') {
 827                                 store.do_not_match = 1;
 828                                 value_regex++;
 829                         } else
 830                                 store.do_not_match = 0;
 831
 832                         store.value_regex = (regex_t*)xmalloc(sizeof(regex_t));
 833                         if (regcomp(store.value_regex, value_regex,
 834                                         REG_EXTENDED)) {
 835                                 fprintf(stderr, "Invalid pattern: %s\n",
 836                                         value_regex);
 837                                 free(store.value_regex);
 838                                 ret = 6;
 839                                 goto out_free;
 840                         }
 841                 }
 842
 843                 store.offset[0] = 0;
 844                 store.state = START;
 845                 store.seen = 0;
 846
 847                 /*
 848                  * After this, store.offset will contain the *end* offset
 849                  * of the last match, or remain at 0 if no match was found.
 850                  * As a side effect, we make sure to transform only a valid
 851                  * existing config file.
 852                  */
 853                 if (git_config_from_file(store_aux, config_filename)) {
 854                         fprintf(stderr, "invalid config file\n");
 855                         free(store.key);
 856                         if (store.value_regex != NULL) {
 857                                 regfree(store.value_regex);
 858                                 free(store.value_regex);
 859                         }
 860                         ret = 3;
 861                         goto out_free;
 862                 }
 863
 864                 free(store.key);
 865                 if (store.value_regex != NULL) {
 866                         regfree(store.value_regex);
 867                         free(store.value_regex);
 868                 }
 869
 870                 /* if nothing to unset, or too many matches, error out */
 871                 if ((store.seen == 0 && value == NULL) ||
 872                                 (store.seen > 1 && multi_replace == 0)) {
 873                         ret = 5;
 874                         goto out_free;
 875                 }
 876
 877                 fstat(in_fd, &st);
 878                 contents_sz = xsize_t(st.st_size);
 879                 contents = xmmap(NULL, contents_sz, PROT_READ,
 880                         MAP_PRIVATE, in_fd, 0);
 881                 close(in_fd);
 882
 883                 if (store.seen == 0)
 884                         store.seen = 1;
 885
 886                 for (i = 0, copy_begin = 0; i < store.seen; i++) {
 887                         if (store.offset[i] == 0) {
 888                                 store.offset[i] = copy_end = contents_sz;
 889                         } else if (store.state != KEY_SEEN) {
 890                                 copy_end = store.offset[i];
 891                         } else
 892                                 copy_end = find_beginning_of_line(
 893                                         contents, contents_sz,
 894                                         store.offset[i]-2, &new_line);
 895
 896                         /* write the first part of the config */
 897                         if (copy_end > copy_begin) {
 898                                 if (write_in_full(fd, contents + copy_begin,
 899                                                   copy_end - copy_begin) <
 900                                     copy_end - copy_begin)
 901                                         goto write_err_out;
 902                                 if (new_line &&
 903                                     write_in_full(fd, "\n", 1) != 1)
 904                                         goto write_err_out;
 905                         }
 906                         copy_begin = store.offset[i];
 907                 }
 908
 909                 /* write the pair (value == NULL means unset) */
 910                 if (value != NULL) {
 911                         if (store.state == START) {
 912                                 if (!store_write_section(fd, key))
 913                                         goto write_err_out;
 914                         }
 915                         if (!store_write_pair(fd, key, value))
 916                                 goto write_err_out;
 917                 }
 918
 919                 /* write the rest of the config */
 920                 if (copy_begin < contents_sz)
 921                         if (write_in_full(fd, contents + copy_begin,
 922                                           contents_sz - copy_begin) <
 923                             contents_sz - copy_begin)
 924                                 goto write_err_out;
 925
 926                 munmap(contents, contents_sz);
 927         }
 928
 929         if (close(fd) || commit_lock_file(lock) < 0) {
 930                 fprintf(stderr, "Cannot commit config file!\n");
 931                 ret = 4;
 932                 goto out_free;
 933         }
 934
 935         /* fd is closed, so don't try to close it below. */
 936         fd = -1;
 937         /*
 938          * lock is committed, so don't try to roll it back below.
 939          * NOTE: Since lockfile.c keeps a linked list of all created
 940          * lock_file structures, it isn't safe to free(lock).  It's
 941          * better to just leave it hanging around.
 942          */
 943         lock = NULL;
 944         ret = 0;
 945
 946 out_free:
 947         if (0 <= fd)
 948                 close(fd);
 949         if (lock)
 950                 rollback_lock_file(lock);
 951         free(config_filename);
 952         return ret;
 953
 954 write_err_out:
 955         ret = write_error();
 956         goto out_free;
 957
 958 }
 959
 960 static int section_name_match (const char *buf, const char *name)
 961 {
 962         int i = 0, j = 0, dot = 0;
 963         for (; buf[i] && buf[i] != ']'; i++) {
 964                 if (!dot && isspace(buf[i])) {
 965                         dot = 1;
 966                         if (name[j++] != '.')
 967                                 break;
 968                         for (i++; isspace(buf[i]); i++)
 969                                 ; /* do nothing */
 970                         if (buf[i] != '"')
 971                                 break;
 972                         continue;
 973                 }
 974                 if (buf[i] == '\\' && dot)
 975                         i++;
 976                 else if (buf[i] == '"' && dot) {
 977                         for (i++; isspace(buf[i]); i++)
 978                                 ; /* do_nothing */
 979                         break;
 980                 }
 981                 if (buf[i] != name[j++])
 982                         break;
 983         }
 984         return (buf[i] == ']' && name[j] == 0);
 985 }
 986
 987 /* if new_name == NULL, the section is removed instead */
 988 int git_config_rename_section(const char *old_name, const char *new_name)
 989 {
 990         int ret = 0, remove = 0;
 991         char *config_filename;
 992         struct lock_file *lock = xcalloc(sizeof(struct lock_file), 1);
 993         int out_fd;
 994         char buf[1024];
 995
 996         config_filename = getenv(CONFIG_ENVIRONMENT);
 997         if (!config_filename) {
 998                 config_filename = getenv(CONFIG_LOCAL_ENVIRONMENT);
 999                 if (!config_filename)
1000                         config_filename  = git_path("config");
1001         }
1002         config_filename = xstrdup(config_filename);
1003         out_fd = hold_lock_file_for_update(lock, config_filename, 0);
1004         if (out_fd < 0) {
1005                 ret = error("Could not lock config file!");
1006                 goto out;
1007         }
1008
1009         if (!(config_file = fopen(config_filename, "rb"))) {
1010                 /* no config file means nothing to rename, no error */
1011                 goto unlock_and_out;
1012         }
1013
1014         while (fgets(buf, sizeof(buf), config_file)) {
1015                 int i;
1016                 int length;
1017                 for (i = 0; buf[i] && isspace(buf[i]); i++)
1018                         ; /* do nothing */
1019                 if (buf[i] == '[') {
1020                         /* it's a section */
1021                         if (section_name_match (&buf[i+1], old_name)) {
1022                                 ret++;
1023                                 if (new_name == NULL) {
1024                                         remove = 1;
1025                                         continue;
1026                                 }
1027                                 store.baselen = strlen(new_name);
1028                                 if (!store_write_section(out_fd, new_name)) {
1029                                         ret = write_error();
1030                                         goto out;
1031                                 }
1032                                 continue;
1033                         }
1034                         remove = 0;
1035                 }
1036                 if (remove)
1037                         continue;
1038                 length = strlen(buf);
1039                 if (write_in_full(out_fd, buf, length) != length) {
1040                         ret = write_error();
1041                         goto out;
1042                 }
1043         }
1044         fclose(config_file);
1045  unlock_and_out:
1046         if (close(out_fd) || commit_lock_file(lock) < 0)
1047                         ret = error("Cannot commit config file!");
1048  out:
1049         free(config_filename);
1050         return ret;
1051 }