vnode_if.sh revision 1.17 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.17 1998/07/30 00:46:01 mycroft 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
114 willrele[argc] = 0;
115 argtype[argc] = $i; i++;
116 while (i < NF) {
117 argtype[argc] = argtype[argc]" "$i;
118 i++;
119 }
120 argname[argc] = $i;
121 argc++;
122 next;
123 }
124 '
125
126 # This is put before the copyright on each generated file.
127 warning="\
128 /* @NetBSD@ */
129
130 /*
131 * Warning: This file is generated automatically.
132 * (Modifications made here may easily be lost!)
133 *
134 * Created from the file:
135 * ${SRC_ID}
136 * by the script:
137 * ${SCRIPT_ID}
138 */
139 "
140
141 # This is to satisfy McKusick (get rid of evil spaces 8^)
142 anal_retentive='s:\([^/]\*\) :\1:g'
143
144 #
145 # Redirect stdout to the H file.
146 #
147 echo "$0: Creating $out_h" 1>&2
148 exec > $out_h
149
150 # Begin stuff
151 echo -n "$warning" | sed -e 's/\$//g;s/@/\$/g'
152 echo ""
153 echo -n "$copyright"
154 echo ''
155 echo '#ifndef _SYS_VNODE_IF_H_'
156 echo '#define _SYS_VNODE_IF_H_'
157 echo '
158 extern struct vnodeop_desc vop_default_desc;
159 '
160
161 # Body stuff
162 # This awk program needs toupper() so define it if necessary.
163 sed -e "$sed_prep" $src | $awk "$toupper"'
164 function doit() {
165 # Declare arg struct, descriptor.
166 printf("\nstruct %s_args {\n", name);
167 printf("\tstruct vnodeop_desc * a_desc;\n");
168 for (i=0; i<argc; i++) {
169 printf("\t%s a_%s;\n", argtype[i], argname[i]);
170 }
171 printf("};\n");
172 printf("extern struct vnodeop_desc %s_desc;\n", name);
173 # Prototype it.
174 protoarg = sprintf("static __inline int %s __P((", toupper(name));
175 protolen = length(protoarg);
176 printf("%s", protoarg);
177 for (i=0; i<argc; i++) {
178 protoarg = sprintf("%s", argtype[i]);
179 if (i < (argc-1)) protoarg = (protoarg ", ");
180 arglen = length(protoarg);
181 if (i == (argc-1))
182 arglen += length(" __attribute__((__unused__))");
183 if ((protolen + arglen) > 77) {
184 protoarg = ("\n " protoarg);
185 arglen += 4;
186 protolen = 0;
187 }
188 printf("%s", protoarg);
189 protolen += arglen;
190 }
191 printf(")) __attribute__((__unused__));\n");
192 # Define inline function.
193 printf("static __inline int %s(", toupper(name));
194 for (i=0; i<argc; i++) {
195 printf("%s", argname[i]);
196 if (i < (argc-1)) printf(", ");
197 }
198 printf(")\n");
199 for (i=0; i<argc; i++) {
200 printf("\t%s %s;\n", argtype[i], argname[i]);
201 }
202 printf("{\n\tstruct %s_args a;\n", name);
203 printf("\ta.a_desc = VDESC(%s);\n", name);
204 for (i=0; i<argc; i++) {
205 printf("\ta.a_%s = %s;\n", argname[i], argname[i]);
206 }
207 printf("\treturn (VCALL(%s%s, VOFFSET(%s), &a));\n}\n",
208 argname[0], arg0special, name);
209 }
210 BEGIN {
211 arg0special="";
212 }
213 END {
214 printf("\n/* Special cases: */\n#include <sys/buf.h>\n");
215 argc=1;
216 argtype[0]="struct buf *";
217 argname[0]="bp";
218 arg0special="->b_vp";
219 name="vop_strategy";
220 doit();
221 name="vop_bwrite";
222 doit();
223 }
224 '"$awk_parser" | sed -e "$anal_retentive"
225
226 # End stuff
227 echo '
228 /* End of special cases. */'
229 echo ''
230 echo '#endif /* !_SYS_VNODE_IF_H_ */'
231
232 #
233 # Redirect stdout to the C file.
234 #
235 echo "$0: Creating $out_c" 1>&2
236 exec > $out_c
237
238 # Begin stuff
239 echo -n "$warning" | sed -e 's/\$//g;s/@/\$/g'
240 echo ""
241 echo -n "$copyright"
242 echo '
243 #include <sys/param.h>
244 #include <sys/mount.h>
245 #include <sys/vnode.h>
246
247 struct vnodeop_desc vop_default_desc = {
248 0,
249 "default",
250 0,
251 NULL,
252 VDESC_NO_OFFSET,
253 VDESC_NO_OFFSET,
254 VDESC_NO_OFFSET,
255 VDESC_NO_OFFSET,
256 NULL,
257 };
258 '
259
260 # Body stuff
261 sed -e "$sed_prep" $src | $awk '
262 function do_offset(typematch) {
263 for (i=0; i<argc; i++) {
264 if (argtype[i] == typematch) {
265 printf("\tVOPARG_OFFSETOF(struct %s_args, a_%s),\n",
266 name, argname[i]);
267 return i;
268 };
269 };
270 print "\tVDESC_NO_OFFSET,";
271 return -1;
272 }
273
274 function doit() {
275 # Define offsets array
276 printf("\nint %s_vp_offsets[] = {\n", name);
277 for (i=0; i<argc; i++) {
278 if (argtype[i] == "struct vnode *") {
279 printf ("\tVOPARG_OFFSETOF(struct %s_args,a_%s),\n",
280 name, argname[i]);
281 }
282 }
283 print "\tVDESC_NO_OFFSET";
284 print "};";
285 # Define F_desc
286 printf("struct vnodeop_desc %s_desc = {\n", name);
287 # offset
288 printf ("\t0,\n");
289 # printable name
290 printf ("\t\"%s\",\n", name);
291 # flags
292 printf("\t0");
293 vpnum = 0;
294 for (i=0; i<argc; i++) {
295 if (willrele[i]) {
296 if (argdir[i] ~ /OUT/) {
297 printf(" | VDESC_VPP_WILLRELE");
298 } else {
299 printf(" | VDESC_VP%s_WILLRELE", vpnum);
300 };
301 vpnum++;
302 }
303 }
304 print ",";
305 # vp offsets
306 printf ("\t%s_vp_offsets,\n", name);
307 # vpp (if any)
308 do_offset("struct vnode **");
309 # cred (if any)
310 do_offset("struct ucred *");
311 # proc (if any)
312 do_offset("struct proc *");
313 # componentname
314 do_offset("struct componentname *");
315 # transport layer information
316 printf ("\tNULL,\n};\n");
317 }
318 END {
319 printf("\n/* Special cases: */\n");
320 argc=1;
321 argdir[0]="IN";
322 argtype[0]="struct buf *";
323 argname[0]="bp";
324 willrele[0]=0;
325 name="vop_strategy";
326 doit();
327 name="vop_bwrite";
328 doit();
329 }
330 '"$awk_parser" | sed -e "$anal_retentive"
331
332 # End stuff
333 echo '
334 /* End of special cases. */'
335
336 # Add the vfs_op_descs array to the C file.
337 # Begin stuff
338 echo '
339 struct vnodeop_desc *vfs_op_descs[] = {
340 &vop_default_desc, /* MUST BE FIRST */
341 &vop_strategy_desc, /* XXX: SPECIAL CASE */
342 &vop_bwrite_desc, /* XXX: SPECIAL CASE */
343 '
344
345 # Body stuff
346 sed -e "$sed_prep" $src | $awk '
347 function doit() {
348 printf("\t&%s_desc,\n", name);
349 }
350 '"$awk_parser"
351
352 # End stuff
353 echo ' NULL
354 };
355 '
356
357 exit 0
358
359 # Local Variables:
360 # tab-width: 4
361 # End:
362