scripts/kconfig/confdata.c

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