Import initial version of 1:1 pthread library.
[dragonfly.git] / lib / libthread_xu / arch / i386 / include / pthread_md.h
1 /*-
2  * Copyright (c) 2002 Daniel Eischen <deischen@freebsd.org>.
3  * Copyright (c) 2005 David Xu <davidxu@freebsd.org>.
4  * All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  *
15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25  * SUCH DAMAGE.
26  *
27  * $FreeBSD: src/lib/libpthread/arch/i386/include/pthread_md.h,v 1.13 2004/11/06 03:35:51 peter Exp $
28  * $DragonFly: src/lib/libthread_xu/arch/i386/include/pthread_md.h,v 1.1 2005/02/01 12:38:27 davidxu Exp $
29  */
30
31 /*
32  * Machine-dependent thread prototypes/definitions for the thread kernel.
33  */
34 #ifndef _PTHREAD_MD_H_
35 #define _PTHREAD_MD_H_
36
37 #include <stddef.h>
38 #include <sys/types.h>
39 #include <machine/sysarch.h>
40
41 #define DTV_OFFSET              offsetof(struct tcb, tcb_dtv)
42
43 struct pthread;
44
45 /*
46  * %gs points to a struct tcb.
47  */
48 struct tcb {
49         struct tcb              *tcb_self;      /* required by rtld */
50         void                    *tcb_dtv;       /* required by rtld */
51         struct pthread          *tcb_thread;
52         int                     tcb_ldt;
53 };
54
55 /*
56  * Evaluates to the byte offset of the per-thread variable name.
57  */
58 #define __tcb_offset(name)      __offsetof(struct tcb, name)
59
60 /*
61  * Evaluates to the type of the per-thread variable name.
62  */
63 #define __tcb_type(name)        __typeof(((struct tcb *)0)->name)
64
65 /*
66  * Evaluates to the value of the per-kse variable name.
67  */
68 #define TCB_GET32(name) ({                                      \
69         __tcb_type(name) __result;                              \
70                                                                 \
71         u_int __i;                                              \
72         __asm __volatile("movl %%gs:%1, %0"                     \
73             : "=r" (__i)                                        \
74             : "m" (*(u_int *)(__tcb_offset(name))));            \
75         __result = (__tcb_type(name))__i;                       \
76                                                                 \
77         __result;                                               \
78 })
79
80 #ifdef __DragonFly__
81 static __inline int
82 atomic_cmpset_int(volatile int *dst, int exp, int src)
83 {
84         int res = exp;
85
86         __asm __volatile (
87         "       lock cmpxchgl %1,%2 ;   "
88         "       setz    %%al ;          "
89         "       movzbl  %%al,%0 ;       "
90         "1:                             "
91         "# atomic_cmpset_int"
92         : "+a" (res)                    /* 0 (result) */
93         : "r" (src),                    /* 1 */
94           "m" (*(dst))                  /* 2 */
95         : "memory");                             
96
97         return (res);
98 }
99
100 #define atomic_cmpset_acq_int   atomic_cmpset_int
101 #endif
102
103 /*
104  * The constructors.
105  */
106 struct tcb      *_tcb_ctor(struct pthread *, int);
107 void            _tcb_dtor(struct tcb *tcb);
108
109 /* Called from the thread to set its private data. */
110 static __inline void
111 _tcb_set(struct tcb *tcb)
112 {
113 #ifndef COMPAT_32BIT
114         int val;
115
116         val = (tcb->tcb_ldt << 3) | 7;
117         __asm __volatile("movl %0, %%gs" : : "r" (val));
118 #else
119         _amd64_set_gsbase(tcb);
120 #endif
121
122 }
123
124 /* Get the current kcb. */
125 static __inline struct tcb *
126 _tcb_get(void)
127 {
128         return (TCB_GET32(tcb_self));
129 }
130
131 extern struct pthread *_thr_initial;
132
133 /* Get the current thread. */
134 static __inline struct pthread *
135 _get_curthread(void)
136 {
137         if (_thr_initial)
138                 return (TCB_GET32(tcb_thread));
139         return (NULL);
140 }
141 #endif