l4/pkg/l4re-core/uclibc/lib/contrib/uclibc/libpthread/nptl_db/td_thr_tlsbase.c

   1 /* Locate TLS data for a thread.
   2    Copyright (C) 2003, 2006 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   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    <http://www.gnu.org/licenses/>.  */
  18
  19 #include "thread_dbP.h"
  20
  21 td_err_e
  22 td_thr_tlsbase (const td_thrhandle_t *th,
  23                 unsigned long int modid,
  24                 psaddr_t *base)
  25 {
  26   td_err_e err;
  27   psaddr_t dtv, dtvslot, dtvptr;
  28
  29   if (modid < 1)
  30     return TD_NOTLS;
  31
  32   /* Get the DTV pointer from the thread descriptor.  */
  33   err = DB_GET_FIELD (dtv, th->th_ta_p, th->th_unique, pthread, dtvp, 0);
  34   if (err != TD_OK)
  35     return err;
  36
  37   /* Find the corresponding entry in the DTV.  */
  38   err = DB_GET_FIELD_ADDRESS (dtvslot, th->th_ta_p, dtv, dtv, dtv, modid);
  39   if (err != TD_OK)
  40     return err;
  41
  42   /* Extract the TLS block address from that DTV slot.  */
  43   err = DB_GET_FIELD (dtvptr, th->th_ta_p, dtvslot, dtv_t, pointer_val, 0);
  44   if (err != TD_OK)
  45     return err;
  46
  47   /* It could be that the memory for this module is not allocated for
  48      the given thread.  */
  49   if ((uintptr_t) dtvptr & 1)
  50     return TD_TLSDEFER;
  51
  52   *base = dtvptr;
  53   return TD_OK;
  54 }