Import prebinding code into DragonFly, based on Matthew N. Dodd's
[dragonfly.git] / libexec / rtld-elf / i386 / rtld_machdep.h
1 /*-
2  * Copyright (c) 1999, 2000 John D. Polstra.
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  *
26  * $FreeBSD: src/libexec/rtld-elf/i386/rtld_machdep.h,v 1.3.2.2 2002/07/02 04:10:51 jdp Exp $
27  * $DragonFly: src/libexec/rtld-elf/i386/rtld_machdep.h,v 1.3 2003/09/18 21:23:02 dillon Exp $
28  */
29
30 #ifndef RTLD_MACHDEP_H
31 #define RTLD_MACHDEP_H  1
32
33 /* Return the address of the .dynamic section in the dynamic linker. */
34 #define rtld_dynamic(obj) \
35     ((const Elf_Dyn *)((obj)->relocbase + (Elf_Addr)&_DYNAMIC))
36
37 /* Fixup the jump slot at "where" to transfer control to "target". */
38 #define reloc_jmpslot(where, target)                    \
39     do {                                                \
40         dbg("reloc_jmpslot: *%p = %p", (void *)(where), \
41           (void *)(target));                            \
42         (*(Elf_Addr *)(where) = (Elf_Addr)(target));    \
43     } while (0)
44
45 static inline void
46 atomic_decr_int(volatile int *p)
47 {
48     __asm __volatile ("lock; decl %0" : "+m"(*p) : : "cc");
49 }
50
51 static inline void
52 atomic_incr_int(volatile int *p)
53 {
54     __asm __volatile ("lock; incl %0" : "+m"(*p) : : "cc");
55 }
56
57 static inline void
58 atomic_add_int(volatile int *p, int val)
59 {
60     __asm __volatile ("lock; addl %1, %0"
61         : "+m"(*p)
62         : "ri"(val)
63         : "cc");
64 }
65
66 /*
67  * Optimized version of the calculation y = ky + m (mod p)
68  * See elf_uniqid() for details
69  */
70 static inline u_int32_t
71 uniqid_hash_block(u_int32_t hash, u_int32_t key, u_int32_t block)
72 {
73     int ret;
74
75     __asm __const (     "mull   %2\n\t"
76                         "lea    (%%edx,%%edx,4),%%edx\n\t"
77                         "addl   %%edx,%%eax\n\t"
78                         "lea    0x5(%%eax),%%edx\n\t"
79                         "cmovcl %%edx,%%eax\n\t"
80                         "addl   %3,%%eax\n\t"
81                         "lea    0x5(%%eax),%%edx\n\t"
82                         "cmovcl %%edx,%%eax\n\t"
83         : "=a"(ret) : "a"(hash), "rm"(key), "g"(block) : "cc", "dx");
84
85     return ret;
86 }
87
88 #endif