1 /*
2 * Copyright (c) 2011, 2020, Oracle and/or its affiliates. All rights reserved.
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * This code is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License version 2 only, as
7 * published by the Free Software Foundation.
8 *
9 * This code is distributed in the hope that it will be useful, but WITHOUT
10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
12 * version 2 for more details (a copy is included in the LICENSE file that
13 * accompanied this code).
14 *
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 "jvm.h"
27 #include "classfile/classLoaderHierarchyDCmd.hpp"
28 #include "classfile/classLoaderStats.hpp"
29 #include "compiler/compileBroker.hpp"
30 #include "compiler/directivesParser.hpp"
31 #include "gc/shared/gcVMOperations.hpp"
32 #include "memory/metaspace/metaspaceDCmd.hpp"
33 #include "memory/resourceArea.hpp"
34 #include "memory/universe.hpp"
35 #include "oops/objArrayOop.inline.hpp"
36 #include "oops/oop.inline.hpp"
37 #include "oops/typeArrayOop.inline.hpp"
38 #include "runtime/fieldDescriptor.inline.hpp"
39 #include "runtime/flags/jvmFlag.hpp"
40 #include "runtime/handles.inline.hpp"
41 #include "runtime/interfaceSupport.inline.hpp"
42 #include "runtime/javaCalls.hpp"
43 #include "runtime/os.hpp"
44 #include "services/diagnosticArgument.hpp"
45 #include "services/diagnosticCommand.hpp"
46 #include "services/diagnosticFramework.hpp"
47 #include "services/heapDumper.hpp"
48 #include "services/management.hpp"
49 #include "services/writeableFlags.hpp"
50 #include "utilities/debug.hpp"
51 #include "utilities/events.hpp"
52 #include "utilities/formatBuffer.hpp"
53 #include "utilities/macros.hpp"
54
55
56 static void loadAgentModule(TRAPS) {
57 ResourceMark rm(THREAD);
58 HandleMark hm(THREAD);
59
60 JavaValue result(T_OBJECT);
61 Handle h_module_name = java_lang_String::create_from_str("jdk.management.agent", CHECK);
62 JavaCalls::call_static(&result,
63 SystemDictionary::module_Modules_klass(),
64 vmSymbols::loadModule_name(),
65 vmSymbols::loadModule_signature(),
66 h_module_name,
67 THREAD);
68 }
69
70 void DCmdRegistrant::register_dcmds(){
71 // Registration of the diagnostic commands
72 // First argument specifies which interfaces will export the command
73 // Second argument specifies if the command is enabled
74 // Third argument specifies if the command is hidden
75 uint32_t full_export = DCmd_Source_Internal | DCmd_Source_AttachAPI
76 | DCmd_Source_MBean;
77 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<HelpDCmd>(full_export, true, false));
78 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<VersionDCmd>(full_export, true, false));
79 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<CommandLineDCmd>(full_export, true, false));
80 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<PrintSystemPropertiesDCmd>(full_export, true, false));
81 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<PrintVMFlagsDCmd>(full_export, true, false));
82 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<SetVMFlagDCmd>(full_export, true, false));
83 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<VMDynamicLibrariesDCmd>(full_export, true, false));
84 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<VMUptimeDCmd>(full_export, true, false));
85 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<VMInfoDCmd>(full_export, true, false));
86 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<SystemGCDCmd>(full_export, true, false));
87 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<RunFinalizationDCmd>(full_export, true, false));
88 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<HeapInfoDCmd>(full_export, true, false));
89 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<FinalizerInfoDCmd>(full_export, true, false));
90 #if INCLUDE_SERVICES
91 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<HeapDumpDCmd>(DCmd_Source_Internal | DCmd_Source_AttachAPI, true, false));
92 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<ClassHistogramDCmd>(full_export, true, false));
93 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<SystemDictionaryDCmd>(full_export, true, false));
94 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<ClassHierarchyDCmd>(full_export, true, false));
95 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<SymboltableDCmd>(full_export, true, false));
96 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<StringtableDCmd>(full_export, true, false));
97 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<metaspace::MetaspaceDCmd>(full_export, true, false));
98 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<EventLogDCmd>(full_export, true, false));
99 #if INCLUDE_JVMTI // Both JVMTI and SERVICES have to be enabled to have this dcmd
100 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<JVMTIAgentLoadDCmd>(full_export, true, false));
101 #endif // INCLUDE_JVMTI
102 #endif // INCLUDE_SERVICES
103 #if INCLUDE_JVMTI
104 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<JVMTIDataDumpDCmd>(full_export, true, false));
105 #endif // INCLUDE_JVMTI
106 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<ThreadDumpDCmd>(full_export, true, false));
107 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<ClassLoaderStatsDCmd>(full_export, true, false));
108 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<ClassLoaderHierarchyDCmd>(full_export, true, false));
109 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<CompileQueueDCmd>(full_export, true, false));
110 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<CodeListDCmd>(full_export, true, false));
111 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<CodeCacheDCmd>(full_export, true, false));
112 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<TouchedMethodsDCmd>(full_export, true, false));
113 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<CodeHeapAnalyticsDCmd>(full_export, true, false));
114
115 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<CompilerDirectivesPrintDCmd>(full_export, true, false));
116 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<CompilerDirectivesAddDCmd>(full_export, true, false));
117 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<CompilerDirectivesRemoveDCmd>(full_export, true, false));
118 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<CompilerDirectivesClearDCmd>(full_export, true, false));
119
120 // Enhanced JMX Agent Support
121 // These commands won't be exported via the DiagnosticCommandMBean until an
122 // appropriate permission is created for them
123 uint32_t jmx_agent_export_flags = DCmd_Source_Internal | DCmd_Source_AttachAPI;
124 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<JMXStartRemoteDCmd>(jmx_agent_export_flags, true,false));
125 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<JMXStartLocalDCmd>(jmx_agent_export_flags, true,false));
126 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<JMXStopRemoteDCmd>(jmx_agent_export_flags, true,false));
127 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<JMXStatusDCmd>(jmx_agent_export_flags, true,false));
128
129 // Debug on cmd (only makes sense with JVMTI since the agentlib needs it).
130 #if INCLUDE_JVMTI
131 DCmdFactory::register_DCmdFactory(new DCmdFactoryImpl<DebugOnCmdStartDCmd>(full_export, true, true));
132 #endif // INCLUDE_JVMTI
133
134 }
135
136 #ifndef HAVE_EXTRA_DCMD
137 void DCmdRegistrant::register_dcmds_ext(){
138 // Do nothing here
139 }
140 #endif
141
142
143 HelpDCmd::HelpDCmd(outputStream* output, bool heap) : DCmdWithParser(output, heap),
144 _all("-all", "Show help for all commands", "BOOLEAN", false, "false"),
145 _cmd("command name", "The name of the command for which we want help",
146 "STRING", false) {
147 _dcmdparser.add_dcmd_option(&_all);
148 _dcmdparser.add_dcmd_argument(&_cmd);
149 };
150
151
152 static int compare_strings(const char** s1, const char** s2) {
153 return ::strcmp(*s1, *s2);
154 }
155
156 void HelpDCmd::execute(DCmdSource source, TRAPS) {
157 if (_all.value()) {
158 GrowableArray<const char*>* cmd_list = DCmdFactory::DCmd_list(source);
159 cmd_list->sort(compare_strings);
160 for (int i = 0; i < cmd_list->length(); i++) {
161 DCmdFactory* factory = DCmdFactory::factory(source, cmd_list->at(i),
162 strlen(cmd_list->at(i)));
163 output()->print_cr("%s%s", factory->name(),
164 factory->is_enabled() ? "" : " [disabled]");
165 output()->print_cr("\t%s", factory->description());
166 output()->cr();
167 factory = factory->next();
168 }
169 } else if (_cmd.has_value()) {
170 DCmd* cmd = NULL;
171 DCmdFactory* factory = DCmdFactory::factory(source, _cmd.value(),
172 strlen(_cmd.value()));
173 if (factory != NULL) {
174 output()->print_cr("%s%s", factory->name(),
175 factory->is_enabled() ? "" : " [disabled]");
176 output()->print_cr("%s", factory->description());
177 output()->print_cr("\nImpact: %s", factory->impact());
178 JavaPermission p = factory->permission();
179 if(p._class != NULL) {
180 if(p._action != NULL) {
181 output()->print_cr("\nPermission: %s(%s, %s)",
182 p._class, p._name == NULL ? "null" : p._name, p._action);
183 } else {
184 output()->print_cr("\nPermission: %s(%s)",
185 p._class, p._name == NULL ? "null" : p._name);
186 }
187 }
188 output()->cr();
189 cmd = factory->create_resource_instance(output());
190 if (cmd != NULL) {
191 DCmdMark mark(cmd);
192 cmd->print_help(factory->name());
193 }
194 } else {
195 output()->print_cr("Help unavailable : '%s' : No such command", _cmd.value());
196 }
197 } else {
198 output()->print_cr("The following commands are available:");
199 GrowableArray<const char *>* cmd_list = DCmdFactory::DCmd_list(source);
200 cmd_list->sort(compare_strings);
201 for (int i = 0; i < cmd_list->length(); i++) {
202 DCmdFactory* factory = DCmdFactory::factory(source, cmd_list->at(i),
203 strlen(cmd_list->at(i)));
204 output()->print_cr("%s%s", factory->name(),
205 factory->is_enabled() ? "" : " [disabled]");
206 factory = factory->_next;
207 }
208 output()->print_cr("\nFor more information about a specific command use 'help <command>'.");
209 }
210 }
211
212 int HelpDCmd::num_arguments() {
213 ResourceMark rm;
214 HelpDCmd* dcmd = new HelpDCmd(NULL, false);
215 if (dcmd != NULL) {
216 DCmdMark mark(dcmd);
217 return dcmd->_dcmdparser.num_arguments();
218 } else {
219 return 0;
220 }
221 }
222
223 void VersionDCmd::execute(DCmdSource source, TRAPS) {
224 output()->print_cr("%s version %s", VM_Version::vm_name(),
225 VM_Version::vm_release());
226 JDK_Version jdk_version = JDK_Version::current();
227 if (jdk_version.patch_version() > 0) {
228 output()->print_cr("JDK %d.%d.%d.%d", jdk_version.major_version(),
229 jdk_version.minor_version(), jdk_version.security_version(),
230 jdk_version.patch_version());
231 } else {
232 output()->print_cr("JDK %d.%d.%d", jdk_version.major_version(),
233 jdk_version.minor_version(), jdk_version.security_version());
234 }
235 }
236
237 PrintVMFlagsDCmd::PrintVMFlagsDCmd(outputStream* output, bool heap) :
238 DCmdWithParser(output, heap),
239 _all("-all", "Print all flags supported by the VM", "BOOLEAN", false, "false") {
240 _dcmdparser.add_dcmd_option(&_all);
241 }
242
243 void PrintVMFlagsDCmd::execute(DCmdSource source, TRAPS) {
244 if (_all.value()) {
245 JVMFlag::printFlags(output(), true);
246 } else {
247 JVMFlag::printSetFlags(output());
248 }
249 }
250
251 int PrintVMFlagsDCmd::num_arguments() {
252 ResourceMark rm;
253 PrintVMFlagsDCmd* dcmd = new PrintVMFlagsDCmd(NULL, false);
254 if (dcmd != NULL) {
255 DCmdMark mark(dcmd);
256 return dcmd->_dcmdparser.num_arguments();
257 } else {
258 return 0;
259 }
260 }
261
262 SetVMFlagDCmd::SetVMFlagDCmd(outputStream* output, bool heap) :
263 DCmdWithParser(output, heap),
264 _flag("flag name", "The name of the flag we want to set",
265 "STRING", true),
266 _value("string value", "The value we want to set", "STRING", false) {
267 _dcmdparser.add_dcmd_argument(&_flag);
268 _dcmdparser.add_dcmd_argument(&_value);
269 }
270
271 void SetVMFlagDCmd::execute(DCmdSource source, TRAPS) {
272 const char* val = NULL;
273 if (_value.value() != NULL) {
274 val = _value.value();
275 }
276
277 FormatBuffer<80> err_msg("%s", "");
278 int ret = WriteableFlags::set_flag(_flag.value(), val, JVMFlag::MANAGEMENT, err_msg);
279
280 if (ret != JVMFlag::SUCCESS) {
281 output()->print_cr("%s", err_msg.buffer());
282 }
283 }
284
285 int SetVMFlagDCmd::num_arguments() {
286 ResourceMark rm;
287 SetVMFlagDCmd* dcmd = new SetVMFlagDCmd(NULL, false);
288 if (dcmd != NULL) {
289 DCmdMark mark(dcmd);
290 return dcmd->_dcmdparser.num_arguments();
291 } else {
292 return 0;
293 }
294 }
295
296 void JVMTIDataDumpDCmd::execute(DCmdSource source, TRAPS) {
297 if (JvmtiExport::should_post_data_dump()) {
298 JvmtiExport::post_data_dump();
299 }
300 }
301
302 #if INCLUDE_SERVICES
303 JVMTIAgentLoadDCmd::JVMTIAgentLoadDCmd(outputStream* output, bool heap) :
304 DCmdWithParser(output, heap),
305 _libpath("library path", "Absolute path of the JVMTI agent to load.",
306 "STRING", true),
307 _option("agent option", "Option string to pass the agent.", "STRING", false) {
308 _dcmdparser.add_dcmd_argument(&_libpath);
309 _dcmdparser.add_dcmd_argument(&_option);
310 }
311
312 void JVMTIAgentLoadDCmd::execute(DCmdSource source, TRAPS) {
313
314 if (_libpath.value() == NULL) {
315 output()->print_cr("JVMTI.agent_load dcmd needs library path.");
316 return;
317 }
318
319 char *suffix = strrchr(_libpath.value(), '.');
320 bool is_java_agent = (suffix != NULL) && (strncmp(".jar", suffix, 4) == 0);
321
322 if (is_java_agent) {
323 if (_option.value() == NULL) {
324 JvmtiExport::load_agent_library("instrument", "false",
325 _libpath.value(), output());
326 } else {
327 size_t opt_len = strlen(_libpath.value()) + strlen(_option.value()) + 2;
328 if (opt_len > 4096) {
329 output()->print_cr("JVMTI agent attach failed: Options is too long.");
330 return;
331 }
332
333 char *opt = (char *)os::malloc(opt_len, mtInternal);
334 if (opt == NULL) {
335 output()->print_cr("JVMTI agent attach failed: "
336 "Could not allocate " SIZE_FORMAT " bytes for argument.",
337 opt_len);
338 return;
339 }
340
341 jio_snprintf(opt, opt_len, "%s=%s", _libpath.value(), _option.value());
342 JvmtiExport::load_agent_library("instrument", "false", opt, output());
343
344 os::free(opt);
345 }
346 } else {
347 JvmtiExport::load_agent_library(_libpath.value(), "true",
348 _option.value(), output());
349 }
350 }
351
352 int JVMTIAgentLoadDCmd::num_arguments() {
353 ResourceMark rm;
354 JVMTIAgentLoadDCmd* dcmd = new JVMTIAgentLoadDCmd(NULL, false);
355 if (dcmd != NULL) {
356 DCmdMark mark(dcmd);
357 return dcmd->_dcmdparser.num_arguments();
358 } else {
359 return 0;
360 }
361 }
362 #endif // INCLUDE_SERVICES
363
364 void PrintSystemPropertiesDCmd::execute(DCmdSource source, TRAPS) {
365 // load VMSupport
366 Symbol* klass = vmSymbols::jdk_internal_vm_VMSupport();
367 Klass* k = SystemDictionary::resolve_or_fail(klass, true, CHECK);
368 InstanceKlass* ik = InstanceKlass::cast(k);
369 if (ik->should_be_initialized()) {
370 ik->initialize(THREAD);
371 }
372 if (HAS_PENDING_EXCEPTION) {
373 java_lang_Throwable::print(PENDING_EXCEPTION, output());
374 output()->cr();
375 CLEAR_PENDING_EXCEPTION;
376 return;
377 }
378
379 // invoke the serializePropertiesToByteArray method
380 JavaValue result(T_OBJECT);
381 JavaCallArguments args;
382
383 Symbol* signature = vmSymbols::serializePropertiesToByteArray_signature();
384 JavaCalls::call_static(&result,
385 ik,
386 vmSymbols::serializePropertiesToByteArray_name(),
387 signature,
388 &args,
389 THREAD);
390 if (HAS_PENDING_EXCEPTION) {
391 java_lang_Throwable::print(PENDING_EXCEPTION, output());
392 output()->cr();
393 CLEAR_PENDING_EXCEPTION;
394 return;
395 }
396
397 // The result should be a [B
398 oop res = (oop)result.get_jobject();
399 assert(res->is_typeArray(), "just checking");
400 assert(TypeArrayKlass::cast(res->klass())->element_type() == T_BYTE, "just checking");
401
402 // copy the bytes to the output stream
403 typeArrayOop ba = typeArrayOop(res);
404 jbyte* addr = typeArrayOop(res)->byte_at_addr(0);
405 output()->print_raw((const char*)addr, ba->length());
406 }
407
408 VMUptimeDCmd::VMUptimeDCmd(outputStream* output, bool heap) :
409 DCmdWithParser(output, heap),
410 _date("-date", "Add a prefix with current date", "BOOLEAN", false, "false") {
411 _dcmdparser.add_dcmd_option(&_date);
412 }
413
414 void VMUptimeDCmd::execute(DCmdSource source, TRAPS) {
415 if (_date.value()) {
416 output()->date_stamp(true, "", ": ");
417 }
418 output()->time_stamp().update_to(tty->time_stamp().ticks());
419 output()->stamp();
420 output()->print_cr(" s");
421 }
422
423 int VMUptimeDCmd::num_arguments() {
424 ResourceMark rm;
425 VMUptimeDCmd* dcmd = new VMUptimeDCmd(NULL, false);
426 if (dcmd != NULL) {
427 DCmdMark mark(dcmd);
428 return dcmd->_dcmdparser.num_arguments();
429 } else {
430 return 0;
431 }
432 }
433
434 void VMInfoDCmd::execute(DCmdSource source, TRAPS) {
435 VMError::print_vm_info(_output);
436 }
437
438 void SystemGCDCmd::execute(DCmdSource source, TRAPS) {
439 Universe::heap()->collect(GCCause::_dcmd_gc_run);
440 }
441
442 void RunFinalizationDCmd::execute(DCmdSource source, TRAPS) {
443 Klass* k = SystemDictionary::System_klass();
444 JavaValue result(T_VOID);
445 JavaCalls::call_static(&result, k,
446 vmSymbols::run_finalization_name(),
447 vmSymbols::void_method_signature(), CHECK);
448 }
449
450 void HeapInfoDCmd::execute(DCmdSource source, TRAPS) {
451 MutexLocker hl(THREAD, Heap_lock);
452 Universe::heap()->print_on(output());
453 }
454
455 void FinalizerInfoDCmd::execute(DCmdSource source, TRAPS) {
456 ResourceMark rm(THREAD);
457
458 Klass* k = SystemDictionary::resolve_or_fail(
459 vmSymbols::finalizer_histogram_klass(), true, CHECK);
460
461 JavaValue result(T_ARRAY);
462
463 // We are calling lang.ref.FinalizerHistogram.getFinalizerHistogram() method
464 // and expect it to return array of FinalizerHistogramEntry as Object[]
465
466 JavaCalls::call_static(&result, k,
467 vmSymbols::get_finalizer_histogram_name(),
468 vmSymbols::void_finalizer_histogram_entry_array_signature(), CHECK);
469
470 objArrayOop result_oop = (objArrayOop) result.get_jobject();
471 if (result_oop->length() == 0) {
472 output()->print_cr("No instances waiting for finalization found");
473 return;
474 }
475
476 oop foop = result_oop->obj_at(0);
477 InstanceKlass* ik = InstanceKlass::cast(foop->klass());
478
479 fieldDescriptor count_fd, name_fd;
480
481 Klass* count_res = ik->find_field(
482 vmSymbols::finalizer_histogram_entry_count_field(), vmSymbols::int_signature(), &count_fd);
483
484 Klass* name_res = ik->find_field(
485 vmSymbols::finalizer_histogram_entry_name_field(), vmSymbols::string_signature(), &name_fd);
486
487 assert(count_res != NULL && name_res != NULL, "Unexpected layout of FinalizerHistogramEntry");
488
489 output()->print_cr("Unreachable instances waiting for finalization");
490 output()->print_cr("#instances class name");
491 output()->print_cr("-----------------------");
492
493 for (int i = 0; i < result_oop->length(); ++i) {
494 oop element_oop = result_oop->obj_at(i);
495 oop str_oop = element_oop->obj_field(name_fd.offset());
496 char *name = java_lang_String::as_utf8_string(str_oop);
497 int count = element_oop->int_field(count_fd.offset());
498 output()->print_cr("%10d %s", count, name);
499 }
500 }
501
502 #if INCLUDE_SERVICES // Heap dumping/inspection supported
503 HeapDumpDCmd::HeapDumpDCmd(outputStream* output, bool heap) :
504 DCmdWithParser(output, heap),
505 _filename("filename","Name of the dump file", "STRING",true),
506 _all("-all", "Dump all objects, including unreachable objects",
507 "BOOLEAN", false, "false"),
508 _gzip("-gz", "Write in gzipped format.", "BOOLEAN", false, "false"),
509 _gzip_level("-gz-level", "The compression level from 0 (store) to 9 (best) when writing in gzipped format.",
510 "INT", false, "1") {
511 _dcmdparser.add_dcmd_option(&_all);
512 _dcmdparser.add_dcmd_argument(&_filename);
513 _dcmdparser.add_dcmd_option(&_gzip);
514 _dcmdparser.add_dcmd_option(&_gzip_level);
515 }
516
517 void HeapDumpDCmd::execute(DCmdSource source, TRAPS) {
518 jlong level = -1; // -1 means no compression.
519
520 if (_gzip.value()) {
521 level = _gzip_level.value();
522
523 if (level < 0 || level > 9) {
524 output()->print_cr("Compression level out of range (0-9): " JLONG_FORMAT, level);
525 return;
526 }
527 }
528
529 // Request a full GC before heap dump if _all is false
530 // This helps reduces the amount of unreachable objects in the dump
531 // and makes it easier to browse.
532 HeapDumper dumper(!_all.value() /* request GC if _all is false*/);
533 dumper.dump(_filename.value(), output(), (int) level);
534 }
535
536 int HeapDumpDCmd::num_arguments() {
537 ResourceMark rm;
538 HeapDumpDCmd* dcmd = new HeapDumpDCmd(NULL, false);
539 if (dcmd != NULL) {
540 DCmdMark mark(dcmd);
541 return dcmd->_dcmdparser.num_arguments();
542 } else {
543 return 0;
544 }
545 }
546
547 ClassHistogramDCmd::ClassHistogramDCmd(outputStream* output, bool heap) :
548 DCmdWithParser(output, heap),
549 _all("-all", "Inspect all objects, including unreachable objects",
550 "BOOLEAN", false, "false") {
551 _dcmdparser.add_dcmd_option(&_all);
552 }
553
554 void ClassHistogramDCmd::execute(DCmdSource source, TRAPS) {
555 VM_GC_HeapInspection heapop(output(),
556 !_all.value() /* request full gc if false */);
557 VMThread::execute(&heapop);
558 }
559
560 int ClassHistogramDCmd::num_arguments() {
561 ResourceMark rm;
562 ClassHistogramDCmd* dcmd = new ClassHistogramDCmd(NULL, false);
563 if (dcmd != NULL) {
564 DCmdMark mark(dcmd);
565 return dcmd->_dcmdparser.num_arguments();
566 } else {
567 return 0;
568 }
569 }
570
571 #endif // INCLUDE_SERVICES
572
573 ThreadDumpDCmd::ThreadDumpDCmd(outputStream* output, bool heap) :
574 DCmdWithParser(output, heap),
575 _locks("-l", "print java.util.concurrent locks", "BOOLEAN", false, "false"),
576 _extended("-e", "print extended thread information", "BOOLEAN", false, "false") {
577 _dcmdparser.add_dcmd_option(&_locks);
578 _dcmdparser.add_dcmd_option(&_extended);
579 }
580
581 void ThreadDumpDCmd::execute(DCmdSource source, TRAPS) {
582 // thread stacks
583 VM_PrintThreads op1(output(), _locks.value(), _extended.value());
584 VMThread::execute(&op1);
585
586 // JNI global handles
587 VM_PrintJNI op2(output());
588 VMThread::execute(&op2);
589
590 // Deadlock detection
591 VM_FindDeadlocks op3(output());
592 VMThread::execute(&op3);
593 }
594
595 int ThreadDumpDCmd::num_arguments() {
596 ResourceMark rm;
597 ThreadDumpDCmd* dcmd = new ThreadDumpDCmd(NULL, false);
598 if (dcmd != NULL) {
599 DCmdMark mark(dcmd);
600 return dcmd->_dcmdparser.num_arguments();
601 } else {
602 return 0;
603 }
604 }
605
606 // Enhanced JMX Agent support
607
608 JMXStartRemoteDCmd::JMXStartRemoteDCmd(outputStream *output, bool heap_allocated) :
609
610 DCmdWithParser(output, heap_allocated),
611
612 _config_file
613 ("config.file",
614 "set com.sun.management.config.file", "STRING", false),
615
616 _jmxremote_host
617 ("jmxremote.host",
618 "set com.sun.management.jmxremote.host", "STRING", false),
619
620 _jmxremote_port
621 ("jmxremote.port",
622 "set com.sun.management.jmxremote.port", "STRING", false),
623
624 _jmxremote_rmi_port
625 ("jmxremote.rmi.port",
626 "set com.sun.management.jmxremote.rmi.port", "STRING", false),
627
628 _jmxremote_ssl
629 ("jmxremote.ssl",
630 "set com.sun.management.jmxremote.ssl", "STRING", false),
631
632 _jmxremote_registry_ssl
633 ("jmxremote.registry.ssl",
634 "set com.sun.management.jmxremote.registry.ssl", "STRING", false),
635
636 _jmxremote_authenticate
637 ("jmxremote.authenticate",
638 "set com.sun.management.jmxremote.authenticate", "STRING", false),
639
640 _jmxremote_password_file
641 ("jmxremote.password.file",
642 "set com.sun.management.jmxremote.password.file", "STRING", false),
643
644 _jmxremote_access_file
645 ("jmxremote.access.file",
646 "set com.sun.management.jmxremote.access.file", "STRING", false),
647
648 _jmxremote_login_config
649 ("jmxremote.login.config",
650 "set com.sun.management.jmxremote.login.config", "STRING", false),
651
652 _jmxremote_ssl_enabled_cipher_suites
653 ("jmxremote.ssl.enabled.cipher.suites",
654 "set com.sun.management.jmxremote.ssl.enabled.cipher.suite", "STRING", false),
655
656 _jmxremote_ssl_enabled_protocols
657 ("jmxremote.ssl.enabled.protocols",
658 "set com.sun.management.jmxremote.ssl.enabled.protocols", "STRING", false),
659
660 _jmxremote_ssl_need_client_auth
661 ("jmxremote.ssl.need.client.auth",
662 "set com.sun.management.jmxremote.need.client.auth", "STRING", false),
663
664 _jmxremote_ssl_config_file
665 ("jmxremote.ssl.config.file",
666 "set com.sun.management.jmxremote.ssl.config.file", "STRING", false),
667
668 // JDP Protocol support
669 _jmxremote_autodiscovery
670 ("jmxremote.autodiscovery",
671 "set com.sun.management.jmxremote.autodiscovery", "STRING", false),
672
673 _jdp_port
674 ("jdp.port",
675 "set com.sun.management.jdp.port", "INT", false),
676
677 _jdp_address
678 ("jdp.address",
679 "set com.sun.management.jdp.address", "STRING", false),
680
681 _jdp_source_addr
682 ("jdp.source_addr",
683 "set com.sun.management.jdp.source_addr", "STRING", false),
684
685 _jdp_ttl
686 ("jdp.ttl",
687 "set com.sun.management.jdp.ttl", "INT", false),
688
689 _jdp_pause
690 ("jdp.pause",
691 "set com.sun.management.jdp.pause", "INT", false),
692
693 _jdp_name
694 ("jdp.name",
695 "set com.sun.management.jdp.name", "STRING", false)
696
697 {
698 _dcmdparser.add_dcmd_option(&_config_file);
699 _dcmdparser.add_dcmd_option(&_jmxremote_host);
700 _dcmdparser.add_dcmd_option(&_jmxremote_port);
701 _dcmdparser.add_dcmd_option(&_jmxremote_rmi_port);
702 _dcmdparser.add_dcmd_option(&_jmxremote_ssl);
703 _dcmdparser.add_dcmd_option(&_jmxremote_registry_ssl);
704 _dcmdparser.add_dcmd_option(&_jmxremote_authenticate);
705 _dcmdparser.add_dcmd_option(&_jmxremote_password_file);
706 _dcmdparser.add_dcmd_option(&_jmxremote_access_file);
707 _dcmdparser.add_dcmd_option(&_jmxremote_login_config);
708 _dcmdparser.add_dcmd_option(&_jmxremote_ssl_enabled_cipher_suites);
709 _dcmdparser.add_dcmd_option(&_jmxremote_ssl_enabled_protocols);
710 _dcmdparser.add_dcmd_option(&_jmxremote_ssl_need_client_auth);
711 _dcmdparser.add_dcmd_option(&_jmxremote_ssl_config_file);
712 _dcmdparser.add_dcmd_option(&_jmxremote_autodiscovery);
713 _dcmdparser.add_dcmd_option(&_jdp_port);
714 _dcmdparser.add_dcmd_option(&_jdp_address);
715 _dcmdparser.add_dcmd_option(&_jdp_source_addr);
716 _dcmdparser.add_dcmd_option(&_jdp_ttl);
717 _dcmdparser.add_dcmd_option(&_jdp_pause);
718 _dcmdparser.add_dcmd_option(&_jdp_name);
719 }
720
721
722 int JMXStartRemoteDCmd::num_arguments() {
723 ResourceMark rm;
724 JMXStartRemoteDCmd* dcmd = new JMXStartRemoteDCmd(NULL, false);
725 if (dcmd != NULL) {
726 DCmdMark mark(dcmd);
727 return dcmd->_dcmdparser.num_arguments();
728 } else {
729 return 0;
730 }
731 }
732
733
734 void JMXStartRemoteDCmd::execute(DCmdSource source, TRAPS) {
735 ResourceMark rm(THREAD);
736 HandleMark hm(THREAD);
737
738 // Load and initialize the jdk.internal.agent.Agent class
739 // invoke startRemoteManagementAgent(string) method to start
740 // the remote management server.
741 // throw java.lang.NoSuchMethodError if the method doesn't exist
742
743 loadAgentModule(CHECK);
744 Handle loader = Handle(THREAD, SystemDictionary::java_system_loader());
745 Klass* k = SystemDictionary::resolve_or_fail(vmSymbols::jdk_internal_agent_Agent(), loader, Handle(), true, CHECK);
746
747 JavaValue result(T_VOID);
748
749 // Pass all command line arguments to java as key=value,...
750 // All checks are done on java side
751
752 int len = 0;
753 stringStream options;
754 char comma[2] = {0,0};
755
756 // Leave default values on Agent.class side and pass only
757 // agruments explicitly set by user. All arguments passed
758 // to jcmd override properties with the same name set by
759 // command line with -D or by managmenent.properties
760 // file.
761 #define PUT_OPTION(a) \
762 do { \
763 if ( (a).is_set() ){ \
764 if ( *((a).type()) == 'I' ) { \
765 options.print("%scom.sun.management.%s=" JLONG_FORMAT, comma, (a).name(), (jlong)((a).value())); \
766 } else { \
767 options.print("%scom.sun.management.%s=%s", comma, (a).name(), (char*)((a).value())); \
768 } \
769 comma[0] = ','; \
770 }\
771 } while(0);
772
773
774 PUT_OPTION(_config_file);
775 PUT_OPTION(_jmxremote_host);
776 PUT_OPTION(_jmxremote_port);
777 PUT_OPTION(_jmxremote_rmi_port);
778 PUT_OPTION(_jmxremote_ssl);
779 PUT_OPTION(_jmxremote_registry_ssl);
780 PUT_OPTION(_jmxremote_authenticate);
781 PUT_OPTION(_jmxremote_password_file);
782 PUT_OPTION(_jmxremote_access_file);
783 PUT_OPTION(_jmxremote_login_config);
784 PUT_OPTION(_jmxremote_ssl_enabled_cipher_suites);
785 PUT_OPTION(_jmxremote_ssl_enabled_protocols);
786 PUT_OPTION(_jmxremote_ssl_need_client_auth);
787 PUT_OPTION(_jmxremote_ssl_config_file);
788 PUT_OPTION(_jmxremote_autodiscovery);
789 PUT_OPTION(_jdp_port);
790 PUT_OPTION(_jdp_address);
791 PUT_OPTION(_jdp_source_addr);
792 PUT_OPTION(_jdp_ttl);
793 PUT_OPTION(_jdp_pause);
794 PUT_OPTION(_jdp_name);
795
796 #undef PUT_OPTION
797
798 Handle str = java_lang_String::create_from_str(options.as_string(), CHECK);
799 JavaCalls::call_static(&result, k, vmSymbols::startRemoteAgent_name(), vmSymbols::string_void_signature(), str, CHECK);
800 }
801
802 JMXStartLocalDCmd::JMXStartLocalDCmd(outputStream *output, bool heap_allocated) :
803 DCmd(output, heap_allocated) {
804 // do nothing
805 }
806
807 void JMXStartLocalDCmd::execute(DCmdSource source, TRAPS) {
808 ResourceMark rm(THREAD);
809 HandleMark hm(THREAD);
810
811 // Load and initialize the jdk.internal.agent.Agent class
812 // invoke startLocalManagementAgent(void) method to start
813 // the local management server
814 // throw java.lang.NoSuchMethodError if method doesn't exist
815
816 loadAgentModule(CHECK);
817 Handle loader = Handle(THREAD, SystemDictionary::java_system_loader());
818 Klass* k = SystemDictionary::resolve_or_fail(vmSymbols::jdk_internal_agent_Agent(), loader, Handle(), true, CHECK);
819
820 JavaValue result(T_VOID);
821 JavaCalls::call_static(&result, k, vmSymbols::startLocalAgent_name(), vmSymbols::void_method_signature(), CHECK);
822 }
823
824 void JMXStopRemoteDCmd::execute(DCmdSource source, TRAPS) {
825 ResourceMark rm(THREAD);
826 HandleMark hm(THREAD);
827
828 // Load and initialize the jdk.internal.agent.Agent class
829 // invoke stopRemoteManagementAgent method to stop the
830 // management server
831 // throw java.lang.NoSuchMethodError if method doesn't exist
832
833 loadAgentModule(CHECK);
834 Handle loader = Handle(THREAD, SystemDictionary::java_system_loader());
835 Klass* k = SystemDictionary::resolve_or_fail(vmSymbols::jdk_internal_agent_Agent(), loader, Handle(), true, CHECK);
836
837 JavaValue result(T_VOID);
838 JavaCalls::call_static(&result, k, vmSymbols::stopRemoteAgent_name(), vmSymbols::void_method_signature(), CHECK);
839 }
840
841 JMXStatusDCmd::JMXStatusDCmd(outputStream *output, bool heap_allocated) :
842 DCmd(output, heap_allocated) {
843 // do nothing
844 }
845
846 void JMXStatusDCmd::execute(DCmdSource source, TRAPS) {
847 ResourceMark rm(THREAD);
848 HandleMark hm(THREAD);
849
850 // Load and initialize the jdk.internal.agent.Agent class
851 // invoke getManagementAgentStatus() method to generate the status info
852 // throw java.lang.NoSuchMethodError if method doesn't exist
853
854 loadAgentModule(CHECK);
855 Handle loader = Handle(THREAD, SystemDictionary::java_system_loader());
856 Klass* k = SystemDictionary::resolve_or_fail(vmSymbols::jdk_internal_agent_Agent(), loader, Handle(), true, CHECK);
857
858 JavaValue result(T_OBJECT);
859 JavaCalls::call_static(&result, k, vmSymbols::getAgentStatus_name(), vmSymbols::void_string_signature(), CHECK);
860
861 jvalue* jv = (jvalue*) result.get_value_addr();
862 oop str = (oop) jv->l;
863 if (str != NULL) {
864 char* out = java_lang_String::as_utf8_string(str);
865 if (out) {
866 output()->print_cr("%s", out);
867 return;
868 }
869 }
870 output()->print_cr("Error obtaining management agent status");
871 }
872
873 VMDynamicLibrariesDCmd::VMDynamicLibrariesDCmd(outputStream *output, bool heap_allocated) :
874 DCmd(output, heap_allocated) {
875 // do nothing
876 }
877
878 void VMDynamicLibrariesDCmd::execute(DCmdSource source, TRAPS) {
879 os::print_dll_info(output());
880 output()->cr();
881 }
882
883 void CompileQueueDCmd::execute(DCmdSource source, TRAPS) {
884 VM_PrintCompileQueue printCompileQueueOp(output());
885 VMThread::execute(&printCompileQueueOp);
886 }
887
888 void CodeListDCmd::execute(DCmdSource source, TRAPS) {
889 CodeCache::print_codelist(output());
890 }
891
892 void CodeCacheDCmd::execute(DCmdSource source, TRAPS) {
893 CodeCache::print_layout(output());
894 }
895
896 //---< BEGIN >--- CodeHeap State Analytics.
897 CodeHeapAnalyticsDCmd::CodeHeapAnalyticsDCmd(outputStream* output, bool heap) :
898 DCmdWithParser(output, heap),
899 _function("function", "Function to be performed (aggregate, UsedSpace, FreeSpace, MethodCount, MethodSpace, MethodAge, MethodNames, discard", "STRING", false, "all"),
900 _granularity("granularity", "Detail level - smaller value -> more detail", "INT", false, "4096") {
901 _dcmdparser.add_dcmd_argument(&_function);
902 _dcmdparser.add_dcmd_argument(&_granularity);
903 }
904
905 void CodeHeapAnalyticsDCmd::execute(DCmdSource source, TRAPS) {
906 jlong granularity = _granularity.value();
907 if (granularity < 1) {
908 Exceptions::fthrow(THREAD_AND_LOCATION, vmSymbols::java_lang_IllegalArgumentException(),
909 "Invalid granularity value " JLONG_FORMAT ". Should be positive.\n", granularity);
910 return;
911 }
912
913 CompileBroker::print_heapinfo(output(), _function.value(), granularity);
914 }
915
916 int CodeHeapAnalyticsDCmd::num_arguments() {
917 ResourceMark rm;
918 CodeHeapAnalyticsDCmd* dcmd = new CodeHeapAnalyticsDCmd(NULL, false);
919 if (dcmd != NULL) {
920 DCmdMark mark(dcmd);
921 return dcmd->_dcmdparser.num_arguments();
922 } else {
923 return 0;
924 }
925 }
926 //---< END >--- CodeHeap State Analytics.
927
928 EventLogDCmd::EventLogDCmd(outputStream* output, bool heap) :
929 DCmdWithParser(output, heap),
930 _log("log", "Name of log to be printed. If omitted, all logs are printed.", "STRING", false, NULL),
931 _max("max", "Maximum number of events to be printed (newest first). If omitted, all events are printed.", "STRING", false, NULL)
932 {
933 _dcmdparser.add_dcmd_option(&_log);
934 _dcmdparser.add_dcmd_option(&_max);
935 }
936
937 void EventLogDCmd::execute(DCmdSource source, TRAPS) {
938 const char* max_value = _max.value();
939 long max = -1;
940 if (max_value != NULL) {
941 char* endptr = NULL;
942 max = ::strtol(max_value, &endptr, 10);
943 if (max == 0 && max_value == endptr) {
944 output()->print_cr("Invalid max option: \"%s\".", max_value);
945 return;
946 }
947 }
948 const char* log_name = _log.value();
949 if (log_name != NULL) {
950 Events::print_one(output(), log_name, max);
951 } else {
952 Events::print_all(output(), max);
953 }
954 }
955
956 int EventLogDCmd::num_arguments() {
957 ResourceMark rm;
958 EventLogDCmd* dcmd = new EventLogDCmd(NULL, false);
959 if (dcmd != NULL) {
960 DCmdMark mark(dcmd);
961 return dcmd->_dcmdparser.num_arguments();
962 } else {
963 return 0;
964 }
965 }
966
967 void CompilerDirectivesPrintDCmd::execute(DCmdSource source, TRAPS) {
968 DirectivesStack::print(output());
969 }
970
971 CompilerDirectivesAddDCmd::CompilerDirectivesAddDCmd(outputStream* output, bool heap) :
972 DCmdWithParser(output, heap),
973 _filename("filename","Name of the directives file", "STRING",true) {
974 _dcmdparser.add_dcmd_argument(&_filename);
975 }
976
977 void CompilerDirectivesAddDCmd::execute(DCmdSource source, TRAPS) {
978 DirectivesParser::parse_from_file(_filename.value(), output());
979 }
980
981 int CompilerDirectivesAddDCmd::num_arguments() {
982 ResourceMark rm;
983 CompilerDirectivesAddDCmd* dcmd = new CompilerDirectivesAddDCmd(NULL, false);
984 if (dcmd != NULL) {
985 DCmdMark mark(dcmd);
986 return dcmd->_dcmdparser.num_arguments();
987 } else {
988 return 0;
989 }
990 }
991
992 void CompilerDirectivesRemoveDCmd::execute(DCmdSource source, TRAPS) {
993 DirectivesStack::pop(1);
994 }
995
996 void CompilerDirectivesClearDCmd::execute(DCmdSource source, TRAPS) {
997 DirectivesStack::clear();
998 }
999 #if INCLUDE_SERVICES
1000 ClassHierarchyDCmd::ClassHierarchyDCmd(outputStream* output, bool heap) :
1001 DCmdWithParser(output, heap),
1002 _print_interfaces("-i", "Inherited interfaces should be printed.", "BOOLEAN", false, "false"),
1003 _print_subclasses("-s", "If a classname is specified, print its subclasses. "
1004 "Otherwise only its superclasses are printed.", "BOOLEAN", false, "false"),
1005 _classname("classname", "Name of class whose hierarchy should be printed. "
1006 "If not specified, all class hierarchies are printed.",
1007 "STRING", false) {
1008 _dcmdparser.add_dcmd_option(&_print_interfaces);
1009 _dcmdparser.add_dcmd_option(&_print_subclasses);
1010 _dcmdparser.add_dcmd_argument(&_classname);
1011 }
1012
1013 void ClassHierarchyDCmd::execute(DCmdSource source, TRAPS) {
1014 VM_PrintClassHierarchy printClassHierarchyOp(output(), _print_interfaces.value(),
1015 _print_subclasses.value(), _classname.value());
1016 VMThread::execute(&printClassHierarchyOp);
1017 }
1018
1019 int ClassHierarchyDCmd::num_arguments() {
1020 ResourceMark rm;
1021 ClassHierarchyDCmd* dcmd = new ClassHierarchyDCmd(NULL, false);
1022 if (dcmd != NULL) {
1023 DCmdMark mark(dcmd);
1024 return dcmd->_dcmdparser.num_arguments();
1025 } else {
1026 return 0;
1027 }
1028 }
1029
1030 #endif
1031
1032 class VM_DumpTouchedMethods : public VM_Operation {
1033 private:
1034 outputStream* _out;
1035 public:
1036 VM_DumpTouchedMethods(outputStream* out) {
1037 _out = out;
1038 }
1039
1040 virtual VMOp_Type type() const { return VMOp_DumpTouchedMethods; }
1041
1042 virtual void doit() {
1043 Method::print_touched_methods(_out);
1044 }
1045 };
1046
1047 TouchedMethodsDCmd::TouchedMethodsDCmd(outputStream* output, bool heap) :
1048 DCmdWithParser(output, heap)
1049 {}
1050
1051 void TouchedMethodsDCmd::execute(DCmdSource source, TRAPS) {
1052 if (!LogTouchedMethods) {
1053 output()->print_cr("VM.print_touched_methods command requires -XX:+LogTouchedMethods");
1054 return;
1055 }
1056 VM_DumpTouchedMethods dumper(output());
1057 VMThread::execute(&dumper);
1058 }
1059
1060 int TouchedMethodsDCmd::num_arguments() {
1061 return 0;
1062 }
1063
1064 #if INCLUDE_JVMTI
1065 extern "C" typedef char const* (JNICALL *debugInit_startDebuggingViaCommandPtr)(JNIEnv* env, jthread thread, char const** transport_name,
1066 char const** address, jboolean* first_start);
1067 static debugInit_startDebuggingViaCommandPtr dvc_start_ptr = NULL;
1068
1069 DebugOnCmdStartDCmd::DebugOnCmdStartDCmd(outputStream* output, bool heap) : DCmdWithParser(output, heap) {
1070 }
1071
1072 void DebugOnCmdStartDCmd::execute(DCmdSource source, TRAPS) {
1073 char const* transport = NULL;
1074 char const* addr = NULL;
1075 jboolean is_first_start = JNI_FALSE;
1076 JavaThread* thread = (JavaThread*) THREAD;
1077 jthread jt = JNIHandles::make_local(thread->threadObj());
1078 ThreadToNativeFromVM ttn(thread);
1079 const char *error = "Could not find jdwp agent.";
1080
1081 if (!dvc_start_ptr) {
1082 for (AgentLibrary* agent = Arguments::agents(); agent != NULL; agent = agent->next()) {
1083 if ((strcmp("jdwp", agent->name()) == 0) && (dvc_start_ptr == NULL)) {
1084 char const* func = "debugInit_startDebuggingViaCommand";
1085 dvc_start_ptr = (debugInit_startDebuggingViaCommandPtr) os::find_agent_function(agent, false, &func, 1);
1086 }
1087 }
1088 }
1089
1090 if (dvc_start_ptr) {
1091 error = dvc_start_ptr(thread->jni_environment(), jt, &transport, &addr, &is_first_start);
1092 }
1093
1094 if (error != NULL) {
1095 output()->print_cr("Debugging has not been started: %s", error);
1096 } else {
1097 output()->print_cr(is_first_start ? "Debugging has been started." : "Debugging is already active.");
1098 output()->print_cr("Transport : %s", transport ? transport : "#unknown");
1099 output()->print_cr("Address : %s", addr ? addr : "#unknown");
1100 }
1101 }
1102 #endif // INCLUDE_JVMTI