xref: /openbmc/linux/scripts/kconfig/confdata.c (revision 6a551c11)
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 
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 
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;
55 void conf_set_message_callback(void (*fn) (const char *fmt, va_list ap))
56 {
57 	conf_message_callback = fn;
58 }
59 
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 
70 const char *conf_get_configname(void)
71 {
72 	char *name = getenv("KCONFIG_CONFIG");
73 
74 	return name ? name : ".config";
75 }
76 
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 
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 
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 
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') {
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
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 
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 
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: %.*s",
379 					     (int)strcspn(line, "\r\n"), line);
380 
381 			continue;
382 		}
383 setsym:
384 		if (sym && sym_is_choice_value(sym)) {
385 			struct symbol *cs = prop_get_symbol(sym_get_choice_prop(sym));
386 			switch (sym->def[def].tri) {
387 			case no:
388 				break;
389 			case mod:
390 				if (cs->def[def].tri == yes) {
391 					conf_warning("%s creates inconsistent choice state", sym->name);
392 					cs->flags &= ~def_flags;
393 				}
394 				break;
395 			case yes:
396 				if (cs->def[def].tri != no)
397 					conf_warning("override: %s changes choice state", sym->name);
398 				cs->def[def].val = sym;
399 				break;
400 			}
401 			cs->def[def].tri = EXPR_OR(cs->def[def].tri, sym->def[def].tri);
402 		}
403 	}
404 	free(line);
405 	fclose(in);
406 	return 0;
407 }
408 
409 int conf_read(const char *name)
410 {
411 	struct symbol *sym;
412 	int i;
413 
414 	sym_set_change_count(0);
415 
416 	if (conf_read_simple(name, S_DEF_USER)) {
417 		sym_calc_value(modules_sym);
418 		return 1;
419 	}
420 
421 	sym_calc_value(modules_sym);
422 
423 	for_all_symbols(i, sym) {
424 		sym_calc_value(sym);
425 		if (sym_is_choice(sym) || (sym->flags & SYMBOL_AUTO))
426 			continue;
427 		if (sym_has_value(sym) && (sym->flags & SYMBOL_WRITE)) {
428 			/* check that calculated value agrees with saved value */
429 			switch (sym->type) {
430 			case S_BOOLEAN:
431 			case S_TRISTATE:
432 				if (sym->def[S_DEF_USER].tri != sym_get_tristate_value(sym))
433 					break;
434 				if (!sym_is_choice(sym))
435 					continue;
436 				/* fall through */
437 			default:
438 				if (!strcmp(sym->curr.val, sym->def[S_DEF_USER].val))
439 					continue;
440 				break;
441 			}
442 		} else if (!sym_has_value(sym) && !(sym->flags & SYMBOL_WRITE))
443 			/* no previous value and not saved */
444 			continue;
445 		conf_unsaved++;
446 		/* maybe print value in verbose mode... */
447 	}
448 
449 	for_all_symbols(i, sym) {
450 		if (sym_has_value(sym) && !sym_is_choice_value(sym)) {
451 			/* Reset values of generates values, so they'll appear
452 			 * as new, if they should become visible, but that
453 			 * doesn't quite work if the Kconfig and the saved
454 			 * configuration disagree.
455 			 */
456 			if (sym->visible == no && !conf_unsaved)
457 				sym->flags &= ~SYMBOL_DEF_USER;
458 			switch (sym->type) {
459 			case S_STRING:
460 			case S_INT:
461 			case S_HEX:
462 				/* Reset a string value if it's out of range */
463 				if (sym_string_within_range(sym, sym->def[S_DEF_USER].val))
464 					break;
465 				sym->flags &= ~(SYMBOL_VALID|SYMBOL_DEF_USER);
466 				conf_unsaved++;
467 				break;
468 			default:
469 				break;
470 			}
471 		}
472 	}
473 
474 	sym_add_change_count(conf_warnings || conf_unsaved);
475 
476 	return 0;
477 }
478 
479 /*
480  * Kconfig configuration printer
481  *
482  * This printer is used when generating the resulting configuration after
483  * kconfig invocation and `defconfig' files. Unset symbol might be omitted by
484  * passing a non-NULL argument to the printer.
485  *
486  */
487 static void
488 kconfig_print_symbol(FILE *fp, struct symbol *sym, const char *value, void *arg)
489 {
490 
491 	switch (sym->type) {
492 	case S_BOOLEAN:
493 	case S_TRISTATE:
494 		if (*value == 'n') {
495 			bool skip_unset = (arg != NULL);
496 
497 			if (!skip_unset)
498 				fprintf(fp, "# %s%s is not set\n",
499 				    CONFIG_, sym->name);
500 			return;
501 		}
502 		break;
503 	default:
504 		break;
505 	}
506 
507 	fprintf(fp, "%s%s=%s\n", CONFIG_, sym->name, value);
508 }
509 
510 static void
511 kconfig_print_comment(FILE *fp, const char *value, void *arg)
512 {
513 	const char *p = value;
514 	size_t l;
515 
516 	for (;;) {
517 		l = strcspn(p, "\n");
518 		fprintf(fp, "#");
519 		if (l) {
520 			fprintf(fp, " ");
521 			xfwrite(p, l, 1, fp);
522 			p += l;
523 		}
524 		fprintf(fp, "\n");
525 		if (*p++ == '\0')
526 			break;
527 	}
528 }
529 
530 static struct conf_printer kconfig_printer_cb =
531 {
532 	.print_symbol = kconfig_print_symbol,
533 	.print_comment = kconfig_print_comment,
534 };
535 
536 /*
537  * Header printer
538  *
539  * This printer is used when generating the `include/generated/autoconf.h' file.
540  */
541 static void
542 header_print_symbol(FILE *fp, struct symbol *sym, const char *value, void *arg)
543 {
544 
545 	switch (sym->type) {
546 	case S_BOOLEAN:
547 	case S_TRISTATE: {
548 		const char *suffix = "";
549 
550 		switch (*value) {
551 		case 'n':
552 			break;
553 		case 'm':
554 			suffix = "_MODULE";
555 			/* fall through */
556 		default:
557 			fprintf(fp, "#define %s%s%s 1\n",
558 			    CONFIG_, sym->name, suffix);
559 		}
560 		break;
561 	}
562 	case S_HEX: {
563 		const char *prefix = "";
564 
565 		if (value[0] != '0' || (value[1] != 'x' && value[1] != 'X'))
566 			prefix = "0x";
567 		fprintf(fp, "#define %s%s %s%s\n",
568 		    CONFIG_, sym->name, prefix, value);
569 		break;
570 	}
571 	case S_STRING:
572 	case S_INT:
573 		fprintf(fp, "#define %s%s %s\n",
574 		    CONFIG_, sym->name, value);
575 		break;
576 	default:
577 		break;
578 	}
579 
580 }
581 
582 static void
583 header_print_comment(FILE *fp, const char *value, void *arg)
584 {
585 	const char *p = value;
586 	size_t l;
587 
588 	fprintf(fp, "/*\n");
589 	for (;;) {
590 		l = strcspn(p, "\n");
591 		fprintf(fp, " *");
592 		if (l) {
593 			fprintf(fp, " ");
594 			xfwrite(p, l, 1, fp);
595 			p += l;
596 		}
597 		fprintf(fp, "\n");
598 		if (*p++ == '\0')
599 			break;
600 	}
601 	fprintf(fp, " */\n");
602 }
603 
604 static struct conf_printer header_printer_cb =
605 {
606 	.print_symbol = header_print_symbol,
607 	.print_comment = header_print_comment,
608 };
609 
610 /*
611  * Tristate printer
612  *
613  * This printer is used when generating the `include/config/tristate.conf' file.
614  */
615 static void
616 tristate_print_symbol(FILE *fp, struct symbol *sym, const char *value, void *arg)
617 {
618 
619 	if (sym->type == S_TRISTATE && *value != 'n')
620 		fprintf(fp, "%s%s=%c\n", CONFIG_, sym->name, (char)toupper(*value));
621 }
622 
623 static struct conf_printer tristate_printer_cb =
624 {
625 	.print_symbol = tristate_print_symbol,
626 	.print_comment = kconfig_print_comment,
627 };
628 
629 static void conf_write_symbol(FILE *fp, struct symbol *sym,
630 			      struct conf_printer *printer, void *printer_arg)
631 {
632 	const char *str;
633 
634 	switch (sym->type) {
635 	case S_OTHER:
636 	case S_UNKNOWN:
637 		break;
638 	case S_STRING:
639 		str = sym_get_string_value(sym);
640 		str = sym_escape_string_value(str);
641 		printer->print_symbol(fp, sym, str, printer_arg);
642 		free((void *)str);
643 		break;
644 	default:
645 		str = sym_get_string_value(sym);
646 		printer->print_symbol(fp, sym, str, printer_arg);
647 	}
648 }
649 
650 static void
651 conf_write_heading(FILE *fp, struct conf_printer *printer, void *printer_arg)
652 {
653 	char buf[256];
654 
655 	snprintf(buf, sizeof(buf),
656 	    "\n"
657 	    "Automatically generated file; DO NOT EDIT.\n"
658 	    "%s\n",
659 	    rootmenu.prompt->text);
660 
661 	printer->print_comment(fp, buf, printer_arg);
662 }
663 
664 /*
665  * Write out a minimal config.
666  * All values that has default values are skipped as this is redundant.
667  */
668 int conf_write_defconfig(const char *filename)
669 {
670 	struct symbol *sym;
671 	struct menu *menu;
672 	FILE *out;
673 
674 	out = fopen(filename, "w");
675 	if (!out)
676 		return 1;
677 
678 	sym_clear_all_valid();
679 
680 	/* Traverse all menus to find all relevant symbols */
681 	menu = rootmenu.list;
682 
683 	while (menu != NULL)
684 	{
685 		sym = menu->sym;
686 		if (sym == NULL) {
687 			if (!menu_is_visible(menu))
688 				goto next_menu;
689 		} else if (!sym_is_choice(sym)) {
690 			sym_calc_value(sym);
691 			if (!(sym->flags & SYMBOL_WRITE))
692 				goto next_menu;
693 			sym->flags &= ~SYMBOL_WRITE;
694 			/* If we cannot change the symbol - skip */
695 			if (!sym_is_changable(sym))
696 				goto next_menu;
697 			/* If symbol equals to default value - skip */
698 			if (strcmp(sym_get_string_value(sym), sym_get_string_default(sym)) == 0)
699 				goto next_menu;
700 
701 			/*
702 			 * If symbol is a choice value and equals to the
703 			 * default for a choice - skip.
704 			 * But only if value is bool and equal to "y" and
705 			 * choice is not "optional".
706 			 * (If choice is "optional" then all values can be "n")
707 			 */
708 			if (sym_is_choice_value(sym)) {
709 				struct symbol *cs;
710 				struct symbol *ds;
711 
712 				cs = prop_get_symbol(sym_get_choice_prop(sym));
713 				ds = sym_choice_default(cs);
714 				if (!sym_is_optional(cs) && sym == ds) {
715 					if ((sym->type == S_BOOLEAN) &&
716 					    sym_get_tristate_value(sym) == yes)
717 						goto next_menu;
718 				}
719 			}
720 			conf_write_symbol(out, sym, &kconfig_printer_cb, NULL);
721 		}
722 next_menu:
723 		if (menu->list != NULL) {
724 			menu = menu->list;
725 		}
726 		else if (menu->next != NULL) {
727 			menu = menu->next;
728 		} else {
729 			while ((menu = menu->parent)) {
730 				if (menu->next != NULL) {
731 					menu = menu->next;
732 					break;
733 				}
734 			}
735 		}
736 	}
737 	fclose(out);
738 	return 0;
739 }
740 
741 int conf_write(const char *name)
742 {
743 	FILE *out;
744 	struct symbol *sym;
745 	struct menu *menu;
746 	const char *basename;
747 	const char *str;
748 	char dirname[PATH_MAX+1], tmpname[PATH_MAX+1], newname[PATH_MAX+1];
749 	char *env;
750 
751 	dirname[0] = 0;
752 	if (name && name[0]) {
753 		struct stat st;
754 		char *slash;
755 
756 		if (!stat(name, &st) && S_ISDIR(st.st_mode)) {
757 			strcpy(dirname, name);
758 			strcat(dirname, "/");
759 			basename = conf_get_configname();
760 		} else if ((slash = strrchr(name, '/'))) {
761 			int size = slash - name + 1;
762 			memcpy(dirname, name, size);
763 			dirname[size] = 0;
764 			if (slash[1])
765 				basename = slash + 1;
766 			else
767 				basename = conf_get_configname();
768 		} else
769 			basename = name;
770 	} else
771 		basename = conf_get_configname();
772 
773 	sprintf(newname, "%s%s", dirname, basename);
774 	env = getenv("KCONFIG_OVERWRITECONFIG");
775 	if (!env || !*env) {
776 		sprintf(tmpname, "%s.tmpconfig.%d", dirname, (int)getpid());
777 		out = fopen(tmpname, "w");
778 	} else {
779 		*tmpname = 0;
780 		out = fopen(newname, "w");
781 	}
782 	if (!out)
783 		return 1;
784 
785 	conf_write_heading(out, &kconfig_printer_cb, NULL);
786 
787 	if (!conf_get_changed())
788 		sym_clear_all_valid();
789 
790 	menu = rootmenu.list;
791 	while (menu) {
792 		sym = menu->sym;
793 		if (!sym) {
794 			if (!menu_is_visible(menu))
795 				goto next;
796 			str = menu_get_prompt(menu);
797 			fprintf(out, "\n"
798 				     "#\n"
799 				     "# %s\n"
800 				     "#\n", str);
801 		} else if (!(sym->flags & SYMBOL_CHOICE)) {
802 			sym_calc_value(sym);
803 			if (!(sym->flags & SYMBOL_WRITE))
804 				goto next;
805 			sym->flags &= ~SYMBOL_WRITE;
806 
807 			conf_write_symbol(out, sym, &kconfig_printer_cb, NULL);
808 		}
809 
810 next:
811 		if (menu->list) {
812 			menu = menu->list;
813 			continue;
814 		}
815 		if (menu->next)
816 			menu = menu->next;
817 		else while ((menu = menu->parent)) {
818 			if (menu->next) {
819 				menu = menu->next;
820 				break;
821 			}
822 		}
823 	}
824 	fclose(out);
825 
826 	if (*tmpname) {
827 		strcat(dirname, basename);
828 		strcat(dirname, ".old");
829 		rename(newname, dirname);
830 		if (rename(tmpname, newname))
831 			return 1;
832 	}
833 
834 	conf_message(_("configuration written to %s"), newname);
835 
836 	sym_set_change_count(0);
837 
838 	return 0;
839 }
840 
841 static int conf_split_config(void)
842 {
843 	const char *name;
844 	char path[PATH_MAX+1];
845 	char *s, *d, c;
846 	struct symbol *sym;
847 	struct stat sb;
848 	int res, i, fd;
849 
850 	name = conf_get_autoconfig_name();
851 	conf_read_simple(name, S_DEF_AUTO);
852 	sym_calc_value(modules_sym);
853 
854 	if (chdir("include/config"))
855 		return 1;
856 
857 	res = 0;
858 	for_all_symbols(i, sym) {
859 		sym_calc_value(sym);
860 		if ((sym->flags & SYMBOL_AUTO) || !sym->name)
861 			continue;
862 		if (sym->flags & SYMBOL_WRITE) {
863 			if (sym->flags & SYMBOL_DEF_AUTO) {
864 				/*
865 				 * symbol has old and new value,
866 				 * so compare them...
867 				 */
868 				switch (sym->type) {
869 				case S_BOOLEAN:
870 				case S_TRISTATE:
871 					if (sym_get_tristate_value(sym) ==
872 					    sym->def[S_DEF_AUTO].tri)
873 						continue;
874 					break;
875 				case S_STRING:
876 				case S_HEX:
877 				case S_INT:
878 					if (!strcmp(sym_get_string_value(sym),
879 						    sym->def[S_DEF_AUTO].val))
880 						continue;
881 					break;
882 				default:
883 					break;
884 				}
885 			} else {
886 				/*
887 				 * If there is no old value, only 'no' (unset)
888 				 * is allowed as new value.
889 				 */
890 				switch (sym->type) {
891 				case S_BOOLEAN:
892 				case S_TRISTATE:
893 					if (sym_get_tristate_value(sym) == no)
894 						continue;
895 					break;
896 				default:
897 					break;
898 				}
899 			}
900 		} else if (!(sym->flags & SYMBOL_DEF_AUTO))
901 			/* There is neither an old nor a new value. */
902 			continue;
903 		/* else
904 		 *	There is an old value, but no new value ('no' (unset)
905 		 *	isn't saved in auto.conf, so the old value is always
906 		 *	different from 'no').
907 		 */
908 
909 		/* Replace all '_' and append ".h" */
910 		s = sym->name;
911 		d = path;
912 		while ((c = *s++)) {
913 			c = tolower(c);
914 			*d++ = (c == '_') ? '/' : c;
915 		}
916 		strcpy(d, ".h");
917 
918 		/* Assume directory path already exists. */
919 		fd = open(path, O_WRONLY | O_CREAT | O_TRUNC, 0644);
920 		if (fd == -1) {
921 			if (errno != ENOENT) {
922 				res = 1;
923 				break;
924 			}
925 			/*
926 			 * Create directory components,
927 			 * unless they exist already.
928 			 */
929 			d = path;
930 			while ((d = strchr(d, '/'))) {
931 				*d = 0;
932 				if (stat(path, &sb) && mkdir(path, 0755)) {
933 					res = 1;
934 					goto out;
935 				}
936 				*d++ = '/';
937 			}
938 			/* Try it again. */
939 			fd = open(path, O_WRONLY | O_CREAT | O_TRUNC, 0644);
940 			if (fd == -1) {
941 				res = 1;
942 				break;
943 			}
944 		}
945 		close(fd);
946 	}
947 out:
948 	if (chdir("../.."))
949 		return 1;
950 
951 	return res;
952 }
953 
954 int conf_write_autoconf(void)
955 {
956 	struct symbol *sym;
957 	const char *name;
958 	FILE *out, *tristate, *out_h;
959 	int i;
960 
961 	sym_clear_all_valid();
962 
963 	file_write_dep("include/config/auto.conf.cmd");
964 
965 	if (conf_split_config())
966 		return 1;
967 
968 	out = fopen(".tmpconfig", "w");
969 	if (!out)
970 		return 1;
971 
972 	tristate = fopen(".tmpconfig_tristate", "w");
973 	if (!tristate) {
974 		fclose(out);
975 		return 1;
976 	}
977 
978 	out_h = fopen(".tmpconfig.h", "w");
979 	if (!out_h) {
980 		fclose(out);
981 		fclose(tristate);
982 		return 1;
983 	}
984 
985 	conf_write_heading(out, &kconfig_printer_cb, NULL);
986 
987 	conf_write_heading(tristate, &tristate_printer_cb, NULL);
988 
989 	conf_write_heading(out_h, &header_printer_cb, NULL);
990 
991 	for_all_symbols(i, sym) {
992 		sym_calc_value(sym);
993 		if (!(sym->flags & SYMBOL_WRITE) || !sym->name)
994 			continue;
995 
996 		/* write symbol to auto.conf, tristate and header files */
997 		conf_write_symbol(out, sym, &kconfig_printer_cb, (void *)1);
998 
999 		conf_write_symbol(tristate, sym, &tristate_printer_cb, (void *)1);
1000 
1001 		conf_write_symbol(out_h, sym, &header_printer_cb, NULL);
1002 	}
1003 	fclose(out);
1004 	fclose(tristate);
1005 	fclose(out_h);
1006 
1007 	name = getenv("KCONFIG_AUTOHEADER");
1008 	if (!name)
1009 		name = "include/generated/autoconf.h";
1010 	if (rename(".tmpconfig.h", name))
1011 		return 1;
1012 	name = getenv("KCONFIG_TRISTATE");
1013 	if (!name)
1014 		name = "include/config/tristate.conf";
1015 	if (rename(".tmpconfig_tristate", name))
1016 		return 1;
1017 	name = conf_get_autoconfig_name();
1018 	/*
1019 	 * This must be the last step, kbuild has a dependency on auto.conf
1020 	 * and this marks the successful completion of the previous steps.
1021 	 */
1022 	if (rename(".tmpconfig", name))
1023 		return 1;
1024 
1025 	return 0;
1026 }
1027 
1028 static int sym_change_count;
1029 static void (*conf_changed_callback)(void);
1030 
1031 void sym_set_change_count(int count)
1032 {
1033 	int _sym_change_count = sym_change_count;
1034 	sym_change_count = count;
1035 	if (conf_changed_callback &&
1036 	    (bool)_sym_change_count != (bool)count)
1037 		conf_changed_callback();
1038 }
1039 
1040 void sym_add_change_count(int count)
1041 {
1042 	sym_set_change_count(count + sym_change_count);
1043 }
1044 
1045 bool conf_get_changed(void)
1046 {
1047 	return sym_change_count;
1048 }
1049 
1050 void conf_set_changed_callback(void (*fn)(void))
1051 {
1052 	conf_changed_callback = fn;
1053 }
1054 
1055 static bool randomize_choice_values(struct symbol *csym)
1056 {
1057 	struct property *prop;
1058 	struct symbol *sym;
1059 	struct expr *e;
1060 	int cnt, def;
1061 
1062 	/*
1063 	 * If choice is mod then we may have more items selected
1064 	 * and if no then no-one.
1065 	 * In both cases stop.
1066 	 */
1067 	if (csym->curr.tri != yes)
1068 		return false;
1069 
1070 	prop = sym_get_choice_prop(csym);
1071 
1072 	/* count entries in choice block */
1073 	cnt = 0;
1074 	expr_list_for_each_sym(prop->expr, e, sym)
1075 		cnt++;
1076 
1077 	/*
1078 	 * find a random value and set it to yes,
1079 	 * set the rest to no so we have only one set
1080 	 */
1081 	def = (rand() % cnt);
1082 
1083 	cnt = 0;
1084 	expr_list_for_each_sym(prop->expr, e, sym) {
1085 		if (def == cnt++) {
1086 			sym->def[S_DEF_USER].tri = yes;
1087 			csym->def[S_DEF_USER].val = sym;
1088 		}
1089 		else {
1090 			sym->def[S_DEF_USER].tri = no;
1091 		}
1092 		sym->flags |= SYMBOL_DEF_USER;
1093 		/* clear VALID to get value calculated */
1094 		sym->flags &= ~SYMBOL_VALID;
1095 	}
1096 	csym->flags |= SYMBOL_DEF_USER;
1097 	/* clear VALID to get value calculated */
1098 	csym->flags &= ~(SYMBOL_VALID);
1099 
1100 	return true;
1101 }
1102 
1103 void set_all_choice_values(struct symbol *csym)
1104 {
1105 	struct property *prop;
1106 	struct symbol *sym;
1107 	struct expr *e;
1108 
1109 	prop = sym_get_choice_prop(csym);
1110 
1111 	/*
1112 	 * Set all non-assinged choice values to no
1113 	 */
1114 	expr_list_for_each_sym(prop->expr, e, sym) {
1115 		if (!sym_has_value(sym))
1116 			sym->def[S_DEF_USER].tri = no;
1117 	}
1118 	csym->flags |= SYMBOL_DEF_USER;
1119 	/* clear VALID to get value calculated */
1120 	csym->flags &= ~(SYMBOL_VALID | SYMBOL_NEED_SET_CHOICE_VALUES);
1121 }
1122 
1123 bool conf_set_all_new_symbols(enum conf_def_mode mode)
1124 {
1125 	struct symbol *sym, *csym;
1126 	int i, cnt, pby, pty, ptm;	/* pby: probability of boolean  = y
1127 					 * pty: probability of tristate = y
1128 					 * ptm: probability of tristate = m
1129 					 */
1130 
1131 	pby = 50; pty = ptm = 33; /* can't go as the default in switch-case
1132 				   * below, otherwise gcc whines about
1133 				   * -Wmaybe-uninitialized */
1134 	if (mode == def_random) {
1135 		int n, p[3];
1136 		char *env = getenv("KCONFIG_PROBABILITY");
1137 		n = 0;
1138 		while( env && *env ) {
1139 			char *endp;
1140 			int tmp = strtol( env, &endp, 10 );
1141 			if( tmp >= 0 && tmp <= 100 ) {
1142 				p[n++] = tmp;
1143 			} else {
1144 				errno = ERANGE;
1145 				perror( "KCONFIG_PROBABILITY" );
1146 				exit( 1 );
1147 			}
1148 			env = (*endp == ':') ? endp+1 : endp;
1149 			if( n >=3 ) {
1150 				break;
1151 			}
1152 		}
1153 		switch( n ) {
1154 		case 1:
1155 			pby = p[0]; ptm = pby/2; pty = pby-ptm;
1156 			break;
1157 		case 2:
1158 			pty = p[0]; ptm = p[1]; pby = pty + ptm;
1159 			break;
1160 		case 3:
1161 			pby = p[0]; pty = p[1]; ptm = p[2];
1162 			break;
1163 		}
1164 
1165 		if( pty+ptm > 100 ) {
1166 			errno = ERANGE;
1167 			perror( "KCONFIG_PROBABILITY" );
1168 			exit( 1 );
1169 		}
1170 	}
1171 	bool has_changed = false;
1172 
1173 	for_all_symbols(i, sym) {
1174 		if (sym_has_value(sym) || (sym->flags & SYMBOL_VALID))
1175 			continue;
1176 		switch (sym_get_type(sym)) {
1177 		case S_BOOLEAN:
1178 		case S_TRISTATE:
1179 			has_changed = true;
1180 			switch (mode) {
1181 			case def_yes:
1182 				sym->def[S_DEF_USER].tri = yes;
1183 				break;
1184 			case def_mod:
1185 				sym->def[S_DEF_USER].tri = mod;
1186 				break;
1187 			case def_no:
1188 				if (sym->flags & SYMBOL_ALLNOCONFIG_Y)
1189 					sym->def[S_DEF_USER].tri = yes;
1190 				else
1191 					sym->def[S_DEF_USER].tri = no;
1192 				break;
1193 			case def_random:
1194 				sym->def[S_DEF_USER].tri = no;
1195 				cnt = rand() % 100;
1196 				if (sym->type == S_TRISTATE) {
1197 					if (cnt < pty)
1198 						sym->def[S_DEF_USER].tri = yes;
1199 					else if (cnt < (pty+ptm))
1200 						sym->def[S_DEF_USER].tri = mod;
1201 				} else if (cnt < pby)
1202 					sym->def[S_DEF_USER].tri = yes;
1203 				break;
1204 			default:
1205 				continue;
1206 			}
1207 			if (!(sym_is_choice(sym) && mode == def_random))
1208 				sym->flags |= SYMBOL_DEF_USER;
1209 			break;
1210 		default:
1211 			break;
1212 		}
1213 
1214 	}
1215 
1216 	sym_clear_all_valid();
1217 
1218 	/*
1219 	 * We have different type of choice blocks.
1220 	 * If curr.tri equals to mod then we can select several
1221 	 * choice symbols in one block.
1222 	 * In this case we do nothing.
1223 	 * If curr.tri equals yes then only one symbol can be
1224 	 * selected in a choice block and we set it to yes,
1225 	 * and the rest to no.
1226 	 */
1227 	if (mode != def_random) {
1228 		for_all_symbols(i, csym) {
1229 			if ((sym_is_choice(csym) && !sym_has_value(csym)) ||
1230 			    sym_is_choice_value(csym))
1231 				csym->flags |= SYMBOL_NEED_SET_CHOICE_VALUES;
1232 		}
1233 	}
1234 
1235 	for_all_symbols(i, csym) {
1236 		if (sym_has_value(csym) || !sym_is_choice(csym))
1237 			continue;
1238 
1239 		sym_calc_value(csym);
1240 		if (mode == def_random)
1241 			has_changed = randomize_choice_values(csym);
1242 		else {
1243 			set_all_choice_values(csym);
1244 			has_changed = true;
1245 		}
1246 	}
1247 
1248 	return has_changed;
1249 }
1250