dtraceAttacher.cpp revision 1472:c18cbe5936b8 
1/*
2 * Copyright (c) 2006, 2007, Oracle and/or its affiliates. All rights reserved.
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * This code is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License version 2 only, as
7 * published by the Free Software Foundation.
8 *
9 * This code is distributed in the hope that it will be useful, but WITHOUT
10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
11 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
12 * version 2 for more details (a copy is included in the LICENSE file that
13 * accompanied this code).
14 *
15 * You should have received a copy of the GNU General Public License version
16 * 2 along with this work; if not, write to the Free Software Foundation,
17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
18 *
19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
20 * or visit www.oracle.com if you need additional information or have any
21 * questions.
22 *
23 */
24
25# include "incls/_precompiled.incl"
26# include "incls/_dtraceAttacher.cpp.incl"
27
28#ifdef SOLARIS
29
30class VM_DeoptimizeTheWorld : public VM_Operation {
31 public:
32  VMOp_Type type() const {
33    return VMOp_DeoptimizeTheWorld;
34  }
35  void doit() {
36    CodeCache::mark_all_nmethods_for_deoptimization();
37    ResourceMark rm;
38    DeoptimizationMarker dm;
39    // Deoptimize all activations depending on marked methods
40    Deoptimization::deoptimize_dependents();
41
42    // Mark the dependent methods non entrant
43    CodeCache::make_marked_nmethods_not_entrant();
44  }
45};
46
47static void set_bool_flag(const char* flag, bool value) {
48  CommandLineFlags::boolAtPut((char*)flag, strlen(flag), &value,
49                              ATTACH_ON_DEMAND);
50}
51
52// Enable only the "fine grained" flags. Do *not* touch
53// the overall "ExtendedDTraceProbes" flag.
54void DTrace::enable_dprobes(int probes) {
55  bool changed = false;
56  if (!DTraceAllocProbes && (probes & DTRACE_ALLOC_PROBES)) {
57    set_bool_flag("DTraceAllocProbes", true);
58    changed = true;
59  }
60  if (!DTraceMethodProbes && (probes & DTRACE_METHOD_PROBES)) {
61    set_bool_flag("DTraceMethodProbes", true);
62    changed = true;
63  }
64  if (!DTraceMonitorProbes && (probes & DTRACE_MONITOR_PROBES)) {
65    set_bool_flag("DTraceMonitorProbes", true);
66    changed = true;
67  }
68
69  if (changed) {
70    // one or more flags changed, need to deoptimize
71    VM_DeoptimizeTheWorld op;
72    VMThread::execute(&op);
73  }
74}
75
76// Disable only the "fine grained" flags. Do *not* touch
77// the overall "ExtendedDTraceProbes" flag.
78void DTrace::disable_dprobes(int probes) {
79  bool changed = false;
80  if (DTraceAllocProbes && (probes & DTRACE_ALLOC_PROBES)) {
81    set_bool_flag("DTraceAllocProbes", false);
82    changed = true;
83  }
84  if (DTraceMethodProbes && (probes & DTRACE_METHOD_PROBES)) {
85    set_bool_flag("DTraceMethodProbes", false);
86    changed = true;
87  }
88  if (DTraceMonitorProbes && (probes & DTRACE_MONITOR_PROBES)) {
89    set_bool_flag("DTraceMonitorProbes", false);
90    changed = true;
91  }
92  if (changed) {
93    // one or more flags changed, need to deoptimize
94    VM_DeoptimizeTheWorld op;
95    VMThread::execute(&op);
96  }
97}
98
99// Do clean-up on "all door clients detached" event.
100void DTrace::detach_all_clients() {
101  /*
102   * We restore the state of the fine grained flags
103   * to be consistent with overall ExtendedDTraceProbes.
104   * This way, we will honour command line setting or the
105   * last explicit modification of ExtendedDTraceProbes by
106   * a call to set_extended_dprobes.
107   */
108  if (ExtendedDTraceProbes) {
109    enable_dprobes(DTRACE_ALL_PROBES);
110  } else {
111    disable_dprobes(DTRACE_ALL_PROBES);
112  }
113}
114
115void DTrace::set_extended_dprobes(bool flag) {
116  // explicit setting of ExtendedDTraceProbes flag
117  set_bool_flag("ExtendedDTraceProbes", flag);
118
119  // make sure that the fine grained flags reflect the change.
120  if (flag) {
121    enable_dprobes(DTRACE_ALL_PROBES);
122  } else {
123    /*
124     * FIXME: Revisit this: currently all-client-detach detection
125     * does not work and hence disabled. The following scheme does
126     * not work. So, we have to disable fine-grained flags here.
127     *
128     * disable_dprobes call has to be delayed till next "detach all "event.
129     * This is to be  done so that concurrent DTrace clients that may
130     * have enabled one or more fine grained dprobes and may be running
131     * still. On "detach all" clients event, we would sync ExtendedDTraceProbes
132     * with  fine grained flags which would take care of disabling fine grained flags.
133     */
134    disable_dprobes(DTRACE_ALL_PROBES);
135  }
136}
137
138void DTrace::set_monitor_dprobes(bool flag) {
139  // explicit setting of DTraceMonitorProbes flag
140  set_bool_flag("DTraceMonitorProbes", flag);
141}
142
143#endif /* SOLARIS */
144