mirror of
https://git.proxmox.com/git/pve-client
synced 2025-10-04 09:23:07 +00:00
23 lines
443 B
Perl
23 lines
443 B
Perl
package PVE::APIClient::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);
|