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 "precompiled.hpp"
26 #include "classfile/systemDictionary.hpp"
27 #include "memory/allocation.hpp"
28 #include "memory/universe.hpp"
29 #include "oops/oop.inline.hpp"
30 #include "runtime/mutexLocker.hpp"
31 #include "services/classLoadingService.hpp"
32 #include "services/memoryService.hpp"
33 #include "utilities/dtrace.hpp"
34 #include "utilities/macros.hpp"
35
36 #ifdef DTRACE_ENABLED
37
38 // Only bother with this argument setup if dtrace is available
39
40 #define HOTSPOT_CLASS_unloaded HOTSPOT_CLASS_UNLOADED
41 #define HOTSPOT_CLASS_loaded HOTSPOT_CLASS_LOADED
42 #define DTRACE_CLASSLOAD_PROBE(type, clss, shared) \
43 { \
44 char* data = NULL; \
45 int len = 0; \
46 Symbol* name = (clss)->name(); \
47 if (name != NULL) { \
48 data = (char*)name->bytes(); \
49 len = name->utf8_length(); \
50 } \
51 HOTSPOT_CLASS_##type( /* type = unloaded, loaded */ \
52 data, len, (clss)->class_loader(), (shared)); \
53 }
54
159 size_t ClassLoadingService::compute_class_size(InstanceKlass* k) {
160 // lifted from ClassStatistics.do_class(Klass* k)
161
162 size_t class_size = 0;
163
164 class_size += k->size();
165
166 if (k->oop_is_instance()) {
167 class_size += k->methods()->size();
168 // FIXME: Need to count the contents of methods
169 class_size += k->constants()->size();
170 class_size += k->local_interfaces()->size();
171 class_size += k->transitive_interfaces()->size();
172 // We do not have to count implementors, since we only store one!
173 // FIXME: How should these be accounted for, now when they have moved.
174 //class_size += k->fields()->size();
175 }
176 return class_size * oopSize;
177 }
178
179
180 bool ClassLoadingService::set_verbose(bool verbose) {
181 MutexLocker m(Management_lock);
182
183 // verbose will be set to the previous value
184 bool succeed = (CommandLineFlags::boolAtPut((char*)"TraceClassLoading", &verbose, Flag::MANAGEMENT) == Flag::SUCCESS);
185 assert(succeed, "Setting TraceClassLoading flag fails");
186 reset_trace_class_unloading();
187
188 return verbose;
189 }
190
191 // Caller to this function must own Management_lock
192 void ClassLoadingService::reset_trace_class_unloading() {
193 assert(Management_lock->owned_by_self(), "Must own the Management_lock");
194 bool value = MemoryService::get_verbose() || ClassLoadingService::get_verbose();
195 bool succeed = (CommandLineFlags::boolAtPut((char*)"TraceClassUnloading", &value, Flag::MANAGEMENT) == Flag::SUCCESS);
196 assert(succeed, "Setting TraceClassUnLoading flag fails");
197 }
198
199 GrowableArray<KlassHandle>* LoadedClassesEnumerator::_loaded_classes = NULL;
200 Thread* LoadedClassesEnumerator::_current_thread = NULL;
201
202 LoadedClassesEnumerator::LoadedClassesEnumerator(Thread* cur_thread) {
203 assert(cur_thread == Thread::current(), "Check current thread");
204
205 int init_size = ClassLoadingService::loaded_class_count();
206 _klass_handle_array = new GrowableArray<KlassHandle>(init_size);
207
208 // For consistency of the loaded classes, grab the SystemDictionary lock
209 MutexLocker sd_mutex(SystemDictionary_lock);
210
211 // Set _loaded_classes and _current_thread and begin enumerating all classes.
212 // Only one thread will do the enumeration at a time.
213 // These static variables are needed and they are used by the static method
214 // add_loaded_class called from classes_do().
215 _loaded_classes = _klass_handle_array;
216 _current_thread = cur_thread;
|
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 "precompiled.hpp"
26 #include "classfile/systemDictionary.hpp"
27 #include "memory/allocation.hpp"
28 #include "memory/universe.hpp"
29 #include "oops/oop.inline.hpp"
30 #include "runtime/mutexLocker.hpp"
31 #include "services/classLoadingService.hpp"
32 #include "services/memoryService.hpp"
33 #include "utilities/dtrace.hpp"
34 #include "utilities/macros.hpp"
35 #include "utilities/defaultStream.hpp"
36
37 #ifdef DTRACE_ENABLED
38
39 // Only bother with this argument setup if dtrace is available
40
41 #define HOTSPOT_CLASS_unloaded HOTSPOT_CLASS_UNLOADED
42 #define HOTSPOT_CLASS_loaded HOTSPOT_CLASS_LOADED
43 #define DTRACE_CLASSLOAD_PROBE(type, clss, shared) \
44 { \
45 char* data = NULL; \
46 int len = 0; \
47 Symbol* name = (clss)->name(); \
48 if (name != NULL) { \
49 data = (char*)name->bytes(); \
50 len = name->utf8_length(); \
51 } \
52 HOTSPOT_CLASS_##type( /* type = unloaded, loaded */ \
53 data, len, (clss)->class_loader(), (shared)); \
54 }
55
160 size_t ClassLoadingService::compute_class_size(InstanceKlass* k) {
161 // lifted from ClassStatistics.do_class(Klass* k)
162
163 size_t class_size = 0;
164
165 class_size += k->size();
166
167 if (k->oop_is_instance()) {
168 class_size += k->methods()->size();
169 // FIXME: Need to count the contents of methods
170 class_size += k->constants()->size();
171 class_size += k->local_interfaces()->size();
172 class_size += k->transitive_interfaces()->size();
173 // We do not have to count implementors, since we only store one!
174 // FIXME: How should these be accounted for, now when they have moved.
175 //class_size += k->fields()->size();
176 }
177 return class_size * oopSize;
178 }
179
180 bool ClassLoadingService::set_verbose(bool verbose) {
181 MutexLocker m(Management_lock);
182
183 // verbose will be set to the previous value
184 Flag::Error error = CommandLineFlags::boolAtPut("TraceClassLoading", &verbose, Flag::MANAGEMENT);
185 assert(error==Flag::SUCCESS, err_msg("Setting TraceClassLoading flag failed with error %s", Flag::flag_error_str(error)));
186 reset_trace_class_unloading();
187
188 return verbose;
189 }
190
191 // Caller to this function must own Management_lock
192 void ClassLoadingService::reset_trace_class_unloading() {
193 assert(Management_lock->owned_by_self(), "Must own the Management_lock");
194 bool value = MemoryService::get_verbose() || ClassLoadingService::get_verbose();
195 Flag::Error error = CommandLineFlags::boolAtPut("TraceClassUnloading", &value, Flag::MANAGEMENT);
196 assert(error==Flag::SUCCESS, err_msg("Setting TraceClassUnLoading flag failed with error %s", Flag::flag_error_str(error)));
197 }
198
199 GrowableArray<KlassHandle>* LoadedClassesEnumerator::_loaded_classes = NULL;
200 Thread* LoadedClassesEnumerator::_current_thread = NULL;
201
202 LoadedClassesEnumerator::LoadedClassesEnumerator(Thread* cur_thread) {
203 assert(cur_thread == Thread::current(), "Check current thread");
204
205 int init_size = ClassLoadingService::loaded_class_count();
206 _klass_handle_array = new GrowableArray<KlassHandle>(init_size);
207
208 // For consistency of the loaded classes, grab the SystemDictionary lock
209 MutexLocker sd_mutex(SystemDictionary_lock);
210
211 // Set _loaded_classes and _current_thread and begin enumerating all classes.
212 // Only one thread will do the enumeration at a time.
213 // These static variables are needed and they are used by the static method
214 // add_loaded_class called from classes_do().
215 _loaded_classes = _klass_handle_array;
216 _current_thread = cur_thread;
|