1 /*
   2  * Copyright (c) 1998, 2013, 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_OOPS_CPCACHEOOP_HPP
  26 #define SHARE_VM_OOPS_CPCACHEOOP_HPP
  27 
  28 #include "interpreter/bytecodes.hpp"
  29 #include "memory/allocation.hpp"
  30 #include "utilities/array.hpp"
  31 
  32 class PSPromotionManager;
  33 
  34 // A ConstantPoolCacheEntry describes an individual entry of the constant
  35 // pool cache. There's 2 principal kinds of entries: field entries for in-
  36 // stance & static field access, and method entries for invokes. Some of
  37 // the entry layout is shared and looks as follows:
  38 //
  39 // bit number |31                0|
  40 // bit length |-8--|-8--|---16----|
  41 // --------------------------------
  42 // _indices   [ b2 | b1 |  index  ]  index = constant_pool_index
  43 // _f1        [  entry specific   ]  metadata ptr (method or klass)
  44 // _f2        [  entry specific   ]  vtable or res_ref index, or vfinal method ptr
  45 // _flags     [tos|0|F=1|0|0|0|f|v|0 |0000|field_index] (for field entries)
  46 // bit length [ 4 |1| 1 |1|1|1|1|1|1 |-4--|----16-----]
  47 // _flags     [tos|0|F=0|M|A|I|f|0|vf|0000|00000|psize] (for method entries)
  48 // bit length [ 4 |1| 1 |1|1|1|1|1|1 |-4--|--8--|--8--]
  49 
  50 // --------------------------------
  51 //
  52 // with:
  53 // index  = original constant pool index
  54 // b1     = bytecode 1
  55 // b2     = bytecode 2
  56 // psize  = parameters size (method entries only)
  57 // field_index = index into field information in holder InstanceKlass
  58 //          The index max is 0xffff (max number of fields in constant pool)
  59 //          and is multiplied by (InstanceKlass::next_offset) when accessing.
  60 // tos    = TosState
  61 // F      = the entry is for a field (or F=0 for a method)
  62 // A      = call site has an appendix argument (loaded from resolved references)
  63 // I      = interface call is forced virtual (must use a vtable index or vfinal)
  64 // f      = field or method is final
  65 // v      = field is volatile
  66 // vf     = virtual but final (method entries only: is_vfinal())
  67 //
  68 // The flags after TosState have the following interpretation:
  69 // bit 27: 0 for fields, 1 for methods
  70 // f  flag true if field is marked final
  71 // v  flag true if field is volatile (only for fields)
  72 // f2 flag true if f2 contains an oop (e.g., virtual final method)
  73 // fv flag true if invokeinterface used for method in class Object
  74 //
  75 // The flags 31, 30, 29, 28 together build a 4 bit number 0 to 8 with the
  76 // following mapping to the TosState states:
  77 //
  78 // btos: 0
  79 // ctos: 1
  80 // stos: 2
  81 // itos: 3
  82 // ltos: 4
  83 // ftos: 5
  84 // dtos: 6
  85 // atos: 7
  86 // vtos: 8
  87 //
  88 // Entry specific: field entries:
  89 // _indices = get (b1 section) and put (b2 section) bytecodes, original constant pool index
  90 // _f1      = field holder (as a java.lang.Class, not a Klass*)
  91 // _f2      = field offset in bytes
  92 // _flags   = field type information, original FieldInfo index in field holder
  93 //            (field_index section)
  94 //
  95 // Entry specific: method entries:
  96 // _indices = invoke code for f1 (b1 section), invoke code for f2 (b2 section),
  97 //            original constant pool index
  98 // _f1      = Method* for non-virtual calls, unused by virtual calls.
  99 //            for interface calls, which are essentially virtual but need a klass,
 100 //            contains Klass* for the corresponding interface.
 101 //            for invokedynamic, f1 contains a site-specific CallSite object (as an appendix)
 102 //            for invokehandle, f1 contains a site-specific MethodType object (as an appendix)
 103 //            (upcoming metadata changes will move the appendix to a separate array)
 104 // _f2      = vtable/itable index (or final Method*) for virtual calls only,
 105 //            unused by non-virtual.  The is_vfinal flag indicates this is a
 106 //            method pointer for a final method, not an index.
 107 // _flags   = method type info (t section),
 108 //            virtual final bit (vfinal),
 109 //            parameter size (psize section)
 110 //
 111 // Note: invokevirtual & invokespecial bytecodes can share the same constant
 112 //       pool entry and thus the same constant pool cache entry. All invoke
 113 //       bytecodes but invokevirtual use only _f1 and the corresponding b1
 114 //       bytecode, while invokevirtual uses only _f2 and the corresponding
 115 //       b2 bytecode.  The value of _flags is shared for both types of entries.
 116 //
 117 // The fields are volatile so that they are stored in the order written in the
 118 // source code.  The _indices field with the bytecode must be written last.
 119 
 120 class CallInfo;
 121 
 122 class ConstantPoolCacheEntry VALUE_OBJ_CLASS_SPEC {
 123   friend class VMStructs;
 124   friend class constantPoolCacheKlass;
 125   friend class ConstantPool;
 126   friend class InterpreterRuntime;
 127 
 128  private:
 129   volatile intx     _indices;  // constant pool index & rewrite bytecodes
 130   volatile Metadata*   _f1;       // entry specific metadata field
 131   volatile intx        _f2;       // entry specific int/metadata field
 132   volatile intx     _flags;    // flags
 133 
 134 
 135   void set_bytecode_1(Bytecodes::Code code);
 136   void set_bytecode_2(Bytecodes::Code code);
 137   void set_f1(Metadata* f1)                            {
 138     Metadata* existing_f1 = (Metadata*)_f1; // read once
 139     assert(existing_f1 == NULL || existing_f1 == f1, "illegal field change");
 140     _f1 = f1;
 141   }
 142   void release_set_f1(Metadata* f1);
 143   void set_f2(intx f2) {
 144     intx existing_f2 = _f2; // read once
 145     assert(existing_f2 == 0 || existing_f2 == f2, "illegal field change");
 146     _f2 = f2;
 147   }
 148   void set_f2_as_vfinal_method(Method* f2) {
 149     assert(is_vfinal(), "flags must be set");
 150     set_f2((intx)f2);
 151   }
 152   int make_flags(TosState state, int option_bits, int field_index_or_method_params);
 153   void set_flags(intx flags)                     { _flags = flags; }
 154   bool init_flags_atomic(intx flags);
 155   void set_field_flags(TosState field_type, int option_bits, int field_index) {
 156     assert((field_index & field_index_mask) == field_index, "field_index in range");
 157     set_flags(make_flags(field_type, option_bits | (1 << is_field_entry_shift), field_index));
 158   }
 159   void set_method_flags(TosState return_type, int option_bits, int method_params) {
 160     assert((method_params & parameter_size_mask) == method_params, "method_params in range");
 161     set_flags(make_flags(return_type, option_bits, method_params));
 162   }
 163   bool init_method_flags_atomic(TosState return_type, int option_bits, int method_params) {
 164     assert((method_params & parameter_size_mask) == method_params, "method_params in range");
 165     return init_flags_atomic(make_flags(return_type, option_bits, method_params));
 166   }
 167 
 168  public:
 169   // specific bit definitions for the flags field:
 170   // (Note: the interpreter must use these definitions to access the CP cache.)
 171   enum {
 172     // high order bits are the TosState corresponding to field type or method return type
 173     tos_state_bits             = 4,
 174     tos_state_mask             = right_n_bits(tos_state_bits),
 175     tos_state_shift            = BitsPerInt - tos_state_bits,  // see verify_tos_state_shift below
 176     // misc. option bits; can be any bit position in [16..27]
 177     is_field_entry_shift       = 26,  // (F) is it a field or a method?
 178     has_method_type_shift      = 25,  // (M) does the call site have a MethodType?
 179     has_appendix_shift         = 24,  // (A) does the call site have an appendix argument?
 180     is_forced_virtual_shift    = 23,  // (I) is the interface reference forced to virtual mode?
 181     is_final_shift             = 22,  // (f) is the field or method final?
 182     is_volatile_shift          = 21,  // (v) is the field volatile?
 183     is_vfinal_shift            = 20,  // (vf) did the call resolve to a final method?
 184     // low order bits give field index (for FieldInfo) or method parameter size:
 185     field_index_bits           = 16,
 186     field_index_mask           = right_n_bits(field_index_bits),
 187     parameter_size_bits        = 8,  // subset of field_index_mask, range is 0..255
 188     parameter_size_mask        = right_n_bits(parameter_size_bits),
 189     option_bits_mask           = ~(((-1) << tos_state_shift) | (field_index_mask | parameter_size_mask))
 190   };
 191 
 192   // specific bit definitions for the indices field:
 193   enum {
 194     cp_index_bits              = 2*BitsPerByte,
 195     cp_index_mask              = right_n_bits(cp_index_bits),
 196     bytecode_1_shift           = cp_index_bits,
 197     bytecode_1_mask            = right_n_bits(BitsPerByte), // == (u1)0xFF
 198     bytecode_2_shift           = cp_index_bits + BitsPerByte,
 199     bytecode_2_mask            = right_n_bits(BitsPerByte)  // == (u1)0xFF
 200   };
 201 
 202 
 203   // Initialization
 204   void initialize_entry(int original_index);     // initialize primary entry
 205   void initialize_resolved_reference_index(int ref_index) {
 206     assert(_f2 == 0, "set once");  // note: ref_index might be zero also
 207     _f2 = ref_index;
 208   }
 209 
 210   void set_field(                                // sets entry to resolved field state
 211     Bytecodes::Code get_code,                    // the bytecode used for reading the field
 212     Bytecodes::Code put_code,                    // the bytecode used for writing the field
 213     KlassHandle     field_holder,                // the object/klass holding the field
 214     int             orig_field_index,            // the original field index in the field holder
 215     int             field_offset,                // the field offset in words in the field holder
 216     TosState        field_type,                  // the (machine) field type
 217     bool            is_final,                     // the field is final
 218     bool            is_volatile,                 // the field is volatile
 219     Klass*          root_klass                   // needed by the GC to dirty the klass
 220   );
 221 
 222   void set_method(                               // sets entry to resolved method entry
 223     Bytecodes::Code invoke_code,                 // the bytecode used for invoking the method
 224     methodHandle    method,                      // the method/prototype if any (NULL, otherwise)
 225     int             vtable_index                 // the vtable index if any, else negative
 226   );
 227 
 228   void set_interface_call(
 229     methodHandle method,                         // Resolved method
 230     int index                                    // Method index into interface
 231   );
 232 
 233   void set_method_handle(
 234     constantPoolHandle cpool,                    // holding constant pool (required for locking)
 235     const CallInfo &call_info                    // Call link information
 236   );
 237 
 238   void set_dynamic_call(
 239     constantPoolHandle cpool,                    // holding constant pool (required for locking)
 240     const CallInfo &call_info                    // Call link information
 241   );
 242 
 243   // Common code for invokedynamic and MH invocations.
 244 
 245   // The "appendix" is an optional call-site-specific parameter which is
 246   // pushed by the JVM at the end of the argument list.  This argument may
 247   // be a MethodType for the MH.invokes and a CallSite for an invokedynamic
 248   // instruction.  However, its exact type and use depends on the Java upcall,
 249   // which simply returns a compiled LambdaForm along with any reference
 250   // that LambdaForm needs to complete the call.  If the upcall returns a
 251   // null appendix, the argument is not passed at all.
 252   //
 253   // The appendix is *not* represented in the signature of the symbolic
 254   // reference for the call site, but (if present) it *is* represented in
 255   // the Method* bound to the site.  This means that static and dynamic
 256   // resolution logic needs to make slightly different assessments about the
 257   // number and types of arguments.
 258   void set_method_handle_common(
 259     constantPoolHandle cpool,                    // holding constant pool (required for locking)
 260     Bytecodes::Code invoke_code,                 // _invokehandle or _invokedynamic
 261     const CallInfo &call_info                    // Call link information
 262   );
 263 
 264   // invokedynamic and invokehandle call sites have two entries in the
 265   // resolved references array:
 266   //   appendix   (at index+0)
 267   //   MethodType (at index+1)
 268   enum {
 269     _indy_resolved_references_appendix_offset    = 0,
 270     _indy_resolved_references_method_type_offset = 1,
 271     _indy_resolved_references_entries
 272   };
 273 
 274   Method*      method_if_resolved(constantPoolHandle cpool);
 275   oop        appendix_if_resolved(constantPoolHandle cpool);
 276   oop     method_type_if_resolved(constantPoolHandle cpool);
 277 
 278   void set_parameter_size(int value);
 279 
 280   // Which bytecode number (1 or 2) in the index field is valid for this bytecode?
 281   // Returns -1 if neither is valid.
 282   static int bytecode_number(Bytecodes::Code code) {
 283     switch (code) {
 284       case Bytecodes::_getstatic       :    // fall through
 285       case Bytecodes::_getfield        :    // fall through
 286       case Bytecodes::_invokespecial   :    // fall through
 287       case Bytecodes::_invokestatic    :    // fall through
 288       case Bytecodes::_invokehandle    :    // fall through
 289       case Bytecodes::_invokedynamic   :    // fall through
 290       case Bytecodes::_invokeinterface : return 1;
 291       case Bytecodes::_putstatic       :    // fall through
 292       case Bytecodes::_putfield        :    // fall through
 293       case Bytecodes::_invokevirtual   : return 2;
 294       default                          : break;
 295     }
 296     return -1;
 297   }
 298 
 299   // Has this bytecode been resolved? Only valid for invokes and get/put field/static.
 300   bool is_resolved(Bytecodes::Code code) const {
 301     switch (bytecode_number(code)) {
 302       case 1:  return (bytecode_1() == code);
 303       case 2:  return (bytecode_2() == code);
 304     }
 305     return false;      // default: not resolved
 306   }
 307 
 308   // Accessors
 309   int indices() const                            { return _indices; }
 310   int constant_pool_index() const                { return (indices() & cp_index_mask); }
 311   Bytecodes::Code bytecode_1() const             { return Bytecodes::cast((indices() >> bytecode_1_shift) & bytecode_1_mask); }
 312   Bytecodes::Code bytecode_2() const             { return Bytecodes::cast((indices() >> bytecode_2_shift) & bytecode_2_mask); }
 313   Method* f1_as_method() const                   { Metadata* f1 = (Metadata*)_f1; assert(f1 == NULL || f1->is_method(), ""); return (Method*)f1; }
 314   Klass*    f1_as_klass() const                  { Metadata* f1 = (Metadata*)_f1; assert(f1 == NULL || f1->is_klass(), ""); return (Klass*)f1; }
 315   bool      is_f1_null() const                   { Metadata* f1 = (Metadata*)_f1; return f1 == NULL; }  // classifies a CPC entry as unbound
 316   int       f2_as_index() const                  { assert(!is_vfinal(), ""); return (int) _f2; }
 317   Method* f2_as_vfinal_method() const            { assert(is_vfinal(), ""); return (Method*)_f2; }
 318   int  field_index() const                       { assert(is_field_entry(),  ""); return (_flags & field_index_mask); }
 319   int  parameter_size() const                    { assert(is_method_entry(), ""); return (_flags & parameter_size_mask); }
 320   bool is_volatile() const                       { return (_flags & (1 << is_volatile_shift))       != 0; }
 321   bool is_final() const                          { return (_flags & (1 << is_final_shift))          != 0; }
 322   bool is_forced_virtual() const                 { return (_flags & (1 << is_forced_virtual_shift)) != 0; }
 323   bool is_vfinal() const                         { return (_flags & (1 << is_vfinal_shift))         != 0; }
 324   bool has_appendix() const                      { return (_flags & (1 << has_appendix_shift))      != 0; }
 325   bool has_method_type() const                   { return (_flags & (1 << has_method_type_shift))   != 0; }
 326   bool is_method_entry() const                   { return (_flags & (1 << is_field_entry_shift))    == 0; }
 327   bool is_field_entry() const                    { return (_flags & (1 << is_field_entry_shift))    != 0; }
 328   bool is_byte() const                           { return flag_state() == btos; }
 329   bool is_char() const                           { return flag_state() == ctos; }
 330   bool is_short() const                          { return flag_state() == stos; }
 331   bool is_int() const                            { return flag_state() == itos; }
 332   bool is_long() const                           { return flag_state() == ltos; }
 333   bool is_float() const                          { return flag_state() == ftos; }
 334   bool is_double() const                         { return flag_state() == dtos; }
 335   bool is_object() const                         { return flag_state() == atos; }
 336   TosState flag_state() const                    { assert((uint)number_of_states <= (uint)tos_state_mask+1, "");
 337                                                    return (TosState)((_flags >> tos_state_shift) & tos_state_mask); }
 338 
 339   // Code generation support
 340   static WordSize size()                         { return in_WordSize(sizeof(ConstantPoolCacheEntry) / HeapWordSize); }
 341   static ByteSize size_in_bytes()                { return in_ByteSize(sizeof(ConstantPoolCacheEntry)); }
 342   static ByteSize indices_offset()               { return byte_offset_of(ConstantPoolCacheEntry, _indices); }
 343   static ByteSize f1_offset()                    { return byte_offset_of(ConstantPoolCacheEntry, _f1); }
 344   static ByteSize f2_offset()                    { return byte_offset_of(ConstantPoolCacheEntry, _f2); }
 345   static ByteSize flags_offset()                 { return byte_offset_of(ConstantPoolCacheEntry, _flags); }
 346 
 347 #if INCLUDE_JVMTI
 348   // RedefineClasses() API support:
 349   // If this ConstantPoolCacheEntry refers to old_method then update it
 350   // to refer to new_method.
 351   // trace_name_printed is set to true if the current call has
 352   // printed the klass name so that other routines in the adjust_*
 353   // group don't print the klass name.
 354   bool adjust_method_entry(Method* old_method, Method* new_method,
 355          bool * trace_name_printed);
 356   bool check_no_old_or_obsolete_entries();
 357   bool is_interesting_method_entry(Klass* k);
 358 #endif // INCLUDE_JVMTI
 359 
 360   // Debugging & Printing
 361   void print (outputStream* st, int index) const;
 362   void verify(outputStream* st) const;
 363 
 364   static void verify_tos_state_shift() {
 365     // When shifting flags as a 32-bit int, make sure we don't need an extra mask for tos_state:
 366     assert((((u4)-1 >> tos_state_shift) & ~tos_state_mask) == 0, "no need for tos_state mask");
 367   }
 368 };
 369 
 370 
 371 // A constant pool cache is a runtime data structure set aside to a constant pool. The cache
 372 // holds interpreter runtime information for all field access and invoke bytecodes. The cache
 373 // is created and initialized before a class is actively used (i.e., initialized), the indivi-
 374 // dual cache entries are filled at resolution (i.e., "link") time (see also: rewriter.*).
 375 
 376 class ConstantPoolCache: public MetaspaceObj {
 377   friend class VMStructs;
 378   friend class MetadataFactory;
 379  private:
 380   int             _length;
 381   ConstantPool* _constant_pool;                // the corresponding constant pool
 382 
 383   // Sizing
 384   debug_only(friend class ClassVerifier;)
 385 
 386   // Constructor
 387   ConstantPoolCache(int length, const intStack& inverse_index_map,
 388                     const intStack& invokedynamic_references_map) :
 389                                         _length(length), _constant_pool(NULL) {
 390     initialize(inverse_index_map, invokedynamic_references_map);
 391     for (int i = 0; i < length; i++) {
 392       assert(entry_at(i)->is_f1_null(), "Failed to clear?");
 393     }
 394   }
 395 
 396   // Initialization
 397   void initialize(const intArray& inverse_index_map, const intArray& invokedynamic_references_map);
 398  public:
 399   static ConstantPoolCache* allocate(ClassLoaderData* loader_data, int length,
 400                                      const intStack& inverse_index_map,
 401                                      const intStack& invokedynamic_references_map, TRAPS);
 402   bool is_constantPoolCache() const { return true; }
 403 
 404   int length() const                             { return _length; }
 405  private:
 406   void set_length(int length)                    { _length = length; }
 407 
 408   static int header_size()                       { return sizeof(ConstantPoolCache) / HeapWordSize; }
 409   static int size(int length)                    { return align_object_size(header_size() + length * in_words(ConstantPoolCacheEntry::size())); }
 410  public:
 411   int size() const                               { return size(length()); }
 412  private:
 413 
 414   // Helpers
 415   ConstantPool**        constant_pool_addr()   { return &_constant_pool; }
 416   ConstantPoolCacheEntry* base() const           { return (ConstantPoolCacheEntry*)((address)this + in_bytes(base_offset())); }
 417 
 418   friend class constantPoolCacheKlass;
 419   friend class ConstantPoolCacheEntry;
 420 
 421  public:
 422   // Accessors
 423   void set_constant_pool(ConstantPool* pool)   { _constant_pool = pool; }
 424   ConstantPool* constant_pool() const          { return _constant_pool; }
 425   // Fetches the entry at the given index.
 426   // In either case the index must not be encoded or byte-swapped in any way.
 427   ConstantPoolCacheEntry* entry_at(int i) const {
 428     assert(0 <= i && i < length(), "index out of bounds");
 429     return base() + i;
 430   }
 431 
 432   // Code generation
 433   static ByteSize base_offset()                  { return in_ByteSize(sizeof(ConstantPoolCache)); }
 434   static ByteSize entry_offset(int raw_index) {
 435     int index = raw_index;
 436     return (base_offset() + ConstantPoolCacheEntry::size_in_bytes() * index);
 437   }
 438 
 439 #if INCLUDE_JVMTI
 440   // RedefineClasses() API support:
 441   // If any entry of this ConstantPoolCache points to any of
 442   // old_methods, replace it with the corresponding new_method.
 443   // trace_name_printed is set to true if the current call has
 444   // printed the klass name so that other routines in the adjust_*
 445   // group don't print the klass name.
 446   void adjust_method_entries(Method** old_methods, Method** new_methods,
 447                              int methods_length, bool * trace_name_printed);
 448   bool check_no_old_or_obsolete_entries();
 449   void dump_cache();
 450 #endif // INCLUDE_JVMTI
 451 
 452   // Deallocate - no fields to deallocate
 453   DEBUG_ONLY(bool on_stack() { return false; })
 454   void deallocate_contents(ClassLoaderData* data) {}
 455   bool is_klass() const { return false; }
 456 
 457   // Printing
 458   void print_on(outputStream* st) const;
 459   void print_value_on(outputStream* st) const;
 460 
 461   const char* internal_name() const { return "{constant pool cache}"; }
 462 
 463   // Verify
 464   void verify_on(outputStream* st);
 465 };
 466 
 467 #endif // SHARE_VM_OOPS_CPCACHEOOP_HPP