1 /*
   2  * Copyright (c) 1999, 2015, 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_VM_C1_C1_IR_HPP
  26 #define SHARE_VM_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(NULL)
  55     , _entry_code(NULL)
  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 define_array(_XHandlerArray, XHandler*)
 108 define_stack(_XHandlerList, _XHandlerArray)
 109 
 110 
 111 // XHandlers is the C1 internal list of exception handlers for a method
 112 class XHandlers: public CompilationResourceObj {
 113  private:
 114   _XHandlerList    _list;
 115 
 116  public:
 117   // creation
 118   XHandlers() : _list()                          { }
 119   XHandlers(ciMethod* method);
 120   XHandlers(XHandlers* other);
 121 
 122   // accessors
 123   int       length() const                       { return _list.length(); }
 124   XHandler* handler_at(int i) const              { return _list.at(i); }
 125   bool      has_handlers() const                 { return _list.length() > 0; }
 126   void      append(XHandler* h)                  { _list.append(h); }
 127   XHandler* remove_last()                        { return _list.pop(); }
 128 
 129   bool      could_catch(ciInstanceKlass* klass, bool type_is_exact) const;
 130   bool      equals(XHandlers* others) const;
 131 };
 132 
 133 
 134 class IRScope;
 135 define_array(IRScopeArray, IRScope*)
 136 define_stack(IRScopeList, IRScopeArray)
 137 
 138 class Compilation;
 139 class IRScope: public CompilationResourceObj {
 140  private:
 141   // hierarchy
 142   Compilation*  _compilation;                    // the current compilation
 143   IRScope*      _caller;                         // the caller scope, or NULL
 144   int           _level;                          // the inlining level
 145   ciMethod*     _method;                         // the corresponding method
 146   IRScopeList   _callees;                        // the inlined method scopes
 147 
 148   // graph
 149   XHandlers*    _xhandlers;                      // the exception handlers
 150   int           _number_of_locks;                // the number of monitor lock slots needed
 151   bool          _monitor_pairing_ok;             // the monitor pairing info
 152   bool          _wrote_final;                    // has written final field
 153   bool          _wrote_fields;                   // has written fields
 154   bool          _wrote_volatile;                 // has written volatile field
 155   BlockBegin*   _start;                          // the start block, successsors are method entries
 156 
 157   BitMap        _requires_phi_function;          // bit is set if phi functions at loop headers are necessary for a local variable
 158 
 159   // helper functions
 160   BlockBegin* build_graph(Compilation* compilation, int osr_bci);
 161 
 162  public:
 163   // creation
 164   IRScope(Compilation* compilation, IRScope* caller, int caller_bci, ciMethod* method, int osr_bci, bool create_graph = false);
 165 
 166   // accessors
 167   Compilation*  compilation() const              { return _compilation; }
 168   IRScope*      caller() const                   { return _caller; }
 169   int           level() const                    { return _level; }
 170   ciMethod*     method() const                   { return _method; }
 171   int           max_stack() const;               // NOTE: expensive
 172   BitMap&       requires_phi_function()          { return _requires_phi_function; }
 173 
 174   // hierarchy
 175   bool          is_top_scope() const             { return _caller == NULL; }
 176   void          add_callee(IRScope* callee)      { _callees.append(callee); }
 177   int           number_of_callees() const        { return _callees.length(); }
 178   IRScope*      callee_no(int i) const           { return _callees.at(i); }
 179 
 180   // accessors, graph
 181   bool          is_valid() const                 { return start() != NULL; }
 182   XHandlers*    xhandlers() const                { return _xhandlers; }
 183   int           number_of_locks() const          { return _number_of_locks; }
 184   void          set_min_number_of_locks(int n)   { if (n > _number_of_locks) _number_of_locks = n; }
 185   bool          monitor_pairing_ok() const       { return _monitor_pairing_ok; }
 186   BlockBegin*   start() const                    { return _start; }
 187   void          set_wrote_final()                { _wrote_final = true; }
 188   bool          wrote_final    () const          { return _wrote_final; }
 189   void          set_wrote_fields()               { _wrote_fields = true; }
 190   bool          wrote_fields    () const         { return _wrote_fields; }
 191   void          set_wrote_volatile()             { _wrote_final = true; }
 192   bool          wrote_volatile    () const       { return _wrote_final; }
 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 
 213  public:
 214   IRScopeDebugInfo(IRScope*                      scope,
 215                    int                           bci,
 216                    GrowableArray<ScopeValue*>*   locals,
 217                    GrowableArray<ScopeValue*>*   expressions,
 218                    GrowableArray<MonitorValue*>* monitors,
 219                    IRScopeDebugInfo*             caller):
 220       _scope(scope)
 221     , _locals(locals)
 222     , _bci(bci)
 223     , _expressions(expressions)
 224     , _monitors(monitors)
 225     , _caller(caller) {}
 226 
 227 
 228   IRScope*                      scope()       { return _scope;       }
 229   int                           bci()         { return _bci;         }
 230   GrowableArray<ScopeValue*>*   locals()      { return _locals;      }
 231   GrowableArray<ScopeValue*>*   expressions() { return _expressions; }
 232   GrowableArray<MonitorValue*>* monitors()    { return _monitors;    }
 233   IRScopeDebugInfo*             caller()      { return _caller;      }
 234 
 235   //Whether we should reexecute this bytecode for deopt
 236   bool should_reexecute();
 237 
 238   void record_debug_info(DebugInformationRecorder* recorder, int pc_offset, bool topmost, bool is_method_handle_invoke = false) {
 239     if (caller() != NULL) {
 240       // Order is significant:  Must record caller first.
 241       caller()->record_debug_info(recorder, pc_offset, false/*topmost*/);
 242     }
 243     DebugToken* locvals = recorder->create_scope_values(locals());
 244     DebugToken* expvals = recorder->create_scope_values(expressions());
 245     DebugToken* monvals = recorder->create_monitor_values(monitors());
 246     // reexecute allowed only for the topmost frame
 247     bool reexecute = topmost ? should_reexecute() : false;
 248     bool return_oop = false; // This flag will be ignored since it used only for C2 with escape analysis.
 249     recorder->describe_scope(pc_offset, scope()->method(), bci(), reexecute, is_method_handle_invoke, return_oop, locvals, expvals, monvals);
 250   }
 251 };
 252 
 253 
 254 class CodeEmitInfo: public CompilationResourceObj {
 255   friend class LinearScan;
 256  private:
 257   IRScopeDebugInfo* _scope_debug_info;
 258   IRScope*          _scope;
 259   XHandlers*        _exception_handlers;
 260   OopMap*           _oop_map;
 261   ValueStack*       _stack;                      // used by deoptimization (contains also monitors
 262   bool              _is_method_handle_invoke;    // true if the associated call site is a MethodHandle call site.
 263   bool              _deoptimize_on_exception;
 264 
 265   FrameMap*     frame_map() const                { return scope()->compilation()->frame_map(); }
 266   Compilation*  compilation() const              { return scope()->compilation(); }
 267 
 268  public:
 269 
 270   // use scope from ValueStack
 271   CodeEmitInfo(ValueStack* stack, XHandlers* exception_handlers, bool deoptimize_on_exception = false);
 272 
 273   // make a copy
 274   CodeEmitInfo(CodeEmitInfo* info, ValueStack* stack = NULL);
 275 
 276   // accessors
 277   OopMap* oop_map()                              { return _oop_map; }
 278   ciMethod* method() const                       { return _scope->method(); }
 279   IRScope* scope() const                         { return _scope; }
 280   XHandlers* exception_handlers() const          { return _exception_handlers; }
 281   ValueStack* stack() const                      { return _stack; }
 282   bool deoptimize_on_exception() const           { return _deoptimize_on_exception; }
 283 
 284   void add_register_oop(LIR_Opr opr);
 285   void record_debug_info(DebugInformationRecorder* recorder, int pc_offset);
 286 
 287   bool     is_method_handle_invoke() const { return _is_method_handle_invoke;     }
 288   void set_is_method_handle_invoke(bool x) {        _is_method_handle_invoke = x; }
 289 
 290   int interpreter_frame_size() const;
 291 };
 292 
 293 
 294 class IR: public CompilationResourceObj {
 295  private:
 296   Compilation*     _compilation;                 // the current compilation
 297   IRScope*         _top_scope;                   // the root of the scope hierarchy
 298   int              _num_loops;                   // Total number of loops
 299   BlockList*       _code;                        // the blocks in code generation order w/ use counts
 300 
 301  public:
 302   // creation
 303   IR(Compilation* compilation, ciMethod* method, int osr_bci);
 304 
 305   // accessors
 306   bool             is_valid() const              { return top_scope()->is_valid(); }
 307   Compilation*     compilation() const           { return _compilation; }
 308   IRScope*         top_scope() const             { return _top_scope; }
 309   int              number_of_locks() const       { return top_scope()->number_of_locks(); }
 310   ciMethod*        method() const                { return top_scope()->method(); }
 311   BlockBegin*      start() const                 { return top_scope()->start(); }
 312   BlockBegin*      std_entry() const             { return start()->end()->as_Base()->std_entry(); }
 313   BlockBegin*      osr_entry() const             { return start()->end()->as_Base()->osr_entry(); }
 314   BlockList*       code() const                  { return _code; }
 315   int              num_loops() const             { return _num_loops; }
 316   int              max_stack() const             { return top_scope()->max_stack(); } // expensive
 317 
 318   // ir manipulation
 319   void optimize_blocks();
 320   void eliminate_null_checks();
 321   void compute_predecessors();
 322   void split_critical_edges();
 323   void compute_code();
 324   void compute_use_counts();
 325 
 326   // The linear-scan order and the code emission order are equal, but
 327   // this may change in future
 328   BlockList* linear_scan_order() {  assert(_code != NULL, "not computed"); return _code; }
 329 
 330   // iteration
 331   void iterate_preorder   (BlockClosure* closure);
 332   void iterate_postorder  (BlockClosure* closure);
 333   void iterate_linear_scan_order(BlockClosure* closure);
 334 
 335   // debugging
 336   static void print(BlockBegin* start, bool cfg_only, bool live_only = false) PRODUCT_RETURN;
 337   void print(bool cfg_only, bool live_only = false)                           PRODUCT_RETURN;
 338   void verify()                                                               PRODUCT_RETURN;
 339 };
 340 
 341 
 342 // Globally do instruction substitution and remove substituted
 343 // instructions from the instruction list.
 344 //
 345 
 346 class SubstitutionResolver: public BlockClosure, ValueVisitor {
 347   virtual void visit(Value* v);
 348 
 349  public:
 350   SubstitutionResolver(IR* hir) {
 351     hir->iterate_preorder(this);
 352   }
 353 
 354   SubstitutionResolver(BlockBegin* block) {
 355     block->iterate_preorder(this);
 356   }
 357 
 358   virtual void block_do(BlockBegin* block);
 359 };
 360 
 361 #endif // SHARE_VM_C1_C1_IR_HPP