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