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