devlist2h.awk revision 1.2 1 1.1 cgd #! /usr/bin/awk -f
2 1.2 cgd # $NetBSD: devlist2h.awk,v 1.2 1996/04/09 20:07:16 cgd Exp $
3 1.1 cgd #
4 1.1 cgd # Copyright (c) 1995, 1996 Christopher G. Demetriou
5 1.1 cgd # All rights reserved.
6 1.1 cgd #
7 1.1 cgd # Redistribution and use in source and binary forms, with or without
8 1.1 cgd # modification, are permitted provided that the following conditions
9 1.1 cgd # are met:
10 1.1 cgd # 1. Redistributions of source code must retain the above copyright
11 1.1 cgd # notice, this list of conditions and the following disclaimer.
12 1.1 cgd # 2. Redistributions in binary form must reproduce the above copyright
13 1.1 cgd # notice, this list of conditions and the following disclaimer in the
14 1.1 cgd # documentation and/or other materials provided with the distribution.
15 1.1 cgd # 3. All advertising materials mentioning features or use of this software
16 1.1 cgd # must display the following acknowledgement:
17 1.1 cgd # This product includes software developed by Christopher G. Demetriou.
18 1.1 cgd # 4. The name of the author may not be used to endorse or promote products
19 1.1 cgd # derived from this software without specific prior written permission
20 1.1 cgd #
21 1.1 cgd # THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22 1.1 cgd # IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23 1.1 cgd # OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24 1.1 cgd # IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25 1.1 cgd # INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26 1.1 cgd # NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27 1.1 cgd # DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28 1.1 cgd # THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29 1.1 cgd # (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30 1.1 cgd # THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 1.1 cgd #
32 1.1 cgd BEGIN {
33 1.1 cgd nproducts = nvendors = 0
34 1.1 cgd dfile="eisadevs_data.h"
35 1.1 cgd hfile="eisadevs.h"
36 1.1 cgd }
37 1.1 cgd NR == 1 {
38 1.1 cgd VERSION = $0
39 1.1 cgd gsub("\\$", "", VERSION)
40 1.1 cgd
41 1.1 cgd printf("/*\n") > dfile
42 1.1 cgd printf(" * THIS FILE AUTOMATICALLY GENERATED. DO NOT EDIT.\n") \
43 1.1 cgd > dfile
44 1.1 cgd printf(" *\n") > dfile
45 1.1 cgd printf(" * generated from:\n") > dfile
46 1.1 cgd printf(" *\t%s\n", VERSION) > dfile
47 1.1 cgd printf(" */\n") > dfile
48 1.1 cgd
49 1.1 cgd printf("/*\n") > hfile
50 1.1 cgd printf(" * THIS FILE AUTOMATICALLY GENERATED. DO NOT EDIT.\n") \
51 1.1 cgd > hfile
52 1.1 cgd printf(" *\n") > hfile
53 1.1 cgd printf(" * generated from:\n") > hfile
54 1.1 cgd printf(" *\t%s\n", VERSION) > hfile
55 1.1 cgd printf(" */\n") > hfile
56 1.1 cgd
57 1.1 cgd next
58 1.1 cgd }
59 1.1 cgd $1 == "vendor" {
60 1.1 cgd nvendors++
61 1.1 cgd
62 1.1 cgd vendorindex[$2] = nvendors; # record index for this name, for later.
63 1.1 cgd vendors[nvendors, 1] = $2; # name/ID
64 1.1 cgd i = 2; f = 3;
65 1.1 cgd
66 1.1 cgd # comments
67 1.1 cgd ocomment = oparen = 0
68 1.1 cgd if (f <= NF) {
69 1.1 cgd ocomment = 1;
70 1.1 cgd }
71 1.1 cgd while (f <= NF) {
72 1.1 cgd if ($f == "#") {
73 1.1 cgd oparen = 1
74 1.1 cgd f++
75 1.1 cgd continue
76 1.1 cgd }
77 1.1 cgd if (oparen) {
78 1.1 cgd f++
79 1.1 cgd continue
80 1.1 cgd }
81 1.1 cgd vendors[nvendors, i] = $f
82 1.1 cgd i++; f++;
83 1.1 cgd }
84 1.1 cgd
85 1.1 cgd next
86 1.1 cgd }
87 1.1 cgd $1 == "product" {
88 1.1 cgd nproducts++
89 1.1 cgd
90 1.1 cgd products[nproducts, 1] = $2; # vendor name
91 1.1 cgd products[nproducts, 2] = $3; # product id
92 1.1 cgd printf("#define\tEISA_PRODUCT_%s%s\t\"", products[nproducts, 1],
93 1.2 cgd products[nproducts, 2]) > hfile
94 1.1 cgd
95 1.1 cgd i = vendorindex[products[nproducts, 1]]; j = 2;
96 1.1 cgd needspace = 0;
97 1.1 cgd while (vendors[i, j] != "") {
98 1.1 cgd if (needspace)
99 1.1 cgd printf(" ") > hfile
100 1.1 cgd printf("%s", vendors[i, j]) > hfile
101 1.1 cgd needspace = 1
102 1.1 cgd j++
103 1.1 cgd }
104 1.1 cgd
105 1.1 cgd if (needspace)
106 1.1 cgd printf(" ") > hfile
107 1.1 cgd
108 1.1 cgd i=3; f = 4;
109 1.1 cgd
110 1.1 cgd # comments
111 1.1 cgd ocomment = oparen = 0
112 1.1 cgd if (f <= NF) {
113 1.1 cgd ocomment = 1;
114 1.1 cgd }
115 1.1 cgd while (f <= NF) {
116 1.1 cgd if ($f == "#") {
117 1.1 cgd printf("(") > hfile
118 1.1 cgd oparen = 1
119 1.1 cgd f++
120 1.1 cgd continue
121 1.1 cgd }
122 1.1 cgd if (oparen) {
123 1.1 cgd printf("%s", $f) > hfile
124 1.1 cgd if (f < NF)
125 1.1 cgd printf(" ") > hfile
126 1.1 cgd f++
127 1.1 cgd continue
128 1.1 cgd }
129 1.1 cgd products[nproducts, i] = $f
130 1.1 cgd printf("%s", products[nproducts, i]) > hfile
131 1.1 cgd if (f < NF)
132 1.1 cgd printf(" ") > hfile
133 1.1 cgd i++; f++;
134 1.1 cgd }
135 1.1 cgd if (oparen)
136 1.1 cgd printf(")") > hfile
137 1.1 cgd if (ocomment)
138 1.1 cgd printf("\"") > hfile
139 1.1 cgd printf("\n") > hfile
140 1.1 cgd
141 1.1 cgd next
142 1.1 cgd }
143 1.1 cgd {
144 1.1 cgd if ($0 == "")
145 1.1 cgd blanklines++
146 1.1 cgd if (blanklines != 2 && blanklines != 3)
147 1.1 cgd print $0 > hfile
148 1.1 cgd if (blanklines < 2)
149 1.1 cgd print $0 > dfile
150 1.1 cgd }
151 1.1 cgd END {
152 1.1 cgd # print out the match tables
153 1.1 cgd
154 1.1 cgd printf("\n") > dfile
155 1.1 cgd
156 1.1 cgd printf("struct eisa_knowndev eisa_knowndevs[] = {\n") > dfile
157 1.1 cgd for (i = 1; i <= nproducts; i++) {
158 1.1 cgd printf("\t{\n") > dfile
159 1.1 cgd printf("\t 0,\n") > dfile
160 1.1 cgd printf("\t \"%s%s\",\n", products[i, 1], products[i, 2]) \
161 1.1 cgd > dfile
162 1.1 cgd printf("\t EISA_PRODUCT_%s%s,\n", \
163 1.1 cgd products[i, 1], products[i, 2]) \
164 1.1 cgd > dfile
165 1.1 cgd
166 1.1 cgd printf("\t},\n") > dfile
167 1.1 cgd }
168 1.1 cgd for (i = 1; i <= nvendors; i++) {
169 1.1 cgd printf("\t{\n") > dfile
170 1.1 cgd printf("\t EISA_KNOWNDEV_NOPROD,\n") \
171 1.1 cgd > dfile
172 1.1 cgd printf("\t \"%s\",\n", vendors[i, 1]) \
173 1.1 cgd > dfile
174 1.1 cgd printf("\t \"") > dfile
175 1.1 cgd j = 2;
176 1.1 cgd needspace = 0;
177 1.1 cgd while (vendors[i, j] != "") {
178 1.1 cgd if (needspace)
179 1.1 cgd printf(" ") > dfile
180 1.1 cgd printf("%s", vendors[i, j]) > dfile
181 1.1 cgd needspace = 1
182 1.1 cgd j++
183 1.1 cgd }
184 1.1 cgd printf("\",\n") > dfile
185 1.1 cgd printf("\t},\n") > dfile
186 1.1 cgd }
187 1.1 cgd printf("\t{ 0, NULL, NULL, }\n") > dfile
188 1.1 cgd printf("};\n") > dfile
189 1.1 cgd }
190