Rewrite ninja generation scripts in Lua

2 files changed, 278 insertions, 255 deletions

diff --git a/pkg/strace/gen.lua b/pkg/strace/gen.lua
new file mode 100644
index 00000000..187ba8f1
--- /dev/null
+++ b/pkg/strace/gen.lua
@@ -0,0 +1,278 @@
+cflags{
+	'-D HAVE_CONFIG_H',
+	'-I include',
+	'-I $dir',
+	-- it is important that the arch-specific directory is searched first
+	'-I $srcdir/linux/x86_64',
+	'-I $srcdir/linux',
+	'-I $srcdir',
+	'-I $outdir',
+}
+
+build('cc', '$outdir/ioctl_iocdef.i', '$srcdir/ioctl_iocdef.c', {
+	cflags='$cflags -P -E -MT $outdir/ioctl_iocdef.i',
+})
+build('sed', '$outdir/ioctl_iocdef.h', '$outdir/ioctl_iocdef.i', {
+	expr=[[-n 's/^DEFINE HOST/#define /p']],
+})
+
+sub('tools.ninja', function()
+	toolchain 'host'
+	cflags{
+		'-D X86_64=1',
+		'-I $srcdir/linux/x86_64',
+		'-I $srcdir/linux',
+		'-I $outdir',
+	}
+
+	for i = 0, 2 do
+		build('cat', '$outdir/ioctls_all'..i..'.h', {
+			'$srcdir/linux/x86_64/ioctls_inc'..i..'.h',
+			'$srcdir/linux/x86_64/ioctls_arch'..i..'.h',
+		})
+		build('cc', '$outdir/ioctlsort'..i..'.c.o', {
+			'$srcdir/ioctlsort.c',
+			'|', '$outdir/ioctl_iocdef.h', '$outdir/ioctls_all'..i..'.h',
+		}, {cflags=string.format([[$cflags -D 'IOCTLSORT_INC="ioctls_all%d.h"']], i)})
+		exe('ioctlsort'..i, {'ioctlsort'..i..'.c.o'})
+		rule('ioctlsort'..i, '$outdir/ioctlsort'..i..' >$out.tmp && mv $out.tmp $out')
+		build('ioctlsort'..i, '$outdir/ioctlent'..i..'.h', {'|', '$outdir/ioctlsort'..i})
+	end
+end)
+
+local mpers = lines('mpers.txt')
+for _, f in ipairs(mpers) do
+	build('cc', '$outdir/'..f..'.mpers.i', '$srcdir/'..f, {
+		cflags='$cflags -P -E -MT $outdir/'..f..'.mpers.i -DIN_MPERS_BOOTSTRAP',
+	})
+end
+
+local function makempers(name, script)
+	build('awk', '$outdir/'..name, {expand{'$outdir/', mpers, '.mpers.i'}, '|', '$dir/'..script}, {
+		expr='-f $dir/'..script,
+	})
+end
+
+makempers('printers.h', 'printers.awk')
+makempers('native_printer_decls.h', 'printerdecls.awk')
+makempers('native_printer_defs.h', 'printerdefs.awk')
+
+build('cc', '$outdir/syscallent.i', '$srcdir/linux/x86_64/syscallent.h', {
+	cflags='$cflags -P -E -MT $outdir/syscallent.i',
+})
+build('awk', '$outdir/scno-syscallent.h', {'$outdir/syscallent.i', '|', '$dir/scno.awk'}, {
+	expr='-f $dir/scno.awk',
+})
+build('cat', '$outdir/scno.h', {'$srcdir/scno.head', '$outdir/scno-syscallent.h'})
+
+-- this seems to be enough syscall headers to build
+local syscalls = expand{'$srcdir/linux/', {
+	'subcall.h',
+	'arm/syscallent.h',
+	'32/syscallent.h',
+	'64/syscallent.h',
+	'i386/syscallent.h',
+	'x86_64/syscallent.h',
+}}
+build('awk', '$outdir/sen.h', {syscalls, '|', '$dir/sen.awk'}, {
+	expr='-f $dir/sen.awk',
+})
+
+local libsrcs = {
+	'fstatfs.c',
+	'fstatfs64.c',
+	'ipc.c',
+	'sigreturn.c',
+	'socketcall.c',
+	'statfs.c',
+	'statfs64.c',
+	'sync_file_range.c',
+	'sync_file_range2.c',
+	'upeek.c',
+	'upoke.c',
+}
+local srcs = {
+	'access.c',
+	'affinity.c',
+	'aio.c',
+	'alpha.c',
+	'bjm.c',
+	'block.c',
+	'bpf.c',
+	'btrfs.c',
+	'cacheflush.c',
+	'capability.c',
+	'chdir.c',
+	'chmod.c',
+	'clone.c',
+	'copy_file_range.c',
+	'count.c',
+	'desc.c',
+	'dirent.c',
+	'dirent64.c',
+	'dm.c',
+	'dyxlat.c',
+	'epoll.c',
+	'evdev.c',
+	'eventfd.c',
+	'execve.c',
+	'fadvise.c',
+	'fallocate.c',
+	'fanotify.c',
+	'fchownat.c',
+	'fcntl.c',
+	'fetch_seccomp_fprog.c',
+	'fetch_struct_flock.c',
+	'fetch_struct_mmsghdr.c',
+	'fetch_struct_msghdr.c',
+	'fetch_struct_stat.c',
+	'fetch_struct_stat64.c',
+	'fetch_struct_statfs.c',
+	'file_handle.c',
+	'file_ioctl.c',
+	'fs_x_ioctl.c',
+	'flock.c',
+	'futex.c',
+	'get_robust_list.c',
+	'getcpu.c',
+	'getcwd.c',
+	'getrandom.c',
+	'hdio.c',
+	'hostname.c',
+	'inotify.c',
+	'io.c',
+	'ioctl.c',
+	'ioperm.c',
+	'iopl.c',
+	'ioprio.c',
+	'ipc_msg.c',
+	'ipc_msgctl.c',
+	'ipc_sem.c',
+	'ipc_shm.c',
+	'ipc_shmctl.c',
+	'kcmp.c',
+	'kexec.c',
+	'keyctl.c',
+	'ldt.c',
+	'link.c',
+	'lookup_dcookie.c',
+	'loop.c',
+	'lseek.c',
+	'mem.c',
+	'membarrier.c',
+	'memfd_create.c',
+	'mknod.c',
+	'mmsghdr.c',
+	'mount.c',
+	'mq.c',
+	'msghdr.c',
+	'mtd.c',
+	'net.c',
+	'netlink.c',
+	'netlink_sock_diag.c',
+	'nlattr.c',
+	'nsfs.c',
+	'numa.c',
+	'oldstat.c',
+	'open.c',
+	'or1k_atomic.c',
+	'pathtrace.c',
+	'perf.c',
+	'personality.c',
+	'pkeys.c',
+	'poll.c',
+	'prctl.c',
+	'print_dev_t.c',
+	'print_mq_attr.c',
+	'print_msgbuf.c',
+	'print_sg_req_info.c',
+	'print_sigevent.c',
+	'print_statfs.c',
+	'print_struct_stat.c',
+	'print_time.c',
+	'print_timespec.c',
+	'print_timeval.c',
+	'print_timex.c',
+	'printmode.c',
+	'printrusage.c',
+	'printsiginfo.c',
+	'process.c',
+	'process_vm.c',
+	'ptp.c',
+	'qualify.c',
+	'quota.c',
+	'readahead.c',
+	'readlink.c',
+	'reboot.c',
+	'renameat.c',
+	'resource.c',
+	'rt_sigframe.c',
+	'rt_sigreturn.c',
+	'rtc.c',
+	'sched.c',
+	'scsi.c',
+	'seccomp.c',
+	'sendfile.c',
+	'sg_io_v3.c',
+	'sg_io_v4.c',
+	'sigaltstack.c',
+	'signal.c',
+	'signalfd.c',
+	'sock.c',
+	'sockaddr.c',
+	'socketutils.c',
+	'sram_alloc.c',
+	'stat.c',
+	'stat64.c',
+	'statx.c',
+	'strace.c',
+	'swapon.c',
+	'syscall.c',
+	'sysctl.c',
+	'sysinfo.c',
+	'syslog.c',
+	'sysmips.c',
+	'term.c',
+	'time.c',
+	'times.c',
+	'truncate.c',
+	'ubi.c',
+	'uid.c',
+	'uid16.c',
+	'umask.c',
+	'umount.c',
+	'uname.c',
+	'userfaultfd.c',
+	'ustat.c',
+	'util.c',
+	'utime.c',
+	'utimes.c',
+	'v4l2.c',
+	'wait.c',
+	'xattr.c',
+	'xlat.c',
+	'xmalloc.c',
+}
+
+build('sed', '$outdir/sys_func.h', expand{'$srcdir/', {libsrcs, srcs}}, {
+	expr=[[-n 's/^SYS_FUNC(.*/extern &;/p']],
+})
+
+pkg.deps = {
+	'$outdir/ioctlent0.h',
+	'$outdir/ioctlent1.h',
+	'$outdir/ioctlent2.h',
+	'$outdir/native_printer_decls.h',
+	'$outdir/native_printer_defs.h',
+	'$outdir/printers.h',
+	'$outdir/scno.h',
+	'$outdir/sen.h',
+	'$outdir/sys_func.h',
+}
+
+lib('libstrace.a', libsrcs, {'$outdir/printers.h'})
+exe('strace', {srcs, 'libstrace.a'})
+file('bin/strace', '755', '$outdir/strace')
+man{'strace.1'}
+
+fetch 'curl'
diff --git a/pkg/strace/gen.rc b/pkg/strace/gen.rc
deleted file mode 100644
index cdf3f035..00000000
--- a/pkg/strace/gen.rc
+++ /dev/null
@@ -1,255 +0,0 @@
-# it is important that the arch-specific directory is searched first
-cflags\
-	-D HAVE_CONFIG_H\
-	-I include\
-	-I '$dir' \
-	-I '$srcdir'/linux/x86_64\
-	-I '$srcdir'/linux\
-	-I '$srcdir' \
-	-I '$outdir'
-
-build '$outdir'/ioctl_iocdef.i cc '$srcdir'/ioctl_iocdef.c ; with\
-	cflags '$cflags -P -E -MT $outdir/ioctl_iocdef.i'
-build '$outdir'/ioctl_iocdef.h sed '$outdir'/ioctl_iocdef.i ; with\
-	expr '-n ''s/^DEFINE HOST/#define /p'''
-
-{
-	toolchain host
-	cflags\
-		-D 'X86_64=1' \
-		-I '$srcdir'/linux/x86_64\
-		-I '$srcdir'/linux\
-		-I '$outdir'
-
-	for(i in 0 1 2) {
-		build '$outdir'/ioctls_all$i.h cat '$srcdir'/linux/x86_64/^(ioctls_inc$i.h ioctls_arch$i.h)
-		build '$outdir'/ioctlsort$i.c.o cc '$srcdir'/ioctlsort.c '|' '$outdir'/^(ioctl_iocdef.h ioctls_all$i.h) ; with cflags\
-			'$cflags -D IOCTLSORT_INC=''"ioctls_all'$i'.h"'''
-		exe ioctlsort$i ioctlsort$i.c.o
-		rule ioctlsort$i '$outdir/ioctlsort'$i' >$out.tmp && mv $out.tmp $out'
-		build '$outdir'/ioctlent$i.h ioctlsort$i '|' '$outdir'/ioctlsort$i
-	}
-} >tools.ninja ; subninja tools.ninja
-
-mpers=`{grep -v '^#' mpers.txt} ; checkstatus
-for(f in $mpers) {
-	build '$outdir'/$f.mpers.i cc '$srcdir'/$f ; with\
-		cflags '$cflags -P -E -MT $outdir/'$f'.mpers.i -DIN_MPERS_BOOTSTRAP'
-}
-
-fn mpers {
-	build '$outdir'/$1 awk '$outdir'/$mpers.mpers.i '|' '$dir'/$2 ; with\
-		expr '-f $dir/'$2
-}
-
-mpers printers.h printers.awk
-mpers native_printer_decls.h printerdecls.awk
-mpers native_printer_defs.h printerdefs.awk
-
-build '$outdir'/syscallent.i cc '$srcdir'/linux/x86_64/syscallent.h ; with\
-	cflags '$cflags -P -E -MT $outdir/syscallent.i'
-build '$outdir'/scno-syscallent.h awk '$outdir'/syscallent.i '|' '$dir'/scno.awk ; with\
-	expr '-f $dir/scno.awk'
-build '$outdir'/scno.h cat '$srcdir'/scno.head '$outdir'/scno-syscallent.h
-
-# this seems to be enough syscall headers to build
-syscalls=linux/^(subcall.h (arm 32 64 i386 x86_64)^/syscallent.h)
-build '$outdir'/sen.h awk '$srcdir'/$syscalls '|' '$dir'/sen.awk ; with\
-	expr '-f $dir/sen.awk'
-
-libsrcs=(\
-	fstatfs.c\
-	fstatfs64.c\
-	ipc.c\
-	sigreturn.c\
-	socketcall.c\
-	statfs.c\
-	statfs64.c\
-	sync_file_range.c\
-	sync_file_range2.c\
-	upeek.c\
-	upoke.c\
-)
-srcs=(\
-	access.c\
-	affinity.c\
-	aio.c\
-	alpha.c\
-	bjm.c\
-	block.c\
-	bpf.c\
-	btrfs.c\
-	cacheflush.c\
-	capability.c\
-	chdir.c\
-	chmod.c\
-	clone.c\
-	copy_file_range.c\
-	count.c\
-	desc.c\
-	dirent.c\
-	dirent64.c\
-	dm.c\
-	dyxlat.c\
-	epoll.c\
-	evdev.c\
-	eventfd.c\
-	execve.c\
-	fadvise.c\
-	fallocate.c\
-	fanotify.c\
-	fchownat.c\
-	fcntl.c\
-	fetch_seccomp_fprog.c\
-	fetch_struct_flock.c\
-	fetch_struct_mmsghdr.c\
-	fetch_struct_msghdr.c\
-	fetch_struct_stat.c\
-	fetch_struct_stat64.c\
-	fetch_struct_statfs.c\
-	file_handle.c\
-	file_ioctl.c\
-	fs_x_ioctl.c\
-	flock.c\
-	futex.c\
-	get_robust_list.c\
-	getcpu.c\
-	getcwd.c\
-	getrandom.c\
-	hdio.c\
-	hostname.c\
-	inotify.c\
-	io.c\
-	ioctl.c\
-	ioperm.c\
-	iopl.c\
-	ioprio.c\
-	ipc_msg.c\
-	ipc_msgctl.c\
-	ipc_sem.c\
-	ipc_shm.c\
-	ipc_shmctl.c\
-	kcmp.c\
-	kexec.c\
-	keyctl.c\
-	ldt.c\
-	link.c\
-	lookup_dcookie.c\
-	loop.c\
-	lseek.c\
-	mem.c\
-	membarrier.c\
-	memfd_create.c\
-	mknod.c\
-	mmsghdr.c\
-	mount.c\
-	mq.c\
-	msghdr.c\
-	mtd.c\
-	net.c\
-	netlink.c\
-	netlink_sock_diag.c\
-	nlattr.c\
-	nsfs.c\
-	numa.c\
-	oldstat.c\
-	open.c\
-	or1k_atomic.c\
-	pathtrace.c\
-	perf.c\
-	personality.c\
-	pkeys.c\
-	poll.c\
-	prctl.c\
-	print_dev_t.c\
-	print_mq_attr.c\
-	print_msgbuf.c\
-	print_sg_req_info.c\
-	print_sigevent.c\
-	print_statfs.c\
-	print_struct_stat.c\
-	print_time.c\
-	print_timespec.c\
-	print_timeval.c\
-	print_timex.c\
-	printmode.c\
-	printrusage.c\
-	printsiginfo.c\
-	process.c\
-	process_vm.c\
-	ptp.c\
-	qualify.c\
-	quota.c\
-	readahead.c\
-	readlink.c\
-	reboot.c\
-	renameat.c\
-	resource.c\
-	rt_sigframe.c\
-	rt_sigreturn.c\
-	rtc.c\
-	sched.c\
-	scsi.c\
-	seccomp.c\
-	sendfile.c\
-	sg_io_v3.c\
-	sg_io_v4.c\
-	sigaltstack.c\
-	signal.c\
-	signalfd.c\
-	sock.c\
-	sockaddr.c\
-	socketutils.c\
-	sram_alloc.c\
-	stat.c\
-	stat64.c\
-	statx.c\
-	strace.c\
-	swapon.c\
-	syscall.c\
-	sysctl.c\
-	sysinfo.c\
-	syslog.c\
-	sysmips.c\
-	term.c\
-	time.c\
-	times.c\
-	truncate.c\
-	ubi.c\
-	uid.c\
-	uid16.c\
-	umask.c\
-	umount.c\
-	uname.c\
-	userfaultfd.c\
-	ustat.c\
-	util.c\
-	utime.c\
-	utimes.c\
-	v4l2.c\
-	wait.c\
-	xattr.c\
-	xlat.c\
-	xmalloc.c\
-)
-
-build '$outdir'/sys_func.h sed '$srcdir'/^($libsrcs $srcs) ; with\
-	expr '-n ''s/^SYS_FUNC(.*/extern &;/p'''
-
-phony deps '$outdir'/^(\
-	ioctlent^(0 1 2)^.h\
-	native_printer_decls.h\
-	native_printer_defs.h\
-	printers.h\
-	scno.h\
-	sen.h\
-	sys_func.h\
-)
-
-lib libstrace.a -d '$outdir'/printers.h $libsrcs
-exe strace -d '$dir'/deps $srcs libstrace.a
-file bin/strace '$outdir'/strace 755
-man 1 strace.1
-
-fetch curl
-gen_inputs='$dir'/mpers.txt