/**
@brief pthread key delete.
@para
key[in] for delete key
@return
0 success.
others for errno.
*/
int pthread_key_delete(pthread_key_t key)
{
int i = 0;
/* key is valid ? */
if (key > __pthread_key_nums ||
__destructort_arry[key] == DESTRUCTORT_INVALID)
return -EINVAL;
pthread_spin_lock(&__pthread_specific_lock);
/* foreach pthread specific */
for (; i < __pthread_specific_nums; i++)
{
/* removed from ihash */
if (__pthread_specific_arry[i] != SPECIFIC_INVALID)
hurd_ihash_remove(__pthread_specific_arry[i], key);
}
pthread_spin_lock(&__pthread_key_lock);
__destructort_arry[key] = (destructort_t)-1;
pthread_spin_unlock(&__pthread_key_lock);
pthread_spin_unlock(&__pthread_specific_lock);
return 0;
}
void
__pthread_destroy_specific (struct __pthread *thread)
{
error_t err;
int i;
int seen_one;
/* Check if there is any thread specific data. */
if (! thread->thread_specifics)
return;
__pthread_key_lock_ready ();
/* Iterate and call the destructors on any thread specific data. */
for (;;)
{
seen_one = 0;
__pthread_mutex_lock (&__pthread_key_lock);
for (i = 0; i < __pthread_key_count; i ++)
{
void *value;
if (__pthread_key_destructors[i] == PTHREAD_KEY_INVALID)
continue;
value = hurd_ihash_find (thread->thread_specifics, i);
if (value)
{
err = hurd_ihash_remove (thread->thread_specifics, i);
assert (err == 1);
if (__pthread_key_destructors[i])
{
seen_one = 1;
__pthread_key_destructors[i] (value);
}
}
}
__pthread_mutex_unlock (&__pthread_key_lock);
if (! seen_one)
break;
/* This may take a very long time. Let those blocking on
pthread_key_create or pthread_key_delete make progress. */
sched_yield ();
}
hurd_ihash_free (thread->thread_specifics);
thread->thread_specifics = 0;
}
