| File: | jdk/src/hotspot/share/compiler/compilerOracle.cpp |
| Warning: | line 634, column 7 Value stored to 'line' is never read |
Press '?' to see keyboard shortcuts
Keyboard shortcuts:
| 1 | /* |
| 2 | * Copyright (c) 1998, 2021, 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 "jvm.h" |
| 27 | #include "classfile/symbolTable.hpp" |
| 28 | #include "compiler/compilerDirectives.hpp" |
| 29 | #include "compiler/compilerOracle.hpp" |
| 30 | #include "compiler/methodMatcher.hpp" |
| 31 | #include "memory/allocation.inline.hpp" |
| 32 | #include "memory/oopFactory.hpp" |
| 33 | #include "memory/resourceArea.hpp" |
| 34 | #include "oops/klass.hpp" |
| 35 | #include "oops/method.inline.hpp" |
| 36 | #include "oops/symbol.hpp" |
| 37 | #include "runtime/globals_extension.hpp" |
| 38 | #include "runtime/handles.inline.hpp" |
| 39 | #include "runtime/jniHandles.hpp" |
| 40 | #include "runtime/os.hpp" |
| 41 | |
| 42 | static const char* optiontype_names[] = { |
| 43 | #define enum_of_types(type, name) name, |
| 44 | OPTION_TYPES(enum_of_types)enum_of_types(Intx, "intx") enum_of_types(Uintx, "uintx") enum_of_types (Bool, "bool") enum_of_types(Ccstr, "ccstr") enum_of_types(Ccstrlist , "ccstrlist") enum_of_types(Double, "double") |
| 45 | #undef enum_of_types |
| 46 | }; |
| 47 | |
| 48 | const char* optiontype2name(enum OptionType type) { |
| 49 | return optiontype_names[static_cast<int>(type)]; |
| 50 | } |
| 51 | |
| 52 | static enum OptionType option_types[] = { |
| 53 | #define enum_of_options(option, name, ctype) OptionType::ctype, |
| 54 | COMPILECOMMAND_OPTIONS(enum_of_options)enum_of_options(Help, "help", Unknown) enum_of_options(Quiet, "quiet", Unknown) enum_of_options(Log, "log", Bool) enum_of_options (Print, "print", Bool) enum_of_options(Inline, "inline", Bool ) enum_of_options(DontInline, "dontinline", Bool) enum_of_options (Blackhole, "blackhole", Bool) enum_of_options(CompileOnly, "compileonly" , Bool) enum_of_options(Exclude, "exclude", Bool) enum_of_options (Break, "break", Bool) enum_of_options(BreakAtExecute, "BreakAtExecute" , Bool) enum_of_options(BreakAtCompile, "BreakAtCompile", Bool ) enum_of_options(PrintAssembly, "PrintAssembly", Bool) enum_of_options (PrintInlining, "PrintInlining", Bool) enum_of_options(PrintIntrinsics , "PrintIntrinsics", Bool) enum_of_options(PrintNMethods, "PrintNMethods" , Bool) enum_of_options(PrintOptoAssembly, "PrintOptoAssembly" , Bool) enum_of_options(PrintDebugInfo, "PrintDebugInfo", Bool ) enum_of_options(PrintRelocations, "PrintRelocations", Bool) enum_of_options(PrintDependencies, "PrintDependencies", Bool ) enum_of_options(BackgroundCompilation, "BackgroundCompilation" , Bool) enum_of_options(RepeatCompilation, "RepeatCompilation" , Intx) enum_of_options(ReplayInline, "ReplayInline", Bool) enum_of_options (DumpReplay, "DumpReplay", Bool) enum_of_options(DumpInline, "DumpInline" , Bool) enum_of_options(CompileThresholdScaling, "CompileThresholdScaling" , Double) enum_of_options(ControlIntrinsic, "ControlIntrinsic" , Ccstrlist) enum_of_options(DisableIntrinsic, "DisableIntrinsic" , Ccstrlist) enum_of_options(NoRTMLockEliding, "NoRTMLockEliding" , Bool) enum_of_options(UseRTMLockEliding, "UseRTMLockEliding" , Bool) enum_of_options(BlockLayoutByFrequency, "BlockLayoutByFrequency" , Bool) enum_of_options(TraceOptoPipelining, "TraceOptoPipelining" , Bool) enum_of_options(TraceOptoOutput, "TraceOptoOutput", Bool ) enum_of_options(TraceSpilling, "TraceSpilling", Bool) enum_of_options (PrintIdeal, "PrintIdeal", Bool) enum_of_options(IGVPrintLevel , "IGVPrintLevel", Intx) enum_of_options(Vectorize, "Vectorize" , Bool) enum_of_options(VectorizeDebug, "VectorizeDebug", Uintx ) enum_of_options(CloneMapDebug, "CloneMapDebug", Bool) enum_of_options (IncrementalInlineForceCleanup, "IncrementalInlineForceCleanup" , Bool) enum_of_options(MaxNodeLimit, "MaxNodeLimit", Intx) enum_of_options (TestOptionInt, "TestOptionInt", Intx) enum_of_options(TestOptionUint , "TestOptionUint", Uintx) enum_of_options(TestOptionBool, "TestOptionBool" , Bool) enum_of_options(TestOptionBool2, "TestOptionBool2", Bool ) enum_of_options(TestOptionStr, "TestOptionStr", Ccstr) enum_of_options (TestOptionList, "TestOptionList", Ccstrlist) enum_of_options (TestOptionDouble, "TestOptionDouble", Double) enum_of_options (Option, "option", Unknown) enum_of_options(Unknown, "unknown" , Unknown) |
| 55 | #undef enum_of_options |
| 56 | }; |
| 57 | |
| 58 | enum OptionType option2type(enum CompileCommand option) { |
| 59 | return option_types[static_cast<int>(option)]; |
| 60 | } |
| 61 | |
| 62 | static const char* option_names[] = { |
| 63 | #define enum_of_options(option, name, ctype) name, |
| 64 | COMPILECOMMAND_OPTIONS(enum_of_options)enum_of_options(Help, "help", Unknown) enum_of_options(Quiet, "quiet", Unknown) enum_of_options(Log, "log", Bool) enum_of_options (Print, "print", Bool) enum_of_options(Inline, "inline", Bool ) enum_of_options(DontInline, "dontinline", Bool) enum_of_options (Blackhole, "blackhole", Bool) enum_of_options(CompileOnly, "compileonly" , Bool) enum_of_options(Exclude, "exclude", Bool) enum_of_options (Break, "break", Bool) enum_of_options(BreakAtExecute, "BreakAtExecute" , Bool) enum_of_options(BreakAtCompile, "BreakAtCompile", Bool ) enum_of_options(PrintAssembly, "PrintAssembly", Bool) enum_of_options (PrintInlining, "PrintInlining", Bool) enum_of_options(PrintIntrinsics , "PrintIntrinsics", Bool) enum_of_options(PrintNMethods, "PrintNMethods" , Bool) enum_of_options(PrintOptoAssembly, "PrintOptoAssembly" , Bool) enum_of_options(PrintDebugInfo, "PrintDebugInfo", Bool ) enum_of_options(PrintRelocations, "PrintRelocations", Bool) enum_of_options(PrintDependencies, "PrintDependencies", Bool ) enum_of_options(BackgroundCompilation, "BackgroundCompilation" , Bool) enum_of_options(RepeatCompilation, "RepeatCompilation" , Intx) enum_of_options(ReplayInline, "ReplayInline", Bool) enum_of_options (DumpReplay, "DumpReplay", Bool) enum_of_options(DumpInline, "DumpInline" , Bool) enum_of_options(CompileThresholdScaling, "CompileThresholdScaling" , Double) enum_of_options(ControlIntrinsic, "ControlIntrinsic" , Ccstrlist) enum_of_options(DisableIntrinsic, "DisableIntrinsic" , Ccstrlist) enum_of_options(NoRTMLockEliding, "NoRTMLockEliding" , Bool) enum_of_options(UseRTMLockEliding, "UseRTMLockEliding" , Bool) enum_of_options(BlockLayoutByFrequency, "BlockLayoutByFrequency" , Bool) enum_of_options(TraceOptoPipelining, "TraceOptoPipelining" , Bool) enum_of_options(TraceOptoOutput, "TraceOptoOutput", Bool ) enum_of_options(TraceSpilling, "TraceSpilling", Bool) enum_of_options (PrintIdeal, "PrintIdeal", Bool) enum_of_options(IGVPrintLevel , "IGVPrintLevel", Intx) enum_of_options(Vectorize, "Vectorize" , Bool) enum_of_options(VectorizeDebug, "VectorizeDebug", Uintx ) enum_of_options(CloneMapDebug, "CloneMapDebug", Bool) enum_of_options (IncrementalInlineForceCleanup, "IncrementalInlineForceCleanup" , Bool) enum_of_options(MaxNodeLimit, "MaxNodeLimit", Intx) enum_of_options (TestOptionInt, "TestOptionInt", Intx) enum_of_options(TestOptionUint , "TestOptionUint", Uintx) enum_of_options(TestOptionBool, "TestOptionBool" , Bool) enum_of_options(TestOptionBool2, "TestOptionBool2", Bool ) enum_of_options(TestOptionStr, "TestOptionStr", Ccstr) enum_of_options (TestOptionList, "TestOptionList", Ccstrlist) enum_of_options (TestOptionDouble, "TestOptionDouble", Double) enum_of_options (Option, "option", Unknown) enum_of_options(Unknown, "unknown" , Unknown) |
| 65 | #undef enum_of_options |
| 66 | }; |
| 67 | |
| 68 | const char* option2name(enum CompileCommand option) { |
| 69 | return option_names[static_cast<int>(option)]; |
| 70 | } |
| 71 | |
| 72 | /* Methods to map real type names to OptionType */ |
| 73 | template<typename T> |
| 74 | static OptionType get_type_for() { |
| 75 | return OptionType::Unknown; |
| 76 | }; |
| 77 | |
| 78 | template<> OptionType get_type_for<intx>() { |
| 79 | return OptionType::Intx; |
| 80 | } |
| 81 | |
| 82 | template<> OptionType get_type_for<uintx>() { |
| 83 | return OptionType::Uintx; |
| 84 | } |
| 85 | |
| 86 | template<> OptionType get_type_for<bool>() { |
| 87 | return OptionType::Bool; |
| 88 | } |
| 89 | |
| 90 | template<> OptionType get_type_for<ccstr>() { |
| 91 | return OptionType::Ccstr; |
| 92 | } |
| 93 | |
| 94 | template<> OptionType get_type_for<double>() { |
| 95 | return OptionType::Double; |
| 96 | } |
| 97 | |
| 98 | class MethodMatcher; |
| 99 | class TypedMethodOptionMatcher; |
| 100 | |
| 101 | static TypedMethodOptionMatcher* option_list = NULL__null; |
| 102 | static bool any_set = false; |
| 103 | |
| 104 | // A filter for quick lookup if an option is set |
| 105 | static bool option_filter[static_cast<int>(CompileCommand::Unknown) + 1] = { 0 }; |
| 106 | |
| 107 | void command_set_in_filter(enum CompileCommand option) { |
| 108 | assert(option != CompileCommand::Unknown, "sanity")do { if (!(option != CompileCommand::Unknown)) { (*g_assert_poison ) = 'X';; report_vm_error("/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 108, "assert(" "option != CompileCommand::Unknown" ") failed" , "sanity"); ::breakpoint(); } } while (0); |
| 109 | assert(option2type(option) != OptionType::Unknown, "sanity")do { if (!(option2type(option) != OptionType::Unknown)) { (*g_assert_poison ) = 'X';; report_vm_error("/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 109, "assert(" "option2type(option) != OptionType::Unknown" ") failed", "sanity"); ::breakpoint(); } } while (0); |
| 110 | |
| 111 | if ((option != CompileCommand::DontInline) && |
| 112 | (option != CompileCommand::Inline) && |
| 113 | (option != CompileCommand::Log)) { |
| 114 | any_set = true; |
| 115 | } |
| 116 | option_filter[static_cast<int>(option)] = true; |
| 117 | } |
| 118 | |
| 119 | bool has_command(enum CompileCommand option) { |
| 120 | return option_filter[static_cast<int>(option)]; |
| 121 | } |
| 122 | |
| 123 | class TypedMethodOptionMatcher : public MethodMatcher { |
| 124 | private: |
| 125 | TypedMethodOptionMatcher* _next; |
| 126 | enum CompileCommand _option; |
| 127 | public: |
| 128 | |
| 129 | union { |
| 130 | bool bool_value; |
| 131 | intx intx_value; |
| 132 | uintx uintx_value; |
| 133 | double double_value; |
| 134 | ccstr ccstr_value; |
| 135 | } _u; |
| 136 | |
| 137 | TypedMethodOptionMatcher() : MethodMatcher(), |
| 138 | _next(NULL__null), |
| 139 | _option(CompileCommand::Unknown) { |
| 140 | memset(&_u, 0, sizeof(_u)); |
| 141 | } |
| 142 | |
| 143 | ~TypedMethodOptionMatcher(); |
| 144 | static TypedMethodOptionMatcher* parse_method_pattern(char*& line, char* errorbuf, const int buf_size); |
| 145 | TypedMethodOptionMatcher* match(const methodHandle &method, enum CompileCommand option); |
| 146 | |
| 147 | void init(enum CompileCommand option, TypedMethodOptionMatcher* next) { |
| 148 | _next = next; |
| 149 | _option = option; |
| 150 | } |
| 151 | |
| 152 | void init_matcher(Symbol* class_name, Mode class_mode, |
| 153 | Symbol* method_name, Mode method_mode, |
| 154 | Symbol* signature) { |
| 155 | MethodMatcher::init(class_name, class_mode, method_name, method_mode, signature); |
| 156 | } |
| 157 | |
| 158 | void set_next(TypedMethodOptionMatcher* next) {_next = next; } |
| 159 | TypedMethodOptionMatcher* next() { return _next; } |
| 160 | enum CompileCommand option() { return _option; } |
| 161 | template<typename T> T value(); |
| 162 | template<typename T> void set_value(T value); |
| 163 | void print(); |
| 164 | void print_all(); |
| 165 | TypedMethodOptionMatcher* clone(); |
| 166 | }; |
| 167 | |
| 168 | // A few templated accessors instead of a full template class. |
| 169 | template<> intx TypedMethodOptionMatcher::value<intx>() { |
| 170 | return _u.intx_value; |
| 171 | } |
| 172 | |
| 173 | template<> uintx TypedMethodOptionMatcher::value<uintx>() { |
| 174 | return _u.uintx_value; |
| 175 | } |
| 176 | |
| 177 | template<> bool TypedMethodOptionMatcher::value<bool>() { |
| 178 | return _u.bool_value; |
| 179 | } |
| 180 | |
| 181 | template<> double TypedMethodOptionMatcher::value<double>() { |
| 182 | return _u.double_value; |
| 183 | } |
| 184 | |
| 185 | template<> ccstr TypedMethodOptionMatcher::value<ccstr>() { |
| 186 | return _u.ccstr_value; |
| 187 | } |
| 188 | |
| 189 | template<> void TypedMethodOptionMatcher::set_value(intx value) { |
| 190 | _u.intx_value = value; |
| 191 | } |
| 192 | |
| 193 | template<> void TypedMethodOptionMatcher::set_value(uintx value) { |
| 194 | _u.uintx_value = value; |
| 195 | } |
| 196 | |
| 197 | template<> void TypedMethodOptionMatcher::set_value(double value) { |
| 198 | _u.double_value = value; |
| 199 | } |
| 200 | |
| 201 | template<> void TypedMethodOptionMatcher::set_value(bool value) { |
| 202 | _u.bool_value = value; |
| 203 | } |
| 204 | |
| 205 | template<> void TypedMethodOptionMatcher::set_value(ccstr value) { |
| 206 | _u.ccstr_value = (const ccstr)os::strdup_check_oom(value); |
| 207 | } |
| 208 | |
| 209 | void TypedMethodOptionMatcher::print() { |
| 210 | ttyLocker ttyl; |
| 211 | print_base(tty); |
| 212 | const char* name = option2name(_option); |
| 213 | enum OptionType type = option2type(_option); |
| 214 | switch (type) { |
| 215 | case OptionType::Intx: |
| 216 | tty->print_cr(" intx %s = " INTX_FORMAT"%" "l" "d", name, value<intx>()); |
| 217 | break; |
| 218 | case OptionType::Uintx: |
| 219 | tty->print_cr(" uintx %s = " UINTX_FORMAT"%" "l" "u", name, value<uintx>()); |
| 220 | break; |
| 221 | case OptionType::Bool: |
| 222 | tty->print_cr(" bool %s = %s", name, value<bool>() ? "true" : "false"); |
| 223 | break; |
| 224 | case OptionType::Double: |
| 225 | tty->print_cr(" double %s = %f", name, value<double>()); |
| 226 | break; |
| 227 | case OptionType::Ccstr: |
| 228 | case OptionType::Ccstrlist: |
| 229 | tty->print_cr(" const char* %s = '%s'", name, value<ccstr>()); |
| 230 | break; |
| 231 | default: |
| 232 | ShouldNotReachHere()do { (*g_assert_poison) = 'X';; report_should_not_reach_here( "/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 232); ::breakpoint(); } while (0); |
| 233 | } |
| 234 | } |
| 235 | |
| 236 | void TypedMethodOptionMatcher::print_all() { |
| 237 | print(); |
| 238 | if (_next != NULL__null) { |
| 239 | tty->print(" "); |
| 240 | _next->print_all(); |
| 241 | } |
| 242 | } |
| 243 | |
| 244 | TypedMethodOptionMatcher* TypedMethodOptionMatcher::clone() { |
| 245 | TypedMethodOptionMatcher* m = new TypedMethodOptionMatcher(); |
| 246 | m->_class_mode = _class_mode; |
| 247 | m->_class_name = _class_name; |
| 248 | m->_method_mode = _method_mode; |
| 249 | m->_method_name = _method_name; |
| 250 | m->_signature = _signature; |
| 251 | // Need to ref count the symbols |
| 252 | if (_class_name != NULL__null) { |
| 253 | _class_name->increment_refcount(); |
| 254 | } |
| 255 | if (_method_name != NULL__null) { |
| 256 | _method_name->increment_refcount(); |
| 257 | } |
| 258 | if (_signature != NULL__null) { |
| 259 | _signature->increment_refcount(); |
| 260 | } |
| 261 | return m; |
| 262 | } |
| 263 | |
| 264 | TypedMethodOptionMatcher::~TypedMethodOptionMatcher() { |
| 265 | enum OptionType type = option2type(_option); |
| 266 | if (type == OptionType::Ccstr || type == OptionType::Ccstrlist) { |
| 267 | ccstr v = value<ccstr>(); |
| 268 | os::free((void*)v); |
| 269 | } |
| 270 | } |
| 271 | |
| 272 | TypedMethodOptionMatcher* TypedMethodOptionMatcher::parse_method_pattern(char*& line, char* errorbuf, const int buf_size) { |
| 273 | assert(*errorbuf == '\0', "Dont call here with error_msg already set")do { if (!(*errorbuf == '\0')) { (*g_assert_poison) = 'X';; report_vm_error ("/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 273, "assert(" "*errorbuf == '\\0'" ") failed", "Dont call here with error_msg already set" ); ::breakpoint(); } } while (0); |
| 274 | const char* error_msg = NULL__null; |
| 275 | TypedMethodOptionMatcher* tom = new TypedMethodOptionMatcher(); |
| 276 | MethodMatcher::parse_method_pattern(line, error_msg, tom); |
| 277 | if (error_msg != NULL__null) { |
| 278 | jio_snprintf(errorbuf, buf_size, error_msg); |
| 279 | delete tom; |
| 280 | return NULL__null; |
| 281 | } |
| 282 | return tom; |
| 283 | } |
| 284 | |
| 285 | TypedMethodOptionMatcher* TypedMethodOptionMatcher::match(const methodHandle& method, enum CompileCommand option) { |
| 286 | TypedMethodOptionMatcher* current = this; |
| 287 | while (current != NULL__null) { |
| 288 | if (current->_option == option) { |
| 289 | if (current->matches(method)) { |
| 290 | return current; |
| 291 | } |
| 292 | } |
| 293 | current = current->next(); |
| 294 | } |
| 295 | return NULL__null; |
| 296 | } |
| 297 | |
| 298 | template<typename T> |
| 299 | static void register_command(TypedMethodOptionMatcher* matcher, |
| 300 | enum CompileCommand option, |
| 301 | T value) { |
| 302 | assert(matcher != option_list, "No circular lists please")do { if (!(matcher != option_list)) { (*g_assert_poison) = 'X' ;; report_vm_error("/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 302, "assert(" "matcher != option_list" ") failed", "No circular lists please" ); ::breakpoint(); } } while (0); |
| 303 | if (option == CompileCommand::Log && !LogCompilation) { |
| 304 | tty->print_cr("Warning: +LogCompilation must be enabled in order for individual methods to be logged with "); |
| 305 | tty->print_cr(" CompileCommand=log,<method pattern>"); |
| 306 | } |
| 307 | assert(CompilerOracle::option_matches_type(option, value), "Value must match option type")do { if (!(CompilerOracle::option_matches_type(option, value) )) { (*g_assert_poison) = 'X';; report_vm_error("/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 307, "assert(" "CompilerOracle::option_matches_type(option, value)" ") failed", "Value must match option type"); ::breakpoint(); } } while (0); |
| 308 | |
| 309 | if (option == CompileCommand::Blackhole && !UnlockExperimentalVMOptions) { |
| 310 | warning("Blackhole compile option is experimental and must be enabled via -XX:+UnlockExperimentalVMOptions"); |
| 311 | return; |
| 312 | } |
| 313 | |
| 314 | matcher->init(option, option_list); |
| 315 | matcher->set_value<T>(value); |
| 316 | option_list = matcher; |
| 317 | command_set_in_filter(option); |
| 318 | |
| 319 | if (!CompilerOracle::be_quiet()) { |
| 320 | // Print out the successful registration of a compile command |
| 321 | ttyLocker ttyl; |
| 322 | tty->print("CompileCommand: %s ", option2name(option)); |
| 323 | matcher->print(); |
| 324 | } |
| 325 | return; |
| 326 | } |
| 327 | |
| 328 | template<typename T> |
| 329 | bool CompilerOracle::has_option_value(const methodHandle& method, enum CompileCommand option, T& value) { |
| 330 | assert(option_matches_type(option, value), "Value must match option type")do { if (!(option_matches_type(option, value))) { (*g_assert_poison ) = 'X';; report_vm_error("/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 330, "assert(" "option_matches_type(option, value)" ") failed" , "Value must match option type"); ::breakpoint(); } } while ( 0); |
| 331 | if (!has_command(option)) { |
| 332 | return false; |
| 333 | } |
| 334 | if (option_list != NULL__null) { |
| 335 | TypedMethodOptionMatcher* m = option_list->match(method, option); |
| 336 | if (m != NULL__null) { |
| 337 | value = m->value<T>(); |
| 338 | return true; |
| 339 | } |
| 340 | } |
| 341 | return false; |
| 342 | } |
| 343 | |
| 344 | static bool resolve_inlining_predicate(enum CompileCommand option, const methodHandle& method) { |
| 345 | assert(option == CompileCommand::Inline || option == CompileCommand::DontInline, "Sanity")do { if (!(option == CompileCommand::Inline || option == CompileCommand ::DontInline)) { (*g_assert_poison) = 'X';; report_vm_error("/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 345, "assert(" "option == CompileCommand::Inline || option == CompileCommand::DontInline" ") failed", "Sanity"); ::breakpoint(); } } while (0); |
| 346 | bool v1 = false; |
| 347 | bool v2 = false; |
| 348 | bool has_inline = CompilerOracle::has_option_value(method, CompileCommand::Inline, v1); |
| 349 | bool has_dnotinline = CompilerOracle::has_option_value(method, CompileCommand::DontInline, v2); |
| 350 | if (has_inline && has_dnotinline) { |
| 351 | if (v1 && v2) { |
| 352 | // Conflict options detected |
| 353 | // Find the last one for that method and return the predicate accordingly |
| 354 | // option_list lists options in reverse order. So the first option we find is the last which was specified. |
| 355 | enum CompileCommand last_one = CompileCommand::Unknown; |
| 356 | TypedMethodOptionMatcher* current = option_list; |
| 357 | while (current != NULL__null) { |
| 358 | last_one = current->option(); |
| 359 | if (last_one == CompileCommand::Inline || last_one == CompileCommand::DontInline) { |
| 360 | if (current->matches(method)) { |
| 361 | return last_one == option; |
| 362 | } |
| 363 | } |
| 364 | current = current->next(); |
| 365 | } |
| 366 | ShouldNotReachHere()do { (*g_assert_poison) = 'X';; report_should_not_reach_here( "/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 366); ::breakpoint(); } while (0); |
| 367 | return false; |
| 368 | } else { |
| 369 | // No conflicts |
| 370 | return option == CompileCommand::Inline ? v1 : v2; |
| 371 | } |
| 372 | } else { |
| 373 | if (option == CompileCommand::Inline) { |
| 374 | return has_inline ? v1 : false; |
| 375 | } else { |
| 376 | return has_dnotinline ? v2 : false; |
| 377 | } |
| 378 | } |
| 379 | } |
| 380 | |
| 381 | static bool check_predicate(enum CompileCommand option, const methodHandle& method) { |
| 382 | // Special handling for Inline and DontInline since conflict options may be specified |
| 383 | if (option == CompileCommand::Inline || option == CompileCommand::DontInline) { |
| 384 | return resolve_inlining_predicate(option, method); |
| 385 | } |
| 386 | |
| 387 | bool value = false; |
| 388 | if (CompilerOracle::has_option_value(method, option, value)) { |
| 389 | return value; |
| 390 | } |
| 391 | return false; |
| 392 | } |
| 393 | |
| 394 | bool CompilerOracle::has_any_command_set() { |
| 395 | return any_set; |
| 396 | } |
| 397 | |
| 398 | // Explicit instantiation for all OptionTypes supported. |
| 399 | template bool CompilerOracle::has_option_value<intx>(const methodHandle& method, enum CompileCommand option, intx& value); |
| 400 | template bool CompilerOracle::has_option_value<uintx>(const methodHandle& method, enum CompileCommand option, uintx& value); |
| 401 | template bool CompilerOracle::has_option_value<bool>(const methodHandle& method, enum CompileCommand option, bool& value); |
| 402 | template bool CompilerOracle::has_option_value<ccstr>(const methodHandle& method, enum CompileCommand option, ccstr& value); |
| 403 | template bool CompilerOracle::has_option_value<double>(const methodHandle& method, enum CompileCommand option, double& value); |
| 404 | |
| 405 | template<typename T> |
| 406 | bool CompilerOracle::option_matches_type(enum CompileCommand option, T& value) { |
| 407 | enum OptionType option_type = option2type(option); |
| 408 | if (option_type == OptionType::Unknown) { |
| 409 | return false; // Can't query options with type Unknown. |
| 410 | } |
| 411 | if (option_type == OptionType::Ccstrlist) { |
| 412 | option_type = OptionType::Ccstr; // CCstrList type options are stored as Ccstr |
| 413 | } |
| 414 | return (get_type_for<T>() == option_type); |
| 415 | } |
| 416 | |
| 417 | template bool CompilerOracle::option_matches_type<intx>(enum CompileCommand option, intx& value); |
| 418 | template bool CompilerOracle::option_matches_type<uintx>(enum CompileCommand option, uintx& value); |
| 419 | template bool CompilerOracle::option_matches_type<bool>(enum CompileCommand option, bool& value); |
| 420 | template bool CompilerOracle::option_matches_type<ccstr>(enum CompileCommand option, ccstr& value); |
| 421 | template bool CompilerOracle::option_matches_type<double>(enum CompileCommand option, double& value); |
| 422 | |
| 423 | bool CompilerOracle::has_option(const methodHandle& method, enum CompileCommand option) { |
| 424 | bool value = false; |
| 425 | has_option_value(method, option, value); |
| 426 | return value; |
| 427 | } |
| 428 | |
| 429 | bool CompilerOracle::should_exclude(const methodHandle& method) { |
| 430 | if (check_predicate(CompileCommand::Exclude, method)) { |
| 431 | return true; |
| 432 | } |
| 433 | if (has_command(CompileCommand::CompileOnly)) { |
| 434 | return !check_predicate(CompileCommand::CompileOnly, method); |
| 435 | } |
| 436 | return false; |
| 437 | } |
| 438 | |
| 439 | bool CompilerOracle::should_inline(const methodHandle& method) { |
| 440 | return (check_predicate(CompileCommand::Inline, method)); |
| 441 | } |
| 442 | |
| 443 | bool CompilerOracle::should_not_inline(const methodHandle& method) { |
| 444 | return check_predicate(CompileCommand::DontInline, method) || check_predicate(CompileCommand::Exclude, method); |
| 445 | } |
| 446 | |
| 447 | bool CompilerOracle::should_print(const methodHandle& method) { |
| 448 | return check_predicate(CompileCommand::Print, method); |
| 449 | } |
| 450 | |
| 451 | bool CompilerOracle::should_print_methods() { |
| 452 | return has_command(CompileCommand::Print); |
| 453 | } |
| 454 | |
| 455 | bool CompilerOracle::should_log(const methodHandle& method) { |
| 456 | if (!LogCompilation) return false; |
| 457 | if (!has_command(CompileCommand::Log)) { |
| 458 | return true; // by default, log all |
| 459 | } |
| 460 | return (check_predicate(CompileCommand::Log, method)); |
| 461 | } |
| 462 | |
| 463 | bool CompilerOracle::should_break_at(const methodHandle& method) { |
| 464 | return check_predicate(CompileCommand::Break, method); |
| 465 | } |
| 466 | |
| 467 | void CompilerOracle::tag_blackhole_if_possible(const methodHandle& method) { |
| 468 | if (!check_predicate(CompileCommand::Blackhole, method)) { |
| 469 | return; |
| 470 | } |
| 471 | guarantee(UnlockExperimentalVMOptions, "Checked during initial parsing")do { if (!(UnlockExperimentalVMOptions)) { (*g_assert_poison) = 'X';; report_vm_error("/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 471, "guarantee(" "UnlockExperimentalVMOptions" ") failed", "Checked during initial parsing"); ::breakpoint(); } } while (0); |
| 472 | if (method->result_type() != T_VOID) { |
| 473 | warning("Blackhole compile option only works for methods with void type: %s", |
| 474 | method->name_and_sig_as_C_string()); |
| 475 | return; |
| 476 | } |
| 477 | if (!method->is_empty_method()) { |
| 478 | warning("Blackhole compile option only works for empty methods: %s", |
| 479 | method->name_and_sig_as_C_string()); |
| 480 | return; |
| 481 | } |
| 482 | if (!method->is_static()) { |
| 483 | warning("Blackhole compile option only works for static methods: %s", |
| 484 | method->name_and_sig_as_C_string()); |
| 485 | return; |
| 486 | } |
| 487 | if (method->intrinsic_id() == vmIntrinsics::_blackhole) { |
| 488 | return; |
| 489 | } |
| 490 | if (method->intrinsic_id() != vmIntrinsics::_none) { |
| 491 | warning("Blackhole compile option only works for methods that do not have intrinsic set: %s, %s", |
| 492 | method->name_and_sig_as_C_string(), vmIntrinsics::name_at(method->intrinsic_id())); |
| 493 | return; |
| 494 | } |
| 495 | method->set_intrinsic_id(vmIntrinsics::_blackhole); |
| 496 | } |
| 497 | |
| 498 | static enum CompileCommand match_option_name(const char* line, int* bytes_read, char* errorbuf, int bufsize) { |
| 499 | assert(ARRAY_SIZE(option_names) == static_cast<int>(CompileCommand::Count), "option_names size mismatch")do { if (!(sizeof(array_size_impl(option_names)) == static_cast <int>(CompileCommand::Count))) { (*g_assert_poison) = 'X' ;; report_vm_error("/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 499, "assert(" "sizeof(array_size_impl(option_names)) == static_cast<int>(CompileCommand::Count)" ") failed", "option_names size mismatch"); ::breakpoint(); } } while (0); |
| 500 | |
| 501 | *bytes_read = 0; |
| 502 | char option_buf[256]; |
| 503 | int matches = sscanf(line, "%255[a-zA-Z0-9]%n", option_buf, bytes_read); |
| 504 | if (matches > 0 && strcasecmp(option_buf, "unknown") != 0) { |
| 505 | for (uint i = 0; i < ARRAY_SIZE(option_names)sizeof(array_size_impl(option_names)); i++) { |
| 506 | if (strcasecmp(option_buf, option_names[i]) == 0) { |
| 507 | return static_cast<enum CompileCommand>(i); |
| 508 | } |
| 509 | } |
| 510 | } |
| 511 | jio_snprintf(errorbuf, bufsize, "Unrecognized option '%s'", option_buf); |
| 512 | return CompileCommand::Unknown; |
| 513 | } |
| 514 | |
| 515 | // match exactly and don't mess with errorbuf |
| 516 | enum CompileCommand CompilerOracle::parse_option_name(const char* line) { |
| 517 | for (uint i = 0; i < ARRAY_SIZE(option_names)sizeof(array_size_impl(option_names)); i++) { |
| 518 | if (strcasecmp(line, option_names[i]) == 0) { |
| 519 | return static_cast<enum CompileCommand>(i); |
| 520 | } |
| 521 | } |
| 522 | return CompileCommand::Unknown; |
| 523 | } |
| 524 | |
| 525 | enum OptionType CompilerOracle::parse_option_type(const char* type_str) { |
| 526 | for (uint i = 0; i < ARRAY_SIZE(optiontype_names)sizeof(array_size_impl(optiontype_names)); i++) { |
| 527 | if (strcasecmp(type_str, optiontype_names[i]) == 0) { |
| 528 | return static_cast<enum OptionType>(i); |
| 529 | } |
| 530 | } |
| 531 | return OptionType::Unknown; |
| 532 | } |
| 533 | |
| 534 | void print_tip() { // CMH Update info |
| 535 | tty->cr(); |
| 536 | tty->print_cr("Usage: '-XX:CompileCommand=<option>,<method pattern>' - to set boolean option to true"); |
| 537 | tty->print_cr("Usage: '-XX:CompileCommand=<option>,<method pattern>,<value>'"); |
| 538 | tty->print_cr("Use: '-XX:CompileCommand=help' for more information and to list all option."); |
| 539 | tty->cr(); |
| 540 | } |
| 541 | |
| 542 | void print_option(enum CompileCommand option, const char* name, enum OptionType type) { |
| 543 | if (type != OptionType::Unknown) { |
| 544 | tty->print_cr(" %s (%s)", name, optiontype2name(type)); |
| 545 | } |
| 546 | } |
| 547 | |
| 548 | void print_commands() { |
| 549 | tty->cr(); |
| 550 | tty->print_cr("All available options:"); |
| 551 | #define enum_of_options(option, name, ctype) print_option(CompileCommand::option, name, OptionType::ctype); |
| 552 | COMPILECOMMAND_OPTIONS(enum_of_options)enum_of_options(Help, "help", Unknown) enum_of_options(Quiet, "quiet", Unknown) enum_of_options(Log, "log", Bool) enum_of_options (Print, "print", Bool) enum_of_options(Inline, "inline", Bool ) enum_of_options(DontInline, "dontinline", Bool) enum_of_options (Blackhole, "blackhole", Bool) enum_of_options(CompileOnly, "compileonly" , Bool) enum_of_options(Exclude, "exclude", Bool) enum_of_options (Break, "break", Bool) enum_of_options(BreakAtExecute, "BreakAtExecute" , Bool) enum_of_options(BreakAtCompile, "BreakAtCompile", Bool ) enum_of_options(PrintAssembly, "PrintAssembly", Bool) enum_of_options (PrintInlining, "PrintInlining", Bool) enum_of_options(PrintIntrinsics , "PrintIntrinsics", Bool) enum_of_options(PrintNMethods, "PrintNMethods" , Bool) enum_of_options(PrintOptoAssembly, "PrintOptoAssembly" , Bool) enum_of_options(PrintDebugInfo, "PrintDebugInfo", Bool ) enum_of_options(PrintRelocations, "PrintRelocations", Bool) enum_of_options(PrintDependencies, "PrintDependencies", Bool ) enum_of_options(BackgroundCompilation, "BackgroundCompilation" , Bool) enum_of_options(RepeatCompilation, "RepeatCompilation" , Intx) enum_of_options(ReplayInline, "ReplayInline", Bool) enum_of_options (DumpReplay, "DumpReplay", Bool) enum_of_options(DumpInline, "DumpInline" , Bool) enum_of_options(CompileThresholdScaling, "CompileThresholdScaling" , Double) enum_of_options(ControlIntrinsic, "ControlIntrinsic" , Ccstrlist) enum_of_options(DisableIntrinsic, "DisableIntrinsic" , Ccstrlist) enum_of_options(NoRTMLockEliding, "NoRTMLockEliding" , Bool) enum_of_options(UseRTMLockEliding, "UseRTMLockEliding" , Bool) enum_of_options(BlockLayoutByFrequency, "BlockLayoutByFrequency" , Bool) enum_of_options(TraceOptoPipelining, "TraceOptoPipelining" , Bool) enum_of_options(TraceOptoOutput, "TraceOptoOutput", Bool ) enum_of_options(TraceSpilling, "TraceSpilling", Bool) enum_of_options (PrintIdeal, "PrintIdeal", Bool) enum_of_options(IGVPrintLevel , "IGVPrintLevel", Intx) enum_of_options(Vectorize, "Vectorize" , Bool) enum_of_options(VectorizeDebug, "VectorizeDebug", Uintx ) enum_of_options(CloneMapDebug, "CloneMapDebug", Bool) enum_of_options (IncrementalInlineForceCleanup, "IncrementalInlineForceCleanup" , Bool) enum_of_options(MaxNodeLimit, "MaxNodeLimit", Intx) enum_of_options (TestOptionInt, "TestOptionInt", Intx) enum_of_options(TestOptionUint , "TestOptionUint", Uintx) enum_of_options(TestOptionBool, "TestOptionBool" , Bool) enum_of_options(TestOptionBool2, "TestOptionBool2", Bool ) enum_of_options(TestOptionStr, "TestOptionStr", Ccstr) enum_of_options (TestOptionList, "TestOptionList", Ccstrlist) enum_of_options (TestOptionDouble, "TestOptionDouble", Double) enum_of_options (Option, "option", Unknown) enum_of_options(Unknown, "unknown" , Unknown) |
| 553 | #undef enum_of_options |
| 554 | tty->cr(); |
| 555 | } |
| 556 | |
| 557 | static void usage() { |
| 558 | tty->cr(); |
| 559 | tty->print_cr("The CompileCommand option enables the user of the JVM to control specific"); |
| 560 | tty->print_cr("behavior of the dynamic compilers."); |
| 561 | tty->cr(); |
| 562 | tty->print_cr("Compile commands has this general form:"); |
| 563 | tty->print_cr("-XX:CompileCommand=<option><method pattern><value>"); |
| 564 | tty->print_cr(" Sets <option> to the specified value for methods matching <method pattern>"); |
| 565 | tty->print_cr(" All options are typed"); |
| 566 | tty->cr(); |
| 567 | tty->print_cr("-XX:CompileCommand=<option><method pattern>"); |
| 568 | tty->print_cr(" Sets <option> to true for methods matching <method pattern>"); |
| 569 | tty->print_cr(" Only applies to boolean options."); |
| 570 | tty->cr(); |
| 571 | tty->print_cr("-XX:CompileCommand=quiet"); |
| 572 | tty->print_cr(" Silence the compile command output"); |
| 573 | tty->cr(); |
| 574 | tty->print_cr("-XX:CompileCommand=help"); |
| 575 | tty->print_cr(" Prints this help text"); |
| 576 | tty->cr(); |
| 577 | print_commands(); |
| 578 | tty->cr(); |
| 579 | tty->print_cr("Method patterns has the format:"); |
| 580 | tty->print_cr(" package/Class.method()"); |
| 581 | tty->cr(); |
| 582 | tty->print_cr("For backward compatibility this form is also allowed:"); |
| 583 | tty->print_cr(" package.Class::method()"); |
| 584 | tty->cr(); |
| 585 | tty->print_cr("The signature can be separated by an optional whitespace or comma:"); |
| 586 | tty->print_cr(" package/Class.method ()"); |
| 587 | tty->cr(); |
| 588 | tty->print_cr("The class and method identifier can be used together with leading or"); |
| 589 | tty->print_cr("trailing *'s for wildcard matching:"); |
| 590 | tty->print_cr(" *ackage/Clas*.*etho*()"); |
| 591 | tty->cr(); |
| 592 | tty->print_cr("It is possible to use more than one CompileCommand on the command line:"); |
| 593 | tty->print_cr(" -XX:CompileCommand=exclude,java/*.* -XX:CompileCommand=log,java*.*"); |
| 594 | tty->cr(); |
| 595 | tty->print_cr("The CompileCommands can be loaded from a file with the flag"); |
| 596 | tty->print_cr("-XX:CompileCommandFile=<file> or be added to the file '.hotspot_compiler'"); |
| 597 | tty->print_cr("Use the same format in the file as the argument to the CompileCommand flag."); |
| 598 | tty->print_cr("Add one command on each line."); |
| 599 | tty->print_cr(" exclude java/*.*"); |
| 600 | tty->print_cr(" option java/*.* ReplayInline"); |
| 601 | tty->cr(); |
| 602 | tty->print_cr("The following commands have conflicting behavior: 'exclude', 'inline', 'dontinline',"); |
| 603 | tty->print_cr("and 'compileonly'. There is no priority of commands. Applying (a subset of) these"); |
| 604 | tty->print_cr("commands to the same method results in undefined behavior."); |
| 605 | tty->cr(); |
| 606 | }; |
| 607 | |
| 608 | int skip_whitespace(char* &line) { |
| 609 | // Skip any leading spaces |
| 610 | int whitespace_read = 0; |
| 611 | sscanf(line, "%*[ \t]%n", &whitespace_read); |
| 612 | line += whitespace_read; |
| 613 | return whitespace_read; |
| 614 | } |
| 615 | |
| 616 | void skip_comma(char* &line) { |
| 617 | // Skip any leading spaces |
| 618 | if (*line == ',') { |
| 619 | line++; |
| 620 | } |
| 621 | } |
| 622 | |
| 623 | static void scan_value(enum OptionType type, char* line, int& total_bytes_read, |
| 624 | TypedMethodOptionMatcher* matcher, enum CompileCommand option, char* errorbuf, const int buf_size) { |
| 625 | int bytes_read = 0; |
| 626 | const char* ccname = option2name(option); |
| 627 | const char* type_str = optiontype2name(type); |
| 628 | int skipped = skip_whitespace(line); |
| 629 | total_bytes_read += skipped; |
| 630 | if (type == OptionType::Intx) { |
| 631 | intx value; |
| 632 | if (sscanf(line, "" INTX_FORMAT"%" "l" "d" "%n", &value, &bytes_read) == 1) { |
| 633 | total_bytes_read += bytes_read; |
| 634 | line += bytes_read; |
Value stored to 'line' is never read | |
| 635 | register_command(matcher, option, value); |
| 636 | return; |
| 637 | } else { |
| 638 | jio_snprintf(errorbuf, buf_size, "Value cannot be read for option '%s' of type '%s'", ccname, type_str); |
| 639 | } |
| 640 | } else if (type == OptionType::Uintx) { |
| 641 | uintx value; |
| 642 | if (sscanf(line, "" UINTX_FORMAT"%" "l" "u" "%n", &value, &bytes_read) == 1) { |
| 643 | total_bytes_read += bytes_read; |
| 644 | line += bytes_read; |
| 645 | register_command(matcher, option, value); |
| 646 | return; |
| 647 | } else { |
| 648 | jio_snprintf(errorbuf, buf_size, "Value cannot be read for option '%s' of type '%s'", ccname, type_str); |
| 649 | } |
| 650 | } else if (type == OptionType::Ccstr) { |
| 651 | ResourceMark rm; |
| 652 | char* value = NEW_RESOURCE_ARRAY(char, strlen(line) + 1)(char*) resource_allocate_bytes((strlen(line) + 1) * sizeof(char )); |
| 653 | if (sscanf(line, "%255[_a-zA-Z0-9]%n", value, &bytes_read) == 1) { |
| 654 | total_bytes_read += bytes_read; |
| 655 | line += bytes_read; |
| 656 | register_command(matcher, option, (ccstr) value); |
| 657 | return; |
| 658 | } else { |
| 659 | jio_snprintf(errorbuf, buf_size, "Value cannot be read for option '%s' of type '%s'", ccname, type_str); |
| 660 | } |
| 661 | } else if (type == OptionType::Ccstrlist) { |
| 662 | // Accumulates several strings into one. The internal type is ccstr. |
| 663 | ResourceMark rm; |
| 664 | char* value = NEW_RESOURCE_ARRAY(char, strlen(line) + 1)(char*) resource_allocate_bytes((strlen(line) + 1) * sizeof(char )); |
| 665 | char* next_value = value; |
| 666 | if (sscanf(line, "%255[_a-zA-Z0-9+\\-]%n", next_value, &bytes_read) == 1) { |
| 667 | total_bytes_read += bytes_read; |
| 668 | line += bytes_read; |
| 669 | next_value += bytes_read + 1; |
| 670 | char* end_value = next_value - 1; |
| 671 | while (sscanf(line, "%*[ \t]%255[_a-zA-Z0-9+\\-]%n", next_value, &bytes_read) == 1) { |
| 672 | total_bytes_read += bytes_read; |
| 673 | line += bytes_read; |
| 674 | *end_value = ' '; // override '\0' |
| 675 | next_value += bytes_read; |
| 676 | end_value = next_value-1; |
| 677 | } |
| 678 | |
| 679 | if (option == CompileCommand::ControlIntrinsic || option == CompileCommand::DisableIntrinsic) { |
| 680 | ControlIntrinsicValidator validator(value, (option == CompileCommand::DisableIntrinsic)); |
| 681 | |
| 682 | if (!validator.is_valid()) { |
| 683 | jio_snprintf(errorbuf, buf_size, "Unrecognized intrinsic detected in %s: %s", option2name(option), validator.what()); |
| 684 | } |
| 685 | } |
| 686 | |
| 687 | register_command(matcher, option, (ccstr) value); |
| 688 | return; |
| 689 | } else { |
| 690 | jio_snprintf(errorbuf, buf_size, "Value cannot be read for option '%s' of type '%s'", ccname, type_str); |
| 691 | } |
| 692 | } else if (type == OptionType::Bool) { |
| 693 | char value[256]; |
| 694 | if (*line == '\0') { |
| 695 | // Short version of a CompileCommand sets a boolean Option to true |
| 696 | // -XXCompileCommand=<Option>,<method pattern> |
| 697 | register_command(matcher, option, true); |
| 698 | return; |
| 699 | } |
| 700 | if (sscanf(line, "%255[a-zA-Z]%n", value, &bytes_read) == 1) { |
| 701 | if (strcasecmp(value, "true") == 0) { |
| 702 | total_bytes_read += bytes_read; |
| 703 | line += bytes_read; |
| 704 | register_command(matcher, option, true); |
| 705 | return; |
| 706 | } else if (strcasecmp(value, "false") == 0) { |
| 707 | total_bytes_read += bytes_read; |
| 708 | line += bytes_read; |
| 709 | register_command(matcher, option, false); |
| 710 | return; |
| 711 | } else { |
| 712 | jio_snprintf(errorbuf, buf_size, "Value cannot be read for option '%s' of type '%s'", ccname, type_str); |
| 713 | } |
| 714 | } else { |
| 715 | jio_snprintf(errorbuf, buf_size, "Value cannot be read for option '%s' of type '%s'", ccname, type_str); |
| 716 | } |
| 717 | } else if (type == OptionType::Double) { |
| 718 | char buffer[2][256]; |
| 719 | // Decimal separator '.' has been replaced with ' ' or '/' earlier, |
| 720 | // so read integer and fraction part of double value separately. |
| 721 | if (sscanf(line, "%255[0-9]%*[ /\t]%255[0-9]%n", buffer[0], buffer[1], &bytes_read) == 2) { |
| 722 | char value[512] = ""; |
| 723 | jio_snprintf(value, sizeof(value), "%s.%s", buffer[0], buffer[1]); |
| 724 | total_bytes_read += bytes_read; |
| 725 | line += bytes_read; |
| 726 | register_command(matcher, option, atof(value)); |
| 727 | return; |
| 728 | } else { |
| 729 | jio_snprintf(errorbuf, buf_size, "Value cannot be read for option '%s' of type '%s'", ccname, type_str); |
| 730 | } |
| 731 | } else { |
| 732 | jio_snprintf(errorbuf, buf_size, "Type '%s' not supported ", type_str); |
| 733 | } |
| 734 | } |
| 735 | |
| 736 | // Scan next option and value in line, return MethodMatcher object on success, NULL on failure. |
| 737 | // On failure, error_msg contains description for the first error. |
| 738 | // For future extensions: set error_msg on first error. |
| 739 | static void scan_option_and_value(enum OptionType type, char* line, int& total_bytes_read, |
| 740 | TypedMethodOptionMatcher* matcher, |
| 741 | char* errorbuf, const int buf_size) { |
| 742 | total_bytes_read = 0; |
| 743 | int bytes_read = 0; |
| 744 | char option_buf[256]; |
| 745 | |
| 746 | // Read option name. |
| 747 | if (sscanf(line, "%*[ \t]%255[a-zA-Z0-9]%n", option_buf, &bytes_read) == 1) { |
| 748 | line += bytes_read; |
| 749 | total_bytes_read += bytes_read; |
| 750 | int bytes_read2 = 0; |
| 751 | total_bytes_read += skip_whitespace(line); |
| 752 | enum CompileCommand option = match_option_name(option_buf, &bytes_read2, errorbuf, buf_size); |
| 753 | if (option == CompileCommand::Unknown) { |
| 754 | assert(*errorbuf != '\0', "error must have been set")do { if (!(*errorbuf != '\0')) { (*g_assert_poison) = 'X';; report_vm_error ("/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 754, "assert(" "*errorbuf != '\\0'" ") failed", "error must have been set" ); ::breakpoint(); } } while (0); |
| 755 | return; |
| 756 | } |
| 757 | enum OptionType optiontype = option2type(option); |
| 758 | if (option2type(option) != type) { |
| 759 | const char* optiontype_name = optiontype2name(optiontype); |
| 760 | const char* type_name = optiontype2name(type); |
| 761 | jio_snprintf(errorbuf, buf_size, "Option '%s' with type '%s' doesn't match supplied type '%s'", option_buf, optiontype_name, type_name); |
| 762 | return; |
| 763 | } |
| 764 | scan_value(type, line, total_bytes_read, matcher, option, errorbuf, buf_size); |
| 765 | } else { |
| 766 | const char* type_str = optiontype2name(type); |
| 767 | jio_snprintf(errorbuf, buf_size, "Option name for type '%s' should be alphanumeric ", type_str); |
| 768 | } |
| 769 | return; |
| 770 | } |
| 771 | |
| 772 | void CompilerOracle::print_parse_error(char* error_msg, char* original_line) { |
| 773 | assert(*error_msg != '\0', "Must have error_message")do { if (!(*error_msg != '\0')) { (*g_assert_poison) = 'X';; report_vm_error ("/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 773, "assert(" "*error_msg != '\\0'" ") failed", "Must have error_message" ); ::breakpoint(); } } while (0); |
| 774 | ttyLocker ttyl; |
| 775 | tty->print_cr("CompileCommand: An error occurred during parsing"); |
| 776 | tty->print_cr("Error: %s", error_msg); |
| 777 | tty->print_cr("Line: '%s'", original_line); |
| 778 | print_tip(); |
| 779 | } |
| 780 | |
| 781 | class LineCopy : StackObj { |
| 782 | const char* _copy; |
| 783 | public: |
| 784 | LineCopy(char* line) { |
| 785 | _copy = os::strdup(line, mtInternal); |
| 786 | } |
| 787 | ~LineCopy() { |
| 788 | os::free((void*)_copy); |
| 789 | } |
| 790 | char* get() { |
| 791 | return (char*)_copy; |
| 792 | } |
| 793 | }; |
| 794 | |
| 795 | void CompilerOracle::parse_from_line(char* line) { |
| 796 | if (line[0] == '\0') return; |
| 797 | if (line[0] == '#') return; |
| 798 | |
| 799 | LineCopy original(line); |
| 800 | int bytes_read; |
| 801 | char error_buf[1024] = {0}; |
| 802 | |
| 803 | enum CompileCommand option = match_option_name(line, &bytes_read, error_buf, sizeof(error_buf)); |
| 804 | line += bytes_read; |
| 805 | ResourceMark rm; |
| 806 | |
| 807 | if (option == CompileCommand::Unknown) { |
| 808 | print_parse_error(error_buf, original.get()); |
| 809 | return; |
| 810 | } |
| 811 | |
| 812 | if (option == CompileCommand::Quiet) { |
| 813 | _quiet = true; |
| 814 | return; |
| 815 | } |
| 816 | |
| 817 | if (option == CompileCommand::Help) { |
| 818 | usage(); |
| 819 | return; |
| 820 | } |
| 821 | |
| 822 | if (option == CompileCommand::Option) { |
| 823 | // Look for trailing options. |
| 824 | // |
| 825 | // Two types of trailing options are |
| 826 | // supported: |
| 827 | // |
| 828 | // (1) CompileCommand=option,Klass::method,option |
| 829 | // (2) CompileCommand=option,Klass::method,type,option,value |
| 830 | // |
| 831 | // Type (1) is used to enable a boolean option for a method. |
| 832 | // |
| 833 | // Type (2) is used to support options with a value. Values can have the |
| 834 | // the following types: intx, uintx, bool, ccstr, ccstrlist, and double. |
| 835 | |
| 836 | char option_type[256]; // stores option for Type (1) and type of Type (2) |
| 837 | skip_comma(line); |
| 838 | TypedMethodOptionMatcher* archetype = TypedMethodOptionMatcher::parse_method_pattern(line, error_buf, sizeof(error_buf)); |
| 839 | if (archetype == NULL__null) { |
| 840 | print_parse_error(error_buf, original.get()); |
| 841 | return; |
| 842 | } |
| 843 | |
| 844 | skip_whitespace(line); |
| 845 | |
| 846 | // This is unnecessarily complex. Should retire multi-option lines and skip while loop |
| 847 | while (sscanf(line, "%255[a-zA-Z0-9]%n", option_type, &bytes_read) == 1) { |
| 848 | line += bytes_read; |
| 849 | |
| 850 | // typed_matcher is used as a blueprint for each option, deleted at the end |
| 851 | TypedMethodOptionMatcher* typed_matcher = archetype->clone(); |
| 852 | enum OptionType type = parse_option_type(option_type); |
| 853 | if (type != OptionType::Unknown) { |
| 854 | // Type (2) option: parse option name and value. |
| 855 | scan_option_and_value(type, line, bytes_read, typed_matcher, error_buf, sizeof(error_buf)); |
| 856 | if (*error_buf != '\0') { |
| 857 | print_parse_error(error_buf, original.get()); |
| 858 | return; |
| 859 | } |
| 860 | line += bytes_read; |
| 861 | } else { |
| 862 | // Type (1) option - option_type contains the option name -> bool value = true is implied |
| 863 | int bytes_read; |
| 864 | enum CompileCommand option = match_option_name(option_type, &bytes_read, error_buf, sizeof(error_buf)); |
| 865 | if (option == CompileCommand::Unknown) { |
| 866 | print_parse_error(error_buf, original.get()); |
| 867 | return; |
| 868 | } |
| 869 | if (option2type(option) == OptionType::Bool) { |
| 870 | register_command(typed_matcher, option, true); |
| 871 | } else { |
| 872 | jio_snprintf(error_buf, sizeof(error_buf), " Missing type '%s' before option '%s'", |
| 873 | optiontype2name(option2type(option)), option2name(option)); |
| 874 | print_parse_error(error_buf, original.get()); |
| 875 | return; |
| 876 | } |
| 877 | } |
| 878 | assert(typed_matcher != NULL, "sanity")do { if (!(typed_matcher != __null)) { (*g_assert_poison) = 'X' ;; report_vm_error("/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 878, "assert(" "typed_matcher != __null" ") failed", "sanity" ); ::breakpoint(); } } while (0); |
| 879 | assert(*error_buf == '\0', "No error here")do { if (!(*error_buf == '\0')) { (*g_assert_poison) = 'X';; report_vm_error ("/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 879, "assert(" "*error_buf == '\\0'" ") failed", "No error here" ); ::breakpoint(); } } while (0); |
| 880 | skip_whitespace(line); |
| 881 | } // while( |
| 882 | delete archetype; |
| 883 | } else { // not an OptionCommand |
| 884 | // Command has the following form: |
| 885 | // CompileCommand=<option>,<method pattern><value> |
| 886 | // CompileCommand=<option>,<method pattern> (implies option is bool and value is true) |
| 887 | assert(*error_buf == '\0', "Don't call here with error_buf already set")do { if (!(*error_buf == '\0')) { (*g_assert_poison) = 'X';; report_vm_error ("/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 887, "assert(" "*error_buf == '\\0'" ") failed", "Don't call here with error_buf already set" ); ::breakpoint(); } } while (0); |
| 888 | enum OptionType type = option2type(option); |
| 889 | int bytes_read = 0; |
| 890 | skip_comma(line); |
| 891 | TypedMethodOptionMatcher* matcher = TypedMethodOptionMatcher::parse_method_pattern(line, error_buf, sizeof(error_buf)); |
| 892 | if (matcher == NULL__null) { |
| 893 | print_parse_error(error_buf, original.get()); |
| 894 | return; |
| 895 | } |
| 896 | skip_whitespace(line); |
| 897 | if (*line == '\0') { |
| 898 | // if this is a bool option this implies true |
| 899 | if (option2type(option) == OptionType::Bool) { |
| 900 | register_command(matcher, option, true); |
| 901 | return; |
| 902 | } else { |
| 903 | jio_snprintf(error_buf, sizeof(error_buf), " Option '%s' is not followed by a value", option2name(option)); |
| 904 | print_parse_error(error_buf, original.get()); |
| 905 | return; |
| 906 | } |
| 907 | } |
| 908 | scan_value(type, line, bytes_read, matcher, option, error_buf, sizeof(error_buf)); |
| 909 | if (*error_buf != '\0') { |
| 910 | print_parse_error(error_buf, original.get()); |
| 911 | return; |
| 912 | } |
| 913 | assert(matcher != NULL, "consistency")do { if (!(matcher != __null)) { (*g_assert_poison) = 'X';; report_vm_error ("/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 913, "assert(" "matcher != __null" ") failed", "consistency" ); ::breakpoint(); } } while (0); |
| 914 | } |
| 915 | } |
| 916 | |
| 917 | static const char* default_cc_file = ".hotspot_compiler"; |
| 918 | |
| 919 | static const char* cc_file() { |
| 920 | #ifdef ASSERT1 |
| 921 | if (CompileCommandFile == NULL__null) |
| 922 | return default_cc_file; |
| 923 | #endif |
| 924 | return CompileCommandFile; |
| 925 | } |
| 926 | |
| 927 | bool CompilerOracle::has_command_file() { |
| 928 | return cc_file() != NULL__null; |
| 929 | } |
| 930 | |
| 931 | bool CompilerOracle::_quiet = false; |
| 932 | |
| 933 | void CompilerOracle::parse_from_file() { |
| 934 | assert(has_command_file(), "command file must be specified")do { if (!(has_command_file())) { (*g_assert_poison) = 'X';; report_vm_error ("/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 934, "assert(" "has_command_file()" ") failed", "command file must be specified" ); ::breakpoint(); } } while (0); |
| 935 | FILE* stream = fopen(cc_file(), "rt"); |
| 936 | if (stream == NULL__null) return; |
| 937 | |
| 938 | char token[1024]; |
| 939 | int pos = 0; |
| 940 | int c = getc(stream)_IO_getc (stream); |
| 941 | while(c != EOF(-1) && pos < (int)(sizeof(token)-1)) { |
| 942 | if (c == '\n') { |
| 943 | token[pos++] = '\0'; |
| 944 | parse_from_line(token); |
| 945 | pos = 0; |
| 946 | } else { |
| 947 | token[pos++] = c; |
| 948 | } |
| 949 | c = getc(stream)_IO_getc (stream); |
| 950 | } |
| 951 | token[pos++] = '\0'; |
| 952 | parse_from_line(token); |
| 953 | |
| 954 | fclose(stream); |
| 955 | } |
| 956 | |
| 957 | void CompilerOracle::parse_from_string(const char* str, void (*parse_line)(char*)) { |
| 958 | char token[1024]; |
| 959 | int pos = 0; |
| 960 | const char* sp = str; |
| 961 | int c = *sp++; |
| 962 | while (c != '\0' && pos < (int)(sizeof(token)-1)) { |
| 963 | if (c == '\n') { |
| 964 | token[pos++] = '\0'; |
| 965 | parse_line(token); |
| 966 | pos = 0; |
| 967 | } else { |
| 968 | token[pos++] = c; |
| 969 | } |
| 970 | c = *sp++; |
| 971 | } |
| 972 | token[pos++] = '\0'; |
| 973 | parse_line(token); |
| 974 | } |
| 975 | |
| 976 | void compilerOracle_init() { |
| 977 | CompilerOracle::parse_from_string(CompileCommand, CompilerOracle::parse_from_line); |
| 978 | CompilerOracle::parse_from_string(CompileOnly, CompilerOracle::parse_compile_only); |
| 979 | if (CompilerOracle::has_command_file()) { |
| 980 | CompilerOracle::parse_from_file(); |
| 981 | } else { |
| 982 | struct stat buf; |
| 983 | if (os::stat(default_cc_file, &buf) == 0) { |
| 984 | warning("%s file is present but has been ignored. " |
| 985 | "Run with -XX:CompileCommandFile=%s to load the file.", |
| 986 | default_cc_file, default_cc_file); |
| 987 | } |
| 988 | } |
| 989 | if (has_command(CompileCommand::Print)) { |
| 990 | if (PrintAssembly) { |
| 991 | warning("CompileCommand and/or %s file contains 'print' commands, but PrintAssembly is also enabled", default_cc_file); |
| 992 | } |
| 993 | } |
| 994 | } |
| 995 | |
| 996 | void CompilerOracle::parse_compile_only(char* line) { |
| 997 | int i; |
| 998 | char name[1024]; |
| 999 | const char* className = NULL__null; |
| 1000 | const char* methodName = NULL__null; |
| 1001 | |
| 1002 | bool have_colon = (strstr(line, "::") != NULL__null); |
| 1003 | char method_sep = have_colon ? ':' : '.'; |
| 1004 | |
| 1005 | if (Verbose) { |
| 1006 | tty->print_cr("%s", line); |
| 1007 | } |
| 1008 | |
| 1009 | ResourceMark rm; |
| 1010 | while (*line != '\0') { |
| 1011 | MethodMatcher::Mode c_match = MethodMatcher::Exact; |
| 1012 | MethodMatcher::Mode m_match = MethodMatcher::Exact; |
| 1013 | |
| 1014 | for (i = 0; |
| 1015 | i < 1024 && *line != '\0' && *line != method_sep && *line != ',' && !isspace(*line); |
| 1016 | line++, i++) { |
| 1017 | name[i] = *line; |
| 1018 | if (name[i] == '.') name[i] = '/'; // package prefix uses '/' |
| 1019 | } |
| 1020 | |
| 1021 | if (i > 0) { |
| 1022 | char* newName = NEW_RESOURCE_ARRAY( char, i + 1)(char*) resource_allocate_bytes((i + 1) * sizeof(char)); |
| 1023 | if (newName == NULL__null) |
| 1024 | return; |
| 1025 | strncpy(newName, name, i); |
| 1026 | newName[i] = '\0'; |
| 1027 | |
| 1028 | if (className == NULL__null) { |
| 1029 | className = newName; |
| 1030 | } else { |
| 1031 | methodName = newName; |
| 1032 | } |
| 1033 | } |
| 1034 | |
| 1035 | if (*line == method_sep) { |
| 1036 | if (className == NULL__null) { |
| 1037 | className = ""; |
| 1038 | c_match = MethodMatcher::Any; |
| 1039 | } |
| 1040 | } else { |
| 1041 | // got foo or foo/bar |
| 1042 | if (className == NULL__null) { |
| 1043 | ShouldNotReachHere()do { (*g_assert_poison) = 'X';; report_should_not_reach_here( "/home/daniel/Projects/java/jdk/src/hotspot/share/compiler/compilerOracle.cpp" , 1043); ::breakpoint(); } while (0); |
| 1044 | } else { |
| 1045 | // missing class name handled as "Any" class match |
| 1046 | if (className[0] == '\0') { |
| 1047 | c_match = MethodMatcher::Any; |
| 1048 | } |
| 1049 | } |
| 1050 | } |
| 1051 | |
| 1052 | // each directive is terminated by , or NUL or . followed by NUL |
| 1053 | if (*line == ',' || *line == '\0' || (line[0] == '.' && line[1] == '\0')) { |
| 1054 | if (methodName == NULL__null) { |
| 1055 | methodName = ""; |
| 1056 | if (*line != method_sep) { |
| 1057 | m_match = MethodMatcher::Any; |
| 1058 | } |
| 1059 | } |
| 1060 | |
| 1061 | EXCEPTION_MARKExceptionMark __em; JavaThread* __the_thread__ = __em.thread( );; |
| 1062 | Symbol* c_name = SymbolTable::new_symbol(className); |
| 1063 | Symbol* m_name = SymbolTable::new_symbol(methodName); |
| 1064 | Symbol* signature = NULL__null; |
| 1065 | |
| 1066 | TypedMethodOptionMatcher* tom = new TypedMethodOptionMatcher(); |
| 1067 | tom->init_matcher(c_name, c_match, m_name, m_match, signature); |
| 1068 | register_command(tom, CompileCommand::CompileOnly, true); |
| 1069 | if (PrintVMOptions) { |
| 1070 | tty->print("CompileOnly: compileonly "); |
| 1071 | tom->print(); |
| 1072 | } |
| 1073 | |
| 1074 | className = NULL__null; |
| 1075 | methodName = NULL__null; |
| 1076 | } |
| 1077 | |
| 1078 | line = *line == '\0' ? line : line + 1; |
| 1079 | } |
| 1080 | } |
| 1081 | |
| 1082 | enum CompileCommand CompilerOracle::string_to_option(const char* name) { |
| 1083 | int bytes_read = 0; |
| 1084 | char errorbuf[1024] = {0}; |
| 1085 | return match_option_name(name, &bytes_read, errorbuf, sizeof(errorbuf)); |
| 1086 | } |