Home | History | Annotate | Line # | Download | only in kern
makesyscalls.sh revision 1.183.2.1
      1  1.183.2.1   thorpej #	$NetBSD: makesyscalls.sh,v 1.183.2.1 2021/04/17 17:26:20 thorpej Exp $
      2        1.9       cgd #
      3       1.37       cgd # Copyright (c) 1994, 1996, 2000 Christopher G. Demetriou
      4       1.12       cgd # All rights reserved.
      5       1.12       cgd #
      6       1.12       cgd # Redistribution and use in source and binary forms, with or without
      7       1.12       cgd # modification, are permitted provided that the following conditions
      8       1.12       cgd # are met:
      9       1.12       cgd # 1. Redistributions of source code must retain the above copyright
     10       1.12       cgd #    notice, this list of conditions and the following disclaimer.
     11       1.12       cgd # 2. Redistributions in binary form must reproduce the above copyright
     12       1.12       cgd #    notice, this list of conditions and the following disclaimer in the
     13       1.12       cgd #    documentation and/or other materials provided with the distribution.
     14       1.12       cgd # 3. All advertising materials mentioning features or use of this software
     15       1.12       cgd #    must display the following acknowledgement:
     16       1.12       cgd #      This product includes software developed for the NetBSD Project
     17       1.12       cgd #      by Christopher G. Demetriou.
     18       1.12       cgd # 4. The name of the author may not be used to endorse or promote products
     19       1.12       cgd #    derived from this software without specific prior written permission
     20       1.12       cgd #
     21       1.12       cgd # THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     22       1.12       cgd # IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     23       1.12       cgd # OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     24       1.12       cgd # IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     25       1.12       cgd # INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     26       1.12       cgd # NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     27       1.12       cgd # DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     28       1.12       cgd # THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     29       1.12       cgd # (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     30       1.12       cgd # THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     31       1.14       cgd 
     32       1.14       cgd #	@(#)makesyscalls.sh	8.1 (Berkeley) 6/10/93
     33        1.1     glass 
     34        1.1     glass set -e
     35        1.1     glass 
     36       1.11       cgd case $# in
     37       1.11       cgd     2)	;;
     38       1.11       cgd     *)	echo "Usage: $0 config-file input-file" 1>&2
     39       1.11       cgd 	exit 1
     40       1.11       cgd 	;;
     41       1.11       cgd esac
     42       1.11       cgd 
     43       1.11       cgd # the config file sets the following variables:
     44      1.134     njoly #	sysalign	check for alignment of off_t/dev_t/time_t
     45       1.11       cgd #	sysnames	the syscall names file
     46       1.11       cgd #	sysnumhdr	the syscall numbers file
     47       1.11       cgd #	syssw		the syscall switch file
     48      1.152  pgoyette #	sysautoload	the syscall autoload definitions file
     49       1.11       cgd #	sysarghdr	the syscall argument struct definitions
     50      1.179  dholland #	sysarghdrextra	extra stuff dumped into sysarghdr
     51      1.179  dholland #	systrace	the dtrace definitions
     52       1.11       cgd #	compatopts	those syscall types that are for 'compat' syscalls
     53       1.11       cgd #	switchname	the name for the 'struct sysent' we define
     54       1.40   mycroft #	namesname	the name for the 'const char *[]' we define
     55       1.11       cgd #	constprefix	the prefix for the system call constants
     56      1.162  pgoyette #	emulname	the emulation name
     57       1.30       eeh #	registertype	the type for register_t
     58       1.40   mycroft #	nsysent		the size of the sysent table
     59       1.46  jdolecek #	sys_nosys	[optional] name of function called for unsupported
     60       1.46  jdolecek #			syscalls, if not sys_nosys()
     61       1.60       dsl #       maxsysargs	[optiona] the maximum number or arguments
     62      1.179  dholland #	rumpcalls	???
     63      1.179  dholland #	rumpcallshdr	???
     64      1.179  dholland #	rumpsysmap	???
     65       1.11       cgd #
     66       1.56     lukem # NOTE THAT THIS makesyscalls.sh DOES NOT SUPPORT 'SYSLIBCOMPAT'.
     67        1.1     glass 
     68       1.46  jdolecek # source the config file.
     69       1.46  jdolecek sys_nosys="sys_nosys"	# default is sys_nosys(), if not specified otherwise
     70       1.60       dsl maxsysargs=8		# default limit is 8 (32bit) arguments
     71      1.146  christos systrace="/dev/null"
     72      1.153     pooka sysautoload="/dev/null"
     73       1.67     njoly rumpcalls="/dev/null"
     74       1.67     njoly rumpcallshdr="/dev/null"
     75      1.142     pooka rumpsysmap="/dev/null"
     76       1.83     pooka rumpsysent="rumpsysent.tmp"
     77      1.147  christos rumpnoflags="\n\t\t.sy_flags = SYCALL_NOSYS,"
     78      1.174  christos rumpnosys="(sy_call_t *)(void *)rumpns_enosys"
     79      1.174  christos rumpnomodule="(sy_call_t *)(void *)rumpns_sys_nomodule"
     80      1.149  christos 
     81      1.149  christos case $1 in
     82      1.149  christos /*)	. $1;;
     83      1.149  christos *)	. ./$1;;
     84      1.149  christos esac
     85       1.46  jdolecek 
     86      1.172       kre errmsg()
     87      1.172       kre {
     88      1.172       kre 	fail=true;
     89      1.172       kre 	printf '%s: %s\n' "$0" "$*" >&2
     90      1.172       kre }
     91      1.172       kre 
     92      1.174  christos addsuffix()
     93      1.174  christos {
     94      1.174  christos 	if [ "$1" = "/dev/null" -o -z "$2" ]; then
     95      1.174  christos 		echo $1
     96      1.174  christos 	else
     97      1.174  christos 		echo $1.$2
     98      1.174  christos 	fi
     99      1.174  christos }
    100      1.174  christos 
    101      1.171       kre fail=false
    102      1.171       kre case "${nsysent:-0}" in
    103      1.172       kre *[!0-9]*)	errmsg "Non numeric value for nsysent:" "${nsysent}";;
    104      1.171       kre esac
    105      1.171       kre case "${maxsysargs:-0}" in
    106      1.172       kre *[!0-9]*)	errmsg "Non numeric value for maxsysargs:" "${maxsysargs}";;
    107      1.171       kre esac
    108      1.171       kre $fail && exit 1
    109      1.171       kre 
    110        1.1     glass # tmp files:
    111      1.174  christos sysautoloadbottom=$(addsuffix $sysautoload "bottom")
    112        1.1     glass sysdcl="sysent.dcl"
    113       1.16   thorpej sysprotos="sys.protos"
    114       1.11       cgd syscompat_pref="sysent."
    115        1.1     glass sysent="sysent.switch"
    116      1.174  christos sysnamesbottom=$(addsuffix $sysnames "bottom")
    117      1.174  christos sysnamesfriendly=$(addsuffix $sysnames "friendly")
    118      1.109     pooka rumptypes="rumphdr.types"
    119      1.109     pooka rumpprotos="rumphdr.protos"
    120      1.146  christos systracetmp="systrace.$$"
    121      1.146  christos systraceret="systraceret.$$"
    122        1.1     glass 
    123      1.154  christos cleanup() {
    124      1.176  jdolecek     rm $sysdcl $sysprotos $sysent $sysnamesbottom $sysnamesfriendly $rumpsysent $rumptypes $rumpprotos $systracetmp $systraceret ${sysautoloadbottom#/dev/null}
    125      1.154  christos }
    126      1.154  christos trap "cleanup" 0
    127       1.11       cgd 
    128       1.11       cgd # Awk program (must support nawk extensions)
    129       1.11       cgd # Use "awk" at Berkeley, "nawk" or "gawk" elsewhere.
    130       1.11       cgd awk=${AWK:-awk}
    131       1.11       cgd 
    132       1.57  jdolecek # Does this awk have a "toupper" function?
    133      1.146  christos have_toupper="$($awk 'BEGIN { print toupper("true"); exit; }' 2>/dev/null)"
    134       1.11       cgd 
    135       1.11       cgd # If this awk does not define "toupper" then define our own.
    136       1.57  jdolecek if [ "$have_toupper" = TRUE ] ; then
    137       1.57  jdolecek 	# Used awk (GNU awk or nawk) provides it
    138       1.11       cgd 	toupper=
    139       1.11       cgd else
    140       1.11       cgd 	# Provide our own toupper()
    141       1.11       cgd 	toupper='
    142       1.11       cgd function toupper(str) {
    143       1.11       cgd 	_toupper_cmd = "echo "str" |tr a-z A-Z"
    144       1.11       cgd 	_toupper_cmd | getline _toupper_str;
    145       1.11       cgd 	close(_toupper_cmd);
    146       1.11       cgd 	return _toupper_str;
    147       1.11       cgd }'
    148       1.11       cgd fi
    149       1.11       cgd 
    150       1.11       cgd # before handing it off to awk, make a few adjustments:
    151      1.179  dholland #	(1) insert spaces around {, }, (, ), *, |, and commas.
    152       1.11       cgd #	(2) get rid of any and all dollar signs (so that rcs id use safe)
    153       1.11       cgd #
    154       1.11       cgd # The awk script will deal with blank lines and lines that
    155       1.11       cgd # start with the comment character (';').
    156        1.1     glass 
    157       1.11       cgd sed -e '
    158       1.11       cgd s/\$//g
    159       1.11       cgd :join
    160       1.11       cgd 	/\\$/{a\
    161       1.11       cgd 
    162       1.11       cgd 	N
    163       1.11       cgd 	s/\\\n//
    164       1.11       cgd 	b join
    165       1.11       cgd 	}
    166       1.11       cgd 2,${
    167       1.78     pooka 	/^#/!s/\([{}()*,|]\)/ \1 /g
    168       1.11       cgd }
    169       1.11       cgd ' < $2 | $awk "
    170       1.11       cgd $toupper
    171       1.11       cgd BEGIN {
    172       1.70       apb 	# Create a NetBSD tag that does not get expanded when checking
    173       1.70       apb 	# this script out of CVS.  (This part of the awk script is in a
    174       1.70       apb 	# shell double-quoted string, so the backslashes are eaten by
    175       1.70       apb 	# the shell.)
    176       1.70       apb 	tag = \"\$\" \"NetBSD\" \"\$\"
    177       1.70       apb 
    178       1.18       cgd 	# to allow nested #if/#else/#endif sets
    179       1.18       cgd 	savedepth = 0
    180       1.44  jdolecek 	# to track already processed syscalls
    181       1.18       cgd 
    182       1.11       cgd 	sysnames = \"$sysnames\"
    183       1.16   thorpej 	sysprotos = \"$sysprotos\"
    184       1.11       cgd 	sysnumhdr = \"$sysnumhdr\"
    185       1.11       cgd 	sysarghdr = \"$sysarghdr\"
    186       1.94     pooka 	sysarghdrextra = \"$sysarghdrextra\"
    187      1.146  christos 	systrace = \"$systrace\"
    188      1.146  christos 	systracetmp = \"$systracetmp\"
    189      1.146  christos 	systraceret = \"$systraceret\"
    190      1.152  pgoyette 	sysautoload = \"$sysautoload\"
    191      1.174  christos 	sysautoloadbottom = \"$sysautoloadbottom\"
    192       1.66     pooka 	rumpcalls = \"$rumpcalls\"
    193       1.66     pooka 	rumpcallshdr = \"$rumpcallshdr\"
    194       1.83     pooka 	rumpsysent = \"$rumpsysent\"
    195      1.142     pooka 	rumpsysmap = \"$rumpsysmap\"
    196       1.11       cgd 	switchname = \"$switchname\"
    197       1.11       cgd 	namesname = \"$namesname\"
    198       1.11       cgd 	constprefix = \"$constprefix\"
    199      1.162  pgoyette 	emulname = \"$emulname\"
    200       1.30       eeh 	registertype = \"$registertype\"
    201       1.68  christos 	sysalign=\"$sysalign\"
    202       1.30       eeh 	if (!registertype) {
    203       1.30       eeh 	    registertype = \"register_t\"
    204       1.30       eeh 	}
    205      1.171       kre 	nsysent = ${nsysent:-0}
    206       1.11       cgd 
    207       1.11       cgd 	sysdcl = \"$sysdcl\"
    208       1.11       cgd 	syscompat_pref = \"$syscompat_pref\"
    209       1.11       cgd 	sysent = \"$sysent\"
    210      1.174  christos 	sysnamesbottom = \"$sysnamesbottom\"
    211      1.174  christos 	sysnamesfriendly = \"$sysnamesfriendly\"
    212      1.109     pooka 	rumpprotos = \"$rumpprotos\"
    213      1.109     pooka 	rumptypes = \"$rumptypes\"
    214       1.46  jdolecek 	sys_nosys = \"$sys_nosys\"
    215      1.171       kre 	maxsysargs = ${maxsysargs:-8}
    216      1.151  christos 	rumpnoflags=\"$rumpnoflags\"
    217      1.151  christos 	rumpnosys=\"$rumpnosys\"
    218      1.151  christos 	rumpnomodule=\"$rumpnomodule\"
    219       1.11       cgd 	infile = \"$2\"
    220       1.11       cgd 
    221       1.11       cgd 	compatopts = \"$compatopts\"
    222       1.11       cgd 	"'
    223       1.11       cgd 
    224      1.124     pooka 	if (rumpcalls != "/dev/null")
    225      1.124     pooka 		haverumpcalls = 1
    226      1.124     pooka 
    227       1.70       apb 	printf "/* %s */\n\n", tag > sysdcl
    228       1.11       cgd 	printf "/*\n * System call switch table.\n *\n" > sysdcl
    229       1.11       cgd 	printf " * DO NOT EDIT-- this file is automatically generated.\n" > sysdcl
    230       1.11       cgd 
    231       1.11       cgd 	ncompat = split(compatopts,compat)
    232       1.11       cgd 	for (i = 1; i <= ncompat; i++) {
    233       1.11       cgd 		compat_upper[i] = toupper(compat[i])
    234       1.11       cgd 
    235       1.17   mycroft 		printf "\n#ifdef %s\n", compat_upper[i] > sysent
    236       1.47     lukem 		printf "#define	%s(func) __CONCAT(%s_,func)\n", compat[i], \
    237       1.17   mycroft 		    compat[i] > sysent
    238       1.17   mycroft 		printf "#else\n" > sysent
    239       1.47     lukem 		printf "#define	%s(func) %s\n", compat[i], sys_nosys > sysent
    240       1.17   mycroft 		printf "#endif\n" > sysent
    241       1.11       cgd 	}
    242       1.11       cgd 
    243       1.60       dsl 	printf "\n#define\ts(type)\tsizeof(type)\n" > sysent
    244       1.60       dsl 	printf "#define\tn(type)\t(sizeof(type)/sizeof (%s))\n", registertype > sysent
    245      1.147  christos 	printf "#define\tns(type)\t.sy_narg = n(type), .sy_argsize = s(type)\n\n", registertype > sysent
    246       1.17   mycroft 	printf "struct sysent %s[] = {\n",switchname > sysent
    247       1.17   mycroft 
    248       1.70       apb 	printf "/* %s */\n\n", tag > sysnames
    249       1.11       cgd 	printf "/*\n * System call names.\n *\n" > sysnames
    250       1.11       cgd 	printf " * DO NOT EDIT-- this file is automatically generated.\n" > sysnames
    251       1.11       cgd 
    252       1.16   thorpej 	printf "\n/*\n * System call prototypes.\n */\n\n" > sysprotos
    253      1.124     pooka 	if (haverumpcalls)
    254      1.124     pooka 		printf("#ifndef RUMP_CLIENT\n") > sysprotos
    255       1.16   thorpej 
    256       1.70       apb 	printf "/* %s */\n\n", tag > sysnumhdr
    257       1.11       cgd 	printf "/*\n * System call numbers.\n *\n" > sysnumhdr
    258       1.11       cgd 	printf " * DO NOT EDIT-- this file is automatically generated.\n" > sysnumhdr
    259       1.11       cgd 
    260       1.70       apb 	printf "/* %s */\n\n", tag > sysarghdr
    261       1.13   mycroft 	printf "/*\n * System call argument lists.\n *\n" > sysarghdr
    262       1.11       cgd 	printf " * DO NOT EDIT-- this file is automatically generated.\n" > sysarghdr
    263       1.66     pooka 
    264      1.152  pgoyette 	printf "/* %s */\n\n", tag > sysautoload
    265      1.152  pgoyette 	printf "/*\n * System call autoload table.\n *\n" > sysautoload
    266      1.152  pgoyette 	printf " * DO NOT EDIT-- this file is automatically generated.\n" > sysautoload
    267      1.152  pgoyette 
    268       1.70       apb 	printf "/* %s */\n\n", tag > rumpcalls
    269       1.83     pooka 	printf "/*\n * System call vector and marshalling for rump.\n *\n" > rumpcalls
    270       1.66     pooka 	printf " * DO NOT EDIT-- this file is automatically generated.\n" > rumpcalls
    271       1.66     pooka 
    272       1.70       apb 	printf "/* %s */\n\n", tag > rumpcallshdr
    273       1.66     pooka 	printf "/*\n * System call protos in rump namespace.\n *\n" > rumpcallshdr
    274       1.66     pooka 	printf " * DO NOT EDIT-- this file is automatically generated.\n" > rumpcallshdr
    275      1.146  christos 
    276      1.146  christos 	printf "/* %s */\n\n", tag > systrace
    277      1.183    rillig 	printf "/*\n * System call argument to DTrace register array conversion.\n *\n" > systrace
    278      1.146  christos 	printf " * DO NOT EDIT-- this file is automatically generated.\n" > systrace
    279       1.11       cgd }
    280       1.11       cgd NR == 1 {
    281       1.58     perry 	sub(/ $/, "")
    282       1.11       cgd 	printf " * created from%s\n */\n\n", $0 > sysdcl
    283       1.70       apb 	printf "#include <sys/cdefs.h>\n__KERNEL_RCSID(0, \"%s\");\n\n", tag > sysdcl
    284       1.11       cgd 
    285       1.11       cgd 	printf " * created from%s\n */\n\n", $0 > sysnames
    286       1.70       apb 	printf "#include <sys/cdefs.h>\n__KERNEL_RCSID(0, \"%s\");\n\n", tag > sysnames
    287       1.28   thorpej 
    288      1.152  pgoyette 	printf " * created from%s\n */\n\n", $0 > sysautoload
    289      1.152  pgoyette 	printf "#include <sys/cdefs.h>\n__KERNEL_RCSID(0, \"%s\");\n\n", tag > sysautoload
    290      1.162  pgoyette 	printf("static struct sc_autoload " emulname \
    291      1.173  christos 		"_syscalls_autoload[] = {\n")		> sysautoloadbottom
    292      1.152  pgoyette 
    293       1.66     pooka 	printf " * created from%s\n */\n\n", $0 > rumpcalls
    294      1.127     pooka 	printf "#ifdef RUMP_CLIENT\n" > rumpcalls
    295      1.133     pooka 	printf "#include <rump/rumpuser_port.h>\n" > rumpcalls
    296      1.127     pooka 	printf "#endif /* RUMP_CLIENT */\n\n" > rumpcalls
    297      1.124     pooka 	printf "#include <sys/param.h>\n\n" > rumpcalls
    298      1.124     pooka 	printf "#ifdef __NetBSD__\n" > rumpcalls
    299       1.70       apb 	printf "#include <sys/cdefs.h>\n__KERNEL_RCSID(0, \"%s\");\n\n", tag > rumpcalls
    300      1.102     pooka 
    301      1.102     pooka 	printf "#include <sys/fstypes.h>\n" > rumpcalls
    302       1.66     pooka 	printf "#include <sys/proc.h>\n" > rumpcalls
    303      1.124     pooka 	printf "#endif /* __NetBSD__ */\n\n" > rumpcalls
    304      1.102     pooka 	printf "#ifdef RUMP_CLIENT\n" > rumpcalls
    305      1.124     pooka 	printf "#include <errno.h>\n" > rumpcalls
    306      1.124     pooka 	printf "#include <stdint.h>\n" > rumpcalls
    307      1.139     pooka 	printf "#include <stdlib.h>\n" > rumpcalls
    308      1.138     pooka 	printf "#include <string.h>\n\n" > rumpcalls
    309      1.117     pooka 	printf "#include <srcsys/syscall.h>\n" > rumpcalls
    310      1.117     pooka 	printf "#include <srcsys/syscallargs.h>\n\n" > rumpcalls
    311      1.102     pooka 	printf "#include <rump/rumpclient.h>\n\n" > rumpcalls
    312      1.102     pooka 	printf "#define rsys_syscall(num, data, dlen, retval)\t\\\n" > rumpcalls
    313      1.102     pooka 	printf "    rumpclient_syscall(num, data, dlen, retval)\n" > rumpcalls
    314      1.102     pooka 	printf "#define rsys_seterrno(error) errno = error\n" > rumpcalls
    315      1.131     pooka 	printf "#else\n" > rumpcalls
    316      1.117     pooka 	printf "#include <sys/syscall.h>\n" > rumpcalls
    317      1.117     pooka 	printf "#include <sys/syscallargs.h>\n\n" > rumpcalls
    318      1.103     pooka 	printf "#include <sys/syscallvar.h>\n\n" > rumpcalls
    319      1.164     pooka 	printf "#include <rump-sys/kern.h>\n\n" > rumpcalls
    320       1.80     pooka 	printf "#include <rump/rumpuser.h>\n" > rumpcalls
    321      1.130     pooka 	printf "#define rsys_syscall(num, data, dlen, retval)\t\\\n" > rumpcalls
    322      1.130     pooka 	printf "    rump_syscall(num, data, dlen, retval)\n\n" > rumpcalls
    323      1.131     pooka 	printf "#define rsys_seterrno(error) rumpuser_seterrno(error)\n" \
    324      1.131     pooka 	    > rumpcalls
    325      1.131     pooka 	printf "#endif\n\n" > rumpcalls
    326      1.102     pooka 
    327      1.145     pooka 	printf "#ifndef RUMP_KERNEL_IS_LIBC\n" > rumpcalls
    328      1.145     pooka 	printf "#define RUMP_SYS_COMPAT\n" > rumpcalls
    329      1.145     pooka 	printf "#endif\n\n" > rumpcalls
    330      1.132     pooka 
    331       1.66     pooka 	printf "#if\tBYTE_ORDER == BIG_ENDIAN\n" > rumpcalls
    332       1.66     pooka 	printf "#define SPARG(p,k)\t((p)->k.be.datum)\n" > rumpcalls
    333       1.66     pooka 	printf "#else /* LITTLE_ENDIAN, I hope dearly */\n" > rumpcalls
    334       1.66     pooka 	printf "#define SPARG(p,k)\t((p)->k.le.datum)\n" > rumpcalls
    335       1.73     pooka 	printf "#endif\n\n" > rumpcalls
    336      1.131     pooka 	printf "\nvoid rumpns_sys_nomodule(void);\n" > rumpcalls
    337       1.66     pooka 
    338      1.102     pooka 	printf "\n#ifndef RUMP_CLIENT\n" > rumpsysent
    339      1.141     pooka 	printf "int rumpns_enosys(void);\n" > rumpsysent
    340      1.102     pooka 	printf "#define\ts(type)\tsizeof(type)\n" > rumpsysent
    341       1.83     pooka 	printf "#define\tn(type)\t(sizeof(type)/sizeof (%s))\n", registertype > rumpsysent
    342       1.83     pooka 	printf "#define\tns(type)\tn(type), s(type)\n\n", registertype > rumpsysent
    343       1.83     pooka 	printf "struct sysent rump_sysent[] = {\n" > rumpsysent
    344       1.83     pooka 
    345       1.28   thorpej 	# System call names are included by userland (kdump(1)), so
    346       1.28   thorpej 	# hide the include files from it.
    347       1.48       mrg 	printf "#if defined(_KERNEL_OPT)\n" > sysnames
    348       1.28   thorpej 
    349      1.154  christos 	printf "#else /* _KERNEL_OPT */\n" > sysnamesbottom
    350      1.154  christos 	printf "#include <sys/null.h>\n" > sysnamesbottom
    351       1.48       mrg 	printf "#endif /* _KERNEL_OPT */\n\n" > sysnamesbottom
    352       1.41   mycroft 	printf "const char *const %s[] = {\n",namesname > sysnamesbottom
    353      1.154  christos 	printf "\n\n/* libc style syscall names */\n" > sysnamesfriendly
    354      1.154  christos 	printf "const char *const alt%s[] = {\n", namesname > sysnamesfriendly
    355       1.11       cgd 
    356       1.11       cgd 	printf " * created from%s\n */\n\n", $0 > sysnumhdr
    357       1.97     njoly 	printf "#ifndef _" constprefix "SYSCALL_H_\n" > sysnumhdr
    358       1.97     njoly 	printf "#define	_" constprefix "SYSCALL_H_\n\n" > sysnumhdr
    359       1.11       cgd 
    360       1.11       cgd 	printf " * created from%s\n */\n\n", $0 > sysarghdr
    361       1.97     njoly 	printf "#ifndef _" constprefix "SYSCALLARGS_H_\n" > sysarghdr
    362       1.97     njoly 	printf "#define	_" constprefix "SYSCALLARGS_H_\n\n" > sysarghdr
    363       1.66     pooka 
    364       1.66     pooka 	printf " * created from%s\n */\n\n", $0 > rumpcallshdr
    365       1.97     njoly 	printf "#ifndef _RUMP_RUMP_SYSCALLS_H_\n" > rumpcallshdr
    366       1.97     njoly 	printf "#define _RUMP_RUMP_SYSCALLS_H_\n\n" > rumpcallshdr
    367       1.96     pooka 	printf "#ifdef _KERNEL\n" > rumpcallshdr
    368       1.96     pooka 	printf "#error Interface not supported inside kernel\n" > rumpcallshdr
    369       1.96     pooka 	printf "#endif /* _KERNEL */\n\n" > rumpcallshdr
    370      1.109     pooka 	printf "#include <rump/rump_syscalls_compat.h>\n\n" > rumpcallshdr
    371       1.66     pooka 
    372       1.94     pooka 	printf "%s", sysarghdrextra > sysarghdr
    373      1.169  riastrad 	printf "/* Forward declaration */\n" > sysarghdr
    374      1.169  riastrad 	printf "struct lwp;\n" > sysarghdr
    375      1.169  riastrad 	printf "\n" > sysarghdr
    376      1.169  riastrad 
    377       1.60       dsl 	# Write max number of system call arguments to both headers
    378       1.60       dsl 	printf("#define\t%sMAXSYSARGS\t%d\n\n", constprefix, maxsysargs) \
    379       1.60       dsl 		> sysnumhdr
    380       1.60       dsl 	printf("#define\t%sMAXSYSARGS\t%d\n\n", constprefix, maxsysargs) \
    381       1.60       dsl 		> sysarghdr
    382       1.30       eeh 	printf "#undef\tsyscallarg\n" > sysarghdr
    383       1.35   thorpej 	printf "#define\tsyscallarg(x)\t\t\t\t\t\t\t\\\n" > sysarghdr
    384       1.35   thorpej 	printf "\tunion {\t\t\t\t\t\t\t\t\\\n" > sysarghdr
    385       1.35   thorpej 	printf "\t\t%s pad;\t\t\t\t\t\t\\\n", registertype > sysarghdr
    386       1.35   thorpej 	printf "\t\tstruct { x datum; } le;\t\t\t\t\t\\\n" > sysarghdr
    387       1.51      manu 	printf "\t\tstruct { /* LINTED zero array dimension */\t\t\\\n" \
    388       1.51      manu 		> sysarghdr
    389       1.51      manu 	printf "\t\t\tint8_t pad[  /* CONSTCOND */\t\t\t\\\n" > sysarghdr
    390       1.51      manu 	printf "\t\t\t\t(sizeof (%s) < sizeof (x))\t\\\n", \
    391       1.30       eeh 		registertype > sysarghdr
    392       1.35   thorpej 	printf "\t\t\t\t? 0\t\t\t\t\t\\\n" > sysarghdr
    393       1.35   thorpej 	printf "\t\t\t\t: sizeof (%s) - sizeof (x)];\t\\\n", \
    394       1.30       eeh 		registertype > sysarghdr
    395       1.35   thorpej 	printf "\t\t\tx datum;\t\t\t\t\t\\\n" > sysarghdr
    396       1.35   thorpej 	printf "\t\t} be;\t\t\t\t\t\t\t\\\n" > sysarghdr
    397       1.35   thorpej 	printf "\t}\n" > sysarghdr
    398       1.60       dsl 	printf("\n#undef check_syscall_args\n") >sysarghdr
    399      1.101     pooka 	printf("#define check_syscall_args(call) /*LINTED*/ \\\n" \
    400       1.60       dsl 		"\ttypedef char call##_check_args" \
    401       1.60       dsl 		    "[sizeof (struct call##_args) \\\n" \
    402       1.60       dsl 		"\t\t<= %sMAXSYSARGS * sizeof (%s) ? 1 : -1];\n", \
    403       1.60       dsl 		constprefix, registertype) >sysarghdr
    404      1.109     pooka 
    405      1.146  christos 	printf " * This file is part of the DTrace syscall provider.\n */\n\n" > systrace
    406      1.146  christos 	printf "static void\nsystrace_args(register_t sysnum, const void *params, uintptr_t *uarg, size_t *n_args)\n{\n" > systrace
    407      1.146  christos 	printf "\tintptr_t *iarg  = (intptr_t *)uarg;\n" > systrace
    408      1.146  christos 	printf "\tswitch (sysnum) {\n" > systrace
    409      1.146  christos 
    410      1.146  christos 	printf "static void\nsystrace_entry_setargdesc(int sysnum, int ndx, char *desc, size_t descsz)\n{\n\tconst char *p = NULL;\n" > systracetmp
    411      1.146  christos 	printf "\tswitch (sysnum) {\n" > systracetmp
    412      1.146  christos 
    413      1.146  christos 	printf "static void\nsystrace_return_setargdesc(int sysnum, int ndx, char *desc, size_t descsz)\n{\n\tconst char *p = NULL;\n" > systraceret
    414      1.146  christos 	printf "\tswitch (sysnum) {\n" > systraceret
    415      1.146  christos 
    416      1.109     pooka 	# compat types from syscalls.master.  this is slightly ugly,
    417      1.109     pooka 	# but given that we have so few compats from over 17 years,
    418      1.109     pooka 	# a more complicated solution is not currently warranted.
    419      1.109     pooka 	uncompattypes["struct timeval50"] = "struct timeval";
    420      1.109     pooka 	uncompattypes["struct timespec50"] = "struct timespec";
    421      1.109     pooka 	uncompattypes["struct stat30"] = "struct stat";
    422      1.109     pooka 
    423       1.11       cgd 	next
    424       1.11       cgd }
    425       1.11       cgd NF == 0 || $1 ~ /^;/ {
    426       1.11       cgd 	next
    427       1.11       cgd }
    428       1.40   mycroft $0 ~ /^%%$/ {
    429       1.40   mycroft 	intable = 1
    430       1.40   mycroft 	next
    431       1.40   mycroft }
    432       1.11       cgd $1 ~ /^#[ 	]*include/ {
    433       1.11       cgd 	print > sysdcl
    434       1.27   thorpej 	print > sysnames
    435      1.173  christos 	print > sysautoload
    436       1.11       cgd 	next
    437       1.11       cgd }
    438       1.40   mycroft $1 ~ /^#/ && !intable {
    439       1.40   mycroft 	print > sysdcl
    440       1.40   mycroft 	print > sysnames
    441      1.173  christos 	print > sysautoload
    442       1.11       cgd 	next
    443       1.11       cgd }
    444       1.40   mycroft $1 ~ /^#/ && intable {
    445       1.40   mycroft 	if ($1 ~ /^#[ 	]*if/) {
    446       1.40   mycroft 		savedepth++
    447       1.40   mycroft 		savesyscall[savedepth] = syscall
    448       1.40   mycroft 	}
    449       1.40   mycroft 	if ($1 ~ /^#[ 	]*else/) {
    450       1.40   mycroft 		if (savedepth <= 0) {
    451       1.40   mycroft 			printf("%s: line %d: unbalanced #else\n", \
    452       1.40   mycroft 			    infile, NR)
    453       1.40   mycroft 			exit 1
    454       1.40   mycroft 		}
    455       1.40   mycroft 		syscall = savesyscall[savedepth]
    456       1.18       cgd 	}
    457       1.18       cgd 	if ($1 ~ /^#[       ]*endif/) {
    458       1.18       cgd 		if (savedepth <= 0) {
    459       1.40   mycroft 			printf("%s: line %d: unbalanced #endif\n", \
    460       1.40   mycroft 			    infile, NR)
    461       1.18       cgd 			exit 1
    462       1.18       cgd 		}
    463       1.40   mycroft 		savedepth--
    464       1.18       cgd 	}
    465       1.11       cgd 	print > sysent
    466       1.54  christos 	print > sysarghdr
    467       1.54  christos 	print > sysnumhdr
    468       1.16   thorpej 	print > sysprotos
    469      1.173  christos 	print > sysautoloadbottom
    470       1.27   thorpej 	print > sysnamesbottom
    471      1.154  christos 	print > sysnamesfriendly
    472      1.146  christos 	print > systrace
    473      1.146  christos 	print > systracetmp
    474      1.146  christos 	print > systraceret
    475       1.83     pooka 
    476       1.83     pooka 	# XXX: technically we do not want to have conditionals in rump,
    477       1.83     pooka 	# but it is easier to just let the cpp handle them than try to
    478       1.83     pooka 	# figure out what we want here in this script
    479       1.83     pooka 	print > rumpsysent
    480       1.11       cgd 	next
    481       1.11       cgd }
    482       1.11       cgd syscall != $1 {
    483       1.11       cgd 	printf "%s: line %d: syscall number out of sync at %d\n", \
    484       1.11       cgd 	   infile, NR, syscall
    485       1.11       cgd 	printf "line is:\n"
    486       1.11       cgd 	print
    487       1.11       cgd 	exit 1
    488       1.11       cgd }
    489      1.165  christos function isarg64(type) {
    490      1.165  christos 	gsub("netbsd32_", "", type);
    491      1.165  christos 	return type == "quad_t" || type == "off_t" \
    492      1.165  christos 	    || type == "dev_t" ||  type == "time_t";
    493      1.165  christos }
    494       1.11       cgd function parserr(was, wanted) {
    495       1.77     pooka 	printf "%s: line %d: unexpected %s (expected <%s>)\n", \
    496       1.11       cgd 	    infile, NR, was, wanted
    497       1.32  christos 	printf "line is:\n"
    498       1.32  christos 	print
    499       1.11       cgd 	exit 1
    500       1.11       cgd }
    501      1.147  christos function fillerpsysent(syscall, flags, name, comment) {
    502      1.148  christos 	return sprintf("\t{%s\n\t\t.sy_call = %s,\n\t},\t\t/* %d = filler */",\
    503      1.147  christos 	    flags, name, syscall, comment);
    504      1.147  christos }
    505       1.11       cgd function parseline() {
    506       1.11       cgd 	f=3			# toss number and type
    507       1.60       dsl 	if ($2 == "INDIR")
    508       1.60       dsl 		sycall_flags="SYCALL_INDIRECT"
    509       1.60       dsl 	else
    510       1.60       dsl 		sycall_flags="0"
    511       1.11       cgd 	if ($NF != "}") {
    512       1.11       cgd 		funcalias=$NF
    513       1.11       cgd 		end=NF-1
    514       1.11       cgd 	} else {
    515       1.11       cgd 		funcalias=""
    516       1.11       cgd 		end=NF
    517       1.43  jdolecek 	}
    518       1.61       dsl 	if ($f == "INDIR") {		# allow for "NOARG INDIR"
    519       1.61       dsl 		sycall_flags = "SYCALL_INDIRECT | " sycall_flags
    520       1.61       dsl 		f++
    521       1.61       dsl 	}
    522       1.74        ad 	if ($f == "MODULAR") {		# registered at runtime
    523       1.74        ad 		modular = 1
    524       1.74        ad 		f++
    525      1.152  pgoyette 		modname = $f
    526      1.152  pgoyette 		f++
    527       1.74        ad 	} else {
    528       1.74        ad 		modular =  0;
    529       1.74        ad 	}
    530       1.66     pooka 	if ($f == "RUMP") {
    531       1.66     pooka 		rumpable = 1
    532       1.66     pooka 		f++
    533       1.66     pooka 	} else {
    534       1.66     pooka 		rumpable = 0
    535       1.66     pooka 	}
    536       1.43  jdolecek 	if ($f ~ /^[a-z0-9_]*$/) {	# allow syscall alias
    537       1.43  jdolecek 		funcalias=$f
    538       1.43  jdolecek 		f++
    539       1.11       cgd 	}
    540       1.11       cgd 	if ($f != "{")
    541       1.11       cgd 		parserr($f, "{")
    542       1.11       cgd 	f++
    543       1.11       cgd 	if ($end != "}")
    544       1.11       cgd 		parserr($end, "}")
    545       1.11       cgd 	end--
    546       1.11       cgd 	if ($end != ";")
    547       1.11       cgd 		parserr($end, ";")
    548       1.11       cgd 	end--
    549       1.11       cgd 	if ($end != ")")
    550       1.11       cgd 		parserr($end, ")")
    551       1.11       cgd 	end--
    552       1.11       cgd 
    553       1.19       cgd 	returntype = oldf = "";
    554       1.19       cgd 	do {
    555       1.19       cgd 		if (returntype != "" && oldf != "*")
    556       1.19       cgd 			returntype = returntype" ";
    557       1.19       cgd 		returntype = returntype$f;
    558       1.19       cgd 		oldf = $f;
    559       1.19       cgd 		f++
    560       1.78     pooka 	} while ($f != "|" && f < (end-1))
    561       1.19       cgd 	if (f == (end - 1)) {
    562       1.78     pooka 		parserr($f, "function argument definition (maybe \"|\"?)");
    563       1.78     pooka 	}
    564       1.78     pooka 	f++
    565       1.78     pooka 
    566       1.78     pooka 	fprefix=$f
    567       1.78     pooka 	f++
    568       1.78     pooka 	if ($f != "|") {
    569       1.78     pooka 		parserr($f, "function compat delimiter (maybe \"|\"?)");
    570       1.78     pooka 	}
    571       1.78     pooka 	f++
    572       1.78     pooka 
    573       1.78     pooka 	fcompat=""
    574       1.78     pooka 	if ($f != "|") {
    575       1.78     pooka 		fcompat=$f
    576       1.78     pooka 		f++
    577       1.78     pooka 	}
    578       1.78     pooka 
    579       1.78     pooka 	if ($f != "|") {
    580       1.78     pooka 		parserr($f, "function name delimiter (maybe \"|\"?)");
    581       1.78     pooka 	}
    582       1.78     pooka 	f++
    583       1.78     pooka 	fbase=$f
    584       1.78     pooka 
    585       1.90     pooka 	# pipe is special in how to returns its values.
    586       1.90     pooka 	# So just generate it manually if present.
    587       1.90     pooka 	if (rumpable == 1 && fbase == "pipe") {
    588       1.90     pooka 		rumpable = 0;
    589       1.90     pooka 		rumphaspipe = 1;
    590       1.90     pooka 	}
    591       1.90     pooka 
    592       1.78     pooka 	if (fcompat != "") {
    593       1.78     pooka 		funcname=fprefix "___" fbase "" fcompat
    594       1.78     pooka 	} else {
    595      1.109     pooka 		funcname=fprefix "_" fbase
    596       1.19       cgd 	}
    597      1.165  christos 	if (isarg64(returntype)) {
    598       1.92      matt 		if (sycall_flags == "0")
    599       1.92      matt 			sycall_flags = "SYCALL_RET_64";
    600       1.92      matt 		else
    601       1.92      matt 			sycall_flags = "SYCALL_RET_64 | " sycall_flags;
    602       1.92      matt 	}
    603       1.11       cgd 
    604       1.17   mycroft 	if (funcalias == "") {
    605       1.11       cgd 		funcalias=funcname
    606       1.17   mycroft 		sub(/^([^_]+_)*sys_/, "", funcalias)
    607      1.109     pooka 		realname=fbase
    608      1.178     kamil 		rumpfname=realname "" fcompat
    609      1.109     pooka 	} else {
    610      1.109     pooka 		realname=funcalias
    611      1.178     kamil 		rumpfname=realname
    612       1.17   mycroft 	}
    613      1.178     kamil 
    614       1.11       cgd 	f++
    615       1.11       cgd 
    616       1.11       cgd 	if ($f != "(")
    617       1.76     pooka 		parserr($f, "(")
    618       1.11       cgd 	f++
    619       1.11       cgd 
    620       1.19       cgd 	argc=0;
    621       1.63      yamt 	argalign=0;
    622       1.11       cgd 	if (f == end) {
    623       1.11       cgd 		if ($f != "void")
    624       1.11       cgd 			parserr($f, "argument definition")
    625       1.19       cgd 		isvarargs = 0;
    626       1.19       cgd 		varargc = 0;
    627       1.80     pooka 		argtype[0]="void";
    628       1.11       cgd 		return
    629       1.11       cgd 	}
    630       1.11       cgd 
    631       1.19       cgd 	# some system calls (open() and fcntl()) can accept a variable
    632       1.19       cgd 	# number of arguments.  If syscalls accept a variable number of
    633       1.19       cgd 	# arguments, they must still have arguments specified for
    634       1.19       cgd 	# the remaining argument "positions," because of the way the
    635       1.19       cgd 	# kernel system call argument handling works.
    636       1.19       cgd 	#
    637       1.19       cgd 	# Indirect system calls, e.g. syscall(), are exceptions to this
    638       1.19       cgd 	# rule, since they are handled entirely by machine-dependent code
    639       1.19       cgd 	# and do not need argument structures built.
    640       1.19       cgd 
    641       1.19       cgd 	isvarargs = 0;
    642       1.92      matt 	args64 = 0;
    643      1.125      matt 	ptr = 0;
    644       1.11       cgd 	while (f <= end) {
    645       1.19       cgd 		if ($f == "...") {
    646       1.19       cgd 			f++;
    647       1.19       cgd 			isvarargs = 1;
    648       1.19       cgd 			varargc = argc;
    649       1.19       cgd 			continue;
    650       1.19       cgd 		}
    651       1.11       cgd 		argc++
    652       1.11       cgd 		argtype[argc]=""
    653       1.14       cgd 		oldf=""
    654       1.11       cgd 		while (f < end && $(f+1) != ",") {
    655       1.14       cgd 			if (argtype[argc] != "" && oldf != "*")
    656       1.11       cgd 				argtype[argc] = argtype[argc]" ";
    657       1.11       cgd 			argtype[argc] = argtype[argc]$f;
    658       1.14       cgd 			oldf = $f;
    659       1.11       cgd 			f++
    660       1.11       cgd 		}
    661       1.11       cgd 		if (argtype[argc] == "")
    662       1.11       cgd 			parserr($f, "argument definition")
    663       1.86     pooka 		if (argtype[argc] == "off_t"  \
    664       1.86     pooka 		  || argtype[argc] == "dev_t" \
    665       1.86     pooka 		  || argtype[argc] == "time_t") {
    666       1.68  christos 			if ((argalign % 2) != 0 && sysalign &&
    667       1.63      yamt 			    funcname != "sys_posix_fadvise") # XXX for now
    668       1.63      yamt 				parserr($f, "a padding argument")
    669       1.63      yamt 		} else {
    670       1.63      yamt 			argalign++;
    671       1.63      yamt 		}
    672      1.165  christos 		if (isarg64(argtype[argc])) {
    673       1.92      matt 			if (sycall_flags == "0")
    674       1.92      matt 				sycall_flags = "SYCALL_ARG"argc-1"_64";
    675       1.92      matt 			else
    676       1.92      matt 				sycall_flags = "SYCALL_ARG"argc-1"_64 | " sycall_flags;
    677       1.92      matt 			args64++;
    678       1.92      matt 		}
    679      1.125      matt 		if (index(argtype[argc], "*") != 0 && ptr == 0) {
    680      1.125      matt 			if (sycall_flags == "0")
    681      1.125      matt 				sycall_flags = "SYCALL_ARG_PTR";
    682      1.125      matt 			else
    683      1.125      matt 				sycall_flags = "SYCALL_ARG_PTR | " sycall_flags;
    684      1.125      matt 			ptr = 1;
    685      1.125      matt 		}
    686       1.11       cgd 		argname[argc]=$f;
    687       1.11       cgd 		f += 2;			# skip name, and any comma
    688       1.11       cgd 	}
    689       1.92      matt 	if (args64 > 0)
    690       1.92      matt 		sycall_flags = "SYCALL_NARGS64_VAL("args64") | " sycall_flags;
    691       1.19       cgd 	# must see another argument after varargs notice.
    692       1.19       cgd 	if (isvarargs) {
    693       1.61       dsl 		if (argc == varargc)
    694       1.19       cgd 			parserr($f, "argument definition")
    695       1.19       cgd 	} else
    696       1.19       cgd 		varargc = argc;
    697       1.11       cgd }
    698       1.54  christos 
    699       1.54  christos function printproto(wrap) {
    700       1.54  christos 	printf("/* syscall: \"%s%s\" ret: \"%s\" args:", wrap, funcalias,
    701       1.54  christos 	    returntype) > sysnumhdr
    702       1.54  christos 	for (i = 1; i <= varargc; i++)
    703       1.54  christos 		printf(" \"%s\"", argtype[i]) > sysnumhdr
    704       1.54  christos 	if (isvarargs)
    705       1.54  christos 		printf(" \"...\"") > sysnumhdr
    706       1.54  christos 	printf(" */\n") > sysnumhdr
    707       1.54  christos 	printf("#define\t%s%s%s\t%d\n\n", constprefix, wrap, funcalias,
    708       1.54  christos 	    syscall) > sysnumhdr
    709       1.66     pooka 
    710      1.152  pgoyette 	# output entry for syscall autoload table, if modular
    711      1.173  christos 	if (modular) {
    712      1.152  pgoyette 		printf("\t    { %s%s%s, \"%s\" },\n", constprefix, wrap,
    713      1.173  christos 		   funcalias, modname) > sysautoloadbottom
    714      1.152  pgoyette 	}
    715      1.152  pgoyette 
    716      1.152  pgoyette 
    717       1.66     pooka 	# rumpalooza
    718       1.66     pooka 	if (!rumpable)
    719       1.66     pooka 		return
    720       1.66     pooka 
    721      1.109     pooka 	# accumulate fbases we have seen.  we want the last
    722      1.182   msaitoh 	# occurrence for the default __RENAME()
    723      1.178     kamil 	seen = funcseen[realname]
    724      1.178     kamil 	funcseen[realname] = rumpfname
    725      1.143    justin 	# special case for mknod as type of last argument changed from
    726      1.143    justin 	# uint32_t to dev_t
    727      1.143    justin 	if ((seen && fbase != "mknod") || (!seen && fbase == "mknod"))
    728      1.109     pooka 		return
    729      1.109     pooka 
    730      1.109     pooka 	printf("%s rump_sys_%s(", returntype, realname) > rumpprotos
    731      1.109     pooka 
    732       1.88     pooka 	for (i = 1; i < varargc; i++)
    733       1.87     pooka 		if (argname[i] != "PAD")
    734      1.109     pooka 			printf("%s, ", uncompattype(argtype[i])) > rumpprotos
    735      1.109     pooka 
    736       1.88     pooka 	if (isvarargs)
    737      1.109     pooka 		printf("%s, ...)", uncompattype(argtype[varargc]))>rumpprotos
    738       1.88     pooka 	else
    739      1.109     pooka 		printf("%s)", uncompattype(argtype[argc])) > rumpprotos
    740      1.109     pooka 
    741      1.178     kamil 	printf(" __RENAME(RUMP_SYS_RENAME_%s)", toupper(realname))> rumpprotos
    742      1.109     pooka 	printf(";\n") > rumpprotos
    743      1.109     pooka 
    744      1.109     pooka 	# generate forward-declares for types, apart from the
    745      1.109     pooka 	# braindead typedef jungle we cannot easily handle here
    746      1.109     pooka 	for (i = 1; i <= varargc; i++) {
    747      1.109     pooka 		type=uncompattype(argtype[i])
    748      1.109     pooka 		sub("const ", "", type)
    749      1.140     pooka 		ntype=type
    750      1.140     pooka 		sub(" *\\*.*", "", ntype);
    751      1.140     pooka 		if (!typeseen[ntype] && \
    752      1.109     pooka 		    match(type, "struct") && match(type, "\\*")) {
    753      1.140     pooka 			typeseen[ntype] = 1
    754      1.140     pooka 			printf("%s;\n", ntype) > rumptypes
    755      1.109     pooka 		}
    756      1.109     pooka 	}
    757       1.54  christos }
    758       1.54  christos 
    759      1.180  dholland function printrumpsysent(insysent, compatwrap_) {
    760      1.147  christos 	if (modular) {
    761      1.147  christos 		fn = rumpnomodule
    762      1.147  christos 		flags = rumpnoflags
    763      1.147  christos 	} else {
    764      1.147  christos 		fn = rumpnosys
    765      1.147  christos 		flags = ""
    766      1.147  christos 	}
    767       1.90     pooka 	if (!insysent) {
    768      1.147  christos 		printf("\t{%s\n\t\t.sy_call = %s,\n},\t\t/* %d = %s */\n", \
    769      1.147  christos 		    flags, fn, syscall, funcalias) > rumpsysent
    770       1.90     pooka 		return
    771       1.90     pooka 	}
    772       1.90     pooka 
    773      1.147  christos 	printf("\t{") > rumpsysent
    774      1.147  christos 	if (argc != 0) {
    775      1.177     kamil 		printf("\n\t\tns(struct %s%s_args),", compatwrap_, funcname) > rumpsysent
    776      1.109     pooka 	}
    777      1.109     pooka 
    778      1.147  christos 	printf("\n\t\t.sy_call = %s,\n\t},", fn) > rumpsysent
    779      1.147  christos 	printf("\t\t/* %d = %s%s */\n", syscall, compatwrap_, funcalias) > rumpsysent
    780       1.90     pooka }
    781       1.90     pooka 
    782      1.109     pooka function iscompattype(type) {
    783      1.109     pooka 	for (var in uncompattypes) {
    784      1.109     pooka 		if (match(type, var)) {
    785      1.109     pooka 			return 1
    786      1.109     pooka 		}
    787      1.109     pooka 	}
    788      1.109     pooka 
    789      1.109     pooka 	return 0
    790      1.109     pooka }
    791      1.109     pooka 
    792      1.109     pooka function uncompattype(type) {
    793      1.109     pooka 	for (var in uncompattypes) {
    794      1.109     pooka 		if (match(type, var)) {
    795      1.109     pooka 			sub(var, uncompattypes[var], type)
    796      1.109     pooka 			return type
    797      1.109     pooka 		}
    798      1.109     pooka 	}
    799      1.109     pooka 
    800      1.109     pooka 	return type
    801      1.109     pooka }
    802      1.109     pooka 
    803      1.142     pooka function printrumpsysmap(syscall, wfn, funcalias, rumpentry) {
    804      1.142     pooka 	printf("%-4d %-22s %-18s %s\n",
    805      1.142     pooka 	    syscall, wfn, funcalias, rumpentry) > rumpsysmap
    806      1.142     pooka }
    807      1.142     pooka 
    808  1.183.2.1   thorpej function fixarray(arg) {
    809  1.183.2.1   thorpej 	iii = index(arg, "[")
    810  1.183.2.1   thorpej 	if (iii == 0) {
    811  1.183.2.1   thorpej 		return arg 
    812  1.183.2.1   thorpej 	} else {
    813  1.183.2.1   thorpej 		return substr(arg, 1, iii - 1) "[0]"
    814  1.183.2.1   thorpej 	}
    815  1.183.2.1   thorpej }
    816  1.183.2.1   thorpej 
    817      1.146  christos function putsystrace(type, compatwrap_) {
    818      1.146  christos 	printf("\t/* %s */\n\tcase %d: {\n", funcname, syscall) > systrace
    819      1.146  christos 	printf("\t/* %s */\n\tcase %d:\n", funcname, syscall) > systracetmp
    820      1.146  christos 	printf("\t/* %s */\n\tcase %d:\n", funcname, syscall) > systraceret
    821      1.146  christos 	if (argc > 0) {
    822      1.146  christos 		printf("\t\tswitch(ndx) {\n") > systracetmp
    823      1.166  christos 		printf("\t\tconst struct %s%s_args *p = params;\n", compatwrap_, funcname) > systrace
    824      1.146  christos 		for (i = 1; i <= argc; i++) {
    825      1.146  christos 			arg = argtype[i]
    826      1.146  christos 			sub("__restrict$", "", arg)
    827      1.146  christos 			printf("\t\tcase %d:\n\t\t\tp = \"%s\";\n\t\t\tbreak;\n", i - 1, arg) > systracetmp
    828      1.146  christos 			if (arg ~ /.*p_t$/ || arg ~ /.*p$/ || arg ~ /.*_t_p$/ ||
    829      1.168  christos 			    arg ~ /.*_pointer_t$/)
    830      1.146  christos 				printf("\t\tuarg[%d] = (intptr_t) SCARG(p, %s).i32; /* %s */\n", \
    831      1.146  christos 				     i - 1, \
    832      1.146  christos 				     argname[i], arg) > systrace
    833      1.168  christos 			else if (index(arg, "*") > 0 || arg == "caddr_t" ||
    834      1.168  christos 			    arg ~ /.*_handler_t$/)
    835      1.146  christos 				printf("\t\tuarg[%d] = (intptr_t) SCARG(p, %s); /* %s */\n", \
    836      1.146  christos 				     i - 1, \
    837  1.183.2.1   thorpej 				     fixarray(argname[i]), arg) > systrace
    838      1.146  christos 			else if (substr(arg, 1, 1) == "u" || arg == "size_t")
    839      1.146  christos 				printf("\t\tuarg[%d] = SCARG(p, %s); /* %s */\n", \
    840      1.146  christos 				     i - 1, \
    841      1.146  christos 				     argname[i], arg) > systrace
    842      1.146  christos 			else
    843      1.146  christos 				printf("\t\tiarg[%d] = SCARG(p, %s); /* %s */\n", \
    844      1.146  christos 				     i - 1, \
    845  1.183.2.1   thorpej 				     fixarray(argname[i]), arg) > systrace
    846      1.146  christos 		}
    847      1.146  christos 		printf("\t\tdefault:\n\t\t\tbreak;\n\t\t};\n") > systracetmp
    848      1.146  christos 
    849      1.146  christos 		printf("\t\tif (ndx == 0 || ndx == 1)\n") > systraceret
    850      1.146  christos 		printf("\t\t\tp = \"%s\";\n", returntype) > systraceret
    851      1.146  christos 		printf("\t\tbreak;\n") > systraceret
    852      1.146  christos 	}
    853      1.146  christos 	printf("\t\t*n_args = %d;\n\t\tbreak;\n\t}\n", argc) > systrace
    854      1.146  christos 	printf("\t\tbreak;\n") > systracetmp
    855      1.146  christos }
    856      1.146  christos 
    857       1.61       dsl function putent(type, compatwrap) {
    858       1.60       dsl 	# output syscall declaration for switch table.
    859       1.60       dsl 	if (compatwrap == "")
    860       1.60       dsl 		compatwrap_ = ""
    861       1.60       dsl 	else
    862       1.60       dsl 		compatwrap_ = compatwrap "_"
    863       1.62       dsl 	if (argc == 0)
    864       1.62       dsl 		arg_type = "void";
    865       1.62       dsl 	else {
    866       1.62       dsl 		arg_type = "struct " compatwrap_ funcname "_args";
    867       1.62       dsl 	}
    868      1.146  christos 	putsystrace(type, compatwrap_)
    869       1.62       dsl 	proto = "int\t" compatwrap_ funcname "(struct lwp *, const " \
    870       1.62       dsl 	    arg_type " *, register_t *);\n"
    871       1.60       dsl 	if (sysmap[proto] != 1) {
    872       1.60       dsl 		sysmap[proto] = 1;
    873       1.60       dsl 		print proto > sysprotos;
    874       1.21       cgd 	}
    875       1.11       cgd 
    876       1.11       cgd 	# output syscall switch entry
    877      1.150  christos 	printf("\t{") > sysent
    878      1.147  christos 	if (argc != 0) {
    879      1.150  christos 		printf("\n\t\tns(struct %s%s_args),", compatwrap_, funcname) > sysent
    880       1.19       cgd 	}
    881      1.170  pgoyette 	if (modular) {
    882      1.141     pooka 		wfn = "sys_nomodule";
    883      1.170  pgoyette 		idx = int(syscall / 32);
    884      1.170  pgoyette 		bit = 2 ^ (syscall % 32);
    885      1.170  pgoyette 		nomodbits[ idx ] += bit;
    886      1.170  pgoyette 	} else if (compatwrap == "")
    887      1.141     pooka 		wfn = funcname;
    888       1.60       dsl 	else
    889      1.141     pooka 		wfn = compatwrap "(" funcname ")";
    890      1.141     pooka 	wfn_cast="(sy_call_t *)" wfn
    891      1.147  christos 	if (sycall_flags != "0")
    892      1.147  christos 		flags = "\n\t\t.sy_flags = " sycall_flags ","
    893      1.147  christos 	else
    894      1.147  christos 		flags = ""
    895      1.147  christos 	printf("%s\n\t\t.sy_call = %s\n\t},", flags, wfn_cast) > sysent
    896      1.147  christos 	printf("\t\t/* %d = %s%s */\n", syscall, compatwrap_, funcalias) > sysent
    897       1.11       cgd 
    898       1.11       cgd 	# output syscall name for names table
    899       1.60       dsl 	printf("\t/* %3d */\t\"%s%s\",\n", syscall, compatwrap_, funcalias) \
    900       1.60       dsl 	    > sysnamesbottom
    901      1.154  christos 	if (compatwrap_ != "" || fbase == funcalias)
    902      1.154  christos 		printf("\t/* %3d */\tNULL, /* %s%s */\n", syscall, \
    903      1.154  christos 		    compatwrap_, funcalias) > sysnamesfriendly
    904      1.154  christos 	else
    905      1.154  christos 		printf("\t/* %3d */\t\"%s%s\",\n", syscall, compatwrap_, \
    906      1.154  christos 		    fbase) > sysnamesfriendly
    907       1.11       cgd 
    908       1.11       cgd 	# output syscall number of header, if appropriate
    909      1.111     pooka 	if (type == "STD" || type == "NOARGS" || type == "INDIR" || \
    910      1.111     pooka 	    type == "NOERR") {
    911       1.19       cgd 		# output a prototype, to be used to generate lint stubs in
    912       1.19       cgd 		# libc.
    913       1.54  christos 		printproto("")
    914      1.120  christos 	} else if (type == "COMPAT" || type == "EXTERN") {
    915       1.29   thorpej 		# Just define the syscall number with a comment.  These
    916       1.29   thorpej 		# may be used by compatibility stubs in libc.
    917       1.60       dsl 		printproto(compatwrap_)
    918       1.60       dsl 	}
    919       1.11       cgd 
    920       1.11       cgd 	# output syscall argument structure, if it has arguments
    921       1.62       dsl 	if (argc != 0) {
    922      1.124     pooka 		printf("\n") > sysarghdr
    923      1.124     pooka 		if (haverumpcalls && !rumpable)
    924      1.124     pooka 			printf("#ifndef RUMP_CLIENT\n") > sysarghdr
    925      1.124     pooka 		printf("struct %s%s_args", compatwrap_, funcname) > sysarghdr
    926       1.62       dsl 		if (type != "NOARGS") {
    927       1.62       dsl 			print " {" >sysarghdr;
    928       1.62       dsl 			for (i = 1; i <= argc; i++)
    929       1.62       dsl 				printf("\tsyscallarg(%s) %s;\n", argtype[i],
    930       1.62       dsl 				    argname[i]) > sysarghdr
    931       1.62       dsl 			printf "}" >sysarghdr;
    932       1.62       dsl 		}
    933       1.62       dsl 		printf(";\n") > sysarghdr
    934       1.62       dsl 		if (type != "NOARGS" && type != "INDIR") {
    935       1.60       dsl 			printf("check_syscall_args(%s%s)\n", compatwrap_,
    936       1.60       dsl 			    funcname) >sysarghdr
    937       1.60       dsl 		}
    938      1.124     pooka 		if (haverumpcalls && !rumpable)
    939      1.124     pooka 			printf("#endif /* !RUMP_CLIENT */\n") > sysarghdr
    940       1.11       cgd 	}
    941       1.66     pooka 
    942       1.90     pooka 	if (!rumpable) {
    943      1.142     pooka 		if (funcname == "sys_pipe" && rumphaspipe == 1) {
    944       1.90     pooka 			insysent = 1
    945      1.142     pooka 			printrumpsysmap(syscall,
    946      1.142     pooka 			    funcname, funcalias, "rump_sys_pipe")
    947      1.142     pooka 		} else {
    948       1.90     pooka 			insysent = 0
    949      1.142     pooka 		}
    950       1.90     pooka 	} else {
    951       1.90     pooka 		insysent = 1
    952       1.90     pooka 	}
    953      1.180  dholland 	printrumpsysent(insysent, compatwrap_)
    954       1.90     pooka 
    955       1.66     pooka 	# output rump marshalling code if necessary
    956       1.83     pooka 	if (!rumpable) {
    957       1.66     pooka 		return
    958       1.83     pooka 	}
    959       1.66     pooka 
    960      1.142     pooka 	printrumpsysmap(syscall, wfn, funcalias, "rump___sysimpl_" rumpfname)
    961      1.142     pooka 
    962      1.145     pooka 	printf("\n") > rumpcalls
    963      1.145     pooka 
    964      1.145     pooka 	if (compatwrap)
    965      1.145     pooka 		printf("#ifdef RUMP_SYS_COMPAT\n") > rumpcalls
    966      1.145     pooka 
    967       1.78     pooka 	# need a local prototype, we export the re-re-named one in .h
    968      1.145     pooka 	printf("%s rump___sysimpl_%s(", returntype, rumpfname) \
    969      1.109     pooka 	    > rumpcalls
    970       1.80     pooka 	for (i = 1; i < argc; i++) {
    971       1.87     pooka 		if (argname[i] != "PAD")
    972      1.109     pooka 			printf("%s, ", uncompattype(argtype[i])) > rumpcalls
    973       1.78     pooka 	}
    974      1.109     pooka 	printf("%s);", uncompattype(argtype[argc])) > rumpcalls
    975       1.78     pooka 
    976      1.109     pooka 	printf("\n%s\nrump___sysimpl_%s(", returntype, rumpfname) > rumpcalls
    977       1.80     pooka 	for (i = 1; i < argc; i++) {
    978       1.87     pooka 		if (argname[i] != "PAD")
    979      1.109     pooka 			printf("%s %s, ", uncompattype(argtype[i]), \
    980      1.109     pooka 			    argname[i]) > rumpcalls
    981       1.66     pooka 	}
    982      1.109     pooka 	printf("%s %s)\n", uncompattype(argtype[argc]), argname[argc]) \
    983      1.109     pooka 	    > rumpcalls
    984      1.135     pooka 	printf("{\n\tregister_t retval[2];\n") > rumpcalls
    985      1.115     pooka 	if (returntype != "void") {
    986      1.115     pooka 		if (type != "NOERR") {
    987      1.115     pooka 			printf("\tint error = 0;\n") > rumpcalls
    988      1.115     pooka 		}
    989      1.115     pooka 		# assume rumpcalls return only integral types
    990      1.115     pooka 		printf("\t%s rv = -1;\n", returntype) > rumpcalls
    991      1.115     pooka 	}
    992       1.78     pooka 
    993       1.66     pooka 	argarg = "NULL"
    994       1.83     pooka 	argsize = 0;
    995       1.66     pooka 	if (argc) {
    996       1.84     pooka 		argarg = "&callarg"
    997       1.84     pooka 		argsize = "sizeof(callarg)"
    998       1.84     pooka 		printf("\tstruct %s%s_args callarg;\n\n",compatwrap_,funcname) \
    999       1.66     pooka 		    > rumpcalls
   1000      1.137     pooka 		printf "\tmemset(&callarg, 0, sizeof(callarg));\n" > rumpcalls
   1001       1.66     pooka 		for (i = 1; i <= argc; i++) {
   1002       1.87     pooka 			if (argname[i] == "PAD") {
   1003       1.87     pooka 				printf("\tSPARG(&callarg, %s) = 0;\n", \
   1004       1.87     pooka 				    argname[i]) > rumpcalls
   1005       1.87     pooka 			} else {
   1006      1.109     pooka 				if (iscompattype(argtype[i])) {
   1007      1.109     pooka 					printf("\tSPARG(&callarg, %s) = "    \
   1008      1.109     pooka 					"(%s)%s;\n", argname[i], argtype[i], \
   1009      1.109     pooka 					argname[i]) > rumpcalls
   1010      1.109     pooka 				} else {
   1011      1.109     pooka 					printf("\tSPARG(&callarg, %s) = %s;\n",\
   1012      1.109     pooka 					    argname[i], argname[i]) > rumpcalls
   1013      1.109     pooka 				}
   1014       1.87     pooka 			}
   1015       1.66     pooka 		}
   1016       1.66     pooka 		printf("\n") > rumpcalls
   1017       1.66     pooka 	} else {
   1018       1.66     pooka 		printf("\n") > rumpcalls
   1019       1.66     pooka 	}
   1020      1.111     pooka 	printf("\t") > rumpcalls
   1021      1.112     pooka 	if (returntype != "void" && type != "NOERR")
   1022      1.111     pooka 		printf("error = ") > rumpcalls
   1023      1.161  pgoyette 	else if (returntype != "void")
   1024      1.161  pgoyette 		printf("(void)") > rumpcalls
   1025      1.161  pgoyette 	printf("rsys_syscall(%s%s%s, " \
   1026      1.115     pooka 	    "%s, %s, retval);\n", constprefix, compatwrap_, funcalias, \
   1027       1.83     pooka 	    argarg, argsize) > rumpcalls
   1028      1.111     pooka 	if (type != "NOERR") {
   1029      1.111     pooka 		printf("\trsys_seterrno(error);\n") > rumpcalls
   1030      1.115     pooka 		printf("\tif (error == 0) {\n") > rumpcalls
   1031      1.115     pooka 		indent="\t\t"
   1032      1.115     pooka 		ending="\t}\n"
   1033      1.115     pooka 	} else {
   1034      1.115     pooka 		indent="\t"
   1035      1.115     pooka 		ending=""
   1036      1.111     pooka 	}
   1037       1.80     pooka 	if (returntype != "void") {
   1038      1.115     pooka 		printf("%sif (sizeof(%s) > sizeof(register_t))\n", \
   1039      1.115     pooka 		    indent, returntype) > rumpcalls
   1040      1.115     pooka 		printf("%s\trv = *(%s *)retval;\n", \
   1041      1.115     pooka 		    indent, returntype) > rumpcalls
   1042      1.115     pooka 		printf("%selse\n", indent, indent) > rumpcalls
   1043      1.116     pooka 		printf("%s\trv = *retval;\n", indent, returntype) > rumpcalls
   1044      1.115     pooka 		printf("%s", ending) > rumpcalls
   1045      1.115     pooka 		printf("\treturn rv;\n") > rumpcalls
   1046       1.80     pooka 	}
   1047       1.72     pooka 	printf("}\n") > rumpcalls
   1048      1.145     pooka 
   1049      1.145     pooka 	printf("#ifdef RUMP_KERNEL_IS_LIBC\n") > rumpcalls
   1050      1.145     pooka 
   1051      1.145     pooka 	# create the bog-standard, non-renamed public name.
   1052      1.145     pooka 	# this way we get e.g. select instead of just __select50
   1053      1.145     pooka 	if (fcompat)
   1054      1.145     pooka 		printf("__weak_alias(%s,rump___sysimpl_%s);\n", \
   1055      1.145     pooka 		    fbase, rumpfname) > rumpcalls
   1056      1.145     pooka 
   1057      1.145     pooka 	printf("__weak_alias(%s,rump___sysimpl_%s);\n", \
   1058      1.145     pooka 	    funcalias, rumpfname) > rumpcalls
   1059      1.145     pooka 	printf("__weak_alias(_%s,rump___sysimpl_%s);\n", \
   1060      1.145     pooka 	    funcalias, rumpfname) > rumpcalls
   1061      1.145     pooka 	printf("__strong_alias(_sys_%s,rump___sysimpl_%s);\n", \
   1062      1.145     pooka 	    funcalias, rumpfname) >rumpcalls
   1063      1.145     pooka 
   1064      1.145     pooka 	printf("#endif /* RUMP_KERNEL_IS_LIBC */\n") > rumpcalls
   1065      1.145     pooka 
   1066      1.145     pooka 	if (compatwrap)
   1067      1.145     pooka 		printf("#endif /* RUMP_SYS_COMPAT */\n") > rumpcalls
   1068       1.83     pooka 
   1069       1.11       cgd }
   1070      1.111     pooka $2 == "STD" || $2 == "NODEF" || $2 == "NOARGS" || $2 == "INDIR" \
   1071      1.111     pooka     || $2 == "NOERR" {
   1072       1.11       cgd 	parseline()
   1073       1.17   mycroft 	putent($2, "")
   1074       1.11       cgd 	syscall++
   1075       1.11       cgd 	next
   1076       1.11       cgd }
   1077       1.64    martin $2 == "OBSOL" || $2 == "UNIMPL" || $2 == "EXCL" || $2 == "IGNORED" {
   1078       1.11       cgd 	if ($2 == "OBSOL")
   1079       1.11       cgd 		comment="obsolete"
   1080       1.34  christos 	else if ($2 == "EXCL")
   1081       1.34  christos 		comment="excluded"
   1082       1.64    martin 	else if ($2 == "IGNORED")
   1083       1.64    martin 		comment="ignored"
   1084       1.11       cgd 	else
   1085       1.11       cgd 		comment="unimplemented"
   1086       1.11       cgd 	for (i = 3; i <= NF; i++)
   1087       1.11       cgd 		comment=comment " " $i
   1088       1.11       cgd 
   1089       1.64    martin 	if ($2 == "IGNORED")
   1090      1.175  christos 		sys_stub = "(sy_call_t *)(void *)nullop";
   1091       1.64    martin 	else
   1092       1.65     njoly 		sys_stub = sys_nosys;
   1093       1.64    martin 
   1094      1.148  christos 	print fillerpsysent(syscall, "", sys_stub, comment) > sysent
   1095      1.148  christos 	print fillerpsysent(syscall, rumpnoflags, rumpnosys, comment) > rumpsysent
   1096       1.60       dsl 	printf("\t/* %3d */\t\"#%d (%s)\",\n", syscall, syscall, comment) \
   1097       1.60       dsl 	    > sysnamesbottom
   1098      1.154  christos 	printf("\t/* %3d */\tNULL, /* %s */\n", syscall, comment) \
   1099      1.154  christos 	    > sysnamesfriendly
   1100       1.11       cgd 	if ($2 != "UNIMPL")
   1101       1.11       cgd 		printf("\t\t\t\t/* %d is %s */\n", syscall, comment) > sysnumhdr
   1102       1.11       cgd 	syscall++
   1103       1.11       cgd 	next
   1104       1.11       cgd }
   1105      1.120  christos $2 == "EXTERN" {
   1106      1.120  christos 	parseline()
   1107      1.120  christos 	putent("EXTERN", "")
   1108      1.120  christos 	syscall++
   1109      1.120  christos 	next
   1110      1.120  christos }
   1111       1.11       cgd {
   1112       1.11       cgd 	for (i = 1; i <= ncompat; i++) {
   1113       1.11       cgd 		if ($2 == compat_upper[i]) {
   1114       1.11       cgd 			parseline();
   1115       1.29   thorpej 			putent("COMPAT", compat[i])
   1116       1.11       cgd 			syscall++
   1117       1.11       cgd 			next
   1118       1.11       cgd 		}
   1119       1.11       cgd 	}
   1120       1.40   mycroft 	printf("%s: line %d: unrecognized keyword %s\n", infile, NR, $2)
   1121        1.1     glass 	exit 1
   1122       1.11       cgd }
   1123      1.181  dholland 
   1124      1.181  dholland function sort(arr, n,    i, j, t) {
   1125      1.181  dholland 	# this is going to be bubble sort because I cannot be bothered to
   1126      1.181  dholland 	# write a real sort, this whole script is hopefully going to be
   1127      1.181  dholland 	# deprecated before much longer, and performance of a few hundred
   1128      1.181  dholland 	# things (even interpreted in awk) should be adequate.
   1129      1.181  dholland 	for (i = 1; i <= n; i++) {
   1130      1.181  dholland 		for (j = i + 1; j <= n; j++) {
   1131      1.181  dholland 			if (arr[j] < arr[i]) {
   1132      1.181  dholland 				t = arr[i];
   1133      1.181  dholland 				arr[i] = arr[j];
   1134      1.181  dholland 				arr[j] = t;
   1135      1.181  dholland 			}
   1136      1.181  dholland 		}
   1137      1.181  dholland 	}
   1138      1.181  dholland 	return 0;
   1139      1.181  dholland }
   1140      1.181  dholland 
   1141       1.11       cgd END {
   1142      1.115     pooka 	# output pipe() syscall with its special retval[2] handling
   1143       1.90     pooka 	if (rumphaspipe) {
   1144      1.109     pooka 		printf("int rump_sys_pipe(int *);\n") > rumpprotos
   1145       1.90     pooka 		printf("\nint rump_sys_pipe(int *);\n") > rumpcalls
   1146       1.90     pooka 		printf("int\nrump_sys_pipe(int *fd)\n{\n") > rumpcalls
   1147      1.135     pooka 		printf("\tregister_t retval[2];\n") > rumpcalls
   1148       1.90     pooka 		printf("\tint error = 0;\n") > rumpcalls
   1149      1.102     pooka 		printf("\n\terror = rsys_syscall(SYS_pipe, ") > rumpcalls
   1150      1.115     pooka 		printf("NULL, 0, retval);\n") > rumpcalls
   1151       1.90     pooka 		printf("\tif (error) {\n") > rumpcalls
   1152      1.102     pooka 		printf("\t\trsys_seterrno(error);\n") > rumpcalls
   1153      1.115     pooka 		printf("\t} else {\n\t\tfd[0] = retval[0];\n") > rumpcalls
   1154      1.115     pooka 		printf("\t\tfd[1] = retval[1];\n\t}\n") > rumpcalls
   1155       1.90     pooka 		printf("\treturn error ? -1 : 0;\n}\n") > rumpcalls
   1156      1.145     pooka 		printf("#ifdef RUMP_KERNEL_IS_LIBC\n") > rumpcalls
   1157      1.145     pooka 		printf("__weak_alias(pipe,rump_sys_pipe);\n") > rumpcalls
   1158      1.145     pooka 		printf("__weak_alias(_pipe,rump_sys_pipe);\n") > rumpcalls
   1159      1.145     pooka 		printf("__strong_alias(_sys_pipe,rump_sys_pipe);\n") > rumpcalls
   1160      1.145     pooka 		printf("#endif\n") > rumpcalls
   1161       1.90     pooka 	}
   1162       1.90     pooka 
   1163      1.109     pooka 	# print default rump syscall interfaces
   1164      1.181  dholland 	# be sure to generate them in a deterministic order, not awk
   1165      1.181  dholland 	# hash order as would happen with a plain "for (var in funcseen)"
   1166      1.181  dholland 	numfuncseenvars = 0;
   1167      1.109     pooka 	for (var in funcseen) {
   1168      1.181  dholland 		funcseenvars[++numfuncseenvars] = var;
   1169      1.181  dholland 	}
   1170      1.181  dholland 	sort(funcseenvars, numfuncseenvars)
   1171      1.181  dholland 	for (i = 1; i <= numfuncseenvars; i++) {
   1172      1.181  dholland 		var = funcseenvars[i];
   1173      1.109     pooka 		printf("#ifndef RUMP_SYS_RENAME_%s\n", \
   1174      1.109     pooka 		    toupper(var)) > rumpcallshdr
   1175      1.109     pooka 		printf("#define RUMP_SYS_RENAME_%s rump___sysimpl_%s\n", \
   1176      1.109     pooka 		    toupper(var), funcseen[var]) > rumpcallshdr
   1177      1.109     pooka 		printf("#endif\n\n") > rumpcallshdr
   1178      1.109     pooka 	}
   1179      1.109     pooka 
   1180       1.40   mycroft 	maxsyscall = syscall
   1181      1.170  pgoyette 
   1182       1.40   mycroft 	if (nsysent) {
   1183       1.40   mycroft 		if (syscall > nsysent) {
   1184       1.50       wiz 			printf("%s: line %d: too many syscalls [%d > %d]\n", infile, NR, syscall, nsysent)
   1185       1.40   mycroft 			exit 1
   1186       1.40   mycroft 		}
   1187       1.40   mycroft 		while (syscall < nsysent) {
   1188      1.148  christos 			print fillerpsysent(syscall, "", sys_nosys, "filler") > sysent
   1189      1.148  christos 			print fillerpsysent(syscall, rumpnoflags, rumpnosys, "filler") > rumpsysent
   1190      1.105     pooka 			printf("\t/* %3d */\t\"# filler\",\n", syscall) \
   1191      1.105     pooka 			    > sysnamesbottom
   1192      1.154  christos 			printf("\t/* %3d */\tNULL, /* filler */\n", syscall) \
   1193      1.154  christos 			    > sysnamesfriendly
   1194       1.40   mycroft 			syscall++
   1195       1.40   mycroft 		}
   1196       1.40   mycroft 	}
   1197       1.82     pooka 	printf("};\n") > sysent
   1198      1.170  pgoyette 	printf("\nconst uint32_t %s_nomodbits[] = {\n", switchname) > sysent
   1199      1.170  pgoyette 	printf("};\n") > rumpsysent
   1200      1.170  pgoyette 	printf("\nconst uint32_t rump_sysent_nomodbits[] = {\n") > rumpsysent
   1201      1.170  pgoyette 	for (i = 0; i < syscall / 32; i++) {
   1202      1.170  pgoyette 		printf("\t0x%08x,\t/* syscalls %3d-%3d */\n",
   1203      1.170  pgoyette 			nomodbits[i], i * 32, i * 32 + 31) > sysent
   1204      1.170  pgoyette 		printf("\t0x%08x,\t/* syscalls %3d-%3d */\n",
   1205      1.170  pgoyette 			nomodbits[i], i * 32, i * 32 + 31) > rumpsysent
   1206      1.170  pgoyette 	}
   1207      1.170  pgoyette 	printf("};\n") > sysent
   1208       1.83     pooka 	printf("};\n") > rumpsysent
   1209       1.83     pooka 	printf("CTASSERT(__arraycount(rump_sysent) == SYS_NSYSENT);\n") > rumpsysent
   1210      1.131     pooka 	printf("__strong_alias(rumpns_sysent,rump_sysent);\n") > rumpsysent
   1211      1.102     pooka 	printf("#endif /* RUMP_CLIENT */\n") > rumpsysent
   1212      1.124     pooka 	if (haverumpcalls)
   1213      1.124     pooka 		printf("#endif /* !RUMP_CLIENT */\n") > sysprotos
   1214       1.27   thorpej 	printf("};\n") > sysnamesbottom
   1215      1.154  christos 	printf("};\n") > sysnamesfriendly
   1216       1.40   mycroft 	printf("#define\t%sMAXSYSCALL\t%d\n", constprefix, maxsyscall) > sysnumhdr
   1217       1.40   mycroft 	if (nsysent)
   1218       1.40   mycroft 		printf("#define\t%sNSYSENT\t%d\n", constprefix, nsysent) > sysnumhdr
   1219      1.146  christos 	printf "\tdefault:\n\t\t*n_args = 0;\n\t\tbreak;\n\t};\n}\n" > systrace
   1220      1.146  christos 	printf "\tdefault:\n\t\tbreak;\n\t};\n\tif (p != NULL)\n\t\tstrlcpy(desc, p, descsz);\n}\n" > systracetmp
   1221      1.146  christos 	printf "\tdefault:\n\t\tbreak;\n\t};\n\tif (p != NULL)\n\t\tstrlcpy(desc, p, descsz);\n}\n" > systraceret
   1222       1.11       cgd } '
   1223        1.1     glass 
   1224       1.17   mycroft cat $sysprotos >> $sysarghdr
   1225       1.59  christos echo "#endif /* _${constprefix}SYSCALL_H_ */" >> $sysnumhdr
   1226       1.59  christos echo "#endif /* _${constprefix}SYSCALLARGS_H_ */" >> $sysarghdr
   1227      1.173  christos printf "\t    { 0, NULL }\n" >> $sysautoloadbottom
   1228      1.173  christos echo "};" >> $sysautoloadbottom
   1229      1.109     pooka printf "\n#endif /* _RUMP_RUMP_SYSCALLS_H_ */\n" >> $rumpprotos
   1230       1.16   thorpej cat $sysdcl $sysent > $syssw
   1231       1.27   thorpej cat $sysnamesbottom >> $sysnames
   1232      1.154  christos cat $sysnamesfriendly >> $sysnames
   1233       1.83     pooka cat $rumpsysent >> $rumpcalls
   1234      1.173  christos cat $sysautoloadbottom >> $sysautoload
   1235        1.1     glass 
   1236      1.118     njoly touch $rumptypes
   1237      1.109     pooka cat $rumptypes >> $rumpcallshdr
   1238      1.109     pooka echo >> $rumpcallshdr
   1239      1.109     pooka cat $rumpprotos >> $rumpcallshdr
   1240      1.109     pooka 
   1241       1.15  christos #chmod 444 $sysnames $sysnumhdr $syssw
   1242      1.136     pooka 
   1243      1.146  christos cat $systracetmp >> $systrace
   1244      1.146  christos cat $systraceret >> $systrace
   1245      1.146  christos 
   1246      1.136     pooka echo Generated following files:
   1247      1.152  pgoyette echo $sysarghdr $sysnumhdr $syssw $sysnames $sysautoload $systrace $rumpcalls $rumpcallshdr $rumpsysmap
   1248