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