Make improvements

- Add rusage to redbean Lua API
- Add more redbean documentation
- Add pledge() to redbean Lua API
- Polyfill OpenBSD pledge() for Linux
- Increase PATH_MAX limit to 1024 characters
- Untrack sibling processes after fork() on Windows

test/libc/calls/commandv_test.c

@@ -35,8 +35,8 @@
 
 uint64_t i;
 char *oldpath;
-char tmp[PATH_MAX + 1];
-char pathbuf[PATH_MAX + 1];
+char tmp[PATH_MAX];
+char pathbuf[PATH_MAX];
 char testlib_enable_tmp_setup_teardown;
 
 void SetUp(void) {

test/libc/calls/fork_test.c

@@ -1,93 +0,0 @@
-/*-*- mode:c;indent-tabs-mode:nil;c-basic-offset:2;tab-width:8;coding:utf-8 -*-│
-│vi: set net ft=c ts=2 sts=2 sw=2 fenc=utf-8                                :vi│
-╞══════════════════════════════════════════════════════════════════════════════╡
-│ Copyright 2021 Justine Alexandra Roberts Tunney                              │
-│                                                                              │
-│ Permission to use, copy, modify, and/or distribute this software for         │
-│ any purpose with or without fee is hereby granted, provided that the         │
-│ above copyright notice and this permission notice appear in all copies.      │
-│                                                                              │
-│ THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL                │
-│ WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED                │
-│ WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE             │
-│ AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL         │
-│ DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR        │
-│ PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER               │
-│ TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR             │
-│ PERFORMANCE OF THIS SOFTWARE.                                                │
-╚─────────────────────────────────────────────────────────────────────────────*/
-#include "libc/calls/calls.h"
-#include "libc/macros.internal.h"
-#include "libc/runtime/runtime.h"
-#include "libc/sysv/consts/map.h"
-#include "libc/sysv/consts/msync.h"
-#include "libc/sysv/consts/prot.h"
-#include "libc/testlib/ezbench.h"
-#include "libc/testlib/testlib.h"
-
-TEST(fork, testPipes) {
-  int a, b;
-  int ws, pid;
-  int pipefds[2];
-  ASSERT_NE(-1, pipe(pipefds));
-  ASSERT_NE(-1, (pid = fork()));
-  if (!pid) {
-    a = 31337;
-    close(pipefds[0]);
-    write(pipefds[1], &a, sizeof(a));
-    close(pipefds[1]);
-    _exit(0);
-  }
-  EXPECT_NE(-1, close(pipefds[1]));
-  EXPECT_EQ(sizeof(b), read(pipefds[0], &b, sizeof(b)));
-  EXPECT_NE(-1, close(pipefds[0]));
-  EXPECT_NE(-1, waitpid(pid, &ws, 0));
-  EXPECT_EQ(31337, b);
-}
-
-TEST(fork, testSharedMemory) {
-  int ws, pid;
-  int stackvar;
-  int *sharedvar;
-  int *privatevar;
-  EXPECT_NE(MAP_FAILED,
-            (sharedvar = mmap(NULL, FRAMESIZE, PROT_READ | PROT_WRITE,
-                              MAP_SHARED | MAP_ANONYMOUS, -1, 0)));
-  EXPECT_NE(MAP_FAILED,
-            (privatevar = mmap(NULL, FRAMESIZE, PROT_READ | PROT_WRITE,
-                               MAP_PRIVATE | MAP_ANONYMOUS, -1, 0)));
-  stackvar = 1;
-  *sharedvar = 1;
-  *privatevar = 1;
-  EXPECT_NE(-1, (pid = fork()));
-  if (!pid) {
-    EXPECT_EQ(NULL, getenv("_FORK"));
-    ++stackvar;
-    ++*sharedvar;
-    ++*privatevar;
-    msync((void *)ROUNDDOWN((intptr_t)&stackvar, FRAMESIZE), FRAMESIZE,
-          MS_SYNC);
-    EXPECT_NE(-1, msync(privatevar, FRAMESIZE, MS_SYNC));
-    EXPECT_NE(-1, msync(sharedvar, FRAMESIZE, MS_SYNC));
-    _exit(0);
-  }
-  EXPECT_NE(-1, waitpid(pid, &ws, 0));
-  EXPECT_EQ(1, stackvar);
-  EXPECT_EQ(2, *sharedvar);
-  EXPECT_EQ(1, *privatevar);
-  EXPECT_NE(-1, munmap(sharedvar, FRAMESIZE));
-  EXPECT_NE(-1, munmap(privatevar, FRAMESIZE));
-}
-
-void ForkInSerial(void) {
-  int pid, ws;
-  ASSERT_NE(-1, (pid = fork()));
-  if (!pid) _Exit(0);
-  ASSERT_NE(-1, waitpid(pid, &ws, 0));
-  ASSERT_TRUE(WIFEXITED(ws));
-  ASSERT_EQ(0, WEXITSTATUS(ws));
-}
-
-BENCH(fork, bench) {
-  EZBENCH2("fork", donothing, ForkInSerial());
-}

test/libc/calls/getcwd_test.c

@@ -43,7 +43,7 @@ TEST(getcwd, testNullBuf_allocatesResult) {
 
 TEST(getcwd, testWindows_addsFunnyPrefix) {
   if (!IsWindows()) return;
-  char path[PATH_MAX + 1];
+  char path[PATH_MAX];
   ASSERT_NE(0, getcwd(path, sizeof(path)));
   EXPECT_STARTSWITH("//?/", path);
 }

test/libc/calls/mkntcmdline_test.c

@@ -23,7 +23,7 @@
 #include "libc/str/str.h"
 #include "libc/testlib/testlib.h"
 
-char16_t cmdline[ARG_MAX];
+char16_t cmdline[ARG_MAX / 2];
 
 TEST(mkntcmdline, emptyArgvList_cantBeEmptyOnWindows) {
   char *argv[] = {NULL};

test/libc/calls/mkntenvblock_test.c

@@ -20,7 +20,7 @@
 #include "libc/runtime/gc.internal.h"
 #include "libc/testlib/testlib.h"
 
-char16_t envvars[ARG_MAX];
+char16_t envvars[ARG_MAX / 2];
 
 TEST(mkntenvblock, emptyList_onlyOutputsDoubleNulStringTerminator) {
   char *envp[] = {NULL};

test/libc/calls/seccomp_test.c

@@ -17,6 +17,7 @@
 │ PERFORMANCE OF THIS SOFTWARE.                                                │
 ╚─────────────────────────────────────────────────────────────────────────────*/
 #include "libc/calls/calls.h"
+#include "libc/calls/internal.h"
 #include "libc/calls/struct/bpf.h"
 #include "libc/calls/struct/filter.h"
 #include "libc/calls/struct/iovec.h"
@@ -31,16 +32,6 @@
 #include "libc/testlib/testlib.h"
 #include "tool/net/sandbox.h"
 
-bool __is_linux_2_6_23(void) {
-  int rc;
-  if (!IsLinux()) return false;
-  asm volatile("syscall"
-               : "=a"(rc)
-               : "0"(157), "D"(PR_GET_SECCOMP)
-               : "rcx", "r11", "memory");
-  return rc != -EINVAL;
-}
-
 void SetUp(void) {
   if (!__is_linux_2_6_23()) {
     exit(0);