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