45 #include "runtime/mutexLocker.hpp"
46 #include "utilities/bitMap.inline.hpp"
47 #if INCLUDE_G1GC
48 #include "gc/g1/g1CollectedHeap.hpp"
49 #include "gc/g1/g1HeapRegion.hpp"
50 #endif
51
52 #if INCLUDE_CDS_JAVA_HEAP
53
54 GrowableArrayCHeap<u1, mtClassShared>* ArchiveHeapWriter::_buffer = nullptr;
55
56 // The following are offsets from buffer_bottom()
57 size_t ArchiveHeapWriter::_buffer_used;
58
59 // Heap root segments
60 HeapRootSegments ArchiveHeapWriter::_heap_root_segments;
61
62 address ArchiveHeapWriter::_requested_bottom;
63 address ArchiveHeapWriter::_requested_top;
64
65 GrowableArrayCHeap<ArchiveHeapWriter::NativePointerInfo, mtClassShared>* ArchiveHeapWriter::_native_pointers;
66 GrowableArrayCHeap<oop, mtClassShared>* ArchiveHeapWriter::_source_objs;
67 GrowableArrayCHeap<ArchiveHeapWriter::HeapObjOrder, mtClassShared>* ArchiveHeapWriter::_source_objs_order;
68
69 ArchiveHeapWriter::BufferOffsetToSourceObjectTable*
70 ArchiveHeapWriter::_buffer_offset_to_source_obj_table = nullptr;
71
72
73 typedef HashTable<
74 size_t, // offset of a filler from ArchiveHeapWriter::buffer_bottom()
75 size_t, // size of this filler (in bytes)
76 127, // prime number
77 AnyObj::C_HEAP,
78 mtClassShared> FillersTable;
79 static FillersTable* _fillers;
80 static int _num_native_ptrs = 0;
81
82 void ArchiveHeapWriter::init() {
83 if (CDSConfig::is_dumping_heap()) {
84 Universe::heap()->collect(GCCause::_java_lang_system_gc);
85
86 _buffer_offset_to_source_obj_table = new BufferOffsetToSourceObjectTable(/*size (prime)*/36137, /*max size*/1 * M);
87 _fillers = new FillersTable();
88 _requested_bottom = nullptr;
89 _requested_top = nullptr;
90
91 _native_pointers = new GrowableArrayCHeap<NativePointerInfo, mtClassShared>(2048);
92 _source_objs = new GrowableArrayCHeap<oop, mtClassShared>(10000);
93
94 guarantee(MIN_GC_REGION_ALIGNMENT <= G1HeapRegion::min_region_size_in_words() * HeapWordSize, "must be");
95 }
96 }
97
98 void ArchiveHeapWriter::add_source_obj(oop src_obj) {
99 _source_objs->append(src_obj);
100 }
101
102 void ArchiveHeapWriter::write(GrowableArrayCHeap<oop, mtClassShared>* roots,
103 ArchiveHeapInfo* heap_info) {
104 assert(CDSConfig::is_dumping_heap(), "sanity");
105 allocate_buffer();
106 copy_source_objs_to_buffer(roots);
107 set_requested_address(heap_info);
108 relocate_embedded_oops(roots, heap_info);
109 }
110
111 bool ArchiveHeapWriter::is_too_large_to_archive(oop o) {
112 return is_too_large_to_archive(o->size());
113 }
114
115 bool ArchiveHeapWriter::is_string_too_large_to_archive(oop string) {
116 typeArrayOop value = java_lang_String::value_no_keepalive(string);
117 return is_too_large_to_archive(value);
128 } else {
129 return false;
130 }
131 }
132
133 // Various lookup functions between source_obj, buffered_obj and requested_obj
134 bool ArchiveHeapWriter::is_in_requested_range(oop o) {
135 assert(_requested_bottom != nullptr, "do not call before _requested_bottom is initialized");
136 address a = cast_from_oop<address>(o);
137 return (_requested_bottom <= a && a < _requested_top);
138 }
139
140 oop ArchiveHeapWriter::requested_obj_from_buffer_offset(size_t offset) {
141 oop req_obj = cast_to_oop(_requested_bottom + offset);
142 assert(is_in_requested_range(req_obj), "must be");
143 return req_obj;
144 }
145
146 oop ArchiveHeapWriter::source_obj_to_requested_obj(oop src_obj) {
147 assert(CDSConfig::is_dumping_heap(), "dump-time only");
148 HeapShared::CachedOopInfo* p = HeapShared::archived_object_cache()->get(src_obj);
149 if (p != nullptr) {
150 return requested_obj_from_buffer_offset(p->buffer_offset());
151 } else {
152 return nullptr;
153 }
154 }
155
156 oop ArchiveHeapWriter::buffered_addr_to_source_obj(address buffered_addr) {
157 oop* p = _buffer_offset_to_source_obj_table->get(buffered_address_to_offset(buffered_addr));
158 if (p != nullptr) {
159 return *p;
160 } else {
161 return nullptr;
162 }
163 }
164
165 Klass* ArchiveHeapWriter::real_klass_of_buffered_oop(address buffered_addr) {
166 oop p = buffered_addr_to_source_obj(buffered_addr);
167 if (p != nullptr) {
168 return p->klass();
169 } else if (get_filler_size_at(buffered_addr) > 0) {
170 return Universe::fillerArrayKlass();
171 } else {
172 // This is one of the root segments
173 return Universe::objectArrayKlass();
174 }
175 }
176
177 size_t ArchiveHeapWriter::size_of_buffered_oop(address buffered_addr) {
178 oop p = buffered_addr_to_source_obj(buffered_addr);
179 if (p != nullptr) {
339 for (int i = 0; i < len; i++) {
340 oop o = _source_objs->at(i);
341 int rank = oop_sorting_rank(o);
342 HeapObjOrder os = {i, rank};
343 _source_objs_order->append(os);
344 }
345 log_info(aot)("computed ranks");
346 _source_objs_order->sort(compare_objs_by_oop_fields);
347 log_info(aot)("sorting heap objects done");
348 }
349
350 void ArchiveHeapWriter::copy_source_objs_to_buffer(GrowableArrayCHeap<oop, mtClassShared>* roots) {
351 // There could be multiple root segments, which we want to be aligned by region.
352 // Putting them ahead of objects makes sure we waste no space.
353 copy_roots_to_buffer(roots);
354
355 sort_source_objs();
356 for (int i = 0; i < _source_objs_order->length(); i++) {
357 int src_obj_index = _source_objs_order->at(i)._index;
358 oop src_obj = _source_objs->at(src_obj_index);
359 HeapShared::CachedOopInfo* info = HeapShared::archived_object_cache()->get(src_obj);
360 assert(info != nullptr, "must be");
361 size_t buffer_offset = copy_one_source_obj_to_buffer(src_obj);
362 info->set_buffer_offset(buffer_offset);
363
364 _buffer_offset_to_source_obj_table->put_when_absent(buffer_offset, src_obj);
365 _buffer_offset_to_source_obj_table->maybe_grow();
366
367 if (java_lang_Module::is_instance(src_obj)) {
368 Modules::check_archived_module_oop(src_obj);
369 }
370 }
371
372 log_info(aot)("Size of heap region = %zu bytes, %d objects, %d roots, %d native ptrs",
373 _buffer_used, _source_objs->length() + 1, roots->length(), _num_native_ptrs);
374 }
375
376 size_t ArchiveHeapWriter::filler_array_byte_size(int length) {
377 size_t byte_size = objArrayOopDesc::object_size(length) * HeapWordSize;
378 return byte_size;
379 }
380
381 int ArchiveHeapWriter::filler_array_length(size_t fill_bytes) {
382 assert(is_object_aligned(fill_bytes), "must be");
383 size_t elemSize = (UseCompressedOops ? sizeof(narrowOop) : sizeof(oop));
384
385 int initial_length = to_array_length(fill_bytes / elemSize);
386 for (int length = initial_length; length >= 0; length --) {
387 size_t array_byte_size = filler_array_byte_size(length);
388 if (array_byte_size == fill_bytes) {
389 return length;
390 }
391 }
392
393 ShouldNotReachHere();
442 _fillers->put(buffered_address_to_offset((address)filler), fill_bytes);
443 }
444 }
445
446 size_t ArchiveHeapWriter::get_filler_size_at(address buffered_addr) {
447 size_t* p = _fillers->get(buffered_address_to_offset(buffered_addr));
448 if (p != nullptr) {
449 assert(*p > 0, "filler must be larger than zero bytes");
450 return *p;
451 } else {
452 return 0; // buffered_addr is not a filler
453 }
454 }
455
456 template <typename T>
457 void update_buffered_object_field(address buffered_obj, int field_offset, T value) {
458 T* field_addr = cast_to_oop(buffered_obj)->field_addr<T>(field_offset);
459 *field_addr = value;
460 }
461
462 size_t ArchiveHeapWriter::copy_one_source_obj_to_buffer(oop src_obj) {
463 assert(!is_too_large_to_archive(src_obj), "already checked");
464 size_t byte_size = src_obj->size() * HeapWordSize;
465 assert(byte_size > 0, "no zero-size objects");
466
467 // For region-based collectors such as G1, the archive heap may be mapped into
468 // multiple regions. We need to make sure that we don't have an object that can possible
469 // span across two regions.
470 maybe_fill_gc_region_gap(byte_size);
471
472 size_t new_used = _buffer_used + byte_size;
473 assert(new_used > _buffer_used, "no wrap around");
474
475 size_t cur_min_region_bottom = align_down(_buffer_used, MIN_GC_REGION_ALIGNMENT);
476 size_t next_min_region_bottom = align_down(new_used, MIN_GC_REGION_ALIGNMENT);
477 assert(cur_min_region_bottom == next_min_region_bottom, "no object should cross minimal GC region boundaries");
478
479 ensure_buffer_space(new_used);
480
481 address from = cast_from_oop<address>(src_obj);
482 address to = offset_to_buffered_address<address>(_buffer_used);
679 // The whole heap is covered by total_bits, but there are only non-zero bits within [start ... end).
680 size_t start = bitmap->find_first_set_bit(0);
681 size_t end = bitmap->size();
682 log_info(aot)("%s = %7zu ... %7zu (%3zu%% ... %3zu%% = %3zu%%)", which,
683 start, end,
684 start * 100 / total_bits,
685 end * 100 / total_bits,
686 (end - start) * 100 / total_bits);
687 }
688
689 // Update all oop fields embedded in the buffered objects
690 void ArchiveHeapWriter::relocate_embedded_oops(GrowableArrayCHeap<oop, mtClassShared>* roots,
691 ArchiveHeapInfo* heap_info) {
692 size_t oopmap_unit = (UseCompressedOops ? sizeof(narrowOop) : sizeof(oop));
693 size_t heap_region_byte_size = _buffer_used;
694 heap_info->oopmap()->resize(heap_region_byte_size / oopmap_unit);
695
696 for (int i = 0; i < _source_objs_order->length(); i++) {
697 int src_obj_index = _source_objs_order->at(i)._index;
698 oop src_obj = _source_objs->at(src_obj_index);
699 HeapShared::CachedOopInfo* info = HeapShared::archived_object_cache()->get(src_obj);
700 assert(info != nullptr, "must be");
701 oop requested_obj = requested_obj_from_buffer_offset(info->buffer_offset());
702 update_header_for_requested_obj(requested_obj, src_obj, src_obj->klass());
703 address buffered_obj = offset_to_buffered_address<address>(info->buffer_offset());
704 EmbeddedOopRelocator relocator(src_obj, buffered_obj, heap_info->oopmap());
705 src_obj->oop_iterate(&relocator);
706 };
707
708 // Relocate HeapShared::roots(), which is created in copy_roots_to_buffer() and
709 // doesn't have a corresponding src_obj, so we can't use EmbeddedOopRelocator on it.
710 for (size_t seg_idx = 0; seg_idx < _heap_root_segments.count(); seg_idx++) {
711 size_t seg_offset = _heap_root_segments.segment_offset(seg_idx);
712
713 objArrayOop requested_obj = (objArrayOop)requested_obj_from_buffer_offset(seg_offset);
714 update_header_for_requested_obj(requested_obj, nullptr, Universe::objectArrayKlass());
715 address buffered_obj = offset_to_buffered_address<address>(seg_offset);
716 int length = _heap_root_segments.size_in_elems(seg_idx);
717
718 if (UseCompressedOops) {
719 for (int i = 0; i < length; i++) {
730
731 compute_ptrmap(heap_info);
732
733 size_t total_bytes = (size_t)_buffer->length();
734 log_bitmap_usage("oopmap", heap_info->oopmap(), total_bytes / (UseCompressedOops ? sizeof(narrowOop) : sizeof(oop)));
735 log_bitmap_usage("ptrmap", heap_info->ptrmap(), total_bytes / sizeof(address));
736 }
737
738 void ArchiveHeapWriter::mark_native_pointer(oop src_obj, int field_offset) {
739 Metadata* ptr = src_obj->metadata_field_acquire(field_offset);
740 if (ptr != nullptr) {
741 NativePointerInfo info;
742 info._src_obj = src_obj;
743 info._field_offset = field_offset;
744 _native_pointers->append(info);
745 HeapShared::set_has_native_pointers(src_obj);
746 _num_native_ptrs ++;
747 }
748 }
749
750 void ArchiveHeapWriter::compute_ptrmap(ArchiveHeapInfo* heap_info) {
751 int num_non_null_ptrs = 0;
752 Metadata** bottom = (Metadata**) _requested_bottom;
753 Metadata** top = (Metadata**) _requested_top; // exclusive
754 heap_info->ptrmap()->resize(top - bottom);
755
756 BitMap::idx_t max_idx = 32; // paranoid - don't make it too small
757 for (int i = 0; i < _native_pointers->length(); i++) {
758 NativePointerInfo info = _native_pointers->at(i);
759 oop src_obj = info._src_obj;
760 int field_offset = info._field_offset;
761 HeapShared::CachedOopInfo* p = HeapShared::archived_object_cache()->get(src_obj);
762 // requested_field_addr = the address of this field in the requested space
763 oop requested_obj = requested_obj_from_buffer_offset(p->buffer_offset());
764 Metadata** requested_field_addr = (Metadata**)(cast_from_oop<address>(requested_obj) + field_offset);
765 assert(bottom <= requested_field_addr && requested_field_addr < top, "range check");
766
767 // Mark this field in the bitmap
768 BitMap::idx_t idx = requested_field_addr - bottom;
769 heap_info->ptrmap()->set_bit(idx);
770 num_non_null_ptrs ++;
771 max_idx = MAX2(max_idx, idx);
772
773 // Set the native pointer to the requested address of the metadata (at runtime, the metadata will have
774 // this address if the RO/RW regions are mapped at the default location).
775
776 Metadata** buffered_field_addr = requested_addr_to_buffered_addr(requested_field_addr);
777 Metadata* native_ptr = *buffered_field_addr;
778 guarantee(native_ptr != nullptr, "sanity");
779
780 if (RegeneratedClasses::has_been_regenerated(native_ptr)) {
781 native_ptr = RegeneratedClasses::get_regenerated_object(native_ptr);
782 }
783
784 guarantee(ArchiveBuilder::current()->has_been_archived((address)native_ptr),
785 "Metadata %p should have been archived", native_ptr);
786
787 address buffered_native_ptr = ArchiveBuilder::current()->get_buffered_addr((address)native_ptr);
788 address requested_native_ptr = ArchiveBuilder::current()->to_requested(buffered_native_ptr);
789 *buffered_field_addr = (Metadata*)requested_native_ptr;
790 }
791
792 heap_info->ptrmap()->resize(max_idx + 1);
793 log_info(aot, heap)("calculate_ptrmap: marked %d non-null native pointers for heap region (%zu bits)",
794 num_non_null_ptrs, size_t(heap_info->ptrmap()->size()));
795 }
796
797 #endif // INCLUDE_CDS_JAVA_HEAP
|
45 #include "runtime/mutexLocker.hpp"
46 #include "utilities/bitMap.inline.hpp"
47 #if INCLUDE_G1GC
48 #include "gc/g1/g1CollectedHeap.hpp"
49 #include "gc/g1/g1HeapRegion.hpp"
50 #endif
51
52 #if INCLUDE_CDS_JAVA_HEAP
53
54 GrowableArrayCHeap<u1, mtClassShared>* ArchiveHeapWriter::_buffer = nullptr;
55
56 // The following are offsets from buffer_bottom()
57 size_t ArchiveHeapWriter::_buffer_used;
58
59 // Heap root segments
60 HeapRootSegments ArchiveHeapWriter::_heap_root_segments;
61
62 address ArchiveHeapWriter::_requested_bottom;
63 address ArchiveHeapWriter::_requested_top;
64
65 static size_t _num_strings = 0;
66 static size_t _string_bytes = 0;
67 static size_t _num_packages = 0;
68 static size_t _num_protection_domains = 0;
69
70 GrowableArrayCHeap<ArchiveHeapWriter::NativePointerInfo, mtClassShared>* ArchiveHeapWriter::_native_pointers;
71 GrowableArrayCHeap<oop, mtClassShared>* ArchiveHeapWriter::_source_objs;
72 GrowableArrayCHeap<ArchiveHeapWriter::HeapObjOrder, mtClassShared>* ArchiveHeapWriter::_source_objs_order;
73
74 ArchiveHeapWriter::BufferOffsetToSourceObjectTable*
75 ArchiveHeapWriter::_buffer_offset_to_source_obj_table = nullptr;
76
77
78 typedef HashTable<
79 size_t, // offset of a filler from ArchiveHeapWriter::buffer_bottom()
80 size_t, // size of this filler (in bytes)
81 127, // prime number
82 AnyObj::C_HEAP,
83 mtClassShared> FillersTable;
84 static FillersTable* _fillers;
85 static int _num_native_ptrs = 0;
86
87 void ArchiveHeapWriter::init() {
88 if (CDSConfig::is_dumping_heap()) {
89 Universe::heap()->collect(GCCause::_java_lang_system_gc);
90
91 _buffer_offset_to_source_obj_table = new BufferOffsetToSourceObjectTable(/*size (prime)*/36137, /*max size*/1 * M);
92 _fillers = new FillersTable();
93 _requested_bottom = nullptr;
94 _requested_top = nullptr;
95
96 _native_pointers = new GrowableArrayCHeap<NativePointerInfo, mtClassShared>(2048);
97 _source_objs = new GrowableArrayCHeap<oop, mtClassShared>(10000);
98
99 guarantee(MIN_GC_REGION_ALIGNMENT <= G1HeapRegion::min_region_size_in_words() * HeapWordSize, "must be");
100 }
101 }
102
103 void ArchiveHeapWriter::delete_tables_with_raw_oops() {
104 delete _source_objs;
105 _source_objs = nullptr;
106 }
107
108 void ArchiveHeapWriter::add_source_obj(oop src_obj) {
109 _source_objs->append(src_obj);
110 }
111
112 void ArchiveHeapWriter::write(GrowableArrayCHeap<oop, mtClassShared>* roots,
113 ArchiveHeapInfo* heap_info) {
114 assert(CDSConfig::is_dumping_heap(), "sanity");
115 allocate_buffer();
116 copy_source_objs_to_buffer(roots);
117 set_requested_address(heap_info);
118 relocate_embedded_oops(roots, heap_info);
119 }
120
121 bool ArchiveHeapWriter::is_too_large_to_archive(oop o) {
122 return is_too_large_to_archive(o->size());
123 }
124
125 bool ArchiveHeapWriter::is_string_too_large_to_archive(oop string) {
126 typeArrayOop value = java_lang_String::value_no_keepalive(string);
127 return is_too_large_to_archive(value);
138 } else {
139 return false;
140 }
141 }
142
143 // Various lookup functions between source_obj, buffered_obj and requested_obj
144 bool ArchiveHeapWriter::is_in_requested_range(oop o) {
145 assert(_requested_bottom != nullptr, "do not call before _requested_bottom is initialized");
146 address a = cast_from_oop<address>(o);
147 return (_requested_bottom <= a && a < _requested_top);
148 }
149
150 oop ArchiveHeapWriter::requested_obj_from_buffer_offset(size_t offset) {
151 oop req_obj = cast_to_oop(_requested_bottom + offset);
152 assert(is_in_requested_range(req_obj), "must be");
153 return req_obj;
154 }
155
156 oop ArchiveHeapWriter::source_obj_to_requested_obj(oop src_obj) {
157 assert(CDSConfig::is_dumping_heap(), "dump-time only");
158 HeapShared::CachedOopInfo* p = HeapShared::get_cached_oop_info(src_obj);
159 if (p != nullptr) {
160 return requested_obj_from_buffer_offset(p->buffer_offset());
161 } else {
162 return nullptr;
163 }
164 }
165
166 oop ArchiveHeapWriter::buffered_addr_to_source_obj(address buffered_addr) {
167 OopHandle* oh = _buffer_offset_to_source_obj_table->get(buffered_address_to_offset(buffered_addr));
168 if (oh != nullptr) {
169 return oh->resolve();
170 } else {
171 return nullptr;
172 }
173 }
174
175 Klass* ArchiveHeapWriter::real_klass_of_buffered_oop(address buffered_addr) {
176 oop p = buffered_addr_to_source_obj(buffered_addr);
177 if (p != nullptr) {
178 return p->klass();
179 } else if (get_filler_size_at(buffered_addr) > 0) {
180 return Universe::fillerArrayKlass();
181 } else {
182 // This is one of the root segments
183 return Universe::objectArrayKlass();
184 }
185 }
186
187 size_t ArchiveHeapWriter::size_of_buffered_oop(address buffered_addr) {
188 oop p = buffered_addr_to_source_obj(buffered_addr);
189 if (p != nullptr) {
349 for (int i = 0; i < len; i++) {
350 oop o = _source_objs->at(i);
351 int rank = oop_sorting_rank(o);
352 HeapObjOrder os = {i, rank};
353 _source_objs_order->append(os);
354 }
355 log_info(aot)("computed ranks");
356 _source_objs_order->sort(compare_objs_by_oop_fields);
357 log_info(aot)("sorting heap objects done");
358 }
359
360 void ArchiveHeapWriter::copy_source_objs_to_buffer(GrowableArrayCHeap<oop, mtClassShared>* roots) {
361 // There could be multiple root segments, which we want to be aligned by region.
362 // Putting them ahead of objects makes sure we waste no space.
363 copy_roots_to_buffer(roots);
364
365 sort_source_objs();
366 for (int i = 0; i < _source_objs_order->length(); i++) {
367 int src_obj_index = _source_objs_order->at(i)._index;
368 oop src_obj = _source_objs->at(src_obj_index);
369 HeapShared::CachedOopInfo* info = HeapShared::get_cached_oop_info(src_obj);
370 assert(info != nullptr, "must be");
371 size_t buffer_offset = copy_one_source_obj_to_buffer(src_obj);
372 info->set_buffer_offset(buffer_offset);
373 assert(buffer_offset <= 0x7fffffff, "sanity");
374 HeapShared::add_to_permanent_oop_table(src_obj, (int)buffer_offset);
375
376 OopHandle handle(Universe::vm_global(), src_obj);
377 _buffer_offset_to_source_obj_table->put_when_absent(buffer_offset, handle);
378 _buffer_offset_to_source_obj_table->maybe_grow();
379
380 if (java_lang_Module::is_instance(src_obj)) {
381 Modules::check_archived_module_oop(src_obj);
382 }
383 }
384
385 log_info(aot)("Size of heap region = %zu bytes, %d objects, %d roots, %d native ptrs",
386 _buffer_used, _source_objs->length() + 1, roots->length(), _num_native_ptrs);
387 log_info(cds)(" strings = %8zu (%zu bytes)", _num_strings, _string_bytes);
388 log_info(cds)(" packages = %8zu", _num_packages);
389 log_info(cds)(" protection domains = %8zu", _num_protection_domains);
390 }
391
392 size_t ArchiveHeapWriter::filler_array_byte_size(int length) {
393 size_t byte_size = objArrayOopDesc::object_size(length) * HeapWordSize;
394 return byte_size;
395 }
396
397 int ArchiveHeapWriter::filler_array_length(size_t fill_bytes) {
398 assert(is_object_aligned(fill_bytes), "must be");
399 size_t elemSize = (UseCompressedOops ? sizeof(narrowOop) : sizeof(oop));
400
401 int initial_length = to_array_length(fill_bytes / elemSize);
402 for (int length = initial_length; length >= 0; length --) {
403 size_t array_byte_size = filler_array_byte_size(length);
404 if (array_byte_size == fill_bytes) {
405 return length;
406 }
407 }
408
409 ShouldNotReachHere();
458 _fillers->put(buffered_address_to_offset((address)filler), fill_bytes);
459 }
460 }
461
462 size_t ArchiveHeapWriter::get_filler_size_at(address buffered_addr) {
463 size_t* p = _fillers->get(buffered_address_to_offset(buffered_addr));
464 if (p != nullptr) {
465 assert(*p > 0, "filler must be larger than zero bytes");
466 return *p;
467 } else {
468 return 0; // buffered_addr is not a filler
469 }
470 }
471
472 template <typename T>
473 void update_buffered_object_field(address buffered_obj, int field_offset, T value) {
474 T* field_addr = cast_to_oop(buffered_obj)->field_addr<T>(field_offset);
475 *field_addr = value;
476 }
477
478 void ArchiveHeapWriter::update_stats(oop src_obj) {
479 if (java_lang_String::is_instance(src_obj)) {
480 _num_strings ++;
481 _string_bytes += src_obj->size() * HeapWordSize;
482 _string_bytes += java_lang_String::value(src_obj)->size() * HeapWordSize;
483 } else {
484 Klass* k = src_obj->klass();
485 Symbol* name = k->name();
486 if (name->equals("java/lang/NamedPackage") || name->equals("java/lang/Package")) {
487 _num_packages ++;
488 } else if (name->equals("java/security/ProtectionDomain")) {
489 _num_protection_domains ++;
490 }
491 }
492 }
493
494 size_t ArchiveHeapWriter::copy_one_source_obj_to_buffer(oop src_obj) {
495 update_stats(src_obj);
496
497 assert(!is_too_large_to_archive(src_obj), "already checked");
498 size_t byte_size = src_obj->size() * HeapWordSize;
499 assert(byte_size > 0, "no zero-size objects");
500
501 // For region-based collectors such as G1, the archive heap may be mapped into
502 // multiple regions. We need to make sure that we don't have an object that can possible
503 // span across two regions.
504 maybe_fill_gc_region_gap(byte_size);
505
506 size_t new_used = _buffer_used + byte_size;
507 assert(new_used > _buffer_used, "no wrap around");
508
509 size_t cur_min_region_bottom = align_down(_buffer_used, MIN_GC_REGION_ALIGNMENT);
510 size_t next_min_region_bottom = align_down(new_used, MIN_GC_REGION_ALIGNMENT);
511 assert(cur_min_region_bottom == next_min_region_bottom, "no object should cross minimal GC region boundaries");
512
513 ensure_buffer_space(new_used);
514
515 address from = cast_from_oop<address>(src_obj);
516 address to = offset_to_buffered_address<address>(_buffer_used);
713 // The whole heap is covered by total_bits, but there are only non-zero bits within [start ... end).
714 size_t start = bitmap->find_first_set_bit(0);
715 size_t end = bitmap->size();
716 log_info(aot)("%s = %7zu ... %7zu (%3zu%% ... %3zu%% = %3zu%%)", which,
717 start, end,
718 start * 100 / total_bits,
719 end * 100 / total_bits,
720 (end - start) * 100 / total_bits);
721 }
722
723 // Update all oop fields embedded in the buffered objects
724 void ArchiveHeapWriter::relocate_embedded_oops(GrowableArrayCHeap<oop, mtClassShared>* roots,
725 ArchiveHeapInfo* heap_info) {
726 size_t oopmap_unit = (UseCompressedOops ? sizeof(narrowOop) : sizeof(oop));
727 size_t heap_region_byte_size = _buffer_used;
728 heap_info->oopmap()->resize(heap_region_byte_size / oopmap_unit);
729
730 for (int i = 0; i < _source_objs_order->length(); i++) {
731 int src_obj_index = _source_objs_order->at(i)._index;
732 oop src_obj = _source_objs->at(src_obj_index);
733 HeapShared::CachedOopInfo* info = HeapShared::get_cached_oop_info(src_obj);
734 assert(info != nullptr, "must be");
735 oop requested_obj = requested_obj_from_buffer_offset(info->buffer_offset());
736 update_header_for_requested_obj(requested_obj, src_obj, src_obj->klass());
737 address buffered_obj = offset_to_buffered_address<address>(info->buffer_offset());
738 EmbeddedOopRelocator relocator(src_obj, buffered_obj, heap_info->oopmap());
739 src_obj->oop_iterate(&relocator);
740 };
741
742 // Relocate HeapShared::roots(), which is created in copy_roots_to_buffer() and
743 // doesn't have a corresponding src_obj, so we can't use EmbeddedOopRelocator on it.
744 for (size_t seg_idx = 0; seg_idx < _heap_root_segments.count(); seg_idx++) {
745 size_t seg_offset = _heap_root_segments.segment_offset(seg_idx);
746
747 objArrayOop requested_obj = (objArrayOop)requested_obj_from_buffer_offset(seg_offset);
748 update_header_for_requested_obj(requested_obj, nullptr, Universe::objectArrayKlass());
749 address buffered_obj = offset_to_buffered_address<address>(seg_offset);
750 int length = _heap_root_segments.size_in_elems(seg_idx);
751
752 if (UseCompressedOops) {
753 for (int i = 0; i < length; i++) {
764
765 compute_ptrmap(heap_info);
766
767 size_t total_bytes = (size_t)_buffer->length();
768 log_bitmap_usage("oopmap", heap_info->oopmap(), total_bytes / (UseCompressedOops ? sizeof(narrowOop) : sizeof(oop)));
769 log_bitmap_usage("ptrmap", heap_info->ptrmap(), total_bytes / sizeof(address));
770 }
771
772 void ArchiveHeapWriter::mark_native_pointer(oop src_obj, int field_offset) {
773 Metadata* ptr = src_obj->metadata_field_acquire(field_offset);
774 if (ptr != nullptr) {
775 NativePointerInfo info;
776 info._src_obj = src_obj;
777 info._field_offset = field_offset;
778 _native_pointers->append(info);
779 HeapShared::set_has_native_pointers(src_obj);
780 _num_native_ptrs ++;
781 }
782 }
783
784 // Do we have a jlong/jint field that's actually a pointer to a MetaspaceObj?
785 bool ArchiveHeapWriter::is_marked_as_native_pointer(ArchiveHeapInfo* heap_info, address buffered_obj, int field_offset) {
786 size_t offset = buffered_address_to_offset(buffered_obj) + checked_cast<size_t>(field_offset); // in bytes
787 BitMap::idx_t idx = checked_cast<BitMap::idx_t>(offset) / HeapWordSize;
788 // Leading zeros have been removed so some addresses may not be in the ptrmap
789 size_t start_pos = FileMapInfo::current_info()->heap_ptrmap_start_pos();
790 if (idx < start_pos) {
791 return false;
792 } else {
793 idx -= start_pos;
794 }
795 return (idx < heap_info->ptrmap()->size()) && (heap_info->ptrmap()->at(idx) == true);
796 }
797
798 void ArchiveHeapWriter::compute_ptrmap(ArchiveHeapInfo* heap_info) {
799 int num_non_null_ptrs = 0;
800 Metadata** bottom = (Metadata**) _requested_bottom;
801 Metadata** top = (Metadata**) _requested_top; // exclusive
802 heap_info->ptrmap()->resize(top - bottom);
803
804 BitMap::idx_t max_idx = 32; // paranoid - don't make it too small
805 for (int i = 0; i < _native_pointers->length(); i++) {
806 NativePointerInfo info = _native_pointers->at(i);
807 oop src_obj = info._src_obj;
808 int field_offset = info._field_offset;
809 HeapShared::CachedOopInfo* p = HeapShared::get_cached_oop_info(src_obj);
810 // requested_field_addr = the address of this field in the requested space
811 oop requested_obj = requested_obj_from_buffer_offset(p->buffer_offset());
812 Metadata** requested_field_addr = (Metadata**)(cast_from_oop<address>(requested_obj) + field_offset);
813 assert(bottom <= requested_field_addr && requested_field_addr < top, "range check");
814
815 // Mark this field in the bitmap
816 BitMap::idx_t idx = requested_field_addr - bottom;
817 heap_info->ptrmap()->set_bit(idx);
818 num_non_null_ptrs ++;
819 max_idx = MAX2(max_idx, idx);
820
821 // Set the native pointer to the requested address of the metadata (at runtime, the metadata will have
822 // this address if the RO/RW regions are mapped at the default location).
823
824 Metadata** buffered_field_addr = requested_addr_to_buffered_addr(requested_field_addr);
825 Metadata* native_ptr = *buffered_field_addr;
826 guarantee(native_ptr != nullptr, "sanity");
827
828 if (RegeneratedClasses::has_been_regenerated(native_ptr)) {
829 native_ptr = RegeneratedClasses::get_regenerated_object(native_ptr);
830 }
831
832 guarantee(ArchiveBuilder::current()->has_been_archived((address)native_ptr),
833 "Metadata %p should have been archived", native_ptr);
834
835 if (RegeneratedClasses::has_been_regenerated((address)native_ptr)) {
836 native_ptr = (Metadata*)RegeneratedClasses::get_regenerated_object((address)native_ptr);
837 }
838
839 address buffered_native_ptr = ArchiveBuilder::current()->get_buffered_addr((address)native_ptr);
840 address requested_native_ptr = ArchiveBuilder::current()->to_requested(buffered_native_ptr);
841 *buffered_field_addr = (Metadata*)requested_native_ptr;
842 }
843
844 heap_info->ptrmap()->resize(max_idx + 1);
845 log_info(aot, heap)("calculate_ptrmap: marked %d non-null native pointers for heap region (%zu bits)",
846 num_non_null_ptrs, size_t(heap_info->ptrmap()->size()));
847 }
848
849 #endif // INCLUDE_CDS_JAVA_HEAP
|