fix: inherit process environment and untrack libc objects

kernel/src/Api/BuildNo.hpp

@@ -12,4 +12,4 @@
 
 #pragma once
 
-#define MONTAUK_BUILD_NUMBER 104
+#define MONTAUK_BUILD_NUMBER 106

kernel/src/Api/Process.hpp

@@ -43,14 +43,16 @@ namespace montauk::abi {
         return Sched::LookupExitCode(pid);
     }
 
-    static int Sys_Spawn(const char* path, const char* args) {
+    static int Sys_Spawn(const char* path, const char* args,
+                         const char* environment = nullptr, uint32_t environmentLength = 0) {
         char resolved[256];
         if (!ResolveProcessPath(path, resolved, sizeof(resolved))) return -1;
 
         auto* parent = Sched::GetCurrentProcessPtr();
         int parentSlot = Ipc::CurrentSlot();
         bool inheritRedirection = parent && parent->redirected;
-        int childPid = Sched::Spawn(resolved, args, !inheritRedirection);
+        int childPid = Sched::Spawn(resolved, args, !inheritRedirection,
+                                    environment, environmentLength);
         if (childPid < 0) return childPid;
 
         if (inheritRedirection) {
@@ -107,6 +109,24 @@ namespace montauk::abi {
         return i;
     }
 
+    static int Sys_GetEnviron(char* buf, uint64_t maxLen) {
+        auto* proc = Sched::GetCurrentProcessPtr();
+        if (proc == nullptr || buf == nullptr || maxLen == 0) return -1;
+        if (maxLen < proc->environmentLength) return -2;
+        for (uint32_t i = 0; i < proc->environmentLength; i++)
+            buf[i] = proc->environment[i];
+        return (int)proc->environmentLength;
+    }
+
+    static int Sys_SetEnviron(const char* buf, uint64_t len) {
+        auto* proc = Sched::GetCurrentProcessPtr();
+        if (proc == nullptr || buf == nullptr || len == 0 ||
+            len > Sched::Process::EnvironmentBytes || buf[len - 1] != '\0') return -1;
+        for (uint64_t i = 0; i < len; i++) proc->environment[i] = buf[i];
+        proc->environmentLength = (uint32_t)len;
+        return 0;
+    }
+
     static int Sys_ProcList(ProcInfo* buf, int maxCount) {
         if (buf == nullptr || maxCount <= 0) return 0;
         int count = 0;

kernel/src/Api/Syscall.cpp

@@ -149,8 +149,25 @@ namespace montauk::abi {
                 if (frame->arg2 != 0 && !UserMemory::String(frame->arg2, kMaxArgsBytes)) return -1;
                 return (int64_t)Sys_Spawn((const char*)frame->arg1,
                                           UserMemory::IsUserPtr(frame->arg2) ? (const char*)frame->arg2 : nullptr);
+            case SYS_SPAWN_ENV:
+                if (!UserMemory::String(frame->arg1, kMaxPathBytes)) return -1;
+                if (frame->arg2 != 0 && !UserMemory::String(frame->arg2, kMaxArgsBytes)) return -1;
+                if (frame->arg3 == 0 || frame->arg4 == 0 ||
+                    frame->arg4 > Sched::Process::EnvironmentBytes ||
+                    !UserMemory::Range(frame->arg3, frame->arg4, false) ||
+                    ((const char*)frame->arg3)[frame->arg4 - 1] != '\0') return -1;
+                return (int64_t)Sys_Spawn((const char*)frame->arg1,
+                                          UserMemory::IsUserPtr(frame->arg2) ? (const char*)frame->arg2 : nullptr,
+                                          (const char*)frame->arg3, (uint32_t)frame->arg4);
             case SYS_WAITPID:
                 return Sys_WaitPid((int)frame->arg1);
+            case SYS_GETENVIRON:
+                if (!UserMemory::Range(frame->arg1, frame->arg2, true)) return -1;
+                return Sys_GetEnviron((char*)frame->arg1, frame->arg2);
+            case SYS_SETENVIRON:
+                if (frame->arg2 == 0 || frame->arg2 > Sched::Process::EnvironmentBytes ||
+                    !UserMemory::Range(frame->arg1, frame->arg2, false)) return -1;
+                return Sys_SetEnviron((const char*)frame->arg1, frame->arg2);
             case SYS_FBINFO:
                 if (!UserMemory::Writable<FbInfo>(frame->arg1)) return -1;
                 Sys_FbInfo((FbInfo*)frame->arg1);

kernel/src/Api/Syscall.hpp

@@ -315,6 +315,9 @@ namespace montauk::abi {
     static constexpr uint64_t SYS_MMAP_ANON           = 168;
     static constexpr uint64_t SYS_MUNMAP              = 169;
     static constexpr uint64_t SYS_MPROTECT            = 170;
+    static constexpr uint64_t SYS_GETENVIRON          = 171;
+    static constexpr uint64_t SYS_SETENVIRON          = 172;
+    static constexpr uint64_t SYS_SPAWN_ENV           = 173;
 
     // Tunable parameters (for SYS_SDR_SETPARAM / SYS_SDR_GETPARAM).
     static constexpr int SDR_PARAM_FREQ        = 0;  // center frequency, Hz