1 /*
   2  * Copyright (c) 1997, 2012, 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_MEMORY_ALLOCATION_INLINE_HPP
  26 #define SHARE_VM_MEMORY_ALLOCATION_INLINE_HPP
  27 
  28 #include "runtime/os.hpp"
  29 
  30 // Explicit C-heap memory management
  31 
  32 void trace_heap_malloc(size_t size, const char* name, void *p);
  33 void trace_heap_free(void *p);
  34 
  35 #ifndef PRODUCT
  36 // Increments unsigned long value for statistics (not atomic on MP).
  37 inline void inc_stat_counter(volatile julong* dest, julong add_value) {
  38 #if defined(SPARC) || defined(X86)
  39   // Sparc and X86 have atomic jlong (8 bytes) instructions
  40   julong value = Atomic::load((volatile jlong*)dest);
  41   value += add_value;
  42   Atomic::store((jlong)value, (volatile jlong*)dest);
  43 #else
  44   // possible word-tearing during load/store
  45   *dest += add_value;
  46 #endif
  47 }
  48 #endif
  49 
  50 // allocate using malloc; will fail if no memory available
  51 inline char* AllocateHeap(size_t size, MEMFLAGS flags, address pc = 0,
  52     AllocFailType alloc_failmode = AllocFailStrategy::EXIT_OOM) {
  53   if (pc == 0) {
  54     pc = CURRENT_PC;
  55   }
  56   char* p = (char*) os::malloc(size, flags, pc);
  57   #ifdef ASSERT
  58   if (PrintMallocFree) trace_heap_malloc(size, "AllocateHeap", p);
  59   #endif
  60   if (p == NULL && alloc_failmode == AllocFailStrategy::EXIT_OOM) vm_exit_out_of_memory(size, "AllocateHeap");
  61   return p;
  62 }
  63 
  64 inline char* ReallocateHeap(char *old, size_t size, MEMFLAGS flags,
  65     AllocFailType alloc_failmode = AllocFailStrategy::EXIT_OOM) {
  66   char* p = (char*) os::realloc(old, size, flags, CURRENT_PC);
  67   #ifdef ASSERT
  68   if (PrintMallocFree) trace_heap_malloc(size, "ReallocateHeap", p);
  69   #endif
  70   if (p == NULL && alloc_failmode == AllocFailStrategy::EXIT_OOM) vm_exit_out_of_memory(size, "ReallocateHeap");
  71   return p;
  72 }
  73 
  74 inline void FreeHeap(void* p, MEMFLAGS memflags = mtInternal) {
  75   #ifdef ASSERT
  76   if (PrintMallocFree) trace_heap_free(p);
  77   #endif
  78   os::free(p, memflags);
  79 }
  80 
  81 
  82 template <MEMFLAGS F> void* CHeapObj<F>::operator new(size_t size,
  83       address caller_pc){
  84 #ifdef ASSERT
  85     void* p = (void*)AllocateHeap(size, F, (caller_pc != 0 ? caller_pc : CALLER_PC));
  86     if (PrintMallocFree) trace_heap_malloc(size, "CHeapObj-new", p);
  87     return p;
  88 #else
  89     return (void *) AllocateHeap(size, F, (caller_pc != 0 ? caller_pc : CALLER_PC));
  90 #endif
  91   }
  92 
  93 template <MEMFLAGS F> void* CHeapObj<F>::operator new (size_t size,
  94   const std::nothrow_t&  nothrow_constant, address caller_pc) {
  95 #ifdef ASSERT
  96   void* p = (void*)AllocateHeap(size, F, (caller_pc != 0 ? caller_pc : CALLER_PC),
  97       AllocFailStrategy::RETURN_NULL);
  98     if (PrintMallocFree) trace_heap_malloc(size, "CHeapObj-new", p);
  99     return p;
 100 #else
 101   return (void *) AllocateHeap(size, F, (caller_pc != 0 ? caller_pc : CALLER_PC),
 102       AllocFailStrategy::RETURN_NULL);
 103 #endif
 104 }
 105 
 106 template <MEMFLAGS F> void CHeapObj<F>::operator delete(void* p){
 107    FreeHeap(p, F);
 108 }
 109 
 110 
 111 #endif // SHARE_VM_MEMORY_ALLOCATION_INLINE_HPP