swap raw syscall numbers with syscall.ph for easier porting

[pve-common.git] / src / PVE / Syscall.pm

diff --git a/src/PVE/Syscall.pm b/src/PVE/Syscall.pm
new file mode 100644 (file)
index 0000000..87db66a
--- /dev/null
+++ b/src/PVE/Syscall.pm
@@ -0,0 +1,22 @@
+package PVE::Syscall;
+
+my %syscalls;
+BEGIN {
+    die "syscall.ph can only be required once!\n" if $INC{'syscall.ph'};
+    require("syscall.ph");
+    %syscalls = (
+       unshare => &SYS_unshare,
+       setns => &SYS_setns,
+       syncfs => &SYS_syncfs,
+       openat => &SYS_openat,
+       close => &SYS_close,
+       mkdirat => &SYS_mkdirat,
+       faccessat => &SYS_faccessat,
+    );
+};
+
+use constant \%syscalls;
+
+use base 'Exporter';
+
+our @EXPORT_OK   = keys(%syscalls);