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