1217 lines · 23.9 KB · C
RawDownload
// SPDX-License-Identifier: GPL-2.0/* * Copyright (C) 2002 Roman Zippel <zippel@linux-m68k.org> */ #include <sys/mman.h>#include <sys/stat.h>#include <sys/types.h>#include <ctype.h>#include <errno.h>#include <fcntl.h>#include <limits.h>#include <stdarg.h>#include <stdbool.h>#include <stdio.h>#include <stdlib.h>#include <string.h>#include <time.h>#include <unistd.h> #include "internal.h"#include "lkc.h" struct gstr autoconf_cmd; /* return true if 'path' exists, false otherwise */static bool is_present(const char *path){	struct stat st; 	return !stat(path, &st);} /* return true if 'path' exists and it is a directory, false otherwise */static bool is_dir(const char *path){	struct stat st; 	if (stat(path, &st))		return false; 	return S_ISDIR(st.st_mode);} /* return true if the given two files are the same, false otherwise */static bool is_same(const char *file1, const char *file2){	int fd1, fd2;	struct stat st1, st2;	void *map1, *map2;	bool ret = false; 	fd1 = open(file1, O_RDONLY);	if (fd1 < 0)		return ret; 	fd2 = open(file2, O_RDONLY);	if (fd2 < 0)		goto close1; 	ret = fstat(fd1, &st1);	if (ret)		goto close2;	ret = fstat(fd2, &st2);	if (ret)		goto close2; 	if (st1.st_size != st2.st_size)		goto close2; 	map1 = mmap(NULL, st1.st_size, PROT_READ, MAP_PRIVATE, fd1, 0);	if (map1 == MAP_FAILED)		goto close2; 	map2 = mmap(NULL, st2.st_size, PROT_READ, MAP_PRIVATE, fd2, 0);	if (map2 == MAP_FAILED)		goto close2; 	if (bcmp(map1, map2, st1.st_size))		goto close2; 	ret = true;close2:	close(fd2);close1:	close(fd1); 	return ret;} /* * Create the parent directory of the given path. * * For example, if 'include/config/auto.conf' is given, create 'include/config'. */static int make_parent_dir(const char *path){	char tmp[PATH_MAX + 1];	char *p; 	strncpy(tmp, path, sizeof(tmp));	tmp[sizeof(tmp) - 1] = 0; 	/* Remove the base name. Just return if nothing is left */	p = strrchr(tmp, '/');	if (!p)		return 0;	*(p + 1) = 0; 	/* Just in case it is an absolute path */	p = tmp;	while (*p == '/')		p++; 	while ((p = strchr(p, '/'))) {		*p = 0; 		/* skip if the directory exists */		if (!is_dir(tmp) && mkdir(tmp, 0755))			return -1; 		*p = '/';		while (*p == '/')			p++;	} 	return 0;} static char depfile_path[PATH_MAX];static size_t depfile_prefix_len; /* touch depfile for symbol 'name' */static int conf_touch_dep(const char *name){	int fd; 	/* check overflow: prefix + name + '\0' must fit in buffer. */	if (depfile_prefix_len + strlen(name) + 1 > sizeof(depfile_path))		return -1; 	strcpy(depfile_path + depfile_prefix_len, name); 	fd = open(depfile_path, O_WRONLY | O_CREAT | O_TRUNC, 0644);	if (fd == -1)		return -1;	close(fd); 	return 0;} static void conf_warning(const char *fmt, ...)	__attribute__ ((format (printf, 1, 2))); static void conf_message(const char *fmt, ...)	__attribute__ ((format (printf, 1, 2))); static const char *conf_filename;static int conf_lineno, conf_warnings; bool conf_errors(void){	if (conf_warnings)		return getenv("KCONFIG_WERROR");	return false;} 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++;} static void conf_default_message_callback(const char *s){	printf("#\n# ");	printf("%s", s);	printf("\n#\n");} static void (*conf_message_callback)(const char *s) =	conf_default_message_callback;void conf_set_message_callback(void (*fn)(const char *s)){	conf_message_callback = fn;} static void conf_message(const char *fmt, ...){	va_list ap;	char buf[4096]; 	if (!conf_message_callback)		return; 	va_start(ap, fmt); 	vsnprintf(buf, sizeof(buf), fmt, ap);	conf_message_callback(buf);	va_end(ap);} const char *conf_get_configname(void){	char *name = getenv("KCONFIG_CONFIG"); 	return name ? name : ".config";} static const char *conf_get_autoconfig_name(void){	char *name = getenv("KCONFIG_AUTOCONFIG"); 	return name ? name : "include/config/auto.conf";} static const char *conf_get_autoheader_name(void){	char *name = getenv("KCONFIG_AUTOHEADER"); 	return name ? name : "include/generated/autoconf.h";} static const char *conf_get_rustccfg_name(void){	char *name = getenv("KCONFIG_RUSTCCFG"); 	return name ? name : "include/generated/rustc_cfg";} 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;		}		/* fall through */	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;		}		if (def != S_DEF_AUTO)			conf_warning("symbol value '%s' invalid for %s",				     p, sym->name);		return 1;	case S_STRING:		/* No escaping for S_DEF_AUTO (include/config/auto.conf) */		if (def != S_DEF_AUTO) {			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;			}		}		/* fall through */	case S_INT:	case S_HEX:		if (sym_string_valid(sym, p)) {			sym->def[def].val = xstrdup(p);			sym->flags |= def_flags;		} else {			if (def != S_DEF_AUTO)				conf_warning("symbol value '%s' invalid for %s",					     p, sym->name);			return 1;		}		break;	default:		;	}	return 0;} /* like getline(), but the newline character is stripped away */static ssize_t getline_stripped(char **lineptr, size_t *n, FILE *stream){	ssize_t len; 	len = getline(lineptr, n, stream); 	if (len > 0 && (*lineptr)[len - 1] == '\n') {		len--;		(*lineptr)[len] = '\0'; 		if (len > 0 && (*lineptr)[len - 1] == '\r') {			len--;			(*lineptr)[len] = '\0';		}	} 	return len;} int conf_read_simple(const char *name, int def){	FILE *in = NULL;	char   *line = NULL;	size_t  line_asize = 0;	char *p, *val;	struct symbol *sym;	int def_flags;	const char *warn_unknown, *sym_name; 	warn_unknown = getenv("KCONFIG_WARN_UNKNOWN_SYMBOLS");	if (name) {		in = zconf_fopen(name);	} else {		char *env; 		name = conf_get_configname();		in = zconf_fopen(name);		if (in)			goto load;		conf_set_changed(true); 		env = getenv("KCONFIG_DEFCONFIG_LIST");		if (!env)			return 1; 		while (1) {			bool is_last; 			while (isspace(*env))				env++; 			if (!*env)				break; 			p = env;			while (*p && !isspace(*p))				p++; 			is_last = (*p == '\0'); 			*p = '\0'; 			in = zconf_fopen(env);			if (in) {				conf_message("using defaults found in %s",					     env);				goto load;			} 			if (is_last)				break; 			env = p + 1;		}	}	if (!in)		return 1; load:	conf_filename = name;	conf_lineno = 0;	conf_warnings = 0; 	def_flags = SYMBOL_DEF << def;	for_all_symbols(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:			free(sym->def[def].val);			/* fall through */		default:			sym->def[def].val = NULL;			sym->def[def].tri = no;		}	} 	while (getline_stripped(&line, &line_asize, in) != -1) {		conf_lineno++; 		if (!line[0]) /* blank line */			continue; 		if (line[0] == '#') {			if (line[1] != ' ')				continue;			p = line + 2;			if (memcmp(p, CONFIG_, strlen(CONFIG_)))				continue;			sym_name = p + strlen(CONFIG_);			p = strchr(sym_name, ' ');			if (!p)				continue;			*p++ = 0;			if (strcmp(p, "is not set"))				continue; 			val = "n";		} else {			if (memcmp(line, CONFIG_, strlen(CONFIG_))) {				conf_warning("unexpected data: %s", line);				continue;			} 			sym_name = line + strlen(CONFIG_);			p = strchr(sym_name, '=');			if (!p) {				conf_warning("unexpected data: %s", line);				continue;			}			*p = 0;			val = p + 1;		} 		sym = sym_find(sym_name);		if (!sym) {			if (def == S_DEF_AUTO) {				/*				 * Reading from include/config/auto.conf.				 * If CONFIG_FOO previously existed in auto.conf				 * but it is missing now, include/config/FOO				 * must be touched.				 */				conf_touch_dep(sym_name);			} else {				if (warn_unknown)					conf_warning("unknown symbol: %s", sym_name); 				conf_set_changed(true);			}			continue;		} 		if (sym->flags & def_flags)			conf_warning("override: reassigning to symbol %s", sym->name); 		if (conf_set_sym_val(sym, def, def_flags, val))			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);		}	}	free(line);	fclose(in); 	return 0;} int conf_read(const char *name){	struct symbol *sym;	int conf_unsaved = 0; 	conf_set_changed(false); 	if (conf_read_simple(name, S_DEF_USER)) {		sym_calc_value(modules_sym);		return 1;	} 

Lines 1–500 of 1217.