Support thread local storage

test/libc/runtime/clone_test.c

@@ -19,7 +19,9 @@
 #include "libc/calls/calls.h"
 #include "libc/dce.h"
 #include "libc/errno.h"
+#include "libc/intrin/kprintf.h"
 #include "libc/intrin/spinlock.h"
+#include "libc/mem/mem.h"
 #include "libc/runtime/stack.h"
 #include "libc/sysv/consts/clone.h"
 #include "libc/sysv/consts/map.h"
@@ -28,7 +30,7 @@
 #include "libc/testlib/testlib.h"
 #include "libc/time/time.h"
 
-char *stack;
+char *stack, *tls;
 int x, me, thechilde;
 _Alignas(64) volatile char lock;
 
@@ -37,18 +39,31 @@ void SetUp(void) {
   lock = 0;
   me = gettid();
   thechilde = 0;
+  tls = calloc(1, 512);
+  *(intptr_t *)tls = (intptr_t)tls;
+  *(intptr_t *)(tls + 0x30) = (intptr_t)tls;
+  *(int *)(tls + 0x3c) = 31337;
   ASSERT_NE(MAP_FAILED, (stack = mmap(0, GetStackSize(), PROT_READ | PROT_WRITE,
                                       MAP_STACK | MAP_ANONYMOUS, -1, 0)));
 }
 
 void TearDown(void) {
-  tkill(thechilde, SIGKILL), errno = 0;
+  if (thechilde) {
+    tkill(thechilde, SIGKILL);
+    errno = 0;
+  }
   sched_yield();
-  EXPECT_SYS(0, 0, munmap(stack, GetStackSize()));
+  free(tls);
 }
 
 int CloneTest1(void *arg) {
   x = 42;
+  if (!IsWindows()) {
+    ASSERT_EQ(31337, errno);
+  } else {
+    errno = 31337;
+    ASSERT_EQ(31337, errno);
+  }
   ASSERT_EQ(23, (intptr_t)arg);
   thechilde = gettid();
   ASSERT_NE(gettid(), getpid());
@@ -56,15 +71,33 @@ int CloneTest1(void *arg) {
   return 0;
 }
 
+int DoNothing(void *arg) {
+  return 0;
+}
+
+void __setup_tls(void);
+
 TEST(clone, test1) {
   int tid;
   _spinlock(&lock);
   ASSERT_NE(-1, (tid = clone(CloneTest1, stack, GetStackSize(),
                              CLONE_THREAD | CLONE_VM | CLONE_FS | CLONE_FILES |
-                                 CLONE_SIGHAND,
-                             (void *)23, 0, 0, 0, 0)));
+                                 CLONE_SIGHAND | CLONE_SETTLS,
+                             (void *)23, 0, tls, 512, 0)));
   _spinlock(&lock);
   ASSERT_EQ(42, x);
   ASSERT_NE(me, tid);
   ASSERT_EQ(tid, thechilde);
+  ASSERT_EQ(0, errno);
+  errno = 31337;
+  ASSERT_EQ(31337, errno);
+
+  return;
+  intptr_t *p;
+  asm("movq\t%%fs:0x30,%0" : "=a"(p));
+  kprintf("%fs:0x30 = %p\n", p);
+  for (int i = 0; i < 64; ++i) {
+    kprintf("0x%.5x = %p\n", i * 8, p[i]);
+  }
+  kprintf("\n");
 }

test/net/http/formathttpdatetime_test.c

@@ -0,0 +1,51 @@
+/*-*- 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/testlib/ezbench.h"
+#include "libc/testlib/testlib.h"
+#include "libc/time/struct/tm.h"
+#include "libc/time/time.h"
+#include "net/http/http.h"
+
+TEST(FormatHttpDateTime, test) {
+  char p[30];
+  struct tm *tm;
+  int64_t t = 0x62820bcd;
+  tm = gmtime(&t);
+  FormatHttpDateTime(p, tm);
+  ASSERT_STREQ("Mon, 16 May 2022 08:31:09 GMT", p);
+}
+
+TEST(FormatHttpDateTime, testStrftime) {
+  char p[30];
+  struct tm *tm;
+  int64_t t = 0x62820bcd;
+  tm = gmtime(&t);
+  strftime(p, sizeof(p), "%a, %d %b %Y %H:%M:%S %Z", tm);
+  ASSERT_STREQ("Mon, 16 May 2022 08:31:09 GMT", p);
+}
+
+BENCH(FormatHttpDateTime, bench) {
+  char p[30];
+  struct tm *tm;
+  int64_t t = 0x62820bcd;
+  tm = gmtime(&t);
+  EZBENCH2("FormatHttpDateTime", donothing, FormatHttpDateTime(p, tm));
+  EZBENCH2("strftime", donothing,
+           strftime(p, sizeof(p), "%a, %d %b %Y %H:%M:%S %Z", tm));
+}