1 /* 2 * Copyright (C) 2002 Roman Zippel <zippel@linux-m68k.org> 3 * Released under the terms of the GNU GPL v2.0. 4 */ 5 6 #include <sys/stat.h> 7 #include <ctype.h> 8 #include <fcntl.h> 9 #include <stdio.h> 10 #include <stdlib.h> 11 #include <string.h> 12 #include <time.h> 13 #include <unistd.h> 14 15 #define LKC_DIRECT_LINK 16 #include "lkc.h" 17 18 static void conf_warning(const char *fmt, ...) 19 __attribute__ ((format (printf, 1, 2))); 20 21 static const char *conf_filename; 22 static int conf_lineno, conf_warnings, conf_unsaved; 23 24 const char conf_defname[] = "arch/$ARCH/defconfig"; 25 26 static void conf_warning(const char *fmt, ...) 27 { 28 va_list ap; 29 va_start(ap, fmt); 30 fprintf(stderr, "%s:%d:warning: ", conf_filename, conf_lineno); 31 vfprintf(stderr, fmt, ap); 32 fprintf(stderr, "\n"); 33 va_end(ap); 34 conf_warnings++; 35 } 36 37 const char *conf_get_configname(void) 38 { 39 char *name = getenv("KCONFIG_CONFIG"); 40 41 return name ? name : ".config"; 42 } 43 44 const char *conf_get_autoconfig_name(void) 45 { 46 char *name = getenv("KCONFIG_AUTOCONFIG"); 47 48 return name ? name : "include/config/auto.conf"; 49 } 50 51 static char *conf_expand_value(const char *in) 52 { 53 struct symbol *sym; 54 const char *src; 55 static char res_value[SYMBOL_MAXLENGTH]; 56 char *dst, name[SYMBOL_MAXLENGTH]; 57 58 res_value[0] = 0; 59 dst = name; 60 while ((src = strchr(in, '$'))) { 61 strncat(res_value, in, src - in); 62 src++; 63 dst = name; 64 while (isalnum(*src) || *src == '_') 65 *dst++ = *src++; 66 *dst = 0; 67 sym = sym_lookup(name, 0); 68 sym_calc_value(sym); 69 strcat(res_value, sym_get_string_value(sym)); 70 in = src; 71 } 72 strcat(res_value, in); 73 74 return res_value; 75 } 76 77 char *conf_get_default_confname(void) 78 { 79 struct stat buf; 80 static char fullname[PATH_MAX+1]; 81 char *env, *name; 82 83 name = conf_expand_value(conf_defname); 84 env = getenv(SRCTREE); 85 if (env) { 86 sprintf(fullname, "%s/%s", env, name); 87 if (!stat(fullname, &buf)) 88 return fullname; 89 } 90 return name; 91 } 92 93 static int conf_set_sym_val(struct symbol *sym, int def, int def_flags, char *p) 94 { 95 char *p2; 96 97 switch (sym->type) { 98 case S_TRISTATE: 99 if (p[0] == 'm') { 100 sym->def[def].tri = mod; 101 sym->flags |= def_flags; 102 break; 103 } 104 case S_BOOLEAN: 105 if (p[0] == 'y') { 106 sym->def[def].tri = yes; 107 sym->flags |= def_flags; 108 break; 109 } 110 if (p[0] == 'n') { 111 sym->def[def].tri = no; 112 sym->flags |= def_flags; 113 break; 114 } 115 conf_warning("symbol value '%s' invalid for %s", p, sym->name); 116 break; 117 case S_OTHER: 118 if (*p != '"') { 119 for (p2 = p; *p2 && !isspace(*p2); p2++) 120 ; 121 sym->type = S_STRING; 122 goto done; 123 } 124 case S_STRING: 125 if (*p++ != '"') 126 break; 127 for (p2 = p; (p2 = strpbrk(p2, "\"\\")); p2++) { 128 if (*p2 == '"') { 129 *p2 = 0; 130 break; 131 } 132 memmove(p2, p2 + 1, strlen(p2)); 133 } 134 if (!p2) { 135 conf_warning("invalid string found"); 136 return 1; 137 } 138 case S_INT: 139 case S_HEX: 140 done: 141 if (sym_string_valid(sym, p)) { 142 sym->def[def].val = strdup(p); 143 sym->flags |= def_flags; 144 } else { 145 conf_warning("symbol value '%s' invalid for %s", p, sym->name); 146 return 1; 147 } 148 break; 149 default: 150 ; 151 } 152 return 0; 153 } 154 155 int conf_read_simple(const char *name, int def) 156 { 157 FILE *in = NULL; 158 char line[1024]; 159 char *p, *p2; 160 struct symbol *sym; 161 int i, def_flags; 162 163 if (name) { 164 in = zconf_fopen(name); 165 } else { 166 struct property *prop; 167 168 name = conf_get_configname(); 169 in = zconf_fopen(name); 170 if (in) 171 goto load; 172 sym_add_change_count(1); 173 if (!sym_defconfig_list) 174 return 1; 175 176 for_all_defaults(sym_defconfig_list, prop) { 177 if (expr_calc_value(prop->visible.expr) == no || 178 prop->expr->type != E_SYMBOL) 179 continue; 180 name = conf_expand_value(prop->expr->left.sym->name); 181 in = zconf_fopen(name); 182 if (in) { 183 printf(_("#\n" 184 "# using defaults found in %s\n" 185 "#\n"), name); 186 goto load; 187 } 188 } 189 } 190 if (!in) 191 return 1; 192 193 load: 194 conf_filename = name; 195 conf_lineno = 0; 196 conf_warnings = 0; 197 conf_unsaved = 0; 198 199 def_flags = SYMBOL_DEF << def; 200 for_all_symbols(i, sym) { 201 sym->flags |= SYMBOL_CHANGED; 202 sym->flags &= ~(def_flags|SYMBOL_VALID); 203 if (sym_is_choice(sym)) 204 sym->flags |= def_flags; 205 switch (sym->type) { 206 case S_INT: 207 case S_HEX: 208 case S_STRING: 209 if (sym->def[def].val) 210 free(sym->def[def].val); 211 default: 212 sym->def[def].val = NULL; 213 sym->def[def].tri = no; 214 } 215 } 216 217 while (fgets(line, sizeof(line), in)) { 218 conf_lineno++; 219 sym = NULL; 220 switch (line[0]) { 221 case '#': 222 if (memcmp(line + 2, "CONFIG_", 7)) 223 continue; 224 p = strchr(line + 9, ' '); 225 if (!p) 226 continue; 227 *p++ = 0; 228 if (strncmp(p, "is not set", 10)) 229 continue; 230 if (def == S_DEF_USER) { 231 sym = sym_find(line + 9); 232 if (!sym) { 233 sym_add_change_count(1); 234 break; 235 } 236 } else { 237 sym = sym_lookup(line + 9, 0); 238 if (sym->type == S_UNKNOWN) 239 sym->type = S_BOOLEAN; 240 } 241 if (sym->flags & def_flags) { 242 conf_warning("override: reassigning to symbol %s", sym->name); 243 } 244 switch (sym->type) { 245 case S_BOOLEAN: 246 case S_TRISTATE: 247 sym->def[def].tri = no; 248 sym->flags |= def_flags; 249 break; 250 default: 251 ; 252 } 253 break; 254 case 'C': 255 if (memcmp(line, "CONFIG_", 7)) { 256 conf_warning("unexpected data"); 257 continue; 258 } 259 p = strchr(line + 7, '='); 260 if (!p) 261 continue; 262 *p++ = 0; 263 p2 = strchr(p, '\n'); 264 if (p2) { 265 *p2-- = 0; 266 if (*p2 == '\r') 267 *p2 = 0; 268 } 269 if (def == S_DEF_USER) { 270 sym = sym_find(line + 7); 271 if (!sym) { 272 sym_add_change_count(1); 273 break; 274 } 275 } else { 276 sym = sym_lookup(line + 7, 0); 277 if (sym->type == S_UNKNOWN) 278 sym->type = S_OTHER; 279 } 280 if (sym->flags & def_flags) { 281 conf_warning("override: reassigning to symbol %s", sym->name); 282 } 283 if (conf_set_sym_val(sym, def, def_flags, p)) 284 continue; 285 break; 286 case '\r': 287 case '\n': 288 break; 289 default: 290 conf_warning("unexpected data"); 291 continue; 292 } 293 if (sym && sym_is_choice_value(sym)) { 294 struct symbol *cs = prop_get_symbol(sym_get_choice_prop(sym)); 295 switch (sym->def[def].tri) { 296 case no: 297 break; 298 case mod: 299 if (cs->def[def].tri == yes) { 300 conf_warning("%s creates inconsistent choice state", sym->name); 301 cs->flags &= ~def_flags; 302 } 303 break; 304 case yes: 305 if (cs->def[def].tri != no) 306 conf_warning("override: %s changes choice state", sym->name); 307 cs->def[def].val = sym; 308 break; 309 } 310 cs->def[def].tri = EXPR_OR(cs->def[def].tri, sym->def[def].tri); 311 } 312 } 313 fclose(in); 314 315 if (modules_sym) 316 sym_calc_value(modules_sym); 317 return 0; 318 } 319 320 int conf_read(const char *name) 321 { 322 struct symbol *sym, *choice_sym; 323 struct property *prop; 324 struct expr *e; 325 int i, flags; 326 327 sym_set_change_count(0); 328 329 if (conf_read_simple(name, S_DEF_USER)) 330 return 1; 331 332 for_all_symbols(i, sym) { 333 sym_calc_value(sym); 334 if (sym_is_choice(sym) || (sym->flags & SYMBOL_AUTO)) 335 goto sym_ok; 336 if (sym_has_value(sym) && (sym->flags & SYMBOL_WRITE)) { 337 /* check that calculated value agrees with saved value */ 338 switch (sym->type) { 339 case S_BOOLEAN: 340 case S_TRISTATE: 341 if (sym->def[S_DEF_USER].tri != sym_get_tristate_value(sym)) 342 break; 343 if (!sym_is_choice(sym)) 344 goto sym_ok; 345 default: 346 if (!strcmp(sym->curr.val, sym->def[S_DEF_USER].val)) 347 goto sym_ok; 348 break; 349 } 350 } else if (!sym_has_value(sym) && !(sym->flags & SYMBOL_WRITE)) 351 /* no previous value and not saved */ 352 goto sym_ok; 353 conf_unsaved++; 354 /* maybe print value in verbose mode... */ 355 sym_ok: 356 if (!sym_is_choice(sym)) 357 continue; 358 /* The choice symbol only has a set value (and thus is not new) 359 * if all its visible childs have values. 360 */ 361 prop = sym_get_choice_prop(sym); 362 flags = sym->flags; 363 expr_list_for_each_sym(prop->expr, e, choice_sym) 364 if (choice_sym->visible != no) 365 flags &= choice_sym->flags; 366 sym->flags &= flags | ~SYMBOL_DEF_USER; 367 } 368 369 for_all_symbols(i, sym) { 370 if (sym_has_value(sym) && !sym_is_choice_value(sym)) { 371 /* Reset values of generates values, so they'll appear 372 * as new, if they should become visible, but that 373 * doesn't quite work if the Kconfig and the saved 374 * configuration disagree. 375 */ 376 if (sym->visible == no && !conf_unsaved) 377 sym->flags &= ~SYMBOL_DEF_USER; 378 switch (sym->type) { 379 case S_STRING: 380 case S_INT: 381 case S_HEX: 382 /* Reset a string value if it's out of range */ 383 if (sym_string_within_range(sym, sym->def[S_DEF_USER].val)) 384 break; 385 sym->flags &= ~(SYMBOL_VALID|SYMBOL_DEF_USER); 386 conf_unsaved++; 387 break; 388 default: 389 break; 390 } 391 } 392 } 393 394 sym_add_change_count(conf_warnings || conf_unsaved); 395 396 return 0; 397 } 398 399 int conf_write(const char *name) 400 { 401 FILE *out; 402 struct symbol *sym; 403 struct menu *menu; 404 const char *basename; 405 char dirname[128], tmpname[128], newname[128]; 406 int type, l; 407 const char *str; 408 time_t now; 409 int use_timestamp = 1; 410 char *env; 411 412 dirname[0] = 0; 413 if (name && name[0]) { 414 struct stat st; 415 char *slash; 416 417 if (!stat(name, &st) && S_ISDIR(st.st_mode)) { 418 strcpy(dirname, name); 419 strcat(dirname, "/"); 420 basename = conf_get_configname(); 421 } else if ((slash = strrchr(name, '/'))) { 422 int size = slash - name + 1; 423 memcpy(dirname, name, size); 424 dirname[size] = 0; 425 if (slash[1]) 426 basename = slash + 1; 427 else 428 basename = conf_get_configname(); 429 } else 430 basename = name; 431 } else 432 basename = conf_get_configname(); 433 434 sprintf(newname, "%s%s", dirname, basename); 435 env = getenv("KCONFIG_OVERWRITECONFIG"); 436 if (!env || !*env) { 437 sprintf(tmpname, "%s.tmpconfig.%d", dirname, (int)getpid()); 438 out = fopen(tmpname, "w"); 439 } else { 440 *tmpname = 0; 441 out = fopen(newname, "w"); 442 } 443 if (!out) 444 return 1; 445 446 sym = sym_lookup("KERNELVERSION", 0); 447 sym_calc_value(sym); 448 time(&now); 449 env = getenv("KCONFIG_NOTIMESTAMP"); 450 if (env && *env) 451 use_timestamp = 0; 452 453 fprintf(out, _("#\n" 454 "# Automatically generated make config: don't edit\n" 455 "# Linux kernel version: %s\n" 456 "%s%s" 457 "#\n"), 458 sym_get_string_value(sym), 459 use_timestamp ? "# " : "", 460 use_timestamp ? ctime(&now) : ""); 461 462 if (!conf_get_changed()) 463 sym_clear_all_valid(); 464 465 menu = rootmenu.list; 466 while (menu) { 467 sym = menu->sym; 468 if (!sym) { 469 if (!menu_is_visible(menu)) 470 goto next; 471 str = menu_get_prompt(menu); 472 fprintf(out, "\n" 473 "#\n" 474 "# %s\n" 475 "#\n", str); 476 } else if (!(sym->flags & SYMBOL_CHOICE)) { 477 sym_calc_value(sym); 478 if (!(sym->flags & SYMBOL_WRITE)) 479 goto next; 480 sym->flags &= ~SYMBOL_WRITE; 481 type = sym->type; 482 if (type == S_TRISTATE) { 483 sym_calc_value(modules_sym); 484 if (modules_sym->curr.tri == no) 485 type = S_BOOLEAN; 486 } 487 switch (type) { 488 case S_BOOLEAN: 489 case S_TRISTATE: 490 switch (sym_get_tristate_value(sym)) { 491 case no: 492 fprintf(out, "# CONFIG_%s is not set\n", sym->name); 493 break; 494 case mod: 495 fprintf(out, "CONFIG_%s=m\n", sym->name); 496 break; 497 case yes: 498 fprintf(out, "CONFIG_%s=y\n", sym->name); 499 break; 500 } 501 break; 502 case S_STRING: 503 str = sym_get_string_value(sym); 504 fprintf(out, "CONFIG_%s=\"", sym->name); 505 while (1) { 506 l = strcspn(str, "\"\\"); 507 if (l) { 508 fwrite(str, l, 1, out); 509 str += l; 510 } 511 if (!*str) 512 break; 513 fprintf(out, "\\%c", *str++); 514 } 515 fputs("\"\n", out); 516 break; 517 case S_HEX: 518 str = sym_get_string_value(sym); 519 if (str[0] != '0' || (str[1] != 'x' && str[1] != 'X')) { 520 fprintf(out, "CONFIG_%s=%s\n", sym->name, str); 521 break; 522 } 523 case S_INT: 524 str = sym_get_string_value(sym); 525 fprintf(out, "CONFIG_%s=%s\n", sym->name, str); 526 break; 527 } 528 } 529 530 next: 531 if (menu->list) { 532 menu = menu->list; 533 continue; 534 } 535 if (menu->next) 536 menu = menu->next; 537 else while ((menu = menu->parent)) { 538 if (menu->next) { 539 menu = menu->next; 540 break; 541 } 542 } 543 } 544 fclose(out); 545 546 if (*tmpname) { 547 strcat(dirname, basename); 548 strcat(dirname, ".old"); 549 rename(newname, dirname); 550 if (rename(tmpname, newname)) 551 return 1; 552 } 553 554 printf(_("#\n" 555 "# configuration written to %s\n" 556 "#\n"), newname); 557 558 sym_set_change_count(0); 559 560 return 0; 561 } 562 563 static int conf_split_config(void) 564 { 565 const char *name; 566 char path[128]; 567 char *s, *d, c; 568 struct symbol *sym; 569 struct stat sb; 570 int res, i, fd; 571 572 name = conf_get_autoconfig_name(); 573 conf_read_simple(name, S_DEF_AUTO); 574 575 if (chdir("include/config")) 576 return 1; 577 578 res = 0; 579 for_all_symbols(i, sym) { 580 sym_calc_value(sym); 581 if ((sym->flags & SYMBOL_AUTO) || !sym->name) 582 continue; 583 if (sym->flags & SYMBOL_WRITE) { 584 if (sym->flags & SYMBOL_DEF_AUTO) { 585 /* 586 * symbol has old and new value, 587 * so compare them... 588 */ 589 switch (sym->type) { 590 case S_BOOLEAN: 591 case S_TRISTATE: 592 if (sym_get_tristate_value(sym) == 593 sym->def[S_DEF_AUTO].tri) 594 continue; 595 break; 596 case S_STRING: 597 case S_HEX: 598 case S_INT: 599 if (!strcmp(sym_get_string_value(sym), 600 sym->def[S_DEF_AUTO].val)) 601 continue; 602 break; 603 default: 604 break; 605 } 606 } else { 607 /* 608 * If there is no old value, only 'no' (unset) 609 * is allowed as new value. 610 */ 611 switch (sym->type) { 612 case S_BOOLEAN: 613 case S_TRISTATE: 614 if (sym_get_tristate_value(sym) == no) 615 continue; 616 break; 617 default: 618 break; 619 } 620 } 621 } else if (!(sym->flags & SYMBOL_DEF_AUTO)) 622 /* There is neither an old nor a new value. */ 623 continue; 624 /* else 625 * There is an old value, but no new value ('no' (unset) 626 * isn't saved in auto.conf, so the old value is always 627 * different from 'no'). 628 */ 629 630 /* Replace all '_' and append ".h" */ 631 s = sym->name; 632 d = path; 633 while ((c = *s++)) { 634 c = tolower(c); 635 *d++ = (c == '_') ? '/' : c; 636 } 637 strcpy(d, ".h"); 638 639 /* Assume directory path already exists. */ 640 fd = open(path, O_WRONLY | O_CREAT | O_TRUNC, 0644); 641 if (fd == -1) { 642 if (errno != ENOENT) { 643 res = 1; 644 break; 645 } 646 /* 647 * Create directory components, 648 * unless they exist already. 649 */ 650 d = path; 651 while ((d = strchr(d, '/'))) { 652 *d = 0; 653 if (stat(path, &sb) && mkdir(path, 0755)) { 654 res = 1; 655 goto out; 656 } 657 *d++ = '/'; 658 } 659 /* Try it again. */ 660 fd = open(path, O_WRONLY | O_CREAT | O_TRUNC, 0644); 661 if (fd == -1) { 662 res = 1; 663 break; 664 } 665 } 666 close(fd); 667 } 668 out: 669 if (chdir("../..")) 670 return 1; 671 672 return res; 673 } 674 675 int conf_write_autoconf(void) 676 { 677 struct symbol *sym; 678 const char *str; 679 const char *name; 680 FILE *out, *out_h; 681 time_t now; 682 int i, l; 683 684 sym_clear_all_valid(); 685 686 file_write_dep("include/config/auto.conf.cmd"); 687 688 if (conf_split_config()) 689 return 1; 690 691 out = fopen(".tmpconfig", "w"); 692 if (!out) 693 return 1; 694 695 out_h = fopen(".tmpconfig.h", "w"); 696 if (!out_h) { 697 fclose(out); 698 return 1; 699 } 700 701 sym = sym_lookup("KERNELVERSION", 0); 702 sym_calc_value(sym); 703 time(&now); 704 fprintf(out, "#\n" 705 "# Automatically generated make config: don't edit\n" 706 "# Linux kernel version: %s\n" 707 "# %s" 708 "#\n", 709 sym_get_string_value(sym), ctime(&now)); 710 fprintf(out_h, "/*\n" 711 " * Automatically generated C config: don't edit\n" 712 " * Linux kernel version: %s\n" 713 " * %s" 714 " */\n" 715 "#define AUTOCONF_INCLUDED\n", 716 sym_get_string_value(sym), ctime(&now)); 717 718 for_all_symbols(i, sym) { 719 sym_calc_value(sym); 720 if (!(sym->flags & SYMBOL_WRITE) || !sym->name) 721 continue; 722 switch (sym->type) { 723 case S_BOOLEAN: 724 case S_TRISTATE: 725 switch (sym_get_tristate_value(sym)) { 726 case no: 727 break; 728 case mod: 729 fprintf(out, "CONFIG_%s=m\n", sym->name); 730 fprintf(out_h, "#define CONFIG_%s_MODULE 1\n", sym->name); 731 break; 732 case yes: 733 fprintf(out, "CONFIG_%s=y\n", sym->name); 734 fprintf(out_h, "#define CONFIG_%s 1\n", sym->name); 735 break; 736 } 737 break; 738 case S_STRING: 739 str = sym_get_string_value(sym); 740 fprintf(out, "CONFIG_%s=\"", sym->name); 741 fprintf(out_h, "#define CONFIG_%s \"", sym->name); 742 while (1) { 743 l = strcspn(str, "\"\\"); 744 if (l) { 745 fwrite(str, l, 1, out); 746 fwrite(str, l, 1, out_h); 747 str += l; 748 } 749 if (!*str) 750 break; 751 fprintf(out, "\\%c", *str); 752 fprintf(out_h, "\\%c", *str); 753 str++; 754 } 755 fputs("\"\n", out); 756 fputs("\"\n", out_h); 757 break; 758 case S_HEX: 759 str = sym_get_string_value(sym); 760 if (str[0] != '0' || (str[1] != 'x' && str[1] != 'X')) { 761 fprintf(out, "CONFIG_%s=%s\n", sym->name, str); 762 fprintf(out_h, "#define CONFIG_%s 0x%s\n", sym->name, str); 763 break; 764 } 765 case S_INT: 766 str = sym_get_string_value(sym); 767 fprintf(out, "CONFIG_%s=%s\n", sym->name, str); 768 fprintf(out_h, "#define CONFIG_%s %s\n", sym->name, str); 769 break; 770 default: 771 break; 772 } 773 } 774 fclose(out); 775 fclose(out_h); 776 777 name = getenv("KCONFIG_AUTOHEADER"); 778 if (!name) 779 name = "include/linux/autoconf.h"; 780 if (rename(".tmpconfig.h", name)) 781 return 1; 782 name = conf_get_autoconfig_name(); 783 /* 784 * This must be the last step, kbuild has a dependency on auto.conf 785 * and this marks the successful completion of the previous steps. 786 */ 787 if (rename(".tmpconfig", name)) 788 return 1; 789 790 return 0; 791 } 792 793 static int sym_change_count; 794 static void (*conf_changed_callback)(void); 795 796 void sym_set_change_count(int count) 797 { 798 int _sym_change_count = sym_change_count; 799 sym_change_count = count; 800 if (conf_changed_callback && 801 (bool)_sym_change_count != (bool)count) 802 conf_changed_callback(); 803 } 804 805 void sym_add_change_count(int count) 806 { 807 sym_set_change_count(count + sym_change_count); 808 } 809 810 bool conf_get_changed(void) 811 { 812 return sym_change_count; 813 } 814 815 void conf_set_changed_callback(void (*fn)(void)) 816 { 817 conf_changed_callback = fn; 818 } 819 820 821 void conf_set_all_new_symbols(enum conf_def_mode mode) 822 { 823 struct symbol *sym, *csym; 824 struct property *prop; 825 struct expr *e; 826 int i, cnt, def; 827 828 for_all_symbols(i, sym) { 829 if (sym_has_value(sym)) 830 continue; 831 switch (sym_get_type(sym)) { 832 case S_BOOLEAN: 833 case S_TRISTATE: 834 switch (mode) { 835 case def_yes: 836 sym->def[S_DEF_USER].tri = yes; 837 break; 838 case def_mod: 839 sym->def[S_DEF_USER].tri = mod; 840 break; 841 case def_no: 842 sym->def[S_DEF_USER].tri = no; 843 break; 844 case def_random: 845 sym->def[S_DEF_USER].tri = (tristate)(rand() % 3); 846 break; 847 default: 848 continue; 849 } 850 if (!(sym_is_choice(sym) && mode == def_random)) 851 sym->flags |= SYMBOL_DEF_USER; 852 break; 853 default: 854 break; 855 } 856 857 } 858 859 sym_clear_all_valid(); 860 861 if (mode != def_random) 862 return; 863 /* 864 * We have different type of choice blocks. 865 * If curr.tri equal to mod then we can select several 866 * choice symbols in one block. 867 * In this case we do nothing. 868 * If curr.tri equal yes then only one symbol can be 869 * selected in a choice block and we set it to yes, 870 * and the rest to no. 871 */ 872 for_all_symbols(i, csym) { 873 if (sym_has_value(csym) || !sym_is_choice(csym)) 874 continue; 875 876 sym_calc_value(csym); 877 878 if (csym->curr.tri != yes) 879 continue; 880 881 prop = sym_get_choice_prop(csym); 882 883 /* count entries in choice block */ 884 cnt = 0; 885 expr_list_for_each_sym(prop->expr, e, sym) 886 cnt++; 887 888 /* 889 * find a random value and set it to yes, 890 * set the rest to no so we have only one set 891 */ 892 def = (rand() % cnt); 893 894 cnt = 0; 895 expr_list_for_each_sym(prop->expr, e, sym) { 896 if (def == cnt++) { 897 sym->def[S_DEF_USER].tri = yes; 898 csym->def[S_DEF_USER].val = sym; 899 } 900 else { 901 sym->def[S_DEF_USER].tri = no; 902 } 903 } 904 csym->flags |= SYMBOL_DEF_USER; 905 /* clear VALID to get value calculated */ 906 csym->flags &= ~(SYMBOL_VALID); 907 } 908 } 909