#! /bin/sh -
set -e
syscallnamesfile="syscalls.c"
sysprotofile="../sys/sysproto.h"
sysproto_h=_SYS_SYSPROTO_H_
syshdrfile="../sys/syscall.h"
syscall_h=_SYS_SYSCALL_H_
syscalltablefile="init_sysent.c"
syscallprefix="SYS_"
switchname="sysent"
namesname="syscallnames"
syslegal="sysent.syslegal.$$"
sysent="sysent.switch.$$"
sysinc="sysinc.switch.$$"
sysarg="sysarg.switch.$$"
sysprotoend="sysprotoend.$$"
syscallnamestempfile="syscallnamesfile.$$"
syshdrtempfile="syshdrtempfile.$$"
trap "rm $syslegal $sysent $sysinc $sysarg $sysprotoend $syscallnamestempfile $syshdrtempfile" 0
touch $syslegal $sysent $sysinc $sysarg $sysprotoend $syscallnamestempfile $syshdrtempfile
case $ 0) echo "usage: $0 input-file <config-file>" 1>&2
exit 1
;;
esac
if [ -n "$2" -a -f "$2" ]; then
. $2
fi
sed -e '
s/\$//g
:join
/\\$/{a\
N
s/\\\n//
b join
}
2,${
/^}
' < $1 | awk "
BEGIN {
syslegal = \"$syslegal\"
sysprotofile = \"$sysprotofile\"
sysprotoend = \"$sysprotoend\"
sysproto_h = \"$sysproto_h\"
syscall_h = \"$syscall_h\"
sysent = \"$sysent\"
syscalltablefile = \"$syscalltablefile\"
sysinc = \"$sysinc\"
sysarg = \"$sysarg\"
syscallnamesfile = \"$syscallnamesfile\"
syscallnamestempfile = \"$syscallnamestempfile\"
syshdrfile = \"$syshdrfile\"
syshdrtempfile = \"$syshdrtempfile\"
syscallprefix = \"$syscallprefix\"
switchname = \"$switchname\"
namesname = \"$namesname\"
infile = \"$1\"
"'
printf "/*\n" > syslegal
printf " * Copyright (c) 2004-2007 Apple Inc. All rights reserved.\n" > syslegal
printf " * \n" > syslegal
printf " * @APPLE_OSREFERENCE_LICENSE_HEADER_START@\n" > syslegal
printf " * \n" > syslegal
printf " * This file contains Original Code and/or Modifications of Original Code\n" > syslegal
printf " * as defined in and that are subject to the Apple Public Source License\n" > syslegal
printf " * Version 2.0 (the \047License\047). You may not use this file except in\n" > syslegal
printf " * compliance with the License. The rights granted to you under the License\n" > syslegal
printf " * may not be used to create, or enable the creation or redistribution of,\n" > syslegal
printf " * unlawful or unlicensed copies of an Apple operating system, or to\n" > syslegal
printf " * circumvent, violate, or enable the circumvention or violation of, any\n" > syslegal
printf " * terms of an Apple operating system software license agreement.\n" > syslegal
printf " * \n" > syslegal
printf " * Please obtain a copy of the License at\n" > syslegal
printf " * http://www.opensource.apple.com/apsl/ and read it before using this file.\n" > syslegal
printf " * \n" > syslegal
printf " * The Original Code and all software distributed under the License are\n" > syslegal
printf " * distributed on an \047AS IS\047 basis, WITHOUT WARRANTY OF ANY KIND, EITHER\n" > syslegal
printf " * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,\n" > syslegal
printf " * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,\n" > syslegal
printf " * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.\n" > syslegal
printf " * Please see the License for the specific language governing rights and\n" > syslegal
printf " * limitations under the License.\n" > syslegal
printf " * \n" > syslegal
printf " * @APPLE_OSREFERENCE_LICENSE_HEADER_END@\n" > syslegal
printf " * \n" > syslegal
printf " * \n" > syslegal
printf " * System call switch table.\n *\n" > syslegal
printf " * DO NOT EDIT-- this file is automatically generated.\n" > syslegal
printf " * created from %s\n */\n\n", infile > syslegal
}
NR == 1 {
printf "\n/* The casts are bogus but will do for now. */\n" > sysent
printf "__private_extern__ struct sysent %s[] = {\n",switchname > sysent
printf "#ifndef %s\n", sysproto_h > sysarg
printf "#define\t%s\n\n", sysproto_h > sysarg
printf "#ifndef %s\n", syscall_h > syshdrtempfile
printf "#define\t%s\n\n", syscall_h > syshdrtempfile
printf "#include <sys/appleapiopts.h>\n" > syshdrtempfile
printf "#ifdef __APPLE_API_PRIVATE\n" > syshdrtempfile
printf "#include <sys/appleapiopts.h>\n" > sysarg
printf "#include <sys/cdefs.h>\n" > sysarg
printf "#include <sys/mount_internal.h>\n" > sysarg
printf "#include <sys/types.h>\n" > sysarg
printf "#include <sys/sem_internal.h>\n" > sysarg
printf "#include <sys/semaphore.h>\n" > sysarg
printf "#include <sys/wait.h>\n" > sysarg
printf "#include <mach/shared_region.h>\n" > sysarg
printf "\n#ifdef KERNEL\n" > sysarg
printf "#ifdef __APPLE_API_PRIVATE\n" > sysarg
printf "#ifndef __arm__\n" > sysarg
printf "#define\tPAD_(t)\t(sizeof(uint64_t) <= sizeof(t) \\\n " > sysarg
printf "\t\t? 0 : sizeof(uint64_t) - sizeof(t))\n" > sysarg
printf "#else\n" > sysarg
printf "#define\tPAD_(t)\t(sizeof(register_t) <= sizeof(t) \\\n" > sysarg
printf " ? 0 : sizeof(register_t) - sizeof(t))\n" > sysarg
printf "#endif\n" > sysarg
printf "#if BYTE_ORDER == LITTLE_ENDIAN\n"> sysarg
printf "#define\tPADL_(t)\t0\n" > sysarg
printf "#define\tPADR_(t)\tPAD_(t)\n" > sysarg
printf "#else\n" > sysarg
printf "#define\tPADL_(t)\tPAD_(t)\n" > sysarg
printf "#define\tPADR_(t)\t0\n" > sysarg
printf "#endif\n" > sysarg
printf "\n__BEGIN_DECLS\n" > sysarg
printf "#ifndef __MUNGE_ONCE\n" > sysarg
printf "#define __MUNGE_ONCE\n" > sysarg
printf "#ifndef __arm__\n" > sysarg
printf "void munge_w(const void *, void *); \n" > sysarg
printf "void munge_ww(const void *, void *); \n" > sysarg
printf "void munge_www(const void *, void *); \n" > sysarg
printf "void munge_wwww(const void *, void *); \n" > sysarg
printf "void munge_wwwww(const void *, void *); \n" > sysarg
printf "void munge_wwwwww(const void *, void *); \n" > sysarg
printf "void munge_wwwwwww(const void *, void *); \n" > sysarg
printf "void munge_wwwwwwww(const void *, void *); \n" > sysarg
printf "void munge_wl(const void *, void *); \n" > sysarg
printf "void munge_wlw(const void *, void *); \n" > sysarg
printf "void munge_wwwl(const void *, void *); \n" > sysarg
printf "void munge_wwwlww(const void *, void *); \n" > sysarg
printf "void munge_wwlwww(const void *, void *); \n" > sysarg
printf "void munge_wwwwl(const void *, void *); \n" > sysarg
printf "void munge_wwwwwl(const void *, void *); \n" > sysarg
printf "void munge_wsw(const void *, void *); \n" > sysarg
printf "void munge_wws(const void *, void *); \n" > sysarg
printf "void munge_wwwsw(const void *, void *); \n" > sysarg
printf "#else \n" > sysarg
printf "#define munge_w NULL \n" > sysarg
printf "#define munge_ww NULL \n" > sysarg
printf "#define munge_www NULL \n" > sysarg
printf "#define munge_wwww NULL \n" > sysarg
printf "#define munge_wwwww NULL \n" > sysarg
printf "#define munge_wwwwww NULL \n" > sysarg
printf "#define munge_wwwwwww NULL \n" > sysarg
printf "#define munge_wwwwwwww NULL \n" > sysarg
printf "#define munge_wl NULL \n" > sysarg
printf "#define munge_wlw NULL \n" > sysarg
printf "#define munge_wwwl NULL \n" > sysarg
printf "#define munge_wwwlww NULL\n" > sysarg
printf "#define munge_wwlwww NULL \n" > sysarg
printf "#define munge_wwwwl NULL \n" > sysarg
printf "#define munge_wwwwwl NULL \n" > sysarg
printf "#define munge_wsw NULL \n" > sysarg
printf "#define munge_wws NULL \n" > sysarg
printf "#define munge_wwwsw NULL \n" > sysarg
printf "#endif // ! __arm__\n" > sysarg
printf "#ifdef __ppc__\n" > sysarg
printf "void munge_d(const void *, void *); \n" > sysarg
printf "void munge_dd(const void *, void *); \n" > sysarg
printf "void munge_ddd(const void *, void *); \n" > sysarg
printf "void munge_dddd(const void *, void *); \n" > sysarg
printf "void munge_ddddd(const void *, void *); \n" > sysarg
printf "void munge_dddddd(const void *, void *); \n" > sysarg
printf "void munge_ddddddd(const void *, void *); \n" > sysarg
printf "void munge_dddddddd(const void *, void *); \n" > sysarg
printf "#else \n" > sysarg
printf "#define munge_d NULL \n" > sysarg
printf "#define munge_dd NULL \n" > sysarg
printf "#define munge_ddd NULL \n" > sysarg
printf "#define munge_dddd NULL \n" > sysarg
printf "#define munge_ddddd NULL \n" > sysarg
printf "#define munge_dddddd NULL \n" > sysarg
printf "#define munge_ddddddd NULL \n" > sysarg
printf "#define munge_dddddddd NULL \n" > sysarg
printf "#endif // __ppc__\n" > sysarg
printf "#endif /* !__MUNGE_ONCE */\n" > sysarg
printf "\n" > sysarg
printf "const char *%s[] = {\n", namesname > syscallnamestempfile
next
}
NF == 0 || $1 ~ /^;/ {
next
}
$1 ~ /^ print > sysinc
next
}
$1 ~ /^ print > sysent
print > sysarg
print > syscallnamestempfile
print > sysprotoend
savesyscall = syscall_num
skip_for_header = 0
next
}
$1 ~ /^ print > sysent
print > sysarg
print > syscallnamestempfile
print > sysprotoend
syscall_num = savesyscall
skip_for_header = 1
next
}
$1 ~ /^ print > sysent
print > sysarg
print > syscallnamestempfile
print > sysprotoend
skip_for_header = 0
next
}
syscall_num != $1 {
printf "%s: line %d: syscall number out of sync at %d\n",
infile, NR, syscall_num
printf "line is:\n"
print
exit 1
}
function align_comment(linesize, location, thefile) {
printf(" ") > thefile
while (linesize < location) {
printf(" ") > thefile
linesize++
}
}
function parserr(was, wanted) {
printf "%s: line %d: unexpected %s (expected %s)\n",
infile, NR, was, wanted
exit 1
}
function parseline() {
funcname = ""
current_field = 3
args_start = 0
args_end = 0
comments_start = 0
comments_end = 0
argc = 0
argssize = "0"
additional_comments = " "
if ($current_field != "{")
parserr($current_field, "{")
args_start = current_field
current_field++
while (current_field <= NF) {
if ($current_field == "}") {
args_end = current_field
break
}
current_field++
}
if (args_end == 0) {
printf "%s: line %d: invalid call name and arguments\n",
infile, NR
exit 1
}
current_field++
if (current_field < NF && $current_field == "{") {
comments_start = current_field
while (current_field <= NF) {
if ($current_field == "}") {
comments_end = current_field
break
}
current_field++
}
if (comments_end == 0) {
printf "%s: line %d: invalid comments \n",
infile, NR
exit 1
}
}
if ($args_end != "}")
parserr($args_end, "}")
args_end--
if ($args_end != ";")
parserr($args_end, ";")
args_end--
if ($args_end == "NO_SYSCALL_STUB")
args_end--
if ($args_end != ")")
parserr($args_end, ")")
args_end--
if (comments_start != 0) {
current_field = comments_start + 1
while (current_field < comments_end) {
additional_comments = additional_comments $current_field " "
current_field++
}
}
current_field = args_start + 1
returntype = $current_field
current_field++
funcname = $current_field
argalias = funcname "_args"
current_field++
if ($current_field != "(")
parserr($current_field, "(")
current_field++
if (current_field == args_end) {
if ($current_field != "void")
parserr($current_field, "argument definition")
return
}
while (current_field <= args_end) {
argc++
argtype[argc]=""
ext_argtype[argc]=""
oldf=""
while (current_field < args_end && $(current_field + 1) != ",") {
if (argtype[argc] != "" && oldf != "*") {
argtype[argc] = argtype[argc] " ";
}
argtype[argc] = argtype[argc] $current_field;
ext_argtype[argc] = argtype[argc];
oldf = $current_field;
current_field++
}
if (argtype[argc] == "")
parserr($current_field, "argument definition")
argname[argc] = $current_field;
current_field += 2; }
if (argc > 8) {
printf "%s: line %d: too many arguments!\n", infile, NR
exit 1
}
if (argc != 0)
argssize = "AC(" argalias ")"
}
{
add_sysent_entry = 1
add_sysnames_entry = 1
add_sysheader_entry = 1
add_sysproto_entry = 1
add_64bit_unsafe = 0
add_64bit_fakesafe = 0
add_resv = "0"
my_flags = "0"
if ($2 != "ALL" && $2 != "UALL") {
files_keyword_OK = 0
add_sysent_entry = 0
add_sysnames_entry = 0
add_sysheader_entry = 0
add_sysproto_entry = 0
if (match($2, "[T]") != 0) {
add_sysent_entry = 1
files_keyword_OK = 1
}
if (match($2, "[N]") != 0) {
add_sysnames_entry = 1
files_keyword_OK = 1
}
if (match($2, "[H]") != 0) {
add_sysheader_entry = 1
files_keyword_OK = 1
}
if (match($2, "[P]") != 0) {
add_sysproto_entry = 1
files_keyword_OK = 1
}
if (match($2, "[U]") != 0) {
add_64bit_unsafe = 1
}
if (match($2, "[F]") != 0) {
add_64bit_fakesafe = 1
}
if (files_keyword_OK == 0) {
printf "%s: line %d: unrecognized keyword %s\n", infile, NR, $2
exit 1
}
}
else if ($2 == "UALL") {
add_64bit_unsafe = 1;
}
parseline()
munge32 = "NULL"
munge64 = "NULL"
size32 = 0
if ((funcname != "nosys" && funcname != "enosys") || (syscall_num == 0 && funcname == "nosys")) {
if (argc != 0) {
if (add_sysproto_entry == 1) {
printf("struct %s {\n", argalias) > sysarg
}
munge32 = "munge_"
munge64 = "munge_"
for (i = 1; i <= argc; i++) {
if (argtype[i] == "long") {
if (add_64bit_unsafe == 0)
ext_argtype[i] = "user_long_t";
munge32 = munge32 "s"
munge64 = munge64 "d"
size32 += 4
}
else if (argtype[i] == "u_long") {
if (add_64bit_unsafe == 0)
ext_argtype[i] = "user_ulong_t";
munge32 = munge32 "w"
munge64 = munge64 "d"
size32 += 4
}
else if (argtype[i] == "size_t") {
if (add_64bit_unsafe == 0)
ext_argtype[i] = "user_size_t";
munge32 = munge32 "w"
munge64 = munge64 "d"
size32 += 4
}
else if (argtype[i] == "ssize_t") {
if (add_64bit_unsafe == 0)
ext_argtype[i] = "user_ssize_t";
munge32 = munge32 "s"
munge64 = munge64 "d"
size32 += 4
}
else if (argtype[i] == "user_ssize_t" || argtype[i] == "user_long_t") {
munge32 = munge32 "s"
munge64 = munge64 "d"
size32 += 4
}
else if (argtype[i] == "user_addr_t" || argtype[i] == "user_size_t" ||
argtype[i] == "user_ulong_t") {
munge32 = munge32 "w"
munge64 = munge64 "d"
size32 += 4
}
else if (argtype[i] == "caddr_t" || argtype[i] == "semun_t" ||
match(argtype[i], "[\*]") != 0) {
if (add_64bit_unsafe == 0)
ext_argtype[i] = "user_addr_t";
munge32 = munge32 "w"
munge64 = munge64 "d"
size32 += 4
}
else if (argtype[i] == "int" || argtype[i] == "u_int" ||
argtype[i] == "uid_t" || argtype[i] == "pid_t" ||
argtype[i] == "id_t" || argtype[i] == "idtype_t" ||
argtype[i] == "socklen_t" || argtype[i] == "uint32_t" || argtype[i] == "int32_t" ||
argtype[i] == "sigset_t" || argtype[i] == "gid_t" ||
argtype[i] == "mode_t" || argtype[i] == "key_t" || argtype[i] == "time_t") {
munge32 = munge32 "w"
munge64 = munge64 "d"
size32 += 4
}
else if (argtype[i] == "off_t" || argtype[i] == "int64_t" || argtype[i] == "uint64_t") {
munge32 = munge32 "l"
munge64 = munge64 "d"
size32 += 8
}
else {
printf "%s: line %d: invalid type \"%s\" \n",
infile, NR, argtype[i]
printf "You need to add \"%s\" into the type checking code. \n",
argtype[i]
exit 1
}
if (add_sysproto_entry == 1) {
printf("\tchar %s_l_[PADL_(%s)]; " \
"%s %s; char %s_r_[PADR_(%s)];\n",
argname[i], ext_argtype[i],
ext_argtype[i], argname[i],
argname[i], ext_argtype[i]) > sysarg
}
}
if (add_sysproto_entry == 1) {
printf("};\n") > sysarg
}
}
else if (add_sysproto_entry == 1) {
printf("struct %s {\n\tregister_t dummy;\n};\n", argalias) > sysarg
}
}
tempname = funcname
if (add_sysent_entry == 0) {
argssize = "0"
munge32 = "NULL"
munge64 = "NULL"
munge_ret = "_SYSCALL_RET_NONE"
if (tempname != "enosys") {
tempname = "nosys"
}
}
else {
if (returntype == "user_addr_t") {
munge_ret = "_SYSCALL_RET_ADDR_T"
}
else if (returntype == "user_ssize_t") {
munge_ret = "_SYSCALL_RET_SSIZE_T"
}
else if (returntype == "user_size_t") {
munge_ret = "_SYSCALL_RET_SIZE_T"
}
else if (returntype == "int") {
munge_ret = "_SYSCALL_RET_INT_T"
}
else if (returntype == "u_int") {
munge_ret = "_SYSCALL_RET_UINT_T"
}
else if (returntype == "off_t") {
munge_ret = "_SYSCALL_RET_OFF_T"
}
else if (returntype == "void") {
munge_ret = "_SYSCALL_RET_NONE"
}
else {
printf "%s: line %d: invalid return type \"%s\" \n",
infile, NR, returntype
printf "You need to add \"%s\" into the return type checking code. \n",
returntype
exit 1
}
}
if (add_64bit_unsafe == 1 && add_64bit_fakesafe == 0)
my_flags = "UNSAFE_64BIT";
printf("\t{%s, %s, %s, \(sy_call_t *\)%s, %s, %s, %s, %s},",
argssize, add_resv, my_flags, tempname, munge32, munge64, munge_ret, size32) > sysent
linesize = length(argssize) + length(add_resv) + length(my_flags) + length(tempname) + \
length(munge32) + length(munge64) + length(munge_ret) + 28
align_comment(linesize, 88, sysent)
printf("/* %d = %s%s*/\n", syscall_num, funcname, additional_comments) > sysent
if (add_sysnames_entry == 1) {
tempname = funcname
if (funcname == "nosys" || funcname == "enosys") {
if (syscall_num == 0)
tempname = "syscall"
else
tempname = "#" syscall_num
}
printf("\t\"%s\", ", tempname) > syscallnamestempfile
linesize = length(tempname) + 8
align_comment(linesize, 25, syscallnamestempfile)
if (substr(tempname,1,1) == "#") {
printf("/* %d =%s*/\n", syscall_num, additional_comments) > syscallnamestempfile
}
else {
printf("/* %d = %s%s*/\n", syscall_num, tempname, additional_comments) > syscallnamestempfile
}
}
if (add_sysheader_entry == 1) {
tempname = funcname
if (syscall_num == 0) {
tempname = "syscall"
}
if (tempname != "nosys" && tempname != "enosys") {
printf("#define\t%s%s", syscallprefix, tempname) > syshdrtempfile
linesize = length(syscallprefix) + length(tempname) + 12
align_comment(linesize, 30, syshdrtempfile)
printf("%d\n", syscall_num) > syshdrtempfile
if (tempname == "ppc_gettimeofday") {
printf("#define\t%s%s", syscallprefix, "gettimeofday") > syshdrtempfile
linesize = length(syscallprefix) + length(tempname) + 12
align_comment(linesize, 30, syshdrtempfile)
printf("%d\n", syscall_num) > syshdrtempfile
}
}
else if (skip_for_header == 0) {
printf("\t\t\t/* %d %s*/\n", syscall_num, additional_comments) > syshdrtempfile
}
}
if (add_sysproto_entry == 1) {
if (funcname =="exit") {
printf("void %s(struct proc *, struct %s *, int *);\n",
funcname, argalias) > sysprotoend
}
else if ((funcname != "nosys" && funcname != "enosys") || (syscall_num == 0 && funcname == "nosys")) {
printf("int %s(struct proc *, struct %s *, %s *);\n",
funcname, argalias, returntype) > sysprotoend
}
}
syscall_num++
next
}
END {
printf "#define AC(name) (sizeof(struct name) / sizeof(syscall_arg_t))\n" > sysinc
printf "\n" > sysinc
printf("\n__END_DECLS\n") > sysprotoend
printf("#undef PAD_\n") > sysprotoend
printf("#undef PADL_\n") > sysprotoend
printf("#undef PADR_\n") > sysprotoend
printf "\n#endif /* __APPLE_API_PRIVATE */\n" > sysprotoend
printf "#endif /* KERNEL */\n" > sysprotoend
printf("\n#endif /* !%s */\n", sysproto_h) > sysprotoend
printf("};\n") > sysent
printf("int nsysent = sizeof(sysent) / sizeof(sysent[0]);\n") > sysent
printf("/* Verify that NUM_SYSENT reflects the latest syscall count */\n") > sysent
printf("int nsysent_size_check[((sizeof(sysent) / sizeof(sysent[0])) == NUM_SYSENT) ? 1 : -1] __unused;\n") > sysent
printf("};\n") > syscallnamestempfile
printf("#define\t%sMAXSYSCALL\t%d\n", syscallprefix, syscall_num) \
> syshdrtempfile
printf("\n#endif /* __APPLE_API_PRIVATE */\n") > syshdrtempfile
printf("#endif /* !%s */\n", syscall_h) > syshdrtempfile
} '
cat $syslegal > $syscalltablefile
printf "#define __INIT_SYSENT_C__ 1\n" >> $syscalltablefile
cat $sysinc $sysent >> $syscalltablefile
cat $syslegal $sysarg $sysprotoend > $sysprotofile
cat $syslegal $syscallnamestempfile > $syscallnamesfile
cat $syslegal $syshdrtempfile > $syshdrfile