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