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