util/kconfig/toada.c

   1 /* This file is part of the coreboot project. */
   2 /* SPDX-License-Identifier: GPL-2.0-or-later */
   3
   4 #include <ctype.h>
   5 #include <stdio.h>
   6 #include <string.h>
   7 #include <stdbool.h>
   8
   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
  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
  37 static void print_dec(const char *const name, const char *const val)
  38 {
  39         printf("   %-46s : constant         := %s;\n", name, val);
  40 }
  41
  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
  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])) {
 108                                 print_dec(name, val);
 109                         } else {
 110                                 fprintf(stderr,
 111                                         "couldn't parse value '%s' for '%s'\n",
 112                                         val, name);
 113                         }
 114                         continue;
 115                 default:
 116                         break;
 117                 }
 118
 119                 unsigned int i = 0;
 120                 while (isspace(line[i]))
 121                         ++i;
 122                 if (line[i] == '#') {
 123                         printf("   --%s", line + i + 1);
 124                         continue;
 125                 } else if (i == strlen(line)) {
 126                         continue;
 127                 }
 128
 129                 fprintf(stderr, "spurious line:\n%s", line);
 130         }
 131
 132         printf("\nend %s;\n", package);
 133         return 0;
 134 }