1 | // SPDX-License-Identifier: GPL-2.0 |
2 | /* |
3 | * Generate devlist.h from the Zorro ID file. |
4 | * |
5 | * (c) 2000 Geert Uytterhoeven <geert@linux-m68k.org> |
6 | * |
7 | * Based on the PCI version: |
8 | * |
9 | * (c) 1999--2000 Martin Mares <mj@ucw.cz> |
10 | */ |
11 | |
12 | #include <stdio.h> |
13 | #include <string.h> |
14 | |
15 | #define MAX_NAME_SIZE 63 |
16 | |
17 | static void |
18 | pq(FILE *f, const char *c) |
19 | { |
20 | while (*c) { |
21 | if (*c == '"') |
22 | fprintf(f, "\\\"" ); |
23 | else |
24 | fputc(*c, f); |
25 | c++; |
26 | } |
27 | } |
28 | |
29 | int |
30 | main(void) |
31 | { |
32 | char line[1024], *c, *bra, manuf[8]; |
33 | int manufs = 0; |
34 | int mode = 0; |
35 | int lino = 0; |
36 | int manuf_len = 0; |
37 | FILE *devf; |
38 | |
39 | devf = fopen("devlist.h" , "w" ); |
40 | if (!devf) { |
41 | fprintf(stderr, "Cannot create output file!\n" ); |
42 | return 1; |
43 | } |
44 | |
45 | while (fgets(line, sizeof(line)-1, stdin)) { |
46 | lino++; |
47 | if ((c = strchr(line, '\n'))) |
48 | *c = 0; |
49 | if (!line[0] || line[0] == '#') |
50 | continue; |
51 | if (line[0] == '\t') { |
52 | switch (mode) { |
53 | case 1: |
54 | if (strlen(line) > 5 && line[5] == ' ') { |
55 | c = line + 5; |
56 | while (*c == ' ') |
57 | *c++ = 0; |
58 | if (manuf_len + strlen(c) + 1 > MAX_NAME_SIZE) { |
59 | /* Too long, try cutting off long description */ |
60 | bra = strchr(c, '['); |
61 | if (bra && bra > c && bra[-1] == ' ') |
62 | bra[-1] = 0; |
63 | if (manuf_len + strlen(c) + 1 > MAX_NAME_SIZE) { |
64 | fprintf(stderr, "Line %d: Product name too long\n" , lino); |
65 | return 1; |
66 | } |
67 | } |
68 | fprintf(devf, "\tPRODUCT(%s,%s,\"" , manuf, line+1); |
69 | pq(devf, c); |
70 | fputs("\")\n" , devf); |
71 | } else goto err; |
72 | break; |
73 | default: |
74 | goto err; |
75 | } |
76 | } else if (strlen(line) > 4 && line[4] == ' ') { |
77 | c = line + 4; |
78 | while (*c == ' ') |
79 | *c++ = 0; |
80 | if (manufs) |
81 | fputs("ENDMANUF()\n\n" , devf); |
82 | manufs++; |
83 | strcpy(manuf, line); |
84 | manuf_len = strlen(c); |
85 | if (manuf_len + 24 > MAX_NAME_SIZE) { |
86 | fprintf(stderr, "Line %d: manufacturer name too long\n" , lino); |
87 | return 1; |
88 | } |
89 | fprintf(devf, "MANUF(%s,\"" , manuf); |
90 | pq(devf, c); |
91 | fputs("\")\n" , devf); |
92 | mode = 1; |
93 | } else { |
94 | err: |
95 | fprintf(stderr, "Line %d: Syntax error in mode %d: %s\n" , lino, mode, line); |
96 | return 1; |
97 | } |
98 | } |
99 | fputs("ENDMANUF()\n\ |
100 | \n\ |
101 | #undef MANUF\n\ |
102 | #undef PRODUCT\n\ |
103 | #undef ENDMANUF\n" , devf); |
104 | |
105 | fclose(devf); |
106 | |
107 | return 0; |
108 | } |
109 | |