tools: Add mknod syscall

Signed-off-by: Filip Schauer <f.schauer@proxmox.com>

diff --git a/src/PVE/Syscall.pm b/src/PVE/Syscall.pm
index 4c0b9cf13caac0fb76d0e271e4f0cd7b1638b2bd..2a423e87a5b3286aa4ca6ac826351506b56b8636 100644 (file)
--- a/src/PVE/Syscall.pm
+++ b/src/PVE/Syscall.pm
@@ -16,6 +16,7 @@ BEGIN {
        openat => &SYS_openat,
        close => &SYS_close,
        mkdirat => &SYS_mkdirat,
+       mknod => &SYS_mknod,
        faccessat => &SYS_faccessat,
        setresuid => &SYS_setresuid,
        fchownat => &SYS_fchownat,

diff --git a/src/PVE/Tools.pm b/src/PVE/Tools.pm
index c91e933e0b012e844b53df71172772d1e2a87f16..fbb6773e5b99d42cf77ba89374b83450f93587a5 100644 (file)
--- a/src/PVE/Tools.pm
+++ b/src/PVE/Tools.pm
@@ -1720,6 +1720,11 @@ sub mkdirat($$$) {
     return syscall(PVE::Syscall::mkdirat, int($dirfd), $name, int($mode)) == 0;
 }
 
+sub mknod($$$) {
+    my ($filename, $mode, $dev) = @_;
+    return syscall(PVE::Syscall::SYS_mknod, $filename, int($mode), int($dev)) == 0;
+}
+
 sub fchownat($$$$$) {
     my ($dirfd, $pathname, $owner, $group, $flags) = @_;
     return syscall(