| /* |
| * 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 <stdio.h> |
| #include <stdlib.h> |
| #include <string.h> |
| #include <time.h> |
| #include <unistd.h> |
| |
| #define LKC_DIRECT_LINK |
| #include "lkc.h" |
| |
| 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_def_filename[] = ".config"; |
| |
| const char conf_defname[] = "arch/$ARCH/defconfig"; |
| |
| const char *conf_confnames[] = { |
| ".config", |
| "/lib/modules/$UNAME_RELEASE/.config", |
| "/etc/kernel-config", |
| "/boot/config-$UNAME_RELEASE", |
| conf_defname, |
| NULL, |
| }; |
| |
| 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 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; |
| } |
| |
| int conf_read_simple(const char *name) |
| { |
| FILE *in = NULL; |
| char line[1024]; |
| char *p, *p2; |
| struct symbol *sym; |
| int i; |
| |
| if (name) { |
| in = zconf_fopen(name); |
| } else { |
| const char **names = conf_confnames; |
| while ((name = *names++)) { |
| name = conf_expand_value(name); |
| in = zconf_fopen(name); |
| if (in) { |
| printf(_("#\n" |
| "# using defaults found in %s\n" |
| "#\n"), name); |
| break; |
| } |
| } |
| } |
| if (!in) |
| return 1; |
| |
| conf_filename = name; |
| conf_lineno = 0; |
| conf_warnings = 0; |
| conf_unsaved = 0; |
| |
| for_all_symbols(i, sym) { |
| sym->flags |= SYMBOL_NEW | SYMBOL_CHANGED; |
| if (sym_is_choice(sym)) |
| sym->flags &= ~SYMBOL_NEW; |
| sym->flags &= ~SYMBOL_VALID; |
| switch (sym->type) { |
| case S_INT: |
| case S_HEX: |
| case S_STRING: |
| if (sym->user.val) |
| free(sym->user.val); |
| default: |
| sym->user.val = NULL; |
| sym->user.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; |
| sym = sym_find(line + 9); |
| if (!sym) { |
| conf_warning("trying to assign nonexistent symbol %s", line + 9); |
| break; |
| } else if (!(sym->flags & SYMBOL_NEW)) { |
| conf_warning("trying to reassign symbol %s", sym->name); |
| break; |
| } |
| switch (sym->type) { |
| case S_BOOLEAN: |
| case S_TRISTATE: |
| sym->user.tri = no; |
| sym->flags &= ~SYMBOL_NEW; |
| 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; |
| sym = sym_find(line + 7); |
| if (!sym) { |
| conf_warning("trying to assign nonexistent symbol %s", line + 7); |
| break; |
| } else if (!(sym->flags & SYMBOL_NEW)) { |
| conf_warning("trying to reassign symbol %s", sym->name); |
| break; |
| } |
| switch (sym->type) { |
| case S_TRISTATE: |
| if (p[0] == 'm') { |
| sym->user.tri = mod; |
| sym->flags &= ~SYMBOL_NEW; |
| break; |
| } |
| case S_BOOLEAN: |
| if (p[0] == 'y') { |
| sym->user.tri = yes; |
| sym->flags &= ~SYMBOL_NEW; |
| break; |
| } |
| if (p[0] == 'n') { |
| sym->user.tri = no; |
| sym->flags &= ~SYMBOL_NEW; |
| break; |
| } |
| conf_warning("symbol value '%s' invalid for %s", p, sym->name); |
| break; |
| 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"); |
| continue; |
| } |
| case S_INT: |
| case S_HEX: |
| if (sym_string_valid(sym, p)) { |
| sym->user.val = strdup(p); |
| sym->flags &= ~SYMBOL_NEW; |
| } else { |
| conf_warning("symbol value '%s' invalid for %s", p, sym->name); |
| continue; |
| } |
| break; |
| default: |
| ; |
| } |
| break; |
| 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->user.tri) { |
| case no: |
| break; |
| case mod: |
| if (cs->user.tri == yes) { |
| conf_warning("%s creates inconsistent choice state", sym->name); |
| cs->flags |= SYMBOL_NEW; |
| } |
| break; |
| case yes: |
| if (cs->user.tri != no) { |
| conf_warning("%s creates inconsistent choice state", sym->name); |
| cs->flags |= SYMBOL_NEW; |
| } else |
| cs->user.val = sym; |
| break; |
| } |
| cs->user.tri = E_OR(cs->user.tri, sym->user.tri); |
| } |
| } |
| fclose(in); |
| |
| if (modules_sym) |
| sym_calc_value(modules_sym); |
| return 0; |
| } |
| |
| int conf_read(const char *name) |
| { |
| struct symbol *sym; |
| struct property *prop; |
| struct expr *e; |
| int i; |
| |
| if (conf_read_simple(name)) |
| 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->user.tri != sym_get_tristate_value(sym)) |
| break; |
| if (!sym_is_choice(sym)) |
| goto sym_ok; |
| default: |
| if (!strcmp(sym->curr.val, sym->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_has_value(sym) && !sym_is_choice_value(sym)) { |
| if (sym->visible == no) |
| sym->flags |= SYMBOL_NEW; |
| switch (sym->type) { |
| case S_STRING: |
| case S_INT: |
| case S_HEX: |
| if (!sym_string_within_range(sym, sym->user.val)) { |
| sym->flags |= SYMBOL_NEW; |
| sym->flags &= ~SYMBOL_VALID; |
| } |
| default: |
| break; |
| } |
| } |
| if (!sym_is_choice(sym)) |
| continue; |
| prop = sym_get_choice_prop(sym); |
| for (e = prop->expr; e; e = e->left.expr) |
| if (e->right.sym->visible != no) |
| sym->flags |= e->right.sym->flags & SYMBOL_NEW; |
| } |
| |
| sym_change_count = conf_warnings || conf_unsaved; |
| |
| return 0; |
| } |
| |
| int conf_write(const char *name) |
| { |
| FILE *out, *out_h; |
| 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_def_filename; |
| } 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_def_filename; |
| } else |
| basename = name; |
| } else |
| basename = conf_def_filename; |
| |
| sprintf(newname, "%s.tmpconfig.%d", dirname, (int)getpid()); |
| out = fopen(newname, "w"); |
| if (!out) |
| return 1; |
| out_h = NULL; |
| if (!name) { |
| out_h = fopen(".tmpconfig.h", "w"); |
| if (!out_h) |
| return 1; |
| file_write_dep(NULL); |
| } |
| 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" |
| "# Linux kernel version: %s\n" |
| "%s%s" |
| "#\n"), |
| sym_get_string_value(sym), |
| use_timestamp ? "# " : "", |
| use_timestamp ? ctime(&now) : ""); |
| if (out_h) |
| fprintf(out_h, "/*\n" |
| " * Automatically generated C config: don't edit\n" |
| " * Linux kernel version: %s\n" |
| "%s%s" |
| " */\n" |
| "#define AUTOCONF_INCLUDED\n", |
| sym_get_string_value(sym), |
| use_timestamp ? " * " : "", |
| use_timestamp ? ctime(&now) : ""); |
| |
| if (!sym_change_count) |
| 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); |
| if (out_h) |
| fprintf(out_h, "\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); |
| if (out_h) |
| fprintf(out_h, "#undef CONFIG_%s\n", sym->name); |
| break; |
| case mod: |
| fprintf(out, "CONFIG_%s=m\n", sym->name); |
| if (out_h) |
| fprintf(out_h, "#define CONFIG_%s_MODULE 1\n", sym->name); |
| break; |
| case yes: |
| fprintf(out, "CONFIG_%s=y\n", sym->name); |
| if (out_h) |
| fprintf(out_h, "#define CONFIG_%s 1\n", sym->name); |
| break; |
| } |
| break; |
| case S_STRING: |
| // fix me |
| str = sym_get_string_value(sym); |
| fprintf(out, "CONFIG_%s=\"", sym->name); |
| if (out_h) |
| fprintf(out_h, "#define CONFIG_%s \"", sym->name); |
| do { |
| l = strcspn(str, "\"\\"); |
| if (l) { |
| fwrite(str, l, 1, out); |
| if (out_h) |
| fwrite(str, l, 1, out_h); |
| } |
| str += l; |
| while (*str == '\\' || *str == '"') { |
| fprintf(out, "\\%c", *str); |
| if (out_h) |
| fprintf(out_h, "\\%c", *str); |
| str++; |
| } |
| } while (*str); |
| fputs("\"\n", out); |
| if (out_h) |
| 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); |
| if (out_h) |
| 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); |
| if (out_h) |
| fprintf(out_h, "#define 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 (out_h) { |
| fclose(out_h); |
| rename(".tmpconfig.h", "include/linux/autoconf.h"); |
| } |
| if (!name || basename != conf_def_filename) { |
| if (!name) |
| name = conf_def_filename; |
| sprintf(tmpname, "%s.old", name); |
| rename(name, tmpname); |
| } |
| sprintf(tmpname, "%s%s", dirname, basename); |
| if (rename(newname, tmpname)) |
| return 1; |
| |
| sym_change_count = 0; |
| |
| return 0; |
| } |