src/cpu/sparc/vm/vm_version_sparc.cpp

Wed, 15 May 2013 11:05:09 +0200

author
tschatzl
date
Wed, 15 May 2013 11:05:09 +0200
changeset 5119
12f651e29f6b
parent 4430
4a916f2ce331
child 5283
46c544b8fbfc
permissions
-rw-r--r--

6843347: Boundary values in some public GC options cause crashes
Summary: Setting some public integer options to specific values causes crashes or undefined GC behavior. This patchset adds the necessary argument checking for these options.
Reviewed-by: jmasa, brutisso

duke@435 1 /*
kvn@3882 2 * Copyright (c) 1997, 2012, Oracle and/or its affiliates. All rights reserved.
duke@435 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
duke@435 4 *
duke@435 5 * This code is free software; you can redistribute it and/or modify it
duke@435 6 * under the terms of the GNU General Public License version 2 only, as
duke@435 7 * published by the Free Software Foundation.
duke@435 8 *
duke@435 9 * This code is distributed in the hope that it will be useful, but WITHOUT
duke@435 10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
duke@435 11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
duke@435 12 * version 2 for more details (a copy is included in the LICENSE file that
duke@435 13 * accompanied this code).
duke@435 14 *
duke@435 15 * You should have received a copy of the GNU General Public License version
duke@435 16 * 2 along with this work; if not, write to the Free Software Foundation,
duke@435 17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
duke@435 18 *
trims@1907 19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
trims@1907 20 * or visit www.oracle.com if you need additional information or have any
trims@1907 21 * questions.
duke@435 22 *
duke@435 23 */
duke@435 24
stefank@2314 25 #include "precompiled.hpp"
twisti@4323 26 #include "asm/macroAssembler.inline.hpp"
stefank@2314 27 #include "memory/resourceArea.hpp"
stefank@2314 28 #include "runtime/java.hpp"
stefank@2314 29 #include "runtime/stubCodeGenerator.hpp"
stefank@2314 30 #include "vm_version_sparc.hpp"
stefank@2314 31 #ifdef TARGET_OS_FAMILY_linux
stefank@2314 32 # include "os_linux.inline.hpp"
stefank@2314 33 #endif
stefank@2314 34 #ifdef TARGET_OS_FAMILY_solaris
stefank@2314 35 # include "os_solaris.inline.hpp"
stefank@2314 36 #endif
duke@435 37
duke@435 38 int VM_Version::_features = VM_Version::unknown_m;
duke@435 39 const char* VM_Version::_features_str = "";
duke@435 40
duke@435 41 void VM_Version::initialize() {
duke@435 42 _features = determine_features();
duke@435 43 PrefetchCopyIntervalInBytes = prefetch_copy_interval_in_bytes();
duke@435 44 PrefetchScanIntervalInBytes = prefetch_scan_interval_in_bytes();
duke@435 45 PrefetchFieldsAhead = prefetch_fields_ahead();
duke@435 46
kvn@3052 47 assert(0 <= AllocatePrefetchInstr && AllocatePrefetchInstr <= 1, "invalid value");
kvn@3052 48 if( AllocatePrefetchInstr < 0 ) AllocatePrefetchInstr = 0;
kvn@3052 49 if( AllocatePrefetchInstr > 1 ) AllocatePrefetchInstr = 0;
kvn@3052 50
duke@435 51 // Allocation prefetch settings
kvn@3052 52 intx cache_line_size = prefetch_data_size();
duke@435 53 if( cache_line_size > AllocatePrefetchStepSize )
duke@435 54 AllocatePrefetchStepSize = cache_line_size;
kvn@3052 55
kvn@3052 56 assert(AllocatePrefetchLines > 0, "invalid value");
kvn@3052 57 if( AllocatePrefetchLines < 1 ) // set valid value in product VM
kvn@3052 58 AllocatePrefetchLines = 3;
kvn@3052 59 assert(AllocateInstancePrefetchLines > 0, "invalid value");
kvn@3052 60 if( AllocateInstancePrefetchLines < 1 ) // set valid value in product VM
kvn@3052 61 AllocateInstancePrefetchLines = 1;
duke@435 62
duke@435 63 AllocatePrefetchDistance = allocate_prefetch_distance();
duke@435 64 AllocatePrefetchStyle = allocate_prefetch_style();
duke@435 65
kvn@3052 66 assert((AllocatePrefetchDistance % AllocatePrefetchStepSize) == 0 &&
kvn@3052 67 (AllocatePrefetchDistance > 0), "invalid value");
kvn@3052 68 if ((AllocatePrefetchDistance % AllocatePrefetchStepSize) != 0 ||
kvn@3052 69 (AllocatePrefetchDistance <= 0)) {
kvn@3052 70 AllocatePrefetchDistance = AllocatePrefetchStepSize;
kvn@3052 71 }
duke@435 72
kvn@3037 73 if (AllocatePrefetchStyle == 3 && !has_blk_init()) {
kvn@3037 74 warning("BIS instructions are not available on this CPU");
kvn@3037 75 FLAG_SET_DEFAULT(AllocatePrefetchStyle, 1);
kvn@3037 76 }
kvn@3037 77
kvn@3103 78 if (has_v9()) {
kvn@3103 79 assert(ArraycopySrcPrefetchDistance < 4096, "invalid value");
kvn@3103 80 if (ArraycopySrcPrefetchDistance >= 4096)
kvn@3103 81 ArraycopySrcPrefetchDistance = 4064;
kvn@3103 82 assert(ArraycopyDstPrefetchDistance < 4096, "invalid value");
kvn@3103 83 if (ArraycopyDstPrefetchDistance >= 4096)
kvn@3103 84 ArraycopyDstPrefetchDistance = 4064;
kvn@3103 85 } else {
kvn@3103 86 if (ArraycopySrcPrefetchDistance > 0) {
kvn@3103 87 warning("prefetch instructions are not available on this CPU");
kvn@3103 88 FLAG_SET_DEFAULT(ArraycopySrcPrefetchDistance, 0);
kvn@3103 89 }
kvn@3103 90 if (ArraycopyDstPrefetchDistance > 0) {
kvn@3103 91 warning("prefetch instructions are not available on this CPU");
kvn@3103 92 FLAG_SET_DEFAULT(ArraycopyDstPrefetchDistance, 0);
kvn@3103 93 }
kvn@3103 94 }
kvn@3103 95
duke@435 96 UseSSE = 0; // Only on x86 and x64
duke@435 97
kvn@3052 98 _supports_cx8 = has_v9();
roland@4106 99 _supports_atomic_getset4 = true; // swap instruction
duke@435 100
kvn@2403 101 if (is_niagara()) {
duke@435 102 // Indirect branch is the same cost as direct
duke@435 103 if (FLAG_IS_DEFAULT(UseInlineCaches)) {
kvn@1110 104 FLAG_SET_DEFAULT(UseInlineCaches, false);
duke@435 105 }
kvn@2403 106 // Align loops on a single instruction boundary.
kvn@2403 107 if (FLAG_IS_DEFAULT(OptoLoopAlignment)) {
kvn@2403 108 FLAG_SET_DEFAULT(OptoLoopAlignment, 4);
kvn@2403 109 }
johnc@3997 110 // When using CMS or G1, we cannot use memset() in BOT updates
johnc@3997 111 // because the sun4v/CMT version in libc_psr uses BIS which
johnc@3997 112 // exposes "phantom zeros" to concurrent readers. See 6948537.
johnc@3997 113 if (FLAG_IS_DEFAULT(UseMemSetInBOT) && (UseConcMarkSweepGC || UseG1GC)) {
kvn@2403 114 FLAG_SET_DEFAULT(UseMemSetInBOT, false);
kvn@2403 115 }
coleenp@548 116 #ifdef _LP64
kvn@1077 117 // 32-bit oops don't make sense for the 64-bit VM on sparc
kvn@1077 118 // since the 32-bit VM has the same registers and smaller objects.
kvn@1077 119 Universe::set_narrow_oop_shift(LogMinObjAlignmentInBytes);
roland@4159 120 Universe::set_narrow_klass_shift(LogKlassAlignmentInBytes);
coleenp@548 121 #endif // _LP64
duke@435 122 #ifdef COMPILER2
duke@435 123 // Indirect branch is the same cost as direct
duke@435 124 if (FLAG_IS_DEFAULT(UseJumpTables)) {
kvn@1110 125 FLAG_SET_DEFAULT(UseJumpTables, true);
duke@435 126 }
duke@435 127 // Single-issue, so entry and loop tops are
duke@435 128 // aligned on a single instruction boundary
duke@435 129 if (FLAG_IS_DEFAULT(InteriorEntryAlignment)) {
kvn@1110 130 FLAG_SET_DEFAULT(InteriorEntryAlignment, 4);
duke@435 131 }
kvn@2403 132 if (is_niagara_plus()) {
kvn@3052 133 if (has_blk_init() && UseTLAB &&
kvn@3052 134 FLAG_IS_DEFAULT(AllocatePrefetchInstr)) {
kvn@3052 135 // Use BIS instruction for TLAB allocation prefetch.
kvn@3052 136 FLAG_SET_ERGO(intx, AllocatePrefetchInstr, 1);
kvn@3052 137 if (FLAG_IS_DEFAULT(AllocatePrefetchStyle)) {
kvn@3052 138 FLAG_SET_ERGO(intx, AllocatePrefetchStyle, 3);
kvn@3052 139 }
kvn@1802 140 if (FLAG_IS_DEFAULT(AllocatePrefetchDistance)) {
kvn@3052 141 // Use smaller prefetch distance with BIS
kvn@1802 142 FLAG_SET_DEFAULT(AllocatePrefetchDistance, 64);
kvn@1802 143 }
kvn@1802 144 }
kvn@3052 145 if (is_T4()) {
kvn@3052 146 // Double number of prefetched cache lines on T4
kvn@3052 147 // since L2 cache line size is smaller (32 bytes).
kvn@3052 148 if (FLAG_IS_DEFAULT(AllocatePrefetchLines)) {
kvn@3052 149 FLAG_SET_ERGO(intx, AllocatePrefetchLines, AllocatePrefetchLines*2);
kvn@3052 150 }
kvn@3052 151 if (FLAG_IS_DEFAULT(AllocateInstancePrefetchLines)) {
kvn@3052 152 FLAG_SET_ERGO(intx, AllocateInstancePrefetchLines, AllocateInstancePrefetchLines*2);
kvn@3052 153 }
kvn@3052 154 }
kvn@1802 155 if (AllocatePrefetchStyle != 3 && FLAG_IS_DEFAULT(AllocatePrefetchDistance)) {
kvn@1802 156 // Use different prefetch distance without BIS
kvn@1802 157 FLAG_SET_DEFAULT(AllocatePrefetchDistance, 256);
kvn@1802 158 }
kvn@3052 159 if (AllocatePrefetchInstr == 1) {
kvn@3052 160 // Need a space at the end of TLAB for BIS since it
kvn@3052 161 // will fault when accessing memory outside of heap.
kvn@3052 162
kvn@3052 163 // +1 for rounding up to next cache line, +1 to be safe
kvn@3052 164 int lines = AllocatePrefetchLines + 2;
kvn@3052 165 int step_size = AllocatePrefetchStepSize;
kvn@3052 166 int distance = AllocatePrefetchDistance;
kvn@3052 167 _reserve_for_allocation_prefetch = (distance + step_size*lines)/(int)HeapWordSize;
kvn@3052 168 }
duke@435 169 }
duke@435 170 #endif
duke@435 171 }
duke@435 172
twisti@1078 173 // Use hardware population count instruction if available.
twisti@1078 174 if (has_hardware_popc()) {
twisti@1078 175 if (FLAG_IS_DEFAULT(UsePopCountInstruction)) {
kvn@1110 176 FLAG_SET_DEFAULT(UsePopCountInstruction, true);
twisti@1078 177 }
kvn@3037 178 } else if (UsePopCountInstruction) {
kvn@3037 179 warning("POPC instruction is not available on this CPU");
kvn@3037 180 FLAG_SET_DEFAULT(UsePopCountInstruction, false);
kvn@3037 181 }
kvn@3037 182
kvn@3037 183 // T4 and newer Sparc cpus have new compare and branch instruction.
kvn@3037 184 if (has_cbcond()) {
kvn@3037 185 if (FLAG_IS_DEFAULT(UseCBCond)) {
kvn@3037 186 FLAG_SET_DEFAULT(UseCBCond, true);
kvn@3037 187 }
kvn@3037 188 } else if (UseCBCond) {
kvn@3037 189 warning("CBCOND instruction is not available on this CPU");
kvn@3037 190 FLAG_SET_DEFAULT(UseCBCond, false);
twisti@1078 191 }
twisti@1078 192
kvn@3092 193 assert(BlockZeroingLowLimit > 0, "invalid value");
kvn@3092 194 if (has_block_zeroing()) {
kvn@3092 195 if (FLAG_IS_DEFAULT(UseBlockZeroing)) {
kvn@3092 196 FLAG_SET_DEFAULT(UseBlockZeroing, true);
kvn@3092 197 }
kvn@3092 198 } else if (UseBlockZeroing) {
kvn@3092 199 warning("BIS zeroing instructions are not available on this CPU");
kvn@3092 200 FLAG_SET_DEFAULT(UseBlockZeroing, false);
kvn@3092 201 }
kvn@3092 202
kvn@3103 203 assert(BlockCopyLowLimit > 0, "invalid value");
kvn@3103 204 if (has_block_zeroing()) { // has_blk_init() && is_T4(): core's local L2 cache
kvn@3103 205 if (FLAG_IS_DEFAULT(UseBlockCopy)) {
kvn@3103 206 FLAG_SET_DEFAULT(UseBlockCopy, true);
kvn@3103 207 }
kvn@3103 208 } else if (UseBlockCopy) {
kvn@3103 209 warning("BIS instructions are not available or expensive on this CPU");
kvn@3103 210 FLAG_SET_DEFAULT(UseBlockCopy, false);
kvn@3103 211 }
kvn@3103 212
never@2085 213 #ifdef COMPILER2
kvn@3037 214 // T4 and newer Sparc cpus have fast RDPC.
kvn@3037 215 if (has_fast_rdpc() && FLAG_IS_DEFAULT(UseRDPCForConstantTableBase)) {
twisti@3249 216 FLAG_SET_DEFAULT(UseRDPCForConstantTableBase, true);
kvn@3037 217 }
kvn@3037 218
never@2085 219 // Currently not supported anywhere.
never@2085 220 FLAG_SET_DEFAULT(UseFPUForSpilling, false);
kvn@3049 221
kvn@3882 222 MaxVectorSize = 8;
kvn@3882 223
kvn@3049 224 assert((InteriorEntryAlignment % relocInfo::addr_unit()) == 0, "alignment is not a multiple of NOP size");
never@2085 225 #endif
never@2085 226
kvn@3049 227 assert((CodeEntryAlignment % relocInfo::addr_unit()) == 0, "alignment is not a multiple of NOP size");
kvn@3049 228 assert((OptoLoopAlignment % relocInfo::addr_unit()) == 0, "alignment is not a multiple of NOP size");
kvn@3049 229
duke@435 230 char buf[512];
kvn@3037 231 jio_snprintf(buf, sizeof(buf), "%s%s%s%s%s%s%s%s%s%s%s%s%s%s",
kvn@3037 232 (has_v9() ? ", v9" : (has_v8() ? ", v8" : "")),
twisti@1078 233 (has_hardware_popc() ? ", popc" : ""),
kvn@3037 234 (has_vis1() ? ", vis1" : ""),
kvn@3037 235 (has_vis2() ? ", vis2" : ""),
kvn@3037 236 (has_vis3() ? ", vis3" : ""),
kvn@3037 237 (has_blk_init() ? ", blk_init" : ""),
kvn@3037 238 (has_cbcond() ? ", cbcond" : ""),
kvn@3037 239 (is_ultra3() ? ", ultra3" : ""),
kvn@3037 240 (is_sun4v() ? ", sun4v" : ""),
kvn@3037 241 (is_niagara_plus() ? ", niagara_plus" : (is_niagara() ? ", niagara" : "")),
kvn@3037 242 (is_sparc64() ? ", sparc64" : ""),
twisti@1076 243 (!has_hardware_mul32() ? ", no-mul32" : ""),
twisti@1076 244 (!has_hardware_div32() ? ", no-div32" : ""),
duke@435 245 (!has_hardware_fsmuld() ? ", no-fsmuld" : ""));
duke@435 246
duke@435 247 // buf is started with ", " or is empty
duke@435 248 _features_str = strdup(strlen(buf) > 2 ? buf + 2 : buf);
duke@435 249
kvn@3001 250 // UseVIS is set to the smallest of what hardware supports and what
kvn@3001 251 // the command line requires. I.e., you cannot set UseVIS to 3 on
kvn@3001 252 // older UltraSparc which do not support it.
kvn@3001 253 if (UseVIS > 3) UseVIS=3;
kvn@3001 254 if (UseVIS < 0) UseVIS=0;
kvn@3001 255 if (!has_vis3()) // Drop to 2 if no VIS3 support
kvn@3001 256 UseVIS = MIN2((intx)2,UseVIS);
kvn@3001 257 if (!has_vis2()) // Drop to 1 if no VIS2 support
kvn@3001 258 UseVIS = MIN2((intx)1,UseVIS);
kvn@3001 259 if (!has_vis1()) // Drop to 0 if no VIS1 support
kvn@3001 260 UseVIS = 0;
kvn@3001 261
jwilhelm@4430 262 if (FLAG_IS_DEFAULT(ContendedPaddingWidth) &&
jwilhelm@4430 263 (cache_line_size > ContendedPaddingWidth))
jwilhelm@4430 264 ContendedPaddingWidth = cache_line_size;
jwilhelm@4430 265
duke@435 266 #ifndef PRODUCT
duke@435 267 if (PrintMiscellaneous && Verbose) {
kvn@3052 268 tty->print("Allocation");
duke@435 269 if (AllocatePrefetchStyle <= 0) {
kvn@3052 270 tty->print_cr(": no prefetching");
duke@435 271 } else {
kvn@3052 272 tty->print(" prefetching: ");
kvn@3052 273 if (AllocatePrefetchInstr == 0) {
kvn@3052 274 tty->print("PREFETCH");
kvn@3052 275 } else if (AllocatePrefetchInstr == 1) {
kvn@3052 276 tty->print("BIS");
kvn@3052 277 }
duke@435 278 if (AllocatePrefetchLines > 1) {
kvn@3052 279 tty->print_cr(" at distance %d, %d lines of %d bytes", AllocatePrefetchDistance, AllocatePrefetchLines, AllocatePrefetchStepSize);
duke@435 280 } else {
kvn@3052 281 tty->print_cr(" at distance %d, one line of %d bytes", AllocatePrefetchDistance, AllocatePrefetchStepSize);
duke@435 282 }
duke@435 283 }
duke@435 284 if (PrefetchCopyIntervalInBytes > 0) {
duke@435 285 tty->print_cr("PrefetchCopyIntervalInBytes %d", PrefetchCopyIntervalInBytes);
duke@435 286 }
duke@435 287 if (PrefetchScanIntervalInBytes > 0) {
duke@435 288 tty->print_cr("PrefetchScanIntervalInBytes %d", PrefetchScanIntervalInBytes);
duke@435 289 }
duke@435 290 if (PrefetchFieldsAhead > 0) {
duke@435 291 tty->print_cr("PrefetchFieldsAhead %d", PrefetchFieldsAhead);
duke@435 292 }
jwilhelm@4430 293 if (ContendedPaddingWidth > 0) {
jwilhelm@4430 294 tty->print_cr("ContendedPaddingWidth %d", ContendedPaddingWidth);
jwilhelm@4430 295 }
duke@435 296 }
duke@435 297 #endif // PRODUCT
duke@435 298 }
duke@435 299
duke@435 300 void VM_Version::print_features() {
duke@435 301 tty->print_cr("Version:%s", cpu_features());
duke@435 302 }
duke@435 303
duke@435 304 int VM_Version::determine_features() {
duke@435 305 if (UseV8InstrsOnly) {
duke@435 306 NOT_PRODUCT(if (PrintMiscellaneous && Verbose) tty->print_cr("Version is Forced-V8");)
duke@435 307 return generic_v8_m;
duke@435 308 }
duke@435 309
duke@435 310 int features = platform_features(unknown_m); // platform_features() is os_arch specific
duke@435 311
duke@435 312 if (features == unknown_m) {
duke@435 313 features = generic_v9_m;
duke@435 314 warning("Cannot recognize SPARC version. Default to V9");
duke@435 315 }
duke@435 316
kvn@2403 317 assert(is_T_family(features) == is_niagara(features), "Niagara should be T series");
kvn@2403 318 if (UseNiagaraInstrs) { // Force code generation for Niagara
kvn@2403 319 if (is_T_family(features)) {
duke@435 320 // Happy to accomodate...
duke@435 321 } else {
duke@435 322 NOT_PRODUCT(if (PrintMiscellaneous && Verbose) tty->print_cr("Version is Forced-Niagara");)
kvn@2403 323 features |= T_family_m;
duke@435 324 }
duke@435 325 } else {
kvn@2403 326 if (is_T_family(features) && !FLAG_IS_DEFAULT(UseNiagaraInstrs)) {
duke@435 327 NOT_PRODUCT(if (PrintMiscellaneous && Verbose) tty->print_cr("Version is Forced-Not-Niagara");)
kvn@2403 328 features &= ~(T_family_m | T1_model_m);
duke@435 329 } else {
duke@435 330 // Happy to accomodate...
duke@435 331 }
duke@435 332 }
duke@435 333
duke@435 334 return features;
duke@435 335 }
duke@435 336
duke@435 337 static int saved_features = 0;
duke@435 338
duke@435 339 void VM_Version::allow_all() {
duke@435 340 saved_features = _features;
duke@435 341 _features = all_features_m;
duke@435 342 }
duke@435 343
duke@435 344 void VM_Version::revert() {
duke@435 345 _features = saved_features;
duke@435 346 }
jmasa@445 347
jmasa@445 348 unsigned int VM_Version::calc_parallel_worker_threads() {
jmasa@445 349 unsigned int result;
twisti@4108 350 if (is_M_series()) {
twisti@4108 351 // for now, use same gc thread calculation for M-series as for niagara-plus
twisti@4108 352 // in future, we may want to tweak parameters for nof_parallel_worker_thread
twisti@4108 353 result = nof_parallel_worker_threads(5, 16, 8);
twisti@4108 354 } else if (is_niagara_plus()) {
jmasa@445 355 result = nof_parallel_worker_threads(5, 16, 8);
jmasa@445 356 } else {
jmasa@445 357 result = nof_parallel_worker_threads(5, 8, 8);
jmasa@445 358 }
jmasa@445 359 return result;
jmasa@445 360 }

mercurial