1 /* 2 * Copyright (c) 2011, 2013, 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 27 #include "classfile/symbolTable.hpp" 28 29 #include "prims/jni.h" 30 #include "prims/whitebox.hpp" 31 #include "prims/wbtestmethods/parserTests.hpp" 32 #include "runtime/interfaceSupport.hpp" 33 34 #include "memory/oopFactory.hpp" 35 36 #include "services/diagnosticArgument.hpp" 37 #include "services/diagnosticFramework.hpp" 38 39 //There's no way of beforeahnd knowing an upper size 40 //Of the length of a string representation of 41 //the value of an argument. 42 #define VALUE_MAXLEN 256 43 44 // DiagnosticFramework test utility methods 45 46 /* 47 * The DiagnosticArgumentType class contains an enum that says which type 48 * this argument represents. (JLONG, BOOLEAN etc). 49 * This method Returns a char* representation of that enum value. 50 */ 51 static const char* lookup_diagnosticArgumentEnum(const char* field_name, oop object) { 52 Thread* THREAD = Thread::current(); 53 const char* enum_sig = "Lsun/hotspot/parser/DiagnosticCommand$DiagnosticArgumentType;"; 54 TempNewSymbol enumSigSymbol = SymbolTable::lookup_and_add(enum_sig, (int) strlen(enum_sig), THREAD); 55 int offset = WhiteBox::offset_for_field(field_name, object, enumSigSymbol); 56 oop enumOop = object->obj_field(offset); 57 58 const char* ret = WhiteBox::lookup_jstring("name", enumOop); 59 return ret; 60 } 61 62 /* 63 * Takes an oop to a DiagnosticArgumentType-instance and 64 * reads the fields from it. Fills an native DCmdParser with 65 * this info. 66 */ 67 static void fill_in_parser(DCmdParser* parser, oop argument) 68 { 69 const char* name = WhiteBox::lookup_jstring("name", argument); 70 const char* desc = WhiteBox::lookup_jstring("desc", argument); 71 const char* default_value = WhiteBox::lookup_jstring("defaultValue", argument); 72 bool mandatory = WhiteBox::lookup_bool("mandatory", argument); 73 const char* type = lookup_diagnosticArgumentEnum("type", argument); 74 75 if (strcmp(type, "STRING") == 0) { 76 DCmdArgument<char*>* argument = new DCmdArgument<char*>( 77 name, desc, 78 "STRING", mandatory, default_value); 79 parser->add_dcmd_option(argument); 80 } else if (strcmp(type, "NANOTIME") == 0) { 81 DCmdArgument<NanoTimeArgument>* argument = new DCmdArgument<NanoTimeArgument>( 82 name, desc, 83 "NANOTIME", mandatory, default_value); 84 parser->add_dcmd_option(argument); 85 } else if (strcmp(type, "JLONG") == 0) { 86 DCmdArgument<jlong>* argument = new DCmdArgument<jlong>( 87 name, desc, 88 "JLONG", mandatory, default_value); 89 parser->add_dcmd_option(argument); 90 } else if (strcmp(type, "BOOLEAN") == 0) { 91 DCmdArgument<bool>* argument = new DCmdArgument<bool>( 92 name, desc, 93 "BOOLEAN", mandatory, default_value); 94 parser->add_dcmd_option(argument); 95 } else if (strcmp(type, "MEMORYSIZE") == 0) { 96 DCmdArgument<MemorySizeArgument>* argument = new DCmdArgument<MemorySizeArgument>( 97 name, desc, 98 "MEMORY SIZE", mandatory, default_value); 99 parser->add_dcmd_option(argument); 100 } else if (strcmp(type, "STRINGARRAY") == 0) { 101 DCmdArgument<StringArrayArgument*>* argument = new DCmdArgument<StringArrayArgument*>( 102 name, desc, 103 "STRING SET", mandatory); 104 parser->add_dcmd_option(argument); 105 } 106 } 107 108 /* 109 * Will Fill in a java object array with alternating names of parsed command line options and 110 * the value that has been parsed for it: 111 * { name, value, name, value ... } 112 * This can then be checked from java. 113 */ 114 WB_ENTRY(jobjectArray, WB_ParseCommandLine(JNIEnv* env, jobject o, jstring j_cmdline, jobjectArray arguments)) 115 ResourceMark rm; 116 DCmdParser parser; 117 118 const char* c_cmdline = java_lang_String::as_utf8_string(JNIHandles::resolve(j_cmdline)); 119 objArrayOop argumentArray = objArrayOop(JNIHandles::resolve_non_null(arguments)); 120 objArrayHandle argumentArray_ah(THREAD, argumentArray); 121 122 int length = argumentArray_ah->length(); 123 124 for (int i = 0; i < length; i++) { 125 oop argument_oop = argumentArray_ah->obj_at(i); 126 fill_in_parser(&parser, argument_oop); 127 } 128 129 CmdLine cmdline(c_cmdline, strlen(c_cmdline), true); 130 parser.parse(&cmdline,',',CHECK_NULL); 131 132 Klass* k = SystemDictionary::Object_klass(); 133 objArrayOop returnvalue_array = oopFactory::new_objArray(k, parser.num_arguments() * 2, CHECK_NULL); 134 objArrayHandle returnvalue_array_ah(THREAD, returnvalue_array); 135 136 GrowableArray<const char *>*parsedArgNames = parser.argument_name_array(); 137 138 for (int i = 0; i < parser.num_arguments(); i++) { 139 oop parsedName = java_lang_String::create_oop_from_str(parsedArgNames->at(i), CHECK_NULL); 140 returnvalue_array_ah->obj_at_put(i*2, parsedName); 141 GenDCmdArgument* arg = parser.lookup_dcmd_option(parsedArgNames->at(i), strlen(parsedArgNames->at(i))); 142 char buf[VALUE_MAXLEN]; 143 arg->value_as_str(buf, sizeof(buf)); 144 oop parsedValue = java_lang_String::create_oop_from_str(buf, CHECK_NULL); 145 returnvalue_array_ah->obj_at_put(i*2+1, parsedValue); 146 } 147 148 return (jobjectArray) JNIHandles::make_local(returnvalue_array_ah()); 149 150 WB_END