1 /*
  2  * Copyright (c) 1999, 2020, 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_CI_CIENV_HPP
 26 #define SHARE_CI_CIENV_HPP
 27 
 28 #include "ci/ciClassList.hpp"
 29 #include "ci/ciObjectFactory.hpp"
 30 #include "code/debugInfoRec.hpp"
 31 #include "code/dependencies.hpp"
 32 #include "code/exceptionHandlerTable.hpp"
 33 #include "compiler/oopMap.hpp"
 34 #include "oops/methodData.hpp"
 35 #include "runtime/thread.hpp"
 36 
 37 class CompileTask;
 38 
 39 // ciEnv
 40 //
 41 // This class is the top level broker for requests from the compiler
 42 // to the VM.
 43 class ciEnv : StackObj {
 44   CI_PACKAGE_ACCESS_TO
 45 
 46   friend class CompileBroker;
 47   friend class Dependencies;  // for get_object, during logging
 48   friend class PrepareExtraDataClosure;
 49 
 50 private:
 51   Arena*           _arena;       // Alias for _ciEnv_arena except in init_shared_objects()
 52   Arena            _ciEnv_arena;
 53   ciObjectFactory* _factory;
 54   OopRecorder*     _oop_recorder;
 55   DebugInformationRecorder* _debug_info;
 56   Dependencies*    _dependencies;
 57   const char*      _failure_reason;
 58   bool             _inc_decompile_count_on_failure;
 59   int              _compilable;
 60   bool             _break_at_compile;
 61   int              _num_inlined_bytecodes;
 62   CompileTask*     _task;           // faster access to CompilerThread::task
 63   CompileLog*      _log;            // faster access to CompilerThread::log
 64   void*            _compiler_data;  // compiler-specific stuff, if any
 65 
 66   char* _name_buffer;
 67   int   _name_buffer_len;
 68 
 69   // Cache Jvmti state
 70   uint64_t _jvmti_redefinition_count;
 71   bool  _jvmti_can_hotswap_or_post_breakpoint;
 72   bool  _jvmti_can_access_local_variables;
 73   bool  _jvmti_can_post_on_exceptions;
 74   bool  _jvmti_can_pop_frame;
 75   bool  _jvmti_can_get_owned_monitor_info; // includes can_get_owned_monitor_stack_depth_info
 76 
 77   // Cache DTrace flags
 78   bool  _dtrace_extended_probes;
 79   bool  _dtrace_monitor_probes;
 80   bool  _dtrace_method_probes;
 81   bool  _dtrace_alloc_probes;
 82 
 83   // Distinguished instances of certain ciObjects..
 84   static ciObject*              _null_object_instance;
 85 
 86 #define WK_KLASS_DECL(name, ignore_s) static ciInstanceKlass* _##name;
 87   WK_KLASSES_DO(WK_KLASS_DECL)
 88 #undef WK_KLASS_DECL
 89 
 90   static ciSymbol*        _unloaded_cisymbol;
 91   static ciInstanceKlass* _unloaded_ciinstance_klass;
 92   static ciObjArrayKlass* _unloaded_ciobjarrayklass;
 93 
 94   static jobject _ArrayIndexOutOfBoundsException_handle;
 95   static jobject _ArrayStoreException_handle;
 96   static jobject _ClassCastException_handle;
 97 
 98   ciInstance* _NullPointerException_instance;
 99   ciInstance* _ArithmeticException_instance;
100   ciInstance* _ArrayIndexOutOfBoundsException_instance;
101   ciInstance* _ArrayStoreException_instance;
102   ciInstance* _ClassCastException_instance;
103 
104   ciInstance* _the_null_string;      // The Java string "null"
105   ciInstance* _the_min_jint_string; // The Java string "-2147483648"
106 
107   // Look up a klass by name from a particular class loader (the accessor's).
108   // If require_local, result must be defined in that class loader, or NULL.
109   // If !require_local, a result from remote class loader may be reported,
110   // if sufficient class loader constraints exist such that initiating
111   // a class loading request from the given loader is bound to return
112   // the class defined in the remote loader (or throw an error).
113   //
114   // Return an unloaded klass if !require_local and no class at all is found.
115   //
116   // The CI treats a klass as loaded if it is consistently defined in
117   // another loader, even if it hasn't yet been loaded in all loaders
118   // that could potentially see it via delegation.
119   ciKlass* get_klass_by_name(ciKlass* accessing_klass,
120                              ciSymbol* klass_name,
121                              bool require_local);
122 
123   // Constant pool access.
124   ciKlass*   get_klass_by_index(const constantPoolHandle& cpool,
125                                 int klass_index,
126                                 bool& is_accessible,
127                                 ciInstanceKlass* loading_klass);
128   ciConstant get_constant_by_index(const constantPoolHandle& cpool,
129                                    int pool_index, int cache_index,
130                                    ciInstanceKlass* accessor);
131   ciField*   get_field_by_index(ciInstanceKlass* loading_klass,
132                                 int field_index);
133   ciMethod*  get_method_by_index(const constantPoolHandle& cpool,
134                                  int method_index, Bytecodes::Code bc,
135                                  ciInstanceKlass* loading_klass);
136   bool       is_inline_klass(const constantPoolHandle& cpool,
137                              int klass_index);
138 
139   // Implementation methods for loading and constant pool access.
140   ciKlass* get_klass_by_name_impl(ciKlass* accessing_klass,
141                                   const constantPoolHandle& cpool,
142                                   ciSymbol* klass_name,
143                                   bool require_local);
144   ciKlass*   get_klass_by_index_impl(const constantPoolHandle& cpool,
145                                      int klass_index,
146                                      bool& is_accessible,
147                                      ciInstanceKlass* loading_klass);
148   ciConstant get_constant_by_index_impl(const constantPoolHandle& cpool,
149                                         int pool_index, int cache_index,
150                                         ciInstanceKlass* loading_klass);
151   ciField*   get_field_by_index_impl(ciInstanceKlass* loading_klass,
152                                      int field_index);
153   ciMethod*  get_method_by_index_impl(const constantPoolHandle& cpool,
154                                       int method_index, Bytecodes::Code bc,
155                                       ciInstanceKlass* loading_klass);
156 
157   // Helper methods
158   bool       check_klass_accessibility(ciKlass* accessing_klass,
159                                       Klass* resolved_klass);
160   Method*    lookup_method(ciInstanceKlass* accessor,
161                            ciKlass*         holder,
162                            Symbol*          name,
163                            Symbol*          sig,
164                            Bytecodes::Code  bc,
165                            constantTag      tag);
166 
167   // Get a ciObject from the object factory.  Ensures uniqueness
168   // of ciObjects.
169   ciObject* get_object(oop o) {
170     if (o == NULL) {
171       return _null_object_instance;
172     } else {
173       return _factory->get(o);
174     }
175   }
176 
177   ciSymbol* get_symbol(Symbol* o) {
178     if (o == NULL) {
179       ShouldNotReachHere();
180       return NULL;
181     } else {
182       return _factory->get_symbol(o);
183     }
184   }
185 
186   ciMetadata* get_metadata(Metadata* o) {
187     if (o == NULL) {
188       return NULL;
189     } else {
190       return _factory->get_metadata(o);
191     }
192   }
193 
194   ciMetadata* cached_metadata(Metadata* o) {
195     return _factory->cached_metadata(o);
196   }
197 
198   ciInstance* get_instance(oop o) {
199     if (o == NULL) return NULL;
200     return get_object(o)->as_instance();
201   }
202   ciFlatArrayKlass* get_flat_array_klass(Klass* o) {
203     if (o == NULL) return NULL;
204     return get_metadata(o)->as_flat_array_klass();
205   }
206   ciObjArrayKlass* get_obj_array_klass(Klass* o) {
207     if (o == NULL) return NULL;
208     return get_metadata(o)->as_obj_array_klass();
209   }
210   ciTypeArrayKlass* get_type_array_klass(Klass* o) {
211     if (o == NULL) return NULL;
212     return get_metadata(o)->as_type_array_klass();
213   }
214   ciKlass* get_klass(Klass* o) {
215     if (o == NULL) return NULL;
216     return get_metadata(o)->as_klass();
217   }
218   ciInstanceKlass* get_instance_klass(Klass* o) {
219     if (o == NULL) return NULL;
220     return get_metadata(o)->as_instance_klass();
221   }
222   ciMethod* get_method(Method* o) {
223     if (o == NULL) return NULL;
224     return get_metadata(o)->as_method();
225   }
226   ciMethodData* get_method_data(MethodData* o) {
227     if (o == NULL) return NULL;
228     return get_metadata(o)->as_method_data();
229   }
230 
231   ciMethod* get_method_from_handle(Method* method);
232 
233   ciInstance* get_or_create_exception(jobject& handle, Symbol* name);
234 
235   // Get a ciMethod representing either an unfound method or
236   // a method with an unloaded holder.  Ensures uniqueness of
237   // the result.
238   ciMethod* get_unloaded_method(ciKlass*         holder,
239                                 ciSymbol*        name,
240                                 ciSymbol*        signature,
241                                 ciInstanceKlass* accessor) {
242     ciInstanceKlass* declared_holder = get_instance_klass_for_declared_method_holder(holder);
243     return _factory->get_unloaded_method(declared_holder, name, signature, accessor);
244   }
245 
246   // Get a ciKlass representing an unloaded klass.
247   // Ensures uniqueness of the result.
248   ciKlass* get_unloaded_klass(ciKlass*  accessing_klass,
249                               ciSymbol* name) {
250     return _factory->get_unloaded_klass(accessing_klass, name, true);
251   }
252 
253   // Get a ciKlass representing an unloaded klass mirror.
254   // Result is not necessarily unique, but will be unloaded.
255   ciInstance* get_unloaded_klass_mirror(ciKlass* type) {
256     return _factory->get_unloaded_klass_mirror(type);
257   }
258 
259   // Get a ciInstance representing an unresolved method handle constant.
260   ciInstance* get_unloaded_method_handle_constant(ciKlass*  holder,
261                                                   ciSymbol* name,
262                                                   ciSymbol* signature,
263                                                   int       ref_kind) {
264     return _factory->get_unloaded_method_handle_constant(holder, name, signature, ref_kind);
265   }
266 
267   // Get a ciInstance representing an unresolved method type constant.
268   ciInstance* get_unloaded_method_type_constant(ciSymbol* signature) {
269     return _factory->get_unloaded_method_type_constant(signature);
270   }
271 
272   // See if we already have an unloaded klass for the given name
273   // or return NULL if not.
274   ciKlass *check_get_unloaded_klass(ciKlass*  accessing_klass, ciSymbol* name) {
275     return _factory->get_unloaded_klass(accessing_klass, name, false);
276   }
277 
278   // Get a ciReturnAddress corresponding to the given bci.
279   // Ensures uniqueness of the result.
280   ciReturnAddress* get_return_address(int bci) {
281     return _factory->get_return_address(bci);
282   }
283 
284   // Get a ciMethodData representing the methodData for a method
285   // with none.
286   ciMethodData* get_empty_methodData() {
287     return _factory->get_empty_methodData();
288   }
289 
290   // General utility : get a buffer of some required length.
291   // Used in symbol creation.
292   char* name_buffer(int req_len);
293 
294   // Is this thread currently in the VM state?
295   static bool is_in_vm();
296 
297   // Helper routine for determining the validity of a compilation with
298   // respect to method dependencies (e.g. concurrent class loading).
299   void validate_compile_task_dependencies(ciMethod* target);
300 public:
301   enum {
302     MethodCompilable,
303     MethodCompilable_not_at_tier,
304     MethodCompilable_never
305   };
306 
307   ciEnv(CompileTask* task);
308   // Used only during initialization of the ci
309   ciEnv(Arena* arena);
310   ~ciEnv();
311 
312   OopRecorder* oop_recorder() { return _oop_recorder; }
313   void set_oop_recorder(OopRecorder* r) { _oop_recorder = r; }
314 
315   DebugInformationRecorder* debug_info() { return _debug_info; }
316   void set_debug_info(DebugInformationRecorder* i) { _debug_info = i; }
317 
318   Dependencies* dependencies() { return _dependencies; }
319   void set_dependencies(Dependencies* d) { _dependencies = d; }
320 
321   // This is true if the compilation is not going to produce code.
322   // (It is reasonable to retry failed compilations.)
323   bool failing() { return _failure_reason != NULL; }
324 
325   // Reason this compilation is failing, such as "too many basic blocks".
326   const char* failure_reason() { return _failure_reason; }
327 
328   // Return state of appropriate compilability
329   int compilable() { return _compilable; }
330 
331   const char* retry_message() const {
332     switch (_compilable) {
333       case ciEnv::MethodCompilable_not_at_tier:
334         return "retry at different tier";
335       case ciEnv::MethodCompilable_never:
336         return "not retryable";
337       case ciEnv::MethodCompilable:
338         return NULL;
339       default:
340         ShouldNotReachHere();
341         return NULL;
342     }
343   }
344 
345   bool break_at_compile() { return _break_at_compile; }
346   void set_break_at_compile(bool z) { _break_at_compile = z; }
347 
348   // Cache Jvmti state
349   bool  cache_jvmti_state();
350   bool  jvmti_state_changed() const;
351   bool  should_retain_local_variables() const {
352     return _jvmti_can_access_local_variables || _jvmti_can_pop_frame;
353   }
354   bool  jvmti_can_hotswap_or_post_breakpoint() const { return _jvmti_can_hotswap_or_post_breakpoint; }
355   bool  jvmti_can_post_on_exceptions()         const { return _jvmti_can_post_on_exceptions; }
356   bool  jvmti_can_get_owned_monitor_info()     const { return _jvmti_can_get_owned_monitor_info; }
357 
358   // Cache DTrace flags
359   void  cache_dtrace_flags();
360   bool  dtrace_extended_probes() const { return _dtrace_extended_probes; }
361   bool  dtrace_monitor_probes()  const { return _dtrace_monitor_probes; }
362   bool  dtrace_method_probes()   const { return _dtrace_method_probes; }
363   bool  dtrace_alloc_probes()    const { return _dtrace_alloc_probes; }
364 
365   // The compiler task which has created this env.
366   // May be useful to find out compile_id, comp_level, etc.
367   CompileTask* task() { return _task; }
368 
369   // Handy forwards to the task:
370   int comp_level();   // task()->comp_level()
371   uint compile_id();  // task()->compile_id()
372 
373   // Register the result of a compilation.
374   void register_method(ciMethod*                 target,
375                        int                       entry_bci,
376                        CodeOffsets*              offsets,
377                        int                       orig_pc_offset,
378                        CodeBuffer*               code_buffer,
379                        int                       frame_words,
380                        OopMapSet*                oop_map_set,
381                        ExceptionHandlerTable*    handler_table,
382                        ImplicitExceptionTable*   inc_table,
383                        AbstractCompiler*         compiler,
384                        bool                      has_unsafe_access,
385                        bool                      has_wide_vectors,
386                        RTMState                  rtm_state = NoRTM);
387 
388 
389   // Access to certain well known ciObjects.
390 #define WK_KLASS_FUNC(name, ignore_s) \
391   ciInstanceKlass* name() { \
392     return _##name;\
393   }
394   WK_KLASSES_DO(WK_KLASS_FUNC)
395 #undef WK_KLASS_FUNC
396 
397   ciInstance* NullPointerException_instance() {
398     assert(_NullPointerException_instance != NULL, "initialization problem");
399     return _NullPointerException_instance;
400   }
401   ciInstance* ArithmeticException_instance() {
402     assert(_ArithmeticException_instance != NULL, "initialization problem");
403     return _ArithmeticException_instance;
404   }
405 
406   // Lazy constructors:
407   ciInstance* ArrayIndexOutOfBoundsException_instance();
408   ciInstance* ArrayStoreException_instance();
409   ciInstance* ClassCastException_instance();
410 
411   ciInstance* the_null_string();
412   ciInstance* the_min_jint_string();
413 
414   static ciSymbol* unloaded_cisymbol() {
415     return _unloaded_cisymbol;
416   }
417   static ciObjArrayKlass* unloaded_ciobjarrayklass() {
418     return _unloaded_ciobjarrayklass;
419   }
420   static ciInstanceKlass* unloaded_ciinstance_klass() {
421     return _unloaded_ciinstance_klass;
422   }
423   ciInstance* unloaded_ciinstance();
424 
425   ciKlass*  find_system_klass(ciSymbol* klass_name);
426   // Note:  To find a class from its name string, use ciSymbol::make,
427   // but consider adding to vmSymbols.hpp instead.
428 
429   // converts the ciKlass* representing the holder of a method into a
430   // ciInstanceKlass*.  This is needed since the holder of a method in
431   // the bytecodes could be an array type.  Basically this converts
432   // array types into java/lang/Object and other types stay as they are.
433   static ciInstanceKlass* get_instance_klass_for_declared_method_holder(ciKlass* klass);
434 
435   // Return the machine-level offset of o, which must be an element of a.
436   // This may be used to form constant-loading expressions in lieu of simpler encodings.
437   int       array_element_offset_in_bytes(ciArray* a, ciObject* o);
438 
439   // Access to the compile-lifetime allocation arena.
440   Arena*    arena() { return _arena; }
441 
442   // What is the current compilation environment?
443   static ciEnv* current() { return CompilerThread::current()->env(); }
444 
445   // Overload with current thread argument
446   static ciEnv* current(CompilerThread *thread) { return thread->env(); }
447 
448   // Per-compiler data.  (Used by C2 to publish the Compile* pointer.)
449   void* compiler_data() { return _compiler_data; }
450   void set_compiler_data(void* x) { _compiler_data = x; }
451 
452   // Notice that a method has been inlined in the current compile;
453   // used only for statistics.
454   void notice_inlined_method(ciMethod* method);
455 
456   // Total number of bytecodes in inlined methods in this compile
457   int num_inlined_bytecodes() const;
458 
459   // Output stream for logging compilation info.
460   CompileLog* log() { return _log; }
461   void set_log(CompileLog* log) { _log = log; }
462 
463   void record_failure(const char* reason);      // Record failure and report later
464   void report_failure(const char* reason);      // Report failure immediately
465   void record_method_not_compilable(const char* reason, bool all_tiers = true);
466   void record_out_of_memory_failure();
467 
468   // RedefineClasses support
469   void metadata_do(MetadataClosure* f) { _factory->metadata_do(f); }
470 
471   // Dump the compilation replay data for the ciEnv to the stream.
472   void dump_replay_data(int compile_id);
473   void dump_inline_data(int compile_id);
474   void dump_replay_data(outputStream* out);
475   void dump_replay_data_unsafe(outputStream* out);
476   void dump_compile_data(outputStream* out);
477 };
478 
479 #endif // SHARE_CI_CIENV_HPP