1 /*
  2  * Copyright (c) 1999, 2023, 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_C1_C1_IR_HPP
 26 #define SHARE_C1_C1_IR_HPP
 27 
 28 #include "c1/c1_Instruction.hpp"
 29 #include "ci/ciExceptionHandler.hpp"
 30 #include "ci/ciMethod.hpp"
 31 #include "ci/ciStreams.hpp"
 32 #include "memory/allocation.hpp"
 33 
 34 // An XHandler is a C1 internal description for an exception handler
 35 
 36 class XHandler: public CompilationResourceObj {
 37  private:
 38   ciExceptionHandler* _desc;
 39 
 40   BlockBegin*         _entry_block;  // Entry block of xhandler
 41   LIR_List*           _entry_code;   // LIR-operations that must be executed before jumping to entry_block
 42   int                 _entry_pco;    // pco where entry_code (or entry_block if no entry_code) starts
 43   int                 _phi_operand;  // For resolving of phi functions at begin of entry_block
 44   int                 _scope_count;  // for filling ExceptionRangeEntry::scope_count
 45 
 46 #ifdef ASSERT
 47   int                 _lir_op_id;    // op_id of the LIR-operation throwing to this handler
 48 #endif
 49 
 50  public:
 51   // creation
 52   XHandler(ciExceptionHandler* desc)
 53     : _desc(desc)
 54     , _entry_block(nullptr)
 55     , _entry_code(nullptr)
 56     , _entry_pco(-1)
 57     , _phi_operand(-1)
 58     , _scope_count(-1)
 59 #ifdef ASSERT
 60     , _lir_op_id(-1)
 61 #endif
 62   { }
 63 
 64   XHandler(XHandler* other)
 65     : _desc(other->_desc)
 66     , _entry_block(other->_entry_block)
 67     , _entry_code(other->_entry_code)
 68     , _entry_pco(other->_entry_pco)
 69     , _phi_operand(other->_phi_operand)
 70     , _scope_count(other->_scope_count)
 71 #ifdef ASSERT
 72     , _lir_op_id(other->_lir_op_id)
 73 #endif
 74   { }
 75 
 76   // accessors for data of ciExceptionHandler
 77   int  beg_bci() const                           { return _desc->start(); }
 78   int  end_bci() const                           { return _desc->limit(); }
 79   int  handler_bci() const                       { return _desc->handler_bci(); }
 80   bool is_catch_all() const                      { return _desc->is_catch_all(); }
 81   int  catch_type() const                        { return _desc->catch_klass_index(); }
 82   ciInstanceKlass* catch_klass() const           { return _desc->catch_klass(); }
 83   bool covers(int bci) const                     { return beg_bci() <= bci && bci < end_bci(); }
 84 
 85   // accessors for additional fields
 86   BlockBegin* entry_block() const                { return _entry_block; }
 87   LIR_List*   entry_code() const                 { return _entry_code; }
 88   int         entry_pco() const                  { return _entry_pco; }
 89   int         phi_operand() const                { assert(_phi_operand != -1, "not set"); return _phi_operand; }
 90   int         scope_count() const                { assert(_scope_count != -1, "not set"); return _scope_count; }
 91   DEBUG_ONLY(int lir_op_id() const               { return _lir_op_id; });
 92 
 93   void set_entry_block(BlockBegin* entry_block) {
 94     assert(entry_block->is_set(BlockBegin::exception_entry_flag), "must be an exception handler entry");
 95     assert(entry_block->bci() == handler_bci(), "bci's must correspond");
 96     _entry_block = entry_block;
 97   }
 98   void set_entry_code(LIR_List* entry_code)      { _entry_code = entry_code; }
 99   void set_entry_pco(int entry_pco)              { _entry_pco = entry_pco; }
100   void set_phi_operand(int phi_operand)          { _phi_operand = phi_operand; }
101   void set_scope_count(int scope_count)          { _scope_count = scope_count; }
102   DEBUG_ONLY(void set_lir_op_id(int lir_op_id)   { _lir_op_id = lir_op_id; });
103 
104   bool equals(XHandler* other) const;
105 };
106 
107 typedef GrowableArray<XHandler*> _XHandlerList;
108 
109 // XHandlers is the C1 internal list of exception handlers for a method
110 class XHandlers: public CompilationResourceObj {
111  private:
112   _XHandlerList    _list;
113 
114  public:
115   // creation
116   XHandlers() : _list()                          { }
117   XHandlers(ciMethod* method);
118   XHandlers(XHandlers* other);
119 
120   // accessors
121   int       length() const                       { return _list.length(); }
122   XHandler* handler_at(int i) const              { return _list.at(i); }
123   bool      has_handlers() const                 { return _list.length() > 0; }
124   void      append(XHandler* h)                  { _list.append(h); }
125   XHandler* remove_last()                        { return _list.pop(); }
126 
127   bool      could_catch(ciInstanceKlass* klass, bool type_is_exact) const;
128   bool      equals(XHandlers* others) const;
129 };
130 
131 
132 class IRScope;
133 typedef GrowableArray<IRScope*> IRScopeList;
134 
135 class Compilation;
136 class IRScope: public CompilationResourceObj {
137  private:
138   // hierarchy
139   Compilation*  _compilation;                    // the current compilation
140   IRScope*      _caller;                         // the caller scope, or null
141   int           _level;                          // the inlining level
142   ciMethod*     _method;                         // the corresponding method
143   IRScopeList   _callees;                        // the inlined method scopes
144 
145   // graph
146   XHandlers*    _xhandlers;                      // the exception handlers
147   int           _number_of_locks;                // the number of monitor lock slots needed
148   bool          _monitor_pairing_ok;             // the monitor pairing info
149   bool          _wrote_final;                    // has written final field
150   bool          _wrote_fields;                   // has written fields
151   bool          _wrote_volatile;                 // has written volatile field
152   bool          _wrote_stable;                   // has written @Stable field
153   BlockBegin*   _start;                          // the start block, successsors are method entries
154 
155   ResourceBitMap _requires_phi_function;         // bit is set if phi functions at loop headers are necessary for a local variable
156 
157   // helper functions
158   BlockBegin* build_graph(Compilation* compilation, int osr_bci);
159 
160  public:
161   // creation
162   IRScope(Compilation* compilation, IRScope* caller, int caller_bci, ciMethod* method, int osr_bci, bool create_graph = false);
163 
164   // accessors
165   Compilation*  compilation() const              { return _compilation; }
166   IRScope*      caller() const                   { return _caller; }
167   int           level() const                    { return _level; }
168   ciMethod*     method() const                   { return _method; }
169   int           max_stack() const;               // NOTE: expensive
170   BitMap&       requires_phi_function()          { return _requires_phi_function; }
171 
172   // hierarchy
173   bool          is_top_scope() const             { return _caller == nullptr; }
174   void          add_callee(IRScope* callee)      { _callees.append(callee); }
175   int           number_of_callees() const        { return _callees.length(); }
176   IRScope*      callee_no(int i) const           { return _callees.at(i); }
177 
178   // accessors, graph
179   bool          is_valid() const                 { return start() != nullptr; }
180   XHandlers*    xhandlers() const                { return _xhandlers; }
181   int           number_of_locks() const          { return _number_of_locks; }
182   void          set_min_number_of_locks(int n)   { if (n > _number_of_locks) _number_of_locks = n; }
183   bool          monitor_pairing_ok() const       { return _monitor_pairing_ok; }
184   BlockBegin*   start() const                    { return _start; }
185   void          set_wrote_final()                { _wrote_final = true; }
186   bool          wrote_final    () const          { return _wrote_final; }
187   void          set_wrote_fields()               { _wrote_fields = true; }
188   bool          wrote_fields    () const         { return _wrote_fields; }
189   void          set_wrote_volatile()             { _wrote_volatile = true; }
190   bool          wrote_volatile    () const       { return _wrote_volatile; }
191   void          set_wrote_stable()               { _wrote_stable = true; }
192   bool          wrote_stable() const             { return _wrote_stable; }
193 };
194 
195 
196 //
197 // IRScopeDebugInfo records the debug information for a particular IRScope
198 // in a particular CodeEmitInfo.  This allows the information to be computed
199 // once early enough for the OopMap to be available to the LIR and also to be
200 // reemited for different pcs using the same CodeEmitInfo without recomputing
201 // everything.
202 //
203 
204 class IRScopeDebugInfo: public CompilationResourceObj {
205  private:
206   IRScope*                      _scope;
207   int                           _bci;
208   GrowableArray<ScopeValue*>*   _locals;
209   GrowableArray<ScopeValue*>*   _expressions;
210   GrowableArray<MonitorValue*>* _monitors;
211   IRScopeDebugInfo*             _caller;
212   bool                          _should_reexecute;
213 
214  public:
215   IRScopeDebugInfo(IRScope*                      scope,
216                    int                           bci,
217                    GrowableArray<ScopeValue*>*   locals,
218                    GrowableArray<ScopeValue*>*   expressions,
219                    GrowableArray<MonitorValue*>* monitors,
220                    IRScopeDebugInfo*             caller,
221                    bool                          should_reexecute):
222       _scope(scope)
223     , _bci(bci)
224     , _locals(locals)
225     , _expressions(expressions)
226     , _monitors(monitors)
227     , _caller(caller)
228     , _should_reexecute(should_reexecute) {}
229 
230 
231   IRScope*                      scope()       { return _scope;       }
232   int                           bci()         { return _bci;         }
233   GrowableArray<ScopeValue*>*   locals()      { return _locals;      }
234   GrowableArray<ScopeValue*>*   expressions() { return _expressions; }
235   GrowableArray<MonitorValue*>* monitors()    { return _monitors;    }
236   IRScopeDebugInfo*             caller()      { return _caller;      }
237 
238   //Whether we should reexecute this bytecode for deopt
239   bool should_reexecute();
240 
241   void record_debug_info(DebugInformationRecorder* recorder, int pc_offset, bool reexecute, bool is_method_handle_invoke = false, bool maybe_return_as_fields = false) {
242     if (caller() != nullptr) {
243       // Order is significant:  Must record caller first.
244       caller()->record_debug_info(recorder, pc_offset, false/*reexecute*/);
245     }
246     DebugToken* locvals = recorder->create_scope_values(locals());
247     DebugToken* expvals = recorder->create_scope_values(expressions());
248     DebugToken* monvals = recorder->create_monitor_values(monitors());
249     // reexecute allowed only for the topmost frame
250     bool return_oop = false;
251     bool return_scalarized = false;
252     if (maybe_return_as_fields) {
253       return_oop = true;
254       return_scalarized = true;
255     }
256     bool rethrow_exception = false;
257     bool has_ea_local_in_scope = false;
258     bool arg_escape = false;
259     recorder->describe_scope(pc_offset, methodHandle(), scope()->method(), bci(),
260                              reexecute, rethrow_exception, is_method_handle_invoke, return_oop, return_scalarized,
261                              has_ea_local_in_scope, arg_escape, locvals, expvals, monvals);
262   }
263 };
264 
265 
266 class CodeEmitInfo: public CompilationResourceObj {
267   friend class LinearScan;
268  private:
269   IRScopeDebugInfo* _scope_debug_info;
270   IRScope*          _scope;
271   XHandlers*        _exception_handlers;
272   OopMap*           _oop_map;
273   ValueStack*       _stack;                      // used by deoptimization (contains also monitors
274   bool              _is_method_handle_invoke;    // true if the associated call site is a MethodHandle call site.
275   bool              _deoptimize_on_exception;
276   bool              _force_reexecute;            // force the reexecute flag on, used for patching stub
277 
278   FrameMap*     frame_map() const                { return scope()->compilation()->frame_map(); }
279   Compilation*  compilation() const              { return scope()->compilation(); }
280 
281  public:
282 
283   // use scope from ValueStack
284   CodeEmitInfo(ValueStack* stack, XHandlers* exception_handlers, bool deoptimize_on_exception = false);
285 
286   // make a copy
287   CodeEmitInfo(CodeEmitInfo* info, ValueStack* stack = nullptr);
288 
289   // accessors
290   OopMap* oop_map()                              { return _oop_map; }
291   ciMethod* method() const                       { return _scope->method(); }
292   IRScope* scope() const                         { return _scope; }
293   XHandlers* exception_handlers() const          { return _exception_handlers; }
294   ValueStack* stack() const                      { return _stack; }
295   bool deoptimize_on_exception() const           { return _deoptimize_on_exception; }
296 
297   void add_register_oop(LIR_Opr opr);
298   void record_debug_info(DebugInformationRecorder* recorder, int pc_offset, bool maybe_return_as_fields = false);
299 
300   bool     is_method_handle_invoke() const { return _is_method_handle_invoke;     }
301   void set_is_method_handle_invoke(bool x) {        _is_method_handle_invoke = x; }
302 
303   bool     force_reexecute() const         { return _force_reexecute;             }
304   void     set_force_reexecute()           { _force_reexecute = true;             }
305 
306   int interpreter_frame_size() const;
307 
308 };
309 
310 
311 class IR: public CompilationResourceObj {
312  private:
313   Compilation*     _compilation;                 // the current compilation
314   IRScope*         _top_scope;                   // the root of the scope hierarchy
315   int              _num_loops;                   // Total number of loops
316   BlockList*       _code;                        // the blocks in code generation order w/ use counts
317 
318  public:
319   // creation
320   IR(Compilation* compilation, ciMethod* method, int osr_bci);
321 
322   // accessors
323   bool             is_valid() const              { return top_scope()->is_valid(); }
324   Compilation*     compilation() const           { return _compilation; }
325   IRScope*         top_scope() const             { return _top_scope; }
326   int              number_of_locks() const       { return top_scope()->number_of_locks(); }
327   ciMethod*        method() const                { return top_scope()->method(); }
328   BlockBegin*      start() const                 { return top_scope()->start(); }
329   BlockBegin*      std_entry() const             { return start()->end()->as_Base()->std_entry(); }
330   BlockBegin*      osr_entry() const             { return start()->end()->as_Base()->osr_entry(); }
331   BlockList*       code() const                  { return _code; }
332   int              num_loops() const             { return _num_loops; }
333   int              max_stack() const             { return top_scope()->max_stack(); } // expensive
334 
335   // ir manipulation
336   void optimize_blocks();
337   void eliminate_null_checks();
338   void compute_predecessors();
339   void split_critical_edges();
340   void compute_code();
341   void compute_use_counts();
342 
343   // The linear-scan order and the code emission order are equal, but
344   // this may change in future
345   BlockList* linear_scan_order() {  assert(_code != nullptr, "not computed"); return _code; }
346 
347   // iteration
348   void iterate_preorder   (BlockClosure* closure);
349   void iterate_postorder  (BlockClosure* closure);
350   void iterate_linear_scan_order(BlockClosure* closure);
351 
352   // debugging
353   static void print(BlockBegin* start, bool cfg_only, bool live_only = false) PRODUCT_RETURN;
354   void print(bool cfg_only, bool live_only = false)                           PRODUCT_RETURN;
355 
356   void expand_with_neighborhood(BlockList& blocks)                          NOT_DEBUG_RETURN;
357   void verify_local(BlockList&)                                             NOT_DEBUG_RETURN;
358   void verify()                                                             NOT_DEBUG_RETURN;
359 };
360 
361 
362 // Globally do instruction substitution and remove substituted
363 // instructions from the instruction list.
364 //
365 
366 class SubstitutionResolver: public BlockClosure, ValueVisitor {
367   virtual void visit(Value* v);
368 
369  public:
370   SubstitutionResolver(IR* hir) {
371     hir->iterate_preorder(this);
372   }
373 
374   SubstitutionResolver(BlockBegin* block) {
375     block->iterate_preorder(this);
376   }
377 
378   virtual void block_do(BlockBegin* block);
379 };
380 
381 #endif // SHARE_C1_C1_IR_HPP