oasis-linux-mirror/pkg/strace/gen.lua

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',
	'basic_filters.c',
	'bind.c',
	'bjm.c',
	'block.c',
	'bpf.c',
	'bpf_filter.c',
	'bpf_seccomp_filter.c',
	'bpf_sock_filter.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',
	'error_prints.c',
	'evdev.c',
	'eventfd.c',
	'execve.c',
	'fadvise.c',
	'fallocate.c',
	'fanotify.c',
	'fchownat.c',
	'fcntl.c',
	'fetch_bpf_fprog.c',
	'fetch_struct_flock.c',
	'fetch_struct_keyctl_kdf_params.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',
	'filter_qualify.c',
	'flock.c',
	'fs_x_ioctl.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',
	'listen.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_crypto.c',
	'netlink_inet_diag.c',
	'netlink_netlink_diag.c',
	'netlink_packet_diag.c',
	'netlink_route.c',
	'netlink_selinux.c',
	'netlink_smc_diag.c',
	'netlink_sock_diag.c',
	'netlink_unix_diag.c',
	'nlattr.c',
	'nsfs.c',
	'numa.c',
	'number_set.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_group_req.c',
	'print_ifindex.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',
	'quota.c',
	'readahead.c',
	'readlink.c',
	'reboot.c',
	'renameat.c',
	'resource.c',
	'rt_sigframe.c',
	'rt_sigreturn.c',
	'rtc.c',
	'rtnl_addr.c',
	'rtnl_addrlabel.c',
	'rtnl_dcb.c',
	'rtnl_link.c',
	'rtnl_mdb.c',
	'rtnl_neigh.c',
	'rtnl_neightbl.c',
	'rtnl_netconf.c',
	'rtnl_nsid.c',
	'rtnl_route.c',
	'rtnl_rule.c',
	'rtnl_tc.c',
	'rtnl_tc_action.c',
	'sched.c',
	'scsi.c',
	'seccomp.c',
	'sendfile.c',
	'sg_io_v3.c',
	'sg_io_v4.c',
	'shutdown.c',
	'sigaltstack.c',
	'signal.c',
	'signalfd.c',
	'sock.c',
	'sockaddr.c',
	'socketutils.c',
	'sram_alloc.c',
	'stat.c',
	'stat64.c',
	'statx.c',
	'strace.c',
	'string_to_uint.c',
	'swapon.c',
	'syscall.c',
	'sysctl.c',
	'sysinfo.c',
	'syslog.c',
	'sysmips.c',
	'term.c',
	'time.c',
	'times.c',
	'truncate.c',
	'ubi.c',
	'ucopy.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'