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