Home | History | Annotate | Line # | Download | only in kern
vnode_if.sh revision 1.16
      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.16 1998/03/01 02:22:37 fvdl 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