Mercurial > hg > graal-compiler
view src/share/vm/prims/jvmtiEnter.xsl @ 2149:7e37af9d69ef
7011379: G1: overly long concurrent marking cycles
Summary: This changeset introduces filtering of SATB buffers at the point when they are about to be enqueued. If this filtering clears enough entries on each buffer, the buffer can then be re-used and not enqueued. This cuts down the number of SATB buffers that need to be processed by the concurrent marking threads.
Reviewed-by: johnc, ysr
author | tonyp |
---|---|
date | Wed, 19 Jan 2011 09:35:17 -0500 |
parents | f95d63e2154a |
children | a6eef545f1a2 |
line wrap: on
line source
<?xml version="1.0"?> <!-- Copyright (c) 2002, 2010, Oracle and/or its affiliates. All rights reserved. DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. This code is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License version 2 only, as published by the Free Software Foundation. This code is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License version 2 for more details (a copy is included in the LICENSE file that accompanied this code). You should have received a copy of the GNU General Public License version 2 along with this work; if not, write to the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA or visit www.oracle.com if you need additional information or have any questions. --> <xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0"> <xsl:import href="jvmtiLib.xsl"/> <xsl:output method="text" indent="no" omit-xml-declaration="yes"/> <xsl:param name="trace"></xsl:param> <xsl:param name="interface"></xsl:param> <xsl:template match="specification"> <xsl:call-template name="sourceHeader"/> <xsl:text> # include "precompiled.hpp" # include "prims/jvmtiEnter.hpp" # include "prims/jvmtiRawMonitor.hpp" # include "prims/jvmtiUtil.hpp" </xsl:text> <xsl:if test="$trace = 'Trace'"> <xsl:text> #ifdef JVMTI_TRACE </xsl:text> </xsl:if> <xsl:if test="$trace != 'Trace'"> <xsl:text> // Error names const char* JvmtiUtil::_error_names[] = { </xsl:text> <xsl:call-template name="fillEntityName"> <xsl:with-param name="entities" select="errorsection/errorcategory/errorid"/> </xsl:call-template> <xsl:text> }; // Event threaded const bool JvmtiUtil::_event_threaded[] = { </xsl:text> <xsl:call-template name="fillEventThreaded"> <xsl:with-param name="entities" select="eventsection/event"/> </xsl:call-template> <xsl:text> }; </xsl:text> <xsl:call-template name="eventCapabilitiesTest"/> </xsl:if> <xsl:if test="$trace = 'Trace'"> <!-- all this just to return the highest event number --> <xsl:variable name="maxEvent"> <xsl:for-each select="eventsection/event"> <xsl:variable name="mynum" select="@num"/> <xsl:if test="count(../../eventsection/event[@num > $mynum]) = 0"> <xsl:value-of select="@num"/> </xsl:if> </xsl:for-each> </xsl:variable> <xsl:text>jbyte JvmtiTrace::_event_trace_flags[</xsl:text> <xsl:value-of select="1+$maxEvent"/> <xsl:text>]; jint JvmtiTrace::_max_event_index = </xsl:text> <xsl:value-of select="$maxEvent"/> <xsl:text>; // Event names const char* JvmtiTrace::_event_names[] = { </xsl:text> <xsl:call-template name="fillEntityName"> <xsl:with-param name="entities" select="eventsection/event"/> </xsl:call-template> <xsl:text> }; </xsl:text> <xsl:apply-templates select="//constants[@kind='enum']"/> </xsl:if> <xsl:apply-templates select="functionsection"/> <xsl:if test="$trace='Trace'"> <xsl:text> #endif /*JVMTI_TRACE */ </xsl:text> </xsl:if> </xsl:template> <xsl:template match="constants"> <xsl:text> // </xsl:text> <xsl:value-of select="@label"/> <xsl:text> names const char* </xsl:text> <xsl:value-of select="@id"/> <xsl:text>ConstantNames[] = { </xsl:text> <xsl:apply-templates select="constant" mode="constname"/> <xsl:text> NULL }; // </xsl:text> <xsl:value-of select="@label"/> <xsl:text> value jint </xsl:text> <xsl:value-of select="@id"/> <xsl:text>ConstantValues[] = { </xsl:text> <xsl:apply-templates select="constant" mode="constvalue"/> <xsl:text> 0 }; </xsl:text> </xsl:template> <xsl:template match="constant" mode="constname"> <xsl:text> "</xsl:text> <xsl:value-of select="@id"/> <xsl:text>", </xsl:text> </xsl:template> <xsl:template match="constant" mode="constvalue"> <xsl:text> </xsl:text> <xsl:value-of select="@num"/> <xsl:text>, </xsl:text> </xsl:template> <xsl:template name="eventCapabilitiesTest"> <xsl:text> // Check Event Capabilities const bool JvmtiUtil::has_event_capability(jvmtiEvent event_type, const jvmtiCapabilities* capabilities_ptr) { switch (event_type) { </xsl:text> <xsl:for-each select="//eventsection/event"> <xsl:variable name="capa" select="capabilities/required"/> <xsl:if test="count($capa)"> <xsl:text> case </xsl:text> <xsl:value-of select="@const"/> <xsl:text>: return capabilities_ptr-></xsl:text> <xsl:value-of select="$capa/@id"/> <xsl:text> != 0; </xsl:text> </xsl:if> </xsl:for-each> <xsl:text> } // if it does not have a capability it is required return JNI_TRUE; } </xsl:text> </xsl:template> <xsl:template match="functionsection"> <xsl:if test="$trace='Trace'"> <!-- all this just to return the highest function number --> <xsl:variable name="maxFunction"> <xsl:for-each select="category/function"> <xsl:variable name="mynum" select="@num"/> <xsl:if test="count(../../category/function[@num > $mynum]) = 0"> <xsl:value-of select="@num"/> </xsl:if> </xsl:for-each> </xsl:variable> <xsl:text>jbyte JvmtiTrace::_trace_flags[</xsl:text> <xsl:value-of select="1+$maxFunction"/> <xsl:text>]; jint JvmtiTrace::_max_function_index = </xsl:text> <xsl:value-of select="$maxFunction"/> <xsl:text>; // Function names const char* JvmtiTrace::_function_names[] = { </xsl:text> <xsl:call-template name="fillEntityName"> <xsl:with-param name="entities" select="category/function"/> </xsl:call-template> <xsl:text> }; // Exclude list short JvmtiTrace::_exclude_functions[] = { </xsl:text> <xsl:apply-templates select="category/function" mode="notrace"> <xsl:sort select="@num"/> </xsl:apply-templates> <xsl:text>0 }; </xsl:text> </xsl:if> <xsl:text> extern "C" { </xsl:text> <xsl:apply-templates select="category" mode="wrapper"/> <xsl:text> } /* end extern "C" */ // JVMTI API functions struct jvmtiInterface_1_ jvmti</xsl:text> <xsl:value-of select="$trace"/> <xsl:text>_Interface = { </xsl:text> <xsl:call-template name="fillFuncStruct"> <xsl:with-param name="funcs" select="category/function[count(@hide)=0]"/> </xsl:call-template> <xsl:text> }; </xsl:text> </xsl:template> <xsl:template match="function" mode="functionid"> <xsl:text>jvmti</xsl:text> <xsl:value-of select="$trace"/> <xsl:text>_</xsl:text> <xsl:value-of select="@id"/> </xsl:template> <xsl:template name="fillFuncStructDoit"> <xsl:param name="func"/> <xsl:param name="index"/> <xsl:text> /* </xsl:text> <xsl:number value="$index" format=" 1"/> <xsl:text> : </xsl:text> <xsl:choose> <xsl:when test="count($func)=1"> <xsl:value-of select="$func/synopsis"/> <xsl:text> */ </xsl:text> <xsl:apply-templates select="$func" mode="functionid"/> </xsl:when> <xsl:otherwise> <xsl:text> RESERVED */ NULL</xsl:text> </xsl:otherwise> </xsl:choose> </xsl:template> <!-- generic function iterator applied to the function structure --> <xsl:template name="fillFuncStruct"> <xsl:param name="funcs"/> <xsl:param name="index" select="1"/> <xsl:call-template name="fillFuncStructDoit"> <xsl:with-param name="func" select="$funcs[@num=$index]"/> <xsl:with-param name="index" select="$index"/> </xsl:call-template> <xsl:if test="count($funcs[@num > $index]) > 0"> <xsl:text>, </xsl:text> <xsl:call-template name="fillFuncStruct"> <xsl:with-param name="funcs" select="$funcs"/> <xsl:with-param name="index" select="1+$index"/> </xsl:call-template> </xsl:if> </xsl:template> <xsl:template name="fillEntityNameDoit"> <xsl:param name="entity"/> <xsl:param name="index"/> <xsl:choose> <xsl:when test="count($entity) > 0"> <xsl:text> "</xsl:text> <xsl:value-of select="$entity[position()=1]/@id"/> <xsl:text>"</xsl:text> </xsl:when> <xsl:otherwise> <xsl:text> NULL</xsl:text> </xsl:otherwise> </xsl:choose> </xsl:template> <!-- generic entity (with id and num) iterator applied to entity names --> <xsl:template name="fillEntityName"> <xsl:param name="entities"/> <xsl:param name="index" select="0"/> <xsl:call-template name="fillEntityNameDoit"> <xsl:with-param name="entity" select="$entities[@num=$index]"/> <xsl:with-param name="index" select="$index"/> </xsl:call-template> <xsl:if test="count($entities[@num > $index]) > 0"> <xsl:text>, </xsl:text> <xsl:call-template name="fillEntityName"> <xsl:with-param name="entities" select="$entities"/> <xsl:with-param name="index" select="1+$index"/> </xsl:call-template> </xsl:if> </xsl:template> <xsl:template name="fillEventThreadedDoit"> <xsl:param name="entity"/> <xsl:param name="index"/> <xsl:choose> <xsl:when test="count($entity) > 0"> <xsl:choose> <xsl:when test="count($entity[position()=1]/@filtered)=0"> <xsl:text> false</xsl:text> </xsl:when> <xsl:otherwise> <xsl:text> true</xsl:text> </xsl:otherwise> </xsl:choose> </xsl:when> <xsl:otherwise> <xsl:text> false</xsl:text> </xsl:otherwise> </xsl:choose> </xsl:template> <xsl:template name="fillEventThreaded"> <xsl:param name="entities"/> <xsl:param name="index" select="0"/> <xsl:call-template name="fillEventThreadedDoit"> <xsl:with-param name="entity" select="$entities[@num=$index]"/> <xsl:with-param name="index" select="$index"/> </xsl:call-template> <xsl:if test="count($entities[@num > $index]) > 0"> <xsl:text>, </xsl:text> <xsl:call-template name="fillEventThreaded"> <xsl:with-param name="entities" select="$entities"/> <xsl:with-param name="index" select="1+$index"/> </xsl:call-template> </xsl:if> </xsl:template> <xsl:template match="function" mode="notrace"> <xsl:if test="count(@impl)=1 and contains(@impl,'notrace')"> <xsl:value-of select="@num"/> <xsl:text>, </xsl:text> </xsl:if> </xsl:template> <xsl:template match="category" mode="wrapper"> <xsl:text> // // </xsl:text><xsl:value-of select="@label"/><xsl:text> functions // </xsl:text> <xsl:apply-templates select="function[count(@hide)=0]"/> </xsl:template> <xsl:template match="function" mode="transition"> <xsl:param name="space"> <xsl:text> </xsl:text> </xsl:param> <xsl:value-of select="$space"/> <xsl:choose> <xsl:when test="count(@callbacksafe)=0 or not(contains(@callbacksafe,'safe'))"> <xsl:text>if (this_thread == NULL || !this_thread->is_Java_thread()) {</xsl:text> </xsl:when> <xsl:otherwise> <xsl:choose> <xsl:when test="count(@phase)=0 or contains(@phase,'live') or contains(@phase,'start')"> <xsl:text>if (this_thread == NULL || (!this_thread->is_Java_thread() && !this_thread->is_VM_thread())) {</xsl:text> </xsl:when> <xsl:otherwise> <xsl:text>if (!this_thread->is_Java_thread()) {</xsl:text> </xsl:otherwise> </xsl:choose> </xsl:otherwise> </xsl:choose> <xsl:if test="$trace='Trace'"> <xsl:value-of select="$space"/> <xsl:text> if (trace_flags) {</xsl:text> <xsl:value-of select="$space"/> <xsl:text> tty->print_cr("JVMTI [non-attached thread] %s %s", func_name,</xsl:text> <xsl:value-of select="$space"/> <xsl:text> JvmtiUtil::error_name(JVMTI_ERROR_UNATTACHED_THREAD));</xsl:text> <xsl:value-of select="$space"/> <xsl:text> }</xsl:text> </xsl:if> <xsl:value-of select="$space"/> <xsl:text> return JVMTI_ERROR_UNATTACHED_THREAD;</xsl:text> <xsl:value-of select="$space"/> <xsl:text>}</xsl:text> <xsl:value-of select="$space"/> <xsl:if test="count(@impl)=0 or not(contains(@impl,'innative'))"> <xsl:text>JavaThread* current_thread = (JavaThread*)this_thread;</xsl:text> <xsl:value-of select="$space"/> <xsl:text>ThreadInVMfromNative __tiv(current_thread);</xsl:text> <xsl:value-of select="$space"/> <xsl:text>__ENTRY(jvmtiError, </xsl:text> <xsl:apply-templates select="." mode="functionid"/> <xsl:text> , current_thread)</xsl:text> <xsl:value-of select="$space"/> <xsl:text>debug_only(VMNativeEntryWrapper __vew;)</xsl:text> <xsl:if test="count(@callbacksafe)=0 or not(contains(@callbacksafe,'safe'))"> <xsl:value-of select="$space"/> <xsl:text>CautiouslyPreserveExceptionMark __em(this_thread);</xsl:text> </xsl:if> </xsl:if> </xsl:template> <xsl:template match="required"> <xsl:text> if (jvmti_env->get_capabilities()-></xsl:text> <xsl:value-of select="@id"/> <xsl:text> == 0) { </xsl:text> <xsl:if test="$trace='Trace'"> <xsl:text> if (trace_flags) { tty->print_cr("JVMTI [%s] %s %s", curr_thread_name, func_name, JvmtiUtil::error_name(JVMTI_ERROR_MUST_POSSESS_CAPABILITY)); } </xsl:text> </xsl:if> <xsl:text> return JVMTI_ERROR_MUST_POSSESS_CAPABILITY; } </xsl:text> </xsl:template> <xsl:template match="function"> <xsl:text> static jvmtiError JNICALL </xsl:text> <xsl:apply-templates select="." mode="functionid"/> <xsl:text>(jvmtiEnv* env</xsl:text> <xsl:apply-templates select="parameters" mode="signature"/> <xsl:text>) { </xsl:text> <xsl:if test="not(contains(@jkernel,'yes'))"> <xsl:text>
#ifdef JVMTI_KERNEL 
</xsl:text> <xsl:text> return JVMTI_ERROR_NOT_AVAILABLE; 
</xsl:text> <xsl:text>#else 
</xsl:text> </xsl:if> <xsl:apply-templates select="." mode="traceSetUp"/> <xsl:choose> <xsl:when test="count(@phase)=0 or contains(@phase,'live')"> <xsl:text> if(!JvmtiEnv::is_vm_live()) { </xsl:text> <xsl:if test="$trace='Trace'"> <xsl:text> if (trace_flags) { tty->print_cr("JVMTI [-] %s %s", func_name, JvmtiUtil::error_name(JVMTI_ERROR_WRONG_PHASE)); } </xsl:text> </xsl:if> <xsl:text> return JVMTI_ERROR_WRONG_PHASE; }</xsl:text> <xsl:text> Thread* this_thread = (Thread*)ThreadLocalStorage::thread(); </xsl:text> <xsl:apply-templates select="." mode="transition"/> </xsl:when> <xsl:otherwise> <xsl:if test="contains(@phase,'onload')"> <xsl:text> if(JvmtiEnv::get_phase()!=JVMTI_PHASE_ONLOAD</xsl:text> <xsl:if test="not(contains(@phase,'onloadOnly'))"> <xsl:text> && JvmtiEnv::get_phase()!=JVMTI_PHASE_LIVE</xsl:text> </xsl:if> <xsl:text>) { </xsl:text> <xsl:if test="$trace='Trace'"> <xsl:text> if (trace_flags) { tty->print_cr("JVMTI [-] %s %s", func_name, JvmtiUtil::error_name(JVMTI_ERROR_WRONG_PHASE)); } </xsl:text> </xsl:if> <xsl:text> return JVMTI_ERROR_WRONG_PHASE; }</xsl:text> </xsl:if> <xsl:if test="contains(@phase,'start')"> <xsl:text> if(JvmtiEnv::get_phase()!=JVMTI_PHASE_START && JvmtiEnv::get_phase()!=JVMTI_PHASE_LIVE) { </xsl:text> <xsl:if test="$trace='Trace'"> <xsl:text> if (trace_flags) { tty->print_cr("JVMTI [-] %s %s", func_name, JvmtiUtil::error_name(JVMTI_ERROR_WRONG_PHASE)); } </xsl:text> </xsl:if> <xsl:text> return JVMTI_ERROR_WRONG_PHASE; } Thread* this_thread = (Thread*)ThreadLocalStorage::thread(); </xsl:text> <xsl:apply-templates select="." mode="transition"/> </xsl:if> </xsl:otherwise> </xsl:choose> <xsl:text> JvmtiEnv* jvmti_env = JvmtiEnv::JvmtiEnv_from_jvmti_env(env); if (!jvmti_env->is_valid()) { </xsl:text> <xsl:if test="$trace='Trace'"> <xsl:text> if (trace_flags) { tty->print_cr("JVMTI [%s] %s %s env=%d", curr_thread_name, func_name, JvmtiUtil::error_name(JVMTI_ERROR_INVALID_ENVIRONMENT), env); } </xsl:text> </xsl:if> <xsl:text> return JVMTI_ERROR_INVALID_ENVIRONMENT; } </xsl:text> <xsl:apply-templates select="capabilities/required"/> <xsl:text> jvmtiError err; </xsl:text> <xsl:choose> <xsl:when test="count(@phase)=1 and not(contains(@phase,'live')) and not(contains(@phase,'start'))"> <xsl:choose> <xsl:when test="count(@callbacksafe)=0 or not(contains(@callbacksafe,'safe'))"> <xsl:text> if (Threads::number_of_threads() != 0) { Thread* this_thread = (Thread*)ThreadLocalStorage::thread();</xsl:text> </xsl:when> <xsl:otherwise> <xsl:text> Thread* this_thread = NULL; bool transition; if (Threads::number_of_threads() == 0) { transition = false; } else { this_thread = (Thread*)ThreadLocalStorage::thread(); transition = ((this_thread != NULL) && !this_thread->is_VM_thread() && !this_thread->is_ConcurrentGC_thread()); } if (transition) {</xsl:text> </xsl:otherwise> </xsl:choose> <!-- we allow use in early phases but there are threads now, --> <!-- so do thread transition --> <xsl:apply-templates select="." mode="transition"> <xsl:with-param name="space"> <xsl:text> </xsl:text> </xsl:with-param> </xsl:apply-templates> <xsl:text> </xsl:text> <xsl:apply-templates select="." mode="doCall"/> <xsl:text> } else { </xsl:text> <!-- we are pre-thread - no thread transition code --> <xsl:apply-templates select="." mode="doCall"/> <xsl:text> } </xsl:text> </xsl:when> <xsl:otherwise> <xsl:apply-templates select="." mode="doCall"/> </xsl:otherwise> </xsl:choose> <xsl:text> return err; </xsl:text> <xsl:if test="not(contains(@jkernel,'yes'))"> <xsl:text>#endif // JVMTI_KERNEL
</xsl:text> </xsl:if> <xsl:text>}
</xsl:text> </xsl:template> <xsl:template match="function" mode="doCall"> <xsl:apply-templates select="parameters" mode="dochecks"/> <xsl:apply-templates select="." mode="traceBefore"/> <xsl:apply-templates select="." mode="genCall"/> <xsl:apply-templates select="." mode="traceAfter"/> </xsl:template> <xsl:template match="function" mode="genCall"> <xsl:text> err = jvmti_env-></xsl:text> <xsl:value-of select="@id"/> <xsl:text>(</xsl:text> <xsl:apply-templates select="parameters" mode="HotSpotValue"/> <xsl:text>); </xsl:text> </xsl:template> <xsl:template match="function" mode="traceSetUp"> <xsl:if test="$trace='Trace'"> <xsl:text> SafeResourceMark rm; jint trace_flags = JvmtiTrace::trace_flags(</xsl:text> <xsl:value-of select="@num"/> <xsl:text>); const char *func_name; const char *curr_thread_name; if (trace_flags) { func_name = JvmtiTrace::function_name(</xsl:text> <xsl:value-of select="@num"/> <xsl:text>); curr_thread_name = JvmtiTrace::safe_get_current_thread_name(); } </xsl:text> </xsl:if> </xsl:template> <xsl:template match="function" mode="traceBefore"> <xsl:if test="$trace='Trace'"> <xsl:text> if ((trace_flags & JvmtiTrace::SHOW_IN) != 0) { </xsl:text> <xsl:apply-templates select="." mode="traceIn"/> <xsl:text> } </xsl:text> </xsl:if> </xsl:template> <xsl:template match="param" mode="traceError"> <xsl:param name="err"/> <xsl:param name="comment"></xsl:param> <xsl:param name="extraValue"></xsl:param> <xsl:if test="$trace='Trace'"> <xsl:text> if ((trace_flags & JvmtiTrace::SHOW_ERROR) != 0) { if ((trace_flags & JvmtiTrace::SHOW_IN) == 0) { </xsl:text> <xsl:apply-templates select="../.." mode="traceIn"> <xsl:with-param name="endParam" select="."/> </xsl:apply-templates> <xsl:text> } tty->print_cr("JVMTI [%s] %s } %s - erroneous arg is </xsl:text> <xsl:value-of select="@id"/> <xsl:value-of select="$comment"/> <xsl:text>", curr_thread_name, func_name, JvmtiUtil::error_name(</xsl:text> <xsl:value-of select="$err"/> <xsl:text>)</xsl:text> <xsl:value-of select="$extraValue"/> <xsl:text>); } </xsl:text> </xsl:if> <xsl:text> return </xsl:text> <xsl:value-of select="$err"/> <xsl:text>;</xsl:text> </xsl:template> <xsl:template match="function" mode="traceAfter"> <xsl:if test="$trace='Trace'"> <xsl:text> if ( err != JVMTI_ERROR_NONE && (trace_flags & JvmtiTrace::SHOW_ERROR) != 0) { if ((trace_flags & JvmtiTrace::SHOW_IN) == 0) { </xsl:text> <xsl:apply-templates select="." mode="traceIn"/> <xsl:text> } tty->print_cr("JVMTI [%s] %s } %s", curr_thread_name, func_name, JvmtiUtil::error_name(err)); } else if ((trace_flags & JvmtiTrace::SHOW_OUT) != 0) { tty->print_cr("JVMTI [%s] %s }", curr_thread_name, func_name); } </xsl:text> </xsl:if> </xsl:template> <xsl:template match="function" mode="traceIn"> <xsl:param name="endParam"></xsl:param> <xsl:text> tty->print_cr("JVMTI [%s] %s { </xsl:text> <xsl:apply-templates select="parameters" mode="traceInFormat"> <xsl:with-param name="endParam" select="$endParam"/> </xsl:apply-templates> <xsl:text>", curr_thread_name, func_name</xsl:text> <xsl:apply-templates select="parameters" mode="traceInValue"> <xsl:with-param name="endParam" select="$endParam"/> </xsl:apply-templates> <xsl:text>); </xsl:text> </xsl:template> <xsl:template match="parameters" mode="dochecks"> <xsl:apply-templates select="param" mode="dochecks"/> </xsl:template> <xsl:template match="param" mode="dochecks"> <xsl:apply-templates select="child::*[position()=1]" mode="dochecks"> <xsl:with-param name="name" select="@id"/> </xsl:apply-templates> </xsl:template> <xsl:template match="outptr|outbuf|allocfieldbuf|ptrtype|inptr|inbuf|vmbuf|allocbuf|agentbuf|allocallocbuf" mode="dochecks"> <xsl:param name="name"/> <xsl:if test="count(nullok)=0"> <xsl:text> if (</xsl:text> <xsl:value-of select="$name"/> <xsl:text> == NULL) { </xsl:text> <xsl:apply-templates select=".." mode="traceError"> <xsl:with-param name="err">JVMTI_ERROR_NULL_POINTER</xsl:with-param> </xsl:apply-templates> <xsl:text> } </xsl:text> </xsl:if> </xsl:template> <xsl:template match="jrawMonitorID" mode="dochecks"> <xsl:param name="name"/> <xsl:text> JvmtiRawMonitor *rmonitor = (JvmtiRawMonitor *)</xsl:text> <xsl:value-of select="$name"/> <xsl:text>; if (rmonitor == NULL) { </xsl:text> <xsl:apply-templates select=".." mode="traceError"> <xsl:with-param name="err">JVMTI_ERROR_INVALID_MONITOR</xsl:with-param> <xsl:with-param name="comment"> - raw monitor is NULL</xsl:with-param> </xsl:apply-templates> <xsl:text> } if (!rmonitor->is_valid()) { </xsl:text> <xsl:apply-templates select=".." mode="traceError"> <xsl:with-param name="err">JVMTI_ERROR_INVALID_MONITOR</xsl:with-param> <xsl:with-param name="comment"> - not a raw monitor 0x%x</xsl:with-param> <xsl:with-param name="extraValue">, rmonitor</xsl:with-param> </xsl:apply-templates> <xsl:text> } </xsl:text> </xsl:template> <xsl:template match="jthread" mode="dochecksbody"> <xsl:param name="name"/> <xsl:text> oop thread_oop = JNIHandles::resolve_external_guard(</xsl:text> <xsl:value-of select="$name"/> <xsl:text>); if (thread_oop == NULL) { </xsl:text> <xsl:apply-templates select=".." mode="traceError"> <xsl:with-param name="err">JVMTI_ERROR_INVALID_THREAD</xsl:with-param> <xsl:with-param name="comment"> - jthread resolved to NULL - jthread = %0x%x</xsl:with-param> <xsl:with-param name="extraValue">, <xsl:value-of select="$name"/></xsl:with-param> </xsl:apply-templates> <xsl:text> } if (!thread_oop->is_a(SystemDictionary::Thread_klass())) { </xsl:text> <xsl:apply-templates select=".." mode="traceError"> <xsl:with-param name="err">JVMTI_ERROR_INVALID_THREAD</xsl:with-param> <xsl:with-param name="comment"> - oop is not a thread - jthread = %0x%x</xsl:with-param> <xsl:with-param name="extraValue">, <xsl:value-of select="$name"/></xsl:with-param> </xsl:apply-templates> <xsl:text> } java_thread = java_lang_Thread::thread(thread_oop); if (java_thread == NULL) { </xsl:text> <xsl:apply-templates select=".." mode="traceError"> <xsl:with-param name="err"> <xsl:text>JVMTI_ERROR_THREAD_NOT_ALIVE</xsl:text> </xsl:with-param> <xsl:with-param name="comment"> - not a Java thread - jthread = %0x%x</xsl:with-param> <xsl:with-param name="extraValue">, <xsl:value-of select="$name"/></xsl:with-param> </xsl:apply-templates> <xsl:text> } </xsl:text> </xsl:template> <xsl:template match="jthread" mode="dochecks"> <xsl:param name="name"/> <!-- If we convert and test threads --> <xsl:if test="count(@impl)=0 or not(contains(@impl,'noconvert'))"> <xsl:text> JavaThread* java_thread; </xsl:text> <xsl:choose> <xsl:when test="count(@null)=0"> <xsl:apply-templates select="." mode="dochecksbody"> <xsl:with-param name="name" select="$name"/> </xsl:apply-templates> </xsl:when> <xsl:otherwise> <xsl:text> if (</xsl:text> <xsl:value-of select="$name"/> <xsl:text> == NULL) { java_thread = current_thread; } else { </xsl:text> <xsl:apply-templates select="." mode="dochecksbody"> <xsl:with-param name="name" select="$name"/> </xsl:apply-templates> <xsl:text> } </xsl:text> </xsl:otherwise> </xsl:choose> </xsl:if> </xsl:template> <xsl:template match="jframeID" mode="dochecks"> <xsl:param name="name"/> <xsl:text> if (depth < 0) { </xsl:text> <xsl:apply-templates select=".." mode="traceError"> <xsl:with-param name="err">JVMTI_ERROR_ILLEGAL_ARGUMENT</xsl:with-param> <xsl:with-param name="comment"> - negative depth - jthread = %0x%x</xsl:with-param> <xsl:with-param name="extraValue">, <xsl:value-of select="$name"/></xsl:with-param> </xsl:apply-templates> <xsl:text> } </xsl:text> </xsl:template> <xsl:template match="jclass" mode="dochecks"> <xsl:param name="name"/> <!-- for JVMTI a jclass/jmethodID becomes just jmethodID --> <xsl:if test="count(@method)=0"> <xsl:text> oop k_mirror = JNIHandles::resolve_external_guard(</xsl:text> <xsl:value-of select="$name"/> <xsl:text>); if (k_mirror == NULL) { </xsl:text> <xsl:apply-templates select=".." mode="traceError"> <xsl:with-param name="err">JVMTI_ERROR_INVALID_CLASS</xsl:with-param> <xsl:with-param name="comment"> - resolved to NULL - jclass = 0x%x</xsl:with-param> <xsl:with-param name="extraValue">, <xsl:value-of select="$name"/></xsl:with-param> </xsl:apply-templates> <xsl:text> } if (!k_mirror->is_a(SystemDictionary::Class_klass())) { </xsl:text> <xsl:apply-templates select=".." mode="traceError"> <xsl:with-param name="err">JVMTI_ERROR_INVALID_CLASS</xsl:with-param> <xsl:with-param name="comment"> - not a class - jclass = 0x%x</xsl:with-param> <xsl:with-param name="extraValue">, <xsl:value-of select="$name"/></xsl:with-param> </xsl:apply-templates> <xsl:text> } </xsl:text> <xsl:if test="count(@method|@field)=1"> <xsl:text> if (java_lang_Class::is_primitive(k_mirror)) { </xsl:text> <xsl:apply-templates select=".." mode="traceError"> <xsl:with-param name="err">JVMTI_ERROR_INVALID_CLASS</xsl:with-param> <xsl:with-param name="comment"> - is a primitive class - jclass = 0x%x</xsl:with-param> <xsl:with-param name="extraValue">, <xsl:value-of select="$name"/></xsl:with-param> </xsl:apply-templates> <xsl:text> } klassOop k_oop = java_lang_Class::as_klassOop(k_mirror); if (k_oop == NULL) { </xsl:text> <xsl:apply-templates select=".." mode="traceError"> <xsl:with-param name="err">JVMTI_ERROR_INVALID_CLASS</xsl:with-param> <xsl:with-param name="comment"> - no klassOop - jclass = 0x%x</xsl:with-param> <xsl:with-param name="extraValue">, <xsl:value-of select="$name"/></xsl:with-param> </xsl:apply-templates> <xsl:text> } </xsl:text> </xsl:if> </xsl:if> </xsl:template> <xsl:template match="jmethodID" mode="dochecks"> <xsl:param name="name"/> <xsl:text> methodOop method_oop = JNIHandles::checked_resolve_jmethod_id(</xsl:text> <xsl:value-of select="$name"/> <xsl:text>);
</xsl:text> <xsl:text> if (method_oop == NULL) {
</xsl:text> <xsl:apply-templates select=".." mode="traceError"> <xsl:with-param name="err">JVMTI_ERROR_INVALID_METHODID</xsl:with-param> <xsl:with-param name="comment"></xsl:with-param> <xsl:with-param name="extraValue"></xsl:with-param> </xsl:apply-templates> <xsl:text>
</xsl:text> <xsl:text> }
</xsl:text> <xsl:if test="count(@native)=1 and contains(@native,'error')"> <xsl:text> if (method_oop->is_native()) {
</xsl:text> <xsl:text> return JVMTI_ERROR_NATIVE_METHOD;
</xsl:text> <xsl:text> }
</xsl:text> </xsl:if> </xsl:template> <xsl:template match="jfieldID" mode="dochecks"> <xsl:param name="name"/> <xsl:text> ResourceMark rm_fdesc(current_thread);
</xsl:text> <xsl:text> fieldDescriptor fdesc;
</xsl:text> <xsl:text> if (!JvmtiEnv::get_field_descriptor(k_oop, </xsl:text> <xsl:value-of select="$name"/> <xsl:text>, &fdesc)) {
</xsl:text> <xsl:apply-templates select=".." mode="traceError"> <xsl:with-param name="err">JVMTI_ERROR_INVALID_FIELDID</xsl:with-param> </xsl:apply-templates> <xsl:text>
</xsl:text> <xsl:text> }
</xsl:text> </xsl:template> <xsl:template match="jint" mode="dochecks"> <xsl:param name="name"/> <xsl:if test="count(@min)=1"> <xsl:text> if (</xsl:text> <xsl:value-of select="$name"/> <xsl:text> < </xsl:text> <xsl:value-of select="@min"/> <xsl:text>) { </xsl:text> <xsl:apply-templates select=".." mode="traceError"> <xsl:with-param name="err">JVMTI_ERROR_ILLEGAL_ARGUMENT</xsl:with-param> </xsl:apply-templates> <xsl:text> } </xsl:text> </xsl:if> </xsl:template> <xsl:template match="jobject|jvalue|jthreadGroup|enum|jchar|jlong|jfloat|jdouble|jlocation|jboolean|char|uchar|size_t|void|struct" mode="dochecks"> </xsl:template> <!-- iterate over parameters, stopping if specified is encountered --> <xsl:template name="traceInValueParamsUpTo"> <xsl:param name="params"/> <xsl:param name="endParam"></xsl:param> <xsl:param name="index" select="1"/> <xsl:variable name="cParam" select="$params[position()=$index]"/> <xsl:if test="$cParam!=$endParam"> <xsl:apply-templates select="$cParam" mode="traceInValue"/> <xsl:if test="count($params) > $index"> <xsl:call-template name="traceInValueParamsUpTo"> <xsl:with-param name="params" select="$params"/> <xsl:with-param name="endParam" select="$endParam"/> <xsl:with-param name="index" select="1+$index"/> </xsl:call-template> </xsl:if> </xsl:if> </xsl:template> <xsl:template name="traceInFormatParamsUpTo"> <xsl:param name="params"/> <xsl:param name="endParam"></xsl:param> <xsl:param name="index" select="1"/> <xsl:variable name="cParam" select="$params[position()=$index]"/> <xsl:if test="$cParam!=$endParam"> <xsl:apply-templates select="$cParam" mode="traceInFormat"/> <xsl:if test="count($params) > $index"> <xsl:call-template name="traceInFormatParamsUpTo"> <xsl:with-param name="params" select="$params"/> <xsl:with-param name="endParam" select="$endParam"/> <xsl:with-param name="index" select="1+$index"/> </xsl:call-template> </xsl:if> </xsl:if> </xsl:template> <xsl:template match="parameters" mode="traceInFormat"> <xsl:param name="endParam"></xsl:param> <xsl:call-template name="traceInFormatParamsUpTo"> <xsl:with-param name="params" select="param"/> <xsl:with-param name="endParam" select="$endParam"/> </xsl:call-template> </xsl:template> <xsl:template match="parameters" mode="traceInValue"> <xsl:param name="endParam"></xsl:param> <xsl:call-template name="traceInValueParamsUpTo"> <xsl:with-param name="params" select="param"/> <xsl:with-param name="endParam" select="$endParam"/> </xsl:call-template> </xsl:template> <xsl:template match="param" mode="traceInFormat"> <xsl:apply-templates select="child::*[position()=1]" mode="traceInFormat"> <xsl:with-param name="name" select="@id"/> </xsl:apply-templates> </xsl:template> <xsl:template match="param" mode="traceInValue"> <xsl:apply-templates select="child::*[position()=1]" mode="traceInValue"> <xsl:with-param name="name" select="@id"/> </xsl:apply-templates> </xsl:template> <xsl:template match="outptr|outbuf|allocfieldbuf|vmbuf|allocbuf|agentbuf|allocallocbuf" mode="traceInFormat"> </xsl:template> <xsl:template match="outptr|outbuf|allocfieldbuf|vmbuf|allocbuf|agentbuf|allocallocbuf" mode="traceInValue"> </xsl:template> <xsl:template match="inbuf" mode="traceInFormat"> <xsl:param name="name"/> <xsl:text> </xsl:text> <xsl:value-of select="$name"/> <xsl:variable name="child" select="child::*[position()=1]"/> <xsl:choose> <xsl:when test="name($child)='char'"> <xsl:text>='%s'</xsl:text> </xsl:when> <xsl:otherwise> <xsl:text>=0x%x</xsl:text> </xsl:otherwise> </xsl:choose> </xsl:template> <xsl:template match="inbuf" mode="traceInValue"> <xsl:param name="name"/> <xsl:text>, </xsl:text> <xsl:value-of select="$name"/> </xsl:template> <xsl:template match="ptrtype" mode="traceInFormat"> <xsl:param name="name"/> <xsl:variable name="child" select="child::*[position()=1]"/> <xsl:choose> <xsl:when test="name($child)='jclass'"> <xsl:text> </xsl:text> <xsl:value-of select="$name"/> <xsl:text>=0x%x</xsl:text> </xsl:when> <xsl:otherwise> <xsl:apply-templates select="$child" mode="traceInFormat"/> </xsl:otherwise> </xsl:choose> </xsl:template> <xsl:template match="ptrtype" mode="traceInValue"> <xsl:param name="name"/> <xsl:variable name="child" select="child::*[position()=1]"/> <xsl:choose> <xsl:when test="name($child)='jclass'"> <xsl:text>, </xsl:text> <xsl:value-of select="$name"/> </xsl:when> <xsl:otherwise> <xsl:apply-templates select="$child" mode="traceInValue"/> </xsl:otherwise> </xsl:choose> </xsl:template> <xsl:template match="inptr" mode="traceInFormat"> <xsl:param name="name"/> <xsl:text> </xsl:text> <xsl:value-of select="$name"/> <xsl:text>=0x%x</xsl:text> </xsl:template> <xsl:template match="inptr" mode="traceInValue"> <xsl:param name="name"/> <xsl:text>, </xsl:text> <xsl:value-of select="$name"/> </xsl:template> <xsl:template match="jrawMonitorID|jfieldID" mode="traceInFormat"> <xsl:param name="name"/> <xsl:text> </xsl:text> <xsl:value-of select="$name"/> <xsl:text>=%s</xsl:text> </xsl:template> <xsl:template match="jclass" mode="traceInFormat"> <xsl:param name="name"/> <!-- for JVMTI a jclass/jmethodID becomes just jmethodID --> <xsl:if test="count(@method)=0"> <xsl:text> </xsl:text> <xsl:value-of select="$name"/> <xsl:text>=%s</xsl:text> </xsl:if> </xsl:template> <xsl:template match="jrawMonitorID" mode="traceInValue"> <xsl:param name="name"/> <xsl:text>, rmonitor->get_name()</xsl:text> </xsl:template> <xsl:template match="jthread" mode="traceInFormat"> <xsl:param name="name"/> <!-- If we convert and test threads --> <xsl:if test="count(@impl)=0 or not(contains(@impl,'noconvert'))"> <xsl:text> </xsl:text> <xsl:value-of select="$name"/> <xsl:text>=%s</xsl:text> </xsl:if> </xsl:template> <xsl:template match="jthread" mode="traceInValue"> <xsl:param name="name"/> <!-- If we convert and test threads --> <xsl:if test="count(@impl)=0 or not(contains(@impl,'noconvert'))"> <xsl:text>, JvmtiTrace::safe_get_thread_name(java_thread)</xsl:text> </xsl:if> </xsl:template> <xsl:template match="jframeID" mode="traceInFormat"> <xsl:param name="name"/> <xsl:text>depth=%d</xsl:text> </xsl:template> <xsl:template match="jframeID" mode="traceInValue"> <xsl:param name="name"/> <xsl:text>, </xsl:text> <xsl:value-of select="$name"/> </xsl:template> <xsl:template match="jclass" mode="traceInValue"> <!-- for JVMTI a jclass/jmethodID becomes just jmethodID --> <xsl:if test="count(@method)=0"> <xsl:text>, JvmtiTrace::get_class_name(k_mirror)</xsl:text> </xsl:if> </xsl:template> <xsl:template match="jmethodID" mode="traceInFormat"> <xsl:param name="name"/> <xsl:text> </xsl:text> <xsl:value-of select="$name"/> <xsl:text>=%s.%s</xsl:text> </xsl:template> <xsl:template match="jmethodID" mode="traceInValue"> <xsl:param name="name"/> <xsl:text>, method_oop == NULL? "NULL" : method_oop->klass_name()->as_C_string(), method_oop == NULL? "NULL" : method_oop->name()->as_C_string() </xsl:text> </xsl:template> <xsl:template match="jfieldID" mode="traceInValue"> <xsl:param name="name"/> <xsl:text>, fdesc.name()->as_C_string()</xsl:text> </xsl:template> <xsl:template match="enum" mode="traceInFormat"> <xsl:param name="name"/> <xsl:text> </xsl:text> <xsl:value-of select="$name"/> <xsl:text>=%d:%s</xsl:text> </xsl:template> <xsl:template match="enum" mode="traceInValue"> <xsl:param name="name"/> <xsl:text>, </xsl:text> <xsl:value-of select="$name"/> <xsl:text>, </xsl:text> <xsl:choose> <xsl:when test=".='jvmtiError'"> <xsl:text>JvmtiUtil::error_name(</xsl:text> <xsl:value-of select="$name"/> <xsl:text>) </xsl:text> </xsl:when> <xsl:otherwise> <xsl:choose> <xsl:when test=".='jvmtiEvent'"> <xsl:text>JvmtiTrace::event_name(</xsl:text> <xsl:value-of select="$name"/> <xsl:text>) </xsl:text> </xsl:when> <xsl:otherwise> <xsl:text>JvmtiTrace::enum_name(</xsl:text> <xsl:value-of select="."/> <xsl:text>ConstantNames, </xsl:text> <xsl:value-of select="."/> <xsl:text>ConstantValues, </xsl:text> <xsl:value-of select="$name"/> <xsl:text>)</xsl:text> </xsl:otherwise> </xsl:choose> </xsl:otherwise> </xsl:choose> </xsl:template> <xsl:template match="jint|jlocation" mode="traceInFormat"> <xsl:param name="name"/> <xsl:text> </xsl:text> <xsl:value-of select="$name"/> <xsl:text>=%d</xsl:text> </xsl:template> <xsl:template match="jlong" mode="traceInFormat"> <xsl:param name="name"/> <xsl:text> </xsl:text> <xsl:value-of select="$name"/> <xsl:text>=%ld</xsl:text> </xsl:template> <xsl:template match="size_t" mode="traceInFormat"> <xsl:param name="name"/> <xsl:text> </xsl:text> <xsl:value-of select="$name"/> <xsl:text>=0x%zx</xsl:text> </xsl:template> <xsl:template match="jfloat|jdouble" mode="traceInFormat"> <xsl:param name="name"/> <xsl:text> </xsl:text> <xsl:value-of select="$name"/> <xsl:text>=%f</xsl:text> </xsl:template> <xsl:template match="char" mode="traceInFormat"> <xsl:param name="name"/> <xsl:text> </xsl:text> <xsl:value-of select="$name"/> <xsl:text>=%c</xsl:text> </xsl:template> <xsl:template match="uchar|jchar" mode="traceInFormat"> <xsl:param name="name"/> <xsl:text> </xsl:text> <xsl:value-of select="$name"/> <xsl:text>=0x%x</xsl:text> </xsl:template> <xsl:template match="jint|jlocation|jchar|jlong|jfloat|jdouble|char|uchar|size_t" mode="traceInValue"> <xsl:param name="name"/> <xsl:text>, </xsl:text> <xsl:value-of select="$name"/> </xsl:template> <xsl:template match="jboolean" mode="traceInFormat"> <xsl:param name="name"/> <xsl:text> </xsl:text> <xsl:value-of select="$name"/> <xsl:text>=%s</xsl:text> </xsl:template> <xsl:template match="jboolean" mode="traceInValue"> <xsl:param name="name"/> <xsl:text>, </xsl:text> <xsl:value-of select="$name"/> <xsl:text>? "true" : "false"</xsl:text> </xsl:template> <xsl:template match="jobject|jvalue|jthreadGroup|void|struct" mode="traceInFormat"> </xsl:template> <xsl:template match="jobject|jvalue|jthreadGroup|void|struct" mode="traceInValue"> </xsl:template> </xsl:stylesheet>