1 /*
   2  * Copyright (c) 1997, 2010, 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 "interpreter/bytecodes.hpp"
  27 #include "memory/resourceArea.hpp"
  28 #include "oops/methodOop.hpp"
  29 #ifdef TARGET_ARCH_x86
  30 # include "bytes_x86.hpp"
  31 #endif
  32 #ifdef TARGET_ARCH_sparc
  33 # include "bytes_sparc.hpp"
  34 #endif
  35 #ifdef TARGET_ARCH_zero
  36 # include "bytes_zero.hpp"
  37 #endif
  38 
  39 
  40 #if defined(WIN32) && (defined(_MSC_VER) && (_MSC_VER < 1600))
  41 // Windows AMD64 Compiler Hangs compiling this file
  42 // unless optimization is off
  43 #ifdef _M_AMD64
  44 #pragma optimize ("", off)
  45 #endif
  46 #endif
  47 
  48 
  49 bool            Bytecodes::_is_initialized = false;
  50 const char*     Bytecodes::_name          [Bytecodes::number_of_codes];
  51 BasicType       Bytecodes::_result_type   [Bytecodes::number_of_codes];
  52 s_char          Bytecodes::_depth         [Bytecodes::number_of_codes];
  53 u_char          Bytecodes::_lengths       [Bytecodes::number_of_codes];
  54 Bytecodes::Code Bytecodes::_java_code     [Bytecodes::number_of_codes];
  55 u_short         Bytecodes::_flags         [(1<<BitsPerByte)*2];
  56 
  57 
  58 Bytecodes::Code Bytecodes::code_at(methodOop method, int bci) {
  59   return code_at(method->bcp_from(bci), method);
  60 }
  61 
  62 Bytecodes::Code Bytecodes::non_breakpoint_code_at(address bcp, methodOop method) {
  63   if (method == NULL)  method = methodOopDesc::method_from_bcp(bcp);
  64   return method->orig_bytecode_at(method->bci_from(bcp));
  65 }
  66 
  67 int Bytecodes::special_length_at(address bcp, address end) {
  68   Code code = code_at(bcp);
  69   switch (code) {
  70   case _wide:
  71     if (end != NULL && bcp + 1 >= end) {
  72       return -1; // don't read past end of code buffer
  73     }
  74     return wide_length_for(cast(*(bcp + 1)));
  75   case _tableswitch:
  76     { address aligned_bcp = (address)round_to((intptr_t)bcp + 1, jintSize);
  77       if (end != NULL && aligned_bcp + 3*jintSize >= end) {
  78         return -1; // don't read past end of code buffer
  79       }
  80       jlong lo = (jint)Bytes::get_Java_u4(aligned_bcp + 1*jintSize);
  81       jlong hi = (jint)Bytes::get_Java_u4(aligned_bcp + 2*jintSize);
  82       jlong len = (aligned_bcp - bcp) + (3 + hi - lo + 1)*jintSize;
  83       // only return len if it can be represented as a positive int;
  84       // return -1 otherwise
  85       return (len > 0 && len == (int)len) ? len : -1;
  86     }
  87 
  88   case _lookupswitch:      // fall through
  89   case _fast_binaryswitch: // fall through
  90   case _fast_linearswitch:
  91     { address aligned_bcp = (address)round_to((intptr_t)bcp + 1, jintSize);
  92       if (end != NULL && aligned_bcp + 2*jintSize >= end) {
  93         return -1; // don't read past end of code buffer
  94       }
  95       jlong npairs = (jint)Bytes::get_Java_u4(aligned_bcp + jintSize);
  96       jlong len = (aligned_bcp - bcp) + (2 + 2*npairs)*jintSize;
  97       // only return len if it can be represented as a positive int;
  98       // return -1 otherwise
  99       return (len > 0 && len == (int)len) ? len : -1;
 100     }
 101   }
 102   // Note: Length functions must return <=0 for invalid bytecodes.
 103   return 0;
 104 }
 105 
 106 // At a breakpoint instruction, this returns the breakpoint's length,
 107 // otherwise, it's the same as special_length_at().  This is used by
 108 // the RawByteCodeStream, which wants to see the actual bytecode
 109 // values (including breakpoint).  RawByteCodeStream is used by the
 110 // verifier when reading in bytecode to verify.  Other mechanisms that
 111 // run at runtime (such as generateOopMaps) need to iterate over the code
 112 // and don't expect to see breakpoints: they want to see the instruction
 113 // which was replaced so that they can get the correct length and find
 114 // the next bytecode.
 115 //
 116 // 'end' indicates the end of the code buffer, which we should not try to read
 117 // past.
 118 int Bytecodes::raw_special_length_at(address bcp, address end) {
 119   Code code = code_or_bp_at(bcp);
 120   if (code == _breakpoint) {
 121     return 1;
 122   } else {
 123     return special_length_at(bcp, end);
 124   }
 125 }
 126 
 127 
 128 
 129 void Bytecodes::def(Code code, const char* name, const char* format, const char* wide_format, BasicType result_type, int depth, bool can_trap) {
 130   def(code, name, format, wide_format, result_type, depth, can_trap, code);
 131 }
 132 
 133 
 134 void Bytecodes::def(Code code, const char* name, const char* format, const char* wide_format, BasicType result_type, int depth, bool can_trap, Code java_code) {
 135   assert(wide_format == NULL || format != NULL, "short form must exist if there's a wide form");
 136   int len  = (format      != NULL ? (int) strlen(format)      : 0);
 137   int wlen = (wide_format != NULL ? (int) strlen(wide_format) : 0);
 138   _name          [code] = name;
 139   _result_type   [code] = result_type;
 140   _depth         [code] = depth;
 141   _lengths       [code] = (wlen << 4) | (len & 0xF);
 142   _java_code     [code] = java_code;
 143   int bc_flags = 0;
 144   if (can_trap)           bc_flags |= _bc_can_trap;
 145   if (java_code != code)  bc_flags |= _bc_can_rewrite;
 146   _flags[(u1)code+0*(1<<BitsPerByte)] = compute_flags(format,      bc_flags);
 147   _flags[(u1)code+1*(1<<BitsPerByte)] = compute_flags(wide_format, bc_flags);
 148   assert(is_defined(code)      == (format != NULL),      "");
 149   assert(wide_is_defined(code) == (wide_format != NULL), "");
 150   assert(length_for(code)      == len, "");
 151   assert(wide_length_for(code) == wlen, "");
 152 }
 153 
 154 
 155 // Format strings interpretation:
 156 //
 157 // b: bytecode
 158 // c: signed constant, Java byte-ordering
 159 // i: unsigned local index, Java byte-ordering (I = native byte ordering)
 160 // j: unsigned CP cache index, Java byte-ordering (J = native byte ordering)
 161 // k: unsigned CP index, Java byte-ordering
 162 // o: branch offset, Java byte-ordering
 163 // _: unused/ignored
 164 // w: wide bytecode
 165 //
 166 // Note: The format strings are used for 2 purposes:
 167 //       1. to specify the length of the bytecode
 168 //          (= number of characters in format string)
 169 //       2. to derive bytecode format flags (_fmt_has_k, etc.)
 170 //
 171 // Note: For bytecodes with variable length, the format string is the empty string.
 172 
 173 int Bytecodes::compute_flags(const char* format, int more_flags) {
 174   if (format == NULL)  return 0;  // not even more_flags
 175   int flags = more_flags;
 176   const char* fp = format;
 177   switch (*fp) {
 178   case '\0':
 179     flags |= _fmt_not_simple; // but variable
 180     break;
 181   case 'b':
 182     flags |= _fmt_not_variable;  // but simple
 183     ++fp;  // skip 'b'
 184     break;
 185   case 'w':
 186     flags |= _fmt_not_variable | _fmt_not_simple;
 187     ++fp;  // skip 'w'
 188     guarantee(*fp == 'b', "wide format must start with 'wb'");
 189     ++fp;  // skip 'b'
 190     break;
 191   }
 192 
 193   int has_nbo = 0, has_jbo = 0, has_size = 0;
 194   for (;;) {
 195     int this_flag = 0;
 196     char fc = *fp++;
 197     switch (fc) {
 198     case '\0':  // end of string
 199       assert(flags == (jchar)flags, "change _format_flags");
 200       return flags;
 201 
 202     case '_': continue;         // ignore these
 203 
 204     case 'j': this_flag = _fmt_has_j; has_jbo = 1; break;
 205     case 'k': this_flag = _fmt_has_k; has_jbo = 1; break;
 206     case 'i': this_flag = _fmt_has_i; has_jbo = 1; break;
 207     case 'c': this_flag = _fmt_has_c; has_jbo = 1; break;
 208     case 'o': this_flag = _fmt_has_o; has_jbo = 1; break;
 209 
 210     // uppercase versions mark native byte order (from Rewriter)
 211     // actually, only the 'J' case happens currently
 212     case 'J': this_flag = _fmt_has_j; has_nbo = 1; break;
 213     case 'K': this_flag = _fmt_has_k; has_nbo = 1; break;
 214     case 'I': this_flag = _fmt_has_i; has_nbo = 1; break;
 215     case 'C': this_flag = _fmt_has_c; has_nbo = 1; break;
 216     case 'O': this_flag = _fmt_has_o; has_nbo = 1; break;
 217     default:  guarantee(false, "bad char in format");
 218     }
 219 
 220     flags |= this_flag;
 221 
 222     guarantee(!(has_jbo && has_nbo), "mixed byte orders in format");
 223     if (has_nbo)
 224       flags |= _fmt_has_nbo;
 225 
 226     int this_size = 1;
 227     if (*fp == fc) {
 228       // advance beyond run of the same characters
 229       this_size = 2;
 230       while (*++fp == fc)  this_size++;
 231       switch (this_size) {
 232       case 2: flags |= _fmt_has_u2; break;
 233       case 4: flags |= _fmt_has_u4; break;
 234       default: guarantee(false, "bad rep count in format");
 235       }
 236     }
 237     guarantee(has_size == 0 ||                     // no field yet
 238               this_size == has_size ||             // same size
 239               this_size < has_size && *fp == '\0', // last field can be short
 240               "mixed field sizes in format");
 241     has_size = this_size;
 242   }
 243 }
 244 
 245 void Bytecodes::initialize() {
 246   if (_is_initialized) return;
 247   assert(number_of_codes <= 256, "too many bytecodes");
 248 
 249   // initialize bytecode tables - didn't use static array initializers
 250   // (such as {}) so we can do additional consistency checks and init-
 251   // code is independent of actual bytecode numbering.
 252   //
 253   // Note 1: NULL for the format string means the bytecode doesn't exist
 254   //         in that form.
 255   //
 256   // Note 2: The result type is T_ILLEGAL for bytecodes where the top of stack
 257   //         type after execution is not only determined by the bytecode itself.
 258 
 259   //  Java bytecodes
 260   //  bytecode               bytecode name           format   wide f.   result tp  stk traps
 261   def(_nop                 , "nop"                 , "b"    , NULL    , T_VOID   ,  0, false);
 262   def(_aconst_null         , "aconst_null"         , "b"    , NULL    , T_OBJECT ,  1, false);
 263   def(_iconst_m1           , "iconst_m1"           , "b"    , NULL    , T_INT    ,  1, false);
 264   def(_iconst_0            , "iconst_0"            , "b"    , NULL    , T_INT    ,  1, false);
 265   def(_iconst_1            , "iconst_1"            , "b"    , NULL    , T_INT    ,  1, false);
 266   def(_iconst_2            , "iconst_2"            , "b"    , NULL    , T_INT    ,  1, false);
 267   def(_iconst_3            , "iconst_3"            , "b"    , NULL    , T_INT    ,  1, false);
 268   def(_iconst_4            , "iconst_4"            , "b"    , NULL    , T_INT    ,  1, false);
 269   def(_iconst_5            , "iconst_5"            , "b"    , NULL    , T_INT    ,  1, false);
 270   def(_lconst_0            , "lconst_0"            , "b"    , NULL    , T_LONG   ,  2, false);
 271   def(_lconst_1            , "lconst_1"            , "b"    , NULL    , T_LONG   ,  2, false);
 272   def(_fconst_0            , "fconst_0"            , "b"    , NULL    , T_FLOAT  ,  1, false);
 273   def(_fconst_1            , "fconst_1"            , "b"    , NULL    , T_FLOAT  ,  1, false);
 274   def(_fconst_2            , "fconst_2"            , "b"    , NULL    , T_FLOAT  ,  1, false);
 275   def(_dconst_0            , "dconst_0"            , "b"    , NULL    , T_DOUBLE ,  2, false);
 276   def(_dconst_1            , "dconst_1"            , "b"    , NULL    , T_DOUBLE ,  2, false);
 277   def(_bipush              , "bipush"              , "bc"   , NULL    , T_INT    ,  1, false);
 278   def(_sipush              , "sipush"              , "bcc"  , NULL    , T_INT    ,  1, false);
 279   def(_ldc                 , "ldc"                 , "bk"   , NULL    , T_ILLEGAL,  1, true );
 280   def(_ldc_w               , "ldc_w"               , "bkk"  , NULL    , T_ILLEGAL,  1, true );
 281   def(_ldc2_w              , "ldc2_w"              , "bkk"  , NULL    , T_ILLEGAL,  2, true );
 282   def(_iload               , "iload"               , "bi"   , "wbii"  , T_INT    ,  1, false);
 283   def(_lload               , "lload"               , "bi"   , "wbii"  , T_LONG   ,  2, false);
 284   def(_fload               , "fload"               , "bi"   , "wbii"  , T_FLOAT  ,  1, false);
 285   def(_dload               , "dload"               , "bi"   , "wbii"  , T_DOUBLE ,  2, false);
 286   def(_aload               , "aload"               , "bi"   , "wbii"  , T_OBJECT ,  1, false);
 287   def(_iload_0             , "iload_0"             , "b"    , NULL    , T_INT    ,  1, false);
 288   def(_iload_1             , "iload_1"             , "b"    , NULL    , T_INT    ,  1, false);
 289   def(_iload_2             , "iload_2"             , "b"    , NULL    , T_INT    ,  1, false);
 290   def(_iload_3             , "iload_3"             , "b"    , NULL    , T_INT    ,  1, false);
 291   def(_lload_0             , "lload_0"             , "b"    , NULL    , T_LONG   ,  2, false);
 292   def(_lload_1             , "lload_1"             , "b"    , NULL    , T_LONG   ,  2, false);
 293   def(_lload_2             , "lload_2"             , "b"    , NULL    , T_LONG   ,  2, false);
 294   def(_lload_3             , "lload_3"             , "b"    , NULL    , T_LONG   ,  2, false);
 295   def(_fload_0             , "fload_0"             , "b"    , NULL    , T_FLOAT  ,  1, false);
 296   def(_fload_1             , "fload_1"             , "b"    , NULL    , T_FLOAT  ,  1, false);
 297   def(_fload_2             , "fload_2"             , "b"    , NULL    , T_FLOAT  ,  1, false);
 298   def(_fload_3             , "fload_3"             , "b"    , NULL    , T_FLOAT  ,  1, false);
 299   def(_dload_0             , "dload_0"             , "b"    , NULL    , T_DOUBLE ,  2, false);
 300   def(_dload_1             , "dload_1"             , "b"    , NULL    , T_DOUBLE ,  2, false);
 301   def(_dload_2             , "dload_2"             , "b"    , NULL    , T_DOUBLE ,  2, false);
 302   def(_dload_3             , "dload_3"             , "b"    , NULL    , T_DOUBLE ,  2, false);
 303   def(_aload_0             , "aload_0"             , "b"    , NULL    , T_OBJECT ,  1, true ); // rewriting in interpreter
 304   def(_aload_1             , "aload_1"             , "b"    , NULL    , T_OBJECT ,  1, false);
 305   def(_aload_2             , "aload_2"             , "b"    , NULL    , T_OBJECT ,  1, false);
 306   def(_aload_3             , "aload_3"             , "b"    , NULL    , T_OBJECT ,  1, false);
 307   def(_iaload              , "iaload"              , "b"    , NULL    , T_INT    , -1, true );
 308   def(_laload              , "laload"              , "b"    , NULL    , T_LONG   ,  0, true );
 309   def(_faload              , "faload"              , "b"    , NULL    , T_FLOAT  , -1, true );
 310   def(_daload              , "daload"              , "b"    , NULL    , T_DOUBLE ,  0, true );
 311   def(_aaload              , "aaload"              , "b"    , NULL    , T_OBJECT , -1, true );
 312   def(_baload              , "baload"              , "b"    , NULL    , T_INT    , -1, true );
 313   def(_caload              , "caload"              , "b"    , NULL    , T_INT    , -1, true );
 314   def(_saload              , "saload"              , "b"    , NULL    , T_INT    , -1, true );
 315   def(_istore              , "istore"              , "bi"   , "wbii"  , T_VOID   , -1, false);
 316   def(_lstore              , "lstore"              , "bi"   , "wbii"  , T_VOID   , -2, false);
 317   def(_fstore              , "fstore"              , "bi"   , "wbii"  , T_VOID   , -1, false);
 318   def(_dstore              , "dstore"              , "bi"   , "wbii"  , T_VOID   , -2, false);
 319   def(_astore              , "astore"              , "bi"   , "wbii"  , T_VOID   , -1, false);
 320   def(_istore_0            , "istore_0"            , "b"    , NULL    , T_VOID   , -1, false);
 321   def(_istore_1            , "istore_1"            , "b"    , NULL    , T_VOID   , -1, false);
 322   def(_istore_2            , "istore_2"            , "b"    , NULL    , T_VOID   , -1, false);
 323   def(_istore_3            , "istore_3"            , "b"    , NULL    , T_VOID   , -1, false);
 324   def(_lstore_0            , "lstore_0"            , "b"    , NULL    , T_VOID   , -2, false);
 325   def(_lstore_1            , "lstore_1"            , "b"    , NULL    , T_VOID   , -2, false);
 326   def(_lstore_2            , "lstore_2"            , "b"    , NULL    , T_VOID   , -2, false);
 327   def(_lstore_3            , "lstore_3"            , "b"    , NULL    , T_VOID   , -2, false);
 328   def(_fstore_0            , "fstore_0"            , "b"    , NULL    , T_VOID   , -1, false);
 329   def(_fstore_1            , "fstore_1"            , "b"    , NULL    , T_VOID   , -1, false);
 330   def(_fstore_2            , "fstore_2"            , "b"    , NULL    , T_VOID   , -1, false);
 331   def(_fstore_3            , "fstore_3"            , "b"    , NULL    , T_VOID   , -1, false);
 332   def(_dstore_0            , "dstore_0"            , "b"    , NULL    , T_VOID   , -2, false);
 333   def(_dstore_1            , "dstore_1"            , "b"    , NULL    , T_VOID   , -2, false);
 334   def(_dstore_2            , "dstore_2"            , "b"    , NULL    , T_VOID   , -2, false);
 335   def(_dstore_3            , "dstore_3"            , "b"    , NULL    , T_VOID   , -2, false);
 336   def(_astore_0            , "astore_0"            , "b"    , NULL    , T_VOID   , -1, false);
 337   def(_astore_1            , "astore_1"            , "b"    , NULL    , T_VOID   , -1, false);
 338   def(_astore_2            , "astore_2"            , "b"    , NULL    , T_VOID   , -1, false);
 339   def(_astore_3            , "astore_3"            , "b"    , NULL    , T_VOID   , -1, false);
 340   def(_iastore             , "iastore"             , "b"    , NULL    , T_VOID   , -3, true );
 341   def(_lastore             , "lastore"             , "b"    , NULL    , T_VOID   , -4, true );
 342   def(_fastore             , "fastore"             , "b"    , NULL    , T_VOID   , -3, true );
 343   def(_dastore             , "dastore"             , "b"    , NULL    , T_VOID   , -4, true );
 344   def(_aastore             , "aastore"             , "b"    , NULL    , T_VOID   , -3, true );
 345   def(_bastore             , "bastore"             , "b"    , NULL    , T_VOID   , -3, true );
 346   def(_castore             , "castore"             , "b"    , NULL    , T_VOID   , -3, true );
 347   def(_sastore             , "sastore"             , "b"    , NULL    , T_VOID   , -3, true );
 348   def(_pop                 , "pop"                 , "b"    , NULL    , T_VOID   , -1, false);
 349   def(_pop2                , "pop2"                , "b"    , NULL    , T_VOID   , -2, false);
 350   def(_dup                 , "dup"                 , "b"    , NULL    , T_VOID   ,  1, false);
 351   def(_dup_x1              , "dup_x1"              , "b"    , NULL    , T_VOID   ,  1, false);
 352   def(_dup_x2              , "dup_x2"              , "b"    , NULL    , T_VOID   ,  1, false);
 353   def(_dup2                , "dup2"                , "b"    , NULL    , T_VOID   ,  2, false);
 354   def(_dup2_x1             , "dup2_x1"             , "b"    , NULL    , T_VOID   ,  2, false);
 355   def(_dup2_x2             , "dup2_x2"             , "b"    , NULL    , T_VOID   ,  2, false);
 356   def(_swap                , "swap"                , "b"    , NULL    , T_VOID   ,  0, false);
 357   def(_iadd                , "iadd"                , "b"    , NULL    , T_INT    , -1, false);
 358   def(_ladd                , "ladd"                , "b"    , NULL    , T_LONG   , -2, false);
 359   def(_fadd                , "fadd"                , "b"    , NULL    , T_FLOAT  , -1, false);
 360   def(_dadd                , "dadd"                , "b"    , NULL    , T_DOUBLE , -2, false);
 361   def(_isub                , "isub"                , "b"    , NULL    , T_INT    , -1, false);
 362   def(_lsub                , "lsub"                , "b"    , NULL    , T_LONG   , -2, false);
 363   def(_fsub                , "fsub"                , "b"    , NULL    , T_FLOAT  , -1, false);
 364   def(_dsub                , "dsub"                , "b"    , NULL    , T_DOUBLE , -2, false);
 365   def(_imul                , "imul"                , "b"    , NULL    , T_INT    , -1, false);
 366   def(_lmul                , "lmul"                , "b"    , NULL    , T_LONG   , -2, false);
 367   def(_fmul                , "fmul"                , "b"    , NULL    , T_FLOAT  , -1, false);
 368   def(_dmul                , "dmul"                , "b"    , NULL    , T_DOUBLE , -2, false);
 369   def(_idiv                , "idiv"                , "b"    , NULL    , T_INT    , -1, true );
 370   def(_ldiv                , "ldiv"                , "b"    , NULL    , T_LONG   , -2, true );
 371   def(_fdiv                , "fdiv"                , "b"    , NULL    , T_FLOAT  , -1, false);
 372   def(_ddiv                , "ddiv"                , "b"    , NULL    , T_DOUBLE , -2, false);
 373   def(_irem                , "irem"                , "b"    , NULL    , T_INT    , -1, true );
 374   def(_lrem                , "lrem"                , "b"    , NULL    , T_LONG   , -2, true );
 375   def(_frem                , "frem"                , "b"    , NULL    , T_FLOAT  , -1, false);
 376   def(_drem                , "drem"                , "b"    , NULL    , T_DOUBLE , -2, false);
 377   def(_ineg                , "ineg"                , "b"    , NULL    , T_INT    ,  0, false);
 378   def(_lneg                , "lneg"                , "b"    , NULL    , T_LONG   ,  0, false);
 379   def(_fneg                , "fneg"                , "b"    , NULL    , T_FLOAT  ,  0, false);
 380   def(_dneg                , "dneg"                , "b"    , NULL    , T_DOUBLE ,  0, false);
 381   def(_ishl                , "ishl"                , "b"    , NULL    , T_INT    , -1, false);
 382   def(_lshl                , "lshl"                , "b"    , NULL    , T_LONG   , -1, false);
 383   def(_ishr                , "ishr"                , "b"    , NULL    , T_INT    , -1, false);
 384   def(_lshr                , "lshr"                , "b"    , NULL    , T_LONG   , -1, false);
 385   def(_iushr               , "iushr"               , "b"    , NULL    , T_INT    , -1, false);
 386   def(_lushr               , "lushr"               , "b"    , NULL    , T_LONG   , -1, false);
 387   def(_iand                , "iand"                , "b"    , NULL    , T_INT    , -1, false);
 388   def(_land                , "land"                , "b"    , NULL    , T_LONG   , -2, false);
 389   def(_ior                 , "ior"                 , "b"    , NULL    , T_INT    , -1, false);
 390   def(_lor                 , "lor"                 , "b"    , NULL    , T_LONG   , -2, false);
 391   def(_ixor                , "ixor"                , "b"    , NULL    , T_INT    , -1, false);
 392   def(_lxor                , "lxor"                , "b"    , NULL    , T_LONG   , -2, false);
 393   def(_iinc                , "iinc"                , "bic"  , "wbiicc", T_VOID   ,  0, false);
 394   def(_i2l                 , "i2l"                 , "b"    , NULL    , T_LONG   ,  1, false);
 395   def(_i2f                 , "i2f"                 , "b"    , NULL    , T_FLOAT  ,  0, false);
 396   def(_i2d                 , "i2d"                 , "b"    , NULL    , T_DOUBLE ,  1, false);
 397   def(_l2i                 , "l2i"                 , "b"    , NULL    , T_INT    , -1, false);
 398   def(_l2f                 , "l2f"                 , "b"    , NULL    , T_FLOAT  , -1, false);
 399   def(_l2d                 , "l2d"                 , "b"    , NULL    , T_DOUBLE ,  0, false);
 400   def(_f2i                 , "f2i"                 , "b"    , NULL    , T_INT    ,  0, false);
 401   def(_f2l                 , "f2l"                 , "b"    , NULL    , T_LONG   ,  1, false);
 402   def(_f2d                 , "f2d"                 , "b"    , NULL    , T_DOUBLE ,  1, false);
 403   def(_d2i                 , "d2i"                 , "b"    , NULL    , T_INT    , -1, false);
 404   def(_d2l                 , "d2l"                 , "b"    , NULL    , T_LONG   ,  0, false);
 405   def(_d2f                 , "d2f"                 , "b"    , NULL    , T_FLOAT  , -1, false);
 406   def(_i2b                 , "i2b"                 , "b"    , NULL    , T_BYTE   ,  0, false);
 407   def(_i2c                 , "i2c"                 , "b"    , NULL    , T_CHAR   ,  0, false);
 408   def(_i2s                 , "i2s"                 , "b"    , NULL    , T_SHORT  ,  0, false);
 409   def(_lcmp                , "lcmp"                , "b"    , NULL    , T_VOID   , -3, false);
 410   def(_fcmpl               , "fcmpl"               , "b"    , NULL    , T_VOID   , -1, false);
 411   def(_fcmpg               , "fcmpg"               , "b"    , NULL    , T_VOID   , -1, false);
 412   def(_dcmpl               , "dcmpl"               , "b"    , NULL    , T_VOID   , -3, false);
 413   def(_dcmpg               , "dcmpg"               , "b"    , NULL    , T_VOID   , -3, false);
 414   def(_ifeq                , "ifeq"                , "boo"  , NULL    , T_VOID   , -1, false);
 415   def(_ifne                , "ifne"                , "boo"  , NULL    , T_VOID   , -1, false);
 416   def(_iflt                , "iflt"                , "boo"  , NULL    , T_VOID   , -1, false);
 417   def(_ifge                , "ifge"                , "boo"  , NULL    , T_VOID   , -1, false);
 418   def(_ifgt                , "ifgt"                , "boo"  , NULL    , T_VOID   , -1, false);
 419   def(_ifle                , "ifle"                , "boo"  , NULL    , T_VOID   , -1, false);
 420   def(_if_icmpeq           , "if_icmpeq"           , "boo"  , NULL    , T_VOID   , -2, false);
 421   def(_if_icmpne           , "if_icmpne"           , "boo"  , NULL    , T_VOID   , -2, false);
 422   def(_if_icmplt           , "if_icmplt"           , "boo"  , NULL    , T_VOID   , -2, false);
 423   def(_if_icmpge           , "if_icmpge"           , "boo"  , NULL    , T_VOID   , -2, false);
 424   def(_if_icmpgt           , "if_icmpgt"           , "boo"  , NULL    , T_VOID   , -2, false);
 425   def(_if_icmple           , "if_icmple"           , "boo"  , NULL    , T_VOID   , -2, false);
 426   def(_if_acmpeq           , "if_acmpeq"           , "boo"  , NULL    , T_VOID   , -2, false);
 427   def(_if_acmpne           , "if_acmpne"           , "boo"  , NULL    , T_VOID   , -2, false);
 428   def(_goto                , "goto"                , "boo"  , NULL    , T_VOID   ,  0, false);
 429   def(_jsr                 , "jsr"                 , "boo"  , NULL    , T_INT    ,  0, false);
 430   def(_ret                 , "ret"                 , "bi"   , "wbii"  , T_VOID   ,  0, false);
 431   def(_tableswitch         , "tableswitch"         , ""     , NULL    , T_VOID   , -1, false); // may have backward branches
 432   def(_lookupswitch        , "lookupswitch"        , ""     , NULL    , T_VOID   , -1, false); // rewriting in interpreter
 433   def(_ireturn             , "ireturn"             , "b"    , NULL    , T_INT    , -1, true);
 434   def(_lreturn             , "lreturn"             , "b"    , NULL    , T_LONG   , -2, true);
 435   def(_freturn             , "freturn"             , "b"    , NULL    , T_FLOAT  , -1, true);
 436   def(_dreturn             , "dreturn"             , "b"    , NULL    , T_DOUBLE , -2, true);
 437   def(_areturn             , "areturn"             , "b"    , NULL    , T_OBJECT , -1, true);
 438   def(_return              , "return"              , "b"    , NULL    , T_VOID   ,  0, true);
 439   def(_getstatic           , "getstatic"           , "bJJ"  , NULL    , T_ILLEGAL,  1, true );
 440   def(_putstatic           , "putstatic"           , "bJJ"  , NULL    , T_ILLEGAL, -1, true );
 441   def(_getfield            , "getfield"            , "bJJ"  , NULL    , T_ILLEGAL,  0, true );
 442   def(_putfield            , "putfield"            , "bJJ"  , NULL    , T_ILLEGAL, -2, true );
 443   def(_invokevirtual       , "invokevirtual"       , "bJJ"  , NULL    , T_ILLEGAL, -1, true);
 444   def(_invokespecial       , "invokespecial"       , "bJJ"  , NULL    , T_ILLEGAL, -1, true);
 445   def(_invokestatic        , "invokestatic"        , "bJJ"  , NULL    , T_ILLEGAL,  0, true);
 446   def(_invokeinterface     , "invokeinterface"     , "bJJ__", NULL    , T_ILLEGAL, -1, true);
 447   def(_invokedynamic       , "invokedynamic"       , "bJJJJ", NULL    , T_ILLEGAL,  0, true );
 448   def(_new                 , "new"                 , "bkk"  , NULL    , T_OBJECT ,  1, true );
 449   def(_newarray            , "newarray"            , "bc"   , NULL    , T_OBJECT ,  0, true );
 450   def(_anewarray           , "anewarray"           , "bkk"  , NULL    , T_OBJECT ,  0, true );
 451   def(_arraylength         , "arraylength"         , "b"    , NULL    , T_VOID   ,  0, true );
 452   def(_athrow              , "athrow"              , "b"    , NULL    , T_VOID   , -1, true );
 453   def(_checkcast           , "checkcast"           , "bkk"  , NULL    , T_OBJECT ,  0, true );
 454   def(_instanceof          , "instanceof"          , "bkk"  , NULL    , T_INT    ,  0, true );
 455   def(_monitorenter        , "monitorenter"        , "b"    , NULL    , T_VOID   , -1, true );
 456   def(_monitorexit         , "monitorexit"         , "b"    , NULL    , T_VOID   , -1, true );
 457   def(_wide                , "wide"                , ""     , NULL    , T_VOID   ,  0, false);
 458   def(_multianewarray      , "multianewarray"      , "bkkc" , NULL    , T_OBJECT ,  1, true );
 459   def(_ifnull              , "ifnull"              , "boo"  , NULL    , T_VOID   , -1, false);
 460   def(_ifnonnull           , "ifnonnull"           , "boo"  , NULL    , T_VOID   , -1, false);
 461   def(_goto_w              , "goto_w"              , "boooo", NULL    , T_VOID   ,  0, false);
 462   def(_jsr_w               , "jsr_w"               , "boooo", NULL    , T_INT    ,  0, false);
 463   def(_breakpoint          , "breakpoint"          , ""     , NULL    , T_VOID   ,  0, true);
 464 
 465   //  JVM bytecodes
 466   //  bytecode               bytecode name           format   wide f.   result tp  stk traps  std code
 467 
 468   def(_fast_agetfield      , "fast_agetfield"      , "bJJ"  , NULL    , T_OBJECT ,  0, true , _getfield       );
 469   def(_fast_bgetfield      , "fast_bgetfield"      , "bJJ"  , NULL    , T_INT    ,  0, true , _getfield       );
 470   def(_fast_cgetfield      , "fast_cgetfield"      , "bJJ"  , NULL    , T_CHAR   ,  0, true , _getfield       );
 471   def(_fast_dgetfield      , "fast_dgetfield"      , "bJJ"  , NULL    , T_DOUBLE ,  0, true , _getfield       );
 472   def(_fast_fgetfield      , "fast_fgetfield"      , "bJJ"  , NULL    , T_FLOAT  ,  0, true , _getfield       );
 473   def(_fast_igetfield      , "fast_igetfield"      , "bJJ"  , NULL    , T_INT    ,  0, true , _getfield       );
 474   def(_fast_lgetfield      , "fast_lgetfield"      , "bJJ"  , NULL    , T_LONG   ,  0, true , _getfield       );
 475   def(_fast_sgetfield      , "fast_sgetfield"      , "bJJ"  , NULL    , T_SHORT  ,  0, true , _getfield       );
 476 
 477   def(_fast_aputfield      , "fast_aputfield"      , "bJJ"  , NULL    , T_OBJECT ,  0, true , _putfield       );
 478   def(_fast_bputfield      , "fast_bputfield"      , "bJJ"  , NULL    , T_INT    ,  0, true , _putfield       );
 479   def(_fast_cputfield      , "fast_cputfield"      , "bJJ"  , NULL    , T_CHAR   ,  0, true , _putfield       );
 480   def(_fast_dputfield      , "fast_dputfield"      , "bJJ"  , NULL    , T_DOUBLE ,  0, true , _putfield       );
 481   def(_fast_fputfield      , "fast_fputfield"      , "bJJ"  , NULL    , T_FLOAT  ,  0, true , _putfield       );
 482   def(_fast_iputfield      , "fast_iputfield"      , "bJJ"  , NULL    , T_INT    ,  0, true , _putfield       );
 483   def(_fast_lputfield      , "fast_lputfield"      , "bJJ"  , NULL    , T_LONG   ,  0, true , _putfield       );
 484   def(_fast_sputfield      , "fast_sputfield"      , "bJJ"  , NULL    , T_SHORT  ,  0, true , _putfield       );
 485 
 486   def(_fast_aload_0        , "fast_aload_0"        , "b"    , NULL    , T_OBJECT ,  1, true , _aload_0        );
 487   def(_fast_iaccess_0      , "fast_iaccess_0"      , "b_JJ" , NULL    , T_INT    ,  1, true , _aload_0        );
 488   def(_fast_aaccess_0      , "fast_aaccess_0"      , "b_JJ" , NULL    , T_OBJECT ,  1, true , _aload_0        );
 489   def(_fast_faccess_0      , "fast_faccess_0"      , "b_JJ" , NULL    , T_OBJECT ,  1, true , _aload_0        );
 490 
 491   def(_fast_iload          , "fast_iload"          , "bi"   , NULL    , T_INT    ,  1, false, _iload);
 492   def(_fast_iload2         , "fast_iload2"         , "bi_i" , NULL    , T_INT    ,  2, false, _iload);
 493   def(_fast_icaload        , "fast_icaload"        , "bi_"  , NULL    , T_INT    ,  0, false, _iload);
 494 
 495   // Faster method invocation.
 496   def(_fast_invokevfinal   , "fast_invokevfinal"   , "bJJ"  , NULL    , T_ILLEGAL, -1, true, _invokevirtual   );
 497 
 498   def(_fast_linearswitch   , "fast_linearswitch"   , ""     , NULL    , T_VOID   , -1, false, _lookupswitch   );
 499   def(_fast_binaryswitch   , "fast_binaryswitch"   , ""     , NULL    , T_VOID   , -1, false, _lookupswitch   );
 500 
 501   def(_return_register_finalizer , "return_register_finalizer" , "b"    , NULL    , T_VOID   ,  0, true, _return);
 502 
 503   def(_fast_aldc           , "fast_aldc"           , "bj"   , NULL    , T_OBJECT,   1, true,  _ldc   );
 504   def(_fast_aldc_w         , "fast_aldc_w"         , "bJJ"  , NULL    , T_OBJECT,   1, true,  _ldc_w );
 505 
 506   def(_shouldnotreachhere  , "_shouldnotreachhere" , "b"    , NULL    , T_VOID   ,  0, false);
 507 
 508   // platform specific JVM bytecodes
 509   pd_initialize();
 510 
 511   // compare can_trap information for each bytecode with the
 512   // can_trap information for the corresponding base bytecode
 513   // (if a rewritten bytecode can trap, so must the base bytecode)
 514   #ifdef ASSERT
 515     { for (int i = 0; i < number_of_codes; i++) {
 516         if (is_defined(i)) {
 517           Code code = cast(i);
 518           Code java = java_code(code);
 519           if (can_trap(code) && !can_trap(java))
 520             fatal(err_msg("%s can trap => %s can trap, too", name(code),
 521                           name(java)));
 522         }
 523       }
 524     }
 525   #endif
 526 
 527   // initialization successful
 528   _is_initialized = true;
 529 }
 530 
 531 
 532 void bytecodes_init() {
 533   Bytecodes::initialize();
 534 }
 535 
 536 // Restore optimization
 537 #ifdef _M_AMD64
 538 #pragma optimize ("", on)
 539 #endif