1 /*
   2  * Copyright (c) 2001, 2010, 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 #include "precompiled.hpp"
  26 #include "gc_implementation/g1/g1SATBCardTableModRefBS.hpp"
  27 #include "gc_implementation/g1/heapRegion.hpp"
  28 #include "gc_implementation/g1/satbQueue.hpp"
  29 #include "runtime/mutexLocker.hpp"
  30 #include "runtime/thread.hpp"
  31 #ifdef TARGET_OS_FAMILY_linux
  32 # include "thread_linux.inline.hpp"
  33 #endif
  34 #ifdef TARGET_OS_FAMILY_solaris
  35 # include "thread_solaris.inline.hpp"
  36 #endif
  37 #ifdef TARGET_OS_FAMILY_windows
  38 # include "thread_windows.inline.hpp"
  39 #endif
  40 
  41 G1SATBCardTableModRefBS::G1SATBCardTableModRefBS(MemRegion whole_heap,
  42                                                  int max_covered_regions) :
  43     CardTableModRefBSForCTRS(whole_heap, max_covered_regions)
  44 {
  45   _kind = G1SATBCT;
  46 }
  47 
  48 
  49 void G1SATBCardTableModRefBS::enqueue(oop pre_val) {
  50   assert(pre_val->is_oop_or_null(true), "Error");
  51   if (!JavaThread::satb_mark_queue_set().is_active()) return;
  52   Thread* thr = Thread::current();
  53   if (thr->is_Java_thread()) {
  54     JavaThread* jt = (JavaThread*)thr;
  55     jt->satb_mark_queue().enqueue(pre_val);
  56   } else {
  57     MutexLocker x(Shared_SATB_Q_lock);
  58     JavaThread::satb_mark_queue_set().shared_satb_queue()->enqueue(pre_val);
  59   }
  60 }
  61 
  62 // When we know the current java thread:
  63 template <class T> void
  64 G1SATBCardTableModRefBS::write_ref_field_pre_static(T* field,
  65                                                     oop new_val,
  66                                                     JavaThread* jt) {
  67   if (!JavaThread::satb_mark_queue_set().is_active()) return;
  68   T heap_oop = oopDesc::load_heap_oop(field);
  69   if (!oopDesc::is_null(heap_oop)) {
  70     oop pre_val = oopDesc::decode_heap_oop_not_null(heap_oop);
  71     assert(pre_val->is_oop(true /* ignore mark word */), "Error");
  72     jt->satb_mark_queue().enqueue(pre_val);
  73   }
  74 }
  75 
  76 template <class T> void
  77 G1SATBCardTableModRefBS::write_ref_array_pre_work(T* dst, int count) {
  78   if (!JavaThread::satb_mark_queue_set().is_active()) return;
  79   T* elem_ptr = dst;
  80   for (int i = 0; i < count; i++, elem_ptr++) {
  81     T heap_oop = oopDesc::load_heap_oop(elem_ptr);
  82     if (!oopDesc::is_null(heap_oop)) {
  83       enqueue(oopDesc::decode_heap_oop_not_null(heap_oop));
  84     }
  85   }
  86 }
  87 
  88 G1SATBCardTableLoggingModRefBS::
  89 G1SATBCardTableLoggingModRefBS(MemRegion whole_heap,
  90                                int max_covered_regions) :
  91   G1SATBCardTableModRefBS(whole_heap, max_covered_regions),
  92   _dcqs(JavaThread::dirty_card_queue_set())
  93 {
  94   _kind = G1SATBCTLogging;
  95 }
  96 
  97 void
  98 G1SATBCardTableLoggingModRefBS::write_ref_field_work(void* field,
  99                                                      oop new_val) {
 100   jbyte* byte = byte_for(field);
 101   if (*byte != dirty_card) {
 102     *byte = dirty_card;
 103     Thread* thr = Thread::current();
 104     if (thr->is_Java_thread()) {
 105       JavaThread* jt = (JavaThread*)thr;
 106       jt->dirty_card_queue().enqueue(byte);
 107     } else {
 108       MutexLockerEx x(Shared_DirtyCardQ_lock,
 109                       Mutex::_no_safepoint_check_flag);
 110       _dcqs.shared_dirty_card_queue()->enqueue(byte);
 111     }
 112   }
 113 }
 114 
 115 void
 116 G1SATBCardTableLoggingModRefBS::write_ref_field_static(void* field,
 117                                                        oop new_val) {
 118   uintptr_t field_uint = (uintptr_t)field;
 119   uintptr_t new_val_uint = (uintptr_t)new_val;
 120   uintptr_t comb = field_uint ^ new_val_uint;
 121   comb = comb >> HeapRegion::LogOfHRGrainBytes;
 122   if (comb == 0) return;
 123   if (new_val == NULL) return;
 124   // Otherwise, log it.
 125   G1SATBCardTableLoggingModRefBS* g1_bs =
 126     (G1SATBCardTableLoggingModRefBS*)Universe::heap()->barrier_set();
 127   g1_bs->write_ref_field_work(field, new_val);
 128 }
 129 
 130 void
 131 G1SATBCardTableLoggingModRefBS::invalidate(MemRegion mr, bool whole_heap) {
 132   jbyte* byte = byte_for(mr.start());
 133   jbyte* last_byte = byte_for(mr.last());
 134   Thread* thr = Thread::current();
 135   if (whole_heap) {
 136     while (byte <= last_byte) {
 137       *byte = dirty_card;
 138       byte++;
 139     }
 140   } else {
 141     // Enqueue if necessary.
 142     if (thr->is_Java_thread()) {
 143       JavaThread* jt = (JavaThread*)thr;
 144       while (byte <= last_byte) {
 145         if (*byte != dirty_card) {
 146           *byte = dirty_card;
 147           jt->dirty_card_queue().enqueue(byte);
 148         }
 149         byte++;
 150       }
 151     } else {
 152       MutexLockerEx x(Shared_DirtyCardQ_lock,
 153                       Mutex::_no_safepoint_check_flag);
 154       while (byte <= last_byte) {
 155         if (*byte != dirty_card) {
 156           *byte = dirty_card;
 157           _dcqs.shared_dirty_card_queue()->enqueue(byte);
 158         }
 159         byte++;
 160       }
 161     }
 162   }
 163 }