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