xref: /dragonfly/sys/kern/makesyscalls.sh (revision 279dd846) 
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
5set -e
6
7# name of compat option:
8compat=COMPAT_43
9
10# output files:
11sysnames="syscalls.c"
12sysproto="../sys/sysproto.h"
13sysunion="../sys/sysunion.h"
14sysproto_h=_SYS_SYSPROTO_H_
15syshdr="../sys/syscall.h"
16sysmk="../sys/syscall.mk"
17syssw="init_sysent.c"
18syscallprefix="SYS_"
19switchname="sysent"
20namesname="syscallnames"
21
22# tmp files:
23sysdcl="sysent.dcl.$$"
24syscompat="sysent.compat.$$"
25syscompatdcl="sysent.compatdcl.$$"
26sysent="sysent.switch.$$"
27sysinc="sysinc.switch.$$"
28sysarg="sysarg.switch.$$"
29sysun="sysunion.switch.$$"
30
31trap "rm $sysdcl $syscompat $syscompatdcl $sysent $sysinc $sysarg $sysun" 0
32
33touch $sysdcl $syscompat $syscompatdcl $sysent $sysinc $sysarg $sysun
34
35case $# in
36    0)	echo "Usage: $0 input-file <config-file>" 1>&2
37	exit 1
38	;;
39esac
40
41if [ -n "$2" -a -f "$2" ]; then
42	. $2
43fi
44
45sed -e '
46s/\$//g
47:join
48	/\\$/{a\
49
50	N
51	s/\\\n//
52	b join
53	}
542,${
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
438cat $sysinc $sysent >> $syssw
439cat $sysarg $syscompat $syscompatdcl $sysdcl > $sysproto
440cat $sysun > $sysunion
441