scripts/config/confdata.c

   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 <stdio.h>
   9 #include <stdlib.h>
  10 #include <string.h>
  11 #include <unistd.h>
  12
  13 #define LKC_DIRECT_LINK
  14 #include "lkc.h"
  15
  16 const char conf_def_filename[] = ".config";
  17
  18 const char conf_defname[] = "defconfig";
  19
  20 const char *conf_confnames[] = {
  21         ".config",
  22         conf_defname,
  23         NULL,
  24 };
  25
  26 static char *conf_expand_value(const char *in)
  27 {
  28         struct symbol *sym;
  29         const char *src;
  30         static char res_value[SYMBOL_MAXLENGTH];
  31         char *dst, name[SYMBOL_MAXLENGTH];
  32
  33         res_value[0] = 0;
  34         dst = name;
  35         while ((src = strchr(in, '$'))) {
  36                 strncat(res_value, in, src - in);
  37                 src++;
  38                 dst = name;
  39                 while (isalnum(*src) || *src == '_')
  40                         *dst++ = *src++;
  41                 *dst = 0;
  42                 sym = sym_lookup(name, 0);
  43                 sym_calc_value(sym);
  44                 strcat(res_value, sym_get_string_value(sym));
  45                 in = src;
  46         }
  47         strcat(res_value, in);
  48
  49         return res_value;
  50 }
  51
  52 char *conf_get_default_confname(void)
  53 {
  54         struct stat buf;
  55         static char fullname[PATH_MAX+1];
  56         char *env, *name;
  57
  58         name = conf_expand_value(conf_defname);
  59         env = getenv(SRCTREE);
  60         if (env) {
  61                 sprintf(fullname, "%s/%s", env, name);
  62                 if (!stat(fullname, &buf))
  63                         return fullname;
  64         }
  65         return name;
  66 }
  67
  68 int conf_read(const char *name)
  69 {
  70         FILE *in = NULL;
  71         char line[1024];
  72         char *p, *p2;
  73         int lineno = 0;
  74         struct symbol *sym;
  75         struct property *prop;
  76         struct expr *e;
  77         int i;
  78
  79         if (name) {
  80                 in = zconf_fopen(name);
  81         } else {
  82                 const char **names = conf_confnames;
  83                 while ((name = *names++)) {
  84                         name = conf_expand_value(name);
  85                         in = zconf_fopen(name);
  86                         if (in) {
  87                                 printf("#\n"
  88                                        "# using defaults found in %s\n"
  89                                        "#\n", name);
  90                                 break;
  91                         }
  92                 }
  93         }
  94
  95         if (!in)
  96                 return 1;
  97
  98         for_all_symbols(i, sym) {
  99                 sym->flags |= SYMBOL_NEW | SYMBOL_CHANGED;
 100                 sym->flags &= ~SYMBOL_VALID;
 101                 switch (sym->type) {
 102                 case S_INT:
 103                 case S_HEX:
 104                 case S_STRING:
 105                         free(sym->user.val);
 106                 default:
 107                         sym->user.val = NULL;
 108                         sym->user.tri = no;
 109                 }
 110         }
 111
 112         while (fgets(line, sizeof(line), in)) {
 113                 lineno++;
 114                 sym = NULL;
 115                 switch (line[0]) {
 116                 case '#':
 117                         if (line[1]!=' ')
 118                                 continue;
 119                         p = strchr(line + 2, ' ');
 120                         if (!p)
 121                                 continue;
 122                         *p++ = 0;
 123                         if (strncmp(p, "is not set", 10))
 124                                 continue;
 125                         sym = sym_find(line + 2);
 126                         if (!sym) {
 127                                 fprintf(stderr, "%s:%d: trying to assign nonexistent symbol %s\n", name, lineno, line + 2);
 128                                 break;
 129                         }
 130                         switch (sym->type) {
 131                         case S_BOOLEAN:
 132                         case S_TRISTATE:
 133                                 sym->user.tri = no;
 134                                 sym->flags &= ~SYMBOL_NEW;
 135                                 break;
 136                         default:
 137                                 ;
 138                         }
 139                         break;
 140
 141                 case 'A' ... 'Z':
 142                         p = strchr(line, '=');
 143                         if (!p)
 144                                 continue;
 145                         *p++ = 0;
 146                         p2 = strchr(p, '\n');
 147                         if (p2)
 148                                 *p2 = 0;
 149                         sym = sym_find(line);
 150                         if (!sym) {
 151                                 fprintf(stderr, "%s:%d: trying to assign nonexistent symbol %s\n", name, lineno, line);
 152                                 break;
 153                         }
 154                         switch (sym->type) {
 155                         case S_TRISTATE:
 156                                 if (p[0] == 'm') {
 157                                         sym->user.tri = mod;
 158                                         sym->flags &= ~SYMBOL_NEW;
 159                                         break;
 160                                 }
 161                         case S_BOOLEAN:
 162                                 if (p[0] == 'y') {
 163                                         sym->user.tri = yes;
 164                                         sym->flags &= ~SYMBOL_NEW;
 165                                         break;
 166                                 }
 167                                 if (p[0] == 'n') {
 168                                         sym->user.tri = no;
 169                                         sym->flags &= ~SYMBOL_NEW;
 170                                         break;
 171                                 }
 172                                 break;
 173                         case S_STRING:
 174                                 if (*p++ != '"')
 175                                         break;
 176                                 for (p2 = p; (p2 = strpbrk(p2, "\"\\")); p2++) {
 177                                         if (*p2 == '"') {
 178                                                 *p2 = 0;
 179                                                 break;
 180                                         }
 181                                         memmove(p2, p2 + 1, strlen(p2));
 182                                 }
 183                                 if (!p2) {
 184                                         fprintf(stderr, "%s:%d: invalid string found\n", name, lineno);
 185                                         exit(1);
 186                                 }
 187                         case S_INT:
 188                         case S_HEX:
 189                                 if (sym_string_valid(sym, p)) {
 190                                         sym->user.val = strdup(p);
 191                                         sym->flags &= ~SYMBOL_NEW;
 192                                 } else {
 193                                         fprintf(stderr, "%s:%d: symbol value '%s' invalid for %s\n", name, lineno, p, sym->name);
 194                                         exit(1);
 195                                 }
 196                                 break;
 197                         default:
 198                                 ;
 199                         }
 200                         break;
 201                 case '\n':
 202                         break;
 203                 default:
 204                         continue;
 205                 }
 206                 if (sym && sym_is_choice_value(sym)) {
 207                         struct symbol *cs = prop_get_symbol(sym_get_choice_prop(sym));
 208                         switch (sym->user.tri) {
 209                         case no:
 210                                 break;
 211                         case mod:
 212                                 if (cs->user.tri == yes)
 213                                         /* warn? */;
 214                                 break;
 215                         case yes:
 216                                 if (cs->user.tri != no)
 217                                         /* warn? */;
 218                                 cs->user.val = sym;
 219                                 break;
 220                         }
 221                         cs->user.tri = E_OR(cs->user.tri, sym->user.tri);
 222                         cs->flags &= ~SYMBOL_NEW;
 223                 }
 224         }
 225         fclose(in);
 226
 227         if (modules_sym)
 228                 sym_calc_value(modules_sym);
 229         for_all_symbols(i, sym) {
 230                 sym_calc_value(sym);
 231                 if (sym_has_value(sym) && !sym_is_choice_value(sym)) {
 232                         if (sym->visible == no)
 233                                 sym->flags |= SYMBOL_NEW;
 234                         switch (sym->type) {
 235                         case S_STRING:
 236                         case S_INT:
 237                         case S_HEX:
 238                                 if (!sym_string_within_range(sym, sym->user.val))
 239                                         sym->flags |= SYMBOL_NEW;
 240                         default:
 241                                 break;
 242                         }
 243                 }
 244                 if (!sym_is_choice(sym))
 245                         continue;
 246                 prop = sym_get_choice_prop(sym);
 247                 for (e = prop->expr; e; e = e->left.expr)
 248                         if (e->right.sym->visible != no)
 249                                 sym->flags |= e->right.sym->flags & SYMBOL_NEW;
 250         }
 251
 252         sym_change_count = 1;
 253
 254         return 0;
 255 }
 256
 257 struct menu *next_menu(struct menu *menu)
 258 {
 259         if (menu->list) return menu->list;
 260         do {
 261                 if (menu->next) {
 262                         menu = menu->next;
 263                         break;
 264                 }
 265         } while ((menu = menu->parent));
 266
 267         return menu;
 268 }
 269
 270 #define SYMBOL_FORCEWRITE (1<<31)
 271
 272 int conf_write(const char *name)
 273 {
 274         FILE *out, *out_h;
 275         struct symbol *sym;
 276         struct menu *menu;
 277         const char *basename;
 278         char dirname[128], tmpname[128], newname[128];
 279         int type, l;
 280         const char *str;
 281
 282         /* busybox`s code */
 283         const char *opt_name;
 284         int use_flg;
 285
 286         dirname[0] = 0;
 287         if (name && name[0]) {
 288                 struct stat st;
 289                 char *slash;
 290
 291                 if (!stat(name, &st) && S_ISDIR(st.st_mode)) {
 292                         strcpy(dirname, name);
 293                         strcat(dirname, "/");
 294                         basename = conf_def_filename;
 295                 } else if ((slash = strrchr(name, '/'))) {
 296                         int size = slash - name + 1;
 297                         memcpy(dirname, name, size);
 298                         dirname[size] = 0;
 299                         if (slash[1])
 300                                 basename = slash + 1;
 301                         else
 302                                 basename = conf_def_filename;
 303                 } else
 304                         basename = name;
 305         } else
 306                 basename = conf_def_filename;
 307
 308         sprintf(newname, "%s.tmpconfig.%d", dirname, (int)getpid());
 309         out = fopen(newname, "w");
 310         if (!out)
 311                 return 1;
 312         out_h = NULL;
 313         if (!name) {
 314                 out_h = fopen(".tmpconfig.h", "w");
 315                 if (!out_h)
 316                         return 1;
 317         }
 318         fprintf(out, "#\n"
 319                      "# Automatically generated make config: don't edit\n"
 320                      "#\n");
 321
 322         /* busybox`s code */
 323         if (out_h) {
 324                 fprintf(out_h, "#ifndef BB_CONFIG_H\n#define BB_CONFIG_H\n");
 325                 fprintf(out_h, "/*\n"
 326                              " * Automatically generated header file: don't edit\n"
 327                              " */\n\n"
 328                              "/* Version Number */\n"
 329                              "#define BB_VER \"%s\"\n"
 330                              "#define BB_BT \"%s\"\n",
 331                              getenv("VERSION"),
 332                              getenv("BUILDTIME"));
 333                 if (getenv("EXTRA_VERSION"))
 334                         fprintf(out_h, "#define BB_EXTRA_VERSION \"%s\"\n",
 335                                      getenv("EXTRA_VERSION"));
 336                 fprintf(out_h, "\n");
 337         }
 338         /* end busybox`s code */
 339
 340         if (!sym_change_count)
 341                 sym_clear_all_valid();
 342
 343         /* Force write of all non-duplicate symbols. */
 344
 345         /* Write out everything by default. */
 346         for(menu = rootmenu.list; menu; menu = next_menu(menu))
 347                 if (menu->sym) menu->sym->flags |= SYMBOL_FORCEWRITE;
 348
 349         menu = rootmenu.list;
 350         while (menu) {
 351                 sym = menu->sym;
 352                 if (!sym) {
 353                         if (!menu_is_visible(menu))
 354                                 goto next;
 355                         str = menu_get_prompt(menu);
 356                         fprintf(out, "\n"
 357                                      "#\n"
 358                                      "# %s\n"
 359                                      "#\n", str);
 360                         if (out_h)
 361                                 fprintf(out_h, "\n"
 362                                                "/*\n"
 363                                                " * %s\n"
 364                                                " */\n", str);
 365                 } else if (!(sym->flags & SYMBOL_CHOICE)) {
 366                         sym_calc_value(sym);
 367                         if (!(sym->flags & SYMBOL_FORCEWRITE))
 368                                 goto next;
 369
 370                         sym->flags &= ~SYMBOL_FORCEWRITE;
 371                         type = sym->type;
 372                         if (type == S_TRISTATE) {
 373                                 sym_calc_value(modules_sym);
 374                                 if (modules_sym->curr.tri == no)
 375                                         type = S_BOOLEAN;
 376                         }
 377
 378                         /* busybox`s code */
 379                         opt_name = strchr(sym->name, '_');
 380                         if(opt_name == NULL)
 381                                 opt_name = sym->name;
 382                         else
 383                                 opt_name++;
 384                         use_flg = 1;
 385                         /* end busybox`s code */
 386
 387                         switch (type) {
 388                         case S_BOOLEAN:
 389                         case S_TRISTATE:
 390                                 switch (sym_get_tristate_value(sym)) {
 391                                 case no:
 392                                         fprintf(out, "# %s is not set\n", sym->name);
 393                                         if (out_h)
 394                                                 fprintf(out_h, "#undef %s\n", sym->name);
 395                                         use_flg = 0;    /* busybox`s code */
 396                                         break;
 397                                 case mod:
 398 #if 0   /* busybox`s code */
 399                                         fprintf(out, "%s=m\n", sym->name);
 400                                         if (out_h)
 401                                                 fprintf(out_h, "#define %s_MODULE 1\n", sym->name);
 402 #endif  /* busybox`s code */
 403                                         break;
 404                                 case yes:
 405                                         fprintf(out, "%s=y\n", sym->name);
 406                                         if (out_h)
 407                                                 fprintf(out_h, "#define %s 1\n", sym->name);
 408                                         break;
 409                                 }
 410                                 break;
 411                         case S_STRING:
 412                                 // fix me
 413                                 str = sym_get_string_value(sym);
 414                                 fprintf(out, "%s=\"", sym->name);
 415                                 if (out_h)
 416                                         fprintf(out_h, "#define %s \"", sym->name);
 417                                 do {
 418                                         l = strcspn(str, "\"\\");
 419                                         if (l) {
 420                                                 fwrite(str, l, 1, out);
 421                                                 if (out_h)
 422                                                         fwrite(str, l, 1, out_h);
 423                                         }
 424                                         str += l;
 425                                         while (*str == '\\' || *str == '"') {
 426                                                 fprintf(out, "\\%c", *str);
 427                                                 if (out_h)
 428                                                         fprintf(out_h, "\\%c", *str);
 429                                                 str++;
 430                                         }
 431                                 } while (*str);
 432                                 fputs("\"\n", out);
 433                                 if (out_h)
 434                                         fputs("\"\n", out_h);
 435                                 break;
 436                         case S_HEX:
 437                                 str = sym_get_string_value(sym);
 438                                 if (str[0] != '0' || (str[1] != 'x' && str[1] != 'X')) {
 439                                         fprintf(out, "%s=%s\n", sym->name, *str ? str : "0");
 440                                         if (out_h)
 441                                                 fprintf(out_h, "#define %s 0x%s\n", sym->name, str);
 442                                         break;
 443                                 }
 444                         case S_INT:
 445                                 str = sym_get_string_value(sym);
 446                                 fprintf(out, "%s=%s\n", sym->name, *str ? str : "0");
 447                                 if (out_h)
 448                                         fprintf(out_h, "#define %s %s\n", sym->name, str);
 449                                 break;
 450                         }
 451                         /* busybox`s code */
 452                         if (out_h) {
 453                                 fprintf(out_h, "#define ENABLE_%s %d\n", opt_name, use_flg);
 454                                 fprintf(out_h, "#define USE_%s(...)%s\n", opt_name,
 455                                         (use_flg ? "  __VA_ARGS__" : ""));
 456                                 fprintf(out_h, "#define SKIP_%s(...)%s\n\n", opt_name,
 457                                         (use_flg ? "" : "  __VA_ARGS__"));
 458                         }
 459                         /* end busybox`s code */
 460                 }
 461 next:
 462                 menu = next_menu(menu);
 463         }
 464         fclose(out);
 465         if (out_h) {
 466                 fprintf(out_h, "#endif /* BB_CONFIG_H */\n");   /* busybox`s code */
 467                 fclose(out_h);
 468                 rename(".tmpconfig.h", "include/bb_config.h");  /* busybox`s config name */
 469                 file_write_dep(NULL);
 470         }
 471         if (!name || basename != conf_def_filename) {
 472                 if (!name)
 473                         name = conf_def_filename;
 474                 sprintf(tmpname, "%s.old", name);
 475                 rename(name, tmpname);
 476         }
 477         sprintf(tmpname, "%s%s", dirname, basename);
 478         if (rename(newname, tmpname))
 479                 return 1;
 480
 481         sym_change_count = 0;
 482
 483         return 0;
 484 }