1062c5bc4SJason Schmidlapp /*
2062c5bc4SJason Schmidlapp * pthread_setspecific.c
3062c5bc4SJason Schmidlapp *
4062c5bc4SJason Schmidlapp * Description:
5062c5bc4SJason Schmidlapp * POSIX thread functions which implement thread-specific data (TSD).
6062c5bc4SJason Schmidlapp *
7062c5bc4SJason Schmidlapp * --------------------------------------------------------------------------
8062c5bc4SJason Schmidlapp *
9062c5bc4SJason Schmidlapp * Pthreads-embedded (PTE) - POSIX Threads Library for embedded systems
10062c5bc4SJason Schmidlapp * Copyright(C) 2008 Jason Schmidlapp
11062c5bc4SJason Schmidlapp *
12062c5bc4SJason Schmidlapp * Contact Email: jschmidlapp@users.sourceforge.net
13062c5bc4SJason Schmidlapp *
14062c5bc4SJason Schmidlapp *
15062c5bc4SJason Schmidlapp * Based upon Pthreads-win32 - POSIX Threads Library for Win32
16062c5bc4SJason Schmidlapp * Copyright(C) 1998 John E. Bossom
17062c5bc4SJason Schmidlapp * Copyright(C) 1999,2005 Pthreads-win32 contributors
18062c5bc4SJason Schmidlapp *
19062c5bc4SJason Schmidlapp * Contact Email: rpj@callisto.canberra.edu.au
20062c5bc4SJason Schmidlapp *
21062c5bc4SJason Schmidlapp * The original list of contributors to the Pthreads-win32 project
22062c5bc4SJason Schmidlapp * is contained in the file CONTRIBUTORS.ptw32 included with the
23062c5bc4SJason Schmidlapp * source code distribution. The list can also be seen at the
24062c5bc4SJason Schmidlapp * following World Wide Web location:
25062c5bc4SJason Schmidlapp * http://sources.redhat.com/pthreads-win32/contributors.html
26062c5bc4SJason Schmidlapp *
27062c5bc4SJason Schmidlapp * This library is free software; you can redistribute it and/or
28062c5bc4SJason Schmidlapp * modify it under the terms of the GNU Lesser General Public
29062c5bc4SJason Schmidlapp * License as published by the Free Software Foundation; either
30062c5bc4SJason Schmidlapp * version 2 of the License, or (at your option) any later version.
31062c5bc4SJason Schmidlapp *
32062c5bc4SJason Schmidlapp * This library is distributed in the hope that it will be useful,
33062c5bc4SJason Schmidlapp * but WITHOUT ANY WARRANTY; without even the implied warranty of
34062c5bc4SJason Schmidlapp * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
35062c5bc4SJason Schmidlapp * Lesser General Public License for more details.
36062c5bc4SJason Schmidlapp *
37062c5bc4SJason Schmidlapp * You should have received a copy of the GNU Lesser General Public
38062c5bc4SJason Schmidlapp * License along with this library in the file COPYING.LIB;
39062c5bc4SJason Schmidlapp * if not, write to the Free Software Foundation, Inc.,
40062c5bc4SJason Schmidlapp * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
41062c5bc4SJason Schmidlapp */
42062c5bc4SJason Schmidlapp
43062c5bc4SJason Schmidlapp
44062c5bc4SJason Schmidlapp #include "pthread.h"
45062c5bc4SJason Schmidlapp #include "implement.h"
46062c5bc4SJason Schmidlapp
47062c5bc4SJason Schmidlapp
48062c5bc4SJason Schmidlapp
49062c5bc4SJason Schmidlapp int
pthread_setspecific(pthread_key_t key,const void * value)50062c5bc4SJason Schmidlapp pthread_setspecific (pthread_key_t key, const void *value)
51062c5bc4SJason Schmidlapp /*
52062c5bc4SJason Schmidlapp * ------------------------------------------------------
53062c5bc4SJason Schmidlapp * DOCPUBLIC
54062c5bc4SJason Schmidlapp * This function sets the value of the thread specific
55062c5bc4SJason Schmidlapp * key in the calling thread.
56062c5bc4SJason Schmidlapp *
57062c5bc4SJason Schmidlapp * PARAMETERS
58062c5bc4SJason Schmidlapp * key
59062c5bc4SJason Schmidlapp * an instance of pthread_key_t
60062c5bc4SJason Schmidlapp * value
61062c5bc4SJason Schmidlapp * the value to set key to
62062c5bc4SJason Schmidlapp *
63062c5bc4SJason Schmidlapp *
64062c5bc4SJason Schmidlapp * DESCRIPTION
65062c5bc4SJason Schmidlapp * This function sets the value of the thread specific
66062c5bc4SJason Schmidlapp * key in the calling thread.
67062c5bc4SJason Schmidlapp *
68062c5bc4SJason Schmidlapp * RESULTS
69062c5bc4SJason Schmidlapp * 0 successfully set value
70062c5bc4SJason Schmidlapp * EAGAIN could not set value
71062c5bc4SJason Schmidlapp * ENOENT SERIOUS!!
72062c5bc4SJason Schmidlapp *
73062c5bc4SJason Schmidlapp * ------------------------------------------------------
74062c5bc4SJason Schmidlapp */
75062c5bc4SJason Schmidlapp {
76062c5bc4SJason Schmidlapp pthread_t self;
77062c5bc4SJason Schmidlapp int result = 0;
78062c5bc4SJason Schmidlapp
79062c5bc4SJason Schmidlapp if (key != pte_selfThreadKey)
80062c5bc4SJason Schmidlapp {
81062c5bc4SJason Schmidlapp /*
82062c5bc4SJason Schmidlapp * Using pthread_self will implicitly create
83062c5bc4SJason Schmidlapp * an instance of pthread_t for the current
84062c5bc4SJason Schmidlapp * thread if one wasn't explicitly created
85062c5bc4SJason Schmidlapp */
86062c5bc4SJason Schmidlapp self = pthread_self ();
87*a12978ccSJeremy Soller if (self == NULL)
88062c5bc4SJason Schmidlapp {
89062c5bc4SJason Schmidlapp return ENOENT;
90062c5bc4SJason Schmidlapp }
91062c5bc4SJason Schmidlapp }
92062c5bc4SJason Schmidlapp else
93062c5bc4SJason Schmidlapp {
94062c5bc4SJason Schmidlapp /*
95062c5bc4SJason Schmidlapp * Resolve catch-22 of registering thread with selfThread
96062c5bc4SJason Schmidlapp * key
97062c5bc4SJason Schmidlapp */
98062c5bc4SJason Schmidlapp pte_thread_t * sp = (pte_thread_t *) pthread_getspecific (pte_selfThreadKey);
99062c5bc4SJason Schmidlapp
100062c5bc4SJason Schmidlapp if (sp == NULL)
101062c5bc4SJason Schmidlapp {
102062c5bc4SJason Schmidlapp if (value == NULL)
103062c5bc4SJason Schmidlapp {
104062c5bc4SJason Schmidlapp return ENOENT;
105062c5bc4SJason Schmidlapp }
106062c5bc4SJason Schmidlapp
107062c5bc4SJason Schmidlapp self = *((pthread_t *) value);
108062c5bc4SJason Schmidlapp }
109062c5bc4SJason Schmidlapp else
110062c5bc4SJason Schmidlapp {
111062c5bc4SJason Schmidlapp self = sp->ptHandle;
112062c5bc4SJason Schmidlapp }
113062c5bc4SJason Schmidlapp }
114062c5bc4SJason Schmidlapp
115062c5bc4SJason Schmidlapp result = 0;
116062c5bc4SJason Schmidlapp
117062c5bc4SJason Schmidlapp if (key != NULL)
118062c5bc4SJason Schmidlapp {
119*a12978ccSJeremy Soller if (self != NULL && key->destructor != NULL && value != NULL)
120062c5bc4SJason Schmidlapp {
121062c5bc4SJason Schmidlapp /*
122062c5bc4SJason Schmidlapp * Only require associations if we have to
123062c5bc4SJason Schmidlapp * call user destroy routine.
124062c5bc4SJason Schmidlapp * Don't need to locate an existing association
125062c5bc4SJason Schmidlapp * when setting data to NULL since the
126062c5bc4SJason Schmidlapp * data is stored with the operating system; not
127062c5bc4SJason Schmidlapp * on the association; setting assoc to NULL short
128062c5bc4SJason Schmidlapp * circuits the search.
129062c5bc4SJason Schmidlapp */
130062c5bc4SJason Schmidlapp ThreadKeyAssoc *assoc;
131062c5bc4SJason Schmidlapp
132062c5bc4SJason Schmidlapp if (pthread_mutex_lock(&(key->keyLock)) == 0)
133062c5bc4SJason Schmidlapp {
134*a12978ccSJeremy Soller pte_thread_t * sp = (pte_thread_t *) self;
135062c5bc4SJason Schmidlapp
136062c5bc4SJason Schmidlapp (void) pthread_mutex_lock(&(sp->threadLock));
137062c5bc4SJason Schmidlapp
138062c5bc4SJason Schmidlapp assoc = (ThreadKeyAssoc *) sp->keys;
139062c5bc4SJason Schmidlapp /*
140062c5bc4SJason Schmidlapp * Locate existing association
141062c5bc4SJason Schmidlapp */
142062c5bc4SJason Schmidlapp while (assoc != NULL)
143062c5bc4SJason Schmidlapp {
144062c5bc4SJason Schmidlapp if (assoc->key == key)
145062c5bc4SJason Schmidlapp {
146062c5bc4SJason Schmidlapp /*
147062c5bc4SJason Schmidlapp * Association already exists
148062c5bc4SJason Schmidlapp */
149062c5bc4SJason Schmidlapp break;
150062c5bc4SJason Schmidlapp }
151062c5bc4SJason Schmidlapp assoc = assoc->nextKey;
152062c5bc4SJason Schmidlapp }
153062c5bc4SJason Schmidlapp
154062c5bc4SJason Schmidlapp /*
155062c5bc4SJason Schmidlapp * create an association if not found
156062c5bc4SJason Schmidlapp */
157062c5bc4SJason Schmidlapp if (assoc == NULL)
158062c5bc4SJason Schmidlapp {
159062c5bc4SJason Schmidlapp result = pte_tkAssocCreate (sp, key);
160062c5bc4SJason Schmidlapp }
161062c5bc4SJason Schmidlapp
162062c5bc4SJason Schmidlapp (void) pthread_mutex_unlock(&(sp->threadLock));
163062c5bc4SJason Schmidlapp }
164062c5bc4SJason Schmidlapp (void) pthread_mutex_unlock(&(key->keyLock));
165062c5bc4SJason Schmidlapp }
166062c5bc4SJason Schmidlapp
167062c5bc4SJason Schmidlapp if (result == 0)
168062c5bc4SJason Schmidlapp {
169062c5bc4SJason Schmidlapp if (pte_osTlsSetValue (key->key, (void *) value) != PTE_OS_OK)
170062c5bc4SJason Schmidlapp {
171062c5bc4SJason Schmidlapp result = EAGAIN;
172062c5bc4SJason Schmidlapp }
173062c5bc4SJason Schmidlapp
174062c5bc4SJason Schmidlapp }
175062c5bc4SJason Schmidlapp }
176062c5bc4SJason Schmidlapp
177062c5bc4SJason Schmidlapp return (result);
178062c5bc4SJason Schmidlapp } /* pthread_setspecific */
179