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