Remove unused cloudlibc headers. (#170)

diff --git a/libc-bottom-half/cloudlibc/src/common/parser_strtoint.h b/libc-bottom-half/cloudlibc/src/common/parser_strtoint.h
deleted file mode 100644 (file)
index b2a56e4..0000000
--- a/libc-bottom-half/cloudlibc/src/common/parser_strtoint.h
+++ /dev/null
@@ -1,85 +0,0 @@
-// Copyright (c) 2015 Nuxi, https://nuxi.nl/
-//
-// SPDX-License-Identifier: BSD-2-Clause
-
-// Parser of integer literals as performed by strtol(), scanf(), etc.
-
-// Result of parsing.
-bool have_number = false;
-bool have_overflow = false;
-int_t number = 0;
-
-{
-  // Negative or positive number?
-  bool negative = false;
-  if (allow_negative && PEEK(0) == '-') {
-    negative = true;
-    SKIP(1);
-  } else if (PEEK(0) == '+') {
-    SKIP(1);
-  }
-
-  // Determine the base.
-  if ((base == 0 || base == 16) && PEEK(0) == '0' &&
-      (PEEK(1) == 'x' || PEEK(1) == 'X') &&
-      ((PEEK(2) >= '0' && PEEK(2) <= '9') ||
-       (PEEK(2) >= 'A' && PEEK(2) <= 'F') ||
-       (PEEK(2) >= 'a' && PEEK(2) <= 'f'))) {
-    SKIP(2);
-    base = 16;
-  } else if (base == 0) {
-    base = PEEK(0) == '0' ? 8 : 10;
-  }
-
-  // Only perform conversion if the base is valid.
-  if (base >= 2 && base <= 36) {
-    uint_fast8_t radix = base;
-
-    // Determine the highest value up to which we can parse so that the
-    // next digit does not cause an overflow.
-    uintmax_t ceil;
-    uint_fast8_t last_digit;
-    if (negative) {
-      ceil = -(min / radix);
-      last_digit = -(min % radix);
-    } else {
-      ceil = max / radix;
-      last_digit = max % radix;
-    }
-
-    uintmax_t value = 0;
-    for (;;) {
-      // Parse next digit.
-      uint_fast8_t digit;
-      if (PEEK(0) >= '0' && PEEK(0) <= '9')
-        digit = PEEK(0) - '0';
-      else if (PEEK(0) >= 'A' && PEEK(0) <= 'Z')
-        digit = PEEK(0) - 'A' + 10;
-      else if (PEEK(0) >= 'a' && PEEK(0) <= 'z')
-        digit = PEEK(0) - 'a' + 10;
-      else
-        break;
-      if (digit >= radix)
-        break;
-      SKIP(1);
-
-      // Add it to result.
-      have_number = true;
-      if (value > ceil || (value == ceil && digit > last_digit)) {
-        // Addition of the new digit would cause an overflow.
-        have_overflow = true;
-      } else {
-        value = value * radix + digit;
-      }
-    }
-
-    if (have_overflow) {
-      // Set value to min or max depending whether the input is negative
-      // and whether the output type is signed.
-      number = (int_t)-1 >= 0 || !negative ? max : min;
-    } else {
-      // Return parsed value.
-      number = negative ? -value : value;
-    }
-  }
-}

diff --git a/libc-bottom-half/cloudlibc/src/common/tls.h b/libc-bottom-half/cloudlibc/src/common/tls.h
deleted file mode 100644 (file)
index c7af4a5..0000000
--- a/libc-bottom-half/cloudlibc/src/common/tls.h
+++ /dev/null
@@ -1,171 +0,0 @@
-// Copyright (c) 2016-2017 Nuxi, https://nuxi.nl/
-//
-// SPDX-License-Identifier: BSD-2-Clause
-
-#ifndef COMMON_TLS_H
-#define COMMON_TLS_H
-
-#include <assert.h>
-#include <wasi/api.h>
-#include <stdalign.h>
-#include <stddef.h>
-
-#if defined(__aarch64__)
-
-#define TLS_VARIANT 1
-#define TCB_SIZE 16
-
-// Fetches the TCB from the CPU's registers.
-static inline __wasi_tcb_t *tcb_get(void) {
-  __wasi_tcb_t *tcb;
-  asm volatile("mrs %0, tpidr_el0" : "=r"(tcb));
-  return tcb;
-}
-
-// Changes the TCB in the CPU's registers.
-static inline void tcb_set(__wasi_tcb_t *tcb) {
-  asm volatile("msr tpidr_el0, %0" : : "r"(tcb));
-}
-
-#elif defined(__arm__)
-
-#define TLS_VARIANT 1
-#define TCB_SIZE 8
-
-// Fetches the TCB from the CPU's registers.
-static inline __wasi_tcb_t *tcb_get(void) {
-  __wasi_tcb_t *tcb;
-  asm volatile("mrc p15, 0, %0, cr13, cr0, 2" : "=r"(tcb));
-  return tcb;
-}
-
-// Changes the TCB in the CPU's registers.
-static inline void tcb_set(__wasi_tcb_t *tcb) {
-  asm volatile("mcr p15, 0, %0, cr13, cr0, 2" : : "r"(tcb));
-}
-
-#elif defined(__i386__)
-
-#define TLS_VARIANT 2
-
-// Fetches the TCB from the CPU's registers.
-static inline __wasi_tcb_t *tcb_get(void) {
-  __wasi_tcb_t *tcb;
-  asm volatile("mov %%gs:0, %0" : "=r"(tcb));
-  return tcb;
-}
-
-// Changes the TCB in the CPU's registers.
-static inline void tcb_set(__wasi_tcb_t *tcb) {
-  asm volatile("mov %0, %%gs:0" : : "r"(tcb));
-}
-
-#elif defined(__x86_64__)
-
-#define TLS_VARIANT 2
-
-// Fetches the TCB from the CPU's registers.
-static inline __wasi_tcb_t *tcb_get(void) {
-  __wasi_tcb_t *tcb;
-  asm volatile("mov %%fs:0, %0" : "=r"(tcb));
-  return tcb;
-}
-
-// Changes the TCB in the CPU's registers.
-static inline void tcb_set(__wasi_tcb_t *tcb) {
-  asm volatile("mov %0, %%fs:0" : : "r"(tcb));
-}
-
-#else
-#error "Unsupported architecture"
-#endif
-
-#if TLS_VARIANT == 1
-
-// TLS Variant I: TLS register points to the TCB. The TLS data is stored
-// after the TCB. This approach has the disadvantage that the TCB size
-// needs to be known.
-
-static_assert(sizeof(__wasi_tcb_t) <= TCB_SIZE,
-              "TCB does not fit in reserved space before TLS");
-
-// Computes the total size needed to store a TCB with TLS data.
-static inline size_t tls_size(void) {
-  return TCB_SIZE + __pt_tls_memsz_aligned +
-         (__pt_tls_align > alignof(__wasi_tcb_t) ? __pt_tls_align
-                                                   : sizeof(__wasi_tcb_t)) -
-         1;
-}
-
-// Computes the address of the TCB in the combined TCB/TLS area.
-static inline __wasi_tcb_t *tcb_addr(char *buf) {
-  if (alignof(__wasi_tcb_t) < __pt_tls_align) {
-    return (
-        __wasi_tcb_t *)(__roundup((uintptr_t)buf + TCB_SIZE, __pt_tls_align) -
-                          TCB_SIZE);
-  } else {
-    return (__wasi_tcb_t *)__roundup((uintptr_t)buf, alignof(__wasi_tcb_t));
-  }
-}
-
-// Computes the address of the TLS data in the combined TCB/TLS area.
-static inline char *tls_addr(char *buf) {
-  return (char *)tcb_addr(buf) + TCB_SIZE;
-}
-
-// Fetches the TLS area of the currently running thread.
-static inline char *tls_get(void) {
-  return (char *)tcb_get() + TCB_SIZE;
-}
-
-#elif TLS_VARIANT == 2
-
-// TLS Variant II: TLS register points to the TCB. The TLS data is
-// stored before the TCB. This approach has the advantage that the TCB
-// size does not need to be known.
-
-// Computes the total size needed to store a TCB with TLS data.
-static inline size_t tls_size(void) {
-  return __pt_tls_memsz_aligned + sizeof(__wasi_tcb_t) +
-         (__pt_tls_align > alignof(__wasi_tcb_t) ? __pt_tls_align
-                                                   : sizeof(__wasi_tcb_t)) -
-         1;
-}
-
-// Computes the address of the TLS data in the combined TCB/TLS area.
-static inline char *tls_addr(char *buf) {
-  if (alignof(__wasi_tcb_t) < __pt_tls_align) {
-    return (char *)(__roundup((uintptr_t)buf, __pt_tls_align));
-  } else {
-    return (char *)(__roundup((uintptr_t)buf + __pt_tls_memsz_aligned,
-                              alignof(__wasi_tcb_t)) -
-                    __pt_tls_memsz_aligned);
-  }
-}
-
-// Computes the address of the TCB in the combined TCB/TLS area.
-static inline __wasi_tcb_t *tcb_addr(char *buf) {
-  return (__wasi_tcb_t *)(tls_addr(buf) + __pt_tls_memsz_aligned);
-}
-
-// Fetches the TLS area of the currently running thread.
-static inline char *tls_get(void) {
-  return (char *)tcb_get() - __pt_tls_memsz_aligned;
-}
-
-#else
-#error "Unknown TLS variant"
-#endif
-
-// Changes the CPU's registers to point to a new TLS area.
-//
-// This function ensures that the TCB of the old TLS area is copied into
-// the new TLS area. This ensures that the runtime (kernel, emulator,
-// etc) still has access to its own private data.
-static inline void tls_replace(char *buf) {
-  __wasi_tcb_t *tcb = tcb_addr(buf);
-  *tcb = *tcb_get();
-  tcb_set(tcb);
-}
-
-#endif