duke@435: /* hseigel@4465: * Copyright (c) 2001, 2013, Oracle and/or its affiliates. All rights reserved. duke@435: * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. duke@435: * duke@435: * This code is free software; you can redistribute it and/or modify it duke@435: * under the terms of the GNU General Public License version 2 only, as duke@435: * published by the Free Software Foundation. duke@435: * duke@435: * This code is distributed in the hope that it will be useful, but WITHOUT duke@435: * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or duke@435: * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License duke@435: * version 2 for more details (a copy is included in the LICENSE file that duke@435: * accompanied this code). duke@435: * duke@435: * You should have received a copy of the GNU General Public License version duke@435: * 2 along with this work; if not, write to the Free Software Foundation, duke@435: * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. duke@435: * trims@1907: * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA trims@1907: * or visit www.oracle.com if you need additional information or have any trims@1907: * questions. duke@435: * duke@435: */ duke@435: stefank@2314: #include "precompiled.hpp" stefank@2314: #include "classfile/vmSymbols.hpp" stefank@2314: #include "oops/oop.inline.hpp" stefank@2314: #include "runtime/handles.inline.hpp" stefank@2314: #include "runtime/java.hpp" stefank@2314: #include "runtime/mutex.hpp" stefank@2314: #include "runtime/mutexLocker.hpp" stefank@2314: #include "runtime/os.hpp" stefank@2314: #include "runtime/perfData.hpp" stefank@2314: #include "utilities/exceptions.hpp" stefank@2314: #include "utilities/globalDefinitions.hpp" duke@435: duke@435: PerfDataList* PerfDataManager::_all = NULL; duke@435: PerfDataList* PerfDataManager::_sampled = NULL; duke@435: PerfDataList* PerfDataManager::_constants = NULL; duke@435: duke@435: /* duke@435: * The jvmstat global and subsysem jvmstat counter name spaces. The top duke@435: * level name spaces imply the interface stability level of the counter, duke@435: * which generally follows the Java package, class, and property naming duke@435: * conventions. The CounterNS enumeration values should be used to index duke@435: * into this array. duke@435: */ duke@435: const char* PerfDataManager::_name_spaces[] = { duke@435: // top level name spaces duke@435: "java", // stable and supported name space duke@435: "com.sun", // unstable but supported name space duke@435: "sun", // unstable and unsupported name space duke@435: // subsystem name spaces duke@435: "java.gc", // Garbage Collection name spaces duke@435: "com.sun.gc", duke@435: "sun.gc", duke@435: "java.ci", // Compiler name spaces duke@435: "com.sun.ci", duke@435: "sun.ci", duke@435: "java.cls", // Class Loader name spaces duke@435: "com.sun.cls", duke@435: "sun.cls", duke@435: "java.rt", // Runtime name spaces duke@435: "com.sun.rt", duke@435: "sun.rt", duke@435: "java.os", // Operating System name spaces duke@435: "com.sun.os", duke@435: "sun.os", duke@435: "java.threads", // Threads System name spaces duke@435: "com.sun.threads", duke@435: "sun.threads", duke@435: "java.property", // Java Property name spaces duke@435: "com.sun.property", duke@435: "sun.property", duke@435: "", duke@435: }; duke@435: duke@435: PerfData::PerfData(CounterNS ns, const char* name, Units u, Variability v) duke@435: : _name(NULL), _u(u), _v(v), _valuep(NULL), duke@435: _on_c_heap(false) { duke@435: duke@435: const char* prefix = PerfDataManager::ns_to_string(ns); duke@435: zgu@3900: _name = NEW_C_HEAP_ARRAY(char, strlen(name) + strlen(prefix) + 2, mtInternal); duke@435: assert(_name != NULL && strlen(name) != 0, "invalid name"); duke@435: duke@435: if (ns == NULL_NS) { duke@435: // No prefix is added to counters with the NULL_NS namespace. duke@435: strcpy(_name, name); duke@435: // set the F_Supported flag based on the counter name prefix. duke@435: if (PerfDataManager::is_stable_supported(_name) || duke@435: PerfDataManager::is_unstable_supported(_name)) { duke@435: _flags = F_Supported; duke@435: } duke@435: else { duke@435: _flags = F_None; duke@435: } duke@435: } duke@435: else { duke@435: sprintf(_name, "%s.%s", prefix, name); duke@435: // set the F_Supported flag based on the given namespace. duke@435: if (PerfDataManager::is_stable_supported(ns) || duke@435: PerfDataManager::is_unstable_supported(ns)) { duke@435: _flags = F_Supported; duke@435: } duke@435: else { duke@435: _flags = F_None; duke@435: } duke@435: } duke@435: } duke@435: duke@435: PerfData::~PerfData() { duke@435: if (_name != NULL) { zgu@3900: FREE_C_HEAP_ARRAY(char, _name, mtInternal); duke@435: } duke@435: if (is_on_c_heap()) { zgu@3900: FREE_C_HEAP_ARRAY(PerfDataEntry, _pdep, mtInternal); duke@435: } duke@435: } duke@435: duke@435: void PerfData::create_entry(BasicType dtype, size_t dsize, size_t vlen) { duke@435: duke@435: size_t dlen = vlen==0 ? 1 : vlen; duke@435: duke@435: size_t namelen = strlen(name()) + 1; // include null terminator duke@435: size_t size = sizeof(PerfDataEntry) + namelen; duke@435: size_t pad_length = ((size % dsize) == 0) ? 0 : dsize - (size % dsize); duke@435: size += pad_length; duke@435: size_t data_start = size; duke@435: size += (dsize * dlen); duke@435: duke@435: // align size to assure allocation in units of 8 bytes duke@435: int align = sizeof(jlong) - 1; duke@435: size = ((size + align) & ~align); duke@435: char* psmp = PerfMemory::alloc(size); duke@435: duke@435: if (psmp == NULL) { duke@435: // out of PerfMemory memory resources. allocate on the C heap duke@435: // to avoid vm termination. zgu@3900: psmp = NEW_C_HEAP_ARRAY(char, size, mtInternal); duke@435: _on_c_heap = true; duke@435: } duke@435: duke@435: // compute the addresses for the name and data duke@435: char* cname = psmp + sizeof(PerfDataEntry); duke@435: duke@435: // data is in the last dsize*dlen bytes of the entry duke@435: void* valuep = (void*) (psmp + data_start); duke@435: duke@435: assert(is_on_c_heap() || PerfMemory::contains(cname), "just checking"); duke@435: assert(is_on_c_heap() || PerfMemory::contains((char*)valuep), "just checking"); duke@435: duke@435: // copy the name, including null terminator, into PerfData memory duke@435: strcpy(cname, name()); duke@435: duke@435: duke@435: // set the header values in PerfData memory duke@435: PerfDataEntry* pdep = (PerfDataEntry*)psmp; duke@435: pdep->entry_length = (jint)size; duke@435: pdep->name_offset = (jint) ((uintptr_t) cname - (uintptr_t) psmp); duke@435: pdep->vector_length = (jint)vlen; duke@435: pdep->data_type = (jbyte) type2char(dtype); duke@435: pdep->data_units = units(); duke@435: pdep->data_variability = variability(); duke@435: pdep->flags = (jbyte)flags(); duke@435: pdep->data_offset = (jint) data_start; duke@435: duke@435: if (PerfTraceDataCreation) { duke@435: tty->print("name = %s, dtype = %d, variability = %d," duke@435: " units = %d, dsize = %d, vlen = %d," duke@435: " pad_length = %d, size = %d, on_c_heap = %s," duke@435: " address = " INTPTR_FORMAT "," duke@435: " data address = " INTPTR_FORMAT "\n", duke@435: cname, dtype, variability(), duke@435: units(), dsize, vlen, duke@435: pad_length, size, is_on_c_heap() ? "TRUE":"FALSE", duke@435: psmp, valuep); duke@435: } duke@435: duke@435: // record the start of the entry and the location of the data field. duke@435: _pdep = pdep; duke@435: _valuep = valuep; duke@435: duke@435: // mark the PerfData memory region as having been updated. duke@435: PerfMemory::mark_updated(); duke@435: } duke@435: duke@435: PerfLong::PerfLong(CounterNS ns, const char* namep, Units u, Variability v) duke@435: : PerfData(ns, namep, u, v) { duke@435: duke@435: create_entry(T_LONG, sizeof(jlong)); duke@435: } duke@435: duke@435: int PerfLong::format(char* buffer, int length) { hseigel@4465: return jio_snprintf(buffer, length, JLONG_FORMAT, *(jlong*)_valuep); duke@435: } duke@435: duke@435: PerfLongVariant::PerfLongVariant(CounterNS ns, const char* namep, Units u, duke@435: Variability v, jlong* sampled) duke@435: : PerfLong(ns, namep, u, v), duke@435: _sampled(sampled), _sample_helper(NULL) { duke@435: duke@435: sample(); duke@435: } duke@435: duke@435: PerfLongVariant::PerfLongVariant(CounterNS ns, const char* namep, Units u, duke@435: Variability v, PerfLongSampleHelper* helper) duke@435: : PerfLong(ns, namep, u, v), duke@435: _sampled(NULL), _sample_helper(helper) { duke@435: duke@435: sample(); duke@435: } duke@435: duke@435: void PerfLongVariant::sample() { duke@435: coleenp@4037: // JJJ - This should not happen. Maybe the first sample is taken coleenp@4037: // while the _sample_helper is being null'ed out. coleenp@4037: // assert(_sample_helper != NULL || _sampled != NULL, "unexpected state"); coleenp@4037: if (_sample_helper == NULL) return; duke@435: duke@435: if (_sample_helper != NULL) { duke@435: *(jlong*)_valuep = _sample_helper->take_sample(); duke@435: } duke@435: else if (_sampled != NULL) { duke@435: *(jlong*)_valuep = *_sampled; duke@435: } duke@435: } duke@435: duke@435: PerfByteArray::PerfByteArray(CounterNS ns, const char* namep, Units u, duke@435: Variability v, jint length) duke@435: : PerfData(ns, namep, u, v), _length(length) { duke@435: duke@435: create_entry(T_BYTE, sizeof(jbyte), (size_t)_length); duke@435: } duke@435: duke@435: void PerfString::set_string(const char* s2) { duke@435: duke@435: // copy n bytes of the string, assuring the null string is duke@435: // copied if s2 == NULL. duke@435: strncpy((char *)_valuep, s2 == NULL ? "" : s2, _length); duke@435: duke@435: // assure the string is null terminated when strlen(s2) >= _length duke@435: ((char*)_valuep)[_length-1] = '\0'; duke@435: } duke@435: duke@435: int PerfString::format(char* buffer, int length) { duke@435: return jio_snprintf(buffer, length, "%s", (char*)_valuep); duke@435: } duke@435: duke@435: PerfStringConstant::PerfStringConstant(CounterNS ns, const char* namep, duke@435: const char* initial_value) duke@435: : PerfString(ns, namep, V_Constant, duke@435: initial_value == NULL ? 1 : duke@435: MIN2((jint)(strlen((char*)initial_value)+1), duke@435: (jint)(PerfMaxStringConstLength+1)), duke@435: initial_value) { duke@435: duke@435: if (PrintMiscellaneous && Verbose) { duke@435: if (is_valid() && initial_value != NULL && duke@435: ((jint)strlen(initial_value) > (jint)PerfMaxStringConstLength)) { duke@435: duke@435: warning("Truncating PerfStringConstant: name = %s," duke@435: " length = " INT32_FORMAT "," duke@435: " PerfMaxStringConstLength = " INT32_FORMAT "\n", duke@435: namep, duke@435: (jint)strlen(initial_value), duke@435: (jint)PerfMaxStringConstLength); duke@435: } duke@435: } duke@435: } duke@435: duke@435: duke@435: duke@435: duke@435: duke@435: duke@435: void PerfDataManager::destroy() { duke@435: duke@435: if (_all == NULL) duke@435: // destroy already called, or initialization never happened duke@435: return; duke@435: duke@435: for (int index = 0; index < _all->length(); index++) { duke@435: PerfData* p = _all->at(index); duke@435: delete p; duke@435: } duke@435: duke@435: delete(_all); duke@435: delete(_sampled); duke@435: delete(_constants); duke@435: duke@435: _all = NULL; duke@435: _sampled = NULL; duke@435: _constants = NULL; duke@435: } duke@435: duke@435: void PerfDataManager::add_item(PerfData* p, bool sampled) { duke@435: duke@435: MutexLocker ml(PerfDataManager_lock); duke@435: duke@435: if (_all == NULL) { duke@435: _all = new PerfDataList(100); duke@435: } duke@435: duke@435: assert(!_all->contains(p->name()), "duplicate name added"); duke@435: duke@435: // add to the list of all perf data items duke@435: _all->append(p); duke@435: duke@435: if (p->variability() == PerfData::V_Constant) { duke@435: if (_constants == NULL) { duke@435: _constants = new PerfDataList(25); duke@435: } duke@435: _constants->append(p); duke@435: return; duke@435: } duke@435: duke@435: if (sampled) { duke@435: if (_sampled == NULL) { duke@435: _sampled = new PerfDataList(25); duke@435: } duke@435: _sampled->append(p); duke@435: } duke@435: } duke@435: sla@5237: PerfData* PerfDataManager::find_by_name(const char* name) { sla@5237: return _all->find_by_name(name); sla@5237: } sla@5237: duke@435: PerfDataList* PerfDataManager::all() { duke@435: duke@435: MutexLocker ml(PerfDataManager_lock); duke@435: duke@435: if (_all == NULL) duke@435: return NULL; duke@435: duke@435: PerfDataList* clone = _all->clone(); duke@435: return clone; duke@435: } duke@435: duke@435: PerfDataList* PerfDataManager::sampled() { duke@435: duke@435: MutexLocker ml(PerfDataManager_lock); duke@435: duke@435: if (_sampled == NULL) duke@435: return NULL; duke@435: duke@435: PerfDataList* clone = _sampled->clone(); duke@435: return clone; duke@435: } duke@435: duke@435: PerfDataList* PerfDataManager::constants() { duke@435: duke@435: MutexLocker ml(PerfDataManager_lock); duke@435: duke@435: if (_constants == NULL) duke@435: return NULL; duke@435: duke@435: PerfDataList* clone = _constants->clone(); duke@435: return clone; duke@435: } duke@435: duke@435: char* PerfDataManager::counter_name(const char* ns, const char* name) { duke@435: assert(ns != NULL, "ns string required"); duke@435: assert(name != NULL, "name string required"); duke@435: duke@435: size_t len = strlen(ns) + strlen(name) + 2; duke@435: char* result = NEW_RESOURCE_ARRAY(char, len); duke@435: sprintf(result, "%s.%s", ns, name); duke@435: return result; duke@435: } duke@435: duke@435: char* PerfDataManager::name_space(const char* ns, const char* sub, duke@435: int instance) { duke@435: char intbuf[40]; duke@435: jio_snprintf(intbuf, 40, UINT32_FORMAT, instance); duke@435: return name_space(ns, name_space(sub, intbuf)); duke@435: } duke@435: duke@435: char *PerfDataManager::name_space(const char* ns, int instance) { duke@435: char intbuf[40]; duke@435: jio_snprintf(intbuf, 40, UINT32_FORMAT, instance); duke@435: return name_space(ns, intbuf); duke@435: } duke@435: duke@435: PerfStringConstant* PerfDataManager::create_string_constant(CounterNS ns, duke@435: const char* name, duke@435: const char* s, duke@435: TRAPS) { duke@435: duke@435: PerfStringConstant* p = new PerfStringConstant(ns, name, s); duke@435: duke@435: if (!p->is_valid()) { duke@435: // allocation of native resources failed. duke@435: delete p; duke@435: THROW_0(vmSymbols::java_lang_OutOfMemoryError()); duke@435: } duke@435: duke@435: add_item(p, false); duke@435: duke@435: return p; duke@435: } duke@435: duke@435: PerfLongConstant* PerfDataManager::create_long_constant(CounterNS ns, duke@435: const char* name, duke@435: PerfData::Units u, duke@435: jlong val, TRAPS) { duke@435: duke@435: PerfLongConstant* p = new PerfLongConstant(ns, name, u, val); duke@435: duke@435: if (!p->is_valid()) { duke@435: // allocation of native resources failed. duke@435: delete p; duke@435: THROW_0(vmSymbols::java_lang_OutOfMemoryError()); duke@435: } duke@435: duke@435: add_item(p, false); duke@435: duke@435: return p; duke@435: } duke@435: duke@435: PerfStringVariable* PerfDataManager::create_string_variable(CounterNS ns, duke@435: const char* name, duke@435: jint max_length, duke@435: const char* s, duke@435: TRAPS) { duke@435: duke@435: if (max_length == 0 && s != NULL) max_length = (jint)strlen(s); duke@435: duke@435: assert(max_length != 0, "PerfStringVariable with length 0"); duke@435: duke@435: PerfStringVariable* p = new PerfStringVariable(ns, name, max_length, s); duke@435: duke@435: if (!p->is_valid()) { duke@435: // allocation of native resources failed. duke@435: delete p; duke@435: THROW_0(vmSymbols::java_lang_OutOfMemoryError()); duke@435: } duke@435: duke@435: add_item(p, false); duke@435: duke@435: return p; duke@435: } duke@435: duke@435: PerfLongVariable* PerfDataManager::create_long_variable(CounterNS ns, duke@435: const char* name, duke@435: PerfData::Units u, duke@435: jlong ival, TRAPS) { duke@435: duke@435: PerfLongVariable* p = new PerfLongVariable(ns, name, u, ival); duke@435: duke@435: if (!p->is_valid()) { duke@435: // allocation of native resources failed. duke@435: delete p; duke@435: THROW_0(vmSymbols::java_lang_OutOfMemoryError()); duke@435: } duke@435: duke@435: add_item(p, false); duke@435: duke@435: return p; duke@435: } duke@435: duke@435: PerfLongVariable* PerfDataManager::create_long_variable(CounterNS ns, duke@435: const char* name, duke@435: PerfData::Units u, duke@435: jlong* sp, TRAPS) { duke@435: duke@435: // Sampled counters not supported if UsePerfData is false duke@435: if (!UsePerfData) return NULL; duke@435: duke@435: PerfLongVariable* p = new PerfLongVariable(ns, name, u, sp); duke@435: duke@435: if (!p->is_valid()) { duke@435: // allocation of native resources failed. duke@435: delete p; duke@435: THROW_0(vmSymbols::java_lang_OutOfMemoryError()); duke@435: } duke@435: duke@435: add_item(p, true); duke@435: duke@435: return p; duke@435: } duke@435: duke@435: PerfLongVariable* PerfDataManager::create_long_variable(CounterNS ns, duke@435: const char* name, duke@435: PerfData::Units u, duke@435: PerfSampleHelper* sh, duke@435: TRAPS) { duke@435: duke@435: // Sampled counters not supported if UsePerfData is false duke@435: if (!UsePerfData) return NULL; duke@435: duke@435: PerfLongVariable* p = new PerfLongVariable(ns, name, u, sh); duke@435: duke@435: if (!p->is_valid()) { duke@435: // allocation of native resources failed. duke@435: delete p; duke@435: THROW_0(vmSymbols::java_lang_OutOfMemoryError()); duke@435: } duke@435: duke@435: add_item(p, true); duke@435: duke@435: return p; duke@435: } duke@435: duke@435: PerfLongCounter* PerfDataManager::create_long_counter(CounterNS ns, duke@435: const char* name, duke@435: PerfData::Units u, duke@435: jlong ival, TRAPS) { duke@435: duke@435: PerfLongCounter* p = new PerfLongCounter(ns, name, u, ival); duke@435: duke@435: if (!p->is_valid()) { duke@435: // allocation of native resources failed. duke@435: delete p; duke@435: THROW_0(vmSymbols::java_lang_OutOfMemoryError()); duke@435: } duke@435: duke@435: add_item(p, false); duke@435: duke@435: return p; duke@435: } duke@435: duke@435: PerfLongCounter* PerfDataManager::create_long_counter(CounterNS ns, duke@435: const char* name, duke@435: PerfData::Units u, duke@435: jlong* sp, TRAPS) { duke@435: duke@435: // Sampled counters not supported if UsePerfData is false duke@435: if (!UsePerfData) return NULL; duke@435: duke@435: PerfLongCounter* p = new PerfLongCounter(ns, name, u, sp); duke@435: duke@435: if (!p->is_valid()) { duke@435: // allocation of native resources failed. duke@435: delete p; duke@435: THROW_0(vmSymbols::java_lang_OutOfMemoryError()); duke@435: } duke@435: duke@435: add_item(p, true); duke@435: duke@435: return p; duke@435: } duke@435: duke@435: PerfLongCounter* PerfDataManager::create_long_counter(CounterNS ns, duke@435: const char* name, duke@435: PerfData::Units u, duke@435: PerfSampleHelper* sh, duke@435: TRAPS) { duke@435: duke@435: // Sampled counters not supported if UsePerfData is false duke@435: if (!UsePerfData) return NULL; duke@435: duke@435: PerfLongCounter* p = new PerfLongCounter(ns, name, u, sh); duke@435: duke@435: if (!p->is_valid()) { duke@435: // allocation of native resources failed. duke@435: delete p; duke@435: THROW_0(vmSymbols::java_lang_OutOfMemoryError()); duke@435: } duke@435: duke@435: add_item(p, true); duke@435: duke@435: return p; duke@435: } duke@435: duke@435: PerfDataList::PerfDataList(int length) { duke@435: zgu@3900: _set = new(ResourceObj::C_HEAP, mtInternal) PerfDataArray(length, true); duke@435: } duke@435: duke@435: PerfDataList::PerfDataList(PerfDataList* p) { duke@435: zgu@3900: _set = new(ResourceObj::C_HEAP, mtInternal) PerfDataArray(p->length(), true); duke@435: duke@435: _set->appendAll(p->get_impl()); duke@435: } duke@435: duke@435: PerfDataList::~PerfDataList() { duke@435: duke@435: delete _set; duke@435: duke@435: } duke@435: duke@435: bool PerfDataList::by_name(void* name, PerfData* pd) { duke@435: duke@435: if (pd == NULL) duke@435: return false; duke@435: duke@435: return strcmp((const char*)name, pd->name()) == 0; duke@435: } duke@435: duke@435: PerfData* PerfDataList::find_by_name(const char* name) { duke@435: jprovino@4165: // if add_item hasn't been called the list won't be initialized jprovino@4165: if (this == NULL) jprovino@4165: return NULL; jprovino@4165: duke@435: int i = _set->find((void*)name, PerfDataList::by_name); duke@435: duke@435: if (i >= 0 && i <= _set->length()) duke@435: return _set->at(i); duke@435: else duke@435: return NULL; duke@435: } duke@435: duke@435: PerfDataList* PerfDataList::clone() { duke@435: duke@435: PerfDataList* copy = new PerfDataList(this); duke@435: duke@435: assert(copy != NULL, "just checking"); duke@435: duke@435: return copy; duke@435: }