package PVE::Syscall;
+use strict;
+use warnings;
+
my %syscalls;
my %fsmount_constants;
BEGIN {
openat => &SYS_openat,
close => &SYS_close,
mkdirat => &SYS_mkdirat,
+ mknod => &SYS_mknod,
faccessat => &SYS_faccessat,
setresuid => &SYS_setresuid,
fchownat => &SYS_fchownat,
mount => &SYS_mount,
-
- # These use asm-generic, so they're the same across (sane) architectures. We use numbers
- # since they're not in perl's syscall.ph yet...
- open_tree => 428,
- move_mount => 429,
- fsopen => 430,
- fsconfig => 431,
- fsmount => 432,
- fspick => 433,
+ renameat2 => &SYS_renameat2,
+ open_tree => &SYS_open_tree,
+ move_mount => &SYS_move_mount,
+ fsopen => &SYS_fsopen,
+ fsconfig => &SYS_fsconfig,
+ fsmount => &SYS_fsmount,
+ fspick => &SYS_fspick,
+ getxattr => &SYS_getxattr,
+ setxattr => &SYS_setxattr,
+ fgetxattr => &SYS_fgetxattr,
+ fsetxattr => &SYS_fsetxattr,
+ prctl => &SYS_prctl,
+
+ # Below aren't yet in perl's syscall.ph but use asm-generic, so the same across (sane) archs
+ # -> none unknown currently, yay
);
%fsmount_constants = (
return $fh;
}
+
+1;