2002-08-07 Roland McGrath <roland@redhat.com>
[kopensolaris-gnu/glibc.git] / linuxthreads / sysdeps / i386 / tls.h
1 /* Definition for thread-local data handling.  linuxthreads/i386 version.
2    Copyright (C) 2002 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, write to the Free
17    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
18    02111-1307 USA.  */
19
20 #ifndef _TLS_H
21 #define _TLS_H
22
23 # include <pt-machine.h>
24
25 #ifndef __ASSEMBLER__
26 # include <stddef.h>
27
28 /* Type for the dtv.  */
29 typedef union dtv
30 {
31   size_t counter;
32   void *pointer;
33 } dtv_t;
34
35
36 typedef struct
37 {
38   void *tcb;            /* Pointer to the TCB.  Not necessary the
39                            thread descriptor used by libpthread.  */
40   dtv_t *dtv;
41   void *self;           /* Pointer to the thread descriptor.  */
42 } tcbhead_t;
43 #endif
44
45
46 /* We can support TLS only if the floating-stack support is available.  */
47 #if defined FLOATING_STACKS && defined HAVE_TLS_SUPPORT
48
49 /* Signal that TLS support is available.  */
50 # define USE_TLS        1
51
52 # ifndef __ASSEMBLER__
53 /* Get system call information.  */
54 #  include <sysdep.h>
55
56
57 /* Get the thread descriptor definition.  */
58 #  include <linuxthreads/descr.h>
59
60 /* This is the size of the initial TCB.  */
61 #  define TLS_INIT_TCB_SIZE sizeof (tcbhead_t)
62
63 /* Alignment requirements for the initial TCB.  */
64 #  define TLS_INIT_TCB_ALIGN __alignof__ (tcbhead_t)
65
66 /* This is the size of the TCB.  */
67 #  define TLS_TCB_SIZE sizeof (struct _pthread_descr_struct)
68
69 /* Alignment requirements for the TCB.  */
70 #  define TLS_TCB_ALIGN __alignof__ (struct _pthread_descr_struct)
71
72 /* The TCB can have any size and the memory following the address the
73    thread pointer points to is unspecified.  Allocate the TCB there.  */
74 #  define TLS_TCB_AT_TP 1
75
76
77 /* Install the dtv pointer.  The pointer passed is to the element with
78    index -1 which contain the length.  */
79 #  define INSTALL_DTV(descr, dtvp) \
80   ((tcbhead_t *) (descr))->dtv = (dtvp) + 1
81
82 /* Install new dtv for current thread.  */
83 #  define INSTALL_NEW_DTV(dtv) \
84   ({ struct _pthread_descr_struct *__descr;                                   \
85      THREAD_SETMEM (__descr, p_header.data.dtvp, (dtv)); })
86
87 /* Return dtv of given thread descriptor.  */
88 #  define GET_DTV(descr) \
89   (((tcbhead_t *) (descr))->dtv)
90
91 #  define TLS_DO_MODIFY_LDT(descr, nr)                                        \
92 ({                                                                            \
93   struct modify_ldt_ldt_s ldt_entry =                                         \
94     { nr, (unsigned long int) (descr), sizeof (struct _pthread_descr_struct), \
95       1, 0, 0, 0, 0, 1, 0 };                                                  \
96   int result;                                                                 \
97   asm volatile (                                                              \
98        "pushl %%ebx\n\t"                                                      \
99        "movl $1, %%ebx\n\t"                                                   \
100        "int $0x80\n\t"                                                        \
101        "popl %%ebx"                                                           \
102        : "=a" (result)                                                        \
103        : "0" (__NR_modify_ldt),                                               \
104          /* The extra argument with the "m" constraint is necessary           \
105             to let the compiler know that we are accessing LDT_ENTRY here.  */\
106          "m" (ldt_entry), "c" (&ldt_entry), "d" (sizeof (ldt_entry)));        \
107   __builtin_expect (result, 0) != 0 ? -1 : nr * 8 + 7;                        \
108 })
109
110 #  define TLS_DO_SET_THREAD_AREA(descr)                                       \
111  INLINE_SYSCALL (set_thread_area, 2, descr, 1);                               \
112   if (__builtin_expect (__seg, 0) == -1)                                      \
113     /* Nothing else we can do.  */                                            \
114     asm ("hlt");                                                              \
115   __seg;                                                                      \
116 })
117
118 #  ifdef __ASSUME_SET_THREAD_AREA_SYSCALL
119 #   define TLS_SETUP_GS_SEGMENT(descr) \
120   INLINE_SYSCALL (set_thread_area, 2, descr, 1)
121 #  elif defined __NR_set_thread_area
122 #   define TLS_SETUP_GS_SEGMENT(descr) \
123   ({ int __seg = INLINE_SYSCALL (set_thread_area, 2, descr, 1); \
124      __seg == -1 ? TLS_DO_MODIFY_LDT (descr, 0) : __seg; })
125 #  else
126 #   define TLS_SETUP_GS_SEGMENT(descr) \
127   TLS_DO_MODIFY_LDT (descr, 0)
128 #  endif
129
130 /* Code to initially initialize the thread pointer.  This might need
131    special attention since 'errno' is not yet available and if the
132    operation can cause a failure 'errno' must not be touched.  */
133 #  define TLS_INIT_TP(descr) \
134   do {                                                                        \
135     void *_descr = (descr);                                                   \
136     tcbhead_t *head = _descr;                                                 \
137     int __gs;                                                                 \
138                                                                               \
139     head->tcb = _descr;                                                       \
140     /* For now the thread descriptor is at the same address.  */              \
141     head->self = _descr;                                                      \
142                                                                               \
143     __gs = TLS_SETUP_GS_SEGMENT (_descr);                                     \
144     if (__builtin_expect (__gs, 7) == -1)                                     \
145       /* Nothing else we can do.  */                                          \
146       asm ("hlt");                                                            \
147     asm ("movw %w0, %%gs" : : "q" (__gs));                                    \
148   } while (0)
149
150
151 /* Return the address of the dtv for the current thread.  */
152 #  define THREAD_DTV() \
153   ({ struct _pthread_descr_struct *__descr;                                   \
154      THREAD_GETMEM (__descr, p_header.data.dtvp); })
155
156 # endif /* FLOATING_STACKS && HAVE_TLS_SUPPORT */
157 #endif /* __ASSEMBLER__ */
158
159 #endif  /* tls.h */