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