1 /*
2 * Copyright (c) 2005, 2012, Oracle and/or its affiliates. All rights reserved.
3 * Copyright (c) 2009, 2012 Red Hat, Inc.
4 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5 *
6 * This code is free software; you can redistribute it and/or modify it
7 * under the terms of the GNU General Public License version 2 only, as
8 * published by the Free Software Foundation.
9 *
10 * This code is distributed in the hope that it will be useful, but WITHOUT
11 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
12 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
13 * version 2 for more details (a copy is included in the LICENSE file that
14 * accompanied this code).
15 *
16 * You should have received a copy of the GNU General Public License version
17 * 2 along with this work; if not, write to the Free Software Foundation,
18 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
19 *
20 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
21 * or visit www.oracle.com if you need additional information or have any
22 * questions.
23 *
24 */
25
26 #ifndef SHARE_VM_UTILITIES_DTRACE_HPP
27 #define SHARE_VM_UTILITIES_DTRACE_HPP
28
29 #if defined(DTRACE_ENABLED)
30
31 #include <sys/sdt.h>
32
33 #define DTRACE_ONLY(x) x
34 #define NOT_DTRACE(x)
35
36 #if defined(SOLARIS)
37 // Work around dtrace tail call bug 6672627 until it is fixed in solaris 10.
38 #define HS_DTRACE_WORKAROUND_TAIL_CALL_BUG() \
39 do { volatile size_t dtrace_workaround_tail_call_bug = 1; } while (0)
40
41 #define USDT2 1
42 #include "dtracefiles/hotspot.h"
43 #include "dtracefiles/hotspot_jni.h"
44 #include "dtracefiles/hs_private.h"
45 #elif defined(LINUX)
46 #define HS_DTRACE_WORKAROUND_TAIL_CALL_BUG()
47 #define USDT1 1
48 #elif defined(__APPLE__)
49 #define HS_DTRACE_WORKAROUND_TAIL_CALL_BUG()
50 #define USDT2 1
51 #include <sys/types.h>
52 #include "dtracefiles/hotspot.h"
53 #include "dtracefiles/hotspot_jni.h"
54 #include "dtracefiles/hs_private.h"
55 #else
56 #error "dtrace enabled for unknown os"
57 #endif /* defined(SOLARIS) */
58
59 #else /* defined(DTRACE_ENABLED) */
60
61 #define DTRACE_ONLY(x)
62 #define NOT_DTRACE(x) x
63
64 #define HS_DTRACE_WORKAROUND_TAIL_CALL_BUG()
65
66 #ifndef USDT2
67
68 #define DTRACE_PROBE(a,b) {;}
69 #define DTRACE_PROBE1(a,b,c) {;}
70 #define DTRACE_PROBE2(a,b,c,d) {;}
71 #define DTRACE_PROBE3(a,b,c,d,e) {;}
72 #define DTRACE_PROBE4(a,b,c,d,e,f) {;}
73 #define DTRACE_PROBE5(a,b,c,d,e,f,g) {;}
74 #define DTRACE_PROBE6(a,b,c,d,e,f,g,h) {;}
75 #define DTRACE_PROBE7(a,b,c,d,e,f,g,h,i) {;}
76 #define DTRACE_PROBE8(a,b,c,d,e,f,g,h,i,j) {;}
77 #define DTRACE_PROBE9(a,b,c,d,e,f,g,h,i,j,k) {;}
78 #define DTRACE_PROBE10(a,b,c,d,e,f,g,h,i,j,k,l) {;}
79
80 #else /* USDT2 */
81
82 #include "dtrace_usdt2_disabled.hpp"
83 #endif /* USDT2 */
84
85 #endif /* defined(DTRACE_ENABLED) */
86
87 #ifndef USDT2
88
89 #define HS_DTRACE_PROBE_FN(provider,name)\
90 __dtrace_##provider##___##name
91
92 #ifdef SOLARIS
93 // Solaris dtrace needs actual extern function decls.
94 #define HS_DTRACE_PROBE_DECL_N(provider,name,args) \
95 DTRACE_ONLY(extern "C" void HS_DTRACE_PROBE_FN(provider,name) args)
96 #define HS_DTRACE_PROBE_CDECL_N(provider,name,args) \
97 DTRACE_ONLY(extern void HS_DTRACE_PROBE_FN(provider,name) args)
98 #else
99 // Systemtap dtrace compatible probes on GNU/Linux don't.
100 // If dtrace is disabled this macro becomes NULL
101 #define HS_DTRACE_PROBE_DECL_N(provider,name,args)
102 #define HS_DTRACE_PROBE_CDECL_N(provider,name,args)
103 #endif
104
105 /* Dtrace probe declarations */
106 #define HS_DTRACE_PROBE_DECL(provider,name) \
107 HS_DTRACE_PROBE_DECL0(provider,name)
108 #define HS_DTRACE_PROBE_DECL0(provider,name)\
109 HS_DTRACE_PROBE_DECL_N(provider,name,(void))
110 #define HS_DTRACE_PROBE_DECL1(provider,name,t0)\
111 HS_DTRACE_PROBE_DECL_N(provider,name,(uintptr_t))
112 #define HS_DTRACE_PROBE_DECL2(provider,name,t0,t1)\
113 HS_DTRACE_PROBE_DECL_N(provider,name,(uintptr_t,uintptr_t))
114 #define HS_DTRACE_PROBE_DECL3(provider,name,t0,t1,t2)\
115 HS_DTRACE_PROBE_DECL_N(provider,name,(uintptr_t,uintptr_t,uintptr_t))
116 #define HS_DTRACE_PROBE_DECL4(provider,name,t0,t1,t2,t3)\
117 HS_DTRACE_PROBE_DECL_N(provider,name,(uintptr_t,uintptr_t,uintptr_t,\
118 uintptr_t))
119 #define HS_DTRACE_PROBE_DECL5(provider,name,t0,t1,t2,t3,t4)\
120 HS_DTRACE_PROBE_DECL_N(provider,name,(\
121 uintptr_t,uintptr_t,uintptr_t,uintptr_t,uintptr_t))
122 #define HS_DTRACE_PROBE_DECL6(provider,name,t0,t1,t2,t3,t4,t5)\
123 HS_DTRACE_PROBE_DECL_N(provider,name,(\
124 uintptr_t,uintptr_t,uintptr_t,uintptr_t,uintptr_t,uintptr_t))
125 #define HS_DTRACE_PROBE_DECL7(provider,name,t0,t1,t2,t3,t4,t5,t6)\
126 HS_DTRACE_PROBE_DECL_N(provider,name,(\
127 uintptr_t,uintptr_t,uintptr_t,uintptr_t,uintptr_t,uintptr_t,uintptr_t))
128 #define HS_DTRACE_PROBE_DECL8(provider,name,t0,t1,t2,t3,t4,t5,t6,t7)\
129 HS_DTRACE_PROBE_DECL_N(provider,name,(\
130 uintptr_t,uintptr_t,uintptr_t,uintptr_t,uintptr_t,uintptr_t,uintptr_t,\
131 uintptr_t))
132 #define HS_DTRACE_PROBE_DECL9(provider,name,t0,t1,t2,t3,t4,t5,t6,t7,t8)\
133 HS_DTRACE_PROBE_DECL_N(provider,name,(\
134 uintptr_t,uintptr_t,uintptr_t,uintptr_t,uintptr_t,uintptr_t,uintptr_t,\
135 uintptr_t,uintptr_t))
136 #define HS_DTRACE_PROBE_DECL10(provider,name,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9)\
137 HS_DTRACE_PROBE_DECL_N(provider,name,(\
138 uintptr_t,uintptr_t,uintptr_t,uintptr_t,uintptr_t,uintptr_t,uintptr_t,\
139 uintptr_t,uintptr_t,uintptr_t))
140
141 /* Dtrace probe definitions */
142 #if defined(SOLARIS)
143 // Solaris dtrace uses actual function calls.
144 #define HS_DTRACE_PROBE_N(provider,name, args) \
145 DTRACE_ONLY(HS_DTRACE_PROBE_FN(provider,name) args)
146
147 #define HS_DTRACE_PROBE(provider,name) HS_DTRACE_PROBE0(provider,name)
148 #define HS_DTRACE_PROBE0(provider,name)\
149 HS_DTRACE_PROBE_N(provider,name,())
150 #define HS_DTRACE_PROBE1(provider,name,a0)\
151 HS_DTRACE_PROBE_N(provider,name,((uintptr_t)a0))
152 #define HS_DTRACE_PROBE2(provider,name,a0,a1)\
153 HS_DTRACE_PROBE_N(provider,name,((uintptr_t)a0,(uintptr_t)a1))
154 #define HS_DTRACE_PROBE3(provider,name,a0,a1,a2)\
155 HS_DTRACE_PROBE_N(provider,name,((uintptr_t)a0,(uintptr_t)a1,(uintptr_t)a2))
156 #define HS_DTRACE_PROBE4(provider,name,a0,a1,a2,a3)\
157 HS_DTRACE_PROBE_N(provider,name,((uintptr_t)a0,(uintptr_t)a1,(uintptr_t)a2,\
158 (uintptr_t)a3))
159 #define HS_DTRACE_PROBE5(provider,name,a0,a1,a2,a3,a4)\
160 HS_DTRACE_PROBE_N(provider,name,((uintptr_t)a0,(uintptr_t)a1,(uintptr_t)a2,\
161 (uintptr_t)a3,(uintptr_t)a4))
162 #define HS_DTRACE_PROBE6(provider,name,a0,a1,a2,a3,a4,a5)\
163 HS_DTRACE_PROBE_N(provider,name,((uintptr_t)a0,(uintptr_t)a1,(uintptr_t)a2,\
164 (uintptr_t)a3,(uintptr_t)a4,(uintptr_t)a5))
165 #define HS_DTRACE_PROBE7(provider,name,a0,a1,a2,a3,a4,a5,a6)\
166 HS_DTRACE_PROBE_N(provider,name,((uintptr_t)a0,(uintptr_t)a1,(uintptr_t)a2,\
167 (uintptr_t)a3,(uintptr_t)a4,(uintptr_t)a5,(uintptr_t)a6))
168 #define HS_DTRACE_PROBE8(provider,name,a0,a1,a2,a3,a4,a5,a6,a7)\
169 HS_DTRACE_PROBE_N(provider,name,((uintptr_t)a0,(uintptr_t)a1,(uintptr_t)a2,\
170 (uintptr_t)a3,(uintptr_t)a4,(uintptr_t)a5,(uintptr_t)a6,(uintptr_t)a7))
171 #define HS_DTRACE_PROBE9(provider,name,a0,a1,a2,a3,a4,a5,a6,a7,a8)\
172 HS_DTRACE_PROBE_N(provider,name,((uintptr_t)a0,(uintptr_t)a1,(uintptr_t)a2,\
173 (uintptr_t)a3,(uintptr_t)a4,(uintptr_t)a5,(uintptr_t)a6,(uintptr_t)a7,\
174 (uintptr_t)a8))
175 #define HS_DTRACE_PROBE10(provider,name,a0,a1,a2,a3,a4,a5,a6,a7,a8,a9)\
176 HS_DTRACE_PROBE_N(provider,name,((uintptr_t)a0,(uintptr_t)a1,(uintptr_t)a2,\
177 (uintptr_t)a3,(uintptr_t)a4,(uintptr_t)a5,(uintptr_t)a6,(uintptr_t)a7,\
178 (uintptr_t)a8,(uintptr_t)a9))
179 #else
180 // Systemtap dtrace compatible probes on GNU/Linux use direct macros.
181 // If dtrace is disabled this macro becomes NULL
182 #define HS_DTRACE_PROBE(provider,name) HS_DTRACE_PROBE0(provider,name)
183 #define HS_DTRACE_PROBE0(provider,name)\
184 DTRACE_PROBE(provider,name)
185 #define HS_DTRACE_PROBE1(provider,name,a0)\
186 DTRACE_PROBE1(provider,name,a0)
187 #define HS_DTRACE_PROBE2(provider,name,a0,a1)\
188 DTRACE_PROBE2(provider,name,a0,a1)
189 #define HS_DTRACE_PROBE3(provider,name,a0,a1,a2)\
190 DTRACE_PROBE3(provider,name,a0,a1,a2)
191 #define HS_DTRACE_PROBE4(provider,name,a0,a1,a2,a3)\
192 DTRACE_PROBE4(provider,name,a0,a1,a2,a3)
193 #define HS_DTRACE_PROBE5(provider,name,a0,a1,a2,a3,a4)\
194 DTRACE_PROBE5(provider,name,a0,a1,a2,a3,a4)
195 #define HS_DTRACE_PROBE6(provider,name,a0,a1,a2,a3,a4,a5)\
196 DTRACE_PROBE6(provider,name,a0,a1,a2,a3,a4,a5)
197 #define HS_DTRACE_PROBE7(provider,name,a0,a1,a2,a3,a4,a5,a6)\
198 DTRACE_PROBE7(provider,name,a0,a1,a2,a3,a4,a5,a6)
199 #define HS_DTRACE_PROBE8(provider,name,a0,a1,a2,a3,a4,a5,a6,a7)\
200 DTRACE_PROBE8(provider,name,a0,a1,a2,a3,a4,a5,a6,a7)
201 #define HS_DTRACE_PROBE9(provider,name,a0,a1,a2,a3,a4,a5,a6,a7,a8)\
202 DTRACE_PROBE9(provider,name,a0,a1,a2,a3,a4,a5,a6,a7,a8)
203 #define HS_DTRACE_PROBE10(provider,name,a0,a1,a2,a3,a4,a5,a6,a7,a8,a9)\
204 DTRACE_PROBE10(provider,name,a0,a1,a2,a3,a4,a5,a6,a7,a8,a9)
205 #endif
206
207 #endif /* !USDT2 */
208
209 #endif // SHARE_VM_UTILITIES_DTRACE_HPP