vnode_if.sh revision 1.18.8.1 1 #!/bin/sh -
2 copyright="\
3 /*
4 * Copyright (c) 1992, 1993, 1994, 1995
5 * The Regents of the University of California. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. All advertising materials mentioning features or use of this software
16 * must display the following acknowledgement:
17 * This product includes software developed by the University of
18 * California, Berkeley and its contributors.
19 * 4. Neither the name of the University nor the names of its contributors
20 * may be used to endorse or promote products derived from this software
21 * without specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS \`\`AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * SUCH DAMAGE.
34 */
35 "
36 SCRIPT_ID='$NetBSD: vnode_if.sh,v 1.18.8.1 1999/08/02 22:19:16 thorpej Exp $'
37
38 # Script to produce VFS front-end sugar.
39 #
40 # usage: vnode_if.sh srcfile
41 # (where srcfile is currently /sys/kern/vnode_if.src)
42 #
43
44 if [ $# -ne 1 ] ; then
45 echo 'usage: vnode_if.sh srcfile'
46 exit 1
47 fi
48
49 # Name and revision of the source file.
50 src=$1
51 SRC_ID=`head -1 $src | sed -e 's/.*\$\(.*\)\$.*/\1/'`
52
53 # Names of the created files.
54 out_c=vnode_if.c
55 out_h=../sys/vnode_if.h
56
57 # Awk program (must support nawk extensions)
58 # Use "awk" at Berkeley, "nawk" or "gawk" elsewhere.
59 awk=${AWK:-awk}
60
61 # Does this awk have a "toupper" function? (i.e. is it GNU awk)
62 isgawk=`$awk 'BEGIN { print toupper("true"); exit; }' 2>/dev/null`
63
64 # If this awk does not define "toupper" then define our own.
65 if [ "$isgawk" = TRUE ] ; then
66 # GNU awk provides it.
67 toupper=
68 else
69 # Provide our own toupper()
70 toupper='
71 function toupper(str) {
72 _toupper_cmd = "echo "str" |tr a-z A-Z"
73 _toupper_cmd | getline _toupper_str;
74 close(_toupper_cmd);
75 return _toupper_str;
76 }'
77 fi
78
79 #
80 # This is the common part of all awk programs that read $src
81 # This parses the input for one function into the arrays:
82 # argdir, argtype, argname, willrele
83 # and calls "doit()" to generate output for the function.
84 #
85 # Input to this parser is pre-processed slightly by sed
86 # so this awk parser doesn't have to work so hard. The
87 # changes done by the sed pre-processing step are:
88 # insert a space beween * and pointer name
89 # replace semicolons with spaces
90 #
91 sed_prep='s:\*\([^\*/]\):\* \1:g
92 s/;/ /'
93 awk_parser='
94 # Comment line
95 /^#/ { next; }
96 # First line of description
97 /^vop_/ {
98 name=$1;
99 argc=0;
100 next;
101 }
102 # Last line of description
103 /^}/ {
104 doit();
105 next;
106 }
107 # Middle lines of description
108 {
109 argdir[argc] = $1; i=2;
110 if ($2 == "WILLRELE") {
111 willrele[argc] = 1;
112 i++;
113 } else if ($2 == "WILLUNLOCK") {
114 willrele[argc] = 2;
115 i++;
116 } else if ($2 == "WILLPUT") {
117 willrele[argc] = 3;
118 i++;
119 } else
120 willrele[argc] = 0;
121 argtype[argc] = $i; i++;
122 while (i < NF) {
123 argtype[argc] = argtype[argc]" "$i;
124 i++;
125 }
126 argname[argc] = $i;
127 argc++;
128 next;
129 }
130 '
131
132 # This is put before the copyright on each generated file.
133 warning="\
134 /* @NetBSD@ */
135
136 /*
137 * Warning: This file is generated automatically.
138 * (Modifications made here may easily be lost!)
139 *
140 * Created from the file:
141 * ${SRC_ID}
142 * by the script:
143 * ${SCRIPT_ID}
144 */
145 "
146
147 # This is to satisfy McKusick (get rid of evil spaces 8^)
148 anal_retentive='s:\([^/]\*\) :\1:g'
149
150 #
151 # Redirect stdout to the H file.
152 #
153 echo "$0: Creating $out_h" 1>&2
154 exec > $out_h
155
156 # Begin stuff
157 echo -n "$warning" | sed -e 's/\$//g;s/@/\$/g'
158 echo ""
159 echo -n "$copyright"
160 echo ''
161 echo '#ifndef _SYS_VNODE_IF_H_'
162 echo '#define _SYS_VNODE_IF_H_'
163 echo '
164 extern struct vnodeop_desc vop_default_desc;
165 '
166
167 # Body stuff
168 # This awk program needs toupper() so define it if necessary.
169 sed -e "$sed_prep" $src | $awk "$toupper"'
170 function doit() {
171 # Declare arg struct, descriptor.
172 printf("\nstruct %s_args {\n", name);
173 printf("\tstruct vnodeop_desc * a_desc;\n");
174 for (i=0; i<argc; i++) {
175 printf("\t%s a_%s;\n", argtype[i], argname[i]);
176 }
177 printf("};\n");
178 printf("extern struct vnodeop_desc %s_desc;\n", name);
179 # Prototype it.
180 protoarg = sprintf("static __inline int %s __P((", toupper(name));
181 protolen = length(protoarg);
182 printf("%s", protoarg);
183 for (i=0; i<argc; i++) {
184 protoarg = sprintf("%s", argtype[i]);
185 if (i < (argc-1)) protoarg = (protoarg ", ");
186 arglen = length(protoarg);
187 if (i == (argc-1))
188 arglen += length(" __attribute__((__unused__))");
189 if ((protolen + arglen) > 77) {
190 protoarg = ("\n " protoarg);
191 arglen += 4;
192 protolen = 0;
193 }
194 printf("%s", protoarg);
195 protolen += arglen;
196 }
197 printf(")) __attribute__((__unused__));\n");
198 # Define inline function.
199 printf("static __inline int %s(", toupper(name));
200 for (i=0; i<argc; i++) {
201 printf("%s", argname[i]);
202 if (i < (argc-1)) printf(", ");
203 }
204 printf(")\n");
205 for (i=0; i<argc; i++) {
206 printf("\t%s %s;\n", argtype[i], argname[i]);
207 }
208 printf("{\n\tstruct %s_args a;\n", name);
209 printf("\ta.a_desc = VDESC(%s);\n", name);
210 for (i=0; i<argc; i++) {
211 printf("\ta.a_%s = %s;\n", argname[i], argname[i]);
212 }
213 printf("\treturn (VCALL(%s%s, VOFFSET(%s), &a));\n}\n",
214 argname[0], arg0special, name);
215 }
216 BEGIN {
217 arg0special="";
218 }
219 END {
220 printf("\n/* Special cases: */\n#include <sys/buf.h>\n");
221 argc=1;
222 argtype[0]="struct buf *";
223 argname[0]="bp";
224 arg0special="->b_vp";
225 name="vop_strategy";
226 doit();
227 name="vop_bwrite";
228 doit();
229 }
230 '"$awk_parser" | sed -e "$anal_retentive"
231
232 # End stuff
233 echo '
234 /* End of special cases. */'
235 echo ''
236 echo '#endif /* !_SYS_VNODE_IF_H_ */'
237
238 #
239 # Redirect stdout to the C file.
240 #
241 echo "$0: Creating $out_c" 1>&2
242 exec > $out_c
243
244 # Begin stuff
245 echo -n "$warning" | sed -e 's/\$//g;s/@/\$/g'
246 echo ""
247 echo -n "$copyright"
248 echo '
249 #include <sys/param.h>
250 #include <sys/mount.h>
251 #include <sys/vnode.h>
252
253 struct vnodeop_desc vop_default_desc = {
254 0,
255 "default",
256 0,
257 NULL,
258 VDESC_NO_OFFSET,
259 VDESC_NO_OFFSET,
260 VDESC_NO_OFFSET,
261 VDESC_NO_OFFSET,
262 NULL,
263 };
264 '
265
266 # Body stuff
267 sed -e "$sed_prep" $src | $awk '
268 function do_offset(typematch) {
269 for (i=0; i<argc; i++) {
270 if (argtype[i] == typematch) {
271 printf("\tVOPARG_OFFSETOF(struct %s_args, a_%s),\n",
272 name, argname[i]);
273 return i;
274 };
275 };
276 print "\tVDESC_NO_OFFSET,";
277 return -1;
278 }
279
280 function doit() {
281 # Define offsets array
282 printf("\nint %s_vp_offsets[] = {\n", name);
283 for (i=0; i<argc; i++) {
284 if (argtype[i] == "struct vnode *") {
285 printf ("\tVOPARG_OFFSETOF(struct %s_args,a_%s),\n",
286 name, argname[i]);
287 }
288 }
289 print "\tVDESC_NO_OFFSET";
290 print "};";
291 # Define F_desc
292 printf("struct vnodeop_desc %s_desc = {\n", name);
293 # offset
294 printf ("\t0,\n");
295 # printable name
296 printf ("\t\"%s\",\n", name);
297 # flags
298 printf("\t0");
299 vpnum = 0;
300 for (i=0; i<argc; i++) {
301 if (willrele[i]) {
302 if (willrele[i] == 2) {
303 word = "UNLOCK";
304 } else if (willrele[i] == 3) {
305 word = "PUT";
306 } else {
307 word = "RELE";
308 }
309 if (argdir[i] ~ /OUT/) {
310 printf(" | VDESC_VPP_WILL%s", word);
311 } else {
312 printf(" | VDESC_VP%s_WILL%s", vpnum, word);
313 };
314 vpnum++;
315 }
316 }
317 print ",";
318 # vp offsets
319 printf ("\t%s_vp_offsets,\n", name);
320 # vpp (if any)
321 do_offset("struct vnode **");
322 # cred (if any)
323 do_offset("struct ucred *");
324 # proc (if any)
325 do_offset("struct proc *");
326 # componentname
327 do_offset("struct componentname *");
328 # transport layer information
329 printf ("\tNULL,\n};\n");
330 }
331 END {
332 printf("\n/* Special cases: */\n");
333 argc=1;
334 argdir[0]="IN";
335 argtype[0]="struct buf *";
336 argname[0]="bp";
337 willrele[0]=0;
338 name="vop_strategy";
339 doit();
340 name="vop_bwrite";
341 doit();
342 }
343 '"$awk_parser" | sed -e "$anal_retentive"
344
345 # End stuff
346 echo '
347 /* End of special cases. */'
348
349 # Add the vfs_op_descs array to the C file.
350 # Begin stuff
351 echo '
352 struct vnodeop_desc *vfs_op_descs[] = {
353 &vop_default_desc, /* MUST BE FIRST */
354 &vop_strategy_desc, /* XXX: SPECIAL CASE */
355 &vop_bwrite_desc, /* XXX: SPECIAL CASE */
356 '
357
358 # Body stuff
359 sed -e "$sed_prep" $src | $awk '
360 function doit() {
361 printf("\t&%s_desc,\n", name);
362 }
363 '"$awk_parser"
364
365 # End stuff
366 echo ' NULL
367 };
368 '
369
370 exit 0
371
372 # Local Variables:
373 # tab-width: 4
374 # End:
375