]> git.sur5r.net Git - kconfig-frontends/blob - libs/parser/confdata.c
dd243d2abd875b535d006535232821eefad3460b
[kconfig-frontends] / libs / parser / 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 <errno.h>
9 #include <fcntl.h>
10 #include <stdarg.h>
11 #include <stdio.h>
12 #include <stdlib.h>
13 #include <string.h>
14 #include <time.h>
15 #include <unistd.h>
16
17 #include "lkc.h"
18
19 struct conf_printer {
20         void (*print_symbol)(FILE *, struct symbol *, const char *, void *);
21         void (*print_comment)(FILE *, const char *, void *);
22 };
23
24 static void conf_warning(const char *fmt, ...)
25         __attribute__ ((format (printf, 1, 2)));
26
27 static void conf_message(const char *fmt, ...)
28         __attribute__ ((format (printf, 1, 2)));
29
30 static const char *conf_filename;
31 static int conf_lineno, conf_warnings, conf_unsaved;
32
33 const char conf_defname[] = "arch/$ARCH/defconfig";
34
35 static void conf_warning(const char *fmt, ...)
36 {
37         va_list ap;
38         va_start(ap, fmt);
39         fprintf(stderr, "%s:%d:warning: ", conf_filename, conf_lineno);
40         vfprintf(stderr, fmt, ap);
41         fprintf(stderr, "\n");
42         va_end(ap);
43         conf_warnings++;
44 }
45
46 static void conf_default_message_callback(const char *fmt, va_list ap)
47 {
48         printf("#\n# ");
49         vprintf(fmt, ap);
50         printf("\n#\n");
51 }
52
53 static void (*conf_message_callback) (const char *fmt, va_list ap) =
54         conf_default_message_callback;
55 void conf_set_message_callback(void (*fn) (const char *fmt, va_list ap))
56 {
57         conf_message_callback = fn;
58 }
59
60 static void conf_message(const char *fmt, ...)
61 {
62         va_list ap;
63
64         va_start(ap, fmt);
65         if (conf_message_callback)
66                 conf_message_callback(fmt, ap);
67         va_end(ap);
68 }
69
70 const char *conf_get_configname(void)
71 {
72         char *name = getenv("KCONFIG_CONFIG");
73
74         return name ? name : ".config";
75 }
76
77 const char *conf_get_autoconfig_name(void)
78 {
79         char *name = getenv("KCONFIG_AUTOCONFIG");
80
81         return name ? name : "include/config/auto.conf";
82 }
83
84 static char *conf_expand_value(const char *in)
85 {
86         struct symbol *sym;
87         const char *src;
88         static char res_value[SYMBOL_MAXLENGTH];
89         char *dst, name[SYMBOL_MAXLENGTH];
90
91         res_value[0] = 0;
92         dst = name;
93         while ((src = strchr(in, '$'))) {
94                 strncat(res_value, in, src - in);
95                 src++;
96                 dst = name;
97                 while (isalnum(*src) || *src == '_')
98                         *dst++ = *src++;
99                 *dst = 0;
100                 sym = sym_lookup(name, 0);
101                 sym_calc_value(sym);
102                 strcat(res_value, sym_get_string_value(sym));
103                 in = src;
104         }
105         strcat(res_value, in);
106
107         return res_value;
108 }
109
110 char *conf_get_default_confname(void)
111 {
112         struct stat buf;
113         static char fullname[PATH_MAX+1];
114         char *env, *name;
115
116         name = conf_expand_value(conf_defname);
117         env = getenv(SRCTREE);
118         if (env) {
119                 sprintf(fullname, "%s/%s", env, name);
120                 if (!stat(fullname, &buf))
121                         return fullname;
122         }
123         return name;
124 }
125
126 static int conf_set_sym_val(struct symbol *sym, int def, int def_flags, char *p)
127 {
128         char *p2;
129
130         switch (sym->type) {
131         case S_TRISTATE:
132                 if (p[0] == 'm') {
133                         sym->def[def].tri = mod;
134                         sym->flags |= def_flags;
135                         break;
136                 }
137                 /* fall through */
138         case S_BOOLEAN:
139                 if (p[0] == 'y') {
140                         sym->def[def].tri = yes;
141                         sym->flags |= def_flags;
142                         break;
143                 }
144                 if (p[0] == 'n') {
145                         sym->def[def].tri = no;
146                         sym->flags |= def_flags;
147                         break;
148                 }
149                 if (def != S_DEF_AUTO)
150                         conf_warning("symbol value '%s' invalid for %s",
151                                      p, sym->name);
152                 return 1;
153         case S_OTHER:
154                 if (*p != '"') {
155                         for (p2 = p; *p2 && !isspace(*p2); p2++)
156                                 ;
157                         sym->type = S_STRING;
158                         goto done;
159                 }
160                 /* fall through */
161         case S_STRING:
162                 if (*p++ != '"')
163                         break;
164                 for (p2 = p; (p2 = strpbrk(p2, "\"\\")); p2++) {
165                         if (*p2 == '"') {
166                                 *p2 = 0;
167                                 break;
168                         }
169                         memmove(p2, p2 + 1, strlen(p2));
170                 }
171                 if (!p2) {
172                         if (def != S_DEF_AUTO)
173                                 conf_warning("invalid string found");
174                         return 1;
175                 }
176                 /* fall through */
177         case S_INT:
178         case S_HEX:
179         done:
180                 if (sym_string_valid(sym, p)) {
181                         sym->def[def].val = strdup(p);
182                         sym->flags |= def_flags;
183                 } else {
184                         if (def != S_DEF_AUTO)
185                                 conf_warning("symbol value '%s' invalid for %s",
186                                              p, sym->name);
187                         return 1;
188                 }
189                 break;
190         default:
191                 ;
192         }
193         return 0;
194 }
195
196 #define LINE_GROWTH 16
197 static int add_byte(int c, char **lineptr, size_t slen, size_t *n)
198 {
199         char *nline;
200         size_t new_size = slen + 1;
201         if (new_size > *n) {
202                 new_size += LINE_GROWTH - 1;
203                 new_size *= 2;
204                 nline = realloc(*lineptr, new_size);
205                 if (!nline)
206                         return -1;
207
208                 *lineptr = nline;
209                 *n = new_size;
210         }
211
212         (*lineptr)[slen] = c;
213
214         return 0;
215 }
216
217 static ssize_t compat_getline(char **lineptr, size_t *n, FILE *stream)
218 {
219         char *line = *lineptr;
220         size_t slen = 0;
221
222         for (;;) {
223                 int c = getc(stream);
224
225                 switch (c) {
226                 case '\n':
227                         if (add_byte(c, &line, slen, n) < 0)
228                                 goto e_out;
229                         slen++;
230                         /* fall through */
231                 case EOF:
232                         if (add_byte('\0', &line, slen, n) < 0)
233                                 goto e_out;
234                         *lineptr = line;
235                         if (slen == 0)
236                                 return -1;
237                         return slen;
238                 default:
239                         if (add_byte(c, &line, slen, n) < 0)
240                                 goto e_out;
241                         slen++;
242                 }
243         }
244
245 e_out:
246         line[slen-1] = '\0';
247         *lineptr = line;
248         return -1;
249 }
250
251 int conf_read_simple(const char *name, int def)
252 {
253         FILE *in = NULL;
254         char   *line = NULL;
255         size_t  line_asize = 0;
256         char *p, *p2;
257         struct symbol *sym;
258         int i, def_flags;
259
260         if (name) {
261                 in = zconf_fopen(name);
262         } else {
263                 struct property *prop;
264
265                 name = conf_get_configname();
266                 in = zconf_fopen(name);
267                 if (in)
268                         goto load;
269                 sym_add_change_count(1);
270                 if (!sym_defconfig_list)
271                         return 1;
272
273                 for_all_defaults(sym_defconfig_list, prop) {
274                         if (expr_calc_value(prop->visible.expr) == no ||
275                             prop->expr->type != E_SYMBOL)
276                                 continue;
277                         name = conf_expand_value(prop->expr->left.sym->name);
278                         in = zconf_fopen(name);
279                         if (in) {
280                                 conf_message(_("using defaults found in %s"),
281                                          name);
282                                 goto load;
283                         }
284                 }
285         }
286         if (!in)
287                 return 1;
288
289 load:
290         conf_filename = name;
291         conf_lineno = 0;
292         conf_warnings = 0;
293         conf_unsaved = 0;
294
295         def_flags = SYMBOL_DEF << def;
296         for_all_symbols(i, sym) {
297                 sym->flags |= SYMBOL_CHANGED;
298                 sym->flags &= ~(def_flags|SYMBOL_VALID);
299                 if (sym_is_choice(sym))
300                         sym->flags |= def_flags;
301                 switch (sym->type) {
302                 case S_INT:
303                 case S_HEX:
304                 case S_STRING:
305                         if (sym->def[def].val)
306                                 free(sym->def[def].val);
307                         /* fall through */
308                 default:
309                         sym->def[def].val = NULL;
310                         sym->def[def].tri = no;
311                 }
312         }
313
314         while (compat_getline(&line, &line_asize, in) != -1) {
315                 conf_lineno++;
316                 sym = NULL;
317                 if (line[0] == '#') {
318                         if (memcmp(line + 2, CONFIG_, strlen(CONFIG_)))
319                                 continue;
320                         p = strchr(line + 2 + strlen(CONFIG_), ' ');
321                         if (!p)
322                                 continue;
323                         *p++ = 0;
324                         if (strncmp(p, "is not set", 10))
325                                 continue;
326                         if (def == S_DEF_USER) {
327                                 sym = sym_find(line + 2 + strlen(CONFIG_));
328                                 if (!sym) {
329                                         sym_add_change_count(1);
330                                         goto setsym;
331                                 }
332                         } else {
333                                 sym = sym_lookup(line + 2 + strlen(CONFIG_), 0);
334                                 if (sym->type == S_UNKNOWN)
335                                         sym->type = S_BOOLEAN;
336                         }
337                         if (sym->flags & def_flags) {
338                                 conf_warning("override: reassigning to symbol %s", sym->name);
339                         }
340                         switch (sym->type) {
341                         case S_BOOLEAN:
342                         case S_TRISTATE:
343                                 sym->def[def].tri = no;
344                                 sym->flags |= def_flags;
345                                 break;
346                         default:
347                                 ;
348                         }
349                 } else if (memcmp(line, CONFIG_, strlen(CONFIG_)) == 0) {
350                         p = strchr(line + strlen(CONFIG_), '=');
351                         if (!p)
352                                 continue;
353                         *p++ = 0;
354                         p2 = strchr(p, '\n');
355                         if (p2) {
356                                 *p2-- = 0;
357                                 if (*p2 == '\r')
358                                         *p2 = 0;
359                         }
360                         if (def == S_DEF_USER) {
361                                 sym = sym_find(line + strlen(CONFIG_));
362                                 if (!sym) {
363                                         sym_add_change_count(1);
364                                         goto setsym;
365                                 }
366                         } else {
367                                 sym = sym_lookup(line + strlen(CONFIG_), 0);
368                                 if (sym->type == S_UNKNOWN)
369                                         sym->type = S_OTHER;
370                         }
371                         if (sym->flags & def_flags) {
372                                 conf_warning("override: reassigning to symbol %s", sym->name);
373                         }
374                         if (conf_set_sym_val(sym, def, def_flags, p))
375                                 continue;
376                 } else {
377                         if (line[0] != '\r' && line[0] != '\n')
378                                 conf_warning("unexpected data");
379                         continue;
380                 }
381 setsym:
382                 if (sym && sym_is_choice_value(sym)) {
383                         struct symbol *cs = prop_get_symbol(sym_get_choice_prop(sym));
384                         switch (sym->def[def].tri) {
385                         case no:
386                                 break;
387                         case mod:
388                                 if (cs->def[def].tri == yes) {
389                                         conf_warning("%s creates inconsistent choice state", sym->name);
390                                         cs->flags &= ~def_flags;
391                                 }
392                                 break;
393                         case yes:
394                                 if (cs->def[def].tri != no)
395                                         conf_warning("override: %s changes choice state", sym->name);
396                                 cs->def[def].val = sym;
397                                 break;
398                         }
399                         cs->def[def].tri = EXPR_OR(cs->def[def].tri, sym->def[def].tri);
400                 }
401         }
402         free(line);
403         fclose(in);
404         return 0;
405 }
406
407 int conf_read(const char *name)
408 {
409         struct symbol *sym;
410         int i;
411
412         sym_set_change_count(0);
413
414         if (conf_read_simple(name, S_DEF_USER)) {
415                 sym_calc_value(modules_sym);
416                 return 1;
417         }
418
419         sym_calc_value(modules_sym);
420
421         for_all_symbols(i, sym) {
422                 sym_calc_value(sym);
423                 if (sym_is_choice(sym) || (sym->flags & SYMBOL_AUTO))
424                         continue;
425                 if (sym_has_value(sym) && (sym->flags & SYMBOL_WRITE)) {
426                         /* check that calculated value agrees with saved value */
427                         switch (sym->type) {
428                         case S_BOOLEAN:
429                         case S_TRISTATE:
430                                 if (sym->def[S_DEF_USER].tri != sym_get_tristate_value(sym))
431                                         break;
432                                 if (!sym_is_choice(sym))
433                                         continue;
434                                 /* fall through */
435                         default:
436                                 if (!strcmp(sym->curr.val, sym->def[S_DEF_USER].val))
437                                         continue;
438                                 break;
439                         }
440                 } else if (!sym_has_value(sym) && !(sym->flags & SYMBOL_WRITE))
441                         /* no previous value and not saved */
442                         continue;
443                 conf_unsaved++;
444                 /* maybe print value in verbose mode... */
445         }
446
447         for_all_symbols(i, sym) {
448                 if (sym_has_value(sym) && !sym_is_choice_value(sym)) {
449                         /* Reset values of generates values, so they'll appear
450                          * as new, if they should become visible, but that
451                          * doesn't quite work if the Kconfig and the saved
452                          * configuration disagree.
453                          */
454                         if (sym->visible == no && !conf_unsaved)
455                                 sym->flags &= ~SYMBOL_DEF_USER;
456                         switch (sym->type) {
457                         case S_STRING:
458                         case S_INT:
459                         case S_HEX:
460                                 /* Reset a string value if it's out of range */
461                                 if (sym_string_within_range(sym, sym->def[S_DEF_USER].val))
462                                         break;
463                                 sym->flags &= ~(SYMBOL_VALID|SYMBOL_DEF_USER);
464                                 conf_unsaved++;
465                                 break;
466                         default:
467                                 break;
468                         }
469                 }
470         }
471
472         sym_add_change_count(conf_warnings || conf_unsaved);
473
474         return 0;
475 }
476
477 /*
478  * Kconfig configuration printer
479  *
480  * This printer is used when generating the resulting configuration after
481  * kconfig invocation and `defconfig' files. Unset symbol might be omitted by
482  * passing a non-NULL argument to the printer.
483  *
484  */
485 static void
486 kconfig_print_symbol(FILE *fp, struct symbol *sym, const char *value, void *arg)
487 {
488
489         switch (sym->type) {
490         case S_BOOLEAN:
491         case S_TRISTATE:
492                 if (*value == 'n') {
493                         bool skip_unset = (arg != NULL);
494
495                         if (!skip_unset)
496                                 fprintf(fp, "# %s%s is not set\n",
497                                     CONFIG_, sym->name);
498                         return;
499                 }
500                 break;
501         default:
502                 break;
503         }
504
505         fprintf(fp, "%s%s=%s\n", CONFIG_, sym->name, value);
506 }
507
508 static void
509 kconfig_print_comment(FILE *fp, const char *value, void *arg)
510 {
511         const char *p = value;
512         size_t l;
513
514         for (;;) {
515                 l = strcspn(p, "\n");
516                 fprintf(fp, "#");
517                 if (l) {
518                         fprintf(fp, " ");
519                         xfwrite(p, l, 1, fp);
520                         p += l;
521                 }
522                 fprintf(fp, "\n");
523                 if (*p++ == '\0')
524                         break;
525         }
526 }
527
528 static struct conf_printer kconfig_printer_cb =
529 {
530         .print_symbol = kconfig_print_symbol,
531         .print_comment = kconfig_print_comment,
532 };
533
534 /*
535  * Header printer
536  *
537  * This printer is used when generating the `include/generated/autoconf.h' file.
538  */
539 static void
540 header_print_symbol(FILE *fp, struct symbol *sym, const char *value, void *arg)
541 {
542
543         switch (sym->type) {
544         case S_BOOLEAN:
545         case S_TRISTATE: {
546                 const char *suffix = "";
547
548                 switch (*value) {
549                 case 'n':
550                         break;
551                 case 'm':
552                         suffix = "_MODULE";
553                         /* fall through */
554                 default:
555                         fprintf(fp, "#define %s%s%s 1\n",
556                             CONFIG_, sym->name, suffix);
557                 }
558                 break;
559         }
560         case S_HEX: {
561                 const char *prefix = "";
562
563                 if (value[0] != '0' || (value[1] != 'x' && value[1] != 'X'))
564                         prefix = "0x";
565                 fprintf(fp, "#define %s%s %s%s\n",
566                     CONFIG_, sym->name, prefix, value);
567                 break;
568         }
569         case S_STRING:
570         case S_INT:
571                 fprintf(fp, "#define %s%s %s\n",
572                     CONFIG_, sym->name, value);
573                 break;
574         default:
575                 break;
576         }
577
578 }
579
580 static void
581 header_print_comment(FILE *fp, const char *value, void *arg)
582 {
583         const char *p = value;
584         size_t l;
585
586         fprintf(fp, "/*\n");
587         for (;;) {
588                 l = strcspn(p, "\n");
589                 fprintf(fp, " *");
590                 if (l) {
591                         fprintf(fp, " ");
592                         xfwrite(p, l, 1, fp);
593                         p += l;
594                 }
595                 fprintf(fp, "\n");
596                 if (*p++ == '\0')
597                         break;
598         }
599         fprintf(fp, " */\n");
600 }
601
602 static struct conf_printer header_printer_cb =
603 {
604         .print_symbol = header_print_symbol,
605         .print_comment = header_print_comment,
606 };
607
608 /*
609  * Tristate printer
610  *
611  * This printer is used when generating the `include/config/tristate.conf' file.
612  */
613 static void
614 tristate_print_symbol(FILE *fp, struct symbol *sym, const char *value, void *arg)
615 {
616
617         if (sym->type == S_TRISTATE && *value != 'n')
618                 fprintf(fp, "%s%s=%c\n", CONFIG_, sym->name, (char)toupper(*value));
619 }
620
621 static struct conf_printer tristate_printer_cb =
622 {
623         .print_symbol = tristate_print_symbol,
624         .print_comment = kconfig_print_comment,
625 };
626
627 static void conf_write_symbol(FILE *fp, struct symbol *sym,
628                               struct conf_printer *printer, void *printer_arg)
629 {
630         const char *str;
631
632         switch (sym->type) {
633         case S_OTHER:
634         case S_UNKNOWN:
635                 break;
636         case S_STRING:
637                 str = sym_get_string_value(sym);
638                 str = sym_escape_string_value(str);
639                 printer->print_symbol(fp, sym, str, printer_arg);
640                 free((void *)str);
641                 break;
642         default:
643                 str = sym_get_string_value(sym);
644                 printer->print_symbol(fp, sym, str, printer_arg);
645         }
646 }
647
648 static void
649 conf_write_heading(FILE *fp, struct conf_printer *printer, void *printer_arg)
650 {
651         char buf[256];
652
653         snprintf(buf, sizeof(buf),
654             "\n"
655             "Automatically generated file; DO NOT EDIT.\n"
656             "%s\n",
657             rootmenu.prompt->text);
658
659         printer->print_comment(fp, buf, printer_arg);
660 }
661
662 /*
663  * Write out a minimal config.
664  * All values that has default values are skipped as this is redundant.
665  */
666 int conf_write_defconfig(const char *filename)
667 {
668         struct symbol *sym;
669         struct menu *menu;
670         FILE *out;
671
672         out = fopen(filename, "w");
673         if (!out)
674                 return 1;
675
676         sym_clear_all_valid();
677
678         /* Traverse all menus to find all relevant symbols */
679         menu = rootmenu.list;
680
681         while (menu != NULL)
682         {
683                 sym = menu->sym;
684                 if (sym == NULL) {
685                         if (!menu_is_visible(menu))
686                                 goto next_menu;
687                 } else if (!sym_is_choice(sym)) {
688                         sym_calc_value(sym);
689                         if (!(sym->flags & SYMBOL_WRITE))
690                                 goto next_menu;
691                         sym->flags &= ~SYMBOL_WRITE;
692                         /* If we cannot change the symbol - skip */
693                         if (!sym_is_changable(sym))
694                                 goto next_menu;
695                         /* If symbol equals to default value - skip */
696                         if (strcmp(sym_get_string_value(sym), sym_get_string_default(sym)) == 0)
697                                 goto next_menu;
698
699                         /*
700                          * If symbol is a choice value and equals to the
701                          * default for a choice - skip.
702                          * But only if value is bool and equal to "y" and
703                          * choice is not "optional".
704                          * (If choice is "optional" then all values can be "n")
705                          */
706                         if (sym_is_choice_value(sym)) {
707                                 struct symbol *cs;
708                                 struct symbol *ds;
709
710                                 cs = prop_get_symbol(sym_get_choice_prop(sym));
711                                 ds = sym_choice_default(cs);
712                                 if (!sym_is_optional(cs) && sym == ds) {
713                                         if ((sym->type == S_BOOLEAN) &&
714                                             sym_get_tristate_value(sym) == yes)
715                                                 goto next_menu;
716                                 }
717                         }
718                         conf_write_symbol(out, sym, &kconfig_printer_cb, NULL);
719                 }
720 next_menu:
721                 if (menu->list != NULL) {
722                         menu = menu->list;
723                 }
724                 else if (menu->next != NULL) {
725                         menu = menu->next;
726                 } else {
727                         while ((menu = menu->parent)) {
728                                 if (menu->next != NULL) {
729                                         menu = menu->next;
730                                         break;
731                                 }
732                         }
733                 }
734         }
735         fclose(out);
736         return 0;
737 }
738
739 int conf_write(const char *name)
740 {
741         FILE *out;
742         struct symbol *sym;
743         struct menu *menu;
744         const char *basename;
745         const char *str;
746         char dirname[PATH_MAX+1], tmpname[PATH_MAX+1], newname[PATH_MAX+1];
747         char *env;
748
749         dirname[0] = 0;
750         if (name && name[0]) {
751                 struct stat st;
752                 char *slash;
753
754                 if (!stat(name, &st) && S_ISDIR(st.st_mode)) {
755                         strcpy(dirname, name);
756                         strcat(dirname, "/");
757                         basename = conf_get_configname();
758                 } else if ((slash = strrchr(name, '/'))) {
759                         int size = slash - name + 1;
760                         memcpy(dirname, name, size);
761                         dirname[size] = 0;
762                         if (slash[1])
763                                 basename = slash + 1;
764                         else
765                                 basename = conf_get_configname();
766                 } else
767                         basename = name;
768         } else
769                 basename = conf_get_configname();
770
771         sprintf(newname, "%s%s", dirname, basename);
772         env = getenv("KCONFIG_OVERWRITECONFIG");
773         if (!env || !*env) {
774                 sprintf(tmpname, "%s.tmpconfig.%d", dirname, (int)getpid());
775                 out = fopen(tmpname, "w");
776         } else {
777                 *tmpname = 0;
778                 out = fopen(newname, "w");
779         }
780         if (!out)
781                 return 1;
782
783         conf_write_heading(out, &kconfig_printer_cb, NULL);
784
785         if (!conf_get_changed())
786                 sym_clear_all_valid();
787
788         menu = rootmenu.list;
789         while (menu) {
790                 sym = menu->sym;
791                 if (!sym) {
792                         if (!menu_is_visible(menu))
793                                 goto next;
794                         str = menu_get_prompt(menu);
795                         fprintf(out, "\n"
796                                      "#\n"
797                                      "# %s\n"
798                                      "#\n", str);
799                 } else if (!(sym->flags & SYMBOL_CHOICE)) {
800                         sym_calc_value(sym);
801                         if (!(sym->flags & SYMBOL_WRITE))
802                                 goto next;
803                         sym->flags &= ~SYMBOL_WRITE;
804
805                         conf_write_symbol(out, sym, &kconfig_printer_cb, NULL);
806                 }
807
808 next:
809                 if (menu->list) {
810                         menu = menu->list;
811                         continue;
812                 }
813                 if (menu->next)
814                         menu = menu->next;
815                 else while ((menu = menu->parent)) {
816                         if (menu->next) {
817                                 menu = menu->next;
818                                 break;
819                         }
820                 }
821         }
822         fclose(out);
823
824         if (*tmpname) {
825                 strcat(dirname, basename);
826                 strcat(dirname, ".old");
827                 rename(newname, dirname);
828                 if (rename(tmpname, newname))
829                         return 1;
830         }
831
832         conf_message(_("configuration written to %s"), newname);
833
834         sym_set_change_count(0);
835
836         return 0;
837 }
838
839 static int conf_split_config(void)
840 {
841         const char *name;
842         char path[PATH_MAX+1];
843         char *s, *d, c;
844         struct symbol *sym;
845         struct stat sb;
846         int res, i, fd;
847
848         name = conf_get_autoconfig_name();
849         conf_read_simple(name, S_DEF_AUTO);
850         sym_calc_value(modules_sym);
851
852         if (chdir("include/config"))
853                 return 1;
854
855         res = 0;
856         for_all_symbols(i, sym) {
857                 sym_calc_value(sym);
858                 if ((sym->flags & SYMBOL_AUTO) || !sym->name)
859                         continue;
860                 if (sym->flags & SYMBOL_WRITE) {
861                         if (sym->flags & SYMBOL_DEF_AUTO) {
862                                 /*
863                                  * symbol has old and new value,
864                                  * so compare them...
865                                  */
866                                 switch (sym->type) {
867                                 case S_BOOLEAN:
868                                 case S_TRISTATE:
869                                         if (sym_get_tristate_value(sym) ==
870                                             sym->def[S_DEF_AUTO].tri)
871                                                 continue;
872                                         break;
873                                 case S_STRING:
874                                 case S_HEX:
875                                 case S_INT:
876                                         if (!strcmp(sym_get_string_value(sym),
877                                                     sym->def[S_DEF_AUTO].val))
878                                                 continue;
879                                         break;
880                                 default:
881                                         break;
882                                 }
883                         } else {
884                                 /*
885                                  * If there is no old value, only 'no' (unset)
886                                  * is allowed as new value.
887                                  */
888                                 switch (sym->type) {
889                                 case S_BOOLEAN:
890                                 case S_TRISTATE:
891                                         if (sym_get_tristate_value(sym) == no)
892                                                 continue;
893                                         break;
894                                 default:
895                                         break;
896                                 }
897                         }
898                 } else if (!(sym->flags & SYMBOL_DEF_AUTO))
899                         /* There is neither an old nor a new value. */
900                         continue;
901                 /* else
902                  *      There is an old value, but no new value ('no' (unset)
903                  *      isn't saved in auto.conf, so the old value is always
904                  *      different from 'no').
905                  */
906
907                 /* Replace all '_' and append ".h" */
908                 s = sym->name;
909                 d = path;
910                 while ((c = *s++)) {
911                         c = tolower(c);
912                         *d++ = (c == '_') ? '/' : c;
913                 }
914                 strcpy(d, ".h");
915
916                 /* Assume directory path already exists. */
917                 fd = open(path, O_WRONLY | O_CREAT | O_TRUNC, 0644);
918                 if (fd == -1) {
919                         if (errno != ENOENT) {
920                                 res = 1;
921                                 break;
922                         }
923                         /*
924                          * Create directory components,
925                          * unless they exist already.
926                          */
927                         d = path;
928                         while ((d = strchr(d, '/'))) {
929                                 *d = 0;
930                                 if (stat(path, &sb) && mkdir(path, 0755)) {
931                                         res = 1;
932                                         goto out;
933                                 }
934                                 *d++ = '/';
935                         }
936                         /* Try it again. */
937                         fd = open(path, O_WRONLY | O_CREAT | O_TRUNC, 0644);
938                         if (fd == -1) {
939                                 res = 1;
940                                 break;
941                         }
942                 }
943                 close(fd);
944         }
945 out:
946         if (chdir("../.."))
947                 return 1;
948
949         return res;
950 }
951
952 int conf_write_autoconf(void)
953 {
954         struct symbol *sym;
955         const char *name;
956         FILE *out, *tristate, *out_h;
957         int i;
958
959         sym_clear_all_valid();
960
961         file_write_dep("include/config/auto.conf.cmd");
962
963         if (conf_split_config())
964                 return 1;
965
966         out = fopen(".tmpconfig", "w");
967         if (!out)
968                 return 1;
969
970         tristate = fopen(".tmpconfig_tristate", "w");
971         if (!tristate) {
972                 fclose(out);
973                 return 1;
974         }
975
976         out_h = fopen(".tmpconfig.h", "w");
977         if (!out_h) {
978                 fclose(out);
979                 fclose(tristate);
980                 return 1;
981         }
982
983         conf_write_heading(out, &kconfig_printer_cb, NULL);
984
985         conf_write_heading(tristate, &tristate_printer_cb, NULL);
986
987         conf_write_heading(out_h, &header_printer_cb, NULL);
988
989         for_all_symbols(i, sym) {
990                 sym_calc_value(sym);
991                 if (!(sym->flags & SYMBOL_WRITE) || !sym->name)
992                         continue;
993
994                 /* write symbol to auto.conf, tristate and header files */
995                 conf_write_symbol(out, sym, &kconfig_printer_cb, (void *)1);
996
997                 conf_write_symbol(tristate, sym, &tristate_printer_cb, (void *)1);
998
999                 conf_write_symbol(out_h, sym, &header_printer_cb, NULL);
1000         }
1001         fclose(out);
1002         fclose(tristate);
1003         fclose(out_h);
1004
1005         name = getenv("KCONFIG_AUTOHEADER");
1006         if (!name)
1007                 name = "include/generated/autoconf.h";
1008         if (rename(".tmpconfig.h", name))
1009                 return 1;
1010         name = getenv("KCONFIG_TRISTATE");
1011         if (!name)
1012                 name = "include/config/tristate.conf";
1013         if (rename(".tmpconfig_tristate", name))
1014                 return 1;
1015         name = conf_get_autoconfig_name();
1016         /*
1017          * This must be the last step, kbuild has a dependency on auto.conf
1018          * and this marks the successful completion of the previous steps.
1019          */
1020         if (rename(".tmpconfig", name))
1021                 return 1;
1022
1023         return 0;
1024 }
1025
1026 static int sym_change_count;
1027 static void (*conf_changed_callback)(void);
1028
1029 void sym_set_change_count(int count)
1030 {
1031         int _sym_change_count = sym_change_count;
1032         sym_change_count = count;
1033         if (conf_changed_callback &&
1034             (bool)_sym_change_count != (bool)count)
1035                 conf_changed_callback();
1036 }
1037
1038 void sym_add_change_count(int count)
1039 {
1040         sym_set_change_count(count + sym_change_count);
1041 }
1042
1043 bool conf_get_changed(void)
1044 {
1045         return sym_change_count;
1046 }
1047
1048 void conf_set_changed_callback(void (*fn)(void))
1049 {
1050         conf_changed_callback = fn;
1051 }
1052
1053 static bool randomize_choice_values(struct symbol *csym)
1054 {
1055         struct property *prop;
1056         struct symbol *sym;
1057         struct expr *e;
1058         int cnt, def;
1059
1060         /*
1061          * If choice is mod then we may have more items selected
1062          * and if no then no-one.
1063          * In both cases stop.
1064          */
1065         if (csym->curr.tri != yes)
1066                 return false;
1067
1068         prop = sym_get_choice_prop(csym);
1069
1070         /* count entries in choice block */
1071         cnt = 0;
1072         expr_list_for_each_sym(prop->expr, e, sym)
1073                 cnt++;
1074
1075         /*
1076          * find a random value and set it to yes,
1077          * set the rest to no so we have only one set
1078          */
1079         def = (rand() % cnt);
1080
1081         cnt = 0;
1082         expr_list_for_each_sym(prop->expr, e, sym) {
1083                 if (def == cnt++) {
1084                         sym->def[S_DEF_USER].tri = yes;
1085                         csym->def[S_DEF_USER].val = sym;
1086                 }
1087                 else {
1088                         sym->def[S_DEF_USER].tri = no;
1089                 }
1090                 sym->flags |= SYMBOL_DEF_USER;
1091                 /* clear VALID to get value calculated */
1092                 sym->flags &= ~SYMBOL_VALID;
1093         }
1094         csym->flags |= SYMBOL_DEF_USER;
1095         /* clear VALID to get value calculated */
1096         csym->flags &= ~(SYMBOL_VALID);
1097
1098         return true;
1099 }
1100
1101 void set_all_choice_values(struct symbol *csym)
1102 {
1103         struct property *prop;
1104         struct symbol *sym;
1105         struct expr *e;
1106
1107         prop = sym_get_choice_prop(csym);
1108
1109         /*
1110          * Set all non-assinged choice values to no
1111          */
1112         expr_list_for_each_sym(prop->expr, e, sym) {
1113                 if (!sym_has_value(sym))
1114                         sym->def[S_DEF_USER].tri = no;
1115         }
1116         csym->flags |= SYMBOL_DEF_USER;
1117         /* clear VALID to get value calculated */
1118         csym->flags &= ~(SYMBOL_VALID | SYMBOL_NEED_SET_CHOICE_VALUES);
1119 }
1120
1121 bool conf_set_all_new_symbols(enum conf_def_mode mode)
1122 {
1123         struct symbol *sym, *csym;
1124         int i, cnt, pby, pty, ptm;      /* pby: probability of boolean  = y
1125                                          * pty: probability of tristate = y
1126                                          * ptm: probability of tristate = m
1127                                          */
1128
1129         pby = 50; pty = ptm = 33; /* can't go as the default in switch-case
1130                                    * below, otherwise gcc whines about
1131                                    * -Wmaybe-uninitialized */
1132         if (mode == def_random) {
1133                 int n, p[3];
1134                 char *env = getenv("KCONFIG_PROBABILITY");
1135                 n = 0;
1136                 while( env && *env ) {
1137                         char *endp;
1138                         int tmp = strtol( env, &endp, 10 );
1139                         if( tmp >= 0 && tmp <= 100 ) {
1140                                 p[n++] = tmp;
1141                         } else {
1142                                 errno = ERANGE;
1143                                 perror( "KCONFIG_PROBABILITY" );
1144                                 exit( 1 );
1145                         }
1146                         env = (*endp == ':') ? endp+1 : endp;
1147                         if( n >=3 ) {
1148                                 break;
1149                         }
1150                 }
1151                 switch( n ) {
1152                 case 1:
1153                         pby = p[0]; ptm = pby/2; pty = pby-ptm;
1154                         break;
1155                 case 2:
1156                         pty = p[0]; ptm = p[1]; pby = pty + ptm;
1157                         break;
1158                 case 3:
1159                         pby = p[0]; pty = p[1]; ptm = p[2];
1160                         break;
1161                 }
1162
1163                 if( pty+ptm > 100 ) {
1164                         errno = ERANGE;
1165                         perror( "KCONFIG_PROBABILITY" );
1166                         exit( 1 );
1167                 }
1168         }
1169         bool has_changed = false;
1170
1171         for_all_symbols(i, sym) {
1172                 if (sym_has_value(sym) || (sym->flags & SYMBOL_VALID))
1173                         continue;
1174                 switch (sym_get_type(sym)) {
1175                 case S_BOOLEAN:
1176                 case S_TRISTATE:
1177                         has_changed = true;
1178                         switch (mode) {
1179                         case def_yes:
1180                                 sym->def[S_DEF_USER].tri = yes;
1181                                 break;
1182                         case def_mod:
1183                                 sym->def[S_DEF_USER].tri = mod;
1184                                 break;
1185                         case def_no:
1186                                 if (sym->flags & SYMBOL_ALLNOCONFIG_Y)
1187                                         sym->def[S_DEF_USER].tri = yes;
1188                                 else
1189                                         sym->def[S_DEF_USER].tri = no;
1190                                 break;
1191                         case def_random:
1192                                 sym->def[S_DEF_USER].tri = no;
1193                                 cnt = rand() % 100;
1194                                 if (sym->type == S_TRISTATE) {
1195                                         if (cnt < pty)
1196                                                 sym->def[S_DEF_USER].tri = yes;
1197                                         else if (cnt < (pty+ptm))
1198                                                 sym->def[S_DEF_USER].tri = mod;
1199                                 } else if (cnt < pby)
1200                                         sym->def[S_DEF_USER].tri = yes;
1201                                 break;
1202                         default:
1203                                 continue;
1204                         }
1205                         if (!(sym_is_choice(sym) && mode == def_random))
1206                                 sym->flags |= SYMBOL_DEF_USER;
1207                         break;
1208                 default:
1209                         break;
1210                 }
1211
1212         }
1213
1214         sym_clear_all_valid();
1215
1216         /*
1217          * We have different type of choice blocks.
1218          * If curr.tri equals to mod then we can select several
1219          * choice symbols in one block.
1220          * In this case we do nothing.
1221          * If curr.tri equals yes then only one symbol can be
1222          * selected in a choice block and we set it to yes,
1223          * and the rest to no.
1224          */
1225         if (mode != def_random) {
1226                 for_all_symbols(i, csym) {
1227                         if ((sym_is_choice(csym) && !sym_has_value(csym)) ||
1228                             sym_is_choice_value(csym))
1229                                 csym->flags |= SYMBOL_NEED_SET_CHOICE_VALUES;
1230                 }
1231         }
1232
1233         for_all_symbols(i, csym) {
1234                 if (sym_has_value(csym) || !sym_is_choice(csym))
1235                         continue;
1236
1237                 sym_calc_value(csym);
1238                 if (mode == def_random)
1239                         has_changed = randomize_choice_values(csym);
1240                 else {
1241                         set_all_choice_values(csym);
1242                         has_changed = true;
1243                 }
1244         }
1245
1246         return has_changed;
1247 }