498 lines
14 KiB
C++
498 lines
14 KiB
C++
/*
|
|
* Copyright (c) 2011, 2012, Oracle and/or its affiliates. All rights reserved.
|
|
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
|
*
|
|
* This code is free software; you can redistribute it and/or modify it
|
|
* under the terms of the GNU General Public License version 2 only, as
|
|
* published by the Free Software Foundation.
|
|
*
|
|
* This code is distributed in the hope that it will be useful, but WITHOUT
|
|
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
* version 2 for more details (a copy is included in the LICENSE file that
|
|
* accompanied this code).
|
|
*
|
|
* You should have received a copy of the GNU General Public License version
|
|
* 2 along with this work; if not, write to the Free Software Foundation,
|
|
* Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
|
|
*
|
|
* Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
|
|
* or visit www.oracle.com if you need additional information or have any
|
|
* questions.
|
|
*
|
|
*/
|
|
|
|
#include "precompiled.hpp"
|
|
#include "memory/oopFactory.hpp"
|
|
#include "runtime/javaCalls.hpp"
|
|
#include "runtime/mutexLocker.hpp"
|
|
#include "services/diagnosticArgument.hpp"
|
|
#include "services/diagnosticFramework.hpp"
|
|
#include "services/management.hpp"
|
|
|
|
CmdLine::CmdLine(const char* line, size_t len, bool no_command_name) {
|
|
assert(line != NULL, "Command line string should not be NULL");
|
|
const char* line_end;
|
|
const char* cmd_end;
|
|
|
|
_cmd = line;
|
|
line_end = &line[len];
|
|
|
|
// Skip whitespace in the beginning of the line.
|
|
while (_cmd < line_end && isspace((int) _cmd[0])) {
|
|
_cmd++;
|
|
}
|
|
cmd_end = _cmd;
|
|
|
|
if (no_command_name) {
|
|
_cmd = NULL;
|
|
_cmd_len = 0;
|
|
} else {
|
|
// Look for end of the command name
|
|
while (cmd_end < line_end && !isspace((int) cmd_end[0])) {
|
|
cmd_end++;
|
|
}
|
|
_cmd_len = cmd_end - _cmd;
|
|
}
|
|
_args = cmd_end;
|
|
_args_len = line_end - _args;
|
|
}
|
|
|
|
bool DCmdArgIter::next(TRAPS) {
|
|
if (_len == 0) return false;
|
|
// skipping spaces
|
|
while (_cursor < _len - 1 && _buffer[_cursor] == _delim) {
|
|
_cursor++;
|
|
}
|
|
// handling end of command line
|
|
if (_cursor >= _len - 1) {
|
|
_cursor = _len - 1;
|
|
_key_addr = &_buffer[_len - 1];
|
|
_key_len = 0;
|
|
_value_addr = &_buffer[_len - 1];
|
|
_value_len = 0;
|
|
return false;
|
|
}
|
|
// extracting first item, argument or option name
|
|
_key_addr = &_buffer[_cursor];
|
|
bool arg_had_quotes = false;
|
|
while (_cursor <= _len - 1 && _buffer[_cursor] != '=' && _buffer[_cursor] != _delim) {
|
|
// argument can be surrounded by single or double quotes
|
|
if (_buffer[_cursor] == '\"' || _buffer[_cursor] == '\'') {
|
|
_key_addr++;
|
|
char quote = _buffer[_cursor];
|
|
arg_had_quotes = true;
|
|
while (_cursor < _len - 1) {
|
|
_cursor++;
|
|
if (_buffer[_cursor] == quote && _buffer[_cursor - 1] != '\\') {
|
|
break;
|
|
}
|
|
}
|
|
if (_buffer[_cursor] != quote) {
|
|
THROW_MSG_(vmSymbols::java_lang_IllegalArgumentException(),
|
|
"Format error in diagnostic command arguments", false);
|
|
}
|
|
break;
|
|
}
|
|
_cursor++;
|
|
}
|
|
_key_len = &_buffer[_cursor] - _key_addr;
|
|
if (arg_had_quotes) {
|
|
// if the argument was quoted, we need to step past the last quote here
|
|
_cursor++;
|
|
}
|
|
// check if the argument has the <key>=<value> format
|
|
if (_cursor <= _len -1 && _buffer[_cursor] == '=') {
|
|
_cursor++;
|
|
_value_addr = &_buffer[_cursor];
|
|
bool value_had_quotes = false;
|
|
// extract the value
|
|
while (_cursor <= _len - 1 && _buffer[_cursor] != _delim) {
|
|
// value can be surrounded by simple or double quotes
|
|
if (_buffer[_cursor] == '\"' || _buffer[_cursor] == '\'') {
|
|
_value_addr++;
|
|
char quote = _buffer[_cursor];
|
|
value_had_quotes = true;
|
|
while (_cursor < _len - 1) {
|
|
_cursor++;
|
|
if (_buffer[_cursor] == quote && _buffer[_cursor - 1] != '\\') {
|
|
break;
|
|
}
|
|
}
|
|
if (_buffer[_cursor] != quote) {
|
|
THROW_MSG_(vmSymbols::java_lang_IllegalArgumentException(),
|
|
"Format error in diagnostic command arguments", false);
|
|
}
|
|
break;
|
|
}
|
|
_cursor++;
|
|
}
|
|
_value_len = &_buffer[_cursor] - _value_addr;
|
|
if (value_had_quotes) {
|
|
// if the value was quoted, we need to step past the last quote here
|
|
_cursor++;
|
|
}
|
|
} else {
|
|
_value_addr = NULL;
|
|
_value_len = 0;
|
|
}
|
|
return _key_len != 0;
|
|
}
|
|
|
|
bool DCmdInfo::by_name(void* cmd_name, DCmdInfo* info) {
|
|
if (info == NULL) return false;
|
|
return strcmp((const char*)cmd_name, info->name()) == 0;
|
|
}
|
|
|
|
void DCmdParser::add_dcmd_option(GenDCmdArgument* arg) {
|
|
assert(arg != NULL, "Sanity");
|
|
if (_options == NULL) {
|
|
_options = arg;
|
|
} else {
|
|
GenDCmdArgument* o = _options;
|
|
while (o->next() != NULL) {
|
|
o = o->next();
|
|
}
|
|
o->set_next(arg);
|
|
}
|
|
arg->set_next(NULL);
|
|
Thread* THREAD = Thread::current();
|
|
arg->init_value(THREAD);
|
|
if (HAS_PENDING_EXCEPTION) {
|
|
fatal("Initialization must be successful");
|
|
}
|
|
}
|
|
|
|
void DCmdParser::add_dcmd_argument(GenDCmdArgument* arg) {
|
|
assert(arg != NULL, "Sanity");
|
|
if (_arguments_list == NULL) {
|
|
_arguments_list = arg;
|
|
} else {
|
|
GenDCmdArgument* a = _arguments_list;
|
|
while (a->next() != NULL) {
|
|
a = a->next();
|
|
}
|
|
a->set_next(arg);
|
|
}
|
|
arg->set_next(NULL);
|
|
Thread* THREAD = Thread::current();
|
|
arg->init_value(THREAD);
|
|
if (HAS_PENDING_EXCEPTION) {
|
|
fatal("Initialization must be successful");
|
|
}
|
|
}
|
|
|
|
void DCmdParser::parse(CmdLine* line, char delim, TRAPS) {
|
|
GenDCmdArgument* next_argument = _arguments_list;
|
|
DCmdArgIter iter(line->args_addr(), line->args_len(), delim);
|
|
bool cont = iter.next(CHECK);
|
|
while (cont) {
|
|
GenDCmdArgument* arg = lookup_dcmd_option(iter.key_addr(),
|
|
iter.key_length());
|
|
if (arg != NULL) {
|
|
arg->read_value(iter.value_addr(), iter.value_length(), CHECK);
|
|
} else {
|
|
if (next_argument != NULL) {
|
|
arg = next_argument;
|
|
arg->read_value(iter.key_addr(), iter.key_length(), CHECK);
|
|
next_argument = next_argument->next();
|
|
} else {
|
|
const size_t buflen = 120;
|
|
const size_t argbuflen = 30;
|
|
char buf[buflen];
|
|
char argbuf[argbuflen];
|
|
size_t len = MIN2<size_t>(iter.key_length(), argbuflen - 1);
|
|
|
|
strncpy(argbuf, iter.key_addr(), len);
|
|
argbuf[len] = '\0';
|
|
jio_snprintf(buf, buflen - 1, "Unknown argument '%s' in diagnostic command.", argbuf);
|
|
|
|
THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(), buf);
|
|
}
|
|
}
|
|
cont = iter.next(CHECK);
|
|
}
|
|
check(CHECK);
|
|
}
|
|
|
|
GenDCmdArgument* DCmdParser::lookup_dcmd_option(const char* name, size_t len) {
|
|
GenDCmdArgument* arg = _options;
|
|
while (arg != NULL) {
|
|
if (strlen(arg->name()) == len &&
|
|
strncmp(name, arg->name(), len) == 0) {
|
|
return arg;
|
|
}
|
|
arg = arg->next();
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
void DCmdParser::check(TRAPS) {
|
|
const size_t buflen = 256;
|
|
char buf[buflen];
|
|
GenDCmdArgument* arg = _arguments_list;
|
|
while (arg != NULL) {
|
|
if (arg->is_mandatory() && !arg->has_value()) {
|
|
jio_snprintf(buf, buflen - 1, "The argument '%s' is mandatory.", arg->name());
|
|
THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(), buf);
|
|
}
|
|
arg = arg->next();
|
|
}
|
|
arg = _options;
|
|
while (arg != NULL) {
|
|
if (arg->is_mandatory() && !arg->has_value()) {
|
|
jio_snprintf(buf, buflen - 1, "The option '%s' is mandatory.", arg->name());
|
|
THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(), buf);
|
|
}
|
|
arg = arg->next();
|
|
}
|
|
}
|
|
|
|
void DCmdParser::print_help(outputStream* out, const char* cmd_name) {
|
|
out->print("Syntax : %s %s", cmd_name, _options == NULL ? "" : "[options]");
|
|
GenDCmdArgument* arg = _arguments_list;
|
|
while (arg != NULL) {
|
|
if (arg->is_mandatory()) {
|
|
out->print(" <%s>", arg->name());
|
|
} else {
|
|
out->print(" [<%s>]", arg->name());
|
|
}
|
|
arg = arg->next();
|
|
}
|
|
out->print_cr("");
|
|
if (_arguments_list != NULL) {
|
|
out->print_cr("\nArguments:");
|
|
arg = _arguments_list;
|
|
while (arg != NULL) {
|
|
out->print("\t%s : %s %s (%s, ", arg->name(),
|
|
arg->is_mandatory() ? "" : "[optional]",
|
|
arg->description(), arg->type());
|
|
if (arg->has_default()) {
|
|
out->print(arg->default_string());
|
|
} else {
|
|
out->print("no default value");
|
|
}
|
|
out->print_cr(")");
|
|
arg = arg->next();
|
|
}
|
|
}
|
|
if (_options != NULL) {
|
|
out->print_cr("\nOptions: (options must be specified using the <key> or <key>=<value> syntax)");
|
|
arg = _options;
|
|
while (arg != NULL) {
|
|
out->print("\t%s : %s %s (%s, ", arg->name(),
|
|
arg->is_mandatory() ? "" : "[optional]",
|
|
arg->description(), arg->type());
|
|
if (arg->has_default()) {
|
|
out->print(arg->default_string());
|
|
} else {
|
|
out->print("no default value");
|
|
}
|
|
out->print_cr(")");
|
|
arg = arg->next();
|
|
}
|
|
}
|
|
}
|
|
|
|
void DCmdParser::reset(TRAPS) {
|
|
GenDCmdArgument* arg = _arguments_list;
|
|
while (arg != NULL) {
|
|
arg->reset(CHECK);
|
|
arg = arg->next();
|
|
}
|
|
arg = _options;
|
|
while (arg != NULL) {
|
|
arg->reset(CHECK);
|
|
arg = arg->next();
|
|
}
|
|
}
|
|
|
|
void DCmdParser::cleanup() {
|
|
GenDCmdArgument* arg = _arguments_list;
|
|
while (arg != NULL) {
|
|
arg->cleanup();
|
|
arg = arg->next();
|
|
}
|
|
arg = _options;
|
|
while (arg != NULL) {
|
|
arg->cleanup();
|
|
arg = arg->next();
|
|
}
|
|
}
|
|
|
|
int DCmdParser::num_arguments() {
|
|
GenDCmdArgument* arg = _arguments_list;
|
|
int count = 0;
|
|
while (arg != NULL) {
|
|
count++;
|
|
arg = arg->next();
|
|
}
|
|
arg = _options;
|
|
while (arg != NULL) {
|
|
count++;
|
|
arg = arg->next();
|
|
}
|
|
return count;
|
|
}
|
|
|
|
GrowableArray<const char *>* DCmdParser::argument_name_array() {
|
|
int count = num_arguments();
|
|
GrowableArray<const char *>* array = new GrowableArray<const char *>(count);
|
|
GenDCmdArgument* arg = _arguments_list;
|
|
while (arg != NULL) {
|
|
array->append(arg->name());
|
|
arg = arg->next();
|
|
}
|
|
arg = _options;
|
|
while (arg != NULL) {
|
|
array->append(arg->name());
|
|
arg = arg->next();
|
|
}
|
|
return array;
|
|
}
|
|
|
|
GrowableArray<DCmdArgumentInfo*>* DCmdParser::argument_info_array() {
|
|
int count = num_arguments();
|
|
GrowableArray<DCmdArgumentInfo*>* array = new GrowableArray<DCmdArgumentInfo *>(count);
|
|
int idx = 0;
|
|
GenDCmdArgument* arg = _arguments_list;
|
|
while (arg != NULL) {
|
|
array->append(new DCmdArgumentInfo(arg->name(), arg->description(),
|
|
arg->type(), arg->default_string(), arg->is_mandatory(),
|
|
false, idx));
|
|
idx++;
|
|
arg = arg->next();
|
|
}
|
|
arg = _options;
|
|
while (arg != NULL) {
|
|
array->append(new DCmdArgumentInfo(arg->name(), arg->description(),
|
|
arg->type(), arg->default_string(), arg->is_mandatory(),
|
|
true));
|
|
arg = arg->next();
|
|
}
|
|
return array;
|
|
}
|
|
|
|
DCmdFactory* DCmdFactory::_DCmdFactoryList = NULL;
|
|
|
|
void DCmd::parse_and_execute(outputStream* out, const char* cmdline,
|
|
char delim, TRAPS) {
|
|
|
|
if (cmdline == NULL) return; // Nothing to do!
|
|
DCmdIter iter(cmdline, '\n');
|
|
|
|
while (iter.has_next()) {
|
|
CmdLine line = iter.next();
|
|
if (line.is_stop()) {
|
|
break;
|
|
}
|
|
if (line.is_executable()) {
|
|
DCmd* command = DCmdFactory::create_local_DCmd(line, out, CHECK);
|
|
assert(command != NULL, "command error must be handled before this line");
|
|
DCmdMark mark(command);
|
|
command->parse(&line, delim, CHECK);
|
|
command->execute(CHECK);
|
|
}
|
|
}
|
|
}
|
|
|
|
void DCmdWithParser::parse(CmdLine* line, char delim, TRAPS) {
|
|
_dcmdparser.parse(line, delim, CHECK);
|
|
}
|
|
|
|
void DCmdWithParser::print_help(const char* name) {
|
|
_dcmdparser.print_help(output(), name);
|
|
}
|
|
|
|
void DCmdWithParser::reset(TRAPS) {
|
|
_dcmdparser.reset(CHECK);
|
|
}
|
|
|
|
void DCmdWithParser::cleanup() {
|
|
_dcmdparser.cleanup();
|
|
}
|
|
|
|
GrowableArray<const char*>* DCmdWithParser::argument_name_array() {
|
|
return _dcmdparser.argument_name_array();
|
|
}
|
|
|
|
GrowableArray<DCmdArgumentInfo*>* DCmdWithParser::argument_info_array() {
|
|
return _dcmdparser.argument_info_array();
|
|
}
|
|
|
|
Mutex* DCmdFactory::_dcmdFactory_lock = new Mutex(Mutex::leaf, "DCmdFactory", true);
|
|
|
|
DCmdFactory* DCmdFactory::factory(const char* name, size_t len) {
|
|
MutexLockerEx ml(_dcmdFactory_lock, Mutex::_no_safepoint_check_flag);
|
|
DCmdFactory* factory = _DCmdFactoryList;
|
|
while (factory != NULL) {
|
|
if (strlen(factory->name()) == len &&
|
|
strncmp(name, factory->name(), len) == 0) {
|
|
return factory;
|
|
}
|
|
factory = factory->_next;
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
int DCmdFactory::register_DCmdFactory(DCmdFactory* factory) {
|
|
MutexLockerEx ml(_dcmdFactory_lock, Mutex::_no_safepoint_check_flag);
|
|
factory->_next = _DCmdFactoryList;
|
|
_DCmdFactoryList = factory;
|
|
return 0; // Actually, there's no checks for duplicates
|
|
}
|
|
|
|
DCmd* DCmdFactory::create_global_DCmd(CmdLine &line, outputStream* out, TRAPS) {
|
|
DCmdFactory* f = factory(line.cmd_addr(), line.cmd_len());
|
|
if (f != NULL) {
|
|
if (f->is_enabled()) {
|
|
THROW_MSG_NULL(vmSymbols::java_lang_IllegalArgumentException(),
|
|
f->disabled_message());
|
|
}
|
|
return f->create_Cheap_instance(out);
|
|
}
|
|
THROW_MSG_NULL(vmSymbols::java_lang_IllegalArgumentException(),
|
|
"Unknown diagnostic command");
|
|
}
|
|
|
|
DCmd* DCmdFactory::create_local_DCmd(CmdLine &line, outputStream* out, TRAPS) {
|
|
DCmdFactory* f = factory(line.cmd_addr(), line.cmd_len());
|
|
if (f != NULL) {
|
|
if (!f->is_enabled()) {
|
|
THROW_MSG_NULL(vmSymbols::java_lang_IllegalArgumentException(),
|
|
f->disabled_message());
|
|
}
|
|
return f->create_resource_instance(out);
|
|
}
|
|
THROW_MSG_NULL(vmSymbols::java_lang_IllegalArgumentException(),
|
|
"Unknown diagnostic command");
|
|
}
|
|
|
|
GrowableArray<const char*>* DCmdFactory::DCmd_list() {
|
|
MutexLockerEx ml(_dcmdFactory_lock, Mutex::_no_safepoint_check_flag);
|
|
GrowableArray<const char*>* array = new GrowableArray<const char*>();
|
|
DCmdFactory* factory = _DCmdFactoryList;
|
|
while (factory != NULL) {
|
|
if (!factory->is_hidden()) {
|
|
array->append(factory->name());
|
|
}
|
|
factory = factory->next();
|
|
}
|
|
return array;
|
|
}
|
|
|
|
GrowableArray<DCmdInfo*>* DCmdFactory::DCmdInfo_list() {
|
|
MutexLockerEx ml(_dcmdFactory_lock, Mutex::_no_safepoint_check_flag);
|
|
GrowableArray<DCmdInfo*>* array = new GrowableArray<DCmdInfo*>();
|
|
DCmdFactory* factory = _DCmdFactoryList;
|
|
while (factory != NULL) {
|
|
if (!factory->is_hidden()) {
|
|
array->append(new DCmdInfo(factory->name(),
|
|
factory->description(), factory->impact(),
|
|
factory->num_arguments(), factory->is_enabled()));
|
|
}
|
|
factory = factory->next();
|
|
}
|
|
return array;
|
|
}
|