summaryrefslogtreecommitdiff
path: root/tsd.c
blob: 015af851b87b5502eb375d7e3b9a0b4410dba34e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
/*
 * tsd.c
 *
 * Description:
 * POSIX thread functions which implement thread-specific data (TSD).
 */
 
/*
 * Why we can't use Win32 TLS
 * --------------------------
 *
 * In a word: Destructors
 *
 * POSIX 1003.1 1996, Section 17 allows for optional destructor functions
 * to be associated with each key value. The destructors are called from
 * the creating thread, which means that the calling thread must have access
 * to the TSD keys of all active threads.
 *
 * If we use Win32 TLS then this is not possible since Tls*Value()
 * functions don't allow us to access other than our own [thread's] key.
 *
 * As a result, these routines need to be redesigned.
 */

#include <errno.h>

#include "pthread.h"
#include "implement.h"

int
pthread_key_create(pthread_key_t *key, void (*destructor)(void *))
{
  DWORD index;

  index = TlsAlloc();
  if (index == 0xFFFFFFFF)
    {
      return EAGAIN;
    }

  /* Only modify the `key' parameter if allocation was successful. */
  *key = index;

  if (destructor != NULL)
    {
      return (_pthread_destructor_push(destructor, *key));
    }

  return 0;
}

int
pthread_setspecific(pthread_key_t key, void *value)
{
  return (TlsSetValue(key, value) == FALSE) ? EINVAL : 0;
}

void *
pthread_getspecific(pthread_key_t key)
{
  return TlsGetValue(key);
}

int
pthread_key_delete(pthread_key_t key)
{
  /* Remove this key's destructors. */
  _pthread_destructor_pop(key);

  return (TlsFree(key) == FALSE) ? EINVAL : 0;
}