1/*
2 * pthread_getspecific.c
3 *
4 * Description:
5 * POSIX thread functions which implement thread-specific data (TSD).
6 *
7 * --------------------------------------------------------------------------
8 *
9 *      Pthreads-win32 - POSIX Threads Library for Win32
10 *      Copyright(C) 1998 John E. Bossom
11 *      Copyright(C) 1999,2005 Pthreads-win32 contributors
12 *
13 *      Contact Email: rpj@callisto.canberra.edu.au
14 *
15 *      The current list of contributors is contained
16 *      in the file CONTRIBUTORS included with the source
17 *      code distribution. The list can also be seen at the
18 *      following World Wide Web location:
19 *      http://sources.redhat.com/pthreads-win32/contributors.html
20 *
21 *      This library is free software; you can redistribute it and/or
22 *      modify it under the terms of the GNU Lesser General Public
23 *      License as published by the Free Software Foundation; either
24 *      version 2 of the License, or (at your option) any later version.
25 *
26 *      This library is distributed in the hope that it will be useful,
27 *      but WITHOUT ANY WARRANTY; without even the implied warranty of
28 *      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
29 *      Lesser General Public License for more details.
30 *
31 *      You should have received a copy of the GNU Lesser General Public
32 *      License along with this library in the file COPYING.LIB;
33 *      if not, write to the Free Software Foundation, Inc.,
34 *      59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
35 */
36
37#include "pthread.h"
38#include "implement.h"
39
40
41void *
42pthread_getspecific (pthread_key_t key)
43     /*
44      * ------------------------------------------------------
45      * DOCPUBLIC
46      *      This function returns the current value of key in the
47      *      calling thread. If no value has been set for 'key' in
48      *      the thread, NULL is returned.
49      *
50      * PARAMETERS
51      *      key
52      *              an instance of pthread_key_t
53      *
54      *
55      * DESCRIPTION
56      *      This function returns the current value of key in the
57      *      calling thread. If no value has been set for 'key' in
58      *      the thread, NULL is returned.
59      *
60      * RESULTS
61      *              key value or NULL on failure
62      *
63      * ------------------------------------------------------
64      */
65{
66  void * ptr;
67
68  if (key == NULL)
69    {
70      ptr = NULL;
71    }
72  else
73    {
74      int lasterror = GetLastError ();
75#if defined(RETAIN_WSALASTERROR)
76      int lastWSAerror = WSAGetLastError ();
77#endif
78      ptr = TlsGetValue (key->key);
79
80      SetLastError (lasterror);
81#if defined(RETAIN_WSALASTERROR)
82      WSASetLastError (lastWSAerror);
83#endif
84    }
85
86  return ptr;
87}
88