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