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