Add much of C11 threads.h API

libc/BUILD.mk

@@ -242,6 +242,7 @@ libc/isystem/system_error \
 libc/isystem/termios.h \
 libc/isystem/tgmath.h \
 libc/isystem/thread \
+libc/isystem/threads.h \
 libc/isystem/time.h \
 libc/isystem/tmmintrin.h \
 libc/isystem/tuple \

libc/calls/pthread_yield_np.c

@@ -38,4 +38,5 @@ int pthread_yield_np(void) {
   return 0;
 }
 
+__weak_reference(pthread_yield_np, thrd_yield);
 __weak_reference(pthread_yield_np, pthread_yield);

libc/intrin/cosmo_once.c

@@ -61,3 +61,5 @@ errno_t cosmo_once(atomic_uint *once, void init(void)) {
       return EINVAL;
   }
 }
+
+__weak_reference(cosmo_once, call_once);

libc/isystem/threads.h

@@ -0,0 +1,4 @@
+#ifndef _THREADS_H
+#define _THREADS_H
+#include "libc/thread/threads.h"
+#endif /* _THREADS_H */

libc/thread/pthread_equal.c

@@ -26,3 +26,5 @@
 int pthread_equal(pthread_t t1, pthread_t t2) {
   return t1 == t2;
 }
+
+__weak_reference(pthread_equal, thrd_equal);

libc/thread/pthread_exit.c

@@ -171,3 +171,5 @@ wontreturn void pthread_exit(void *rc) {
   // this is a child thread
   longjmp(pt->pt_exiter, 1);
 }
+
+__weak_reference(pthread_exit, thr_exit);

libc/thread/pthread_self.c

@@ -27,3 +27,5 @@
 pthread_t pthread_self(void) {
   return __get_tls()->tib_pthread;
 }
+
+__weak_reference(pthread_self, thrd_current);

libc/thread/thrd_create.c

@@ -0,0 +1,35 @@
+/*-*- mode:c;indent-tabs-mode:nil;c-basic-offset:2;tab-width:8;coding:utf-8 -*-│
+│ vi: set et ft=c ts=2 sts=2 sw=2 fenc=utf-8                               :vi │
+╞══════════════════════════════════════════════════════════════════════════════╡
+│ Copyright 2024 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/errno.h"
+#include "libc/thread/thread.h"
+#include "libc/thread/threads.h"
+
+int thrd_create(thrd_t *th, thrd_start_t func, void *arg) {
+  errno_t err;
+  err = pthread_create(th, 0, (void *(*)(void *))func, arg);
+  if (!err)
+    return thrd_success;
+  if (err == ENOMEM)
+    return thrd_nomem;
+  if (err == EAGAIN)
+    return thrd_busy;
+  if (err == EAGAIN)
+    return thrd_busy;
+  return thrd_error;
+}

libc/thread/thrd_detach.c

@@ -0,0 +1,26 @@
+/*-*- mode:c;indent-tabs-mode:nil;c-basic-offset:2;tab-width:8;coding:utf-8 -*-│
+│ vi: set et ft=c ts=2 sts=2 sw=2 fenc=utf-8                               :vi │
+╞══════════════════════════════════════════════════════════════════════════════╡
+│ Copyright 2024 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/thread/thread.h"
+#include "libc/thread/threads.h"
+
+int thrd_detach(thrd_t th) {
+  if (pthread_detach(th))
+    return thrd_error;
+  return thrd_success;
+}

libc/thread/thrd_join.c

@@ -0,0 +1,29 @@
+/*-*- mode:c;indent-tabs-mode:nil;c-basic-offset:2;tab-width:8;coding:utf-8 -*-│
+│ vi: set et ft=c ts=2 sts=2 sw=2 fenc=utf-8                               :vi │
+╞══════════════════════════════════════════════════════════════════════════════╡
+│ Copyright 2024 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/thread/thread.h"
+#include "libc/thread/threads.h"
+
+int thrd_join(thrd_t th, int *res) {
+  void *pres;
+  if (pthread_join(th, &pres))
+    return thrd_error;
+  if (res)
+    *res = (uintptr_t)pres;
+  return thrd_success;
+}

libc/thread/threads.h

@@ -0,0 +1,36 @@
+#ifndef COSMOPOLITAN_LIBC_THREAD_THREADS_H_
+#define COSMOPOLITAN_LIBC_THREAD_THREADS_H_
+COSMOPOLITAN_C_START_
+
+#define TSS_DTOR_ITERATIONS 4
+
+enum {
+  thrd_success = 0,
+  thrd_busy = 1,
+  thrd_error = 2,
+  thrd_nomem = 3,
+  thrd_timedout = 4,
+};
+
+enum {
+  mtx_plain = 0,
+  mtx_recursive = 1,
+  mtx_timed = 2,
+};
+
+typedef uintptr_t thrd_t;
+typedef void (*tss_dtor_t)(void *);
+typedef int (*thrd_start_t)(void *);
+typedef _Atomic(uint32_t) once_flag;
+
+void call_once(once_flag *, void (*)(void));
+int thrd_create(thrd_t *, thrd_start_t, void *);
+void thrd_exit(int) wontreturn;
+int thrd_join(thrd_t, int *);
+int thrd_detach(thrd_t);
+int thrd_equal(thrd_t, thrd_t);
+thrd_t thrd_current(void);
+void thrd_yield(void);
+
+COSMOPOLITAN_C_END_
+#endif /* COSMOPOLITAN_LIBC_THREAD_THREADS_H_ */

third_party/BUILD.mk

@@ -20,6 +20,7 @@ o/$(MODE)/third_party:				\
 	o/$(MODE)/third_party/libcxxabi		\
 	o/$(MODE)/third_party/libunwind		\
 	o/$(MODE)/third_party/linenoise		\
+	o/$(MODE)/third_party/llm		\
 	o/$(MODE)/third_party/lua		\
 	o/$(MODE)/third_party/lz4cli		\
 	o/$(MODE)/third_party/make		\