hotspot/src/cpu/sparc/vm/register_sparc.hpp
changeset 1 489c9b5090e2
child 5547 f4b087cbb361
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/hotspot/src/cpu/sparc/vm/register_sparc.hpp	Sat Dec 01 00:00:00 2007 +0000
@@ -0,0 +1,442 @@
+/*
+ * Copyright 2000-2007 Sun Microsystems, Inc.  All Rights Reserved.
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * This code is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License version 2 only, as
+ * published by the Free Software Foundation.
+ *
+ * This code is distributed in the hope that it will be useful, but WITHOUT
+ * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+ * version 2 for more details (a copy is included in the LICENSE file that
+ * accompanied this code).
+ *
+ * You should have received a copy of the GNU General Public License version
+ * 2 along with this work; if not, write to the Free Software Foundation,
+ * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
+ *
+ * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
+ * CA 95054 USA or visit www.sun.com if you need additional information or
+ * have any questions.
+ *
+ */
+
+// forward declaration
+class Address;
+class VMRegImpl;
+typedef VMRegImpl* VMReg;
+
+
+// Use Register as shortcut
+class RegisterImpl;
+typedef RegisterImpl* Register;
+
+
+inline Register as_Register(int encoding) {
+  return (Register)(intptr_t) encoding;
+}
+
+// The implementation of integer registers for the SPARC architecture
+class RegisterImpl: public AbstractRegisterImpl {
+ public:
+  enum {
+    log_set_size        = 3,                          // the number of bits to encode the set register number
+    number_of_sets      = 4,                          // the number of registers sets (in, local, out, global)
+    number_of_registers = number_of_sets << log_set_size,
+
+    iset_no = 3,  ibase = iset_no << log_set_size,    // the in     register set
+    lset_no = 2,  lbase = lset_no << log_set_size,    // the local  register set
+    oset_no = 1,  obase = oset_no << log_set_size,    // the output register set
+    gset_no = 0,  gbase = gset_no << log_set_size     // the global register set
+  };
+
+
+  friend Register as_Register(int encoding);
+  // set specific construction
+  friend Register as_iRegister(int number);
+  friend Register as_lRegister(int number);
+  friend Register as_oRegister(int number);
+  friend Register as_gRegister(int number);
+
+  VMReg as_VMReg();
+
+  // accessors
+  int   encoding() const                              { assert(is_valid(), "invalid register"); return value(); }
+  const char* name() const;
+
+  // testers
+  bool is_valid() const                               { return (0 <= (value()&0x7F) && (value()&0x7F) < number_of_registers); }
+  bool is_even() const                                { return (encoding() & 1) == 0; }
+  bool is_in() const                                  { return (encoding() >> log_set_size) == iset_no; }
+  bool is_local() const                               { return (encoding() >> log_set_size) == lset_no; }
+  bool is_out() const                                 { return (encoding() >> log_set_size) == oset_no; }
+  bool is_global() const                              { return (encoding() >> log_set_size) == gset_no; }
+
+  // derived registers, offsets, and addresses
+  Register successor() const                          { return as_Register(encoding() + 1); }
+
+  int input_number() const {
+    assert(is_in(), "must be input register");
+    return encoding() - ibase;
+  }
+
+  Register after_save() const {
+    assert(is_out() || is_global(), "register not visible after save");
+    return is_out() ? as_Register(encoding() + (ibase - obase)) : (const Register)this;
+  }
+
+  Register after_restore() const {
+    assert(is_in() || is_global(), "register not visible after restore");
+    return is_in() ? as_Register(encoding() + (obase - ibase)) : (const Register)this;
+  }
+
+  int sp_offset_in_saved_window() const {
+    assert(is_in() || is_local(), "only i and l registers are saved in frame");
+    return encoding() - lbase;
+  }
+
+  inline Address address_in_saved_window() const;     // implemented in assembler_sparc.hpp
+};
+
+
+// set specific construction
+inline Register as_iRegister(int number)            { return as_Register(RegisterImpl::ibase + number); }
+inline Register as_lRegister(int number)            { return as_Register(RegisterImpl::lbase + number); }
+inline Register as_oRegister(int number)            { return as_Register(RegisterImpl::obase + number); }
+inline Register as_gRegister(int number)            { return as_Register(RegisterImpl::gbase + number); }
+
+// The integer registers of the SPARC architecture
+
+CONSTANT_REGISTER_DECLARATION(Register, noreg , (-1));
+
+CONSTANT_REGISTER_DECLARATION(Register, G0    , (RegisterImpl::gbase + 0));
+CONSTANT_REGISTER_DECLARATION(Register, G1    , (RegisterImpl::gbase + 1));
+CONSTANT_REGISTER_DECLARATION(Register, G2    , (RegisterImpl::gbase + 2));
+CONSTANT_REGISTER_DECLARATION(Register, G3    , (RegisterImpl::gbase + 3));
+CONSTANT_REGISTER_DECLARATION(Register, G4    , (RegisterImpl::gbase + 4));
+CONSTANT_REGISTER_DECLARATION(Register, G5    , (RegisterImpl::gbase + 5));
+CONSTANT_REGISTER_DECLARATION(Register, G6    , (RegisterImpl::gbase + 6));
+CONSTANT_REGISTER_DECLARATION(Register, G7    , (RegisterImpl::gbase + 7));
+
+CONSTANT_REGISTER_DECLARATION(Register, O0    , (RegisterImpl::obase + 0));
+CONSTANT_REGISTER_DECLARATION(Register, O1    , (RegisterImpl::obase + 1));
+CONSTANT_REGISTER_DECLARATION(Register, O2    , (RegisterImpl::obase + 2));
+CONSTANT_REGISTER_DECLARATION(Register, O3    , (RegisterImpl::obase + 3));
+CONSTANT_REGISTER_DECLARATION(Register, O4    , (RegisterImpl::obase + 4));
+CONSTANT_REGISTER_DECLARATION(Register, O5    , (RegisterImpl::obase + 5));
+CONSTANT_REGISTER_DECLARATION(Register, O6    , (RegisterImpl::obase + 6));
+CONSTANT_REGISTER_DECLARATION(Register, O7    , (RegisterImpl::obase + 7));
+
+CONSTANT_REGISTER_DECLARATION(Register, L0    , (RegisterImpl::lbase + 0));
+CONSTANT_REGISTER_DECLARATION(Register, L1    , (RegisterImpl::lbase + 1));
+CONSTANT_REGISTER_DECLARATION(Register, L2    , (RegisterImpl::lbase + 2));
+CONSTANT_REGISTER_DECLARATION(Register, L3    , (RegisterImpl::lbase + 3));
+CONSTANT_REGISTER_DECLARATION(Register, L4    , (RegisterImpl::lbase + 4));
+CONSTANT_REGISTER_DECLARATION(Register, L5    , (RegisterImpl::lbase + 5));
+CONSTANT_REGISTER_DECLARATION(Register, L6    , (RegisterImpl::lbase + 6));
+CONSTANT_REGISTER_DECLARATION(Register, L7    , (RegisterImpl::lbase + 7));
+
+CONSTANT_REGISTER_DECLARATION(Register, I0    , (RegisterImpl::ibase + 0));
+CONSTANT_REGISTER_DECLARATION(Register, I1    , (RegisterImpl::ibase + 1));
+CONSTANT_REGISTER_DECLARATION(Register, I2    , (RegisterImpl::ibase + 2));
+CONSTANT_REGISTER_DECLARATION(Register, I3    , (RegisterImpl::ibase + 3));
+CONSTANT_REGISTER_DECLARATION(Register, I4    , (RegisterImpl::ibase + 4));
+CONSTANT_REGISTER_DECLARATION(Register, I5    , (RegisterImpl::ibase + 5));
+CONSTANT_REGISTER_DECLARATION(Register, I6    , (RegisterImpl::ibase + 6));
+CONSTANT_REGISTER_DECLARATION(Register, I7    , (RegisterImpl::ibase + 7));
+
+CONSTANT_REGISTER_DECLARATION(Register, FP    , (RegisterImpl::ibase + 6));
+CONSTANT_REGISTER_DECLARATION(Register, SP    , (RegisterImpl::obase + 6));
+
+//
+// Because sparc has so many registers, #define'ing values for the is
+// beneficial in code size and the cost of some of the dangers of
+// defines.  We don't use them on Intel because win32 uses asm
+// directives which use the same names for registers as Hotspot does,
+// so #defines would screw up the inline assembly.  If a particular
+// file has a problem with these defines then it's possible to turn
+// them off in that file by defining DONT_USE_REGISTER_DEFINES.
+// register_definition_sparc.cpp does that so that it's able to
+// provide real definitions of these registers for use in debuggers
+// and such.
+//
+
+#ifndef DONT_USE_REGISTER_DEFINES
+#define noreg ((Register)(noreg_RegisterEnumValue))
+
+#define G0 ((Register)(G0_RegisterEnumValue))
+#define G1 ((Register)(G1_RegisterEnumValue))
+#define G2 ((Register)(G2_RegisterEnumValue))
+#define G3 ((Register)(G3_RegisterEnumValue))
+#define G4 ((Register)(G4_RegisterEnumValue))
+#define G5 ((Register)(G5_RegisterEnumValue))
+#define G6 ((Register)(G6_RegisterEnumValue))
+#define G7 ((Register)(G7_RegisterEnumValue))
+
+#define O0 ((Register)(O0_RegisterEnumValue))
+#define O1 ((Register)(O1_RegisterEnumValue))
+#define O2 ((Register)(O2_RegisterEnumValue))
+#define O3 ((Register)(O3_RegisterEnumValue))
+#define O4 ((Register)(O4_RegisterEnumValue))
+#define O5 ((Register)(O5_RegisterEnumValue))
+#define O6 ((Register)(O6_RegisterEnumValue))
+#define O7 ((Register)(O7_RegisterEnumValue))
+
+#define L0 ((Register)(L0_RegisterEnumValue))
+#define L1 ((Register)(L1_RegisterEnumValue))
+#define L2 ((Register)(L2_RegisterEnumValue))
+#define L3 ((Register)(L3_RegisterEnumValue))
+#define L4 ((Register)(L4_RegisterEnumValue))
+#define L5 ((Register)(L5_RegisterEnumValue))
+#define L6 ((Register)(L6_RegisterEnumValue))
+#define L7 ((Register)(L7_RegisterEnumValue))
+
+#define I0 ((Register)(I0_RegisterEnumValue))
+#define I1 ((Register)(I1_RegisterEnumValue))
+#define I2 ((Register)(I2_RegisterEnumValue))
+#define I3 ((Register)(I3_RegisterEnumValue))
+#define I4 ((Register)(I4_RegisterEnumValue))
+#define I5 ((Register)(I5_RegisterEnumValue))
+#define I6 ((Register)(I6_RegisterEnumValue))
+#define I7 ((Register)(I7_RegisterEnumValue))
+
+#define FP ((Register)(FP_RegisterEnumValue))
+#define SP ((Register)(SP_RegisterEnumValue))
+#endif // DONT_USE_REGISTER_DEFINES
+
+// Use FloatRegister as shortcut
+class FloatRegisterImpl;
+typedef FloatRegisterImpl* FloatRegister;
+
+
+// construction
+inline FloatRegister as_FloatRegister(int encoding) {
+  return (FloatRegister)(intptr_t)encoding;
+}
+
+// The implementation of float registers for the SPARC architecture
+
+class FloatRegisterImpl: public AbstractRegisterImpl {
+ public:
+  enum {
+    number_of_registers = 64
+  };
+
+  enum Width {
+    S = 1,  D = 2,  Q = 3
+  };
+
+  // construction
+  VMReg as_VMReg( );
+
+  // accessors
+  int encoding() const                                { assert(is_valid(), "invalid register"); return value(); }
+
+ public:
+  int encoding(Width w) const {
+    const int c = encoding();
+    switch (w) {
+      case S:
+        assert(c < 32, "bad single float register");
+        return c;
+
+      case D:
+        assert(c < 64  &&  (c & 1) == 0, "bad double float register");
+        assert(c < 32 || VM_Version::v9_instructions_work(), "V9 float work only on V9 platform");
+        return (c & 0x1e) | ((c & 0x20) >> 5);
+
+      case Q:
+        assert(c < 64  &&  (c & 3) == 0, "bad quad float register");
+        assert(c < 32 || VM_Version::v9_instructions_work(), "V9 float work only on V9 platform");
+        return (c & 0x1c) | ((c & 0x20) >> 5);
+    }
+    ShouldNotReachHere();
+    return -1;
+  }
+
+  bool  is_valid() const                              { return 0 <= value() && value() < number_of_registers; }
+  const char* name() const;
+
+  FloatRegister successor() const                     { return as_FloatRegister(encoding() + 1); }
+};
+
+
+// The float registers of the SPARC architecture
+
+CONSTANT_REGISTER_DECLARATION(FloatRegister, fnoreg , (-1));
+
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F0     , ( 0));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F1     , ( 1));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F2     , ( 2));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F3     , ( 3));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F4     , ( 4));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F5     , ( 5));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F6     , ( 6));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F7     , ( 7));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F8     , ( 8));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F9     , ( 9));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F10    , (10));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F11    , (11));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F12    , (12));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F13    , (13));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F14    , (14));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F15    , (15));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F16    , (16));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F17    , (17));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F18    , (18));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F19    , (19));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F20    , (20));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F21    , (21));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F22    , (22));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F23    , (23));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F24    , (24));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F25    , (25));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F26    , (26));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F27    , (27));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F28    , (28));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F29    , (29));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F30    , (30));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F31    , (31));
+
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F32    , (32));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F34    , (34));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F36    , (36));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F38    , (38));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F40    , (40));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F42    , (42));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F44    , (44));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F46    , (46));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F48    , (48));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F50    , (50));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F52    , (52));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F54    , (54));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F56    , (56));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F58    , (58));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F60    , (60));
+CONSTANT_REGISTER_DECLARATION(FloatRegister, F62    , (62));
+
+
+#ifndef DONT_USE_REGISTER_DEFINES
+#define fnoreg ((FloatRegister)(fnoreg_FloatRegisterEnumValue))
+#define F0     ((FloatRegister)(    F0_FloatRegisterEnumValue))
+#define F1     ((FloatRegister)(    F1_FloatRegisterEnumValue))
+#define F2     ((FloatRegister)(    F2_FloatRegisterEnumValue))
+#define F3     ((FloatRegister)(    F3_FloatRegisterEnumValue))
+#define F4     ((FloatRegister)(    F4_FloatRegisterEnumValue))
+#define F5     ((FloatRegister)(    F5_FloatRegisterEnumValue))
+#define F6     ((FloatRegister)(    F6_FloatRegisterEnumValue))
+#define F7     ((FloatRegister)(    F7_FloatRegisterEnumValue))
+#define F8     ((FloatRegister)(    F8_FloatRegisterEnumValue))
+#define F9     ((FloatRegister)(    F9_FloatRegisterEnumValue))
+#define F10    ((FloatRegister)(   F10_FloatRegisterEnumValue))
+#define F11    ((FloatRegister)(   F11_FloatRegisterEnumValue))
+#define F12    ((FloatRegister)(   F12_FloatRegisterEnumValue))
+#define F13    ((FloatRegister)(   F13_FloatRegisterEnumValue))
+#define F14    ((FloatRegister)(   F14_FloatRegisterEnumValue))
+#define F15    ((FloatRegister)(   F15_FloatRegisterEnumValue))
+#define F16    ((FloatRegister)(   F16_FloatRegisterEnumValue))
+#define F17    ((FloatRegister)(   F17_FloatRegisterEnumValue))
+#define F18    ((FloatRegister)(   F18_FloatRegisterEnumValue))
+#define F19    ((FloatRegister)(   F19_FloatRegisterEnumValue))
+#define F20    ((FloatRegister)(   F20_FloatRegisterEnumValue))
+#define F21    ((FloatRegister)(   F21_FloatRegisterEnumValue))
+#define F22    ((FloatRegister)(   F22_FloatRegisterEnumValue))
+#define F23    ((FloatRegister)(   F23_FloatRegisterEnumValue))
+#define F24    ((FloatRegister)(   F24_FloatRegisterEnumValue))
+#define F25    ((FloatRegister)(   F25_FloatRegisterEnumValue))
+#define F26    ((FloatRegister)(   F26_FloatRegisterEnumValue))
+#define F27    ((FloatRegister)(   F27_FloatRegisterEnumValue))
+#define F28    ((FloatRegister)(   F28_FloatRegisterEnumValue))
+#define F29    ((FloatRegister)(   F29_FloatRegisterEnumValue))
+#define F30    ((FloatRegister)(   F30_FloatRegisterEnumValue))
+#define F31    ((FloatRegister)(   F31_FloatRegisterEnumValue))
+#define F32    ((FloatRegister)(   F32_FloatRegisterEnumValue))
+#define F34    ((FloatRegister)(   F34_FloatRegisterEnumValue))
+#define F36    ((FloatRegister)(   F36_FloatRegisterEnumValue))
+#define F38    ((FloatRegister)(   F38_FloatRegisterEnumValue))
+#define F40    ((FloatRegister)(   F40_FloatRegisterEnumValue))
+#define F42    ((FloatRegister)(   F42_FloatRegisterEnumValue))
+#define F44    ((FloatRegister)(   F44_FloatRegisterEnumValue))
+#define F46    ((FloatRegister)(   F46_FloatRegisterEnumValue))
+#define F48    ((FloatRegister)(   F48_FloatRegisterEnumValue))
+#define F50    ((FloatRegister)(   F50_FloatRegisterEnumValue))
+#define F52    ((FloatRegister)(   F52_FloatRegisterEnumValue))
+#define F54    ((FloatRegister)(   F54_FloatRegisterEnumValue))
+#define F56    ((FloatRegister)(   F56_FloatRegisterEnumValue))
+#define F58    ((FloatRegister)(   F58_FloatRegisterEnumValue))
+#define F60    ((FloatRegister)(   F60_FloatRegisterEnumValue))
+#define F62    ((FloatRegister)(   F62_FloatRegisterEnumValue))
+#endif // DONT_USE_REGISTER_DEFINES
+
+// Maximum number of incoming arguments that can be passed in i registers.
+const int SPARC_ARGS_IN_REGS_NUM = 6;
+
+class ConcreteRegisterImpl : public AbstractRegisterImpl {
+ public:
+  enum {
+    // This number must be large enough to cover REG_COUNT (defined by c2) registers.
+    // There is no requirement that any ordering here matches any ordering c2 gives
+    // it's optoregs.
+    number_of_registers = 2*RegisterImpl::number_of_registers +
+                            FloatRegisterImpl::number_of_registers +
+                            1 + // ccr
+                            4  //  fcc
+  };
+  static const int max_gpr;
+  static const int max_fpr;
+
+};
+
+// Single, Double and Quad fp reg classes.  These exist to map the ADLC
+// encoding for a floating point register, to the FloatRegister number
+// desired by the macroassembler.  A FloatRegister is a number between
+// 0 and 63 passed around as a pointer.  For ADLC, an fp register encoding
+// is the actual bit encoding used by the sparc hardware.  When ADLC used
+// the macroassembler to generate an instruction that references, e.g., a
+// double fp reg, it passed the bit encoding to the macroassembler via
+// as_FloatRegister, which, for double regs > 30, returns an illegal
+// register number.
+//
+// Therefore we provide the following classes for use by ADLC.  Their
+// sole purpose is to convert from sparc register encodings to FloatRegisters.
+// At some future time, we might replace FloatRegister with these classes,
+// hence the definitions of as_xxxFloatRegister as class methods rather
+// than as external inline routines.
+
+class SingleFloatRegisterImpl;
+typedef SingleFloatRegisterImpl *SingleFloatRegister;
+
+inline FloatRegister as_SingleFloatRegister(int encoding);
+class SingleFloatRegisterImpl {
+ public:
+  friend inline FloatRegister as_SingleFloatRegister(int encoding) {
+    assert(encoding < 32, "bad single float register encoding");
+    return as_FloatRegister(encoding);
+  }
+};
+
+
+class DoubleFloatRegisterImpl;
+typedef DoubleFloatRegisterImpl *DoubleFloatRegister;
+
+inline FloatRegister as_DoubleFloatRegister(int encoding);
+class DoubleFloatRegisterImpl {
+ public:
+  friend inline FloatRegister as_DoubleFloatRegister(int encoding) {
+    assert(encoding < 32, "bad double float register encoding");
+    return as_FloatRegister( ((encoding & 1) << 5) | (encoding & 0x1e) );
+  }
+};
+
+
+class QuadFloatRegisterImpl;
+typedef QuadFloatRegisterImpl *QuadFloatRegister;
+
+class QuadFloatRegisterImpl {
+ public:
+  friend FloatRegister as_QuadFloatRegister(int encoding) {
+    assert(encoding < 32 && ((encoding & 2) == 0), "bad quad float register encoding");
+    return as_FloatRegister( ((encoding & 1) << 5) | (encoding & 0x1c) );
+  }
+};