1 /* SPDX-License-Identifier: GPL-2.0-or-later */
2
3 #include <ctype.h>
4 #include <stdio.h>
5 #include <string.h>
6 #include <stdbool.h>
7 #include <stdlib.h>
8
print_bool(const char * const name,const bool val)9 static void print_bool(const char *const name, const bool val)
10 {
11 printf(" %-46s : constant boolean := %s;\n",
12 name, val ? "true" : "false");
13 }
14
print_hex(const char * const name,const char * val)15 static void print_hex(const char *const name, const char *val)
16 {
17 unsigned int hexlen;
18
19 printf(" %-46s : constant := 16#", name);
20 for (hexlen = strlen(val); hexlen > 0;) {
21 const unsigned int len = hexlen % 4 ? : 4;
22 char quad[] = "0000";
23 unsigned int i;
24
25 for (i = 0; i < len; ++i)
26 quad[4 - len + i] = val[i];
27 printf("%s", quad);
28
29 val += len;
30 hexlen -= len;
31 if (hexlen > 0)
32 printf("_");
33 }
34 printf ("#;\n");
35 }
36
print_dec(const char * const name,const char * const val)37 static void print_dec(const char *const name, const char *const val)
38 {
39 printf(" %-46s : constant := %s;\n", name, val);
40 }
41
print_string(const char * const name,const char * const val)42 static void print_string(const char *const name, const char *const val)
43 {
44 printf(" %-46s : constant string := \"%s\";\n", name, val);
45 }
46
main(int argc,char * argv[])47 int main(int argc, char *argv[])
48 {
49 char unset_fmt[256], string_fmt[256], set_fmt[256], line[256];
50 char *prefix = "CONFIG", *package = "KConfig";
51
52 if (argc > 3) {
53 fprintf(stderr,
54 "Usage: %s [<package name> [<config prefix>]]\n\n",
55 argv[0]);
56 return 1;
57 }
58 if (argc > 2)
59 prefix = argv[2];
60 if (argc > 1)
61 package = argv[1];
62
63 snprintf(set_fmt, sizeof(set_fmt), "%s_%%255[^=]=%%255s", prefix);
64 snprintf(string_fmt, sizeof(string_fmt),
65 "%s_%%255[^=]=\"%%255[^\"]\"", prefix);
66 snprintf(unset_fmt, sizeof(unset_fmt),
67 "# %s_%%255s is not set", prefix);
68
69 printf("package %s is\n\n", package);
70
71 while (fgets(line, sizeof(line), stdin)) {
72 char name[256], val[256];
73
74 if (line[strlen(line) - 1] != '\n') {
75 fprintf(stderr,
76 "Line longer than %zu chars, skipping...\n",
77 sizeof(line) - 1);
78 while (fgets(line, sizeof(line), stdin)) {
79 if (line[strlen(line) - 1] == '\n')
80 break;
81 }
82 continue;
83 }
84
85 if (sscanf(line, unset_fmt, name) == 1) {
86 print_bool(name, false);
87 continue;
88 }
89
90 if (sscanf(line, string_fmt, name, val) == 2) {
91 print_string(name, val);
92 continue;
93 }
94
95 switch (sscanf(line, set_fmt, name, val)) {
96 case 1:
97 /* ignore for now, our Kconfig is full of these atm */
98 /* fprintf(stderr, "unset non-bool: %s=\n", name); */
99 continue;
100 case 2:
101 if (strcmp(val, "\"\"") == 0) {
102 print_string(name, "");
103 } else if (strcmp(val, "y") == 0) {
104 print_bool(name, true);
105 } else if (strncmp(val, "0x", 2) == 0) {
106 print_hex(name, val + 2);
107 } else if (isdigit(val[0]) || (val[0] == '-' && isdigit(val[1]))) {
108 print_dec(name, val);
109 } else {
110 fprintf(stderr,
111 "toada: Error: Couldn't parse value '%s' for '%s'\n",
112 val, name);
113 exit(1);
114 }
115 continue;
116 default:
117 break;
118 }
119
120 unsigned int i = 0;
121 while (isspace(line[i]))
122 ++i;
123 if (line[i] == '#') {
124 printf(" --%s", line + i + 1);
125 continue;
126 } else if (i == strlen(line)) {
127 continue;
128 }
129
130 fprintf(stderr, "spurious line:\n%s", line);
131 }
132
133 printf("\nend %s;\n", package);
134 return 0;
135 }
136