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.4 2005/03/15 11:26:34 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
  40 #define DTV_OFFSET              offsetof(struct tcb, tcb_dtv)
  41
  42 struct pthread;
  43
  44 /*
  45  * Variant II tcb, %gs points to the struct.
  46  */
  47 struct tcb {
  48         struct tcb              *tcb_self;      /* required by rtld */
  49         void                    *tcb_dtv;       /* required by rtld */
  50         struct pthread          *tcb_thread;
  51         int                     tcb_seg;
  52 };
  53
  54 /*
  55  * Evaluates to the byte offset of the per-tcb variable name.
  56  */
  57 #define __tcb_offset(name)      __offsetof(struct tcb, name)
  58
  59 /*
  60  * Evaluates to the type of the per-tcb variable name.
  61  */
  62 #define __tcb_type(name)        __typeof(((struct tcb *)0)->name)
  63
  64 /*
  65  * Evaluates to the value of the per-tcb variable name.
  66  */
  67 #define TCB_GET32(name) ({                                      \
  68         __tcb_type(name) __result;                              \
  69                                                                 \
  70         u_int __i;                                              \
  71         __asm __volatile("movl %%gs:%1, %0"                     \
  72             : "=r" (__i)                                        \
  73             : "m" (*(u_int *)(__tcb_offset(name))));            \
  74         __result = (__tcb_type(name))__i;                       \
  75                                                                 \
  76         __result;                                               \
  77 })
  78
  79 static __inline int
  80 atomic_cmpset_int(volatile int *dst, int exp, int src)
  81 {
  82         int res = exp;
  83
  84         __asm __volatile (
  85         "       lock cmpxchgl %1,%2 ;   "
  86         "       setz    %%al ;          "
  87         "       movzbl  %%al,%0 ;       "
  88         "1:                             "
  89         "# atomic_cmpset_int"
  90         : "+a" (res)                    /* 0 (result) */
  91         : "r" (src),                    /* 1 */
  92           "m" (*(dst))                  /* 2 */
  93         : "memory");
  94
  95         return (res);
  96 }
  97
  98 #define atomic_cmpset_acq_int   atomic_cmpset_int
  99
 100 /*
 101  * The constructors.
 102  */
 103 struct tcb      *_tcb_ctor(struct pthread *, int);
 104 void            _tcb_dtor(struct tcb *tcb);
 105
 106 /* Called from the thread to set its private data. */
 107 void            _tcb_set(struct tcb *tcb);
 108
 109 /* Get the current kcb. */
 110 static __inline struct tcb *
 111 _tcb_get(void)
 112 {
 113         return (TCB_GET32(tcb_self));
 114 }
 115
 116 extern struct pthread *_thr_initial;
 117
 118 /* Get the current thread. */
 119 static __inline struct pthread *
 120 _get_curthread(void)
 121 {
 122         if (_thr_initial)
 123                 return (TCB_GET32(tcb_thread));
 124         return (NULL);
 125 }
 126 #endif