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