1 /*
   2  * Copyright (c) 1997, 2011, 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 SHARE_VM_OOPS_TYPEARRAYOOP_HPP
  26 #define SHARE_VM_OOPS_TYPEARRAYOOP_HPP
  27 
  28 #include "oops/arrayOop.hpp"
  29 #include "oops/typeArrayKlass.hpp"
  30 #ifdef TARGET_OS_ARCH_linux_x86
  31 # include "orderAccess_linux_x86.inline.hpp"
  32 #endif
  33 #ifdef TARGET_OS_ARCH_linux_sparc
  34 # include "orderAccess_linux_sparc.inline.hpp"
  35 #endif
  36 #ifdef TARGET_OS_ARCH_linux_zero
  37 # include "orderAccess_linux_zero.inline.hpp"
  38 #endif
  39 #ifdef TARGET_OS_ARCH_solaris_x86
  40 # include "orderAccess_solaris_x86.inline.hpp"
  41 #endif
  42 #ifdef TARGET_OS_ARCH_solaris_sparc
  43 # include "orderAccess_solaris_sparc.inline.hpp"
  44 #endif
  45 #ifdef TARGET_OS_ARCH_windows_x86
  46 # include "orderAccess_windows_x86.inline.hpp"
  47 #endif
  48 #ifdef TARGET_OS_ARCH_linux_arm
  49 # include "orderAccess_linux_arm.inline.hpp"
  50 #endif
  51 #ifdef TARGET_OS_ARCH_linux_ppc
  52 # include "orderAccess_linux_ppc.inline.hpp"
  53 #endif
  54 #ifdef TARGET_OS_ARCH_bsd_x86
  55 # include "orderAccess_bsd_x86.inline.hpp"
  56 #endif
  57 #ifdef TARGET_OS_ARCH_bsd_zero
  58 # include "orderAccess_bsd_zero.inline.hpp"
  59 #endif
  60 
  61 // A typeArrayOop is an array containing basic types (non oop elements).
  62 // It is used for arrays of {characters, singles, doubles, bytes, shorts, integers, longs}
  63 #include <limits.h>
  64 
  65 class typeArrayOopDesc : public arrayOopDesc {
  66  protected:
  67   jchar*    char_base()   const { return (jchar*)   base(T_CHAR); }
  68   jboolean* bool_base()   const { return (jboolean*)base(T_BOOLEAN); }
  69   jbyte*    byte_base()   const { return (jbyte*)   base(T_BYTE); }
  70   jint*     int_base()    const { return (jint*)    base(T_INT); }
  71   jlong*    long_base()   const { return (jlong*)   base(T_LONG); }
  72   jshort*   short_base()  const { return (jshort*)  base(T_SHORT); }
  73   jfloat*   float_base()  const { return (jfloat*)  base(T_FLOAT); }
  74   jdouble*  double_base() const { return (jdouble*) base(T_DOUBLE); }
  75 
  76   friend class typeArrayKlass;
  77 
  78  public:
  79   jbyte* byte_at_addr(int which) const {
  80     assert(is_within_bounds(which), "index out of bounds");
  81     return &byte_base()[which];
  82   }
  83 
  84   jboolean* bool_at_addr(int which) const {
  85     assert(is_within_bounds(which), "index out of bounds");
  86     return &bool_base()[which];
  87   }
  88 
  89   jchar* char_at_addr(int which) const {
  90     assert(is_within_bounds(which), "index out of bounds");
  91     return &char_base()[which];
  92   }
  93 
  94   jint* int_at_addr(int which) const {
  95     assert(is_within_bounds(which), "index out of bounds");
  96     return &int_base()[which];
  97   }
  98 
  99   jshort* short_at_addr(int which) const {
 100     assert(is_within_bounds(which), "index out of bounds");
 101     return &short_base()[which];
 102   }
 103 
 104   jushort* ushort_at_addr(int which) const {  // for field descriptor arrays
 105     assert(is_within_bounds(which), "index out of bounds");
 106     return (jushort*) &short_base()[which];
 107   }
 108 
 109   jlong* long_at_addr(int which) const {
 110     assert(is_within_bounds(which), "index out of bounds");
 111     return &long_base()[which];
 112   }
 113 
 114   jfloat* float_at_addr(int which) const {
 115     assert(is_within_bounds(which), "index out of bounds");
 116     return &float_base()[which];
 117   }
 118 
 119   jdouble* double_at_addr(int which) const {
 120     assert(is_within_bounds(which), "index out of bounds");
 121     return &double_base()[which];
 122   }
 123 
 124   jbyte byte_at(int which) const                  { return *byte_at_addr(which); }
 125   void byte_at_put(int which, jbyte contents)     { *byte_at_addr(which) = contents; }
 126 
 127   jboolean bool_at(int which) const               { return *bool_at_addr(which); }
 128   void bool_at_put(int which, jboolean contents)  { *bool_at_addr(which) = contents; }
 129 
 130   jchar char_at(int which) const                  { return *char_at_addr(which); }
 131   void char_at_put(int which, jchar contents)     { *char_at_addr(which) = contents; }
 132 
 133   jint int_at(int which) const                    { return *int_at_addr(which); }
 134   void int_at_put(int which, jint contents)       { *int_at_addr(which) = contents; }
 135 
 136   jshort short_at(int which) const                { return *short_at_addr(which); }
 137   void short_at_put(int which, jshort contents)   { *short_at_addr(which) = contents; }
 138 
 139   jushort ushort_at(int which) const              { return *ushort_at_addr(which); }
 140   void ushort_at_put(int which, jushort contents) { *ushort_at_addr(which) = contents; }
 141 
 142   jlong long_at(int which) const                  { return *long_at_addr(which); }
 143   void long_at_put(int which, jlong contents)     { *long_at_addr(which) = contents; }
 144 
 145   jfloat float_at(int which) const                { return *float_at_addr(which); }
 146   void float_at_put(int which, jfloat contents)   { *float_at_addr(which) = contents; }
 147 
 148   jdouble double_at(int which) const              { return *double_at_addr(which); }
 149   void double_at_put(int which, jdouble contents) { *double_at_addr(which) = contents; }
 150 
 151   jbyte byte_at_acquire(int which) const              { return OrderAccess::load_acquire(byte_at_addr(which)); }
 152   void release_byte_at_put(int which, jbyte contents) { OrderAccess::release_store(byte_at_addr(which), contents); }
 153 
 154   // Sizing
 155 
 156   // Returns the number of words necessary to hold an array of "len"
 157   // elements each of the given "byte_size".
 158  private:
 159   static int object_size(int lh, int length) {
 160     int instance_header_size = Klass::layout_helper_header_size(lh);
 161     int element_shift = Klass::layout_helper_log2_element_size(lh);
 162     DEBUG_ONLY(BasicType etype = Klass::layout_helper_element_type(lh));
 163     assert(length <= arrayOopDesc::max_array_length(etype), "no overflow");
 164 
 165     julong size_in_bytes = length;
 166     size_in_bytes <<= element_shift;
 167     size_in_bytes += instance_header_size;
 168     julong size_in_words = ((size_in_bytes + (HeapWordSize-1)) >> LogHeapWordSize);
 169     assert(size_in_words <= (julong)max_jint, "no overflow");
 170 
 171     return align_object_size((intptr_t)size_in_words);
 172   }
 173 
 174  public:
 175   int object_size() {
 176     typeArrayKlass* tk = typeArrayKlass::cast(klass());
 177     return object_size(tk->layout_helper(), length());
 178   }
 179 };
 180 
 181 #endif // SHARE_VM_OOPS_TYPEARRAYOOP_HPP