Make improvements

- Polyfill pselect() on Windows
- Add -O NOFILE flag to pledge.com
- Polyfill ppoll() on NetBSD, XNU, and Windows
- Support negative numbers and errno in sizetol()
- Add .RSS, .NOFILE, and .MAXCORE to Landlock Make
- Fix issue with .PLEDGE preventing touching of output files
- Add __watch() function (like ftrace) for logging memory changes

libc/calls/alarm.c

@@ -19,7 +19,6 @@
 #include "libc/assert.h"
 #include "libc/calls/struct/itimerval.h"
 #include "libc/macros.internal.h"
-#include "libc/math.h"
 #include "libc/str/str.h"
 #include "libc/sysv/consts/itimer.h"
 #include "libc/time/time.h"

libc/calls/getttysize.c

@@ -16,10 +16,10 @@
 │ TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR             │
 │ PERFORMANCE OF THIS SOFTWARE.                                                │
 ╚─────────────────────────────────────────────────────────────────────────────*/
-#include "libc/intrin/safemacros.internal.h"
 #include "libc/calls/calls.h"
 #include "libc/calls/termios.h"
 #include "libc/fmt/conv.h"
+#include "libc/intrin/safemacros.internal.h"
 #include "libc/log/internal.h"
 #include "libc/log/log.h"
 #include "libc/runtime/runtime.h"
@@ -36,8 +36,8 @@
  */
 int getttysize(int fd, struct winsize *out) {
   if (__nocolor) {
-    out->ws_col = strtoimax(firstnonnull(getenv("COLUMNS"), "80"), NULL, 0);
-    out->ws_row = strtoimax(firstnonnull(getenv("ROWS"), "40"), NULL, 0);
+    out->ws_col = atoi(firstnonnull(getenv("COLUMNS"), "80"));
+    out->ws_row = atoi(firstnonnull(getenv("ROWS"), "40"));
     out->ws_xpixel = 0;
     out->ws_ypixel = 0;
     return 0;

libc/calls/poll-nt.c

@@ -39,6 +39,7 @@
 #include "libc/nt/winsock.h"
 #include "libc/sock/internal.h"
 #include "libc/sock/struct/pollfd.h"
+#include "libc/sock/struct/pollfd.internal.h"
 #include "libc/sysv/consts/o.h"
 #include "libc/sysv/consts/poll.h"
 #include "libc/sysv/consts/sig.h"
@@ -51,9 +52,11 @@
  * on both sockets and files at the same time. We also poll for signals
  * while poll is polling.
  */
-textwindows int sys_poll_nt(struct pollfd *fds, uint64_t nfds, uint64_t *ms) {
+textwindows int sys_poll_nt(struct pollfd *fds, uint64_t nfds, uint64_t *ms,
+                            const sigset_t *sigmask) {
   bool ok;
   uint32_t avail;
+  sigset_t oldmask;
   struct sys_pollfd_nt pipefds[8];
   struct sys_pollfd_nt sockfds[64];
   int pipeindices[ARRAYLEN(pipefds)];
@@ -61,6 +64,7 @@ textwindows int sys_poll_nt(struct pollfd *fds, uint64_t nfds, uint64_t *ms) {
   int i, sn, pn, failed, gotinvals, gotpipes, gotsocks, waitfor;
 
   // check for interrupts early before doing work
+  if (sigmask && __sig_mask(SIG_SETMASK, sigmask, &oldmask)) return -1;
   if (_check_interrupts(false, g_fds.p)) return eintr();
 
   // do the planning

libc/calls/poll.c

@@ -81,7 +81,7 @@ int poll(struct pollfd *fds, size_t nfds, int timeout_ms) {
     }
   } else {
     millis = timeout_ms;
-    rc = sys_poll_nt(fds, nfds, &millis);
+    rc = sys_poll_nt(fds, nfds, &millis, 0);
   }
 
 #if defined(SYSDEBUG) && _POLLTRACE

libc/calls/ppoll.c

@@ -0,0 +1,107 @@
+/*-*- 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 2022 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/calls/strace.internal.h"
+#include "libc/calls/struct/sigset.internal.h"
+#include "libc/calls/struct/timespec.h"
+#include "libc/dce.h"
+#include "libc/errno.h"
+#include "libc/intrin/asan.internal.h"
+#include "libc/intrin/kprintf.h"
+#include "libc/macros.internal.h"
+#include "libc/sock/ppoll.h"
+#include "libc/sock/struct/pollfd.h"
+#include "libc/sock/struct/pollfd.internal.h"
+#include "libc/sysv/consts/sig.h"
+#include "libc/sysv/errfuns.h"
+
+/**
+ * Waits for something to happen on multiple file descriptors at once.
+ *
+ * This function is the same as saying:
+ *
+ *     sigset_t old;
+ *     sigprocmask(SIG_SETMASK, sigmask, &old);
+ *     poll(fds, nfds, timeout);
+ *     sigprocmask(SIG_SETMASK, old, 0);
+ *
+ * Except it'll happen atomically if the kernel supports doing that. On
+ * kernel such as XNU and NetBSD which don't, this wrapper falls back to
+ * doing the thing described above.
+ *
+ * @param timeout if null will block indefinitely
+ * @param sigmask may be null in which case no mask change happens
+ * @asyncsignalsafe
+ * @threadsafe
+ * @norestart
+ */
+int ppoll(struct pollfd *fds, size_t nfds, const struct timespec *timeout,
+          const sigset_t *sigmask) {
+  int e, i, rc;
+  uint64_t millis;
+  sigset_t oldmask;
+
+  if (IsAsan() && (!__asan_is_valid(fds, nfds * sizeof(struct pollfd)) ||
+                   (timeout && !__asan_is_valid(timeout, sizeof(timeout))) ||
+                   (sigmask && !__asan_is_valid(sigmask, sizeof(sigmask))))) {
+    rc = efault();
+  } else if (!IsWindows()) {
+    e = errno;
+    rc = sys_ppoll(fds, nfds, timeout, sigmask);
+    if (rc == -1 && errno == ENOSYS) {
+      errno = e;
+      if (!timeout ||
+          __builtin_add_overflow(timeout->tv_sec, timeout->tv_nsec / 1000000,
+                                 &millis)) {
+        millis = -1;
+      }
+      if (sigmask) sys_sigprocmask(SIG_SETMASK, sigmask, &oldmask);
+      rc = poll(fds, nfds, millis);
+      if (sigmask) sys_sigprocmask(SIG_SETMASK, &oldmask, 0);
+    }
+  } else {
+    if (!timeout || __builtin_add_overflow(
+                        timeout->tv_sec, timeout->tv_nsec / 1000000, &millis)) {
+      millis = -1;
+    }
+    rc = sys_poll_nt(fds, nfds, &millis, sigmask);
+  }
+
+#if defined(SYSDEBUG) && _POLLTRACE
+  if (UNLIKELY(__strace > 0)) {
+    kprintf(STRACE_PROLOGUE "ppoll(");
+    if ((!IsAsan() && kisdangerous(fds)) ||
+        (IsAsan() && !__asan_is_valid(fds, nfds * sizeof(struct pollfd)))) {
+      kprintf("%p", fds);
+    } else {
+      kprintf("[{");
+      for (i = 0; i < MIN(5, nfds); ++i) {
+        kprintf("%s{%d, %s, %s}", i ? ", " : "", fds[i].fd,
+                DescribePollFlags(fds[i].events),
+                DescribePollFlags(fds[i].revents));
+      }
+      kprintf("%s}]", i == 5 ? "..." : "");
+    }
+    kprintf(", %'zu, %s, %s) → %d% lm\n", nfds, DescribeTimeval(0, timeout),
+            DescribeSigset(0, sigmask), rc);
+  }
+#endif
+
+  return rc;
+}