carl9170fw/config/confdata.c

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