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