1 /*
  2  * Copyright (c) 1999, 2022, 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 "ci/ciCallSite.hpp"
 27 #include "ci/ciFlatArray.hpp"
 28 #include "ci/ciFlatArrayKlass.hpp"
 29 #include "ci/ciInstance.hpp"
 30 #include "ci/ciInstanceKlass.hpp"
 31 #include "ci/ciMemberName.hpp"
 32 #include "ci/ciMethod.hpp"
 33 #include "ci/ciMethodData.hpp"
 34 #include "ci/ciMethodHandle.hpp"
 35 #include "ci/ciMethodType.hpp"
 36 #include "ci/ciNullObject.hpp"
 37 #include "ci/ciObjArray.hpp"
 38 #include "ci/ciObjArrayKlass.hpp"
 39 #include "ci/ciObject.hpp"
 40 #include "ci/ciObjectFactory.hpp"
 41 #include "ci/ciReplay.hpp"
 42 #include "ci/ciSymbol.hpp"
 43 #include "ci/ciSymbols.hpp"
 44 #include "ci/ciTypeArray.hpp"
 45 #include "ci/ciTypeArrayKlass.hpp"
 46 #include "ci/ciUtilities.inline.hpp"
 47 #include "ci/ciInlineKlass.hpp"
 48 #include "classfile/javaClasses.inline.hpp"
 49 #include "classfile/vmClasses.hpp"
 50 #include "compiler/compiler_globals.hpp"
 51 #include "gc/shared/collectedHeap.inline.hpp"
 52 #include "memory/allocation.inline.hpp"
 53 #include "memory/universe.hpp"
 54 #include "oops/oop.inline.hpp"
 55 #include "runtime/handles.inline.hpp"
 56 #include "runtime/signature.hpp"
 57 #include "utilities/macros.hpp"
 58 
 59 // ciObjectFactory
 60 //
 61 // This class handles requests for the creation of new instances
 62 // of ciObject and its subclasses.  It contains a caching mechanism
 63 // which ensures that for each oop, at most one ciObject is created.
 64 // This invariant allows more efficient implementation of ciObject.
 65 //
 66 // Implementation note: the oop->ciObject mapping is represented as
 67 // a table stored in an array.  Even though objects are moved
 68 // by the garbage collector, the compactor preserves their relative
 69 // order; address comparison of oops (in perm space) is safe so long
 70 // as we prohibit GC during our comparisons.  We currently use binary
 71 // search to find the oop in the table, and inserting a new oop
 72 // into the table may be costly.  If this cost ends up being
 73 // problematic the underlying data structure can be switched to some
 74 // sort of balanced binary tree.
 75 
 76 GrowableArray<ciMetadata*>* ciObjectFactory::_shared_ci_metadata = NULL;
 77 ciSymbol*                 ciObjectFactory::_shared_ci_symbols[vmSymbols::number_of_symbols()];
 78 int                       ciObjectFactory::_shared_ident_limit = 0;
 79 volatile bool             ciObjectFactory::_initialized = false;
 80 
 81 
 82 // ------------------------------------------------------------------
 83 // ciObjectFactory::ciObjectFactory
 84 ciObjectFactory::ciObjectFactory(Arena* arena,
 85                                  int expected_size)
 86                                  : _arena(arena),
 87                                    _ci_metadata(arena, expected_size, 0, NULL),
 88                                    _unloaded_methods(arena, 4, 0, NULL),
 89                                    _unloaded_klasses(arena, 8, 0, NULL),
 90                                    _unloaded_instances(arena, 4, 0, NULL),
 91                                    _return_addresses(arena, 8, 0, NULL),
 92                                    _symbols(arena, 100, 0, NULL),
 93                                    _next_ident(_shared_ident_limit),
 94                                    _non_perm_count(0) {
 95   for (int i = 0; i < NON_PERM_BUCKETS; i++) {
 96     _non_perm_bucket[i] = NULL;
 97   }
 98 
 99   // If the shared ci objects exist append them to this factory's objects
100   if (_shared_ci_metadata != NULL) {
101     _ci_metadata.appendAll(_shared_ci_metadata);
102   }
103 }
104 
105 // ------------------------------------------------------------------
106 // ciObjectFactory::ciObjectFactory
107 void ciObjectFactory::initialize() {
108   ASSERT_IN_VM;
109   JavaThread* thread = JavaThread::current();
110   HandleMark  handle_mark(thread);
111 
112   // This Arena is long lived and exists in the resource mark of the
113   // compiler thread that initializes the initial ciObjectFactory which
114   // creates the shared ciObjects that all later ciObjectFactories use.
115   Arena* arena = new (mtCompiler) Arena(mtCompiler);
116   ciEnv initial(arena);
117   ciEnv* env = ciEnv::current();
118   env->_factory->init_shared_objects();
119 
120   _initialized = true;
121 
122 }
123 
124 void ciObjectFactory::init_shared_objects() {
125 
126   _next_ident = 1;  // start numbering CI objects at 1
127 
128   {
129     // Create the shared symbols, but not in _shared_ci_metadata.
130     for (auto index : EnumRange<vmSymbolID>{}) {
131       Symbol* vmsym = vmSymbols::symbol_at(index);
132       assert(vmSymbols::find_sid(vmsym) == index, "1-1 mapping");
133       ciSymbol* sym = new (_arena) ciSymbol(vmsym, index);
134       init_ident_of(sym);
135       _shared_ci_symbols[vmSymbols::as_int(index)] = sym;
136     }
137 #ifdef ASSERT
138     for (auto index : EnumRange<vmSymbolID>{}) {
139       Symbol* vmsym = vmSymbols::symbol_at(index);
140       ciSymbol* sym = vm_symbol_at(index);
141       assert(sym->get_symbol() == vmsym, "oop must match");
142     }
143     assert(ciSymbols::void_class_signature()->get_symbol() == vmSymbols::void_class_signature(), "spot check");
144 #endif
145   }
146 
147   for (int i = T_BOOLEAN; i <= T_CONFLICT; i++) {
148     BasicType t = (BasicType)i;
149     if (type2name(t) != NULL && !is_reference_type(t) &&
150         t != T_NARROWOOP && t != T_NARROWKLASS) {
151       ciType::_basic_types[t] = new (_arena) ciType(t);
152       init_ident_of(ciType::_basic_types[t]);
153     }
154   }
155 
156   ciEnv::_null_object_instance = new (_arena) ciNullObject();
157   init_ident_of(ciEnv::_null_object_instance);
158 
159 #define VM_CLASS_DEFN(name, ignore_s)                              \
160   if (vmClasses::name##_is_loaded()) \
161     ciEnv::_##name = get_metadata(vmClasses::name())->as_instance_klass();
162 
163   VM_CLASSES_DO(VM_CLASS_DEFN)
164 #undef VM_CLASS_DEFN
165 
166   for (int len = -1; len != _ci_metadata.length(); ) {
167     len = _ci_metadata.length();
168     for (int i2 = 0; i2 < len; i2++) {
169       ciMetadata* obj = _ci_metadata.at(i2);
170       assert (obj->is_metadata(), "what else would it be?");
171       if (obj->is_loaded() && obj->is_instance_klass()) {
172         obj->as_instance_klass()->compute_nonstatic_fields();
173       }
174     }
175   }
176 
177   ciEnv::_unloaded_cisymbol = ciObjectFactory::get_symbol(vmSymbols::dummy_symbol());
178   // Create dummy InstanceKlass and ObjArrayKlass object and assign them idents
179   ciEnv::_unloaded_ciinstance_klass = new (_arena) ciInstanceKlass(ciEnv::_unloaded_cisymbol, NULL, NULL);
180   init_ident_of(ciEnv::_unloaded_ciinstance_klass);
181   ciEnv::_unloaded_ciobjarrayklass = new (_arena) ciObjArrayKlass(ciEnv::_unloaded_cisymbol, ciEnv::_unloaded_ciinstance_klass, 1);
182   init_ident_of(ciEnv::_unloaded_ciobjarrayklass);
183   assert(ciEnv::_unloaded_ciobjarrayklass->is_obj_array_klass(), "just checking");
184 
185   get_metadata(Universe::boolArrayKlassObj());
186   get_metadata(Universe::charArrayKlassObj());
187   get_metadata(Universe::floatArrayKlassObj());
188   get_metadata(Universe::doubleArrayKlassObj());
189   get_metadata(Universe::byteArrayKlassObj());
190   get_metadata(Universe::shortArrayKlassObj());
191   get_metadata(Universe::intArrayKlassObj());
192   get_metadata(Universe::longArrayKlassObj());
193 
194   assert(_non_perm_count == 0, "no shared non-perm objects");
195 
196   // The shared_ident_limit is the first ident number that will
197   // be used for non-shared objects.  That is, numbers less than
198   // this limit are permanently assigned to shared CI objects,
199   // while the higher numbers are recycled afresh by each new ciEnv.
200 
201   _shared_ident_limit = _next_ident;
202   _shared_ci_metadata = &_ci_metadata;
203 }
204 
205 
206 ciSymbol* ciObjectFactory::get_symbol(Symbol* key) {
207   vmSymbolID sid = vmSymbols::find_sid(key);
208   if (sid != vmSymbolID::NO_SID) {
209     // do not pollute the main cache with it
210     return vm_symbol_at(sid);
211   }
212 
213   assert(vmSymbols::find_sid(key) == vmSymbolID::NO_SID, "");
214   ciSymbol* s = new (arena()) ciSymbol(key, vmSymbolID::NO_SID);
215   _symbols.push(s);
216   return s;
217 }
218 
219 // Decrement the refcount when done on symbols referenced by this compilation.
220 void ciObjectFactory::remove_symbols() {
221   for (int i = 0; i < _symbols.length(); i++) {
222     ciSymbol* s = _symbols.at(i);
223     s->get_symbol()->decrement_refcount();
224   }
225   // Since _symbols is resource allocated we're not allowed to delete it
226   // but it'll go away just the same.
227 }
228 
229 // ------------------------------------------------------------------
230 // ciObjectFactory::get
231 //
232 // Get the ciObject corresponding to some oop.  If the ciObject has
233 // already been created, it is returned.  Otherwise, a new ciObject
234 // is created.
235 ciObject* ciObjectFactory::get(oop key) {
236   ASSERT_IN_VM;
237 
238   assert(Universe::heap()->is_in(key), "must be");
239 
240   NonPermObject* &bucket = find_non_perm(key);
241   if (bucket != NULL) {
242     return bucket->object();
243   }
244 
245   // The ciObject does not yet exist.  Create it and insert it
246   // into the cache.
247   Handle keyHandle(Thread::current(), key);
248   ciObject* new_object = create_new_object(keyHandle());
249   assert(keyHandle() == new_object->get_oop(), "must be properly recorded");
250   init_ident_of(new_object);
251   assert(Universe::heap()->is_in(new_object->get_oop()), "must be");
252 
253   // Not a perm-space object.
254   insert_non_perm(bucket, keyHandle(), new_object);
255   return new_object;
256 }
257 
258 int ciObjectFactory::metadata_compare(Metadata* const& key, ciMetadata* const& elt) {
259   Metadata* value = elt->constant_encoding();
260   if (key < value)      return -1;
261   else if (key > value) return 1;
262   else                  return 0;
263 }
264 
265 // ------------------------------------------------------------------
266 // ciObjectFactory::cached_metadata
267 //
268 // Get the ciMetadata corresponding to some Metadata. If the ciMetadata has
269 // already been created, it is returned. Otherwise, null is returned.
270 ciMetadata* ciObjectFactory::cached_metadata(Metadata* key) {
271   ASSERT_IN_VM;
272 
273   bool found = false;
274   int index = _ci_metadata.find_sorted<Metadata*, ciObjectFactory::metadata_compare>(key, found);
275 
276   if (!found) {
277     return NULL;
278   }
279   return _ci_metadata.at(index)->as_metadata();
280 }
281 
282 
283 // ------------------------------------------------------------------
284 // ciObjectFactory::get_metadata
285 //
286 // Get the ciMetadata corresponding to some Metadata. If the ciMetadata has
287 // already been created, it is returned. Otherwise, a new ciMetadata
288 // is created.
289 ciMetadata* ciObjectFactory::get_metadata(Metadata* key) {
290   ASSERT_IN_VM;
291 
292   if (ReplayCompiles && key->is_klass()) {
293     Klass* k = (Klass*)key;
294     if (k->is_instance_klass() && ciReplay::is_klass_unresolved((InstanceKlass*)k)) {
295       // Klass was unresolved at replay dump time. Simulate this case.
296       return ciEnv::_unloaded_ciinstance_klass;
297     }
298   }
299 
300 #ifdef ASSERT
301   if (CIObjectFactoryVerify) {
302     Metadata* last = NULL;
303     for (int j = 0; j < _ci_metadata.length(); j++) {
304       Metadata* o = _ci_metadata.at(j)->constant_encoding();
305       assert(last < o, "out of order");
306       last = o;
307     }
308   }
309 #endif // ASSERT
310   int len = _ci_metadata.length();
311   bool found = false;
312   int index = _ci_metadata.find_sorted<Metadata*, ciObjectFactory::metadata_compare>(key, found);
313 #ifdef ASSERT
314   if (CIObjectFactoryVerify) {
315     for (int i = 0; i < _ci_metadata.length(); i++) {
316       if (_ci_metadata.at(i)->constant_encoding() == key) {
317         assert(index == i, " bad lookup");
318       }
319     }
320   }
321 #endif
322 
323   if (!found) {
324     // The ciMetadata does not yet exist. Create it and insert it
325     // into the cache.
326     ciMetadata* new_object = create_new_metadata(key);
327     init_ident_of(new_object);
328     assert(new_object->is_metadata(), "must be");
329 
330     if (len != _ci_metadata.length()) {
331       // creating the new object has recursively entered new objects
332       // into the table.  We need to recompute our index.
333       index = _ci_metadata.find_sorted<Metadata*, ciObjectFactory::metadata_compare>(key, found);
334     }
335     assert(!found, "no double insert");
336     _ci_metadata.insert_before(index, new_object);
337     return new_object;
338   }
339   return _ci_metadata.at(index)->as_metadata();
340 }
341 
342 // ------------------------------------------------------------------
343 // ciObjectFactory::create_new_object
344 //
345 // Create a new ciObject from an oop.
346 //
347 // Implementation note: this functionality could be virtual behavior
348 // of the oop itself.  For now, we explicitly marshal the object.
349 ciObject* ciObjectFactory::create_new_object(oop o) {
350   EXCEPTION_CONTEXT;
351 
352   if (o->is_instance()) {
353     instanceHandle h_i(THREAD, (instanceOop)o);
354     if (java_lang_invoke_CallSite::is_instance(o))
355       return new (arena()) ciCallSite(h_i);
356     else if (java_lang_invoke_MemberName::is_instance(o))
357       return new (arena()) ciMemberName(h_i);
358     else if (java_lang_invoke_MethodHandle::is_instance(o))
359       return new (arena()) ciMethodHandle(h_i);
360     else if (java_lang_invoke_MethodType::is_instance(o))
361       return new (arena()) ciMethodType(h_i);
362     else
363       return new (arena()) ciInstance(h_i);
364   } else if (o->is_objArray()) {
365     objArrayHandle h_oa(THREAD, (objArrayOop)o);
366     return new (arena()) ciObjArray(h_oa);
367   } else if (o->is_typeArray()) {
368     typeArrayHandle h_ta(THREAD, (typeArrayOop)o);
369     return new (arena()) ciTypeArray(h_ta);
370   } else if (o->is_flatArray()) {
371     flatArrayHandle h_ta(THREAD, (flatArrayOop)o);
372     return new (arena()) ciFlatArray(h_ta);
373   }
374 
375   // The oop is of some type not supported by the compiler interface.
376   ShouldNotReachHere();
377   return NULL;
378 }
379 
380 // ------------------------------------------------------------------
381 // ciObjectFactory::create_new_metadata
382 //
383 // Create a new ciMetadata from a Metadata*.
384 //
385 // Implementation note: in order to keep Metadata live, an auxiliary ciObject
386 // is used, which points to it's holder.
387 ciMetadata* ciObjectFactory::create_new_metadata(Metadata* o) {
388   EXCEPTION_CONTEXT;
389 
390   if (o->is_klass()) {
391     Klass* k = (Klass*)o;
392     if (k->is_inline_klass()) {
393       return new (arena()) ciInlineKlass(k);
394     } else if (k->is_instance_klass()) {
395       assert(!ReplayCompiles || ciReplay::no_replay_state() || !ciReplay::is_klass_unresolved((InstanceKlass*)k), "must be whitelisted for replay compilation");
396       return new (arena()) ciInstanceKlass(k);
397     } else if (k->is_flatArray_klass()) {
398       return new (arena()) ciFlatArrayKlass(k);
399     } else if (k->is_objArray_klass()) {
400       return new (arena()) ciObjArrayKlass(k);
401     } else if (k->is_typeArray_klass()) {
402       return new (arena()) ciTypeArrayKlass(k);
403     }
404   } else if (o->is_method()) {
405     methodHandle h_m(THREAD, (Method*)o);
406     ciEnv *env = CURRENT_THREAD_ENV;
407     ciInstanceKlass* holder = env->get_instance_klass(h_m()->method_holder());
408     return new (arena()) ciMethod(h_m, holder);
409   } else if (o->is_methodData()) {
410     // Hold methodHandle alive - might not be necessary ???
411     methodHandle h_m(THREAD, ((MethodData*)o)->method());
412     return new (arena()) ciMethodData((MethodData*)o);
413   }
414 
415   // The Metadata* is of some type not supported by the compiler interface.
416   ShouldNotReachHere();
417   return NULL;
418 }
419 
420 //------------------------------------------------------------------
421 // ciObjectFactory::get_unloaded_method
422 //
423 // Get the ciMethod representing an unloaded/unfound method.
424 //
425 // Implementation note: unloaded methods are currently stored in
426 // an unordered array, requiring a linear-time lookup for each
427 // unloaded method.  This may need to change.
428 ciMethod* ciObjectFactory::get_unloaded_method(ciInstanceKlass* holder,
429                                                ciSymbol*        name,
430                                                ciSymbol*        signature,
431                                                ciInstanceKlass* accessor) {
432   assert(accessor != NULL, "need origin of access");
433   ciSignature* that = NULL;
434   for (int i = 0; i < _unloaded_methods.length(); i++) {
435     ciMethod* entry = _unloaded_methods.at(i);
436     if (entry->holder()->equals(holder) &&
437         entry->name()->equals(name) &&
438         entry->signature()->as_symbol()->equals(signature)) {
439       // Short-circuit slow resolve.
440       if (entry->signature()->accessing_klass() == accessor) {
441         // We've found a match.
442         return entry;
443       } else {
444         // Lazily create ciSignature
445         if (that == NULL)  that = new (arena()) ciSignature(accessor, constantPoolHandle(), signature);
446         if (entry->signature()->equals(that)) {
447           // We've found a match.
448           return entry;
449         }
450       }
451     }
452   }
453 
454   // This is a new unloaded method.  Create it and stick it in
455   // the cache.
456   ciMethod* new_method = new (arena()) ciMethod(holder, name, signature, accessor);
457 
458   init_ident_of(new_method);
459   _unloaded_methods.append(new_method);
460 
461   return new_method;
462 }
463 
464 //------------------------------------------------------------------
465 // ciObjectFactory::get_unloaded_klass
466 //
467 // Get a ciKlass representing an unloaded klass.
468 //
469 // Implementation note: unloaded klasses are currently stored in
470 // an unordered array, requiring a linear-time lookup for each
471 // unloaded klass.  This may need to change.
472 ciKlass* ciObjectFactory::get_unloaded_klass(ciKlass* accessing_klass,
473                                              ciSymbol* name,
474                                              bool create_if_not_found) {
475   EXCEPTION_CONTEXT;
476   oop loader = NULL;
477   oop domain = NULL;
478   if (accessing_klass != NULL) {
479     loader = accessing_klass->loader();
480     domain = accessing_klass->protection_domain();
481   }
482   for (int i = 0; i < _unloaded_klasses.length(); i++) {
483     ciKlass* entry = _unloaded_klasses.at(i);
484     if (entry->name()->equals(name) &&
485         entry->loader() == loader &&
486         entry->protection_domain() == domain) {
487       // We've found a match.
488       return entry;
489     }
490   }
491 
492   if (!create_if_not_found)
493     return NULL;
494 
495   // This is a new unloaded klass.  Create it and stick it in
496   // the cache.
497   ciKlass* new_klass = NULL;
498 
499   // Two cases: this is an unloaded ObjArrayKlass or an
500   // unloaded InstanceKlass.  Deal with both.
501   if (name->char_at(0) == JVM_SIGNATURE_ARRAY) {
502     // Decompose the name.'
503     SignatureStream ss(name->get_symbol(), false);
504     int dimension = ss.skip_array_prefix();  // skip all '['s
505     BasicType element_type = ss.type();
506     assert(element_type != T_ARRAY, "unsuccessful decomposition");
507     ciKlass* element_klass = NULL;
508     if (element_type == T_OBJECT || element_type == T_PRIMITIVE_OBJECT) {
509       ciEnv *env = CURRENT_THREAD_ENV;
510       ciSymbol* ci_name = env->get_symbol(ss.as_symbol());
511       element_klass =
512         env->get_klass_by_name(accessing_klass, ci_name, false)->as_instance_klass();
513     } else {
514       assert(dimension > 1, "one dimensional type arrays are always loaded.");
515 
516       // The type array itself takes care of one of the dimensions.
517       dimension--;
518 
519       // The element klass is a TypeArrayKlass.
520       element_klass = ciTypeArrayKlass::make(element_type);
521     }
522     new_klass = new (arena()) ciObjArrayKlass(name, element_klass, dimension);
523   } else {
524     jobject loader_handle = NULL;
525     jobject domain_handle = NULL;
526     if (accessing_klass != NULL) {
527       loader_handle = accessing_klass->loader_handle();
528       domain_handle = accessing_klass->protection_domain_handle();
529     }
530     new_klass = new (arena()) ciInstanceKlass(name, loader_handle, domain_handle);
531   }
532   init_ident_of(new_klass);
533   _unloaded_klasses.append(new_klass);
534 
535   return new_klass;
536 }
537 
538 
539 //------------------------------------------------------------------
540 // ciObjectFactory::get_unloaded_instance
541 //
542 // Get a ciInstance representing an as-yet undetermined instance of a given class.
543 //
544 ciInstance* ciObjectFactory::get_unloaded_instance(ciInstanceKlass* instance_klass) {
545   for (int i = 0; i < _unloaded_instances.length(); i++) {
546     ciInstance* entry = _unloaded_instances.at(i);
547     if (entry->klass()->equals(instance_klass)) {
548       // We've found a match.
549       return entry;
550     }
551   }
552 
553   // This is a new unloaded instance.  Create it and stick it in
554   // the cache.
555   ciInstance* new_instance = new (arena()) ciInstance(instance_klass);
556 
557   init_ident_of(new_instance);
558   _unloaded_instances.append(new_instance);
559 
560   // make sure it looks the way we want:
561   assert(!new_instance->is_loaded(), "");
562   assert(new_instance->klass() == instance_klass, "");
563 
564   return new_instance;
565 }
566 
567 
568 //------------------------------------------------------------------
569 // ciObjectFactory::get_unloaded_klass_mirror
570 //
571 // Get a ciInstance representing an unresolved klass mirror.
572 //
573 // Currently, this ignores the parameters and returns a unique unloaded instance.
574 ciInstance* ciObjectFactory::get_unloaded_klass_mirror(ciKlass* type) {
575   assert(ciEnv::_Class_klass != NULL, "");
576   return get_unloaded_instance(ciEnv::_Class_klass->as_instance_klass());
577 }
578 
579 //------------------------------------------------------------------
580 // ciObjectFactory::get_unloaded_method_handle_constant
581 //
582 // Get a ciInstance representing an unresolved method handle constant.
583 //
584 // Currently, this ignores the parameters and returns a unique unloaded instance.
585 ciInstance* ciObjectFactory::get_unloaded_method_handle_constant(ciKlass*  holder,
586                                                                  ciSymbol* name,
587                                                                  ciSymbol* signature,
588                                                                  int       ref_kind) {
589   assert(ciEnv::_MethodHandle_klass != NULL, "");
590   return get_unloaded_instance(ciEnv::_MethodHandle_klass->as_instance_klass());
591 }
592 
593 //------------------------------------------------------------------
594 // ciObjectFactory::get_unloaded_method_type_constant
595 //
596 // Get a ciInstance representing an unresolved method type constant.
597 //
598 // Currently, this ignores the parameters and returns a unique unloaded instance.
599 ciInstance* ciObjectFactory::get_unloaded_method_type_constant(ciSymbol* signature) {
600   assert(ciEnv::_MethodType_klass != NULL, "");
601   return get_unloaded_instance(ciEnv::_MethodType_klass->as_instance_klass());
602 }
603 
604 ciInstance* ciObjectFactory::get_unloaded_object_constant() {
605   assert(ciEnv::_Object_klass != NULL, "");
606   return get_unloaded_instance(ciEnv::_Object_klass->as_instance_klass());
607 }
608 
609 //------------------------------------------------------------------
610 // ciObjectFactory::get_empty_methodData
611 //
612 // Get the ciMethodData representing the methodData for a method with
613 // none.
614 ciMethodData* ciObjectFactory::get_empty_methodData() {
615   ciMethodData* new_methodData = new (arena()) ciMethodData();
616   init_ident_of(new_methodData);
617   return new_methodData;
618 }
619 
620 //------------------------------------------------------------------
621 // ciObjectFactory::get_return_address
622 //
623 // Get a ciReturnAddress for a specified bci.
624 ciReturnAddress* ciObjectFactory::get_return_address(int bci) {
625   for (int i = 0; i < _return_addresses.length(); i++) {
626     ciReturnAddress* entry = _return_addresses.at(i);
627     if (entry->bci() == bci) {
628       // We've found a match.
629       return entry;
630     }
631   }
632 
633   ciReturnAddress* new_ret_addr = new (arena()) ciReturnAddress(bci);
634   init_ident_of(new_ret_addr);
635   _return_addresses.append(new_ret_addr);
636   return new_ret_addr;
637 }
638 
639 ciWrapper* ciObjectFactory::make_null_free_wrapper(ciType* type) {
640   ciWrapper* wrapper = new (arena()) ciWrapper(type);
641   init_ident_of(wrapper);
642   return wrapper;
643 }
644 
645 // ------------------------------------------------------------------
646 // ciObjectFactory::init_ident_of
647 void ciObjectFactory::init_ident_of(ciBaseObject* obj) {
648   obj->set_ident(_next_ident++);
649 }
650 
651 static ciObjectFactory::NonPermObject* emptyBucket = NULL;
652 
653 // ------------------------------------------------------------------
654 // ciObjectFactory::find_non_perm
655 //
656 // Use a small hash table, hashed on the klass of the key.
657 // If there is no entry in the cache corresponding to this oop, return
658 // the null tail of the bucket into which the oop should be inserted.
659 ciObjectFactory::NonPermObject* &ciObjectFactory::find_non_perm(oop key) {
660   assert(Universe::heap()->is_in(key), "must be");
661   ciMetadata* klass = get_metadata(key->klass());
662   NonPermObject* *bp = &_non_perm_bucket[(unsigned) klass->hash() % NON_PERM_BUCKETS];
663   for (NonPermObject* p; (p = (*bp)) != NULL; bp = &p->next()) {
664     if (is_equal(p, key))  break;
665   }
666   return (*bp);
667 }
668 
669 
670 
671 // ------------------------------------------------------------------
672 // Code for for NonPermObject
673 //
674 inline ciObjectFactory::NonPermObject::NonPermObject(ciObjectFactory::NonPermObject* &bucket, oop key, ciObject* object) {
675   assert(ciObjectFactory::is_initialized(), "");
676   _object = object;
677   _next = bucket;
678   bucket = this;
679 }
680 
681 
682 
683 // ------------------------------------------------------------------
684 // ciObjectFactory::insert_non_perm
685 //
686 // Insert a ciObject into the non-perm table.
687 void ciObjectFactory::insert_non_perm(ciObjectFactory::NonPermObject* &where, oop key, ciObject* obj) {
688   assert(Universe::heap()->is_in_or_null(key), "must be");
689   assert(&where != &emptyBucket, "must not try to fill empty bucket");
690   NonPermObject* p = new (arena()) NonPermObject(where, key, obj);
691   assert(where == p && is_equal(p, key) && p->object() == obj, "entry must match");
692   assert(find_non_perm(key) == p, "must find the same spot");
693   ++_non_perm_count;
694 }
695 
696 // ------------------------------------------------------------------
697 // ciObjectFactory::vm_symbol_at
698 // Get the ciSymbol corresponding to some index in vmSymbols.
699 ciSymbol* ciObjectFactory::vm_symbol_at(vmSymbolID sid) {
700   int index = vmSymbols::as_int(sid);
701   return _shared_ci_symbols[index];
702 }
703 
704 // ------------------------------------------------------------------
705 // ciObjectFactory::metadata_do
706 void ciObjectFactory::metadata_do(MetadataClosure* f) {
707   for (int j = 0; j < _ci_metadata.length(); j++) {
708     Metadata* o = _ci_metadata.at(j)->constant_encoding();
709     f->do_metadata(o);
710   }
711 }
712 
713 // ------------------------------------------------------------------
714 // ciObjectFactory::print_contents_impl
715 void ciObjectFactory::print_contents_impl() {
716   int len = _ci_metadata.length();
717   tty->print_cr("ciObjectFactory (%d) meta data contents:", len);
718   for (int i = 0; i < len; i++) {
719     _ci_metadata.at(i)->print();
720     tty->cr();
721   }
722 }
723 
724 // ------------------------------------------------------------------
725 // ciObjectFactory::print_contents
726 void ciObjectFactory::print_contents() {
727   print();
728   tty->cr();
729   GUARDED_VM_ENTRY(print_contents_impl();)
730 }
731 
732 // ------------------------------------------------------------------
733 // ciObjectFactory::print
734 //
735 // Print debugging information about the object factory
736 void ciObjectFactory::print() {
737   tty->print("<ciObjectFactory oops=%d metadata=%d unloaded_methods=%d unloaded_instances=%d unloaded_klasses=%d>",
738              _non_perm_count, _ci_metadata.length(), _unloaded_methods.length(),
739              _unloaded_instances.length(),
740              _unloaded_klasses.length());
741 }