1 /*
   2  * Copyright (c) 1997, 2015, 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 #ifndef CPU_SPARC_VM_VM_VERSION_SPARC_HPP
  26 #define CPU_SPARC_VM_VM_VERSION_SPARC_HPP
  27 
  28 #include "runtime/globals_extension.hpp"
  29 #include "runtime/vm_version.hpp"
  30 
  31 class VM_Version: public Abstract_VM_Version {
  32   friend class VMStructs;
  33   friend class JVMCIVMStructs;
  34 
  35 protected:
  36   enum Feature_Flag {
  37     v8_instructions       = 0,
  38     hardware_mul32        = 1,
  39     hardware_div32        = 2,
  40     hardware_fsmuld       = 3,
  41     hardware_popc         = 4,
  42     v9_instructions       = 5,
  43     vis1_instructions     = 6,
  44     vis2_instructions     = 7,
  45     sun4v_instructions    = 8,
  46     blk_init_instructions = 9,
  47     fmaf_instructions     = 10,
  48     vis3_instructions     = 11,
  49     cbcond_instructions   = 12,
  50     sparc64_family        = 13,
  51     M_family              = 14,
  52     S_family              = 15,
  53     T_family              = 16,
  54     T1_model              = 17,
  55     sparc5_instructions   = 18,
  56     aes_instructions      = 19,
  57     sha1_instruction      = 20,
  58     sha256_instruction    = 21,
  59     sha512_instruction    = 22,
  60     crc32c_instruction    = 23
  61   };
  62 
  63   enum Feature_Flag_Set {
  64     unknown_m           = 0,
  65     all_features_m      = -1,
  66 
  67     v8_instructions_m       = 1 << v8_instructions,
  68     hardware_mul32_m        = 1 << hardware_mul32,
  69     hardware_div32_m        = 1 << hardware_div32,
  70     hardware_fsmuld_m       = 1 << hardware_fsmuld,
  71     hardware_popc_m         = 1 << hardware_popc,
  72     v9_instructions_m       = 1 << v9_instructions,
  73     vis1_instructions_m     = 1 << vis1_instructions,
  74     vis2_instructions_m     = 1 << vis2_instructions,
  75     sun4v_m                 = 1 << sun4v_instructions,
  76     blk_init_instructions_m = 1 << blk_init_instructions,
  77     fmaf_instructions_m     = 1 << fmaf_instructions,
  78     vis3_instructions_m     = 1 << vis3_instructions,
  79     cbcond_instructions_m   = 1 << cbcond_instructions,
  80     sparc64_family_m        = 1 << sparc64_family,
  81     M_family_m              = 1 << M_family,
  82     S_family_m              = 1 << S_family,
  83     T_family_m              = 1 << T_family,
  84     T1_model_m              = 1 << T1_model,
  85     sparc5_instructions_m   = 1 << sparc5_instructions,
  86     aes_instructions_m      = 1 << aes_instructions,
  87     sha1_instruction_m      = 1 << sha1_instruction,
  88     sha256_instruction_m    = 1 << sha256_instruction,
  89     sha512_instruction_m    = 1 << sha512_instruction,
  90     crc32c_instruction_m    = 1 << crc32c_instruction,
  91 
  92     generic_v8_m        = v8_instructions_m | hardware_mul32_m | hardware_div32_m | hardware_fsmuld_m,
  93     generic_v9_m        = generic_v8_m | v9_instructions_m,
  94     ultra3_m            = generic_v9_m | vis1_instructions_m | vis2_instructions_m,
  95 
  96     // Temporary until we have something more accurate
  97     niagara1_unique_m   = sun4v_m,
  98     niagara1_m          = generic_v9_m | niagara1_unique_m
  99   };
 100 
 101   static unsigned int _L2_data_cache_line_size;
 102   static unsigned int L2_data_cache_line_size() { return _L2_data_cache_line_size; }
 103 
 104   static void print_features();
 105   static int  determine_features();
 106   static int  platform_features(int features);
 107 
 108   // Returns true if the platform is in the niagara line (T series)
 109   static bool is_M_family(int features) { return (features & M_family_m) != 0; }
 110   static bool is_S_family(int features) { return (features & S_family_m) != 0; }
 111   static bool is_T_family(int features) { return (features & T_family_m) != 0; }
 112   static bool is_niagara() { return is_T_family(_features); }
 113 #ifdef ASSERT
 114   static bool is_niagara(int features)  {
 115     // 'sun4v_m' may be defined on both Sun/Oracle Sparc CPUs as well as
 116     // on Fujitsu Sparc64 CPUs, but only Sun/Oracle Sparcs can be 'niagaras'.
 117     return (features & sun4v_m) != 0 && (features & sparc64_family_m) == 0;
 118   }
 119 #endif
 120 
 121   // Returns true if it is niagara1 (T1).
 122   static bool is_T1_model(int features) { return is_T_family(features) && ((features & T1_model_m) != 0); }
 123 
 124   static int maximum_niagara1_processor_count() { return 32; }
 125   static int parse_features(const char* implementation);
 126 public:
 127   // Initialization
 128   static void initialize();
 129 
 130   static void init_before_ergo()        { _features = determine_features(); }
 131 
 132   // Instruction support
 133   static bool has_v8()                  { return (_features & v8_instructions_m) != 0; }
 134   static bool has_v9()                  { return (_features & v9_instructions_m) != 0; }
 135   static bool has_hardware_mul32()      { return (_features & hardware_mul32_m) != 0; }
 136   static bool has_hardware_div32()      { return (_features & hardware_div32_m) != 0; }
 137   static bool has_hardware_fsmuld()     { return (_features & hardware_fsmuld_m) != 0; }
 138   static bool has_hardware_popc()       { return (_features & hardware_popc_m) != 0; }
 139   static bool has_vis1()                { return (_features & vis1_instructions_m) != 0; }
 140   static bool has_vis2()                { return (_features & vis2_instructions_m) != 0; }
 141   static bool has_vis3()                { return (_features & vis3_instructions_m) != 0; }
 142   static bool has_blk_init()            { return (_features & blk_init_instructions_m) != 0; }
 143   static bool has_cbcond()              { return (_features & cbcond_instructions_m) != 0; }
 144   static bool has_sparc5_instr()        { return (_features & sparc5_instructions_m) != 0; }
 145   static bool has_aes()                 { return (_features & aes_instructions_m) != 0; }
 146   static bool has_sha1()                { return (_features & sha1_instruction_m) != 0; }
 147   static bool has_sha256()              { return (_features & sha256_instruction_m) != 0; }
 148   static bool has_sha512()              { return (_features & sha512_instruction_m) != 0; }
 149   static bool has_crc32c()              { return (_features & crc32c_instruction_m) != 0; }
 150 
 151   static bool supports_compare_and_exchange()
 152                                         { return has_v9(); }
 153 
 154   // Returns true if the platform is in the niagara line (T series)
 155   // and newer than the niagara1.
 156   static bool is_niagara_plus()         { return is_T_family(_features) && !is_T1_model(_features); }
 157 
 158   static bool is_M_series()             { return is_M_family(_features); }
 159   static bool is_S_series()             { return is_S_family(_features); }
 160   static bool is_T4()                   { return is_T_family(_features) && has_cbcond(); }
 161   static bool is_T7()                   { return is_T_family(_features) && has_sparc5_instr(); }
 162 
 163   // Fujitsu SPARC64
 164   static bool is_sparc64()              { return (_features & sparc64_family_m) != 0; }
 165 
 166   static bool is_sun4v()                { return (_features & sun4v_m) != 0; }
 167   static bool is_ultra3()               { return (_features & ultra3_m) == ultra3_m && !is_sun4v() && !is_sparc64(); }
 168 
 169   static bool has_fast_fxtof()          { return is_niagara() || is_sparc64() || has_v9() && !is_ultra3(); }
 170   static bool has_fast_idiv()           { return is_niagara_plus() || is_sparc64(); }
 171 
 172   // T4 and newer Sparc have fast RDPC instruction.
 173   static bool has_fast_rdpc()           { return is_T4(); }
 174 
 175   // On T4 and newer Sparc BIS to the beginning of cache line always zeros it.
 176   static bool has_block_zeroing()       { return has_blk_init() && is_T4(); }
 177 
 178   // default prefetch block size on sparc
 179   static intx prefetch_data_size()      { return L2_data_cache_line_size();  }
 180 
 181   // Prefetch
 182   static intx prefetch_copy_interval_in_bytes() {
 183     intx interval = PrefetchCopyIntervalInBytes;
 184     return interval >= 0 ? interval : (has_v9() ? 512 : 0);
 185   }
 186   static intx prefetch_scan_interval_in_bytes() {
 187     intx interval = PrefetchScanIntervalInBytes;
 188     return interval >= 0 ? interval : (has_v9() ? 512 : 0);
 189   }
 190   static intx prefetch_fields_ahead() {
 191     intx count = PrefetchFieldsAhead;
 192     return count >= 0 ? count : (is_ultra3() ? 1 : 0);
 193   }
 194 
 195   static intx allocate_prefetch_distance() {
 196     // This method should be called before allocate_prefetch_style().
 197     intx count = AllocatePrefetchDistance;
 198     if (count < 0) { // default is not defined ?
 199       count = 512;
 200     }
 201     return count;
 202   }
 203   static intx allocate_prefetch_style() {
 204     assert(AllocatePrefetchStyle >= 0, "AllocatePrefetchStyle should be positive");
 205     // Return 0 if AllocatePrefetchDistance was not defined.
 206     return AllocatePrefetchDistance > 0 ? AllocatePrefetchStyle : 0;
 207   }
 208 
 209   // Assembler testing
 210   static void allow_all();
 211   static void revert();
 212 
 213   // Override the Abstract_VM_Version implementation.
 214   static uint page_size_count() { return is_sun4v() ? 4 : 2; }
 215 
 216   // Calculates the number of parallel threads
 217   static unsigned int calc_parallel_worker_threads();
 218 };
 219 
 220 #endif // CPU_SPARC_VM_VM_VERSION_SPARC_HPP