src/bconfig/conf.dir/confdata.c

   1 /*
   2  * Copyright (C) 2002 Roman Zippel <zippel@linux-m68k.org>
   3  * Released under the terms of the GNU GPL v2.0.
   4  */
   5
   6 #include <sys/stat.h>
   7 #include <ctype.h>
   8 #include <errno.h>
   9 #include <fcntl.h>
  10 #include <stdarg.h>
  11 #include <stdio.h>
  12 #include <stdlib.h>
  13 #include <string.h>
  14 #include <time.h>
  15 #include <unistd.h>
  16 #include <libgen.h>
  17
  18 #include "lkglob.h"
  19
  20 struct conf_printer {
  21         void (*print_symbol)(FILE *, struct symbol *, const char *, void *);
  22         void (*print_comment)(FILE *, const char *, void *);
  23 };
  24
  25 static void conf_warning(const char *fmt, ...)
  26         __attribute__ ((format (printf, 1, 2)));
  27
  28 static void conf_message(const char *fmt, ...)
  29         __attribute__ ((format (printf, 1, 2)));
  30
  31 static const char *conf_filename;
  32 static int conf_lineno, conf_warnings;
  33
  34 const char conf_defname[] = ".defconfig";
  35
  36 static void conf_warning(const char *fmt, ...)
  37 {
  38         va_list ap;
  39         va_start(ap, fmt);
  40         fprintf(stderr, "%s:%d:warning: ", conf_filename, conf_lineno);
  41         vfprintf(stderr, fmt, ap);
  42         fprintf(stderr, "\n");
  43         va_end(ap);
  44         conf_warnings++;
  45 }
  46
  47 static void conf_default_message_callback(const char *fmt, va_list ap)
  48 {
  49         printf("#\n# ");
  50         vprintf(fmt, ap);
  51         printf("\n#\n");
  52 }
  53
  54 static void (*conf_message_callback) (const char *fmt, va_list ap) =
  55         conf_default_message_callback;
  56 void conf_set_message_callback(void (*fn) (const char *fmt, va_list ap))
  57 {
  58         conf_message_callback = fn;
  59 }
  60
  61 static void conf_message(const char *fmt, ...)
  62 {
  63         va_list ap;
  64
  65         va_start(ap, fmt);
  66         if (conf_message_callback)
  67                 conf_message_callback(fmt, ap);
  68         va_end(ap);
  69 }
  70
  71 const char *conf_get_configname(void)
  72 {
  73         char *name = getenv("BR2_CONFIG");
  74
  75         return name ? name : ".config";
  76 }
  77
  78 const char *conf_get_autoconfig_name(void)
  79 {
  80         return getenv("KCONFIG_AUTOCONFIG");
  81 }
  82
  83 static char *conf_expand_value(const char *in)
  84 {
  85         struct symbol *sym;
  86         const char *src;
  87         static char res_value[SYMBOL_MAXLENGTH];
  88         char *dst, name[SYMBOL_MAXLENGTH];
  89
  90         res_value[0] = 0;
  91         dst = name;
  92         while ((src = strchr(in, '$'))) {
  93                 strncat(res_value, in, src - in);
  94                 src++;
  95                 dst = name;
  96                 while (isalnum(*src) || *src == '_')
  97                         *dst++ = *src++;
  98                 *dst = 0;
  99                 sym = sym_lookup(name, 0);
 100                 sym_calc_value(sym);
 101                 strcat(res_value, sym_get_string_value(sym));
 102                 in = src;
 103         }
 104         strcat(res_value, in);
 105
 106         return res_value;
 107 }
 108
 109 char *conf_get_default_confname(void)
 110 {
 111         struct stat buf;
 112         static char fullname[PATH_MAX+1];
 113         char *env, *name;
 114
 115         name = conf_expand_value(conf_defname);
 116         env = getenv(SRCTREE);
 117         if (env) {
 118                 sprintf(fullname, "%s/%s", env, name);
 119                 if (!stat(fullname, &buf))
 120                         return fullname;
 121         }
 122         return name;
 123 }
 124
 125 static int conf_set_sym_val(struct symbol *sym, int def, int def_flags, char *p)
 126 {
 127         char *p2;
 128
 129         switch (sym->type) {
 130         case S_TRISTATE:
 131                 if (p[0] == 'm') {
 132                         sym->def[def].tri = mod;
 133                         sym->flags |= def_flags;
 134                         break;
 135                 }
 136                 /* fall through */
 137         case S_BOOLEAN:
 138                 if (p[0] == 'y') {
 139                         sym->def[def].tri = yes;
 140                         sym->flags |= def_flags;
 141                         break;
 142                 }
 143                 if (p[0] == 'n') {
 144                         sym->def[def].tri = no;
 145                         sym->flags |= def_flags;
 146                         break;
 147                 }
 148                 if (def != S_DEF_AUTO)
 149                         conf_warning("symbol value '%s' invalid for %s",
 150                                      p, sym->name);
 151                 return 1;
 152         case S_OTHER:
 153                 if (*p != '"') {
 154                         for (p2 = p; *p2 && !isspace(*p2); p2++)
 155                                 ;
 156                         sym->type = S_STRING;
 157                         goto done;
 158                 }
 159                 /* fall through */
 160         case S_STRING:
 161                 if (*p++ != '"')
 162                         break;
 163                 for (p2 = p; (p2 = strpbrk(p2, "\"\\")); p2++) {
 164                         if (*p2 == '"') {
 165                                 *p2 = 0;
 166                                 break;
 167                         }
 168                         memmove(p2, p2 + 1, strlen(p2));
 169                 }
 170                 if (!p2) {
 171                         if (def != S_DEF_AUTO)
 172                                 conf_warning("invalid string found");
 173                         return 1;
 174                 }
 175                 /* fall through */
 176         case S_INT:
 177         case S_HEX:
 178         done:
 179                 if (sym_string_valid(sym, p)) {
 180                         sym->def[def].val = xstrdup(p);
 181                         sym->flags |= def_flags;
 182                 } else {
 183                         if (def != S_DEF_AUTO)
 184                                 conf_warning("symbol value '%s' invalid for %s",
 185                                              p, sym->name);
 186                         return 1;
 187                 }
 188                 break;
 189         default:
 190                 ;
 191         }
 192         return 0;
 193 }
 194
 195 #define LINE_GROWTH 16
 196 static int add_byte(int c, char **lineptr, size_t slen, size_t *n)
 197 {
 198         char *nline;
 199         size_t new_size = slen + 1;
 200         if (new_size > *n) {
 201                 new_size += LINE_GROWTH - 1;
 202                 new_size *= 2;
 203                 nline = xrealloc(*lineptr, new_size);
 204                 if (!nline)
 205                         return -1;
 206
 207                 *lineptr = nline;
 208                 *n = new_size;
 209         }
 210
 211         (*lineptr)[slen] = c;
 212
 213         return 0;
 214 }
 215
 216 static ssize_t compat_getline(char **lineptr, size_t *n, FILE *stream)
 217 {
 218         char *line = *lineptr;
 219         size_t slen = 0;
 220
 221         for (;;) {
 222                 int c = getc(stream);
 223
 224                 switch (c) {
 225                 case '\n':
 226                         if (add_byte(c, &line, slen, n) < 0)
 227                                 goto e_out;
 228                         slen++;
 229                         /* fall through */
 230                 case EOF:
 231                         if (add_byte('\0', &line, slen, n) < 0)
 232                                 goto e_out;
 233                         *lineptr = line;
 234                         if (slen == 0)
 235                                 return -1;
 236                         return slen;
 237                 default:
 238                         if (add_byte(c, &line, slen, n) < 0)
 239                                 goto e_out;
 240                         slen++;
 241                 }
 242         }
 243
 244 e_out:
 245         line[slen-1] = '\0';
 246         *lineptr = line;
 247         return -1;
 248 }
 249
 250 int conf_read_simple(const char *name, int def)
 251 {
 252         FILE *in = NULL;
 253         char   *line = NULL;
 254         size_t  line_asize = 0;
 255         char *p, *p2;
 256         struct symbol *sym;
 257         int i, def_flags;
 258
 259         if (name) {
 260                 in = zconf_fopen(name);
 261         } else {
 262                 struct property *prop;
 263
 264                 name = conf_get_configname();
 265                 in = zconf_fopen(name);
 266                 if (in)
 267                         goto load;
 268                 sym_add_change_count(1);
 269                 if (!sym_defconfig_list)
 270                         return 1;
 271
 272                 for_all_defaults(sym_defconfig_list, prop) {
 273                         if (expr_calc_value(prop->visible.expr) == no ||
 274                             prop->expr->type != E_SYMBOL)
 275                                 continue;
 276                         name = conf_expand_value(prop->expr->left.sym->name);
 277                         in = zconf_fopen(name);
 278                         if (in) {
 279                                 conf_message(_("using defaults found in %s"),
 280                                          name);
 281                                 goto load;
 282                         }
 283                 }
 284         }
 285         if (!in)
 286                 return 1;
 287
 288 load:
 289         conf_filename = name;
 290         conf_lineno = 0;
 291         conf_warnings = 0;
 292
 293         def_flags = SYMBOL_DEF << def;
 294         for_all_symbols(i, sym) {
 295                 sym->flags |= SYMBOL_CHANGED;
 296                 sym->flags &= ~(def_flags|SYMBOL_VALID);
 297                 if (sym_is_choice(sym))
 298                         sym->flags |= def_flags;
 299                 switch (sym->type) {
 300                 case S_INT:
 301                 case S_HEX:
 302                 case S_STRING:
 303                         if (sym->def[def].val)
 304                                 free(sym->def[def].val);
 305                         /* fall through */
 306                 default:
 307                         sym->def[def].val = NULL;
 308                         sym->def[def].tri = no;
 309                 }
 310         }
 311
 312         while (compat_getline(&line, &line_asize, in) != -1) {
 313                 conf_lineno++;
 314                 sym = NULL;
 315                 if (line[0] == '#') {
 316                         if (memcmp(line + 2, CONFIG_, strlen(CONFIG_)))
 317                                 continue;
 318                         p = strchr(line + 2 + strlen(CONFIG_), ' ');
 319                         if (!p)
 320                                 continue;
 321                         *p++ = 0;
 322                         if (strncmp(p, "is not set", 10))
 323                                 continue;
 324                         if (def == S_DEF_USER) {
 325                                 sym = sym_find(line + 2 + strlen(CONFIG_));
 326                                 if (!sym) {
 327                                         sym_add_change_count(1);
 328                                         goto setsym;
 329                                 }
 330                         } else {
 331                                 sym = sym_lookup(line + 2 + strlen(CONFIG_), 0);
 332                                 if (sym->type == S_UNKNOWN)
 333                                         sym->type = S_BOOLEAN;
 334                         }
 335                         if (sym->flags & def_flags) {
 336                                 conf_warning("override: reassigning to symbol %s", sym->name);
 337                         }
 338                         switch (sym->type) {
 339                         case S_BOOLEAN:
 340                         case S_TRISTATE:
 341                                 sym->def[def].tri = no;
 342                                 sym->flags |= def_flags;
 343                                 break;
 344                         default:
 345                                 ;
 346                         }
 347                 } else if (memcmp(line, CONFIG_, strlen(CONFIG_)) == 0) {
 348                         p = strchr(line + strlen(CONFIG_), '=');
 349                         if (!p)
 350                                 continue;
 351                         *p++ = 0;
 352                         p2 = strchr(p, '\n');
 353                         if (p2) {
 354                                 *p2-- = 0;
 355                                 if (*p2 == '\r')
 356                                         *p2 = 0;
 357                         }
 358                         if (def == S_DEF_USER) {
 359                                 sym = sym_find(line + strlen(CONFIG_));
 360                                 if (!sym) {
 361                                         sym_add_change_count(1);
 362                                         goto setsym;
 363                                 }
 364                         } else {
 365                                 sym = sym_lookup(line + strlen(CONFIG_), 0);
 366                                 if (sym->type == S_UNKNOWN)
 367                                         sym->type = S_OTHER;
 368                         }
 369                         if (sym->flags & def_flags) {
 370                                 conf_warning("override: reassigning to symbol %s", sym->name);
 371                         }
 372                         if (conf_set_sym_val(sym, def, def_flags, p))
 373                                 continue;
 374                 } else {
 375                         if (line[0] != '\r' && line[0] != '\n')
 376                                 conf_warning("unexpected data: %.*s",
 377                                              (int)strcspn(line, "\r\n"), line);
 378
 379                         continue;
 380                 }
 381 setsym:
 382                 if (sym && sym_is_choice_value(sym)) {
 383                         struct symbol *cs = prop_get_symbol(sym_get_choice_prop(sym));
 384                         switch (sym->def[def].tri) {
 385                         case no:
 386                                 break;
 387                         case mod:
 388                                 if (cs->def[def].tri == yes) {
 389                                         conf_warning("%s creates inconsistent choice state", sym->name);
 390                                         cs->flags &= ~def_flags;
 391                                 }
 392                                 break;
 393                         case yes:
 394                                 if (cs->def[def].tri != no)
 395                                         conf_warning("override: %s changes choice state", sym->name);
 396                                 cs->def[def].val = sym;
 397                                 break;
 398                         }
 399                         cs->def[def].tri = EXPR_OR(cs->def[def].tri, sym->def[def].tri);
 400                 }
 401         }
 402         free(line);
 403         fclose(in);
 404         return 0;
 405 }
 406
 407 int conf_read(const char *name)
 408 {
 409         struct symbol *sym;
 410         int conf_unsaved = 0;
 411         int i;
 412
 413         sym_set_change_count(0);
 414
 415         if (conf_read_simple(name, S_DEF_USER)) {
 416                 sym_calc_value(modules_sym);
 417                 return 1;
 418         }
 419
 420         sym_calc_value(modules_sym);
 421
 422         for_all_symbols(i, sym) {
 423                 sym_calc_value(sym);
 424                 if (sym_is_choice(sym) || (sym->flags & SYMBOL_AUTO))
 425                         continue;
 426                 if (sym_has_value(sym) && (sym->flags & SYMBOL_WRITE)) {
 427                         /* check that calculated value agrees with saved value */
 428                         switch (sym->type) {
 429                         case S_BOOLEAN:
 430                         case S_TRISTATE:
 431                                 if (sym->def[S_DEF_USER].tri != sym_get_tristate_value(sym))
 432                                         break;
 433                                 if (!sym_is_choice(sym))
 434                                         continue;
 435                                 /* fall through */
 436                         default:
 437                                 if (!strcmp(sym->curr.val, sym->def[S_DEF_USER].val))
 438                                         continue;
 439                                 break;
 440                         }
 441                 } else if (!sym_has_value(sym) && !(sym->flags & SYMBOL_WRITE))
 442                         /* no previous value and not saved */
 443                         continue;
 444                 conf_unsaved++;
 445                 /* maybe print value in verbose mode... */
 446         }
 447
 448         for_all_symbols(i, sym) {
 449                 if (sym_has_value(sym) && !sym_is_choice_value(sym)) {
 450                         /* Reset values of generates values, so they'll appear
 451                          * as new, if they should become visible, but that
 452                          * doesn't quite work if the Kconfig and the saved
 453                          * configuration disagree.
 454                          */
 455                         if (sym->visible == no && !conf_unsaved)
 456                                 sym->flags &= ~SYMBOL_DEF_USER;
 457                         switch (sym->type) {
 458                         case S_STRING:
 459                         case S_INT:
 460                         case S_HEX:
 461                                 /* Reset a string value if it's out of range */
 462                                 if (sym_string_within_range(sym, sym->def[S_DEF_USER].val))
 463                                         break;
 464                                 sym->flags &= ~(SYMBOL_VALID|SYMBOL_DEF_USER);
 465                                 conf_unsaved++;
 466                                 break;
 467                         default:
 468                                 break;
 469                         }
 470                 }
 471         }
 472
 473         sym_add_change_count(conf_warnings || conf_unsaved);
 474
 475         return 0;
 476 }
 477
 478 /*
 479  * Kconfig configuration printer
 480  *
 481  * This printer is used when generating the resulting configuration after
 482  * kconfig invocation and `defconfig' files. Unset symbol might be omitted by
 483  * passing a non-NULL argument to the printer.
 484  *
 485  */
 486 static void
 487 kconfig_print_symbol(FILE *fp, struct symbol *sym, const char *value, void *arg)
 488 {
 489
 490         switch (sym->type) {
 491         case S_BOOLEAN:
 492         case S_TRISTATE:
 493                 if (*value == 'n') {
 494                         bool skip_unset = (arg != NULL);
 495
 496                         if (!skip_unset)
 497                                 fprintf(fp, "# %s%s is not set\n",
 498                                     CONFIG_, sym->name);
 499                         return;
 500                 }
 501                 break;
 502         default:
 503                 break;
 504         }
 505
 506         fprintf(fp, "%s%s=%s\n", CONFIG_, sym->name, value);
 507 }
 508
 509 static void
 510 kconfig_print_comment(FILE *fp, const char *value, void *arg)
 511 {
 512         const char *p = value;
 513         size_t l;
 514
 515         for (;;) {
 516                 l = strcspn(p, "\n");
 517                 fprintf(fp, "#");
 518                 if (l) {
 519                         fprintf(fp, " ");
 520                         xfwrite(p, l, 1, fp);
 521                         p += l;
 522                 }
 523                 fprintf(fp, "\n");
 524                 if (*p++ == '\0')
 525                         break;
 526         }
 527 }
 528
 529 static struct conf_printer kconfig_printer_cb =
 530 {
 531         .print_symbol = kconfig_print_symbol,
 532         .print_comment = kconfig_print_comment,
 533 };
 534
 535 /*
 536  * Header printer
 537  *
 538  * This printer is used when generating the `include/generated/autoconf.h' file.
 539  */
 540 static void
 541 header_print_symbol(FILE *fp, struct symbol *sym, const char *value, void *arg)
 542 {
 543
 544         switch (sym->type) {
 545         case S_BOOLEAN:
 546         case S_TRISTATE: {
 547                 const char *suffix = "";
 548
 549                 switch (*value) {
 550                 case 'n':
 551                         break;
 552                 case 'm':
 553                         suffix = "_MODULE";
 554                         /* fall through */
 555                 default:
 556                         fprintf(fp, "#define %s%s%s 1\n",
 557                             CONFIG_, sym->name, suffix);
 558                 }
 559                 break;
 560         }
 561         case S_HEX: {
 562                 const char *prefix = "";
 563
 564                 if (value[0] != '0' || (value[1] != 'x' && value[1] != 'X'))
 565                         prefix = "0x";
 566                 fprintf(fp, "#define %s%s %s%s\n",
 567                     CONFIG_, sym->name, prefix, value);
 568                 break;
 569         }
 570         case S_STRING:
 571         case S_INT:
 572                 fprintf(fp, "#define %s%s %s\n",
 573                     CONFIG_, sym->name, value);
 574                 break;
 575         default:
 576                 break;
 577         }
 578
 579 }
 580
 581 static void
 582 header_print_comment(FILE *fp, const char *value, void *arg)
 583 {
 584         const char *p = value;
 585         size_t l;
 586
 587         fprintf(fp, "/*\n");
 588         for (;;) {
 589                 l = strcspn(p, "\n");
 590                 fprintf(fp, " *");
 591                 if (l) {
 592                         fprintf(fp, " ");
 593                         xfwrite(p, l, 1, fp);
 594                         p += l;
 595                 }
 596                 fprintf(fp, "\n");
 597                 if (*p++ == '\0')
 598                         break;
 599         }
 600         fprintf(fp, " */\n");
 601 }
 602
 603 static struct conf_printer header_printer_cb =
 604 {
 605         .print_symbol = header_print_symbol,
 606         .print_comment = header_print_comment,
 607 };
 608
 609 /*
 610  * Tristate printer
 611  *
 612  * This printer is used when generating the `include/config/tristate.conf' file.
 613  */
 614 static void
 615 tristate_print_symbol(FILE *fp, struct symbol *sym, const char *value, void *arg)
 616 {
 617
 618         if (sym->type == S_TRISTATE && *value != 'n')
 619                 fprintf(fp, "%s%s=%c\n", CONFIG_, sym->name, (char)toupper(*value));
 620 }
 621
 622 static struct conf_printer tristate_printer_cb =
 623 {
 624         .print_symbol = tristate_print_symbol,
 625         .print_comment = kconfig_print_comment,
 626 };
 627
 628 static void conf_write_symbol(FILE *fp, struct symbol *sym,
 629                               struct conf_printer *printer, void *printer_arg)
 630 {
 631         const char *str;
 632
 633         switch (sym->type) {
 634         case S_OTHER:
 635         case S_UNKNOWN:
 636                 break;
 637         case S_STRING:
 638                 str = sym_get_string_value(sym);
 639                 str = sym_escape_string_value(str);
 640                 printer->print_symbol(fp, sym, str, printer_arg);
 641                 free((void *)str);
 642                 break;
 643         default:
 644                 str = sym_get_string_value(sym);
 645                 printer->print_symbol(fp, sym, str, printer_arg);
 646         }
 647 }
 648
 649 static void
 650 conf_write_heading(FILE *fp, struct conf_printer *printer, void *printer_arg)
 651 {
 652         char buf[256];
 653
 654         snprintf(buf, sizeof(buf),
 655             "\n"
 656             "Automatically generated file; DO NOT EDIT.\n"
 657             "%s\n",
 658             rootmenu.prompt->text);
 659
 660         printer->print_comment(fp, buf, printer_arg);
 661 }
 662
 663 /*
 664  * Write out a minimal config.
 665  * All values that has default values are skipped as this is redundant.
 666  */
 667 int conf_write_defconfig(const char *filename)
 668 {
 669         struct symbol *sym;
 670         struct menu *menu;
 671         FILE *out;
 672
 673         out = fopen(filename, "w");
 674         if (!out)
 675                 return 1;
 676
 677         sym_clear_all_valid();
 678
 679         /* Traverse all menus to find all relevant symbols */
 680         menu = rootmenu.list;
 681
 682         while (menu != NULL)
 683         {
 684                 sym = menu->sym;
 685                 if (sym == NULL) {
 686                         if (!menu_is_visible(menu))
 687                                 goto next_menu;
 688                 } else if (!sym_is_choice(sym)) {
 689                         sym_calc_value(sym);
 690                         if (!(sym->flags & SYMBOL_WRITE))
 691                                 goto next_menu;
 692                         sym->flags &= ~SYMBOL_WRITE;
 693                         /* If we cannot change the symbol - skip */
 694                         if (!sym_is_changable(sym))
 695                                 goto next_menu;
 696                         /* If symbol equals to default value - skip */
 697                         if (strcmp(sym_get_string_value(sym), sym_get_string_default(sym)) == 0)
 698                                 goto next_menu;
 699
 700                         /*
 701                          * If symbol is a choice value and equals to the
 702                          * default for a choice - skip.
 703                          * But only if value is bool and equal to "y" and
 704                          * choice is not "optional".
 705                          * (If choice is "optional" then all values can be "n")
 706                          */
 707                         if (sym_is_choice_value(sym)) {
 708                                 struct symbol *cs;
 709                                 struct symbol *ds;
 710
 711                                 cs = prop_get_symbol(sym_get_choice_prop(sym));
 712                                 ds = sym_choice_default(cs);
 713                                 if (!sym_is_optional(cs) && sym == ds) {
 714                                         if ((sym->type == S_BOOLEAN) &&
 715                                             sym_get_tristate_value(sym) == yes)
 716                                                 goto next_menu;
 717                                 }
 718                         }
 719                         conf_write_symbol(out, sym, &kconfig_printer_cb, NULL);
 720                 }
 721 next_menu:
 722                 if (menu->list != NULL) {
 723                         menu = menu->list;
 724                 }
 725                 else if (menu->next != NULL) {
 726                         menu = menu->next;
 727                 } else {
 728                         while ((menu = menu->parent)) {
 729                                 if (menu->next != NULL) {
 730                                         menu = menu->next;
 731                                         break;
 732                                 }
 733                         }
 734                 }
 735         }
 736         fclose(out);
 737         return 0;
 738 }
 739
 740 int conf_write(const char *name)
 741 {
 742         FILE *out;
 743         struct symbol *sym;
 744         struct menu *menu;
 745         const char *basename;
 746         const char *str;
 747         char dirname[PATH_MAX+1], tmpname[PATH_MAX+1], newname[PATH_MAX+1];
 748         char *env;
 749
 750         if (!name)
 751                 name = conf_get_configname();
 752
 753         dirname[0] = 0;
 754         if (name && name[0]) {
 755                 struct stat st;
 756                 char *slash;
 757
 758                 if (!stat(name, &st) && S_ISDIR(st.st_mode)) {
 759                         strcpy(dirname, name);
 760                         strcat(dirname, "/");
 761                         basename = conf_get_configname();
 762                 } else if ((slash = strrchr(name, '/'))) {
 763                         int size = slash - name + 1;
 764                         memcpy(dirname, name, size);
 765                         dirname[size] = 0;
 766                         if (slash[1])
 767                                 basename = slash + 1;
 768                         else
 769                                 basename = conf_get_configname();
 770                 } else
 771                         basename = name;
 772         } else
 773                 basename = conf_get_configname();
 774
 775         sprintf(newname, "%s%s", dirname, basename);
 776         env = getenv("KCONFIG_OVERWRITECONFIG");
 777         if (!env || !*env) {
 778                 sprintf(tmpname, "%s.tmpconfig.%d", dirname, (int)getpid());
 779                 out = fopen(tmpname, "w");
 780         } else {
 781                 *tmpname = 0;
 782                 out = fopen(newname, "w");
 783         }
 784         if (!out)
 785                 return 1;
 786
 787         conf_write_heading(out, &kconfig_printer_cb, NULL);
 788
 789         if (!conf_get_changed())
 790                 sym_clear_all_valid();
 791
 792         menu = rootmenu.list;
 793         while (menu) {
 794                 sym = menu->sym;
 795                 if (!sym) {
 796                         if (!menu_is_visible(menu))
 797                                 goto next;
 798                         str = menu_get_prompt(menu);
 799                         fprintf(out, "\n"
 800                                      "#\n"
 801                                      "# %s\n"
 802                                      "#\n", str);
 803                 } else if (!(sym->flags & SYMBOL_CHOICE)) {
 804                         sym_calc_value(sym);
 805                         if (!(sym->flags & SYMBOL_WRITE))
 806                                 goto next;
 807                         sym->flags &= ~SYMBOL_WRITE;
 808
 809                         conf_write_symbol(out, sym, &kconfig_printer_cb, NULL);
 810                 }
 811
 812 next:
 813                 if (menu->list) {
 814                         menu = menu->list;
 815                         continue;
 816                 }
 817                 if (menu->next)
 818                         menu = menu->next;
 819                 else while ((menu = menu->parent)) {
 820                         if (menu->next) {
 821                                 menu = menu->next;
 822                                 break;
 823                         }
 824                 }
 825         }
 826         fclose(out);
 827
 828         if (*tmpname) {
 829                 strcat(dirname, basename);
 830                 strcat(dirname, ".old");
 831                 rename(newname, dirname);
 832                 if (rename(tmpname, newname))
 833                         return 1;
 834         }
 835
 836         conf_message(_("configuration written to %s"), newname);
 837
 838         sym_set_change_count(0);
 839
 840         return 0;
 841 }
 842
 843 static int conf_split_config(void)
 844 {
 845         const char *name;
 846         char path[PATH_MAX+1];
 847         char *opwd, *dir, *_name;
 848         char *s, *d, c;
 849         struct symbol *sym;
 850         struct stat sb;
 851         int res, i, fd;
 852
 853         name = conf_get_autoconfig_name();
 854         conf_read_simple(name, S_DEF_AUTO);
 855         sym_calc_value(modules_sym);
 856
 857         opwd = malloc(256);
 858         _name = strdup(name);
 859         if (opwd == NULL || _name == NULL)
 860                 return 1;
 861         opwd = getcwd(opwd, 256);
 862         dir = dirname(_name);
 863         if (dir == NULL) {
 864                 res = 1;
 865                 goto err;
 866         }
 867         if (chdir(dir)) {
 868                 res = 1;
 869                 goto err;
 870         }
 871
 872         res = 0;
 873         for_all_symbols(i, sym) {
 874                 sym_calc_value(sym);
 875                 if ((sym->flags & SYMBOL_AUTO) || !sym->name)
 876                         continue;
 877                 if (sym->flags & SYMBOL_WRITE) {
 878                         if (sym->flags & SYMBOL_DEF_AUTO) {
 879                                 /*
 880                                  * symbol has old and new value,
 881                                  * so compare them...
 882                                  */
 883                                 switch (sym->type) {
 884                                 case S_BOOLEAN:
 885                                 case S_TRISTATE:
 886                                         if (sym_get_tristate_value(sym) ==
 887                                             sym->def[S_DEF_AUTO].tri)
 888                                                 continue;
 889                                         break;
 890                                 case S_STRING:
 891                                 case S_HEX:
 892                                 case S_INT:
 893                                         if (!strcmp(sym_get_string_value(sym),
 894                                                     sym->def[S_DEF_AUTO].val))
 895                                                 continue;
 896                                         break;
 897                                 default:
 898                                         break;
 899                                 }
 900                         } else {
 901                                 /*
 902                                  * If there is no old value, only 'no' (unset)
 903                                  * is allowed as new value.
 904                                  */
 905                                 switch (sym->type) {
 906                                 case S_BOOLEAN:
 907                                 case S_TRISTATE:
 908                                         if (sym_get_tristate_value(sym) == no)
 909                                                 continue;
 910                                         break;
 911                                 default:
 912                                         break;
 913                                 }
 914                         }
 915                 } else if (!(sym->flags & SYMBOL_DEF_AUTO))
 916                         /* There is neither an old nor a new value. */
 917                         continue;
 918                 /* else
 919                  *      There is an old value, but no new value ('no' (unset)
 920                  *      isn't saved in auto.conf, so the old value is always
 921                  *      different from 'no').
 922                  */
 923
 924                 /* Replace all '_' and append ".h" */
 925                 s = sym->name;
 926                 d = path;
 927                 while ((c = *s++)) {
 928                         c = tolower(c);
 929                         *d++ = (c == '_') ? '/' : c;
 930                 }
 931                 strcpy(d, ".h");
 932
 933                 /* Assume directory path already exists. */
 934                 fd = open(path, O_WRONLY | O_CREAT | O_TRUNC, 0644);
 935                 if (fd == -1) {
 936                         if (errno != ENOENT) {
 937                                 res = 1;
 938                                 break;
 939                         }
 940                         /*
 941                          * Create directory components,
 942                          * unless they exist already.
 943                          */
 944                         d = path;
 945                         while ((d = strchr(d, '/'))) {
 946                                 *d = 0;
 947                                 if (stat(path, &sb) && mkdir(path, 0755)) {
 948                                         res = 1;
 949                                         goto out;
 950                                 }
 951                                 *d++ = '/';
 952                         }
 953                         /* Try it again. */
 954                         fd = open(path, O_WRONLY | O_CREAT | O_TRUNC, 0644);
 955                         if (fd == -1) {
 956                                 res = 1;
 957                                 break;
 958                         }
 959                 }
 960                 close(fd);
 961         }
 962 out:
 963         if (chdir(opwd))
 964                 res = 1;
 965 err:
 966         free(opwd);
 967         free(_name);
 968         return res;
 969 }
 970
 971 int conf_write_autoconf(void)
 972 {
 973         struct symbol *sym;
 974         const char *name;
 975         FILE *out, *tristate, *out_h;
 976         int i;
 977         char dir[PATH_MAX+1], buf[PATH_MAX+1];
 978         char *s;
 979
 980         strcpy(dir, conf_get_configname());
 981         s = strrchr(dir, '/');
 982         if (s)
 983                 s[1] = 0;
 984         else
 985                 dir[0] = 0;
 986
 987         sym_clear_all_valid();
 988
 989         sprintf(buf, "%s.config.cmd", dir);
 990         file_write_dep(buf);
 991
 992         if (conf_split_config())
 993                 return 1;
 994
 995         sprintf(buf, "%s.tmpconfig", dir);
 996         out = fopen(buf, "w");
 997         if (!out)
 998                 return 1;
 999
1000         sprintf(buf, "%s.tmpconfig_tristate", dir);
1001         tristate = fopen(buf, "w");
1002         if (!tristate) {
1003                 fclose(out);
1004                 return 1;
1005         }
1006
1007         sprintf(buf, "%s.tmpconfig.h", dir);
1008         out_h = fopen(buf, "w");
1009         if (!out_h) {
1010                 fclose(out);
1011                 fclose(tristate);
1012                 return 1;
1013         }
1014
1015         conf_write_heading(out, &kconfig_printer_cb, NULL);
1016
1017         conf_write_heading(tristate, &tristate_printer_cb, NULL);
1018
1019         conf_write_heading(out_h, &header_printer_cb, NULL);
1020
1021         for_all_symbols(i, sym) {
1022                 sym_calc_value(sym);
1023                 if (!(sym->flags & SYMBOL_WRITE) || !sym->name)
1024                         continue;
1025
1026                 /* write symbol to auto.conf, tristate and header files */
1027                 conf_write_symbol(out, sym, &kconfig_printer_cb, (void *)1);
1028
1029                 conf_write_symbol(tristate, sym, &tristate_printer_cb, (void *)1);
1030
1031                 conf_write_symbol(out_h, sym, &header_printer_cb, NULL);
1032         }
1033         fclose(out);
1034         fclose(tristate);
1035         fclose(out_h);
1036
1037         name = getenv("KCONFIG_AUTOHEADER");
1038         if (!name)
1039                 name = "include/generated/autoconf.h";
1040         sprintf(buf, "%s.tmpconfig.h", dir);
1041         if (rename(buf, name))
1042                 return 1;
1043         name = getenv("KCONFIG_TRISTATE");
1044         if (!name)
1045                 name = "include/config/tristate.conf";
1046         sprintf(buf, "%s.tmpconfig_tristate", dir);
1047         if (rename(buf, name))
1048                 return 1;
1049         name = conf_get_autoconfig_name();
1050         /*
1051          * This must be the last step, kbuild has a dependency on auto.conf
1052          * and this marks the successful completion of the previous steps.
1053          */
1054         sprintf(buf, "%s.tmpconfig", dir);
1055         if (rename(buf, name))
1056                 return 1;
1057
1058         return 0;
1059 }
1060
1061 static int sym_change_count;
1062 static void (*conf_changed_callback)(void);
1063
1064 void sym_set_change_count(int count)
1065 {
1066         int _sym_change_count = sym_change_count;
1067         sym_change_count = count;
1068         if (conf_changed_callback &&
1069             (bool)_sym_change_count != (bool)count)
1070                 conf_changed_callback();
1071 }
1072
1073 void sym_add_change_count(int count)
1074 {
1075         sym_set_change_count(count + sym_change_count);
1076 }
1077
1078 bool conf_get_changed(void)
1079 {
1080         return sym_change_count;
1081 }
1082
1083 void conf_set_changed_callback(void (*fn)(void))
1084 {
1085         conf_changed_callback = fn;
1086 }
1087
1088 static bool randomize_choice_values(struct symbol *csym)
1089 {
1090         struct property *prop;
1091         struct symbol *sym;
1092         struct expr *e;
1093         int cnt, def;
1094
1095         /*
1096          * If choice is mod then we may have more items selected
1097          * and if no then no-one.
1098          * In both cases stop.
1099          */
1100         if (csym->curr.tri != yes)
1101                 return false;
1102
1103         prop = sym_get_choice_prop(csym);
1104
1105         /* count entries in choice block */
1106         cnt = 0;
1107         expr_list_for_each_sym(prop->expr, e, sym)
1108                 cnt++;
1109
1110         /*
1111          * find a random value and set it to yes,
1112          * set the rest to no so we have only one set
1113          */
1114         def = (rand() % cnt);
1115
1116         cnt = 0;
1117         expr_list_for_each_sym(prop->expr, e, sym) {
1118                 if (def == cnt++) {
1119                         sym->def[S_DEF_USER].tri = yes;
1120                         csym->def[S_DEF_USER].val = sym;
1121                 }
1122                 else {
1123                         sym->def[S_DEF_USER].tri = no;
1124                 }
1125                 sym->flags |= SYMBOL_DEF_USER;
1126                 /* clear VALID to get value calculated */
1127                 sym->flags &= ~SYMBOL_VALID;
1128         }
1129         csym->flags |= SYMBOL_DEF_USER;
1130         /* clear VALID to get value calculated */
1131         csym->flags &= ~(SYMBOL_VALID);
1132
1133         return true;
1134 }
1135
1136 void set_all_choice_values(struct symbol *csym)
1137 {
1138         struct property *prop;
1139         struct symbol *sym;
1140         struct expr *e;
1141
1142         prop = sym_get_choice_prop(csym);
1143
1144         /*
1145          * Set all non-assinged choice values to no
1146          */
1147         expr_list_for_each_sym(prop->expr, e, sym) {
1148                 if (!sym_has_value(sym))
1149                         sym->def[S_DEF_USER].tri = no;
1150         }
1151         csym->flags |= SYMBOL_DEF_USER;
1152         /* clear VALID to get value calculated */
1153         csym->flags &= ~(SYMBOL_VALID | SYMBOL_NEED_SET_CHOICE_VALUES);
1154 }
1155
1156 bool conf_set_all_new_symbols(enum conf_def_mode mode)
1157 {
1158         struct symbol *sym, *csym;
1159         int i, cnt, pby, pty, ptm;      /* pby: probability of bool     = y
1160                                          * pty: probability of tristate = y
1161                                          * ptm: probability of tristate = m
1162                                          */
1163
1164         pby = 50; pty = ptm = 33; /* can't go as the default in switch-case
1165                                    * below, otherwise gcc whines about
1166                                    * -Wmaybe-uninitialized */
1167         if (mode == def_random) {
1168                 int n, p[3];
1169                 char *env = getenv("KCONFIG_PROBABILITY");
1170                 n = 0;
1171                 while( env && *env ) {
1172                         char *endp;
1173                         int tmp = strtol( env, &endp, 10 );
1174                         if( tmp >= 0 && tmp <= 100 ) {
1175                                 p[n++] = tmp;
1176                         } else {
1177                                 errno = ERANGE;
1178                                 perror( "KCONFIG_PROBABILITY" );
1179                                 exit( 1 );
1180                         }
1181                         env = (*endp == ':') ? endp+1 : endp;
1182                         if( n >=3 ) {
1183                                 break;
1184                         }
1185                 }
1186                 switch( n ) {
1187                 case 1:
1188                         pby = p[0]; ptm = pby/2; pty = pby-ptm;
1189                         break;
1190                 case 2:
1191                         pty = p[0]; ptm = p[1]; pby = pty + ptm;
1192                         break;
1193                 case 3:
1194                         pby = p[0]; pty = p[1]; ptm = p[2];
1195                         break;
1196                 }
1197
1198                 if( pty+ptm > 100 ) {
1199                         errno = ERANGE;
1200                         perror( "KCONFIG_PROBABILITY" );
1201                         exit( 1 );
1202                 }
1203         }
1204         bool has_changed = false;
1205
1206         for_all_symbols(i, sym) {
1207                 if (sym_has_value(sym) || (sym->flags & SYMBOL_VALID))
1208                         continue;
1209                 switch (sym_get_type(sym)) {
1210                 case S_BOOLEAN:
1211                 case S_TRISTATE:
1212                         has_changed = true;
1213                         switch (mode) {
1214                         case def_yes:
1215                                 sym->def[S_DEF_USER].tri = yes;
1216                                 break;
1217                         case def_mod:
1218                                 sym->def[S_DEF_USER].tri = mod;
1219                                 break;
1220                         case def_no:
1221                                 if (sym->flags & SYMBOL_ALLNOCONFIG_Y)
1222                                         sym->def[S_DEF_USER].tri = yes;
1223                                 else
1224                                         sym->def[S_DEF_USER].tri = no;
1225                                 break;
1226                         case def_random:
1227                                 sym->def[S_DEF_USER].tri = no;
1228                                 cnt = rand() % 100;
1229                                 if (sym->type == S_TRISTATE) {
1230                                         if (cnt < pty)
1231                                                 sym->def[S_DEF_USER].tri = yes;
1232                                         else if (cnt < (pty+ptm))
1233                                                 sym->def[S_DEF_USER].tri = mod;
1234                                 } else if (cnt < pby)
1235                                         sym->def[S_DEF_USER].tri = yes;
1236                                 break;
1237                         default:
1238                                 continue;
1239                         }
1240                         if (!(sym_is_choice(sym) && mode == def_random))
1241                                 sym->flags |= SYMBOL_DEF_USER;
1242                         break;
1243                 default:
1244                         break;
1245                 }
1246
1247         }
1248
1249         sym_clear_all_valid();
1250
1251         /*
1252          * We have different type of choice blocks.
1253          * If curr.tri equals to mod then we can select several
1254          * choice symbols in one block.
1255          * In this case we do nothing.
1256          * If curr.tri equals yes then only one symbol can be
1257          * selected in a choice block and we set it to yes,
1258          * and the rest to no.
1259          */
1260         if (mode != def_random) {
1261                 for_all_symbols(i, csym) {
1262                         if ((sym_is_choice(csym) && !sym_has_value(csym)) ||
1263                             sym_is_choice_value(csym))
1264                                 csym->flags |= SYMBOL_NEED_SET_CHOICE_VALUES;
1265                 }
1266         }
1267
1268         for_all_symbols(i, csym) {
1269                 if (sym_has_value(csym) || !sym_is_choice(csym))
1270                         continue;
1271
1272                 sym_calc_value(csym);
1273                 if (mode == def_random)
1274                         has_changed = randomize_choice_values(csym);
1275                 else {
1276                         set_all_choice_values(csym);
1277                         has_changed = true;
1278                 }
1279         }
1280
1281         return has_changed;
1282 }