1 /*
  2  * Copyright (c) 2018, 2025, 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_CDS_HEAPSHARED_HPP
 26 #define SHARE_CDS_HEAPSHARED_HPP
 27 
 28 #include "cds/cds_globals.hpp"
 29 #include "cds/dumpTimeClassInfo.hpp"
 30 #include "cds/metaspaceShared.hpp"
 31 #include "classfile/compactHashtable.hpp"
 32 #include "classfile/javaClasses.hpp"
 33 #include "gc/shared/gc_globals.hpp"
 34 #include "memory/allocation.hpp"
 35 #include "memory/allStatic.hpp"
 36 #include "oops/compressedOops.hpp"
 37 #include "oops/oop.hpp"
 38 #include "oops/oopHandle.hpp"
 39 #include "oops/oopsHierarchy.hpp"
 40 #include "utilities/growableArray.hpp"
 41 #include "utilities/resourceHash.hpp"
 42 
 43 #if INCLUDE_CDS_JAVA_HEAP
 44 class DumpedInternedStrings;
 45 class FileMapInfo;
 46 class KlassSubGraphInfo;
 47 class MetaspaceObjToOopHandleTable;
 48 class ResourceBitMap;
 49 
 50 struct ArchivableStaticFieldInfo;
 51 class ArchiveHeapInfo;
 52 
 53 #define ARCHIVED_BOOT_LAYER_CLASS "jdk/internal/module/ArchivedBootLayer"
 54 #define ARCHIVED_BOOT_LAYER_FIELD "archivedBootLayer"
 55 
 56 // A dump time sub-graph info for Klass _k. It includes the entry points
 57 // (static fields in _k's mirror) of the archived sub-graphs reachable
 58 // from _k's mirror. It also contains a list of Klasses of the objects
 59 // within the sub-graphs.
 60 class KlassSubGraphInfo: public CHeapObj<mtClass> {
 61  private:
 62   // The class that contains the static field(s) as the entry point(s)
 63   // of archived object sub-graph(s).
 64   Klass* _k;
 65   // A list of classes need to be loaded and initialized before the archived
 66   // object sub-graphs can be accessed at runtime.
 67   GrowableArray<Klass*>* _subgraph_object_klasses;
 68   // A list of _k's static fields as the entry points of archived sub-graphs.
 69   // For each entry field, it is a tuple of field_offset, field_value
 70   GrowableArray<int>* _subgraph_entry_fields;
 71 
 72   // Does this KlassSubGraphInfo belong to the archived full module graph
 73   bool _is_full_module_graph;
 74 
 75   // Does this KlassSubGraphInfo references any classes that were loaded while
 76   // JvmtiExport::is_early_phase()!=true. If so, this KlassSubGraphInfo cannot be
 77   // used at runtime if JVMTI ClassFileLoadHook is enabled.
 78   bool _has_non_early_klasses;
 79   static bool is_non_early_klass(Klass* k);
 80   static void check_allowed_klass(InstanceKlass* ik);
 81  public:
 82   KlassSubGraphInfo(Klass* k, bool is_full_module_graph) :
 83     _k(k),  _subgraph_object_klasses(nullptr),
 84     _subgraph_entry_fields(nullptr),
 85     _is_full_module_graph(is_full_module_graph),
 86     _has_non_early_klasses(false) {}
 87 
 88   ~KlassSubGraphInfo() {
 89     if (_subgraph_object_klasses != nullptr) {
 90       delete _subgraph_object_klasses;
 91     }
 92     if (_subgraph_entry_fields != nullptr) {
 93       delete _subgraph_entry_fields;
 94     }
 95   };
 96 
 97   Klass* klass()            { return _k; }
 98   GrowableArray<Klass*>* subgraph_object_klasses() {
 99     return _subgraph_object_klasses;
100   }
101   GrowableArray<int>* subgraph_entry_fields() {
102     return _subgraph_entry_fields;
103   }
104   void add_subgraph_entry_field(int static_field_offset, oop v);
105   void add_subgraph_object_klass(Klass *orig_k);
106   int num_subgraph_object_klasses() {
107     return _subgraph_object_klasses == nullptr ? 0 :
108            _subgraph_object_klasses->length();
109   }
110   bool is_full_module_graph() const { return _is_full_module_graph; }
111   bool has_non_early_klasses() const { return _has_non_early_klasses; }
112 };
113 
114 // An archived record of object sub-graphs reachable from static
115 // fields within _k's mirror. The record is reloaded from the archive
116 // at runtime.
117 class ArchivedKlassSubGraphInfoRecord {
118  private:
119   Klass* _k;
120   bool _is_full_module_graph;
121   bool _has_non_early_klasses;
122 
123   // contains pairs of field offset and value for each subgraph entry field
124   Array<int>* _entry_field_records;
125 
126   // klasses of objects in archived sub-graphs referenced from the entry points
127   // (static fields) in the containing class
128   Array<Klass*>* _subgraph_object_klasses;
129  public:
130   ArchivedKlassSubGraphInfoRecord() :
131     _k(nullptr), _entry_field_records(nullptr), _subgraph_object_klasses(nullptr) {}
132   void init(KlassSubGraphInfo* info);
133   Klass* klass() const { return _k; }
134   Array<int>* entry_field_records() const { return _entry_field_records; }
135   Array<Klass*>* subgraph_object_klasses() const { return _subgraph_object_klasses; }
136   bool is_full_module_graph() const { return _is_full_module_graph; }
137   bool has_non_early_klasses() const { return _has_non_early_klasses; }
138 };
139 #endif // INCLUDE_CDS_JAVA_HEAP
140 
141 struct LoadedArchiveHeapRegion;
142 
143 class HeapShared: AllStatic {
144   friend class VerifySharedOopClosure;
145 
146 public:
147   static bool is_subgraph_root_class(InstanceKlass* ik);
148 
149   // Scratch objects for archiving Klass::java_mirror()
150   static oop scratch_java_mirror(BasicType t)     NOT_CDS_JAVA_HEAP_RETURN_(nullptr);
151   static oop scratch_java_mirror(Klass* k)        NOT_CDS_JAVA_HEAP_RETURN_(nullptr);
152   static oop scratch_java_mirror(oop java_mirror) NOT_CDS_JAVA_HEAP_RETURN_(nullptr);
153   static bool is_archived_boot_layer_available(JavaThread* current) NOT_CDS_JAVA_HEAP_RETURN_(false);
154 
155 private:
156 #if INCLUDE_CDS_JAVA_HEAP
157   static DumpedInternedStrings *_dumped_interned_strings;
158 
159   // statistics
160   constexpr static int ALLOC_STAT_SLOTS = 16;
161   static size_t _alloc_count[ALLOC_STAT_SLOTS];
162   static size_t _alloc_size[ALLOC_STAT_SLOTS];
163   static size_t _total_obj_count;
164   static size_t _total_obj_size; // in HeapWords
165 
166   static void count_allocation(size_t size);
167   static void print_stats();
168   static void debug_trace();
169 public:
170   static unsigned oop_hash(oop const& p);
171   static unsigned string_oop_hash(oop const& string) {
172     return java_lang_String::hash_code(string);
173   }
174 
175   class CopyKlassSubGraphInfoToArchive;
176 
177   class CachedOopInfo {
178     // Used by CDSHeapVerifier.
179     oop _orig_referrer;
180 
181     // The location of this object inside ArchiveHeapWriter::_buffer
182     size_t _buffer_offset;
183 
184     // One or more fields in this object are pointing to non-null oops.
185     bool _has_oop_pointers;
186 
187     // One or more fields in this object are pointing to MetaspaceObj
188     bool _has_native_pointers;
189   public:
190     CachedOopInfo(oop orig_referrer, bool has_oop_pointers)
191       : _orig_referrer(orig_referrer),
192         _buffer_offset(0),
193         _has_oop_pointers(has_oop_pointers),
194         _has_native_pointers(false) {}
195     oop orig_referrer()             const { return _orig_referrer;   }
196     void set_buffer_offset(size_t offset) { _buffer_offset = offset; }
197     size_t buffer_offset()          const { return _buffer_offset;   }
198     bool has_oop_pointers()         const { return _has_oop_pointers; }
199     bool has_native_pointers()      const { return _has_native_pointers; }
200     void set_has_native_pointers()        { _has_native_pointers = true; }
201   };
202 
203 private:
204   static const int INITIAL_TABLE_SIZE = 15889; // prime number
205   static const int MAX_TABLE_SIZE     = 1000000;
206   typedef ResizeableResourceHashtable<oop, CachedOopInfo,
207       AnyObj::C_HEAP,
208       mtClassShared,
209       HeapShared::oop_hash> ArchivedObjectCache;
210   static ArchivedObjectCache* _archived_object_cache;
211 
212   class DumpTimeKlassSubGraphInfoTable
213     : public ResourceHashtable<Klass*, KlassSubGraphInfo,
214                                137, // prime number
215                                AnyObj::C_HEAP,
216                                mtClassShared,
217                                DumpTimeSharedClassTable_hash> {
218   public:
219     int _count;
220   };
221 
222 public: // solaris compiler wants this for RunTimeKlassSubGraphInfoTable
223   inline static bool record_equals_compact_hashtable_entry(
224        const ArchivedKlassSubGraphInfoRecord* value, const Klass* key, int len_unused) {
225     return (value->klass() == key);
226   }
227 
228 private:
229   typedef OffsetCompactHashtable<
230     const Klass*,
231     const ArchivedKlassSubGraphInfoRecord*,
232     record_equals_compact_hashtable_entry
233     > RunTimeKlassSubGraphInfoTable;
234 
235   static DumpTimeKlassSubGraphInfoTable* _dump_time_subgraph_info_table;
236   static RunTimeKlassSubGraphInfoTable _run_time_subgraph_info_table;
237 
238   static CachedOopInfo make_cached_oop_info(oop obj, oop referrer);
239   static ArchivedKlassSubGraphInfoRecord* archive_subgraph_info(KlassSubGraphInfo* info);
240   static void archive_object_subgraphs(ArchivableStaticFieldInfo fields[],
241                                        bool is_full_module_graph);
242 
243   // Archive object sub-graph starting from the given static field
244   // in Klass k's mirror.
245   static void archive_reachable_objects_from_static_field(
246     InstanceKlass* k, const char* klass_name,
247     int field_offset, const char* field_name);
248 
249   static void verify_subgraph_from_static_field(
250     InstanceKlass* k, int field_offset) PRODUCT_RETURN;
251   static void verify_reachable_objects_from(oop obj) PRODUCT_RETURN;
252   static void verify_subgraph_from(oop orig_obj) PRODUCT_RETURN;
253   static void check_special_subgraph_classes();
254 
255   static KlassSubGraphInfo* init_subgraph_info(Klass *k, bool is_full_module_graph);
256   static KlassSubGraphInfo* get_subgraph_info(Klass *k);
257 
258   static void init_subgraph_entry_fields(TRAPS) NOT_CDS_JAVA_HEAP_RETURN;
259   static void init_subgraph_entry_fields(ArchivableStaticFieldInfo fields[], TRAPS);
260 
261   // UseCompressedOops only: Used by decode_from_archive
262   static address _narrow_oop_base;
263   static int     _narrow_oop_shift;
264 
265   // !UseCompressedOops only: used to relocate pointers to the archived objects
266   static ptrdiff_t _runtime_delta;
267 
268   typedef ResizeableResourceHashtable<oop, bool,
269       AnyObj::C_HEAP,
270       mtClassShared,
271       HeapShared::oop_hash> SeenObjectsTable;
272 
273   static SeenObjectsTable *_seen_objects_table;
274   // The "special subgraph" contains all the archived objects that are reachable
275   // from the following roots:
276   //    - interned strings
277   //    - Klass::java_mirror() -- including aot-initialized mirrors such as those of Enum klasses.
278   //    - ConstantPool::resolved_references()
279   //    - Universe::<xxx>_exception_instance()
280   static KlassSubGraphInfo* _dump_time_special_subgraph;              // for collecting info during dump time
281   static ArchivedKlassSubGraphInfoRecord* _run_time_special_subgraph; // for initializing classes during run time.
282 
283   static GrowableArrayCHeap<OopHandle, mtClassShared>* _pending_roots;
284   static GrowableArrayCHeap<OopHandle, mtClassShared>* _root_segments;
285   static GrowableArrayCHeap<const char*, mtClassShared>* _context; // for debugging unarchivable objects
286   static int _root_segment_max_size_elems;
287   static OopHandle _scratch_basic_type_mirrors[T_VOID+1];
288   static MetaspaceObjToOopHandleTable* _scratch_java_mirror_table;
289   static MetaspaceObjToOopHandleTable* _scratch_references_table;
290 
291   static void init_seen_objects_table() {
292     assert(_seen_objects_table == nullptr, "must be");
293     _seen_objects_table = new (mtClass)SeenObjectsTable(INITIAL_TABLE_SIZE, MAX_TABLE_SIZE);
294   }
295   static void delete_seen_objects_table() {
296     assert(_seen_objects_table != nullptr, "must be");
297     delete _seen_objects_table;
298     _seen_objects_table = nullptr;
299   }
300 
301   class ContextMark;
302 
303   // Statistics (for one round of start_recording_subgraph ... done_recording_subgraph)
304   static int _num_new_walked_objs;
305   static int _num_new_archived_objs;
306   static int _num_old_recorded_klasses;
307 
308   // Statistics (for all archived subgraphs)
309   static int _num_total_subgraph_recordings;
310   static int _num_total_walked_objs;
311   static int _num_total_archived_objs;
312   static int _num_total_recorded_klasses;
313   static int _num_total_verifications;
314 
315   static void start_recording_subgraph(InstanceKlass *k, const char* klass_name,
316                                        bool is_full_module_graph);
317   static void done_recording_subgraph(InstanceKlass *k, const char* klass_name);
318 
319   static bool has_been_seen_during_subgraph_recording(oop obj);
320   static void set_has_been_seen_during_subgraph_recording(oop obj);
321   static bool archive_object(oop obj, oop referrer, KlassSubGraphInfo* subgraph_info);
322 
323   static void resolve_classes_for_subgraphs(JavaThread* current, ArchivableStaticFieldInfo fields[]);
324   static void resolve_classes_for_subgraph_of(JavaThread* current, Klass* k);
325   static void clear_archived_roots_of(Klass* k);
326   static const ArchivedKlassSubGraphInfoRecord*
327                resolve_or_init_classes_for_subgraph_of(Klass* k, bool do_init, TRAPS);
328   static void resolve_or_init(const char* klass_name, bool do_init, TRAPS);
329   static void resolve_or_init(Klass* k, bool do_init, TRAPS);
330   static void init_archived_fields_for(Klass* k, const ArchivedKlassSubGraphInfoRecord* record);
331 
332   static int init_loaded_regions(FileMapInfo* mapinfo, LoadedArchiveHeapRegion* loaded_regions,
333                                  MemRegion& archive_space);
334   static void sort_loaded_regions(LoadedArchiveHeapRegion* loaded_regions, int num_loaded_regions,
335                                   uintptr_t buffer);
336   static bool load_regions(FileMapInfo* mapinfo, LoadedArchiveHeapRegion* loaded_regions,
337                            int num_loaded_regions, uintptr_t buffer);
338   static void init_loaded_heap_relocation(LoadedArchiveHeapRegion* reloc_info,
339                                           int num_loaded_regions);
340   static void fill_failed_loaded_region();
341   static void mark_native_pointers(oop orig_obj);
342   static bool has_been_archived(oop orig_obj);
343   static void prepare_resolved_references();
344   static void archive_strings();
345   static void archive_subgraphs();
346   // PendingOop and PendingOopStack are used for recursively discovering all cacheable
347   // heap objects. The recursion is done using PendingOopStack so we won't overflow the
348   // C stack with deep reference chains.
349   class PendingOop {
350     oop _obj;
351     oop _referrer;
352     int _level;
353 
354   public:
355     PendingOop() : _obj(nullptr), _referrer(nullptr), _level(-1) {}
356     PendingOop(oop obj, oop referrer, int level) : _obj(obj), _referrer(referrer), _level(level) {}
357 
358     oop obj()      const { return _obj; }
359     oop referrer() const { return _referrer; }
360     int level()    const { return _level; }
361   };
362 
363   class ReferentPusher;
364   using PendingOopStack = GrowableArrayCHeap<PendingOop, mtClassShared>;
365 
366   static PendingOop _object_being_archived;
367   static bool walk_one_object(PendingOopStack* stack, int level, KlassSubGraphInfo* subgraph_info,
368                               oop orig_obj, oop referrer);
369 
370  public:
371   static void exit_on_error();
372   static void reset_archived_object_states(TRAPS);
373   static void create_archived_object_cache() {
374     _archived_object_cache =
375       new (mtClass)ArchivedObjectCache(INITIAL_TABLE_SIZE, MAX_TABLE_SIZE);
376   }
377   static void destroy_archived_object_cache() {
378     delete _archived_object_cache;
379     _archived_object_cache = nullptr;
380   }
381   static ArchivedObjectCache* archived_object_cache() {
382     return _archived_object_cache;
383   }
384 
385   static int archive_exception_instance(oop exception);
386 
387   static bool archive_reachable_objects_from(int level,
388                                              KlassSubGraphInfo* subgraph_info,
389                                              oop orig_obj);
390 
391   static void add_to_dumped_interned_strings(oop string);
392   static bool is_dumped_interned_string(oop o);
393 
394   static void track_scratch_object(oop orig_obj, oop scratch_obj);
395 
396   // Scratch objects for archiving Klass::java_mirror()
397   static void set_scratch_java_mirror(Klass* k, oop mirror);
398   static void remove_scratch_objects(Klass* k);
399   static void get_pointer_info(oop src_obj, bool& has_oop_pointers, bool& has_native_pointers);
400   static void set_has_native_pointers(oop src_obj);
401 
402   // We use the HeapShared::roots() array to make sure that objects stored in the
403   // archived heap region are not prematurely collected. These roots include:
404   //
405   //    - mirrors of classes that have not yet been loaded.
406   //    - ConstantPool::resolved_references() of classes that have not yet been loaded.
407   //    - ArchivedKlassSubGraphInfoRecords that have not been initialized
408   //    - java.lang.Module objects that have not yet been added to the module graph
409   //
410   // When a mirror M becomes referenced by a newly loaded class K, M will be removed
411   // from HeapShared::roots() via clear_root(), and K will be responsible for
412   // keeping M alive.
413   //
414   // Other types of roots are also cleared similarly when they become referenced.
415 
416   // Dump-time only. Returns the index of the root, which can be used at run time to read
417   // the root using get_root(index, ...).
418   static int append_root(oop obj);
419   static GrowableArrayCHeap<OopHandle, mtClassShared>* pending_roots() { return _pending_roots; }
420 
421   // Dump-time and runtime
422   static objArrayOop root_segment(int segment_idx);
423   static oop get_root(int index, bool clear=false);
424 
425   // Run-time only
426   static void clear_root(int index);
427   static void get_segment_indexes(int index, int& segment_index, int& internal_index);
428   static void setup_test_class(const char* test_class_name) PRODUCT_RETURN;
429 #endif // INCLUDE_CDS_JAVA_HEAP
430 
431  public:
432   static oop orig_to_scratch_object(oop orig_obj);
433   static void write_heap(ArchiveHeapInfo* heap_info) NOT_CDS_JAVA_HEAP_RETURN;
434   static objArrayOop scratch_resolved_references(ConstantPool* src);
435   static void add_scratch_resolved_references(ConstantPool* src, objArrayOop dest) NOT_CDS_JAVA_HEAP_RETURN;
436   static void init_dumping() NOT_CDS_JAVA_HEAP_RETURN;
437   static void init_scratch_objects(TRAPS) NOT_CDS_JAVA_HEAP_RETURN;
438   static void init_box_classes(TRAPS) NOT_CDS_JAVA_HEAP_RETURN;
439   static bool is_heap_region(int idx) {
440     CDS_JAVA_HEAP_ONLY(return (idx == MetaspaceShared::hp);)
441     NOT_CDS_JAVA_HEAP_RETURN_(false);
442   }
443 
444   static void resolve_classes(JavaThread* current) NOT_CDS_JAVA_HEAP_RETURN;
445   static void initialize_from_archived_subgraph(JavaThread* current, Klass* k) NOT_CDS_JAVA_HEAP_RETURN;
446 
447   static void init_for_dumping(TRAPS) NOT_CDS_JAVA_HEAP_RETURN;
448   static void write_subgraph_info_table() NOT_CDS_JAVA_HEAP_RETURN;
449   static void add_root_segment(objArrayOop segment_oop) NOT_CDS_JAVA_HEAP_RETURN;
450   static void init_root_segment_sizes(int max_size_elems) NOT_CDS_JAVA_HEAP_RETURN;
451   static void serialize_tables(SerializeClosure* soc) NOT_CDS_JAVA_HEAP_RETURN;
452 
453 #ifndef PRODUCT
454   static bool is_a_test_class_in_unnamed_module(Klass* ik) NOT_CDS_JAVA_HEAP_RETURN_(false);
455   static void initialize_test_class_from_archive(TRAPS) NOT_CDS_JAVA_HEAP_RETURN;
456 #endif
457 
458   static void add_to_permanent_oop_table(oop obj, int offset);
459 
460   // AOT-compile time only: get a stable index for an archived object.
461   // Returns 0 if obj is not archived.
462   static int get_archived_object_permanent_index(oop obj) NOT_CDS_JAVA_HEAP_RETURN_(-1);
463   // Runtime only: get back the same object for an index returned by
464   // get_archived_object_permanent_index().
465   static oop get_archived_object(int permanent_index) NOT_CDS_JAVA_HEAP_RETURN_(nullptr);
466 
467   static void initialize_java_lang_invoke(TRAPS) NOT_CDS_JAVA_HEAP_RETURN;
468   static void init_classes_for_special_subgraph(Handle loader, TRAPS) NOT_CDS_JAVA_HEAP_RETURN;
469 
470   static bool is_lambda_form_klass(InstanceKlass* ik) NOT_CDS_JAVA_HEAP_RETURN_(false);
471   static bool is_lambda_proxy_klass(InstanceKlass* ik) NOT_CDS_JAVA_HEAP_RETURN_(false);
472   static bool is_string_concat_klass(InstanceKlass* ik) NOT_CDS_JAVA_HEAP_RETURN_(false);
473   static bool is_archivable_hidden_klass(InstanceKlass* ik) NOT_CDS_JAVA_HEAP_RETURN_(false);
474 
475   // Used by AOTArtifactFinder
476   static void start_scanning_for_oops();
477   static void end_scanning_for_oops();
478   static void scan_java_class(Klass* k);
479   static void scan_java_mirror(oop orig_mirror);
480   static void copy_and_rescan_aot_inited_mirror(InstanceKlass* ik);
481 };
482 
483 class CachedCodeDirectoryInternal {
484   int _permanent_oop_count;
485   int* _permanent_oop_offsets; // offset of each permanent object from the bottom of the archived heap
486 public:
487   void dumptime_init_internal() NOT_CDS_JAVA_HEAP_RETURN;
488   void runtime_init_internal() NOT_CDS_JAVA_HEAP_RETURN;
489 };
490 
491 #if INCLUDE_CDS_JAVA_HEAP
492 class DumpedInternedStrings :
493   public ResizeableResourceHashtable<oop, bool,
494                            AnyObj::C_HEAP,
495                            mtClassShared,
496                            HeapShared::string_oop_hash>
497 {
498 public:
499   DumpedInternedStrings(unsigned size, unsigned max_size) :
500     ResizeableResourceHashtable<oop, bool,
501                                 AnyObj::C_HEAP,
502                                 mtClassShared,
503                                 HeapShared::string_oop_hash>(size, max_size) {}
504 };
505 #endif
506 
507 #endif // SHARE_CDS_HEAPSHARED_HPP