0N/A#!/usr/sbin/dtrace -s
0N/A/*
2362N/A * Copyright (c) 2006, Oracle and/or its affiliates. All rights reserved.
0N/A *
0N/A * Redistribution and use in source and binary forms, with or without
0N/A * modification, are permitted provided that the following conditions
0N/A * are met:
0N/A *
0N/A * - Redistributions of source code must retain the above copyright
0N/A * notice, this list of conditions and the following disclaimer.
0N/A *
0N/A * - Redistributions in binary form must reproduce the above copyright
0N/A * notice, this list of conditions and the following disclaimer in the
0N/A * documentation and/or other materials provided with the distribution.
0N/A *
2362N/A * - Neither the name of Oracle nor the names of its
0N/A * contributors may be used to endorse or promote products derived
0N/A * from this software without specific prior written permission.
0N/A *
0N/A * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
0N/A * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
0N/A * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
0N/A * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
0N/A * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
0N/A * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
0N/A * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
0N/A * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
0N/A * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
0N/A * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
0N/A * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
0N/A */
0N/A
0N/A/*
0N/A*/
0N/A
0N/A/*
0N/A * Description:
0N/A * dtrace -c option launches the command specified in the -c argument and
0N/A * starts tracing the process. Typically, you can run a D script and trace
0N/A * a Java application as follows:
0N/A * dscript.d -Zc "java HelloWorld"
0N/A *
0N/A * The -Z option is needed to permit probe descriptions that match zero
0N/A * probes because Hotspot probes definitions are located in libjvm.so which
0N/A * has not been yet loaded and thus can't be enabled until the application
0N/A * is started.
0N/A *
0N/A * Straightforward attempt to run D script may fail, e.g.:
0N/A * dscript.d -c "java HelloWorld"
0N/A * "probe description hotspotPID:::probename does not match any probes"
0N/A *
0N/A * This is because DTrace tries to enable probes before libjvm.so is loaded.
0N/A * The -Z option requires Solaris patch 118822-30 installed on your system.
0N/A *
0N/A * In case you don't have this Solaris patch use dtrace_helper.d script.
0N/A * This script waits until the Hotspot DTrace probes are loaded and then
0N/A * stops the Java process (passed as '-c' options). After the process is
0N/A * stopped, another D script (passed as first argument) is called to do real
0N/A * trace of Java process.
0N/A *
0N/A * Usage example:
0N/A * dtrace_helper.d -c "java ..." ../hotspot/class_loading_stat.d
0N/A */
0N/A
0N/A#pragma D option quiet
0N/A#pragma D option destructive
0N/A
0N/A
0N/Apid$target::dlopen:entry
0N/A{
0N/A self->filename = arg0;
0N/A}
0N/A
0N/A
0N/Apid$target::dlopen:return
0N/A/self->filename && basename(copyinstr(self->filename)) == "libjvm.so"/
0N/A{
0N/A printf(" loaded %s\n", basename(copyinstr(self->filename)));
0N/A self->filename = 0;
0N/A
0N/A stop();
0N/A printf(" stopped java process with pid=%d \n", $target);
0N/A
0N/A printf(" run: %s -p %d &", $1, $target);
0N/A system("(%s -p %d) &", $1, $target);
0N/A exit(0);
0N/A}