profile.h revision 1.37 1 1.37 christos /* $NetBSD: profile.h,v 1.37 2017/06/08 18:25:14 christos Exp $ */
2 1.5 cgd
3 1.1 mycroft /*
4 1.1 mycroft * Copyright (c) 1992, 1993
5 1.1 mycroft * The Regents of the University of California. All rights reserved.
6 1.1 mycroft *
7 1.1 mycroft * Redistribution and use in source and binary forms, with or without
8 1.1 mycroft * modification, are permitted provided that the following conditions
9 1.1 mycroft * are met:
10 1.1 mycroft * 1. Redistributions of source code must retain the above copyright
11 1.1 mycroft * notice, this list of conditions and the following disclaimer.
12 1.1 mycroft * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 mycroft * notice, this list of conditions and the following disclaimer in the
14 1.1 mycroft * documentation and/or other materials provided with the distribution.
15 1.17 agc * 3. Neither the name of the University nor the names of its contributors
16 1.1 mycroft * may be used to endorse or promote products derived from this software
17 1.1 mycroft * without specific prior written permission.
18 1.1 mycroft *
19 1.1 mycroft * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 1.1 mycroft * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 1.1 mycroft * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 1.1 mycroft * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 1.1 mycroft * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 1.1 mycroft * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 1.1 mycroft * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 1.1 mycroft * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 1.1 mycroft * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 1.1 mycroft * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 1.1 mycroft * SUCH DAMAGE.
30 1.1 mycroft *
31 1.5 cgd * @(#)profile.h 8.1 (Berkeley) 6/11/93
32 1.1 mycroft */
33 1.1 mycroft
34 1.30 ad #ifdef _KERNEL
35 1.19 yamt #include <machine/cpufunc.h>
36 1.30 ad #endif
37 1.19 yamt
38 1.25 perry #define _MCOUNT_DECL static __inline void _mcount
39 1.1 mycroft
40 1.12 kleink #ifdef __ELF__
41 1.12 kleink #define MCOUNT_ENTRY "__mcount"
42 1.14 mycroft #define MCOUNT_COMPAT __weak_alias(mcount, __mcount)
43 1.12 kleink #else
44 1.12 kleink #define MCOUNT_ENTRY "mcount"
45 1.12 kleink #define MCOUNT_COMPAT /* nothing */
46 1.12 kleink #endif
47 1.12 kleink
48 1.35 christos #if defined(_REENTRANT) && !defined(_KERNEL)
49 1.35 christos #define MCOUNT_ACTIVE if (_gmonparam.state != GMON_PROF_ON) return
50 1.35 christos #else
51 1.35 christos #define MCOUNT_ACTIVE
52 1.35 christos #endif
53 1.35 christos
54 1.1 mycroft #define MCOUNT \
55 1.13 enami MCOUNT_COMPAT \
56 1.24 perry extern void mcount(void) __asm(MCOUNT_ENTRY) \
57 1.37 christos __attribute__((__no_instrument_function__)); \
58 1.2 mycroft void \
59 1.22 chs mcount(void) \
60 1.2 mycroft { \
61 1.2 mycroft int selfpc, frompcindex; \
62 1.28 christos int eax, ecx, edx; \
63 1.27 christos \
64 1.35 christos MCOUNT_ACTIVE; \
65 1.27 christos __asm volatile("movl %%eax,%0" : "=g" (eax)); \
66 1.27 christos __asm volatile("movl %%ecx,%0" : "=g" (ecx)); \
67 1.28 christos __asm volatile("movl %%edx,%0" : "=g" (edx)); \
68 1.2 mycroft /* \
69 1.2 mycroft * find the return address for mcount, \
70 1.2 mycroft * and the return address for mcount's caller. \
71 1.2 mycroft * \
72 1.2 mycroft * selfpc = pc pushed by mcount call \
73 1.2 mycroft */ \
74 1.37 christos selfpc = (int)__builtin_return_address(0); \
75 1.2 mycroft /* \
76 1.37 christos * frompcindex = stack frame of caller, assuming frame pointer \
77 1.2 mycroft */ \
78 1.37 christos frompcindex = ((int *)__builtin_frame_address(1))[1]; \
79 1.11 christos _mcount((u_long)frompcindex, (u_long)selfpc); \
80 1.27 christos \
81 1.28 christos __asm volatile("movl %0,%%edx" : : "g" (edx)); \
82 1.27 christos __asm volatile("movl %0,%%ecx" : : "g" (ecx)); \
83 1.27 christos __asm volatile("movl %0,%%eax" : : "g" (eax)); \
84 1.1 mycroft }
85 1.3 mycroft
86 1.6 jtc #ifdef _KERNEL
87 1.31 ad static inline void
88 1.31 ad mcount_disable_intr(void)
89 1.31 ad {
90 1.31 ad __asm volatile("cli");
91 1.31 ad }
92 1.31 ad
93 1.31 ad static inline u_long
94 1.31 ad mcount_read_psl(void)
95 1.31 ad {
96 1.31 ad u_long ef;
97 1.31 ad
98 1.31 ad __asm volatile("pushfl; popl %0" : "=r" (ef));
99 1.31 ad return (ef);
100 1.31 ad }
101 1.31 ad
102 1.31 ad static inline void
103 1.31 ad mcount_write_psl(u_long ef)
104 1.31 ad {
105 1.31 ad __asm volatile("pushl %0; popfl" : : "r" (ef));
106 1.31 ad }
107 1.31 ad
108 1.34 ryo #define MCOUNT_ENTER \
109 1.34 ryo do { s = (int)mcount_read_psl(); mcount_disable_intr(); } while (0)
110 1.34 ryo #define MCOUNT_EXIT do { mcount_write_psl(s); } while (0)
111 1.20 chs
112 1.6 jtc #endif /* _KERNEL */
113