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