]> Savannah Git Hosting - gnulib.git/commitdiff
windows-tls: New module.
authorBruno Haible <bruno@clisp.org>
Thu, 20 Jun 2019 02:15:30 +0000 (04:15 +0200)
committerBruno Haible <bruno@clisp.org>
Thu, 20 Jun 2019 02:15:30 +0000 (04:15 +0200)
* lib/windows-tls.h: New file, based on lib/glthread/tls.h.
* lib/windows-tls.c: New file, based on lib/glthread/tls.h.
* lib/glthread/tls.h: Include windows-tls.h.
(gl_tls_key_t): Define using glwthread_tls_key_t.
* modules/windows-tls: New file.
* modules/tls (Depends-on): Add windows-tls.

ChangeLog
lib/glthread/tls.h
lib/windows-tls.c [new file with mode: 0644]
lib/windows-tls.h [new file with mode: 0644]
modules/tls
modules/windows-tls [new file with mode: 0644]

index 6307fcc58c4054713b50c4dc3a4fe84211ceb9af..33262dfe14c5e2b13bf73b9fc01f171ea9168d5d 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,13 @@
+2019-06-20  Bruno Haible  <bruno@clisp.org>
+
+       windows-tls: New module.
+       * lib/windows-tls.h: New file, based on lib/glthread/tls.h.
+       * lib/windows-tls.c: New file, based on lib/glthread/tls.h.
+       * lib/glthread/tls.h: Include windows-tls.h.
+       (gl_tls_key_t): Define using glwthread_tls_key_t.
+       * modules/windows-tls: New file.
+       * modules/tls (Depends-on): Add windows-tls.
+
 2019-06-20  Bruno Haible  <bruno@clisp.org>
 
        windows-cond: New module.
index ab854091b556e116fb716480bba5377cee3ba2e7..7a74234788bf64dcc0100c7f480f3e4131c22ce3 100644 (file)
@@ -236,9 +236,11 @@ extern void *glthread_tls_get_multithreaded (thread_key_t key);
 # define WIN32_LEAN_AND_MEAN  /* avoid including junk */
 # include <windows.h>
 
+# include "windows-tls.h"
+
 /* ------------------------- gl_tls_key_t datatype ------------------------- */
 
-typedef DWORD gl_tls_key_t;
+typedef glwthread_tls_key_t gl_tls_key_t;
 # define glthread_tls_key_init(KEY, DESTRUCTOR) \
     /* The destructor is unsupported.  */    \
     ((*(KEY) = TlsAlloc ()) == (DWORD)-1 ? EAGAIN : ((void) (DESTRUCTOR), 0))
diff --git a/lib/windows-tls.c b/lib/windows-tls.c
new file mode 100644 (file)
index 0000000..87aa454
--- /dev/null
@@ -0,0 +1,55 @@
+/* Thread-local storage (native Windows implementation).
+   Copyright (C) 2005-2019 Free Software Foundation, Inc.
+
+   This program is free software: you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3 of the License, or
+   (at your option) any later version.
+
+   This program 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 General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
+
+/* Written by Bruno Haible <bruno@clisp.org>, 2005.  */
+
+#include <config.h>
+
+/* Specification.  */
+#include "windows-tls.h"
+
+int
+glwthread_tls_key_create (glwthread_tls_key_t *keyp, void (*destructor) (void *))
+{
+  /* TODO: The destructor is unsupported.  */
+  (void) destructor;
+
+  if ((*keyp = TlsAlloc ()) == (DWORD)-1)
+    return EAGAIN;
+  return 0;
+}
+
+void *
+glwthread_tls_get (glwthread_tls_key_t key)
+{
+  return TlsGetValue (key);
+}
+
+int
+glwthread_tls_set (glwthread_tls_key_t key, void *value)
+{
+  if (!TlsSetValue (key, value))
+    return EINVAL;
+  return 0;
+}
+
+int
+glwthread_tls_key_delete (glwthread_tls_key_t key)
+{
+  if (!TlsFree (key))
+    return EINVAL;
+  return 0;
+}
diff --git a/lib/windows-tls.h b/lib/windows-tls.h
new file mode 100644 (file)
index 0000000..5e79545
--- /dev/null
@@ -0,0 +1,40 @@
+/* Thread-local storage (native Windows implementation).
+   Copyright (C) 2005-2019 Free Software Foundation, Inc.
+
+   This program is free software: you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3 of the License, or
+   (at your option) any later version.
+
+   This program 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 General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
+
+/* Written by Bruno Haible <bruno@clisp.org>, 2005.  */
+
+#ifndef _WINDOWS_TLS_H
+#define _WINDOWS_TLS_H
+
+#define WIN32_LEAN_AND_MEAN  /* avoid including junk */
+#include <windows.h>
+
+typedef DWORD glwthread_tls_key_t;
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+extern int glwthread_tls_key_create (glwthread_tls_key_t *keyp, void (*destructor) (void *));
+extern void *glwthread_tls_get (glwthread_tls_key_t key);
+extern int glwthread_tls_set (glwthread_tls_key_t key, void *value);
+extern int glwthread_tls_key_delete (glwthread_tls_key_t key);
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* _WINDOWS_TLS_H */
index 5d6104447597faf15e9ba51631f7b157be8405a4..f4a5256308195e8f030f51608b268ad2708d84f6 100644 (file)
@@ -8,6 +8,7 @@ m4/tls.m4
 
 Depends-on:
 threadlib
+windows-tls     [test $gl_threads_api = windows]
 
 configure.ac:
 gl_TLS
diff --git a/modules/windows-tls b/modules/windows-tls
new file mode 100644 (file)
index 0000000..32a32eb
--- /dev/null
@@ -0,0 +1,27 @@
+Description:
+Thread-local storage (native Windows implementation).
+
+Files:
+lib/windows-tls.h
+lib/windows-tls.c
+
+Depends-on:
+
+configure.ac:
+AC_REQUIRE([AC_CANONICAL_HOST])
+case "$host_os" in
+  mingw*)
+    AC_LIBOBJ([windows-tls])
+    ;;
+esac
+
+Makefile.am:
+
+Include:
+"windows-tls.h"
+
+License:
+LGPLv2+
+
+Maintainer:
+all