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