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