profile.h revision 1.9 1 1.9 matt /* $NetBSD: profile.h,v 1.9 2013/08/15 22:41:15 matt Exp $ */
2 1.1 reinoud
3 1.1 reinoud /*
4 1.2 bjh21 * Copyright (c) 2001 Ben Harris
5 1.1 reinoud * Copyright (c) 1995-1996 Mark Brinicombe
6 1.1 reinoud *
7 1.1 reinoud * Redistribution and use in source and binary forms, with or without
8 1.1 reinoud * modification, are permitted provided that the following conditions
9 1.1 reinoud * are met:
10 1.1 reinoud * 1. Redistributions of source code must retain the above copyright
11 1.1 reinoud * notice, this list of conditions and the following disclaimer.
12 1.1 reinoud * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 reinoud * notice, this list of conditions and the following disclaimer in the
14 1.1 reinoud * documentation and/or other materials provided with the distribution.
15 1.1 reinoud * 3. All advertising materials mentioning features or use of this software
16 1.1 reinoud * must display the following acknowledgement:
17 1.1 reinoud * This product includes software developed by Mark Brinicombe.
18 1.1 reinoud * 4. The name of the author may not be used to endorse or promote products
19 1.1 reinoud * derived from this software without specific prior written permission.
20 1.1 reinoud *
21 1.1 reinoud * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22 1.1 reinoud * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23 1.1 reinoud * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24 1.1 reinoud * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25 1.1 reinoud * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26 1.1 reinoud * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27 1.1 reinoud * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28 1.1 reinoud * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29 1.1 reinoud * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30 1.1 reinoud * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 1.1 reinoud */
32 1.1 reinoud
33 1.1 reinoud #define _MCOUNT_DECL void _mcount
34 1.1 reinoud
35 1.1 reinoud /*
36 1.1 reinoud * Cannot implement mcount in C as GCC will trash the ip register when it
37 1.1 reinoud * pushes a trapframe. Pity we cannot insert assembly before the function
38 1.1 reinoud * prologue.
39 1.1 reinoud */
40 1.2 bjh21
41 1.2 bjh21 #define MCOUNT_ASM_NAME "__mcount"
42 1.3 matt #ifdef PIC
43 1.3 matt #define PLTSYM "(PLT)"
44 1.3 matt #endif
45 1.2 bjh21
46 1.3 matt #ifndef PLTSYM
47 1.3 matt #define PLTSYM
48 1.3 matt #endif
49 1.3 matt
50 1.9 matt #if !defined(__thumb__) && !defined(__ARM_EABI__)
51 1.1 reinoud #define MCOUNT \
52 1.9 matt __asm(".text"); \
53 1.7 perry __asm(".align 0"); \
54 1.7 perry __asm(".type " MCOUNT_ASM_NAME ",%function"); \
55 1.9 matt __asm(".global " MCOUNT_ASM_NAME); \
56 1.7 perry __asm(MCOUNT_ASM_NAME ":"); \
57 1.1 reinoud /* \
58 1.1 reinoud * Preserve registers that are trashed during mcount \
59 1.1 reinoud */ \
60 1.9 matt __asm("push {r0-r3, ip, lr}"); \
61 1.2 bjh21 /* Check what mode we're in. EQ => 32, NE => 26 */ \
62 1.7 perry __asm("teq r0, r0"); \
63 1.7 perry __asm("teq pc, r15"); \
64 1.1 reinoud /* \
65 1.1 reinoud * find the return address for mcount, \
66 1.1 reinoud * and the return address for mcount's caller. \
67 1.1 reinoud * \
68 1.1 reinoud * frompcindex = pc pushed by call into self. \
69 1.1 reinoud */ \
70 1.7 perry __asm("moveq r0, ip"); \
71 1.7 perry __asm("bicne r0, ip, #0xfc000003"); \
72 1.1 reinoud /* \
73 1.1 reinoud * selfpc = pc pushed by mcount call \
74 1.1 reinoud */ \
75 1.7 perry __asm("moveq r1, lr"); \
76 1.7 perry __asm("bicne r1, lr, #0xfc000003"); \
77 1.1 reinoud /* \
78 1.1 reinoud * Call the real mcount code \
79 1.1 reinoud */ \
80 1.7 perry __asm("bl " ___STRING(_C_LABEL(_mcount)) PLTSYM); \
81 1.1 reinoud /* \
82 1.1 reinoud * Restore registers that were trashed during mcount \
83 1.1 reinoud */ \
84 1.9 matt __asm("pop {r0-r3, lr, pc}"); \
85 1.9 matt __asm(".size " MCOUNT_ASM_NAME ", .-" MCOUNT_ASM_NAME);
86 1.9 matt #elif !defined(__thumb__) || defined(_ARM_ARCH_T2)
87 1.9 matt #define MCOUNT \
88 1.9 matt __asm(".text"); \
89 1.9 matt __asm(".align 0"); \
90 1.9 matt __asm(".type " MCOUNT_ASM_NAME ",%function"); \
91 1.9 matt __asm(".global " MCOUNT_ASM_NAME); \
92 1.9 matt __asm(MCOUNT_ASM_NAME ":"); \
93 1.9 matt /* \
94 1.9 matt * Preserve registers that are trashed during mcount \
95 1.9 matt */ \
96 1.9 matt __asm("push {r0-r3, ip, lr}"); \
97 1.9 matt /* \
98 1.9 matt * find the return address for mcount, \
99 1.9 matt * and the return address for mcount's caller. \
100 1.9 matt * \
101 1.9 matt * frompcindex = pc pushed by call into self. \
102 1.9 matt */ \
103 1.9 matt __asm("mov r0, ip"); \
104 1.9 matt /* \
105 1.9 matt * selfpc = pc pushed by mcount call \
106 1.9 matt */ \
107 1.9 matt __asm("mov r1, lr"); \
108 1.9 matt /* \
109 1.9 matt * Call the real mcount code \
110 1.9 matt */ \
111 1.9 matt __asm("bl " ___STRING(_C_LABEL(_mcount)) PLTSYM); \
112 1.9 matt /* \
113 1.9 matt * Restore registers that were trashed during mcount \
114 1.9 matt */ \
115 1.9 matt __asm("pop {r0-r3, lr, pc}"); \
116 1.9 matt __asm(".size " MCOUNT_ASM_NAME ", .-" MCOUNT_ASM_NAME);
117 1.9 matt #else
118 1.9 matt #define MCOUNT \
119 1.9 matt __asm(".text"); \
120 1.9 matt __asm(".align 0"); \
121 1.9 matt __asm(".thumb_func"); \
122 1.9 matt __asm(".type " MCOUNT_ASM_NAME ",%function"); \
123 1.9 matt __asm(".global " MCOUNT_ASM_NAME); \
124 1.9 matt __asm(MCOUNT_ASM_NAME ":"); \
125 1.9 matt /* \
126 1.9 matt * Preserve registers that are trashed during mcount \
127 1.9 matt */ \
128 1.9 matt __asm("push {r0-r4,lr}"); \
129 1.9 matt __asm("mov r4, ip"); \
130 1.9 matt /* \
131 1.9 matt * find the return address for mcount, \
132 1.9 matt * and the return address for mcount's caller. \
133 1.9 matt * \
134 1.9 matt * frompcindex = pc pushed by call into self. \
135 1.9 matt */ \
136 1.9 matt __asm("mov r0, ip"); \
137 1.9 matt /* \
138 1.9 matt * selfpc = pc pushed by mcount call \
139 1.9 matt */ \
140 1.9 matt __asm("mov r1, lr"); \
141 1.9 matt /* \
142 1.9 matt * Call the real mcount code \
143 1.9 matt */ \
144 1.9 matt __asm("bl " ___STRING(_C_LABEL(_mcount)) PLTSYM); \
145 1.9 matt /* \
146 1.9 matt * Restore registers that were trashed during mcount \
147 1.9 matt */ \
148 1.9 matt __asm("mov lr, r4"); \
149 1.9 matt __asm("pop {r0-r4, pc}"); \
150 1.9 matt __asm(".size " MCOUNT_ASM_NAME ", .-" MCOUNT_ASM_NAME);
151 1.9 matt #endif
152 1.1 reinoud
153 1.1 reinoud #ifdef _KERNEL
154 1.6 briggs #ifdef __PROG26
155 1.2 bjh21 extern int int_off_save(void);
156 1.2 bjh21 extern void int_restore(int);
157 1.2 bjh21 #define MCOUNT_ENTER (s = int_off_save())
158 1.2 bjh21 #define MCOUNT_EXIT int_restore(s)
159 1.2 bjh21 #else
160 1.4 thorpej #include <arm/cpufunc.h>
161 1.1 reinoud /*
162 1.1 reinoud * splhigh() and splx() are heavyweight, and call mcount(). Therefore
163 1.1 reinoud * we disabled interrupts (IRQ, but not FIQ) directly on the CPU.
164 1.1 reinoud *
165 1.1 reinoud * We're lucky that the CPSR and 's' both happen to be 'int's.
166 1.1 reinoud */
167 1.6 briggs #define MCOUNT_ENTER s = __set_cpsr_c(0x0080, 0x0080); /* kill IRQ */
168 1.6 briggs #define MCOUNT_EXIT __set_cpsr_c(0xffffffff, s); /* restore old value */
169 1.5 bjh21 #endif /* !acorn26 */
170 1.1 reinoud #endif /* _KERNEL */
171