futexes: Remove rw parameter from get_futex_key()
[linux-2.6/cjktty.git] / scripts / kconfig / confdata.c
blobc4dec80cfd8e14a94792af807da0e9705256257d
1 /*
2 * Copyright (C) 2002 Roman Zippel <zippel@linux-m68k.org>
3 * Released under the terms of the GNU GPL v2.0.
4 */
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>
15 #define LKC_DIRECT_LINK
16 #include "lkc.h"
18 static void conf_warning(const char *fmt, ...)
19 __attribute__ ((format (printf, 1, 2)));
21 static const char *conf_filename;
22 static int conf_lineno, conf_warnings, conf_unsaved;
24 const char conf_defname[] = "arch/$ARCH/defconfig";
26 static void conf_warning(const char *fmt, ...)
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++;
37 const char *conf_get_configname(void)
39 char *name = getenv("KCONFIG_CONFIG");
41 return name ? name : ".config";
44 const char *conf_get_autoconfig_name(void)
46 char *name = getenv("KCONFIG_AUTOCONFIG");
48 return name ? name : "include/config/auto.conf";
51 static char *conf_expand_value(const char *in)
53 struct symbol *sym;
54 const char *src;
55 static char res_value[SYMBOL_MAXLENGTH];
56 char *dst, name[SYMBOL_MAXLENGTH];
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;
72 strcat(res_value, in);
74 return res_value;
77 char *conf_get_default_confname(void)
79 struct stat buf;
80 static char fullname[PATH_MAX+1];
81 char *env, *name;
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;
90 return name;
93 static int conf_set_sym_val(struct symbol *sym, int def, int def_flags, char *p)
95 char *p2;
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;
104 case S_BOOLEAN:
105 if (p[0] == 'y') {
106 sym->def[def].tri = yes;
107 sym->flags |= def_flags;
108 break;
110 if (p[0] == 'n') {
111 sym->def[def].tri = no;
112 sym->flags |= def_flags;
113 break;
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++)
121 sym->type = S_STRING;
122 goto done;
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;
132 memmove(p2, p2 + 1, strlen(p2));
134 if (!p2) {
135 conf_warning("invalid string found");
136 return 1;
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;
148 break;
149 default:
152 return 0;
155 int conf_read_simple(const char *name, int def)
157 FILE *in = NULL;
158 char line[1024];
159 char *p, *p2;
160 struct symbol *sym;
161 int i, def_flags;
163 if (name) {
164 in = zconf_fopen(name);
165 } else {
166 struct property *prop;
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;
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;
190 if (!in)
191 return 1;
193 load:
194 conf_filename = name;
195 conf_lineno = 0;
196 conf_warnings = 0;
197 conf_unsaved = 0;
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;
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;
236 } else {
237 sym = sym_lookup(line + 9, 0);
238 if (sym->type == S_UNKNOWN)
239 sym->type = S_BOOLEAN;
241 if (sym->flags & def_flags) {
242 conf_warning("override: reassigning to symbol %s", sym->name);
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:
253 break;
254 case 'C':
255 if (memcmp(line, "CONFIG_", 7)) {
256 conf_warning("unexpected data");
257 continue;
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;
269 if (def == S_DEF_USER) {
270 sym = sym_find(line + 7);
271 if (!sym) {
272 sym_add_change_count(1);
273 break;
275 } else {
276 sym = sym_lookup(line + 7, 0);
277 if (sym->type == S_UNKNOWN)
278 sym->type = S_OTHER;
280 if (sym->flags & def_flags) {
281 conf_warning("override: reassigning to symbol %s", sym->name);
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;
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;
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;
310 cs->def[def].tri = EXPR_OR(cs->def[def].tri, sym->def[def].tri);
313 fclose(in);
315 if (modules_sym)
316 sym_calc_value(modules_sym);
317 return 0;
320 int conf_read(const char *name)
322 struct symbol *sym, *choice_sym;
323 struct property *prop;
324 struct expr *e;
325 int i, flags;
327 sym_set_change_count(0);
329 if (conf_read_simple(name, S_DEF_USER))
330 return 1;
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;
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.
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;
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.
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;
394 sym_add_change_count(conf_warnings || conf_unsaved);
396 return 0;
399 int conf_write(const char *name)
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;
412 dirname[0] = 0;
413 if (name && name[0]) {
414 struct stat st;
415 char *slash;
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();
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");
443 if (!out)
444 return 1;
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;
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) : "");
462 if (!conf_get_changed())
463 sym_clear_all_valid();
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;
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;
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;
511 if (!*str)
512 break;
513 fprintf(out, "\\%c", *str++);
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;
523 case S_INT:
524 str = sym_get_string_value(sym);
525 fprintf(out, "CONFIG_%s=%s\n", sym->name, str);
526 break;
530 next:
531 if (menu->list) {
532 menu = menu->list;
533 continue;
535 if (menu->next)
536 menu = menu->next;
537 else while ((menu = menu->parent)) {
538 if (menu->next) {
539 menu = menu->next;
540 break;
544 fclose(out);
546 if (*tmpname) {
547 strcat(dirname, basename);
548 strcat(dirname, ".old");
549 rename(newname, dirname);
550 if (rename(tmpname, newname))
551 return 1;
554 printf(_("#\n"
555 "# configuration written to %s\n"
556 "#\n"), newname);
558 sym_set_change_count(0);
560 return 0;
563 static int conf_split_config(void)
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;
572 name = conf_get_autoconfig_name();
573 conf_read_simple(name, S_DEF_AUTO);
575 if (chdir("include/config"))
576 return 1;
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) {
586 * symbol has old and new value,
587 * so compare them...
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;
606 } else {
608 * If there is no old value, only 'no' (unset)
609 * is allowed as new value.
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;
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').
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;
637 strcpy(d, ".h");
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;
647 * Create directory components,
648 * unless they exist already.
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;
657 *d++ = '/';
659 /* Try it again. */
660 fd = open(path, O_WRONLY | O_CREAT | O_TRUNC, 0644);
661 if (fd == -1) {
662 res = 1;
663 break;
666 close(fd);
668 out:
669 if (chdir("../.."))
670 return 1;
672 return res;
675 int conf_write_autoconf(void)
677 struct symbol *sym;
678 const char *str;
679 const char *name;
680 FILE *out, *tristate, *out_h;
681 time_t now;
682 int i, l;
684 sym_clear_all_valid();
686 file_write_dep("include/config/auto.conf.cmd");
688 if (conf_split_config())
689 return 1;
691 out = fopen(".tmpconfig", "w");
692 if (!out)
693 return 1;
695 tristate = fopen(".tmpconfig_tristate", "w");
696 if (!tristate) {
697 fclose(out);
698 return 1;
701 out_h = fopen(".tmpconfig.h", "w");
702 if (!out_h) {
703 fclose(out);
704 fclose(tristate);
705 return 1;
708 sym = sym_lookup("KERNELVERSION", 0);
709 sym_calc_value(sym);
710 time(&now);
711 fprintf(out, "#\n"
712 "# Automatically generated make config: don't edit\n"
713 "# Linux kernel version: %s\n"
714 "# %s"
715 "#\n",
716 sym_get_string_value(sym), ctime(&now));
717 fprintf(tristate, "#\n"
718 "# Automatically generated - do not edit\n"
719 "\n");
720 fprintf(out_h, "/*\n"
721 " * Automatically generated C config: don't edit\n"
722 " * Linux kernel version: %s\n"
723 " * %s"
724 " */\n"
725 "#define AUTOCONF_INCLUDED\n",
726 sym_get_string_value(sym), ctime(&now));
728 for_all_symbols(i, sym) {
729 sym_calc_value(sym);
730 if (!(sym->flags & SYMBOL_WRITE) || !sym->name)
731 continue;
732 switch (sym->type) {
733 case S_BOOLEAN:
734 case S_TRISTATE:
735 switch (sym_get_tristate_value(sym)) {
736 case no:
737 break;
738 case mod:
739 fprintf(out, "CONFIG_%s=m\n", sym->name);
740 fprintf(tristate, "CONFIG_%s=M\n", sym->name);
741 fprintf(out_h, "#define CONFIG_%s_MODULE 1\n", sym->name);
742 break;
743 case yes:
744 fprintf(out, "CONFIG_%s=y\n", sym->name);
745 if (sym->type == S_TRISTATE)
746 fprintf(tristate, "CONFIG_%s=Y\n",
747 sym->name);
748 fprintf(out_h, "#define CONFIG_%s 1\n", sym->name);
749 break;
751 break;
752 case S_STRING:
753 str = sym_get_string_value(sym);
754 fprintf(out, "CONFIG_%s=\"", sym->name);
755 fprintf(out_h, "#define CONFIG_%s \"", sym->name);
756 while (1) {
757 l = strcspn(str, "\"\\");
758 if (l) {
759 fwrite(str, l, 1, out);
760 fwrite(str, l, 1, out_h);
761 str += l;
763 if (!*str)
764 break;
765 fprintf(out, "\\%c", *str);
766 fprintf(out_h, "\\%c", *str);
767 str++;
769 fputs("\"\n", out);
770 fputs("\"\n", out_h);
771 break;
772 case S_HEX:
773 str = sym_get_string_value(sym);
774 if (str[0] != '0' || (str[1] != 'x' && str[1] != 'X')) {
775 fprintf(out, "CONFIG_%s=%s\n", sym->name, str);
776 fprintf(out_h, "#define CONFIG_%s 0x%s\n", sym->name, str);
777 break;
779 case S_INT:
780 str = sym_get_string_value(sym);
781 fprintf(out, "CONFIG_%s=%s\n", sym->name, str);
782 fprintf(out_h, "#define CONFIG_%s %s\n", sym->name, str);
783 break;
784 default:
785 break;
788 fclose(out);
789 fclose(tristate);
790 fclose(out_h);
792 name = getenv("KCONFIG_AUTOHEADER");
793 if (!name)
794 name = "include/generated/autoconf.h";
795 if (rename(".tmpconfig.h", name))
796 return 1;
797 name = getenv("KCONFIG_TRISTATE");
798 if (!name)
799 name = "include/config/tristate.conf";
800 if (rename(".tmpconfig_tristate", name))
801 return 1;
802 name = conf_get_autoconfig_name();
804 * This must be the last step, kbuild has a dependency on auto.conf
805 * and this marks the successful completion of the previous steps.
807 if (rename(".tmpconfig", name))
808 return 1;
810 return 0;
813 static int sym_change_count;
814 static void (*conf_changed_callback)(void);
816 void sym_set_change_count(int count)
818 int _sym_change_count = sym_change_count;
819 sym_change_count = count;
820 if (conf_changed_callback &&
821 (bool)_sym_change_count != (bool)count)
822 conf_changed_callback();
825 void sym_add_change_count(int count)
827 sym_set_change_count(count + sym_change_count);
830 bool conf_get_changed(void)
832 return sym_change_count;
835 void conf_set_changed_callback(void (*fn)(void))
837 conf_changed_callback = fn;
841 void conf_set_all_new_symbols(enum conf_def_mode mode)
843 struct symbol *sym, *csym;
844 struct property *prop;
845 struct expr *e;
846 int i, cnt, def;
848 for_all_symbols(i, sym) {
849 if (sym_has_value(sym))
850 continue;
851 switch (sym_get_type(sym)) {
852 case S_BOOLEAN:
853 case S_TRISTATE:
854 switch (mode) {
855 case def_yes:
856 sym->def[S_DEF_USER].tri = yes;
857 break;
858 case def_mod:
859 sym->def[S_DEF_USER].tri = mod;
860 break;
861 case def_no:
862 sym->def[S_DEF_USER].tri = no;
863 break;
864 case def_random:
865 sym->def[S_DEF_USER].tri = (tristate)(rand() % 3);
866 break;
867 default:
868 continue;
870 if (!(sym_is_choice(sym) && mode == def_random))
871 sym->flags |= SYMBOL_DEF_USER;
872 break;
873 default:
874 break;
879 sym_clear_all_valid();
881 if (mode != def_random)
882 return;
884 * We have different type of choice blocks.
885 * If curr.tri equal to mod then we can select several
886 * choice symbols in one block.
887 * In this case we do nothing.
888 * If curr.tri equal yes then only one symbol can be
889 * selected in a choice block and we set it to yes,
890 * and the rest to no.
892 for_all_symbols(i, csym) {
893 if (sym_has_value(csym) || !sym_is_choice(csym))
894 continue;
896 sym_calc_value(csym);
898 if (csym->curr.tri != yes)
899 continue;
901 prop = sym_get_choice_prop(csym);
903 /* count entries in choice block */
904 cnt = 0;
905 expr_list_for_each_sym(prop->expr, e, sym)
906 cnt++;
909 * find a random value and set it to yes,
910 * set the rest to no so we have only one set
912 def = (rand() % cnt);
914 cnt = 0;
915 expr_list_for_each_sym(prop->expr, e, sym) {
916 if (def == cnt++) {
917 sym->def[S_DEF_USER].tri = yes;
918 csym->def[S_DEF_USER].val = sym;
920 else {
921 sym->def[S_DEF_USER].tri = no;
924 csym->flags |= SYMBOL_DEF_USER;
925 /* clear VALID to get value calculated */
926 csym->flags &= ~(SYMBOL_VALID);