TLS test for NPTL.
authordrepper <drepper>
Tue, 2 Sep 2003 00:31:52 +0000 (00:31 +0000)
committerdrepper <drepper>
Tue, 2 Sep 2003 00:31:52 +0000 (00:31 +0000)
nptl/tst-tls5.c [new file with mode: 0644]
nptl/tst-tls5.h [new file with mode: 0644]
nptl/tst-tls5mod.c [new file with mode: 0644]
nptl/tst-tls5moda.c [new file with mode: 0644]
nptl/tst-tls5modb.c [new file with mode: 0644]
nptl/tst-tls5modc.c [new file with mode: 0644]
nptl/tst-tls5modd.c [new file with mode: 0644]
nptl/tst-tls5mode.c [new file with mode: 0644]
nptl/tst-tls5modf.c [new file with mode: 0644]

diff --git a/nptl/tst-tls5.c b/nptl/tst-tls5.c
new file mode 100644 (file)
index 0000000..5462532
--- /dev/null
@@ -0,0 +1,120 @@
+/* Copyright (C) 2003 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
+   Contributed by Jakub Jelinek <jakub@redhat.com>, 2003.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Lesser General Public
+   License as published by the Free Software Foundation; either
+   version 2.1 of the License, or (at your option) any later version.
+
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Lesser General Public License for more details.
+
+   You should have received a copy of the GNU Lesser General Public
+   License along with the GNU C Library; if not, write to the Free
+   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+   02111-1307 USA.  */
+
+/* Check alignment, overlapping and layout of TLS variables.  */
+#include <stdint.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <pthread.h>
+#include <pthreadP.h>
+#include <sys/param.h>
+
+#include "tst-tls5.h"
+
+#ifdef TLS_REGISTER
+
+struct tls_obj tls_registry[64];
+
+static int
+tls_addr_cmp (const void *a, const void *b)
+{
+  if (((struct tls_obj *)a)->addr < ((struct tls_obj *)b)->addr)
+    return -1;
+  if (((struct tls_obj *)a)->addr > ((struct tls_obj *)b)->addr)
+    return 1;
+  return 0;
+}
+
+static int
+do_test (void)
+{
+  size_t cnt, i;
+  int res = 0;
+  uintptr_t min_addr = ~(uintptr_t) 0, max_addr = 0;
+
+  for (cnt = 0; tls_registry[cnt].name; ++cnt);
+  tls_registry[cnt].name = NULL;
+  tls_registry[cnt].addr = (uintptr_t) pthread_self ();
+  tls_registry[cnt].size = sizeof (struct pthread);
+  tls_registry[cnt++].align = __alignof__ (struct pthread);
+
+  qsort (tls_registry, cnt, sizeof (struct tls_obj), tls_addr_cmp);
+
+  for (i = 0; i < cnt; ++i)
+    {
+      printf ("%s%s = %p, size %zd, align %zd",
+             tls_registry[i].name ? "&" : "",
+             tls_registry[i].name ?: "pthread_self ()",
+             (void *) tls_registry[i].addr,
+             tls_registry[i].size, tls_registry[i].align);
+      if (tls_registry[i].addr & (tls_registry[i].align - 1))
+       {
+         fputs (", WRONG ALIGNMENT", stdout);
+         res = 1;
+       }
+      if (i > 0
+         && (tls_registry[i - 1].addr + tls_registry[i - 1].size
+             > tls_registry[i].addr))
+       {
+         fputs (", ADDRESS OVERLAP", stdout);
+         res = 1;
+       }
+      puts ("");
+      if (tls_registry[i].name)
+       {
+         min_addr = MIN (tls_registry[i].addr, min_addr);
+         max_addr = MAX (tls_registry[i].addr + tls_registry[i].size,
+                         max_addr);
+       }
+    }
+
+  if (cnt > 1)
+    {
+#if TLS_TCB_AT_TP
+      if (tls_registry[cnt - 1].name)
+       {
+         puts ("pthread_self () not larger than all TLS addresses");
+         res = 1;
+       }
+      else
+       max_addr = MAX (tls_registry[cnt - 1].addr, max_addr);
+#elif TLS_DTV_AT_TP
+      if (tls_registry[0].name)
+       {
+         puts ("pthread_self () not smaller than all TLS addresses");
+         res = 1;
+       }
+#else
+      abort ();
+#endif
+      printf ("Initial TLS used block size %zd\n",
+             (size_t) (max_addr - min_addr));
+    }
+  return res;
+}
+
+#define TEST_FUNCTION do_test ()
+
+#else
+
+#define TEST_FUNCTION 0
+
+#endif
+
+#include "../test-skeleton.c"
diff --git a/nptl/tst-tls5.h b/nptl/tst-tls5.h
new file mode 100644 (file)
index 0000000..b7c14eb
--- /dev/null
@@ -0,0 +1,28 @@
+#include <stdint.h>
+#include <stdlib.h>
+#include <tls.h>
+
+#if USE_TLS && HAVE___THREAD
+
+struct tls_obj
+{
+  const char *name;
+  uintptr_t addr;
+  size_t size;
+  size_t align;
+};
+extern struct tls_obj tls_registry[];
+
+#define TLS_REGISTER(x)                                \
+static void __attribute__((constructor))       \
+tls_register_##x (void)                                \
+{                                              \
+  size_t i;                                    \
+  for (i = 0; tls_registry[i].name; ++i);      \
+  tls_registry[i].name = #x;                   \
+  tls_registry[i].addr = (uintptr_t) &x;       \
+  tls_registry[i].size = sizeof (x);           \
+  tls_registry[i].align = __alignof__ (x);     \
+}
+
+#endif
diff --git a/nptl/tst-tls5mod.c b/nptl/tst-tls5mod.c
new file mode 100644 (file)
index 0000000..b308bd6
--- /dev/null
@@ -0,0 +1,6 @@
+#include <tst-tls5.h>
+
+#ifdef TLS_REGISTER
+/* Ensure tls_registry is exported from the binary.  */
+void *tst_tls5mod attribute_hidden = tls_registry;
+#endif
diff --git a/nptl/tst-tls5moda.c b/nptl/tst-tls5moda.c
new file mode 100644 (file)
index 0000000..a035c96
--- /dev/null
@@ -0,0 +1,6 @@
+#include <tst-tls5.h>
+
+#ifdef TLS_REGISTER
+static __thread char a [32] __attribute__ ((aligned (64)));
+TLS_REGISTER (a)
+#endif
diff --git a/nptl/tst-tls5modb.c b/nptl/tst-tls5modb.c
new file mode 100644 (file)
index 0000000..848a803
--- /dev/null
@@ -0,0 +1,6 @@
+#include <tst-tls5.h>
+
+#ifdef TLS_REGISTER
+static __thread int b;
+TLS_REGISTER (b)
+#endif
diff --git a/nptl/tst-tls5modc.c b/nptl/tst-tls5modc.c
new file mode 100644 (file)
index 0000000..d63ceff
--- /dev/null
@@ -0,0 +1,6 @@
+#include <tst-tls5.h>
+
+#ifdef TLS_REGISTER
+static __thread int c;
+TLS_REGISTER (c)
+#endif
diff --git a/nptl/tst-tls5modd.c b/nptl/tst-tls5modd.c
new file mode 100644 (file)
index 0000000..202a66a
--- /dev/null
@@ -0,0 +1,6 @@
+#include <tst-tls5.h>
+
+#ifdef TLS_REGISTER
+static __thread int d;
+TLS_REGISTER (d)
+#endif
diff --git a/nptl/tst-tls5mode.c b/nptl/tst-tls5mode.c
new file mode 100644 (file)
index 0000000..3e53ee1
--- /dev/null
@@ -0,0 +1,8 @@
+#include <tst-tls5.h>
+
+#ifdef TLS_REGISTER
+static __thread int e1 = 24;
+static __thread char e2 [32] __attribute__ ((aligned (64)));
+TLS_REGISTER (e1)
+TLS_REGISTER (e2)
+#endif
diff --git a/nptl/tst-tls5modf.c b/nptl/tst-tls5modf.c
new file mode 100644 (file)
index 0000000..8e50962
--- /dev/null
@@ -0,0 +1,9 @@
+#include <tst-tls5.h>
+
+#ifdef TLS_REGISTER
+char tst_tls5modf[60] attribute_hidden = { 26 };
+static __thread int f1 = 24;
+static __thread char f2 [32] __attribute__ ((aligned (64)));
+TLS_REGISTER (f1)
+TLS_REGISTER (f2)
+#endif