/* * 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 <unistd.h> #define LKC_DIRECT_LINK #include "lkc.h" const char conf_def_filename[] = ".config"; const char conf_defname[] = "defconfig"; const char *conf_confnames[] = { ".config", conf_defname, NULL, }; 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(const char *name) { FILE *in = NULL; char line[1024]; char *p, *p2; int lineno = 0; struct symbol *sym; struct property *prop; struct expr *e; 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; for_all_symbols(i, sym) { sym->flags |= SYMBOL_NEW | SYMBOL_CHANGED; sym->flags &= ~SYMBOL_VALID; switch (sym->type) { case S_INT: case S_HEX: case S_STRING: free(sym->user.val); default: sym->user.val = NULL; sym->user.tri = no; } } while (fgets(line, sizeof(line), in)) { lineno++; sym = NULL; switch (line[0]) { case '#': if (line[1]!=' ') continue; p = strchr(line + 2, ' '); if (!p) continue; *p++ = 0; if (strncmp(p, "is not set", 10)) continue; sym = sym_find(line + 2); if (!sym) { fprintf(stderr, "%s:%d: trying to assign nonexistent symbol %s\n", name, lineno, line + 2); break; } switch (sym->type) { case S_BOOLEAN: case S_TRISTATE: sym->user.tri = no; sym->flags &= ~SYMBOL_NEW; break; default: ; } break; case 'A' ... 'Z': p = strchr(line, '='); if (!p) continue; *p++ = 0; p2 = strchr(p, '\n'); if (p2) *p2 = 0; sym = sym_find(line); if (!sym) { fprintf(stderr, "%s:%d: trying to assign nonexistent symbol %s\n", name, lineno, line); 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; } 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) { fprintf(stderr, "%s:%d: invalid string found\n", name, lineno); exit(1); } case S_INT: case S_HEX: if (sym_string_valid(sym, p)) { sym->user.val = strdup(p); sym->flags &= ~SYMBOL_NEW; } else { fprintf(stderr, "%s:%d: symbol value '%s' invalid for %s\n", name, lineno, p, sym->name); exit(1); } break; default: ; } break; case '\n': break; default: 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) /* warn? */; break; case yes: if (cs->user.tri != no) /* warn? */; cs->user.val = sym; break; } cs->user.tri = E_OR(cs->user.tri, sym->user.tri); cs->flags &= ~SYMBOL_NEW; } } fclose(in); if (modules_sym) sym_calc_value(modules_sym); for_all_symbols(i, sym) { sym_calc_value(sym); 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; 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 = 1; return 0; } struct menu *next_menu(struct menu *menu) { if (menu->list) return menu->list; do { if (menu->next) { menu = menu->next; break; } } while ((menu = menu->parent)); return menu; } #define SYMBOL_FORCEWRITE (1<<31) 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; /* busybox`s code */ const char *opt_name; int use_flg; 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; } fprintf(out, "#\n" "# Automatically generated make config: don't edit\n" "#\n"); /* busybox`s code */ if (out_h) { fprintf(out_h, "#ifndef BB_CONFIG_H\n#define BB_CONFIG_H\n"); fprintf(out_h, "/*\n" " * Automatically generated header file: don't edit\n" " */\n\n" "/* Version Number */\n" "#define BB_VER \"%s\"\n" "#define BB_BT \"%s\"\n", getenv("VERSION"), getenv("BUILDTIME")); if (getenv("EXTRA_VERSION")) fprintf(out_h, "#define BB_EXTRA_VERSION \"%s\"\n", getenv("EXTRA_VERSION")); fprintf(out_h, "\n"); } /* end busybox`s code */ if (!sym_change_count) sym_clear_all_valid(); /* Force write of all non-duplicate symbols. */ /* Write out everything by default. */ for(menu = rootmenu.list; menu; menu = next_menu(menu)) if (menu->sym) menu->sym->flags |= SYMBOL_FORCEWRITE; 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_FORCEWRITE)) goto next; sym->flags &= ~SYMBOL_FORCEWRITE; type = sym->type; if (type == S_TRISTATE) { sym_calc_value(modules_sym); if (modules_sym->curr.tri == no) type = S_BOOLEAN; } /* busybox`s code */ opt_name = strchr(sym->name, '_'); if(opt_name == NULL) opt_name = sym->name; else opt_name++; use_flg = 1; /* end busybox`s code */ switch (type) { case S_BOOLEAN: case S_TRISTATE: switch (sym_get_tristate_value(sym)) { case no: fprintf(out, "# %s is not set\n", sym->name); if (out_h) fprintf(out_h, "#undef %s\n", sym->name); use_flg = 0; /* busybox`s code */ break; case mod: #if 0 /* busybox`s code */ fprintf(out, "%s=m\n", sym->name); if (out_h) fprintf(out_h, "#define %s_MODULE 1\n", sym->name); #endif /* busybox`s code */ break; case yes: fprintf(out, "%s=y\n", sym->name); if (out_h) fprintf(out_h, "#define %s 1\n", sym->name); break; } break; case S_STRING: // fix me str = sym_get_string_value(sym); fprintf(out, "%s=\"", sym->name); if (out_h) fprintf(out_h, "#define %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, "%s=%s\n", sym->name, *str ? str : "0"); if (out_h) fprintf(out_h, "#define %s 0x%s\n", sym->name, str); break; } case S_INT: str = sym_get_string_value(sym); fprintf(out, "%s=%s\n", sym->name, *str ? str : "0"); if (out_h) fprintf(out_h, "#define %s %s\n", sym->name, str); break; } /* busybox`s code */ if (out_h) { fprintf(out_h, "#define ENABLE_%s %d\n", opt_name, use_flg); fprintf(out_h, "#define USE_%s(...)%s\n", opt_name, (use_flg ? " __VA_ARGS__" : "")); fprintf(out_h, "#define SKIP_%s(...)%s\n\n", opt_name, (use_flg ? "" : " __VA_ARGS__")); } /* end busybox`s code */ } next: menu = next_menu(menu); } fclose(out); if (out_h) { fprintf(out_h, "#endif /* BB_CONFIG_H */\n"); /* busybox`s code */ fclose(out_h); rename(".tmpconfig.h", "include/bb_config.h"); /* busybox`s config name */ file_write_dep(NULL); } 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; }