fparain@3329: /*
fparain@3476:  * Copyright (c) 2011, 2012 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/allocation.inline.hpp"
fparain@3329: #include "runtime/thread.hpp"
fparain@3329: #include "services/diagnosticArgument.hpp"
fparain@3329: 
fparain@3329: void GenDCmdArgument::read_value(const char* str, size_t len, TRAPS) {
fparain@3559:   /* NOTE:Some argument types doesn't require a value,
fparain@3559:    * for instance boolean arguments: "enableFeatureX". is
fparain@3559:    * equivalent to "enableFeatureX=true". In these cases,
fparain@3559:    * str will be null. This is perfectly valid.
fparain@3559:    * All argument types must perform null checks on str.
fparain@3559:    */
fparain@3559: 
fparain@3559:   if (is_set() && !allow_multiple()) {
fparain@3329:     THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(),
fparain@3559:             "Duplicates in diagnostic command arguments\n");
fparain@3329:   }
fparain@3329:   parse_value(str, len, CHECK);
fparain@3329:   set_is_set(true);
fparain@3329: }
fparain@3329: 
nloodin@3681: void GenDCmdArgument::to_string(jlong l, char* buf, size_t len) {
nloodin@3681:   jio_snprintf(buf, len, INT64_FORMAT, l);
nloodin@3681: }
nloodin@3681: 
nloodin@3681: void GenDCmdArgument::to_string(bool b, char* buf, size_t len) {
nloodin@3681:   jio_snprintf(buf, len, b ? "true" : "false");
nloodin@3681: }
nloodin@3681: 
nloodin@3681: void GenDCmdArgument::to_string(NanoTimeArgument n, char* buf, size_t len) {
nloodin@3681:   jio_snprintf(buf, len, INT64_FORMAT, n._nanotime);
nloodin@3681: }
nloodin@3681: 
nloodin@3681: void GenDCmdArgument::to_string(MemorySizeArgument m, char* buf, size_t len) {
nloodin@3681:   jio_snprintf(buf, len, INT64_FORMAT, m._size);
nloodin@3681: }
nloodin@3681: 
nloodin@3681: void GenDCmdArgument::to_string(char* c, char* buf, size_t len) {
nloodin@3681:   jio_snprintf(buf, len, "%s", c);
nloodin@3681: }
nloodin@3681: 
nloodin@3681: void GenDCmdArgument::to_string(StringArrayArgument* f, char* buf, size_t len) {
nloodin@3681:   int length = f->array()->length();
nloodin@3681:   size_t written = 0;
nloodin@3681:   buf[0] = 0;
nloodin@3681:   for (int i = 0; i < length; i++) {
nloodin@3681:     char* next_str = f->array()->at(i);
nloodin@3681:     size_t next_size = strlen(next_str);
nloodin@3681:     //Check if there's room left to write next element
nloodin@3681:     if (written + next_size > len) {
nloodin@3681:       return;
nloodin@3681:     }
nloodin@3681:     //Actually write element
nloodin@3681:     strcat(buf, next_str);
nloodin@3681:     written += next_size;
nloodin@3681:     //Check if there's room left for the comma
nloodin@3681:     if (i < length-1 && len - written > 0) {
nloodin@3681:       strcat(buf, ",");
nloodin@3681:     }
nloodin@3681:   }
nloodin@3681: }
nloodin@3681: 
fparain@3329: template <> void DCmdArgument<jlong>::parse_value(const char* str,
fparain@3329:                                                   size_t len, TRAPS) {
fparain@3559:     if (str == NULL || sscanf(str, INT64_FORMAT, &_value) != 1) {
fparain@3329:     THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(),
fparain@3559:       "Integer parsing error in diagnostic command arguments\n");
fparain@3329:   }
fparain@3329: }
fparain@3329: 
fparain@3329: template <> void DCmdArgument<jlong>::init_value(TRAPS) {
fparain@3329:   if (has_default()) {
fparain@3329:     this->parse_value(_default_string, strlen(_default_string), THREAD);
fparain@3329:     if (HAS_PENDING_EXCEPTION) {
fparain@3329:       fatal("Default string must be parsable");
fparain@3329:     }
fparain@3329:   } else {
fparain@3329:     set_value(0);
fparain@3329:   }
fparain@3329: }
fparain@3329: 
fparain@3329: template <> void DCmdArgument<jlong>::destroy_value() { }
fparain@3329: 
fparain@3329: template <> void DCmdArgument<bool>::parse_value(const char* str,
fparain@3329:                                                  size_t len, TRAPS) {
fparain@3476:   // len is the length of the current token starting at str
fparain@3329:   if (len == 0) {
fparain@3329:     set_value(true);
fparain@3329:   } else {
fparain@3476:     if (len == strlen("true") && strncasecmp(str, "true", len) == 0) {
fparain@3329:        set_value(true);
fparain@3476:     } else if (len == strlen("false") && strncasecmp(str, "false", len) == 0) {
fparain@3329:        set_value(false);
fparain@3329:     } else {
fparain@3329:       THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(),
fparain@3329:         "Boolean parsing error in diagnostic command arguments");
fparain@3329:     }
fparain@3329:   }
fparain@3329: }
fparain@3329: 
fparain@3329: template <> void DCmdArgument<bool>::init_value(TRAPS) {
fparain@3329:   if (has_default()) {
fparain@3329:     this->parse_value(_default_string, strlen(_default_string), THREAD);
fparain@3329:     if (HAS_PENDING_EXCEPTION) {
fparain@3329:       fatal("Default string must be parsable");
fparain@3329:     }
fparain@3329:   } else {
fparain@3329:     set_value(false);
fparain@3329:   }
fparain@3329: }
fparain@3329: 
fparain@3329: template <> void DCmdArgument<bool>::destroy_value() { }
fparain@3329: 
fparain@3329: template <> void DCmdArgument<char*>::parse_value(const char* str,
fparain@3329:                                                   size_t len, TRAPS) {
fparain@3559:   if (str == NULL) {
fparain@3559:     _value = NULL;
fparain@3559:   } else {
zgu@3900:     _value = NEW_C_HEAP_ARRAY(char, len+1, mtInternal);
fparain@3559:     strncpy(_value, str, len);
fparain@3559:     _value[len] = 0;
fparain@3559:   }
fparain@3329: }
fparain@3329: 
fparain@3329: template <> void DCmdArgument<char*>::init_value(TRAPS) {
fparain@3559:   if (has_default() && _default_string != NULL) {
fparain@3329:     this->parse_value(_default_string, strlen(_default_string), THREAD);
fparain@3329:     if (HAS_PENDING_EXCEPTION) {
fparain@3559:      fatal("Default string must be parsable");
fparain@3329:     }
fparain@3329:   } else {
fparain@3329:     set_value(NULL);
fparain@3329:   }
fparain@3329: }
fparain@3329: 
fparain@3329: template <> void DCmdArgument<char*>::destroy_value() {
fparain@3329:   if (_value != NULL) {
zgu@3900:     FREE_C_HEAP_ARRAY(char, _value, mtInternal);
fparain@3329:     set_value(NULL);
fparain@3329:   }
fparain@3329: }
fparain@3559: 
fparain@3559: template <> void DCmdArgument<NanoTimeArgument>::parse_value(const char* str,
fparain@3559:                                                  size_t len, TRAPS) {
fparain@3559:   if (str == NULL) {
fparain@3559:     THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(),
fparain@3559:               "Integer parsing error nanotime value: syntax error");
fparain@3559:   }
fparain@3559: 
fparain@3559:   int argc = sscanf(str, INT64_FORMAT , &_value._time);
fparain@3559:   if (argc != 1) {
fparain@3559:     THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(),
fparain@3559:               "Integer parsing error nanotime value: syntax error");
fparain@3559:   }
fparain@3559:   size_t idx = 0;
fparain@3559:   while(idx < len && isdigit(str[idx])) {
fparain@3559:     idx++;
fparain@3559:   }
fparain@3559:   if (idx == len) {
fparain@3559:     // only accept missing unit if the value is 0
fparain@3559:     if (_value._time != 0) {
fparain@3559:       THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(),
fparain@3559:                 "Integer parsing error nanotime value: unit required");
fparain@3559:     } else {
fparain@3559:       _value._nanotime = 0;
fparain@3559:       strcpy(_value._unit, "ns");
fparain@3559:       return;
fparain@3559:     }
fparain@3559:   } else if(len - idx > 2) {
fparain@3559:     THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(),
fparain@3559:               "Integer parsing error nanotime value: illegal unit");
fparain@3559:   } else {
fparain@3559:     strncpy(_value._unit, &str[idx], len - idx);
fparain@3559:     /*Write an extra null termination. This is safe because _value._unit
fparain@3559:      * is declared as char[3], and length is checked to be not larger than
fparain@3559:      * two above. Also, this is necessary, since length might be 1, and the
fparain@3559:      * default value already in the string is ns, which is two chars.
fparain@3559:      */
fparain@3559:     _value._unit[len-idx] = '\0';
fparain@3559:   }
fparain@3559: 
fparain@3559:   if (strcmp(_value._unit, "ns") == 0) {
fparain@3559:     _value._nanotime = _value._time;
fparain@3559:   } else if (strcmp(_value._unit, "us") == 0) {
fparain@3559:     _value._nanotime = _value._time * 1000;
fparain@3559:   } else if (strcmp(_value._unit, "ms") == 0) {
fparain@3559:     _value._nanotime = _value._time * 1000 * 1000;
fparain@3559:   } else if (strcmp(_value._unit, "s") == 0) {
fparain@3559:     _value._nanotime = _value._time * 1000 * 1000 * 1000;
fparain@3559:   } else if (strcmp(_value._unit, "m") == 0) {
fparain@3559:     _value._nanotime = _value._time * 60 * 1000 * 1000 * 1000;
fparain@3559:   } else if (strcmp(_value._unit, "h") == 0) {
fparain@3559:     _value._nanotime = _value._time * 60 * 60 * 1000 * 1000 * 1000;
fparain@3559:   } else if (strcmp(_value._unit, "d") == 0) {
fparain@3559:     _value._nanotime = _value._time * 24 * 60 * 60 * 1000 * 1000 * 1000;
fparain@3559:   } else {
fparain@3559:      THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(),
fparain@3559:                "Integer parsing error nanotime value: illegal unit");
fparain@3559:   }
fparain@3559: }
fparain@3559: 
fparain@3559: template <> void DCmdArgument<NanoTimeArgument>::init_value(TRAPS) {
fparain@3559:   if (has_default()) {
fparain@3559:     this->parse_value(_default_string, strlen(_default_string), THREAD);
fparain@3559:     if (HAS_PENDING_EXCEPTION) {
fparain@3559:       fatal("Default string must be parsable");
fparain@3559:     }
fparain@3559:   } else {
fparain@3559:     _value._time = 0;
fparain@3559:     _value._nanotime = 0;
fparain@3559:     strcmp(_value._unit, "ns");
fparain@3559:   }
fparain@3559: }
fparain@3559: 
fparain@3559: template <> void DCmdArgument<NanoTimeArgument>::destroy_value() { }
fparain@3559: 
fparain@3559: // WARNING StringArrayArgument can only be used as an option, it cannot be
fparain@3559: // used as an argument with the DCmdParser
fparain@3559: 
fparain@3559: template <> void DCmdArgument<StringArrayArgument*>::parse_value(const char* str,
fparain@3559:                                                   size_t len, TRAPS) {
fparain@3559:   _value->add(str,len);
fparain@3559: }
fparain@3559: 
fparain@3559: template <> void DCmdArgument<StringArrayArgument*>::init_value(TRAPS) {
fparain@3559:   _value = new StringArrayArgument();
fparain@3559:   _allow_multiple = true;
fparain@3559:   if (has_default()) {
fparain@3559:     fatal("StringArrayArgument cannot have default value");
fparain@3559:   }
fparain@3559: }
fparain@3559: 
fparain@3559: template <> void DCmdArgument<StringArrayArgument*>::destroy_value() {
fparain@3559:   if (_value != NULL) {
fparain@3559:     delete _value;
fparain@3559:     set_value(NULL);
fparain@3559:   }
fparain@3559: }
fparain@3559: 
fparain@3559: template <> void DCmdArgument<MemorySizeArgument>::parse_value(const char* str,
fparain@3559:                                                   size_t len, TRAPS) {
fparain@3559:   if (str == NULL) {
fparain@3559:     THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(),
fparain@3559:               "Integer parsing error nanotime value: syntax error");
fparain@3559:   }
fparain@3559: 
fparain@3559:   if (*str == '-') {
fparain@3559:     THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(),
fparain@3559:                "Parsing error memory size value: negative values not allowed");
fparain@3559:   }
fparain@3559:   int res = sscanf(str, UINT64_FORMAT "%c", &_value._val, &_value._multiplier);
fparain@3559:   if (res == 2) {
fparain@3559:      switch (_value._multiplier) {
fparain@3559:       case 'k': case 'K':
fparain@3559:          _value._size = _value._val * 1024;
fparain@3559:          break;
fparain@3559:       case 'm': case 'M':
fparain@3559:          _value._size = _value._val * 1024 * 1024;
fparain@3559:          break;
fparain@3559:       case 'g': case 'G':
fparain@3559:          _value._size = _value._val * 1024 * 1024 * 1024;
fparain@3559:          break;
fparain@3559:        default:
fparain@3559:          _value._size = _value._val;
fparain@3559:          _value._multiplier = ' ';
fparain@3559:          //default case should be to break with no error, since user
fparain@3559:          //can write size in bytes, or might have a delimiter and next arg
fparain@3559:          break;
fparain@3559:      }
fparain@3559:    } else if (res == 1) {
fparain@3559:      _value._size = _value._val;
fparain@3559:    } else {
fparain@3559:      THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(),
fparain@3559:                "Parsing error memory size value: invalid value");
fparain@3559:    }
fparain@3559: }
fparain@3559: 
fparain@3559: template <> void DCmdArgument<MemorySizeArgument>::init_value(TRAPS) {
fparain@3559:   if (has_default()) {
fparain@3559:     this->parse_value(_default_string, strlen(_default_string), THREAD);
fparain@3559:     if (HAS_PENDING_EXCEPTION) {
fparain@3559:       fatal("Default string must be parsable");
fparain@3559:     }
fparain@3559:   } else {
fparain@3559:     _value._size = 0;
fparain@3559:     _value._val = 0;
fparain@3559:     _value._multiplier = ' ';
fparain@3559:   }
fparain@3559: }
fparain@3559: 
fparain@3559: template <> void DCmdArgument<MemorySizeArgument>::destroy_value() { }