profile.h revision 1.35 1 1.35 christos /* $NetBSD: profile.h,v 1.35 2017/05/31 01:50:19 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.22 chs __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.27 christos __asm volatile("movl 4(%%ebp),%0" : "=r" (selfpc)); \
75 1.2 mycroft /* \
76 1.2 mycroft * frompcindex = pc pushed by call into self. \
77 1.2 mycroft */ \
78 1.27 christos __asm volatile("movl (%%ebp),%0;movl 4(%0),%0" \
79 1.16 enami : "=r" (frompcindex)); \
80 1.11 christos _mcount((u_long)frompcindex, (u_long)selfpc); \
81 1.27 christos \
82 1.28 christos __asm volatile("movl %0,%%edx" : : "g" (edx)); \
83 1.27 christos __asm volatile("movl %0,%%ecx" : : "g" (ecx)); \
84 1.27 christos __asm volatile("movl %0,%%eax" : : "g" (eax)); \
85 1.1 mycroft }
86 1.3 mycroft
87 1.6 jtc #ifdef _KERNEL
88 1.31 ad static inline void
89 1.31 ad mcount_disable_intr(void)
90 1.31 ad {
91 1.31 ad __asm volatile("cli");
92 1.31 ad }
93 1.31 ad
94 1.31 ad static inline u_long
95 1.31 ad mcount_read_psl(void)
96 1.31 ad {
97 1.31 ad u_long ef;
98 1.31 ad
99 1.31 ad __asm volatile("pushfl; popl %0" : "=r" (ef));
100 1.31 ad return (ef);
101 1.31 ad }
102 1.31 ad
103 1.31 ad static inline void
104 1.31 ad mcount_write_psl(u_long ef)
105 1.31 ad {
106 1.31 ad __asm volatile("pushl %0; popfl" : : "r" (ef));
107 1.31 ad }
108 1.31 ad
109 1.34 ryo #define MCOUNT_ENTER \
110 1.34 ryo do { s = (int)mcount_read_psl(); mcount_disable_intr(); } while (0)
111 1.34 ryo #define MCOUNT_EXIT do { mcount_write_psl(s); } while (0)
112 1.20 chs
113 1.6 jtc #endif /* _KERNEL */
114