aoqi@0: /*
aoqi@0:  * Copyright (c) 2003, 2011, Oracle and/or its affiliates. All rights reserved.
aoqi@0:  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
aoqi@0:  *
aoqi@0:  * This code is free software; you can redistribute it and/or modify it
aoqi@0:  * under the terms of the GNU General Public License version 2 only, as
aoqi@0:  * published by the Free Software Foundation.
aoqi@0:  *
aoqi@0:  * This code is distributed in the hope that it will be useful, but WITHOUT
aoqi@0:  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
aoqi@0:  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
aoqi@0:  * version 2 for more details (a copy is included in the LICENSE file that
aoqi@0:  * accompanied this code).
aoqi@0:  *
aoqi@0:  * You should have received a copy of the GNU General Public License version
aoqi@0:  * 2 along with this work; if not, write to the Free Software Foundation,
aoqi@0:  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
aoqi@0:  *
aoqi@0:  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
aoqi@0:  * or visit www.oracle.com if you need additional information or have any
aoqi@0:  * questions.
aoqi@0:  *
aoqi@0:  */
aoqi@0: 
aoqi@1: /*
aoqi@1:  * This file has been modified by Loongson Technology in 2015. These
aoqi@1:  * modifications are Copyright (c) 2015 Loongson Technology, and are made
aoqi@1:  * available on the same license terms set forth above.
aoqi@1:  */
aoqi@1: 
aoqi@0: #ifndef SHARE_VM_UTILITIES_COPY_HPP
aoqi@0: #define SHARE_VM_UTILITIES_COPY_HPP
aoqi@0: 
aoqi@0: #include "runtime/stubRoutines.hpp"
aoqi@0: 
aoqi@0: // Assembly code for platforms that need it.
aoqi@0: extern "C" {
aoqi@0:   void _Copy_conjoint_words(HeapWord* from, HeapWord* to, size_t count);
aoqi@0:   void _Copy_disjoint_words(HeapWord* from, HeapWord* to, size_t count);
aoqi@0: 
aoqi@0:   void _Copy_conjoint_words_atomic(HeapWord* from, HeapWord* to, size_t count);
aoqi@0:   void _Copy_disjoint_words_atomic(HeapWord* from, HeapWord* to, size_t count);
aoqi@0: 
aoqi@0:   void _Copy_aligned_conjoint_words(HeapWord* from, HeapWord* to, size_t count);
aoqi@0:   void _Copy_aligned_disjoint_words(HeapWord* from, HeapWord* to, size_t count);
aoqi@0: 
aoqi@0:   void _Copy_conjoint_bytes(void* from, void* to, size_t count);
aoqi@0: 
aoqi@0:   void _Copy_conjoint_bytes_atomic  (void*   from, void*   to, size_t count);
aoqi@0:   void _Copy_conjoint_jshorts_atomic(jshort* from, jshort* to, size_t count);
aoqi@0:   void _Copy_conjoint_jints_atomic  (jint*   from, jint*   to, size_t count);
aoqi@0:   void _Copy_conjoint_jlongs_atomic (jlong*  from, jlong*  to, size_t count);
aoqi@0:   void _Copy_conjoint_oops_atomic   (oop*    from, oop*    to, size_t count);
aoqi@0: 
aoqi@0:   void _Copy_arrayof_conjoint_bytes  (HeapWord* from, HeapWord* to, size_t count);
aoqi@0:   void _Copy_arrayof_conjoint_jshorts(HeapWord* from, HeapWord* to, size_t count);
aoqi@0:   void _Copy_arrayof_conjoint_jints  (HeapWord* from, HeapWord* to, size_t count);
aoqi@0:   void _Copy_arrayof_conjoint_jlongs (HeapWord* from, HeapWord* to, size_t count);
aoqi@0:   void _Copy_arrayof_conjoint_oops   (HeapWord* from, HeapWord* to, size_t count);
aoqi@0: }
aoqi@0: 
aoqi@0: class Copy : AllStatic {
aoqi@0:  public:
aoqi@0:   // Block copy methods have four attributes.  We don't define all possibilities.
aoqi@0:   //   alignment: aligned to BytesPerLong
aoqi@0:   //   arrayof:   arraycopy operation with both operands aligned on the same
aoqi@0:   //              boundary as the first element of an array of the copy unit.
aoqi@0:   //              This is currently a HeapWord boundary on all platforms, except
aoqi@0:   //              for long and double arrays, which are aligned on an 8-byte
aoqi@0:   //              boundary on all platforms.
aoqi@0:   //              arraycopy operations are implicitly atomic on each array element.
aoqi@0:   //   overlap:   disjoint or conjoint.
aoqi@0:   //   copy unit: bytes or words (i.e., HeapWords) or oops (i.e., pointers).
aoqi@0:   //   atomicity: atomic or non-atomic on the copy unit.
aoqi@0:   //
aoqi@0:   // Names are constructed thusly:
aoqi@0:   //
aoqi@0:   //     [ 'aligned_' | 'arrayof_' ]
aoqi@0:   //     ('conjoint_' | 'disjoint_')
aoqi@0:   //     ('words' | 'bytes' | 'jshorts' | 'jints' | 'jlongs' | 'oops')
aoqi@0:   //     [ '_atomic' ]
aoqi@0:   //
aoqi@0:   // Except in the arrayof case, whatever the alignment is, we assume we can copy
aoqi@0:   // whole alignment units.  E.g., if BytesPerLong is 2x word alignment, an odd
aoqi@0:   // count may copy an extra word.  In the arrayof case, we are allowed to copy
aoqi@0:   // only the number of copy units specified.
aoqi@0:   //
aoqi@0:   // All callees check count for 0.
aoqi@0:   //
aoqi@0: 
aoqi@0:   // HeapWords
aoqi@0: 
aoqi@0:   // Word-aligned words,    conjoint, not atomic on each word
aoqi@0:   static void conjoint_words(HeapWord* from, HeapWord* to, size_t count) {
aoqi@0:     assert_params_ok(from, to, LogHeapWordSize);
aoqi@0:     pd_conjoint_words(from, to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // Word-aligned words,    disjoint, not atomic on each word
aoqi@0:   static void disjoint_words(HeapWord* from, HeapWord* to, size_t count) {
aoqi@0:     assert_params_ok(from, to, LogHeapWordSize);
aoqi@0:     assert_disjoint(from, to, count);
aoqi@0:     pd_disjoint_words(from, to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // Word-aligned words,    disjoint, atomic on each word
aoqi@0:   static void disjoint_words_atomic(HeapWord* from, HeapWord* to, size_t count) {
aoqi@0:     assert_params_ok(from, to, LogHeapWordSize);
aoqi@0:     assert_disjoint(from, to, count);
aoqi@0:     pd_disjoint_words_atomic(from, to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // Object-aligned words,  conjoint, not atomic on each word
aoqi@0:   static void aligned_conjoint_words(HeapWord* from, HeapWord* to, size_t count) {
aoqi@0:     assert_params_aligned(from, to);
aoqi@0:     pd_aligned_conjoint_words(from, to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // Object-aligned words,  disjoint, not atomic on each word
aoqi@0:   static void aligned_disjoint_words(HeapWord* from, HeapWord* to, size_t count) {
aoqi@0:     assert_params_aligned(from, to);
aoqi@0:     assert_disjoint(from, to, count);
aoqi@0:     pd_aligned_disjoint_words(from, to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // bytes, jshorts, jints, jlongs, oops
aoqi@0: 
aoqi@0:   // bytes,                 conjoint, not atomic on each byte (not that it matters)
aoqi@0:   static void conjoint_jbytes(void* from, void* to, size_t count) {
aoqi@0:     pd_conjoint_bytes(from, to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // bytes,                 conjoint, atomic on each byte (not that it matters)
aoqi@0:   static void conjoint_jbytes_atomic(void* from, void* to, size_t count) {
aoqi@0:     pd_conjoint_bytes(from, to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // jshorts,               conjoint, atomic on each jshort
aoqi@0:   static void conjoint_jshorts_atomic(jshort* from, jshort* to, size_t count) {
aoqi@0:     assert_params_ok(from, to, LogBytesPerShort);
aoqi@0:     pd_conjoint_jshorts_atomic(from, to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // jints,                 conjoint, atomic on each jint
aoqi@0:   static void conjoint_jints_atomic(jint* from, jint* to, size_t count) {
aoqi@0:     assert_params_ok(from, to, LogBytesPerInt);
aoqi@0:     pd_conjoint_jints_atomic(from, to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // jlongs,                conjoint, atomic on each jlong
aoqi@0:   static void conjoint_jlongs_atomic(jlong* from, jlong* to, size_t count) {
aoqi@0:     assert_params_ok(from, to, LogBytesPerLong);
aoqi@0:     pd_conjoint_jlongs_atomic(from, to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // oops,                  conjoint, atomic on each oop
aoqi@0:   static void conjoint_oops_atomic(oop* from, oop* to, size_t count) {
aoqi@0:     assert_params_ok(from, to, LogBytesPerHeapOop);
aoqi@0:     pd_conjoint_oops_atomic(from, to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // overloaded for UseCompressedOops
aoqi@0:   static void conjoint_oops_atomic(narrowOop* from, narrowOop* to, size_t count) {
aoqi@0:     assert(sizeof(narrowOop) == sizeof(jint), "this cast is wrong");
aoqi@0:     assert_params_ok(from, to, LogBytesPerInt);
aoqi@0:     pd_conjoint_jints_atomic((jint*)from, (jint*)to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // Copy a span of memory.  If the span is an integral number of aligned
aoqi@0:   // longs, words, or ints, copy those units atomically.
aoqi@0:   // The largest atomic transfer unit is 8 bytes, or the largest power
aoqi@0:   // of two which divides all of from, to, and size, whichever is smaller.
aoqi@0:   static void conjoint_memory_atomic(void* from, void* to, size_t size);
aoqi@0: 
aoqi@0:   // bytes,                 conjoint array, atomic on each byte (not that it matters)
aoqi@0:   static void arrayof_conjoint_jbytes(HeapWord* from, HeapWord* to, size_t count) {
aoqi@0:     pd_arrayof_conjoint_bytes(from, to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // jshorts,               conjoint array, atomic on each jshort
aoqi@0:   static void arrayof_conjoint_jshorts(HeapWord* from, HeapWord* to, size_t count) {
aoqi@0:     assert_params_ok(from, to, LogBytesPerShort);
aoqi@0:     pd_arrayof_conjoint_jshorts(from, to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // jints,                 conjoint array, atomic on each jint
aoqi@0:   static void arrayof_conjoint_jints(HeapWord* from, HeapWord* to, size_t count) {
aoqi@0:     assert_params_ok(from, to, LogBytesPerInt);
aoqi@0:     pd_arrayof_conjoint_jints(from, to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // jlongs,                conjoint array, atomic on each jlong
aoqi@0:   static void arrayof_conjoint_jlongs(HeapWord* from, HeapWord* to, size_t count) {
aoqi@0:     assert_params_ok(from, to, LogBytesPerLong);
aoqi@0:     pd_arrayof_conjoint_jlongs(from, to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // oops,                  conjoint array, atomic on each oop
aoqi@0:   static void arrayof_conjoint_oops(HeapWord* from, HeapWord* to, size_t count) {
aoqi@0:     assert_params_ok(from, to, LogBytesPerHeapOop);
aoqi@0:     pd_arrayof_conjoint_oops(from, to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // Known overlap methods
aoqi@0: 
aoqi@0:   // Copy word-aligned words from higher to lower addresses, not atomic on each word
aoqi@0:   inline static void conjoint_words_to_lower(HeapWord* from, HeapWord* to, size_t byte_count) {
aoqi@0:     // byte_count is in bytes to check its alignment
aoqi@0:     assert_params_ok(from, to, LogHeapWordSize);
aoqi@0:     assert_byte_count_ok(byte_count, HeapWordSize);
aoqi@0: 
aoqi@0:     size_t count = (size_t)round_to(byte_count, HeapWordSize) >> LogHeapWordSize;
aoqi@0:     assert(to <= from || from + count <= to, "do not overwrite source data");
aoqi@0: 
aoqi@0:     while (count-- > 0) {
aoqi@0:       *to++ = *from++;
aoqi@0:     }
aoqi@0:   }
aoqi@0: 
aoqi@0:   // Copy word-aligned words from lower to higher addresses, not atomic on each word
aoqi@0:   inline static void conjoint_words_to_higher(HeapWord* from, HeapWord* to, size_t byte_count) {
aoqi@0:     // byte_count is in bytes to check its alignment
aoqi@0:     assert_params_ok(from, to, LogHeapWordSize);
aoqi@0:     assert_byte_count_ok(byte_count, HeapWordSize);
aoqi@0: 
aoqi@0:     size_t count = (size_t)round_to(byte_count, HeapWordSize) >> LogHeapWordSize;
aoqi@0:     assert(from <= to || to + count <= from, "do not overwrite source data");
aoqi@0: 
aoqi@0:     from += count - 1;
aoqi@0:     to   += count - 1;
aoqi@0:     while (count-- > 0) {
aoqi@0:       *to-- = *from--;
aoqi@0:     }
aoqi@0:   }
aoqi@0: 
aoqi@0:   // Fill methods
aoqi@0: 
aoqi@0:   // Fill word-aligned words, not atomic on each word
aoqi@0:   // set_words
aoqi@0:   static void fill_to_words(HeapWord* to, size_t count, juint value = 0) {
aoqi@0:     assert_params_ok(to, LogHeapWordSize);
aoqi@0:     pd_fill_to_words(to, count, value);
aoqi@0:   }
aoqi@0: 
aoqi@0:   static void fill_to_aligned_words(HeapWord* to, size_t count, juint value = 0) {
aoqi@0:     assert_params_aligned(to);
aoqi@0:     pd_fill_to_aligned_words(to, count, value);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // Fill bytes
aoqi@0:   static void fill_to_bytes(void* to, size_t count, jubyte value = 0) {
aoqi@0:     pd_fill_to_bytes(to, count, value);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // Fill a span of memory.  If the span is an integral number of aligned
aoqi@0:   // longs, words, or ints, store to those units atomically.
aoqi@0:   // The largest atomic transfer unit is 8 bytes, or the largest power
aoqi@0:   // of two which divides both to and size, whichever is smaller.
aoqi@0:   static void fill_to_memory_atomic(void* to, size_t size, jubyte value = 0);
aoqi@0: 
aoqi@0:   // Zero-fill methods
aoqi@0: 
aoqi@0:   // Zero word-aligned words, not atomic on each word
aoqi@0:   static void zero_to_words(HeapWord* to, size_t count) {
aoqi@0:     assert_params_ok(to, LogHeapWordSize);
aoqi@0:     pd_zero_to_words(to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:   // Zero bytes
aoqi@0:   static void zero_to_bytes(void* to, size_t count) {
aoqi@0:     pd_zero_to_bytes(to, count);
aoqi@0:   }
aoqi@0: 
aoqi@0:  private:
aoqi@0:   static bool params_disjoint(HeapWord* from, HeapWord* to, size_t count) {
aoqi@0:     if (from < to) {
aoqi@0:       return pointer_delta(to, from) >= count;
aoqi@0:     }
aoqi@0:     return pointer_delta(from, to) >= count;
aoqi@0:   }
aoqi@0: 
aoqi@0:   // These methods raise a fatal if they detect a problem.
aoqi@0: 
aoqi@0:   static void assert_disjoint(HeapWord* from, HeapWord* to, size_t count) {
aoqi@0: #ifdef ASSERT
aoqi@0:     if (!params_disjoint(from, to, count))
aoqi@0:       basic_fatal("source and dest overlap");
aoqi@0: #endif
aoqi@0:   }
aoqi@0: 
aoqi@0:   static void assert_params_ok(void* from, void* to, intptr_t log_align) {
aoqi@0: #ifdef ASSERT
aoqi@0:     if (mask_bits((uintptr_t)from, right_n_bits(log_align)) != 0)
aoqi@0:       basic_fatal("not aligned");
aoqi@0:     if (mask_bits((uintptr_t)to, right_n_bits(log_align)) != 0)
aoqi@0:       basic_fatal("not aligned");
aoqi@0: #endif
aoqi@0:   }
aoqi@0: 
aoqi@0:   static void assert_params_ok(HeapWord* to, intptr_t log_align) {
aoqi@0: #ifdef ASSERT
aoqi@0:     if (mask_bits((uintptr_t)to, right_n_bits(log_align)) != 0)
aoqi@0:       basic_fatal("not word aligned");
aoqi@0: #endif
aoqi@0:   }
aoqi@0:   static void assert_params_aligned(HeapWord* from, HeapWord* to) {
aoqi@0: #ifdef ASSERT
aoqi@0:     if (mask_bits((uintptr_t)from, BytesPerLong-1) != 0)
aoqi@0:       basic_fatal("not long aligned");
aoqi@0:     if (mask_bits((uintptr_t)to, BytesPerLong-1) != 0)
aoqi@0:       basic_fatal("not long aligned");
aoqi@0: #endif
aoqi@0:   }
aoqi@0: 
aoqi@0:   static void assert_params_aligned(HeapWord* to) {
aoqi@0: #ifdef ASSERT
aoqi@0:     if (mask_bits((uintptr_t)to, BytesPerLong-1) != 0)
aoqi@0:       basic_fatal("not long aligned");
aoqi@0: #endif
aoqi@0:   }
aoqi@0: 
aoqi@0:   static void assert_byte_count_ok(size_t byte_count, size_t unit_size) {
aoqi@0: #ifdef ASSERT
aoqi@0:     if ((size_t)round_to(byte_count, unit_size) != byte_count) {
aoqi@0:       basic_fatal("byte count must be aligned");
aoqi@0:     }
aoqi@0: #endif
aoqi@0:   }
aoqi@0: 
aoqi@1: 
aoqi@1:  // SAPJVM AS 2011-09-20. Template for atomic copy.
aoqi@1:   template <class T> static void copy_conjoint_atomic(T* from, T* to, size_t count)
aoqi@1:   {
aoqi@1:     if (from > to) {
aoqi@1:       while (count-- > 0) {
aoqi@1:         // Copy forwards
aoqi@1:         *to++ = *from++;
aoqi@1:       }
aoqi@1:     } else {
aoqi@1:       from += count - 1;
aoqi@1:       to   += count - 1;
aoqi@1:       while (count-- > 0) {
aoqi@1:         // Copy backwards
aoqi@1:         *to-- = *from--;
aoqi@1:       }
aoqi@1:     }
aoqi@1:   }
aoqi@1: 
aoqi@1: 
aoqi@1: 
aoqi@0:   // Platform dependent implementations of the above methods.
aoqi@0: #ifdef TARGET_ARCH_x86
aoqi@0: # include "copy_x86.hpp"
aoqi@0: #endif
aoqi@0: #ifdef TARGET_ARCH_sparc
aoqi@0: # include "copy_sparc.hpp"
aoqi@0: #endif
aoqi@0: #ifdef TARGET_ARCH_zero
aoqi@0: # include "copy_zero.hpp"
aoqi@0: #endif
aoqi@0: #ifdef TARGET_ARCH_arm
aoqi@0: # include "copy_arm.hpp"
aoqi@0: #endif
aoqi@0: #ifdef TARGET_ARCH_ppc
aoqi@0: # include "copy_ppc.hpp"
aoqi@0: #endif
aoqi@1: #ifdef TARGET_ARCH_mips
aoqi@1: # include "copy_mips.hpp"
aoqi@1: #endif
aoqi@1: 
aoqi@0: 
aoqi@0: };
aoqi@0: 
aoqi@0: #endif // SHARE_VM_UTILITIES_COPY_HPP