2 # @(#)makesyscalls.sh 8.1 (Berkeley) 6/10/93
7 # name of compat options:
9 compat4=COMPAT_FREEBSD4
10 compat6=COMPAT_FREEBSD6
11 compat7=COMPAT_FREEBSD7
12 compat10=COMPAT_FREEBSD10
13 compat11=COMPAT_FREEBSD11
17 sysproto="../sys/sysproto.h"
18 sysproto_h=_SYS_SYSPROTO_H_
19 syshdr="../sys/syscall.h"
20 sysmk="../sys/syscall.mk"
24 namesname="syscallnames"
25 systrace="systrace_args.c"
28 sysaue="sysent.aue.$$"
29 sysdcl="sysent.dcl.$$"
30 syscompat="sysent.compat.$$"
31 syscompatdcl="sysent.compatdcl.$$"
32 syscompat4="sysent.compat4.$$"
33 syscompat4dcl="sysent.compat4dcl.$$"
34 syscompat6="sysent.compat6.$$"
35 syscompat6dcl="sysent.compat6dcl.$$"
36 syscompat7="sysent.compat7.$$"
37 syscompat7dcl="sysent.compat7dcl.$$"
38 syscompat10="sysent.compat10.$$"
39 syscompat10dcl="sysent.compat10dcl.$$"
40 syscompat11="sysent.compat11.$$"
41 syscompat11dcl="sysent.compat11dcl.$$"
42 sysent="sysent.switch.$$"
43 sysinc="sysinc.switch.$$"
44 sysarg="sysarg.switch.$$"
45 sysprotoend="sysprotoend.$$"
46 systracetmp="systrace.$$"
47 systraceret="systraceret.$$"
48 capabilities_conf="capabilities.conf"
50 trap "rm $sysaue $sysdcl $syscompat $syscompatdcl $syscompat4 $syscompat4dcl $syscompat6 $syscompat6dcl $syscompat7 $syscompat7dcl $syscompat10 $syscompat10dcl $syscompat11 $syscompat11dcl $sysent $sysinc $sysarg $sysprotoend $systracetmp $systraceret" 0
52 touch $sysaue $sysdcl $syscompat $syscompatdcl $syscompat4 $syscompat4dcl $syscompat6 $syscompat6dcl $syscompat7 $syscompat7dcl $syscompat10 $syscompat10dcl $syscompat11 $syscompat11dcl $sysent $sysinc $sysarg $sysprotoend $systracetmp $systraceret
55 0) echo "usage: $0 input-file <config-file>" 1>&2
64 if [ -r $capabilities_conf ]; then
65 capenabled=`egrep -v '^#|^$' $capabilities_conf`
66 capenabled=`echo $capenabled | sed 's/ /,/g'`
72 # FreeBSD ID, includes, comments, and blank lines
73 /.*\$FreeBSD/b done_joining
77 # Join lines ending in backslash
86 # OBSOL, etc lines without function signatures
87 /^[0-9][^{]*$/b done_joining
89 # Join incomplete signatures. The { must appear on the first line
90 # and the } must appear on the last line (modulo lines joined by
100 /^#/!s/\([{}()*,]\)/ \1 /g
106 sysproto = \"$sysproto\"
107 sysprotoend = \"$sysprotoend\"
108 sysproto_h = \"$sysproto_h\"
109 syscompat = \"$syscompat\"
110 syscompatdcl = \"$syscompatdcl\"
111 syscompat4 = \"$syscompat4\"
112 syscompat4dcl = \"$syscompat4dcl\"
113 syscompat6 = \"$syscompat6\"
114 syscompat6dcl = \"$syscompat6dcl\"
115 syscompat7 = \"$syscompat7\"
116 syscompat7dcl = \"$syscompat7dcl\"
117 syscompat10 = \"$syscompat10\"
118 syscompat10dcl = \"$syscompat10dcl\"
119 syscompat11 = \"$syscompat11\"
120 syscompat11dcl = \"$syscompat11dcl\"
125 sysnames = \"$sysnames\"
128 systrace = \"$systrace\"
129 systracetmp = \"$systracetmp\"
130 systraceret = \"$systraceret\"
132 compat4 = \"$compat4\"
133 compat6 = \"$compat6\"
134 compat7 = \"$compat7\"
135 compat10 = \"$compat10\"
136 compat11 = \"$compat11\"
137 syscallprefix = \"$syscallprefix\"
138 switchname = \"$switchname\"
139 namesname = \"$namesname\"
141 abi_func_prefix = \"$abi_func_prefix\"
142 capenabled_string = \"$capenabled\"
145 split(capenabled_string, capenabled, ",");
147 printf "\n/* The casts are bogus but will do for now. */\n" > sysent
148 printf "struct sysent %s[] = {\n",switchname > sysent
150 printf "/*\n * System call switch table.\n *\n" > syssw
151 printf " * DO NOT EDIT-- this file is automatically generated.\n" > syssw
152 printf " * $%s$\n", "FreeBSD" > syssw
153 printf " */\n\n" > syssw
155 printf "/*\n * System call prototypes.\n *\n" > sysarg
156 printf " * DO NOT EDIT-- this file is automatically generated.\n" > sysarg
157 printf " * $%s$\n", "FreeBSD" > sysarg
158 printf " */\n\n" > sysarg
159 printf "#ifndef %s\n", sysproto_h > sysarg
160 printf "#define\t%s\n\n", sysproto_h > sysarg
161 printf "#include <sys/signal.h>\n" > sysarg
162 printf "#include <sys/acl.h>\n" > sysarg
163 printf "#include <sys/cpuset.h>\n" > sysarg
164 printf "#include <sys/domainset.h>\n" > sysarg
165 printf "#include <sys/_ffcounter.h>\n" > sysarg
166 printf "#include <sys/_semaphore.h>\n" > sysarg
167 printf "#include <sys/ucontext.h>\n" > sysarg
168 printf "#include <sys/wait.h>\n\n" > sysarg
169 printf "#include <bsm/audit_kevents.h>\n\n" > sysarg
170 printf "struct proc;\n\n" > sysarg
171 printf "struct thread;\n\n" > sysarg
172 printf "#define\tPAD_(t)\t(sizeof(register_t) <= sizeof(t) ? \\\n" > sysarg
173 printf "\t\t0 : sizeof(register_t) - sizeof(t))\n\n" > sysarg
174 printf "#if BYTE_ORDER == LITTLE_ENDIAN\n"> sysarg
175 printf "#define\tPADL_(t)\t0\n" > sysarg
176 printf "#define\tPADR_(t)\tPAD_(t)\n" > sysarg
177 printf "#else\n" > sysarg
178 printf "#define\tPADL_(t)\tPAD_(t)\n" > sysarg
179 printf "#define\tPADR_(t)\t0\n" > sysarg
180 printf "#endif\n\n" > sysarg
182 printf "\n#ifdef %s\n\n", compat > syscompat
183 printf "\n#ifdef %s\n\n", compat4 > syscompat4
184 printf "\n#ifdef %s\n\n", compat6 > syscompat6
185 printf "\n#ifdef %s\n\n", compat7 > syscompat7
186 printf "\n#ifdef %s\n\n", compat10 > syscompat10
187 printf "\n#ifdef %s\n\n", compat11 > syscompat11
189 printf "/*\n * System call names.\n *\n" > sysnames
190 printf " * DO NOT EDIT-- this file is automatically generated.\n" > sysnames
191 printf " * $%s$\n", "FreeBSD" > sysnames
192 printf " */\n\n" > sysnames
193 printf "const char *%s[] = {\n", namesname > sysnames
195 printf "/*\n * System call numbers.\n *\n" > syshdr
196 printf " * DO NOT EDIT-- this file is automatically generated.\n" > syshdr
197 printf " * $%s$\n", "FreeBSD" > syshdr
198 printf " */\n\n" > syshdr
200 printf "# FreeBSD system call object files.\n" > sysmk
201 printf "# DO NOT EDIT-- this file is automatically generated.\n" > sysmk
202 printf "# $%s$\n", "FreeBSD" > sysmk
203 printf "MIASM = " > sysmk
205 printf "/*\n * System call argument to DTrace register array converstion.\n *\n" > systrace
206 printf " * DO NOT EDIT-- this file is automatically generated.\n" > systrace
207 printf " * $%s$\n", "FreeBSD" > systrace
208 printf " * This file is part of the DTrace syscall provider.\n */\n\n" > systrace
209 printf "static void\nsystrace_args(int sysnum, void *params, uint64_t *uarg, int *n_args)\n{\n" > systrace
210 printf "\tint64_t *iarg = (int64_t *) uarg;\n" > systrace
211 printf "\tswitch (sysnum) {\n" > systrace
213 printf "static void\nsystrace_entry_setargdesc(int sysnum, int ndx, char *desc, size_t descsz)\n{\n\tconst char *p = NULL;\n" > systracetmp
214 printf "\tswitch (sysnum) {\n" > systracetmp
216 printf "static void\nsystrace_return_setargdesc(int sysnum, int ndx, char *desc, size_t descsz)\n{\n\tconst char *p = NULL;\n" > systraceret
217 printf "\tswitch (sysnum) {\n" > systraceret
222 NF == 0 || $1 ~ /^;/ {
225 $1 ~ /^#[ ]*include/ {
243 savesyscall = syscall
260 syscall = savesyscall
279 # Returns true if the type "name" is the first flag in the type field
280 function type(name, flags, n) {
281 n = split($3, flags, /\|/)
282 return (n > 0 && flags[1] == name)
284 # Returns true if the flag "name" is set in the type field
285 function flag(name, flags, i, n) {
286 n = split($3, flags, /\|/)
287 for (i = 1; i <= n; i++)
288 if (flags[i] == name)
293 n = split($1, syscall_range, /-/)
295 syscall_range[2] = syscall_range[1]
297 if (!type("UNIMPL")) {
298 printf "%s: line %d: range permitted only with UNIMPL\n",
303 printf "%s: line %d: invalid syscall number or range %s\n",
308 syscall != syscall_range[1] {
309 printf "%s: line %d: syscall number out of sync at %d\n",
315 function align_sysent_comment(column) {
316 printf("\t") > sysent
317 column = column + 8 - column % 8
318 while (column < 56) {
319 printf("\t") > sysent
323 function parserr(was, wanted) {
324 printf "%s: line %d: unexpected %s (expected %s)\n",
325 infile, NR, was, wanted
328 function parseline() {
329 f=4 # toss number, type, audit event
333 thr_flag = "SY_THR_STATIC"
334 if (flag("NOTSTATIC")) {
335 thr_flag = "SY_THR_ABSENT"
353 funcname=$(4 + ret_inc)
354 argssize = "AS(" $(6 + ret_inc) ")"
372 while (ret_inc > 0) {
373 syscallret=syscallret " " $f
381 # We now know the func name, so define a flags field for it.
382 # Do this before any other processing as we may return early
385 for (cap in capenabled) {
386 if (funcname == capenabled[cap] ||
387 funcname == abi_func_prefix capenabled[cap]) {
388 flags = "SYF_CAPENABLED";
395 if (argalias == "") {
396 argalias = funcname "_args"
398 argalias = "o" argalias
400 argalias = "freebsd4_" argalias
402 argalias = "freebsd6_" argalias
404 argalias = "freebsd7_" argalias
405 if (flag("COMPAT10"))
406 argalias = "freebsd10_" argalias
407 if (flag("COMPAT11"))
408 argalias = "freebsd11_" argalias
418 parserr($f, "argument definition")
426 while (f < end && $(f+1) != ",") {
427 if (argtype[argc] != "" && oldf != "*")
428 argtype[argc] = argtype[argc]" ";
429 argtype[argc] = argtype[argc]$f;
433 if (argtype[argc] == "")
434 parserr($f, "argument definition")
436 # The parser adds space around parens.
437 # Remove it from annotations.
438 gsub(/ \( /, "(", argtype[argc]);
439 gsub(/ \)/, ")", argtype[argc]);
442 gsub(/_In[^ ]*[_)] /, "", argtype[argc]);
443 gsub(/_Out[^ ]*[_)] /, "", argtype[argc]);
446 f += 2; # skip name, and any comma
449 argssize = "AS(" argalias ")"
453 for (i = 5; i <= NF; i++)
454 comment = comment " " $i
458 # The AUE_ audit event identifier.
471 type("STD") || type("NODEF") || type("NOARGS") || type("NOPROTO") \
474 printf("\t/* %s */\n\tcase %d: {\n", funcname, syscall) > systrace
475 printf("\t/* %s */\n\tcase %d:\n", funcname, syscall) > systracetmp
476 printf("\t/* %s */\n\tcase %d:\n", funcname, syscall) > systraceret
478 printf("\t\tswitch(ndx) {\n") > systracetmp
479 printf("\t\tstruct %s *p = params;\n", argalias) > systrace
480 for (i = 1; i <= argc; i++) {
482 sub("__restrict$", "", arg)
483 if (index(arg, "*") > 0)
484 printf("\t\tcase %d:\n\t\t\tp = \"userland %s\";\n\t\t\tbreak;\n", i - 1, arg) > systracetmp
486 printf("\t\tcase %d:\n\t\t\tp = \"%s\";\n\t\t\tbreak;\n", i - 1, arg) > systracetmp
487 if (index(arg, "*") > 0 || arg == "caddr_t")
488 printf("\t\tuarg[%d] = (intptr_t) p->%s; /* %s */\n", \
490 argname[i], arg) > systrace
491 else if (arg == "union l_semun")
492 printf("\t\tuarg[%d] = p->%s.buf; /* %s */\n", \
494 argname[i], arg) > systrace
495 else if (substr(arg, 1, 1) == "u" || arg == "size_t")
496 printf("\t\tuarg[%d] = p->%s; /* %s */\n", \
498 argname[i], arg) > systrace
500 printf("\t\tiarg[%d] = p->%s; /* %s */\n", \
502 argname[i], arg) > systrace
504 printf("\t\tdefault:\n\t\t\tbreak;\n\t\t};\n") > systracetmp
506 printf("\t\tif (ndx == 0 || ndx == 1)\n") > systraceret
507 printf("\t\t\tp = \"%s\";\n", syscallret) > systraceret
508 printf("\t\tbreak;\n") > systraceret
510 printf("\t\t*n_args = %d;\n\t\tbreak;\n\t}\n", argc) > systrace
511 printf("\t\tbreak;\n") > systracetmp
512 if (argc != 0 && !flag("NOARGS") && !flag("NOPROTO") && \
514 printf("struct %s {\n", argalias) > sysarg
515 for (i = 1; i <= argc; i++)
516 printf("\tchar %s_l_[PADL_(%s)]; " \
517 "%s %s; char %s_r_[PADR_(%s)];\n",
518 argname[i], argtype[i],
519 argtype[i], argname[i],
520 argname[i], argtype[i]) > sysarg
521 printf("};\n") > sysarg
523 else if (!flag("NOARGS") && !flag("NOPROTO") && !flag("NODEF"))
524 printf("struct %s {\n\tregister_t dummy;\n};\n",
526 if (!flag("NOPROTO") && !flag("NODEF")) {
527 if (funcname == "nosys" || funcname == "lkmnosys" ||
528 funcname == "sysarch" || funcname ~ /^freebsd/ ||
529 funcname ~ /^linux/ || funcname ~ /^cloudabi/) {
530 printf("%s\t%s(struct thread *, struct %s *)",
531 rettype, funcname, argalias) > sysdcl
533 printf("%s\tsys_%s(struct thread *, struct %s *)",
534 rettype, funcname, argalias) > sysdcl
536 printf(";\n") > sysdcl
537 printf("#define\t%sAUE_%s\t%s\n", syscallprefix,
538 funcalias, auditev) > sysaue
540 printf("\t{ %s, (sy_call_t *)", argssize) > sysent
541 column = 8 + 2 + length(argssize) + 15
543 printf("lkmressys, AUE_NULL, NULL, 0, 0, %s, SY_THR_ABSENT },", flags) > sysent
544 column = column + length("lkmressys") + length("AUE_NULL") + 3
546 if (funcname == "nosys" || funcname == "sysarch" ||
547 funcname == "lkmnosys" || funcname ~ /^freebsd/ ||
548 funcname ~ /^linux/ || funcname ~ /^cloudabi/) {
549 printf("%s, %s, NULL, 0, 0, %s, %s },", funcname, auditev, flags, thr_flag) > sysent
550 column = column + length(funcname) + length(auditev) + length(flags) + 3
552 printf("sys_%s, %s, NULL, 0, 0, %s, %s },", funcname, auditev, flags, thr_flag) > sysent
553 column = column + length(funcname) + length(auditev) + length(flags) + 3 + 4
556 align_sysent_comment(column)
557 printf("/* %d = %s */\n", syscall, funcalias) > sysent
558 printf("\t\"%s\",\t\t\t/* %d = %s */\n",
559 funcalias, syscall, funcalias) > sysnames
560 if (!flag("NODEF")) {
561 printf("#define\t%s%s\t%d\n", syscallprefix,
562 funcalias, syscall) > syshdr
563 printf(" \\\n\t%s.o", funcalias) > sysmk
568 type("COMPAT") || type("COMPAT4") || type("COMPAT6") || \
569 type("COMPAT7") || type("COMPAT10") || type("COMPAT11") {
570 if (flag("COMPAT")) {
573 outdcl = syscompatdcl
577 } else if (flag("COMPAT4")) {
580 outdcl = syscompat4dcl
584 } else if (flag("COMPAT6")) {
587 outdcl = syscompat6dcl
591 } else if (flag("COMPAT7")) {
594 outdcl = syscompat7dcl
598 } else if (flag("COMPAT10")) {
601 outdcl = syscompat10dcl
603 prefix = "freebsd10_"
605 } else if (flag("COMPAT11")) {
608 outdcl = syscompat11dcl
610 prefix = "freebsd11_"
614 if (argc != 0 && !flag("NOARGS") && !flag("NOPROTO") && \
616 printf("struct %s {\n", argalias) > out
617 for (i = 1; i <= argc; i++)
618 printf("\tchar %s_l_[PADL_(%s)]; %s %s; " \
619 "char %s_r_[PADR_(%s)];\n",
620 argname[i], argtype[i],
621 argtype[i], argname[i],
622 argname[i], argtype[i]) > out
625 else if (!flag("NOARGS") && !flag("NOPROTO") && !flag("NODEF"))
626 printf("struct %s {\n\tregister_t dummy;\n};\n",
628 if (!flag("NOPROTO") && !flag("NODEF")) {
629 printf("%s\t%s%s(struct thread *, struct %s *);\n",
630 rettype, prefix, funcname, argalias) > outdcl
631 printf("#define\t%sAUE_%s%s\t%s\n", syscallprefix,
632 prefix, funcname, auditev) > sysaue
635 printf("\t{ %s, (sy_call_t *)%s, %s, NULL, 0, 0, 0, SY_THR_ABSENT },",
636 "0", "lkmressys", "AUE_NULL") > sysent
637 align_sysent_comment(8 + 2 + length("0") + 15 + \
638 length("lkmressys") + length("AUE_NULL") + 3)
640 printf("\t{ %s(%s,%s), %s, NULL, 0, 0, %s, %s },",
641 wrap, argssize, funcname, auditev, flags, thr_flag) > sysent
642 align_sysent_comment(8 + 9 + length(argssize) + 1 + \
643 length(funcname) + length(auditev) + \
646 printf("/* %d = %s %s */\n", syscall, descr, funcalias) > sysent
647 printf("\t\"%s.%s\",\t\t/* %d = %s %s */\n",
648 wrap, funcalias, syscall, descr, funcalias) > sysnames
649 # Do not provide freebsdN_* symbols in libc for < FreeBSD 7
650 if (flag("COMPAT") || flag("COMPAT4") || flag("COMPAT6")) {
651 printf("\t\t\t\t/* %d is %s %s */\n",
652 syscall, descr, funcalias) > syshdr
653 } else if (!flag("NODEF")) {
654 printf("#define\t%s%s%s\t%d\n", syscallprefix,
655 prefix, funcalias, syscall) > syshdr
656 printf(" \\\n\t%s%s.o", prefix, funcalias) > sysmk
662 printf("\t{ 0, (sy_call_t *)nosys, AUE_NULL, NULL, 0, 0, 0, SY_THR_ABSENT },") > sysent
663 align_sysent_comment(34)
664 printf("/* %d = obsolete %s */\n", syscall, comment) > sysent
665 printf("\t\"obs_%s\",\t\t\t/* %d = obsolete %s */\n",
666 $4, syscall, comment) > sysnames
667 printf("\t\t\t\t/* %d is obsolete %s */\n",
668 syscall, comment) > syshdr
673 while (syscall <= syscall_range[2]) {
674 printf("\t{ 0, (sy_call_t *)nosys, AUE_NULL, NULL, 0, 0, 0, SY_THR_ABSENT },\t\t\t/* %d = %s */\n",
675 syscall, comment) > sysent
676 printf("\t\"#%d\",\t\t\t/* %d = %s */\n",
677 syscall, syscall, comment) > sysnames
683 printf "%s: line %d: unrecognized keyword %s\n", infile, NR, $3
687 printf "\n#define AS(name) (sizeof(struct name) / sizeof(register_t))\n" > sysinc
690 printf "\n#ifdef %s\n", compat > sysinc
691 printf "#define compat(n, name) n, (sy_call_t *)__CONCAT(o,name)\n" > sysinc
692 printf "#else\n" > sysinc
693 printf "#define compat(n, name) 0, (sy_call_t *)nosys\n" > sysinc
694 printf "#endif\n" > sysinc
698 printf "\n#ifdef %s\n", compat4 > sysinc
699 printf "#define compat4(n, name) n, (sy_call_t *)__CONCAT(freebsd4_,name)\n" > sysinc
700 printf "#else\n" > sysinc
701 printf "#define compat4(n, name) 0, (sy_call_t *)nosys\n" > sysinc
702 printf "#endif\n" > sysinc
706 printf "\n#ifdef %s\n", compat6 > sysinc
707 printf "#define compat6(n, name) n, (sy_call_t *)__CONCAT(freebsd6_,name)\n" > sysinc
708 printf "#else\n" > sysinc
709 printf "#define compat6(n, name) 0, (sy_call_t *)nosys\n" > sysinc
710 printf "#endif\n" > sysinc
714 printf "\n#ifdef %s\n", compat7 > sysinc
715 printf "#define compat7(n, name) n, (sy_call_t *)__CONCAT(freebsd7_,name)\n" > sysinc
716 printf "#else\n" > sysinc
717 printf "#define compat7(n, name) 0, (sy_call_t *)nosys\n" > sysinc
718 printf "#endif\n" > sysinc
720 if (ncompat10 != 0) {
721 printf "\n#ifdef %s\n", compat10 > sysinc
722 printf "#define compat10(n, name) n, (sy_call_t *)__CONCAT(freebsd10_,name)\n" > sysinc
723 printf "#else\n" > sysinc
724 printf "#define compat10(n, name) 0, (sy_call_t *)nosys\n" > sysinc
725 printf "#endif\n" > sysinc
727 if (ncompat11 != 0) {
728 printf "\n#ifdef %s\n", compat11 > sysinc
729 printf "#define compat11(n, name) n, (sy_call_t *)__CONCAT(freebsd11_,name)\n" > sysinc
730 printf "#else\n" > sysinc
731 printf "#define compat11(n, name) 0, (sy_call_t *)nosys\n" > sysinc
732 printf "#endif\n" > sysinc
735 printf("\n#endif /* %s */\n\n", compat) > syscompatdcl
736 printf("\n#endif /* %s */\n\n", compat4) > syscompat4dcl
737 printf("\n#endif /* %s */\n\n", compat6) > syscompat6dcl
738 printf("\n#endif /* %s */\n\n", compat7) > syscompat7dcl
739 printf("\n#endif /* %s */\n\n", compat10) > syscompat10dcl
740 printf("\n#endif /* %s */\n\n", compat11) > syscompat11dcl
742 printf("\n#undef PAD_\n") > sysprotoend
743 printf("#undef PADL_\n") > sysprotoend
744 printf("#undef PADR_\n") > sysprotoend
745 printf("\n#endif /* !%s */\n", sysproto_h) > sysprotoend
748 printf("};\n") > sysent
749 printf("};\n") > sysnames
750 printf("#define\t%sMAXSYSCALL\t%d\n", syscallprefix, syscall) \
752 printf "\tdefault:\n\t\t*n_args = 0;\n\t\tbreak;\n\t};\n}\n" > systrace
753 printf "\tdefault:\n\t\tbreak;\n\t};\n\tif (p != NULL)\n\t\tstrlcpy(desc, p, descsz);\n}\n" > systracetmp
754 printf "\tdefault:\n\t\tbreak;\n\t};\n\tif (p != NULL)\n\t\tstrlcpy(desc, p, descsz);\n}\n" > systraceret
757 cat $sysinc $sysent >> $syssw
758 cat $sysarg $sysdcl \
759 $syscompat $syscompatdcl \
760 $syscompat4 $syscompat4dcl \
761 $syscompat6 $syscompat6dcl \
762 $syscompat7 $syscompat7dcl \
763 $syscompat10 $syscompat10dcl \
764 $syscompat11 $syscompat11dcl \
765 $sysaue $sysprotoend > $sysproto
766 cat $systracetmp >> $systrace
767 cat $systraceret >> $systrace