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