nptl/pthread_setspecific.c

   1 /* Copyright (C) 2002-2021 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3    Contributed by Ulrich Drepper <drepper@redhat.com>, 2002.
   4
   5    The GNU C Library is free software; you can redistribute it and/or
   6    modify it under the terms of the GNU Lesser General Public
   7    License as published by the Free Software Foundation; either
   8    version 2.1 of the License, or (at your option) any later version.
   9
  10    The GNU C Library is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13    Lesser General Public License for more details.
  14
  15    You should have received a copy of the GNU Lesser General Public
  16    License along with the GNU C Library; if not, see
  17    <https://www.gnu.org/licenses/>.  */
  18
  19 #include <errno.h>
  20 #include <stdlib.h>
  21 #include "pthreadP.h"
  22 #include <shlib-compat.h>
  23
  24 int
  25 ___pthread_setspecific (pthread_key_t key, const void *value)
  26 {
  27   struct pthread *self;
  28   unsigned int idx1st;
  29   unsigned int idx2nd;
  30   struct pthread_key_data *level2;
  31   unsigned int seq;
  32
  33   self = THREAD_SELF;
  34
  35   /* Special case access to the first 2nd-level block.  This is the
  36      usual case.  */
  37   if (__glibc_likely (key < PTHREAD_KEY_2NDLEVEL_SIZE))
  38     {
  39       /* Verify the key is sane.  */
  40       if (KEY_UNUSED ((seq = __pthread_keys[key].seq)))
  41         /* Not valid.  */
  42         return EINVAL;
  43
  44       level2 = &self->specific_1stblock[key];
  45
  46       /* Remember that we stored at least one set of data.  */
  47       if (value != NULL)
  48         THREAD_SETMEM (self, specific_used, true);
  49     }
  50   else
  51     {
  52       if (key >= PTHREAD_KEYS_MAX
  53           || KEY_UNUSED ((seq = __pthread_keys[key].seq)))
  54         /* Not valid.  */
  55         return EINVAL;
  56
  57       idx1st = key / PTHREAD_KEY_2NDLEVEL_SIZE;
  58       idx2nd = key % PTHREAD_KEY_2NDLEVEL_SIZE;
  59
  60       /* This is the second level array.  Allocate it if necessary.  */
  61       level2 = THREAD_GETMEM_NC (self, specific, idx1st);
  62       if (level2 == NULL)
  63         {
  64           if (value == NULL)
  65             /* We don't have to do anything.  The value would in any case
  66                be NULL.  We can save the memory allocation.  */
  67             return 0;
  68
  69           level2
  70             = (struct pthread_key_data *) calloc (PTHREAD_KEY_2NDLEVEL_SIZE,
  71                                                   sizeof (*level2));
  72           if (level2 == NULL)
  73             return ENOMEM;
  74
  75           THREAD_SETMEM_NC (self, specific, idx1st, level2);
  76         }
  77
  78       /* Pointer to the right array element.  */
  79       level2 = &level2[idx2nd];
  80
  81       /* Remember that we stored at least one set of data.  */
  82       THREAD_SETMEM (self, specific_used, true);
  83     }
  84
  85   /* Store the data and the sequence number so that we can recognize
  86      stale data.  */
  87   level2->seq = seq;
  88   level2->data = (void *) value;
  89
  90   return 0;
  91 }
  92 versioned_symbol (libc, ___pthread_setspecific, pthread_setspecific,
  93                   GLIBC_2_34);
  94 libc_hidden_ver (___pthread_setspecific, __pthread_setspecific)
  95 #ifndef SHARED
  96 strong_alias (___pthread_setspecific, __pthread_setspecific)
  97 #endif
  98
  99 #if OTHER_SHLIB_COMPAT (libc, GLIBC_2_0, GLIBC_2_34)
 100 compat_symbol (libpthread, ___pthread_setspecific, __pthread_setspecific,
 101                GLIBC_2_0);
 102 compat_symbol (libpthread, ___pthread_setspecific, pthread_setspecific,
 103                GLIBC_2_0);
 104 #endif