scripts/config/confdata.c

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