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