Initial import

examples/forky.c

@@ -0,0 +1,51 @@
+#if 0
+/*─────────────────────────────────────────────────────────────────╗
+│ To the extent possible under law, Justine Tunney has waived      │
+│ all copyright and related or neighboring rights to this file,    │
+│ as it is written in the following disclaimers:                   │
+│   • http://unlicense.org/                                        │
+│   • http://creativecommons.org/publicdomain/zero/1.0/            │
+╚─────────────────────────────────────────────────────────────────*/
+#endif
+#include "libc/calls/calls.h"
+#include "libc/calls/hefty/spawn.h"
+#include "libc/calls/internal.h"
+#include "libc/conv/conv.h"
+#include "libc/log/check.h"
+#include "libc/mem/mem.h"
+#include "libc/nt/enum/filemapflags.h"
+#include "libc/nt/enum/pageflags.h"
+#include "libc/nt/memory.h"
+#include "libc/runtime/gc.h"
+#include "libc/runtime/runtime.h"
+#include "libc/stdio/stdio.h"
+#include "libc/sysv/consts/fileno.h"
+#include "libc/x/x.h"
+
+int main(int argc, char *argv[]) {
+  int pid;
+  long *addr;
+  int64_t fh;
+  if (argc == 1) {
+    fh = CreateFileMappingNuma(-1, &kNtIsInheritable, kNtPageReadwrite, 0,
+                               FRAMESIZE, NULL, kNtNumaNoPreferredNode);
+    addr = MapViewOfFileExNuma(fh, kNtFileMapRead | kNtFileMapWrite, 0, 0,
+                               FRAMESIZE, NULL, kNtNumaNoPreferredNode);
+    *addr = 0x31337;
+    CHECK_NE(-1, (pid = spawnve(
+                      0, (int[3]){STDIN_FILENO, STDOUT_FILENO, STDERR_FILENO},
+                      "o/examples/forky.com",
+                      (char *const[]){"o/examples/forky.com",
+                                      gc(xasprintf("%#lx", (intptr_t)addr)),
+                                      gc(xasprintf("%#lx", fh)), NULL},
+                      environ)));
+    CHECK_NE(-1, waitpid(pid, NULL, 0));
+  } else {
+    addr = (long *)(intptr_t)strtoul(argv[1], NULL, 0);
+    fh = strtoul(argv[2], NULL, 0);
+    addr = MapViewOfFileExNuma(fh, kNtFileMapRead | kNtFileMapWrite, 0, 0,
+                               FRAMESIZE, addr, kNtNumaNoPreferredNode);
+    printf("%#lx\n", *addr);
+  }
+  return 0;
+}