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