Merge from vendor branch NTPD:
[dragonfly.git] / sys / kern / makesyscalls.sh
1 #! /bin/sh -
2 #       @(#)makesyscalls.sh     8.1 (Berkeley) 6/10/93
3 # $FreeBSD: src/sys/kern/makesyscalls.sh,v 1.39.2.4 2001/10/20 09:01:24 marcel Exp $
4 # $DragonFly: src/sys/kern/makesyscalls.sh,v 1.11 2004/08/12 19:59:30 eirikn Exp $
5
6 set -e
7
8 # name of compat option:
9 compat=COMPAT_43
10
11 # output files:
12 sysnames="syscalls.c"
13 sysproto="../sys/sysproto.h"
14 sysunion="../sys/sysunion.h"
15 sysproto_h=_SYS_SYSPROTO_H_
16 syshdr="../sys/syscall.h"
17 sysmk="../sys/syscall.mk"
18 syssw="init_sysent.c"
19 syshide="../sys/syscall-hide.h"
20 sysargs="../sys/syscall-args"
21 syscallprefix="SYS_"
22 switchname="sysent"
23 namesname="syscallnames"
24
25 # tmp files:
26 sysdcl="sysent.dcl.$$"
27 syscompat="sysent.compat.$$"
28 syscompatdcl="sysent.compatdcl.$$"
29 sysent="sysent.switch.$$"
30 sysinc="sysinc.switch.$$"
31 sysarg="sysarg.switch.$$"
32 sysun="sysunion.switch.$$"
33
34 trap "rm $sysdcl $syscompat $syscompatdcl $sysent $sysinc $sysarg $sysun" 0
35
36 touch $sysdcl $syscompat $syscompatdcl $sysent $sysinc $sysarg $sysun
37
38 case $# in
39     0)  echo "Usage: $0 input-file <config-file>" 1>&2
40         exit 1
41         ;;
42 esac
43
44 if [ -n "$2" -a -f "$2" ]; then
45         . $2
46 fi
47
48 sed -e '
49 s/\$//g
50 :join
51         /\\$/{a\
52
53         N
54         s/\\\n//
55         b join
56         }
57 2,${
58         /^#/!s/\([{}()*,]\)/ \1 /g
59 }
60 ' < $1 | awk "
61         BEGIN {
62                 sysdcl = \"$sysdcl\"
63                 sysproto = \"$sysproto\"
64                 sysproto_h = \"$sysproto_h\"
65                 syscompat = \"$syscompat\"
66                 syscompatdcl = \"$syscompatdcl\"
67                 sysent = \"$sysent\"
68                 syssw = \"$syssw\"
69                 sysinc = \"$sysinc\"
70                 sysarg = \"$sysarg\"
71                 sysun = \"$sysun\"
72                 sysnames = \"$sysnames\"
73                 syshdr = \"$syshdr\"
74                 sysmk = \"$sysmk\"
75                 compat = \"$compat\"
76                 syshide = \"$syshide\"
77                 syscallprefix = \"$syscallprefix\"
78                 switchname = \"$switchname\"
79                 namesname = \"$namesname\"
80                 infile = \"$1\"
81                 sysargs = \"$sysargs\"
82                 "'
83
84                 printf "/*\n * System call switch table.\n *\n" > syssw
85                 printf " * DO NOT EDIT-- this file is automatically generated.\n" > syssw
86                 printf " * \$\DragonFly\$\n" > syssw
87
88                 printf "/*\n * System call prototypes.\n *\n" > sysarg
89                 printf " * DO NOT EDIT-- this file is automatically generated.\n" > sysarg
90                 printf " * \$\DragonFly\$\n" > sysarg
91
92                 printf "\n#ifdef %s\n\n", compat > syscompat
93
94                 printf "/*\n * System call names.\n *\n" > sysnames
95                 printf " * DO NOT EDIT-- this file is automatically generated.\n" > sysnames
96                 printf " * \$\DragonFly\$\n" > sysnames
97
98                 printf "/*\n * System call numbers.\n *\n" > syshdr
99                 printf " * DO NOT EDIT-- this file is automatically generated.\n" > syshdr
100                 printf " * \$\DragonFly\$\n" > syshdr
101                 printf "# DragonFly system call names.\n" > sysmk
102                 printf "# DO NOT EDIT-- this file is automatically generated.\n" > sysmk
103                 printf "# \$\DragonFly\$\n" > sysmk
104                 printf "/*\n * System call hiders.\n *\n" > syshide
105                 printf " * DO NOT EDIT-- this file is automatically generated.\n" > syshide
106                 printf " * \$\DragonFly\$\n" > syshide
107
108                 printf "/*\n * Union of syscall args for messaging.\n *\n" > sysun
109                 printf " * DO NOT EDIT-- this file is automatically generated.\n" > sysun
110                 printf " * \$\DragonFly\$\n" > sysun
111                 printf "\n#ifdef _KERNEL\n\n" > sysdcl
112                 printf "\n#ifdef _KERNEL\n\n" > syscompatdcl
113
114                 printf "# System call argument table.\n" > sysargs
115                 printf "# DO NOT EDIT-- this file is automatically generated.\n" > sysargs
116                 printf "# \$\DragonFly\$\n" > sysargs
117         }
118         NR == 1 {
119                 gsub("[$]DragonFly: ", "", $0)
120                 gsub(" [$]", "", $0)
121
122                 printf " * created from%s\n */\n\n", $0 > syssw
123
124                 printf "\n/* The casts are bogus but will do for now. */\n" > sysent
125                 printf "struct sysent %s[] = {\n",switchname > sysent
126
127                 printf " * created from%s\n */\n\n", $0 > sysarg
128                 printf "#ifndef %s\n", sysproto_h > sysarg
129                 printf "#define\t%s\n\n", sysproto_h > sysarg
130                 printf "#include <sys/signal.h>\n\n" > sysarg
131                 printf "#include <sys/acl.h>\n\n" > sysarg
132                 printf "#include <sys/msgport.h>\n\n" > sysarg
133                 printf "#include <sys/sysmsg.h>\n\n" > sysarg
134                 printf "#define\tPAD_(t)\t(sizeof(register_t) <= sizeof(t) ? \\\n" > sysarg
135                 printf "\t\t0 : sizeof(register_t) - sizeof(t))\n\n" > sysarg
136
137                 printf " * created from%s\n */\n\n", $0 > sysnames
138                 printf "char *%s[] = {\n", namesname > sysnames
139
140                 printf " * created from%s\n */\n\n", $0 > syshdr
141
142                 printf "# created from%s\nMIASM = ", $0 > sysmk
143
144                 printf " * created from%s\n */\n\n", $0 > syshide
145                 printf " * created from%s\n */\n\n", $0 > sysun
146                 printf "union sysunion {\n" > sysun
147                 printf "#ifdef _KERNEL /* header only applies in kernel */\n" > sysun
148                 printf "\tstruct\tlwkt_msg lmsg;\n" > sysun
149                 printf "\tstruct\tsysmsg sysmsg;\n" > sysun
150                 printf "#endif\n" > sysun
151
152                 printf "\n# Created from%s\n\n", $0 > sysargs
153                 next
154         }
155         NF == 0 || $1 ~ /^;/ {
156                 next
157         }
158         $1 ~ /^#[       ]*include/ {
159                 print > sysinc
160                 next
161         }
162         $1 ~ /^#[       ]*if/ {
163                 print > sysent
164                 print > sysdcl
165                 print > sysarg
166                 print > syscompat
167                 print > sysnames
168                 print > syshide
169                 print > sysun
170                 savesyscall = syscall
171                 next
172         }
173         $1 ~ /^#[       ]*else/ {
174                 print > sysent
175                 print > sysdcl
176                 print > sysarg
177                 print > sysun
178                 print > syscompat
179                 print > sysnames
180                 print > syshide
181                 syscall = savesyscall
182                 next
183         }
184         $1 ~ /^#/ {
185                 print > sysent
186                 print > sysdcl
187                 print > sysarg
188                 print > sysun
189                 print > syscompat
190                 print > sysnames
191                 print > syshide
192                 next
193         }
194         syscall != $1 {
195                 printf "%s: line %d: syscall number out of sync at %d\n",
196                     infile, NR, syscall
197                 printf "line is:\n"
198                 print
199                 exit 1
200         }
201         function align_sysent_comment(column) {
202                 printf("\t") > sysent
203                 column = column + 8 - column % 8
204                 while (column < 56) {
205                         printf("\t") > sysent
206                         column = column + 8
207                 }
208         }
209         function parserr(was, wanted) {
210                 printf "%s: line %d: unexpected %s (expected %s)\n",
211                     infile, NR, was, wanted
212                 exit 1
213         }
214         function parseline() {
215                 f=4                     # toss number and type
216                 argc= 0;
217                 argssize = "0"
218                 if ($NF != "}") {
219                         funcalias=$(NF-2)
220                         argalias=$(NF-1)
221                         rettype=$NF
222                         end=NF-3
223                 } else {
224                         funcalias=""
225                         argalias=""
226                         rettype="int"
227                         end=NF
228                 }
229                 if ($2 == "NODEF") {
230                         funcname=$4
231                         argssize = "AS(" $6 ")"
232                         return
233                 }
234                 if ($f != "{")
235                         parserr($f, "{")
236                 f++
237                 if ($end != "}")
238                         parserr($end, "}")
239                 end--
240                 if ($end != ";")
241                         parserr($end, ";")
242                 end--
243                 if ($end != ")")
244                         parserr($end, ")")
245                 end--
246
247                 f++     #function return type
248
249                 funcname=$f
250                 usefuncname=$f
251                 if (funcalias == "")
252                         funcalias = funcname
253                 if (argalias == "") {
254                         argalias = funcname "_args"
255                         if ($2 == "COMPAT") {
256                                 argalias = "o" argalias
257                                 usefuncname = "o" funcname
258                         }
259                 }
260                 f++
261
262                 if ($f != "(")
263                         parserr($f, ")")
264                 f++
265
266                 if (f == end) {
267                         if ($f != "void")
268                                 parserr($f, "argument definition")
269                         return
270                 }
271
272                 while (f <= end) {
273                         argc++
274                         argtype[argc]=""
275                         oldf=""
276                         while (f < end && $(f+1) != ",") {
277                                 if (argtype[argc] != "" && oldf != "*")
278                                         argtype[argc] = argtype[argc]" ";
279                                 argtype[argc] = argtype[argc]$f;
280                                 oldf = $f;
281                                 f++
282                         }
283                         if (argtype[argc] == "")
284                                 parserr($f, "argument definition")
285                         argname[argc]=$f;
286                         f += 2;                 # skip name, and any comma
287                 }
288                 if (argc != 0)
289                         argssize = "AS(" argalias ")"
290         }
291         {       comment = $4
292                 if (NF < 7)
293                         for (i = 5; i <= NF; i++)
294                                 comment = comment " " $i
295         }
296         # if the "MPSAFE" keyword is found, note it and shift the line
297         mpsafe = ""
298         $2 == "MPSAFE" {
299                 for (i = 2; i <= NF; i++)
300                         $i = $(i + 1);
301                 NF -= 1;
302                 mpsafe = "SYF_MPSAFE | "
303         }
304         $2 == "STD" || $2 == "NODEF" || $2 == "NOARGS"  || $2 == "NOPROTO" \
305             || $2 == "NOIMPL" {
306                 parseline()
307                 if ((!nosys || funcname != "nosys") && \
308                     (funcname != "lkmnosys")) {
309                         if (argc != 0 && $2 != "NOARGS" && $2 != "NOPROTO") {
310                                 printf("\tstruct\t%s %s;\n", argalias, usefuncname) > sysun
311                                 printf("struct\t%s {\n", argalias) > sysarg
312                                 printf("#ifdef _KERNEL\n") > sysarg
313                                 printf("\tstruct sysmsg sysmsg;\n") > sysarg
314                                 printf("#endif\n") > sysarg
315                                 printf("\tunion usrmsg usrmsg;\n") > sysarg
316                                 for (i = 1; i <= argc; i++)
317                                         printf("\t%s\t%s;\tchar %s_[PAD_(%s)];\n",
318                                             argtype[i], argname[i],
319                                             argname[i], argtype[i]) > sysarg
320                                 printf("};\n") > sysarg
321                         }
322                         else if ($2 != "NOARGS" && $2 != "NOPROTO" && \
323                             $2 != "NODEF") {
324                                 printf("\tstruct\t%s %s;\n", argalias, usefuncname) > sysun
325                                 printf("struct\t%s {\n", argalias) > sysarg
326                                 printf("#ifdef _KERNEL\n") > sysarg
327                                 printf("\tstruct sysmsg sysmsg;\n") > sysarg
328                                 printf("#endif\n") > sysarg
329                                 printf("\tunion usrmsg usrmsg;\n") > sysarg
330                                 printf("\tregister_t dummy;\n") > sysarg
331                                 printf("};\n") > sysarg
332                         }
333                 }
334                 if (($2 != "NOPROTO" && $2 != "NODEF" && \
335                     (funcname != "nosys" || !nosys)) || \
336                     (funcname == "lkmnosys" && !lkmnosys) || \
337                     funcname == "lkmressys") {
338                         printf("%s\t%s (struct %s *)",
339                             rettype, funcname, argalias) > sysdcl
340                         printf(";\n") > sysdcl
341                 }
342                 if (funcname == "nosys")
343                         nosys = 1
344                 if (funcname == "lkmnosys")
345                         lkmnosys = 1
346                 printf("\t{ %s%s, (sy_call_t *)", mpsafe, argssize) > sysent
347                 column = 8 + 2 + length(mpsafe) + length(argssize) + 15
348                 if ($2 != "NOIMPL") {
349                         printf("%s },", funcname) > sysent
350                         column = column + length(funcname) + 3
351                 } else {
352                         printf("%s },", "nosys") > sysent
353                         column = column + length("nosys") + 3
354                 }
355                 align_sysent_comment(column)
356                 printf("/* %d = %s */\n", syscall, funcalias) > sysent
357                 printf("\t\"%s\",\t\t\t/* %d = %s */\n",
358                     funcalias, syscall, funcalias) > sysnames
359                 if ($2 != "NODEF") {
360                         printf("#define\t%s%s\t%d\n", syscallprefix,
361                             funcalias, syscall) > syshdr
362                         printf(" \\\n\t%s.o", funcalias) > sysmk
363                         printf("%s\t%s\t%s\t%s", rettype, funcalias, usefuncname, argalias) > sysargs
364                         for (i = 1; i <= argc; i++)
365                                 printf("\t%s\t%s", argtype[i], argname[i]) > sysargs
366                         printf("\n") > sysargs
367                 }
368                 if ($3 != "NOHIDE")
369                         printf("HIDE_%s(%s)\n", $3, funcname) > syshide
370                 syscall++
371                 next
372         }
373         $2 == "COMPAT" || $2 == "CPT_NOA" {
374                 ncompat++
375                 parseline()
376                 if (argc != 0 && $2 != "CPT_NOA") {
377                         printf("#ifdef %s\n", compat) > sysun
378                         printf("\tstruct\t%s %s;\n", argalias, usefuncname) > sysun
379                         printf("#endif\n") > sysun
380                         printf("struct\t%s {\n", argalias) > syscompat
381                         printf("#ifdef _KERNEL\n") > syscompat
382                         printf("\tstruct sysmsg sysmsg;\n") > syscompat
383                         printf("#endif\n") > syscompat
384                         printf("\tunion usrmsg usrmsg;\n") > syscompat
385                         for (i = 1; i <= argc; i++)
386                                 printf("\t%s\t%s;\tchar %s_[PAD_(%s)];\n",
387                                     argtype[i], argname[i],
388                                     argname[i], argtype[i]) > syscompat
389                         printf("};\n") > syscompat
390                 }
391                 else if($2 != "CPT_NOA") {
392                         printf("\tstruct\t%s %s;\n", argalias, usefuncname) > sysun
393                         printf("struct\t%s {\n", argalias) > sysarg
394                         printf("#ifdef _KERNEL\n") > sysarg
395                         printf("\tstruct sysmsg sysmsg;\n") > sysarg
396                         printf("#endif\n") > sysarg
397                         printf("\tunion usrmsg usrmsg;\n") > sysarg
398                         printf("\tregister_t dummy;\n") > sysarg
399                         printf("};\n") > sysarg
400                 }
401                 printf("%s\to%s (struct %s *);\n",
402                     rettype, funcname, argalias) > syscompatdcl
403                 printf("\t{ compat(%s%s,%s) },",
404                     mpsafe, argssize, funcname) > sysent
405                 align_sysent_comment(8 + 9 + length(mpsafe) + \
406                     length(argssize) + 1 + length(funcname) + 4)
407                 printf("/* %d = old %s */\n", syscall, funcalias) > sysent
408                 printf("\t\"old.%s\",\t\t/* %d = old %s */\n",
409                     funcalias, syscall, funcalias) > sysnames
410                 printf("\t\t\t\t/* %d is old %s */\n",
411                     syscall, funcalias) > syshdr
412                 if ($3 != "NOHIDE")
413                         printf("HIDE_%s(%s)\n", $3, funcname) > syshide
414                 syscall++
415                 next
416         }
417         $2 == "LIBCOMPAT" {
418                 ncompat++
419                 parseline()
420                 printf("%s\to%s();\n", rettype, funcname) > syscompatdcl
421                 printf("\t{ compat(%s%s,%s) },",
422                     mpsafe, argssize, funcname) > sysent
423                 align_sysent_comment(8 + 9 + length(mpsafe) + \
424                     length(argssize) + 1 + length(funcname) + 4)
425                 printf("/* %d = old %s */\n", syscall, funcalias) > sysent
426                 printf("\t\"old.%s\",\t\t/* %d = old %s */\n",
427                     funcalias, syscall, funcalias) > sysnames
428                 printf("#define\t%s%s\t%d\t/* compatibility; still used by libc */\n",
429                     syscallprefix, funcalias, syscall) > syshdr
430                 printf(" \\\n\t%s.o", funcalias) > sysmk
431                 printf("%s\t%s\t%s\t%s", rettype, funcalias, usefuncname, argalias) > sysargs
432                 for (i = 1; i <= argc; i++)
433                         printf("\t%s\t%s", argtype[i], argname[i]) > sysargs
434                 printf("\n") > sysargs
435                 if ($3 != "NOHIDE")
436                         printf("HIDE_%s(%s)\n", $3, funcname) > syshide
437                 syscall++
438                 next
439         }
440         $2 == "OBSOL" {
441                 printf("\t{ 0, (sy_call_t *)nosys },") > sysent
442                 align_sysent_comment(34)
443                 printf("/* %d = obsolete %s */\n", syscall, comment) > sysent
444                 printf("\t\"obs_%s\",\t\t\t/* %d = obsolete %s */\n",
445                     $4, syscall, comment) > sysnames
446                 printf("\t\t\t\t/* %d is obsolete %s */\n",
447                     syscall, comment) > syshdr
448                 if ($3 != "NOHIDE")
449                         printf("HIDE_%s(%s)\n", $3, $4) > syshide
450                 syscall++
451                 next
452         }
453         $2 == "UNIMPL" {
454                 printf("\t{ 0, (sy_call_t *)nosys },\t\t\t/* %d = %s */\n",
455                     syscall, comment) > sysent
456                 printf("\t\"#%d\",\t\t\t/* %d = %s */\n",
457                     syscall, syscall, comment) > sysnames
458                 if ($3 != "NOHIDE")
459                         printf("HIDE_%s(%s)\n", $3, $4) > syshide
460                 syscall++
461                 next
462         }
463         {
464                 printf "%s: line %d: unrecognized keyword %s\n", infile, NR, $2
465                 exit 1
466         }
467         END {
468                 printf "\n#define AS(name) ((sizeof(struct name) - sizeof(struct sysmsg) - sizeof(union usrmsg)) / sizeof(register_t))\n" > sysinc
469                 if (ncompat != 0) {
470                         printf "#include \"opt_compat.h\"\n\n" > syssw
471                         printf "\n#ifdef %s\n", compat > sysinc
472                         printf "#define compat(n, name) n, (sy_call_t *)__CONCAT(o,name)\n" > sysinc
473                         printf "#else\n" > sysinc
474                         printf "#define compat(n, name) 0, (sy_call_t *)nosys\n" > sysinc
475                         printf "#endif\n" > sysinc
476                 }
477
478                 printf("\n#endif /* _KERNEL */\n") > syscompatdcl
479                 printf("\n#endif /* %s */\n\n", compat) > syscompatdcl
480                 printf("#undef PAD_\n") > syscompatdcl
481                 printf("\n#endif /* !%s */\n", sysproto_h) > syscompatdcl
482
483                 printf("\n") > sysmk
484                 printf("};\n") > sysent
485                 printf("};\n") > sysnames
486                 printf("};\n") > sysun
487                 printf("\n#endif /* _KERNEL */\n") > sysdcl
488                 printf("#define\t%sMAXSYSCALL\t%d\n", syscallprefix, syscall) \
489                     > syshdr
490         } '
491
492 cat $sysinc $sysent >> $syssw
493 cat $sysarg $sysdcl $syscompat $syscompatdcl > $sysproto
494 cat $sysun > $sysunion