util/kconfig/confdata.c - mirrors/cros/chromiumos/third_party/coreboot - Git at Google

 /*
  * Copyright (C) 2002 Roman Zippel <zippel@linux-m68k.org>
  * Released under the terms of the GNU GPL v2.0.
  */

 #include <sys/stat.h>
 #include <ctype.h>
 #include <fcntl.h>
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
 #include <time.h>
 #include <unistd.h>

 #define LKC_DIRECT_LINK
 #include "lkc.h"

 #ifdef WIN32
 #define mkdir(x,y) mkdir(x)
 #define UNLINK_IF_NECESSARY(x) unlink(x)
 #else
 #define UNLINK_IF_NECESSARY(X)
 #endif

 static void conf_warning(const char *fmt, ...)
 	__attribute__ ((format (printf, 1, 2)));

 static const char *conf_filename;
 static int conf_lineno, conf_warnings, conf_unsaved;

 const char conf_defname[] = "arch/$ARCH/defconfig";

 static void conf_warning(const char *fmt, ...)
 {
 	va_list ap;
 	va_start(ap, fmt);
 	fprintf(stderr, "%s:%d:warning: ", conf_filename, conf_lineno);
 	vfprintf(stderr, fmt, ap);
 	fprintf(stderr, "\n");
 	va_end(ap);
 	conf_warnings++;
 }

 const char *conf_get_configname(void)
 {
 	char *name = getenv("KCONFIG_CONFIG");

 	return name ? name : ".config";
 }

 static char *conf_expand_value(const char *in)
 {
 	struct symbol *sym;
 	const char *src;
 	static char res_value[SYMBOL_MAXLENGTH];
 	char *dst, name[SYMBOL_MAXLENGTH];

 	res_value[0] = 0;
 	dst = name;
 	while ((src = strchr(in, '$'))) {
 		strncat(res_value, in, src - in);
 		src++;
 		dst = name;
 		while (isalnum(*src) || *src == '_')
 			*dst++ = *src++;
 		*dst = 0;
 		sym = sym_lookup(name, 0);
 		sym_calc_value(sym);
 		strcat(res_value, sym_get_string_value(sym));
 		in = src;
 	}
 	strcat(res_value, in);

 	return res_value;
 }

 char *conf_get_default_confname(void)
 {
 	struct stat buf;
 	static char fullname[PATH_MAX+1];
 	char *env, *name;

 	name = conf_expand_value(conf_defname);
 	env = getenv(SRCTREE);
 	if (env) {
 		sprintf(fullname, "%s/%s", env, name);
 		if (!stat(fullname, &buf))
 			return fullname;
 	}
 	return name;
 }

 static int conf_set_sym_val(struct symbol *sym, int def, int def_flags, char *p)
 {
 	char *p2;

 	switch (sym->type) {
 	case S_TRISTATE:
 		if (p[0] == 'm') {
 			sym->def[def].tri = mod;
 			sym->flags |= def_flags;
 			break;
 		}
 	case S_BOOLEAN:
 		if (p[0] == 'y') {
 			sym->def[def].tri = yes;
 			sym->flags |= def_flags;
 			break;
 		}
 		if (p[0] == 'n') {
 			sym->def[def].tri = no;
 			sym->flags |= def_flags;
 			break;
 		}
 		conf_warning("symbol value '%s' invalid for %s", p, sym->name);
 		break;
 	case S_OTHER:
 		if (*p != '"') {
 			for (p2 = p; *p2 && !isspace(*p2); p2++)
 				;
 			sym->type = S_STRING;
 			goto done;
 		}
 	case S_STRING:
 		if (*p++ != '"')
 			break;
 		for (p2 = p; (p2 = strpbrk(p2, "\"\\")); p2++) {
 			if (*p2 == '"') {
 				*p2 = 0;
 				break;
 			}
 			memmove(p2, p2 + 1, strlen(p2));
 		}
 		if (!p2) {
 			conf_warning("invalid string found");
 			return 1;
 		}
 	case S_INT:
 	case S_HEX:
 	done:
 		if (sym_string_valid(sym, p)) {
 			sym->def[def].val = strdup(p);
 			sym->flags |= def_flags;
 		} else {
 			conf_warning("symbol value '%s' invalid for %s", p, sym->name);
 			return 1;
 		}
 		break;
 	default:
 		;
 	}
 	return 0;
 }

 int conf_read_simple(const char *name, int def)
 {
 	FILE *in = NULL;
 	char line[1024];
 	char *p, *p2;
 	struct symbol *sym;
 	int i, def_flags;

 	if (name) {
 		in = zconf_fopen(name);
 	} else {
 		struct property *prop;

 		name = conf_get_configname();
 		in = zconf_fopen(name);
 		if (in)
 			goto load;
 		sym_add_change_count(1);
 		if (!sym_defconfig_list)
 			return 1;

 		for_all_defaults(sym_defconfig_list, prop) {
 			if (expr_calc_value(prop->visible.expr) == no ||
 			    prop->expr->type != E_SYMBOL)
 				continue;
 			name = conf_expand_value(prop->expr->left.sym->name);
 			in = zconf_fopen(name);
 			if (in) {
 				printf(_("#\n"
 					 "# using defaults found in %s\n"
 					 "#\n"), name);
 				goto load;
 			}
 		}
 	}
 	if (!in)
 		return 1;

 load:
 	conf_filename = name;
 	conf_lineno = 0;
 	conf_warnings = 0;
 	conf_unsaved = 0;

 	def_flags = SYMBOL_DEF << def;
 	for_all_symbols(i, sym) {
 		sym->flags |= SYMBOL_CHANGED;
 		sym->flags &= ~(def_flags|SYMBOL_VALID);
 		if (sym_is_choice(sym))
 			sym->flags |= def_flags;
 		switch (sym->type) {
 		case S_INT:
 		case S_HEX:
 		case S_STRING:
 			if (sym->def[def].val)
 				free(sym->def[def].val);
 		default:
 			sym->def[def].val = NULL;
 			sym->def[def].tri = no;
 		}
 	}

 	while (fgets(line, sizeof(line), in)) {
 		conf_lineno++;
 		sym = NULL;
 		switch (line[0]) {
 		case '#':
 			if (memcmp(line + 2, "CONFIG_", 7))
 				continue;
 			p = strchr(line + 9, ' ');
 			if (!p)
 				continue;
 			*p++ = 0;
 			if (strncmp(p, "is not set", 10))
 				continue;
 			if (def == S_DEF_USER) {
 				sym = sym_find(line + 9);
 				if (!sym) {
 					conf_warning("trying to assign nonexistent symbol %s", line + 9);
 					break;
 				}
 			} else {
 				sym = sym_lookup(line + 9, 0);
 				if (sym->type == S_UNKNOWN)
 					sym->type = S_BOOLEAN;
 			}
 			if (sym->flags & def_flags) {
 				conf_warning("override: reassigning to symbol %s", sym->name);
 			}
 			switch (sym->type) {
 			case S_BOOLEAN:
 			case S_TRISTATE:
 				sym->def[def].tri = no;
 				sym->flags |= def_flags;
 				break;
 			default:
 				;
 			}
 			break;
 		case 'C':
 			if (memcmp(line, "CONFIG_", 7)) {
 				conf_warning("unexpected data");
 				continue;
 			}
 			p = strchr(line + 7, '=');
 			if (!p)
 				continue;
 			*p++ = 0;
 			p2 = strchr(p, '\n');
 			if (p2) {
 				*p2-- = 0;
 				if (*p2 == '\r')
 					*p2 = 0;
 			}
 			if (def == S_DEF_USER) {
 				sym = sym_find(line + 7);
 				if (!sym) {
 					conf_warning("trying to assign nonexistent symbol %s", line + 7);
 					break;
 				}
 			} else {
 				sym = sym_lookup(line + 7, 0);
 				if (sym->type == S_UNKNOWN)
 					sym->type = S_OTHER;
 			}
 			if (sym->flags & def_flags) {
 				conf_warning("override: reassigning to symbol %s", sym->name);
 			}
 			if (conf_set_sym_val(sym, def, def_flags, p))
 				continue;
 			break;
 		case '\r':
 		case '\n':
 			break;
 		default:
 			conf_warning("unexpected data");
 			continue;
 		}
 		if (sym && sym_is_choice_value(sym)) {
 			struct symbol *cs = prop_get_symbol(sym_get_choice_prop(sym));
 			switch (sym->def[def].tri) {
 			case no:
 				break;
 			case mod:
 				if (cs->def[def].tri == yes) {
 					conf_warning("%s creates inconsistent choice state", sym->name);
 					cs->flags &= ~def_flags;
 				}
 				break;
 			case yes:
 				if (cs->def[def].tri != no)
 					conf_warning("override: %s changes choice state", sym->name);
 				cs->def[def].val = sym;
 				break;
 			}
 			cs->def[def].tri = EXPR_OR(cs->def[def].tri, sym->def[def].tri);
 		}
 	}
 	fclose(in);

 	if (modules_sym)
 		sym_calc_value(modules_sym);
 	return 0;
 }

 int conf_read(const char *name)
 {
 	struct symbol *sym, *choice_sym;
 	struct property *prop;
 	struct expr *e;
 	int i, flags;

 	sym_set_change_count(0);

 	if (conf_read_simple(name, S_DEF_USER))
 		return 1;

 	for_all_symbols(i, sym) {
 		sym_calc_value(sym);
 		if (sym_is_choice(sym) || (sym->flags & SYMBOL_AUTO))
 			goto sym_ok;
 		if (sym_has_value(sym) && (sym->flags & SYMBOL_WRITE)) {
 			/* check that calculated value agrees with saved value */
 			switch (sym->type) {
 			case S_BOOLEAN:
 			case S_TRISTATE:
 				if (sym->def[S_DEF_USER].tri != sym_get_tristate_value(sym))
 					break;
 				if (!sym_is_choice(sym))
 					goto sym_ok;
 			default:
 				if (!strcmp(sym->curr.val, sym->def[S_DEF_USER].val))
 					goto sym_ok;
 				break;
 			}
 		} else if (!sym_has_value(sym) && !(sym->flags & SYMBOL_WRITE))
 			/* no previous value and not saved */
 			goto sym_ok;
 		conf_unsaved++;
 		/* maybe print value in verbose mode... */
 	sym_ok:
 		if (!sym_is_choice(sym))
 			continue;
 		/* The choice symbol only has a set value (and thus is not new)
 		 * if all its visible childs have values.
 		 */
 		prop = sym_get_choice_prop(sym);
 		flags = sym->flags;
 		expr_list_for_each_sym(prop->expr, e, choice_sym)
 			if (choice_sym->visible != no)
 				flags &= choice_sym->flags;
 		sym->flags &= flags | ~SYMBOL_DEF_USER;
 	}

 	for_all_symbols(i, sym) {
 		if (sym_has_value(sym) && !sym_is_choice_value(sym)) {
 			/* Reset values of generates values, so they'll appear
 			 * as new, if they should become visible, but that
 			 * doesn't quite work if the Kconfig and the saved
 			 * configuration disagree.
 			 */
 			if (sym->visible == no && !conf_unsaved)
 				sym->flags &= ~SYMBOL_DEF_USER;
 			switch (sym->type) {
 			case S_STRING:
 			case S_INT:
 			case S_HEX:
 				/* Reset a string value if it's out of range */
 				if (sym_string_within_range(sym, sym->def[S_DEF_USER].val))
 					break;
 				sym->flags &= ~(SYMBOL_VALID|SYMBOL_DEF_USER);
 				conf_unsaved++;
 				break;
 			default:
 				break;
 			}
 		}
 	}

 	sym_add_change_count(conf_warnings || conf_unsaved);

 	return 0;
 }

 int conf_write(const char *name)
 {
 	FILE *out;
 	struct symbol *sym;
 	struct menu *menu;
 	const char *basename;
 	char dirname[128], tmpname[128], newname[128];
 	int type, l;
 	const char *str;
 	time_t now;
 	int use_timestamp = 1;
 	char *env;

 	dirname[0] = 0;
 	if (name && name[0]) {
 		struct stat st;
 		char *slash;

 		if (!stat(name, &st) && S_ISDIR(st.st_mode)) {
 			strcpy(dirname, name);
 			strcat(dirname, "/");
 			basename = conf_get_configname();
 		} else if ((slash = strrchr(name, '/'))) {
 			int size = slash - name + 1;
 			memcpy(dirname, name, size);
 			dirname[size] = 0;
 			if (slash[1])
 				basename = slash + 1;
 			else
 				basename = conf_get_configname();
 		} else
 			basename = name;
 	} else
 		basename = conf_get_configname();

 	sprintf(newname, "%s%s", dirname, basename);
 	env = getenv("KCONFIG_OVERWRITECONFIG");
 	if (!env || !*env) {
 		sprintf(tmpname, "%s.tmpconfig.%d", dirname, (int)getpid());
 		out = fopen(tmpname, "w");
 	} else {
 		*tmpname = 0;
 		out = fopen(newname, "w");
 	}
 	if (!out)
 		return 1;

 	sym = sym_lookup("KERNELVERSION", 0);
 	sym_calc_value(sym);
 	time(&now);
 	env = getenv("KCONFIG_NOTIMESTAMP");
 	if (env && *env)
 		use_timestamp = 0;

 	fprintf(out, _("#\n"
 		       "# Automatically generated make config: don't edit\n"
 		       "# coreboot version: %s\n"
 		       "%s%s"
 		       "#\n"),
 		     getenv("KERNELVERSION")?getenv("KERNELVERSION"):"",
 		     use_timestamp ? "# " : "",
 		     use_timestamp ? ctime(&now) : "");

 	if (!conf_get_changed())
 		sym_clear_all_valid();

 	menu = rootmenu.list;
 	while (menu) {
 		sym = menu->sym;
 		if (!sym) {
 			if (!menu_is_visible(menu))
 				goto next;
 			str = menu_get_prompt(menu);
 			fprintf(out, "\n"
 				     "#\n"
 				     "# %s\n"
 				     "#\n", str);
 		} else if (!(sym->flags & SYMBOL_CHOICE)) {
 			sym_calc_value(sym);
 			if (!(sym->flags & SYMBOL_WRITE))
 				goto next;
 			sym->flags &= ~SYMBOL_WRITE;
 			type = sym->type;
 			if (type == S_TRISTATE) {
 				sym_calc_value(modules_sym);
 				if (modules_sym->curr.tri == no)
 					type = S_BOOLEAN;
 			}
 			switch (type) {
 			case S_BOOLEAN:
 			case S_TRISTATE:
 				switch (sym_get_tristate_value(sym)) {
 				case no:
 					fprintf(out, "# CONFIG_%s is not set\n", sym->name);
 					break;
 				case mod:
 					fprintf(out, "CONFIG_%s=m\n", sym->name);
 					break;
 				case yes:
 					fprintf(out, "CONFIG_%s=y\n", sym->name);
 					break;
 				}
 				break;
 			case S_STRING:
 				str = sym_get_string_value(sym);
 				fprintf(out, "CONFIG_%s=\"", sym->name);
 				while (1) {
 					l = strcspn(str, "\"\\");
 					if (l) {
 						fwrite(str, l, 1, out);
 						str += l;
 					}
 					if (!*str)
 						break;
 					fprintf(out, "\\%c", *str++);
 				}
 				fputs("\"\n", out);
 				break;
 			case S_HEX:
 				str = sym_get_string_value(sym);
 				if (str[0] != '0' || (str[1] != 'x' && str[1] != 'X')) {
 					fprintf(out, "CONFIG_%s=%s\n", sym->name, str);
 					break;
 				}
 			case S_INT:
 				str = sym_get_string_value(sym);
 				fprintf(out, "CONFIG_%s=%s\n", sym->name, str);
 				break;
 			}
 		}

 	next:
 		if (menu->list) {
 			menu = menu->list;
 			continue;
 		}
 		if (menu->next)
 			menu = menu->next;
 		else while ((menu = menu->parent)) {
 			if (menu->next) {
 				menu = menu->next;
 				break;
 			}
 		}
 	}
 	fclose(out);

 	if (*tmpname) {
 		strcat(dirname, basename);
 		strcat(dirname, ".old");
 		UNLINK_IF_NECESSARY(dirname);
 		rename(newname, dirname);
 		if (rename(tmpname, newname))
 			return 1;
 	}

 	printf(_("#\n"
 		 "# configuration written to %s\n"
 		 "#\n"), newname);

 	sym_set_change_count(0);

 	return 0;
 }

 int conf_split_config(void)
 {
 	char *name, path[128];
 	char *s, *d, c;
 	struct symbol *sym;
 	struct stat sb;
 	int res, i, fd;

 	name = getenv("KCONFIG_AUTOCONFIG");
 	if (!name)
 		name = "include/config/auto.conf";
 	conf_read_simple(name, S_DEF_AUTO);

 	if (chdir("build"))
 		return 1;

 	res = 0;
 	for_all_symbols(i, sym) {
 		sym_calc_value(sym);
 		if ((sym->flags & SYMBOL_AUTO) || !sym->name)
 			continue;
 		if (sym->flags & SYMBOL_WRITE) {
 			if (sym->flags & SYMBOL_DEF_AUTO) {
 				/*
 				 * symbol has old and new value,
 				 * so compare them...
 				 */
 				switch (sym->type) {
 				case S_BOOLEAN:
 				case S_TRISTATE:
 					if (sym_get_tristate_value(sym) ==
 					    sym->def[S_DEF_AUTO].tri)
 						continue;
 					break;
 				case S_STRING:
 				case S_HEX:
 				case S_INT:
 					if (!strcmp(sym_get_string_value(sym),
 						    sym->def[S_DEF_AUTO].val))
 						continue;
 					break;
 				default:
 					break;
 				}
 			} else {
 				/*
 				 * If there is no old value, only 'no' (unset)
 				 * is allowed as new value.
 				 */
 				switch (sym->type) {
 				case S_BOOLEAN:
 				case S_TRISTATE:
 					if (sym_get_tristate_value(sym) == no)
 						continue;
 					break;
 				default:
 					break;
 				}
 			}
 		} else if (!(sym->flags & SYMBOL_DEF_AUTO))
 			/* There is neither an old nor a new value. */
 			continue;
 		/* else
 		 *	There is an old value, but no new value ('no' (unset)
 		 *	isn't saved in auto.conf, so the old value is always
 		 *	different from 'no').
 		 */

 		/* Replace all '_' and append ".h" */
 		s = sym->name;
 		d = path;
 		while ((c = *s++)) {
 			c = tolower(c);
 			*d++ = (c == '_') ? '/' : c;
 		}
 		strcpy(d, ".h");

 		/* Assume directory path already exists. */
 		fd = open(path, O_WRONLY | O_CREAT | O_TRUNC, 0644);
 		if (fd == -1) {
 			if (errno != ENOENT) {
 				res = 1;
 				break;
 			}
 			/*
 			 * Create directory components,
 			 * unless they exist already.
 			 */
 			d = path;
 			while ((d = strchr(d, '/'))) {
 				*d = 0;
 				if (stat(path, &sb) && mkdir(path, 0755)) {
 					res = 1;
 					goto out;
 				}
 				*d++ = '/';
 			}
 			/* Try it again. */
 			fd = open(path, O_WRONLY | O_CREAT | O_TRUNC, 0644);
 			if (fd == -1) {
 				res = 1;
 				break;
 			}
 		}
 		close(fd);
 	}
 out:
 	if (chdir("../.."))
 		return 1;

 	return res;
 }

 /*
  * Return malloced string the contents of which are a concatenation of the
  * directory name of the first argument and the second argument.
  */
 static char* get_tmp_file_name(const char* base, const char *tmp_name)
 {
         char *file_name, *p;
         /* for sure a few bytes longer than needed */
         int file_name_size = strlen(base) + sizeof(file_name) + 10;

         file_name = malloc(file_name_size);
         if (!file_name) {
                 fprintf(stderr, "%s:%d: failed to allocate %d bytes\n",
                         __FILE__, __LINE__, file_name_size);
                return 0;
         }

         strcpy(file_name, base);
         p = strrchr(file_name, '/');
         if (p)
                 strcpy(p + 1, tmp_name);
         else
                 strcpy(file_name, tmp_name);

         return file_name;
 }

 int conf_write_autoconf(void)
 {
 	struct symbol *sym;
 	const char *str;
 	char *name;
 	FILE *out, *out_h;
 	time_t now;
 	int i, l;
 	char *tmp_conf, *tmp_conf_h;

 	sym_clear_all_valid();

 	name = getenv("KCONFIG_AUTOHEADER");
 	if (!name)
 		name = "include/linux/autoconf.h";

 	tmp_conf = get_tmp_file_name(name, ".tmpconfig");
 	tmp_conf_h = get_tmp_file_name(name, ".tmpconfig.h");
 	if (!tmp_conf || !tmp_conf_h)
 		return 1;

 	file_write_dep("build/auto.conf.cmd");

 #if 0
 	if (conf_split_config())
 		return 1;
 #endif

 	out = fopen(tmp_conf, "w");
 	if (!out)
 		return 1;

 	out_h = fopen(tmp_conf_h, "w");
 	if (!out_h) {
 		fclose(out);
 		return 1;
 	}

 	sym = sym_lookup("KERNELVERSION", 0);
 	sym_calc_value(sym);
 	time(&now);
 	fprintf(out, "#\n"
 		     "# Automatically generated make config: don't edit\n"
 		     "# coreboot version: %s\n"
 		     "# %s"
 		     "#\n",
 		     getenv("KERNELVERSION")?getenv("KERNELVERSION"):"", ctime(&now));
 	fprintf(out_h, "/*\n"
 		       " * Automatically generated C config: don't edit\n"
 		       " * coreboot version: %s\n"
 		       " * %s"
 		       " */\n"
 		       "#define AUTOCONF_INCLUDED\n",
 		       getenv("KERNELVERSION")?getenv("KERNELVERSION"):"", ctime(&now));

 	for_all_symbols(i, sym) {
 		sym_calc_value(sym);
 		if (!sym->name)
 			continue;
 		if (!(sym->flags & SYMBOL_WRITE)) {
 			if (sym->type == S_BOOLEAN || sym->type == S_HEX
 			    || sym->type == S_INT)
 				fprintf(out_h, "#define CONFIG_%s 0\n",
 					sym->name);
 			continue;
 		}
 		switch (sym->type) {
 		case S_BOOLEAN:
 		case S_TRISTATE:
 			switch (sym_get_tristate_value(sym)) {
 			case no:
 				fprintf(out, "CONFIG_%s=n\n", sym->name);
 				fprintf(out_h, "#define CONFIG_%s 0\n", sym->name);
 				break;
 			case mod:
 				fprintf(out, "CONFIG_%s=m\n", sym->name);
 				fprintf(out_h, "#define CONFIG_%s_MODULE 1\n", sym->name);
 				break;
 			case yes:
 				fprintf(out, "CONFIG_%s=y\n", sym->name);
 				fprintf(out_h, "#define CONFIG_%s 1\n", sym->name);
 				break;
 			}
 			break;
 		case S_STRING:
 			str = sym_get_string_value(sym);
 			fprintf(out, "CONFIG_%s=\"", sym->name);
 			fprintf(out_h, "#define CONFIG_%s \"", sym->name);
 			while (1) {
 				l = strcspn(str, "\"\\");
 				if (l) {
 					fwrite(str, l, 1, out);
 					fwrite(str, l, 1, out_h);
 					str += l;
 				}
 				if (!*str)
 					break;
 				fprintf(out, "\\%c", *str);
 				fprintf(out_h, "\\%c", *str);
 				str++;
 			}
 			fputs("\"\n", out);
 			fputs("\"\n", out_h);
 			break;
 		case S_HEX:
 			str = sym_get_string_value(sym);
 			if (str[0] != '0' || (str[1] != 'x' && str[1] != 'X')) {
 				fprintf(out, "CONFIG_%s=%s\n", sym->name, str);
 				fprintf(out_h, "#define CONFIG_%s 0x%s\n", sym->name, str);
 				break;
 			}
 		case S_INT:
 			str = sym_get_string_value(sym);
 			fprintf(out, "CONFIG_%s=%s\n", sym->name, str);
 			fprintf(out_h, "#define CONFIG_%s %s\n", sym->name, str);
 			break;
 		default:
 			break;
 		}
 	}
 	fclose(out);
 	fclose(out_h);

 	UNLINK_IF_NECESSARY(name);
 	if (rename(tmp_conf_h, name))
 		return 1;
 	name = getenv("KCONFIG_AUTOCONFIG");
 	if (!name)
 		name = "include/config/auto.conf";
 	/*
 	 * This must be the last step, kbuild has a dependency on auto.conf
 	 * and this marks the successful completion of the previous steps.
 	 */
 	UNLINK_IF_NECESSARY(name);
 	if (rename(tmp_conf, name))
 		return 1;

 	free(tmp_conf_h);
 	free(tmp_conf);
 	return 0;
 }

 static int sym_change_count;
 static void (*conf_changed_callback)(void);

 void sym_set_change_count(int count)
 {
 	int _sym_change_count = sym_change_count;
 	sym_change_count = count;
 	if (conf_changed_callback &&
 	    (bool)_sym_change_count != (bool)count)
 		conf_changed_callback();
 }

 void sym_add_change_count(int count)
 {
 	sym_set_change_count(count + sym_change_count);
 }

 bool conf_get_changed(void)
 {
 	return sym_change_count;
 }

 void conf_set_changed_callback(void (*fn)(void))
 {
 	conf_changed_callback = fn;
 }
	/*
	* Copyright (C) 2002 Roman Zippel <zippel@linux-m68k.org>
	* Released under the terms of the GNU GPL v2.0.
	*/

	#include <sys/stat.h>
	#include <ctype.h>
	#include <fcntl.h>
	#include <stdio.h>
	#include <stdlib.h>
	#include <string.h>
	#include <time.h>
	#include <unistd.h>

	#define LKC_DIRECT_LINK
	#include "lkc.h"

	#ifdef WIN32
	#define mkdir(x,y) mkdir(x)
	#define UNLINK_IF_NECESSARY(x) unlink(x)
	#else
	#define UNLINK_IF_NECESSARY(X)
	#endif

	static void conf_warning(const char *fmt, ...)
	__attribute__ ((format (printf, 1, 2)));

	static const char *conf_filename;
	static int conf_lineno, conf_warnings, conf_unsaved;

	const char conf_defname[] = "arch/$ARCH/defconfig";

	static void conf_warning(const char *fmt, ...)
	{
	va_list ap;
	va_start(ap, fmt);
	fprintf(stderr, "%s:%d:warning: ", conf_filename, conf_lineno);
	vfprintf(stderr, fmt, ap);
	fprintf(stderr, "\n");
	va_end(ap);
	conf_warnings++;
	}

	const char *conf_get_configname(void)
	{
	char *name = getenv("KCONFIG_CONFIG");

	return name ? name : ".config";
	}

	static char conf_expand_value(const char in)
	{
	struct symbol *sym;
	const char *src;
	static char res_value[SYMBOL_MAXLENGTH];
	char *dst, name[SYMBOL_MAXLENGTH];

	res_value[0] = 0;
	dst = name;
	while ((src = strchr(in, '$'))) {
	strncat(res_value, in, src - in);
	src++;
	dst = name;
	while (isalnum(src) \|\| src == '_')
	dst++ = src++;
	*dst = 0;
	sym = sym_lookup(name, 0);
	sym_calc_value(sym);
	strcat(res_value, sym_get_string_value(sym));
	in = src;
	}
	strcat(res_value, in);

	return res_value;
	}

	char *conf_get_default_confname(void)
	{
	struct stat buf;
	static char fullname[PATH_MAX+1];
	char env, name;

	name = conf_expand_value(conf_defname);
	env = getenv(SRCTREE);
	if (env) {
	sprintf(fullname, "%s/%s", env, name);
	if (!stat(fullname, &buf))
	return fullname;
	}
	return name;
	}

	static int conf_set_sym_val(struct symbol sym, int def, int def_flags, char p)
	{
	char *p2;

	switch (sym->type) {
	case S_TRISTATE:
	if (p[0] == 'm') {
	sym->def[def].tri = mod;
	sym->flags \|= def_flags;
	break;
	}
	case S_BOOLEAN:
	if (p[0] == 'y') {
	sym->def[def].tri = yes;
	sym->flags \|= def_flags;
	break;
	}
	if (p[0] == 'n') {
	sym->def[def].tri = no;
	sym->flags \|= def_flags;
	break;
	}
	conf_warning("symbol value '%s' invalid for %s", p, sym->name);
	break;
	case S_OTHER:
	if (*p != '"') {
	for (p2 = p; p2 && !isspace(p2); p2++)
	;
	sym->type = S_STRING;
	goto done;
	}
	case S_STRING:
	if (*p++ != '"')
	break;
	for (p2 = p; (p2 = strpbrk(p2, "\"\\")); p2++) {
	if (*p2 == '"') {
	*p2 = 0;
	break;
	}
	memmove(p2, p2 + 1, strlen(p2));
	}
	if (!p2) {
	conf_warning("invalid string found");
	return 1;
	}
	case S_INT:
	case S_HEX:
	done:
	if (sym_string_valid(sym, p)) {
	sym->def[def].val = strdup(p);
	sym->flags \|= def_flags;
	} else {
	conf_warning("symbol value '%s' invalid for %s", p, sym->name);
	return 1;
	}
	break;
	default:
	;
	}
	return 0;
	}

	int conf_read_simple(const char *name, int def)
	{
	FILE *in = NULL;
	char line[1024];
	char p, p2;
	struct symbol *sym;
	int i, def_flags;

	if (name) {
	in = zconf_fopen(name);
	} else {
	struct property *prop;

	name = conf_get_configname();
	in = zconf_fopen(name);
	if (in)
	goto load;
	sym_add_change_count(1);
	if (!sym_defconfig_list)
	return 1;

	for_all_defaults(sym_defconfig_list, prop) {
	if (expr_calc_value(prop->visible.expr) == no \|\|
	prop->expr->type != E_SYMBOL)
	continue;
	name = conf_expand_value(prop->expr->left.sym->name);
	in = zconf_fopen(name);
	if (in) {
	printf(_("#\n"
	"# using defaults found in %s\n"
	"#\n"), name);
	goto load;
	}
	}
	}
	if (!in)
	return 1;

	load:
	conf_filename = name;
	conf_lineno = 0;
	conf_warnings = 0;
	conf_unsaved = 0;

	def_flags = SYMBOL_DEF << def;
	for_all_symbols(i, sym) {
	sym->flags \|= SYMBOL_CHANGED;
	sym->flags &= ~(def_flags\|SYMBOL_VALID);
	if (sym_is_choice(sym))
	sym->flags \|= def_flags;
	switch (sym->type) {
	case S_INT:
	case S_HEX:
	case S_STRING:
	if (sym->def[def].val)
	free(sym->def[def].val);
	default:
	sym->def[def].val = NULL;
	sym->def[def].tri = no;
	}
	}

	while (fgets(line, sizeof(line), in)) {
	conf_lineno++;
	sym = NULL;
	switch (line[0]) {
	case '#':
	if (memcmp(line + 2, "CONFIG_", 7))
	continue;
	p = strchr(line + 9, ' ');
	if (!p)
	continue;
	*p++ = 0;
	if (strncmp(p, "is not set", 10))
	continue;
	if (def == S_DEF_USER) {
	sym = sym_find(line + 9);
	if (!sym) {
	conf_warning("trying to assign nonexistent symbol %s", line + 9);
	break;
	}
	} else {
	sym = sym_lookup(line + 9, 0);
	if (sym->type == S_UNKNOWN)
	sym->type = S_BOOLEAN;
	}
	if (sym->flags & def_flags) {
	conf_warning("override: reassigning to symbol %s", sym->name);
	}
	switch (sym->type) {
	case S_BOOLEAN:
	case S_TRISTATE:
	sym->def[def].tri = no;
	sym->flags \|= def_flags;
	break;
	default:
	;
	}
	break;
	case 'C':
	if (memcmp(line, "CONFIG_", 7)) {
	conf_warning("unexpected data");
	continue;
	}
	p = strchr(line + 7, '=');
	if (!p)
	continue;
	*p++ = 0;
	p2 = strchr(p, '\n');
	if (p2) {
	*p2-- = 0;
	if (*p2 == '\r')
	*p2 = 0;
	}
	if (def == S_DEF_USER) {
	sym = sym_find(line + 7);
	if (!sym) {
	conf_warning("trying to assign nonexistent symbol %s", line + 7);
	break;
	}
	} else {
	sym = sym_lookup(line + 7, 0);
	if (sym->type == S_UNKNOWN)
	sym->type = S_OTHER;
	}
	if (sym->flags & def_flags) {
	conf_warning("override: reassigning to symbol %s", sym->name);
	}
	if (conf_set_sym_val(sym, def, def_flags, p))
	continue;
	break;
	case '\r':
	case '\n':
	break;
	default:
	conf_warning("unexpected data");
	continue;
	}
	if (sym && sym_is_choice_value(sym)) {
	struct symbol *cs = prop_get_symbol(sym_get_choice_prop(sym));
	switch (sym->def[def].tri) {
	case no:
	break;
	case mod:
	if (cs->def[def].tri == yes) {
	conf_warning("%s creates inconsistent choice state", sym->name);
	cs->flags &= ~def_flags;
	}
	break;
	case yes:
	if (cs->def[def].tri != no)
	conf_warning("override: %s changes choice state", sym->name);
	cs->def[def].val = sym;
	break;
	}
	cs->def[def].tri = EXPR_OR(cs->def[def].tri, sym->def[def].tri);
	}
	}
	fclose(in);

	if (modules_sym)
	sym_calc_value(modules_sym);
	return 0;
	}

	int conf_read(const char *name)
	{
	struct symbol sym, choice_sym;
	struct property *prop;
	struct expr *e;
	int i, flags;

	sym_set_change_count(0);

	if (conf_read_simple(name, S_DEF_USER))
	return 1;

	for_all_symbols(i, sym) {
	sym_calc_value(sym);
	if (sym_is_choice(sym) \|\| (sym->flags & SYMBOL_AUTO))
	goto sym_ok;
	if (sym_has_value(sym) && (sym->flags & SYMBOL_WRITE)) {
	/* check that calculated value agrees with saved value */
	switch (sym->type) {
	case S_BOOLEAN:
	case S_TRISTATE:
	if (sym->def[S_DEF_USER].tri != sym_get_tristate_value(sym))
	break;
	if (!sym_is_choice(sym))
	goto sym_ok;
	default:
	if (!strcmp(sym->curr.val, sym->def[S_DEF_USER].val))
	goto sym_ok;
	break;
	}
	} else if (!sym_has_value(sym) && !(sym->flags & SYMBOL_WRITE))
	/* no previous value and not saved */
	goto sym_ok;
	conf_unsaved++;
	/* maybe print value in verbose mode... */
	sym_ok:
	if (!sym_is_choice(sym))
	continue;
	/* The choice symbol only has a set value (and thus is not new)
	* if all its visible childs have values.
	*/
	prop = sym_get_choice_prop(sym);
	flags = sym->flags;
	expr_list_for_each_sym(prop->expr, e, choice_sym)
	if (choice_sym->visible != no)
	flags &= choice_sym->flags;
	sym->flags &= flags \| ~SYMBOL_DEF_USER;
	}

	for_all_symbols(i, sym) {
	if (sym_has_value(sym) && !sym_is_choice_value(sym)) {
	/* Reset values of generates values, so they'll appear
	* as new, if they should become visible, but that
	* doesn't quite work if the Kconfig and the saved
	* configuration disagree.
	*/
	if (sym->visible == no && !conf_unsaved)
	sym->flags &= ~SYMBOL_DEF_USER;
	switch (sym->type) {
	case S_STRING:
	case S_INT:
	case S_HEX:
	/* Reset a string value if it's out of range */
	if (sym_string_within_range(sym, sym->def[S_DEF_USER].val))
	break;
	sym->flags &= ~(SYMBOL_VALID\|SYMBOL_DEF_USER);
	conf_unsaved++;
	break;
	default:
	break;
	}
	}
	}

	sym_add_change_count(conf_warnings \|\| conf_unsaved);

	return 0;
	}

	int conf_write(const char *name)
	{
	FILE *out;
	struct symbol *sym;
	struct menu *menu;
	const char *basename;
	char dirname[128], tmpname[128], newname[128];
	int type, l;
	const char *str;
	time_t now;
	int use_timestamp = 1;
	char *env;

	dirname[0] = 0;
	if (name && name[0]) {
	struct stat st;
	char *slash;

	if (!stat(name, &st) && S_ISDIR(st.st_mode)) {
	strcpy(dirname, name);
	strcat(dirname, "/");
	basename = conf_get_configname();
	} else if ((slash = strrchr(name, '/'))) {
	int size = slash - name + 1;
	memcpy(dirname, name, size);
	dirname[size] = 0;
	if (slash[1])
	basename = slash + 1;
	else
	basename = conf_get_configname();
	} else
	basename = name;
	} else
	basename = conf_get_configname();

	sprintf(newname, "%s%s", dirname, basename);
	env = getenv("KCONFIG_OVERWRITECONFIG");
	if (!env \|\| !*env) {
	sprintf(tmpname, "%s.tmpconfig.%d", dirname, (int)getpid());
	out = fopen(tmpname, "w");
	} else {
	*tmpname = 0;
	out = fopen(newname, "w");
	}
	if (!out)
	return 1;

	sym = sym_lookup("KERNELVERSION", 0);
	sym_calc_value(sym);
	time(&now);
	env = getenv("KCONFIG_NOTIMESTAMP");
	if (env && *env)
	use_timestamp = 0;

	fprintf(out, _("#\n"
	"# Automatically generated make config: don't edit\n"
	"# coreboot version: %s\n"
	"%s%s"
	"#\n"),
	getenv("KERNELVERSION")?getenv("KERNELVERSION"):"",
	use_timestamp ? "# " : "",
	use_timestamp ? ctime(&now) : "");

	if (!conf_get_changed())
	sym_clear_all_valid();

	menu = rootmenu.list;
	while (menu) {
	sym = menu->sym;
	if (!sym) {
	if (!menu_is_visible(menu))
	goto next;
	str = menu_get_prompt(menu);
	fprintf(out, "\n"
	"#\n"
	"# %s\n"
	"#\n", str);
	} else if (!(sym->flags & SYMBOL_CHOICE)) {
	sym_calc_value(sym);
	if (!(sym->flags & SYMBOL_WRITE))
	goto next;
	sym->flags &= ~SYMBOL_WRITE;
	type = sym->type;
	if (type == S_TRISTATE) {
	sym_calc_value(modules_sym);
	if (modules_sym->curr.tri == no)
	type = S_BOOLEAN;
	}
	switch (type) {
	case S_BOOLEAN:
	case S_TRISTATE:
	switch (sym_get_tristate_value(sym)) {
	case no:
	fprintf(out, "# CONFIG_%s is not set\n", sym->name);
	break;
	case mod:
	fprintf(out, "CONFIG_%s=m\n", sym->name);
	break;
	case yes:
	fprintf(out, "CONFIG_%s=y\n", sym->name);
	break;
	}
	break;
	case S_STRING:
	str = sym_get_string_value(sym);
	fprintf(out, "CONFIG_%s=\"", sym->name);
	while (1) {
	l = strcspn(str, "\"\\");
	if (l) {
	fwrite(str, l, 1, out);
	str += l;
	}
	if (!*str)
	break;
	fprintf(out, "\\%c", *str++);
	}
	fputs("\"\n", out);
	break;
	case S_HEX:
	str = sym_get_string_value(sym);
	if (str[0] != '0' \|\| (str[1] != 'x' && str[1] != 'X')) {
	fprintf(out, "CONFIG_%s=%s\n", sym->name, str);
	break;
	}
	case S_INT:
	str = sym_get_string_value(sym);
	fprintf(out, "CONFIG_%s=%s\n", sym->name, str);
	break;
	}
	}

	next:
	if (menu->list) {
	menu = menu->list;
	continue;
	}
	if (menu->next)
	menu = menu->next;
	else while ((menu = menu->parent)) {
	if (menu->next) {
	menu = menu->next;
	break;
	}
	}
	}
	fclose(out);

	if (*tmpname) {
	strcat(dirname, basename);
	strcat(dirname, ".old");
	UNLINK_IF_NECESSARY(dirname);
	rename(newname, dirname);
	if (rename(tmpname, newname))
	return 1;
	}

	printf(_("#\n"
	"# configuration written to %s\n"
	"#\n"), newname);

	sym_set_change_count(0);

	return 0;
	}

	int conf_split_config(void)
	{
	char *name, path[128];
	char s, d, c;
	struct symbol *sym;
	struct stat sb;
	int res, i, fd;

	name = getenv("KCONFIG_AUTOCONFIG");
	if (!name)
	name = "include/config/auto.conf";
	conf_read_simple(name, S_DEF_AUTO);

	if (chdir("build"))
	return 1;

	res = 0;
	for_all_symbols(i, sym) {
	sym_calc_value(sym);
	if ((sym->flags & SYMBOL_AUTO) \|\| !sym->name)
	continue;
	if (sym->flags & SYMBOL_WRITE) {
	if (sym->flags & SYMBOL_DEF_AUTO) {
	/*
	* symbol has old and new value,
	* so compare them...
	*/
	switch (sym->type) {
	case S_BOOLEAN:
	case S_TRISTATE:
	if (sym_get_tristate_value(sym) ==
	sym->def[S_DEF_AUTO].tri)
	continue;
	break;
	case S_STRING:
	case S_HEX:
	case S_INT:
	if (!strcmp(sym_get_string_value(sym),
	sym->def[S_DEF_AUTO].val))
	continue;
	break;
	default:
	break;
	}
	} else {
	/*
	* If there is no old value, only 'no' (unset)
	* is allowed as new value.
	*/
	switch (sym->type) {
	case S_BOOLEAN:
	case S_TRISTATE:
	if (sym_get_tristate_value(sym) == no)
	continue;
	break;
	default:
	break;
	}
	}
	} else if (!(sym->flags & SYMBOL_DEF_AUTO))
	/* There is neither an old nor a new value. */
	continue;
	/* else
	* There is an old value, but no new value ('no' (unset)
	* isn't saved in auto.conf, so the old value is always
	* different from 'no').
	*/

	/* Replace all '_' and append ".h" */
	s = sym->name;
	d = path;
	while ((c = *s++)) {
	c = tolower(c);
	*d++ = (c == '_') ? '/' : c;
	}
	strcpy(d, ".h");

	/* Assume directory path already exists. */
	fd = open(path, O_WRONLY \| O_CREAT \| O_TRUNC, 0644);
	if (fd == -1) {
	if (errno != ENOENT) {
	res = 1;
	break;
	}
	/*
	* Create directory components,
	* unless they exist already.
	*/
	d = path;
	while ((d = strchr(d, '/'))) {
	*d = 0;
	if (stat(path, &sb) && mkdir(path, 0755)) {
	res = 1;
	goto out;
	}
	*d++ = '/';
	}
	/* Try it again. */
	fd = open(path, O_WRONLY \| O_CREAT \| O_TRUNC, 0644);
	if (fd == -1) {
	res = 1;
	break;
	}
	}
	close(fd);
	}
	out:
	if (chdir("../.."))
	return 1;

	return res;
	}

	/*
	* Return malloced string the contents of which are a concatenation of the
	* directory name of the first argument and the second argument.
	*/
	static char* get_tmp_file_name(const char* base, const char *tmp_name)
	{
	char file_name, p;
	/* for sure a few bytes longer than needed */
	int file_name_size = strlen(base) + sizeof(file_name) + 10;

	file_name = malloc(file_name_size);
	if (!file_name) {
	fprintf(stderr, "%s:%d: failed to allocate %d bytes\n",
	__FILE__, __LINE__, file_name_size);
	return 0;
	}

	strcpy(file_name, base);
	p = strrchr(file_name, '/');
	if (p)
	strcpy(p + 1, tmp_name);
	else
	strcpy(file_name, tmp_name);

	return file_name;
	}

	int conf_write_autoconf(void)
	{
	struct symbol *sym;
	const char *str;
	char *name;
	FILE out, out_h;
	time_t now;
	int i, l;
	char tmp_conf, tmp_conf_h;

	sym_clear_all_valid();

	name = getenv("KCONFIG_AUTOHEADER");
	if (!name)
	name = "include/linux/autoconf.h";

	tmp_conf = get_tmp_file_name(name, ".tmpconfig");
	tmp_conf_h = get_tmp_file_name(name, ".tmpconfig.h");
	if (!tmp_conf \|\| !tmp_conf_h)
	return 1;

	file_write_dep("build/auto.conf.cmd");

	#if 0
	if (conf_split_config())
	return 1;
	#endif

	out = fopen(tmp_conf, "w");
	if (!out)
	return 1;

	out_h = fopen(tmp_conf_h, "w");
	if (!out_h) {
	fclose(out);
	return 1;
	}

	sym = sym_lookup("KERNELVERSION", 0);
	sym_calc_value(sym);
	time(&now);
	fprintf(out, "#\n"
	"# Automatically generated make config: don't edit\n"
	"# coreboot version: %s\n"
	"# %s"
	"#\n",
	getenv("KERNELVERSION")?getenv("KERNELVERSION"):"", ctime(&now));
	fprintf(out_h, "/*\n"
	" * Automatically generated C config: don't edit\n"
	" * coreboot version: %s\n"
	" * %s"
	" */\n"
	"#define AUTOCONF_INCLUDED\n",
	getenv("KERNELVERSION")?getenv("KERNELVERSION"):"", ctime(&now));

	for_all_symbols(i, sym) {
	sym_calc_value(sym);
	if (!sym->name)
	continue;
	if (!(sym->flags & SYMBOL_WRITE)) {
	if (sym->type == S_BOOLEAN \|\| sym->type == S_HEX
	\|\| sym->type == S_INT)
	fprintf(out_h, "#define CONFIG_%s 0\n",
	sym->name);
	continue;
	}
	switch (sym->type) {
	case S_BOOLEAN:
	case S_TRISTATE:
	switch (sym_get_tristate_value(sym)) {
	case no:
	fprintf(out, "CONFIG_%s=n\n", sym->name);
	fprintf(out_h, "#define CONFIG_%s 0\n", sym->name);
	break;
	case mod:
	fprintf(out, "CONFIG_%s=m\n", sym->name);
	fprintf(out_h, "#define CONFIG_%s_MODULE 1\n", sym->name);
	break;
	case yes:
	fprintf(out, "CONFIG_%s=y\n", sym->name);
	fprintf(out_h, "#define CONFIG_%s 1\n", sym->name);
	break;
	}
	break;
	case S_STRING:
	str = sym_get_string_value(sym);
	fprintf(out, "CONFIG_%s=\"", sym->name);
	fprintf(out_h, "#define CONFIG_%s \"", sym->name);
	while (1) {
	l = strcspn(str, "\"\\");
	if (l) {
	fwrite(str, l, 1, out);
	fwrite(str, l, 1, out_h);
	str += l;
	}
	if (!*str)
	break;
	fprintf(out, "\\%c", *str);
	fprintf(out_h, "\\%c", *str);
	str++;
	}
	fputs("\"\n", out);
	fputs("\"\n", out_h);
	break;
	case S_HEX:
	str = sym_get_string_value(sym);
	if (str[0] != '0' \|\| (str[1] != 'x' && str[1] != 'X')) {
	fprintf(out, "CONFIG_%s=%s\n", sym->name, str);
	fprintf(out_h, "#define CONFIG_%s 0x%s\n", sym->name, str);
	break;
	}
	case S_INT:
	str = sym_get_string_value(sym);
	fprintf(out, "CONFIG_%s=%s\n", sym->name, str);
	fprintf(out_h, "#define CONFIG_%s %s\n", sym->name, str);
	break;
	default:
	break;
	}
	}
	fclose(out);
	fclose(out_h);

	UNLINK_IF_NECESSARY(name);
	if (rename(tmp_conf_h, name))
	return 1;
	name = getenv("KCONFIG_AUTOCONFIG");
	if (!name)
	name = "include/config/auto.conf";
	/*
	* This must be the last step, kbuild has a dependency on auto.conf
	* and this marks the successful completion of the previous steps.
	*/
	UNLINK_IF_NECESSARY(name);
	if (rename(tmp_conf, name))
	return 1;

	free(tmp_conf_h);
	free(tmp_conf);
	return 0;
	}

	static int sym_change_count;
	static void (*conf_changed_callback)(void);

	void sym_set_change_count(int count)
	{
	int _sym_change_count = sym_change_count;
	sym_change_count = count;
	if (conf_changed_callback &&
	(bool)_sym_change_count != (bool)count)
	conf_changed_callback();
	}

	void sym_add_change_count(int count)
	{
	sym_set_change_count(count + sym_change_count);
	}

	bool conf_get_changed(void)
	{
	return sym_change_count;
	}

	void conf_set_changed_callback(void (*fn)(void))
	{
	conf_changed_callback = fn;
	}