diff options
Diffstat (limited to 'pkg/strace/gen.lua')
| -rw-r--r-- | pkg/strace/gen.lua | 278 |
1 files changed, 278 insertions, 0 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' |