duke@435: /*
coleenp@4037:  * Copyright (c) 1997, 2012, Oracle and/or its affiliates. All rights reserved.
duke@435:  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
duke@435:  *
duke@435:  * This code is free software; you can redistribute it and/or modify it
duke@435:  * under the terms of the GNU General Public License version 2 only, as
duke@435:  * published by the Free Software Foundation.
duke@435:  *
duke@435:  * This code is distributed in the hope that it will be useful, but WITHOUT
duke@435:  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
duke@435:  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
duke@435:  * version 2 for more details (a copy is included in the LICENSE file that
duke@435:  * accompanied this code).
duke@435:  *
duke@435:  * You should have received a copy of the GNU General Public License version
duke@435:  * 2 along with this work; if not, write to the Free Software Foundation,
duke@435:  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
duke@435:  *
trims@1907:  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
trims@1907:  * or visit www.oracle.com if you need additional information or have any
trims@1907:  * questions.
duke@435:  *
duke@435:  */
duke@435: 
stefank@2314: #include "precompiled.hpp"
stefank@2314: #include "interpreter/bytecodes.hpp"
stefank@2314: #include "memory/resourceArea.hpp"
coleenp@4037: #include "oops/method.hpp"
stefank@2314: #ifdef TARGET_ARCH_x86
stefank@2314: # include "bytes_x86.hpp"
stefank@2314: #endif
stefank@2314: #ifdef TARGET_ARCH_sparc
stefank@2314: # include "bytes_sparc.hpp"
stefank@2314: #endif
stefank@2314: #ifdef TARGET_ARCH_zero
stefank@2314: # include "bytes_zero.hpp"
stefank@2314: #endif
bobv@2508: #ifdef TARGET_ARCH_arm
bobv@2508: # include "bytes_arm.hpp"
bobv@2508: #endif
bobv@2508: #ifdef TARGET_ARCH_ppc
bobv@2508: # include "bytes_ppc.hpp"
bobv@2508: #endif
duke@435: 
duke@435: 
prr@1881: #if defined(WIN32) && (defined(_MSC_VER) && (_MSC_VER < 1600))
duke@435: // Windows AMD64 Compiler Hangs compiling this file
duke@435: // unless optimization is off
duke@435: #ifdef _M_AMD64
duke@435: #pragma optimize ("", off)
duke@435: #endif
prr@1881: #endif
duke@435: 
duke@435: 
duke@435: bool            Bytecodes::_is_initialized = false;
duke@435: const char*     Bytecodes::_name          [Bytecodes::number_of_codes];
duke@435: BasicType       Bytecodes::_result_type   [Bytecodes::number_of_codes];
duke@435: s_char          Bytecodes::_depth         [Bytecodes::number_of_codes];
jrose@1920: u_char          Bytecodes::_lengths       [Bytecodes::number_of_codes];
duke@435: Bytecodes::Code Bytecodes::_java_code     [Bytecodes::number_of_codes];
jrose@1920: u_short         Bytecodes::_flags         [(1<<BitsPerByte)*2];
duke@435: 
never@2462: #ifdef ASSERT
coleenp@4037: bool Bytecodes::check_method(const Method* method, address bcp) {
never@2462:   return method->contains(bcp);
never@2462: }
never@2462: #endif
never@2462: 
never@2462: bool Bytecodes::check_must_rewrite(Bytecodes::Code code) {
never@2462:   assert(can_rewrite(code), "post-check only");
never@2462: 
never@2462:   // Some codes are conditionally rewriting.  Look closely at them.
never@2462:   switch (code) {
never@2462:   case Bytecodes::_aload_0:
never@2462:     // Even if RewriteFrequentPairs is turned on,
never@2462:     // the _aload_0 code might delay its rewrite until
never@2462:     // a following _getfield rewrites itself.
never@2462:     return false;
never@2462: 
never@2462:   case Bytecodes::_lookupswitch:
never@2462:     return false;  // the rewrite is not done by the interpreter
never@2462: 
never@2462:   case Bytecodes::_new:
never@2462:     // (Could actually look at the class here, but the profit would be small.)
never@2462:     return false;  // the rewrite is not always done
never@2462:   }
never@2462: 
never@2462:   // No other special cases.
never@2462:   return true;
never@2462: }
duke@435: 
coleenp@4037: Bytecodes::Code Bytecodes::code_at(Method* method, int bci) {
never@2462:   return code_at(method, method->bcp_from(bci));
duke@435: }
duke@435: 
coleenp@4037: Bytecodes::Code Bytecodes::non_breakpoint_code_at(const Method* method, address bcp) {
never@2462:   assert(method != NULL, "must have the method for breakpoint conversion");
never@2462:   assert(method->contains(bcp), "must be valid bcp in method");
duke@435:   return method->orig_bytecode_at(method->bci_from(bcp));
duke@435: }
duke@435: 
never@2462: int Bytecodes::special_length_at(Bytecodes::Code code, address bcp, address end) {
duke@435:   switch (code) {
duke@435:   case _wide:
kamg@848:     if (end != NULL && bcp + 1 >= end) {
kamg@848:       return -1; // don't read past end of code buffer
kamg@848:     }
duke@435:     return wide_length_for(cast(*(bcp + 1)));
duke@435:   case _tableswitch:
duke@435:     { address aligned_bcp = (address)round_to((intptr_t)bcp + 1, jintSize);
kamg@848:       if (end != NULL && aligned_bcp + 3*jintSize >= end) {
kamg@848:         return -1; // don't read past end of code buffer
kamg@848:       }
duke@435:       jlong lo = (jint)Bytes::get_Java_u4(aligned_bcp + 1*jintSize);
duke@435:       jlong hi = (jint)Bytes::get_Java_u4(aligned_bcp + 2*jintSize);
duke@435:       jlong len = (aligned_bcp - bcp) + (3 + hi - lo + 1)*jintSize;
duke@435:       // only return len if it can be represented as a positive int;
duke@435:       // return -1 otherwise
duke@435:       return (len > 0 && len == (int)len) ? len : -1;
duke@435:     }
duke@435: 
duke@435:   case _lookupswitch:      // fall through
duke@435:   case _fast_binaryswitch: // fall through
duke@435:   case _fast_linearswitch:
duke@435:     { address aligned_bcp = (address)round_to((intptr_t)bcp + 1, jintSize);
kamg@848:       if (end != NULL && aligned_bcp + 2*jintSize >= end) {
kamg@848:         return -1; // don't read past end of code buffer
kamg@848:       }
duke@435:       jlong npairs = (jint)Bytes::get_Java_u4(aligned_bcp + jintSize);
duke@435:       jlong len = (aligned_bcp - bcp) + (2 + 2*npairs)*jintSize;
duke@435:       // only return len if it can be represented as a positive int;
duke@435:       // return -1 otherwise
duke@435:       return (len > 0 && len == (int)len) ? len : -1;
duke@435:     }
duke@435:   }
jrose@1925:   // Note: Length functions must return <=0 for invalid bytecodes.
duke@435:   return 0;
duke@435: }
duke@435: 
duke@435: // At a breakpoint instruction, this returns the breakpoint's length,
duke@435: // otherwise, it's the same as special_length_at().  This is used by
duke@435: // the RawByteCodeStream, which wants to see the actual bytecode
duke@435: // values (including breakpoint).  RawByteCodeStream is used by the
duke@435: // verifier when reading in bytecode to verify.  Other mechanisms that
duke@435: // run at runtime (such as generateOopMaps) need to iterate over the code
duke@435: // and don't expect to see breakpoints: they want to see the instruction
kamg@848: // which was replaced so that they can get the correct length and find
duke@435: // the next bytecode.
kamg@848: //
kamg@848: // 'end' indicates the end of the code buffer, which we should not try to read
kamg@848: // past.
kamg@848: int Bytecodes::raw_special_length_at(address bcp, address end) {
duke@435:   Code code = code_or_bp_at(bcp);
duke@435:   if (code == _breakpoint) {
duke@435:     return 1;
duke@435:   } else {
never@2462:     return special_length_at(code, bcp, end);
duke@435:   }
duke@435: }
duke@435: 
duke@435: 
duke@435: 
duke@435: void Bytecodes::def(Code code, const char* name, const char* format, const char* wide_format, BasicType result_type, int depth, bool can_trap) {
duke@435:   def(code, name, format, wide_format, result_type, depth, can_trap, code);
duke@435: }
duke@435: 
duke@435: 
duke@435: 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) {
duke@435:   assert(wide_format == NULL || format != NULL, "short form must exist if there's a wide form");
jrose@1920:   int len  = (format      != NULL ? (int) strlen(format)      : 0);
jrose@1920:   int wlen = (wide_format != NULL ? (int) strlen(wide_format) : 0);
duke@435:   _name          [code] = name;
duke@435:   _result_type   [code] = result_type;
duke@435:   _depth         [code] = depth;
jrose@1920:   _lengths       [code] = (wlen << 4) | (len & 0xF);
duke@435:   _java_code     [code] = java_code;
jrose@1920:   int bc_flags = 0;
jrose@1920:   if (can_trap)           bc_flags |= _bc_can_trap;
jrose@1920:   if (java_code != code)  bc_flags |= _bc_can_rewrite;
jrose@1920:   _flags[(u1)code+0*(1<<BitsPerByte)] = compute_flags(format,      bc_flags);
jrose@1920:   _flags[(u1)code+1*(1<<BitsPerByte)] = compute_flags(wide_format, bc_flags);
jrose@1920:   assert(is_defined(code)      == (format != NULL),      "");
jrose@1920:   assert(wide_is_defined(code) == (wide_format != NULL), "");
jrose@1920:   assert(length_for(code)      == len, "");
jrose@1920:   assert(wide_length_for(code) == wlen, "");
duke@435: }
duke@435: 
duke@435: 
duke@435: // Format strings interpretation:
duke@435: //
duke@435: // b: bytecode
duke@435: // c: signed constant, Java byte-ordering
jrose@1920: // i: unsigned local index, Java byte-ordering (I = native byte ordering)
jrose@1920: // j: unsigned CP cache index, Java byte-ordering (J = native byte ordering)
jrose@1920: // k: unsigned CP index, Java byte-ordering
jrose@1920: // o: branch offset, Java byte-ordering
duke@435: // _: unused/ignored
duke@435: // w: wide bytecode
duke@435: //
jrose@1920: // Note: The format strings are used for 2 purposes:
duke@435: //       1. to specify the length of the bytecode
duke@435: //          (= number of characters in format string)
jrose@1920: //       2. to derive bytecode format flags (_fmt_has_k, etc.)
duke@435: //
duke@435: // Note: For bytecodes with variable length, the format string is the empty string.
duke@435: 
jrose@1920: int Bytecodes::compute_flags(const char* format, int more_flags) {
jrose@1920:   if (format == NULL)  return 0;  // not even more_flags
jrose@1920:   int flags = more_flags;
jrose@1920:   const char* fp = format;
jrose@1920:   switch (*fp) {
jrose@1920:   case '\0':
jrose@1920:     flags |= _fmt_not_simple; // but variable
jrose@1920:     break;
jrose@1920:   case 'b':
jrose@1920:     flags |= _fmt_not_variable;  // but simple
jrose@1920:     ++fp;  // skip 'b'
jrose@1920:     break;
jrose@1920:   case 'w':
jrose@1920:     flags |= _fmt_not_variable | _fmt_not_simple;
jrose@1920:     ++fp;  // skip 'w'
jrose@1920:     guarantee(*fp == 'b', "wide format must start with 'wb'");
jrose@1920:     ++fp;  // skip 'b'
jrose@1920:     break;
jrose@1920:   }
jrose@1920: 
jrose@1920:   int has_nbo = 0, has_jbo = 0, has_size = 0;
jrose@1920:   for (;;) {
jrose@1920:     int this_flag = 0;
jrose@1920:     char fc = *fp++;
jrose@1920:     switch (fc) {
jrose@1920:     case '\0':  // end of string
jrose@1920:       assert(flags == (jchar)flags, "change _format_flags");
jrose@1920:       return flags;
jrose@1920: 
jrose@1920:     case '_': continue;         // ignore these
jrose@1920: 
jrose@1920:     case 'j': this_flag = _fmt_has_j; has_jbo = 1; break;
jrose@1920:     case 'k': this_flag = _fmt_has_k; has_jbo = 1; break;
jrose@1920:     case 'i': this_flag = _fmt_has_i; has_jbo = 1; break;
jrose@1920:     case 'c': this_flag = _fmt_has_c; has_jbo = 1; break;
jrose@1920:     case 'o': this_flag = _fmt_has_o; has_jbo = 1; break;
jrose@1920: 
jrose@1920:     // uppercase versions mark native byte order (from Rewriter)
jrose@1920:     // actually, only the 'J' case happens currently
jrose@1920:     case 'J': this_flag = _fmt_has_j; has_nbo = 1; break;
jrose@1920:     case 'K': this_flag = _fmt_has_k; has_nbo = 1; break;
jrose@1920:     case 'I': this_flag = _fmt_has_i; has_nbo = 1; break;
jrose@1920:     case 'C': this_flag = _fmt_has_c; has_nbo = 1; break;
jrose@1920:     case 'O': this_flag = _fmt_has_o; has_nbo = 1; break;
jrose@1920:     default:  guarantee(false, "bad char in format");
jrose@1920:     }
jrose@1920: 
jrose@1920:     flags |= this_flag;
jrose@1920: 
jrose@1920:     guarantee(!(has_jbo && has_nbo), "mixed byte orders in format");
jrose@1920:     if (has_nbo)
jrose@1920:       flags |= _fmt_has_nbo;
jrose@1920: 
jrose@1920:     int this_size = 1;
jrose@1920:     if (*fp == fc) {
jrose@1920:       // advance beyond run of the same characters
jrose@1920:       this_size = 2;
jrose@1920:       while (*++fp == fc)  this_size++;
jrose@1920:       switch (this_size) {
jrose@1920:       case 2: flags |= _fmt_has_u2; break;
jrose@1920:       case 4: flags |= _fmt_has_u4; break;
jrose@1920:       default: guarantee(false, "bad rep count in format");
jrose@1920:       }
jrose@1920:     }
jrose@1920:     guarantee(has_size == 0 ||                     // no field yet
jrose@1920:               this_size == has_size ||             // same size
jrose@1920:               this_size < has_size && *fp == '\0', // last field can be short
jrose@1920:               "mixed field sizes in format");
jrose@1920:     has_size = this_size;
jrose@1920:   }
jrose@1920: }
jrose@1920: 
duke@435: void Bytecodes::initialize() {
duke@435:   if (_is_initialized) return;
duke@435:   assert(number_of_codes <= 256, "too many bytecodes");
duke@435: 
duke@435:   // initialize bytecode tables - didn't use static array initializers
duke@435:   // (such as {}) so we can do additional consistency checks and init-
duke@435:   // code is independent of actual bytecode numbering.
duke@435:   //
duke@435:   // Note 1: NULL for the format string means the bytecode doesn't exist
duke@435:   //         in that form.
duke@435:   //
duke@435:   // Note 2: The result type is T_ILLEGAL for bytecodes where the top of stack
duke@435:   //         type after execution is not only determined by the bytecode itself.
duke@435: 
duke@435:   //  Java bytecodes
duke@435:   //  bytecode               bytecode name           format   wide f.   result tp  stk traps
duke@435:   def(_nop                 , "nop"                 , "b"    , NULL    , T_VOID   ,  0, false);
duke@435:   def(_aconst_null         , "aconst_null"         , "b"    , NULL    , T_OBJECT ,  1, false);
duke@435:   def(_iconst_m1           , "iconst_m1"           , "b"    , NULL    , T_INT    ,  1, false);
duke@435:   def(_iconst_0            , "iconst_0"            , "b"    , NULL    , T_INT    ,  1, false);
duke@435:   def(_iconst_1            , "iconst_1"            , "b"    , NULL    , T_INT    ,  1, false);
duke@435:   def(_iconst_2            , "iconst_2"            , "b"    , NULL    , T_INT    ,  1, false);
duke@435:   def(_iconst_3            , "iconst_3"            , "b"    , NULL    , T_INT    ,  1, false);
duke@435:   def(_iconst_4            , "iconst_4"            , "b"    , NULL    , T_INT    ,  1, false);
duke@435:   def(_iconst_5            , "iconst_5"            , "b"    , NULL    , T_INT    ,  1, false);
duke@435:   def(_lconst_0            , "lconst_0"            , "b"    , NULL    , T_LONG   ,  2, false);
duke@435:   def(_lconst_1            , "lconst_1"            , "b"    , NULL    , T_LONG   ,  2, false);
duke@435:   def(_fconst_0            , "fconst_0"            , "b"    , NULL    , T_FLOAT  ,  1, false);
duke@435:   def(_fconst_1            , "fconst_1"            , "b"    , NULL    , T_FLOAT  ,  1, false);
duke@435:   def(_fconst_2            , "fconst_2"            , "b"    , NULL    , T_FLOAT  ,  1, false);
duke@435:   def(_dconst_0            , "dconst_0"            , "b"    , NULL    , T_DOUBLE ,  2, false);
duke@435:   def(_dconst_1            , "dconst_1"            , "b"    , NULL    , T_DOUBLE ,  2, false);
duke@435:   def(_bipush              , "bipush"              , "bc"   , NULL    , T_INT    ,  1, false);
duke@435:   def(_sipush              , "sipush"              , "bcc"  , NULL    , T_INT    ,  1, false);
jrose@1920:   def(_ldc                 , "ldc"                 , "bk"   , NULL    , T_ILLEGAL,  1, true );
jrose@1920:   def(_ldc_w               , "ldc_w"               , "bkk"  , NULL    , T_ILLEGAL,  1, true );
jrose@1920:   def(_ldc2_w              , "ldc2_w"              , "bkk"  , NULL    , T_ILLEGAL,  2, true );
duke@435:   def(_iload               , "iload"               , "bi"   , "wbii"  , T_INT    ,  1, false);
duke@435:   def(_lload               , "lload"               , "bi"   , "wbii"  , T_LONG   ,  2, false);
duke@435:   def(_fload               , "fload"               , "bi"   , "wbii"  , T_FLOAT  ,  1, false);
duke@435:   def(_dload               , "dload"               , "bi"   , "wbii"  , T_DOUBLE ,  2, false);
duke@435:   def(_aload               , "aload"               , "bi"   , "wbii"  , T_OBJECT ,  1, false);
duke@435:   def(_iload_0             , "iload_0"             , "b"    , NULL    , T_INT    ,  1, false);
duke@435:   def(_iload_1             , "iload_1"             , "b"    , NULL    , T_INT    ,  1, false);
duke@435:   def(_iload_2             , "iload_2"             , "b"    , NULL    , T_INT    ,  1, false);
duke@435:   def(_iload_3             , "iload_3"             , "b"    , NULL    , T_INT    ,  1, false);
duke@435:   def(_lload_0             , "lload_0"             , "b"    , NULL    , T_LONG   ,  2, false);
duke@435:   def(_lload_1             , "lload_1"             , "b"    , NULL    , T_LONG   ,  2, false);
duke@435:   def(_lload_2             , "lload_2"             , "b"    , NULL    , T_LONG   ,  2, false);
duke@435:   def(_lload_3             , "lload_3"             , "b"    , NULL    , T_LONG   ,  2, false);
duke@435:   def(_fload_0             , "fload_0"             , "b"    , NULL    , T_FLOAT  ,  1, false);
duke@435:   def(_fload_1             , "fload_1"             , "b"    , NULL    , T_FLOAT  ,  1, false);
duke@435:   def(_fload_2             , "fload_2"             , "b"    , NULL    , T_FLOAT  ,  1, false);
duke@435:   def(_fload_3             , "fload_3"             , "b"    , NULL    , T_FLOAT  ,  1, false);
duke@435:   def(_dload_0             , "dload_0"             , "b"    , NULL    , T_DOUBLE ,  2, false);
duke@435:   def(_dload_1             , "dload_1"             , "b"    , NULL    , T_DOUBLE ,  2, false);
duke@435:   def(_dload_2             , "dload_2"             , "b"    , NULL    , T_DOUBLE ,  2, false);
duke@435:   def(_dload_3             , "dload_3"             , "b"    , NULL    , T_DOUBLE ,  2, false);
duke@435:   def(_aload_0             , "aload_0"             , "b"    , NULL    , T_OBJECT ,  1, true ); // rewriting in interpreter
duke@435:   def(_aload_1             , "aload_1"             , "b"    , NULL    , T_OBJECT ,  1, false);
duke@435:   def(_aload_2             , "aload_2"             , "b"    , NULL    , T_OBJECT ,  1, false);
duke@435:   def(_aload_3             , "aload_3"             , "b"    , NULL    , T_OBJECT ,  1, false);
duke@435:   def(_iaload              , "iaload"              , "b"    , NULL    , T_INT    , -1, true );
duke@435:   def(_laload              , "laload"              , "b"    , NULL    , T_LONG   ,  0, true );
duke@435:   def(_faload              , "faload"              , "b"    , NULL    , T_FLOAT  , -1, true );
duke@435:   def(_daload              , "daload"              , "b"    , NULL    , T_DOUBLE ,  0, true );
duke@435:   def(_aaload              , "aaload"              , "b"    , NULL    , T_OBJECT , -1, true );
duke@435:   def(_baload              , "baload"              , "b"    , NULL    , T_INT    , -1, true );
duke@435:   def(_caload              , "caload"              , "b"    , NULL    , T_INT    , -1, true );
duke@435:   def(_saload              , "saload"              , "b"    , NULL    , T_INT    , -1, true );
duke@435:   def(_istore              , "istore"              , "bi"   , "wbii"  , T_VOID   , -1, false);
duke@435:   def(_lstore              , "lstore"              , "bi"   , "wbii"  , T_VOID   , -2, false);
duke@435:   def(_fstore              , "fstore"              , "bi"   , "wbii"  , T_VOID   , -1, false);
duke@435:   def(_dstore              , "dstore"              , "bi"   , "wbii"  , T_VOID   , -2, false);
duke@435:   def(_astore              , "astore"              , "bi"   , "wbii"  , T_VOID   , -1, false);
duke@435:   def(_istore_0            , "istore_0"            , "b"    , NULL    , T_VOID   , -1, false);
duke@435:   def(_istore_1            , "istore_1"            , "b"    , NULL    , T_VOID   , -1, false);
duke@435:   def(_istore_2            , "istore_2"            , "b"    , NULL    , T_VOID   , -1, false);
duke@435:   def(_istore_3            , "istore_3"            , "b"    , NULL    , T_VOID   , -1, false);
duke@435:   def(_lstore_0            , "lstore_0"            , "b"    , NULL    , T_VOID   , -2, false);
duke@435:   def(_lstore_1            , "lstore_1"            , "b"    , NULL    , T_VOID   , -2, false);
duke@435:   def(_lstore_2            , "lstore_2"            , "b"    , NULL    , T_VOID   , -2, false);
duke@435:   def(_lstore_3            , "lstore_3"            , "b"    , NULL    , T_VOID   , -2, false);
duke@435:   def(_fstore_0            , "fstore_0"            , "b"    , NULL    , T_VOID   , -1, false);
duke@435:   def(_fstore_1            , "fstore_1"            , "b"    , NULL    , T_VOID   , -1, false);
duke@435:   def(_fstore_2            , "fstore_2"            , "b"    , NULL    , T_VOID   , -1, false);
duke@435:   def(_fstore_3            , "fstore_3"            , "b"    , NULL    , T_VOID   , -1, false);
duke@435:   def(_dstore_0            , "dstore_0"            , "b"    , NULL    , T_VOID   , -2, false);
duke@435:   def(_dstore_1            , "dstore_1"            , "b"    , NULL    , T_VOID   , -2, false);
duke@435:   def(_dstore_2            , "dstore_2"            , "b"    , NULL    , T_VOID   , -2, false);
duke@435:   def(_dstore_3            , "dstore_3"            , "b"    , NULL    , T_VOID   , -2, false);
duke@435:   def(_astore_0            , "astore_0"            , "b"    , NULL    , T_VOID   , -1, false);
duke@435:   def(_astore_1            , "astore_1"            , "b"    , NULL    , T_VOID   , -1, false);
duke@435:   def(_astore_2            , "astore_2"            , "b"    , NULL    , T_VOID   , -1, false);
duke@435:   def(_astore_3            , "astore_3"            , "b"    , NULL    , T_VOID   , -1, false);
duke@435:   def(_iastore             , "iastore"             , "b"    , NULL    , T_VOID   , -3, true );
duke@435:   def(_lastore             , "lastore"             , "b"    , NULL    , T_VOID   , -4, true );
duke@435:   def(_fastore             , "fastore"             , "b"    , NULL    , T_VOID   , -3, true );
duke@435:   def(_dastore             , "dastore"             , "b"    , NULL    , T_VOID   , -4, true );
duke@435:   def(_aastore             , "aastore"             , "b"    , NULL    , T_VOID   , -3, true );
duke@435:   def(_bastore             , "bastore"             , "b"    , NULL    , T_VOID   , -3, true );
duke@435:   def(_castore             , "castore"             , "b"    , NULL    , T_VOID   , -3, true );
duke@435:   def(_sastore             , "sastore"             , "b"    , NULL    , T_VOID   , -3, true );
duke@435:   def(_pop                 , "pop"                 , "b"    , NULL    , T_VOID   , -1, false);
duke@435:   def(_pop2                , "pop2"                , "b"    , NULL    , T_VOID   , -2, false);
duke@435:   def(_dup                 , "dup"                 , "b"    , NULL    , T_VOID   ,  1, false);
duke@435:   def(_dup_x1              , "dup_x1"              , "b"    , NULL    , T_VOID   ,  1, false);
duke@435:   def(_dup_x2              , "dup_x2"              , "b"    , NULL    , T_VOID   ,  1, false);
duke@435:   def(_dup2                , "dup2"                , "b"    , NULL    , T_VOID   ,  2, false);
duke@435:   def(_dup2_x1             , "dup2_x1"             , "b"    , NULL    , T_VOID   ,  2, false);
duke@435:   def(_dup2_x2             , "dup2_x2"             , "b"    , NULL    , T_VOID   ,  2, false);
duke@435:   def(_swap                , "swap"                , "b"    , NULL    , T_VOID   ,  0, false);
duke@435:   def(_iadd                , "iadd"                , "b"    , NULL    , T_INT    , -1, false);
duke@435:   def(_ladd                , "ladd"                , "b"    , NULL    , T_LONG   , -2, false);
duke@435:   def(_fadd                , "fadd"                , "b"    , NULL    , T_FLOAT  , -1, false);
duke@435:   def(_dadd                , "dadd"                , "b"    , NULL    , T_DOUBLE , -2, false);
duke@435:   def(_isub                , "isub"                , "b"    , NULL    , T_INT    , -1, false);
duke@435:   def(_lsub                , "lsub"                , "b"    , NULL    , T_LONG   , -2, false);
duke@435:   def(_fsub                , "fsub"                , "b"    , NULL    , T_FLOAT  , -1, false);
duke@435:   def(_dsub                , "dsub"                , "b"    , NULL    , T_DOUBLE , -2, false);
duke@435:   def(_imul                , "imul"                , "b"    , NULL    , T_INT    , -1, false);
duke@435:   def(_lmul                , "lmul"                , "b"    , NULL    , T_LONG   , -2, false);
duke@435:   def(_fmul                , "fmul"                , "b"    , NULL    , T_FLOAT  , -1, false);
duke@435:   def(_dmul                , "dmul"                , "b"    , NULL    , T_DOUBLE , -2, false);
duke@435:   def(_idiv                , "idiv"                , "b"    , NULL    , T_INT    , -1, true );
duke@435:   def(_ldiv                , "ldiv"                , "b"    , NULL    , T_LONG   , -2, true );
duke@435:   def(_fdiv                , "fdiv"                , "b"    , NULL    , T_FLOAT  , -1, false);
duke@435:   def(_ddiv                , "ddiv"                , "b"    , NULL    , T_DOUBLE , -2, false);
duke@435:   def(_irem                , "irem"                , "b"    , NULL    , T_INT    , -1, true );
duke@435:   def(_lrem                , "lrem"                , "b"    , NULL    , T_LONG   , -2, true );
duke@435:   def(_frem                , "frem"                , "b"    , NULL    , T_FLOAT  , -1, false);
duke@435:   def(_drem                , "drem"                , "b"    , NULL    , T_DOUBLE , -2, false);
duke@435:   def(_ineg                , "ineg"                , "b"    , NULL    , T_INT    ,  0, false);
duke@435:   def(_lneg                , "lneg"                , "b"    , NULL    , T_LONG   ,  0, false);
duke@435:   def(_fneg                , "fneg"                , "b"    , NULL    , T_FLOAT  ,  0, false);
duke@435:   def(_dneg                , "dneg"                , "b"    , NULL    , T_DOUBLE ,  0, false);
duke@435:   def(_ishl                , "ishl"                , "b"    , NULL    , T_INT    , -1, false);
duke@435:   def(_lshl                , "lshl"                , "b"    , NULL    , T_LONG   , -1, false);
duke@435:   def(_ishr                , "ishr"                , "b"    , NULL    , T_INT    , -1, false);
duke@435:   def(_lshr                , "lshr"                , "b"    , NULL    , T_LONG   , -1, false);
duke@435:   def(_iushr               , "iushr"               , "b"    , NULL    , T_INT    , -1, false);
duke@435:   def(_lushr               , "lushr"               , "b"    , NULL    , T_LONG   , -1, false);
duke@435:   def(_iand                , "iand"                , "b"    , NULL    , T_INT    , -1, false);
duke@435:   def(_land                , "land"                , "b"    , NULL    , T_LONG   , -2, false);
duke@435:   def(_ior                 , "ior"                 , "b"    , NULL    , T_INT    , -1, false);
duke@435:   def(_lor                 , "lor"                 , "b"    , NULL    , T_LONG   , -2, false);
duke@435:   def(_ixor                , "ixor"                , "b"    , NULL    , T_INT    , -1, false);
duke@435:   def(_lxor                , "lxor"                , "b"    , NULL    , T_LONG   , -2, false);
duke@435:   def(_iinc                , "iinc"                , "bic"  , "wbiicc", T_VOID   ,  0, false);
duke@435:   def(_i2l                 , "i2l"                 , "b"    , NULL    , T_LONG   ,  1, false);
duke@435:   def(_i2f                 , "i2f"                 , "b"    , NULL    , T_FLOAT  ,  0, false);
duke@435:   def(_i2d                 , "i2d"                 , "b"    , NULL    , T_DOUBLE ,  1, false);
duke@435:   def(_l2i                 , "l2i"                 , "b"    , NULL    , T_INT    , -1, false);
duke@435:   def(_l2f                 , "l2f"                 , "b"    , NULL    , T_FLOAT  , -1, false);
duke@435:   def(_l2d                 , "l2d"                 , "b"    , NULL    , T_DOUBLE ,  0, false);
duke@435:   def(_f2i                 , "f2i"                 , "b"    , NULL    , T_INT    ,  0, false);
duke@435:   def(_f2l                 , "f2l"                 , "b"    , NULL    , T_LONG   ,  1, false);
duke@435:   def(_f2d                 , "f2d"                 , "b"    , NULL    , T_DOUBLE ,  1, false);
duke@435:   def(_d2i                 , "d2i"                 , "b"    , NULL    , T_INT    , -1, false);
duke@435:   def(_d2l                 , "d2l"                 , "b"    , NULL    , T_LONG   ,  0, false);
duke@435:   def(_d2f                 , "d2f"                 , "b"    , NULL    , T_FLOAT  , -1, false);
duke@435:   def(_i2b                 , "i2b"                 , "b"    , NULL    , T_BYTE   ,  0, false);
duke@435:   def(_i2c                 , "i2c"                 , "b"    , NULL    , T_CHAR   ,  0, false);
duke@435:   def(_i2s                 , "i2s"                 , "b"    , NULL    , T_SHORT  ,  0, false);
duke@435:   def(_lcmp                , "lcmp"                , "b"    , NULL    , T_VOID   , -3, false);
duke@435:   def(_fcmpl               , "fcmpl"               , "b"    , NULL    , T_VOID   , -1, false);
duke@435:   def(_fcmpg               , "fcmpg"               , "b"    , NULL    , T_VOID   , -1, false);
duke@435:   def(_dcmpl               , "dcmpl"               , "b"    , NULL    , T_VOID   , -3, false);
duke@435:   def(_dcmpg               , "dcmpg"               , "b"    , NULL    , T_VOID   , -3, false);
duke@435:   def(_ifeq                , "ifeq"                , "boo"  , NULL    , T_VOID   , -1, false);
duke@435:   def(_ifne                , "ifne"                , "boo"  , NULL    , T_VOID   , -1, false);
duke@435:   def(_iflt                , "iflt"                , "boo"  , NULL    , T_VOID   , -1, false);
duke@435:   def(_ifge                , "ifge"                , "boo"  , NULL    , T_VOID   , -1, false);
duke@435:   def(_ifgt                , "ifgt"                , "boo"  , NULL    , T_VOID   , -1, false);
duke@435:   def(_ifle                , "ifle"                , "boo"  , NULL    , T_VOID   , -1, false);
duke@435:   def(_if_icmpeq           , "if_icmpeq"           , "boo"  , NULL    , T_VOID   , -2, false);
duke@435:   def(_if_icmpne           , "if_icmpne"           , "boo"  , NULL    , T_VOID   , -2, false);
duke@435:   def(_if_icmplt           , "if_icmplt"           , "boo"  , NULL    , T_VOID   , -2, false);
duke@435:   def(_if_icmpge           , "if_icmpge"           , "boo"  , NULL    , T_VOID   , -2, false);
duke@435:   def(_if_icmpgt           , "if_icmpgt"           , "boo"  , NULL    , T_VOID   , -2, false);
duke@435:   def(_if_icmple           , "if_icmple"           , "boo"  , NULL    , T_VOID   , -2, false);
duke@435:   def(_if_acmpeq           , "if_acmpeq"           , "boo"  , NULL    , T_VOID   , -2, false);
duke@435:   def(_if_acmpne           , "if_acmpne"           , "boo"  , NULL    , T_VOID   , -2, false);
duke@435:   def(_goto                , "goto"                , "boo"  , NULL    , T_VOID   ,  0, false);
duke@435:   def(_jsr                 , "jsr"                 , "boo"  , NULL    , T_INT    ,  0, false);
duke@435:   def(_ret                 , "ret"                 , "bi"   , "wbii"  , T_VOID   ,  0, false);
duke@435:   def(_tableswitch         , "tableswitch"         , ""     , NULL    , T_VOID   , -1, false); // may have backward branches
duke@435:   def(_lookupswitch        , "lookupswitch"        , ""     , NULL    , T_VOID   , -1, false); // rewriting in interpreter
duke@435:   def(_ireturn             , "ireturn"             , "b"    , NULL    , T_INT    , -1, true);
duke@435:   def(_lreturn             , "lreturn"             , "b"    , NULL    , T_LONG   , -2, true);
duke@435:   def(_freturn             , "freturn"             , "b"    , NULL    , T_FLOAT  , -1, true);
duke@435:   def(_dreturn             , "dreturn"             , "b"    , NULL    , T_DOUBLE , -2, true);
duke@435:   def(_areturn             , "areturn"             , "b"    , NULL    , T_OBJECT , -1, true);
duke@435:   def(_return              , "return"              , "b"    , NULL    , T_VOID   ,  0, true);
jrose@1920:   def(_getstatic           , "getstatic"           , "bJJ"  , NULL    , T_ILLEGAL,  1, true );
jrose@1920:   def(_putstatic           , "putstatic"           , "bJJ"  , NULL    , T_ILLEGAL, -1, true );
jrose@1920:   def(_getfield            , "getfield"            , "bJJ"  , NULL    , T_ILLEGAL,  0, true );
jrose@1920:   def(_putfield            , "putfield"            , "bJJ"  , NULL    , T_ILLEGAL, -2, true );
jrose@1920:   def(_invokevirtual       , "invokevirtual"       , "bJJ"  , NULL    , T_ILLEGAL, -1, true);
jrose@1920:   def(_invokespecial       , "invokespecial"       , "bJJ"  , NULL    , T_ILLEGAL, -1, true);
jrose@1920:   def(_invokestatic        , "invokestatic"        , "bJJ"  , NULL    , T_ILLEGAL,  0, true);
jrose@1920:   def(_invokeinterface     , "invokeinterface"     , "bJJ__", NULL    , T_ILLEGAL, -1, true);
jrose@1920:   def(_invokedynamic       , "invokedynamic"       , "bJJJJ", NULL    , T_ILLEGAL,  0, true );
jrose@1920:   def(_new                 , "new"                 , "bkk"  , NULL    , T_OBJECT ,  1, true );
duke@435:   def(_newarray            , "newarray"            , "bc"   , NULL    , T_OBJECT ,  0, true );
jrose@1920:   def(_anewarray           , "anewarray"           , "bkk"  , NULL    , T_OBJECT ,  0, true );
duke@435:   def(_arraylength         , "arraylength"         , "b"    , NULL    , T_VOID   ,  0, true );
duke@435:   def(_athrow              , "athrow"              , "b"    , NULL    , T_VOID   , -1, true );
jrose@1920:   def(_checkcast           , "checkcast"           , "bkk"  , NULL    , T_OBJECT ,  0, true );
jrose@1920:   def(_instanceof          , "instanceof"          , "bkk"  , NULL    , T_INT    ,  0, true );
duke@435:   def(_monitorenter        , "monitorenter"        , "b"    , NULL    , T_VOID   , -1, true );
duke@435:   def(_monitorexit         , "monitorexit"         , "b"    , NULL    , T_VOID   , -1, true );
duke@435:   def(_wide                , "wide"                , ""     , NULL    , T_VOID   ,  0, false);
jrose@1920:   def(_multianewarray      , "multianewarray"      , "bkkc" , NULL    , T_OBJECT ,  1, true );
duke@435:   def(_ifnull              , "ifnull"              , "boo"  , NULL    , T_VOID   , -1, false);
duke@435:   def(_ifnonnull           , "ifnonnull"           , "boo"  , NULL    , T_VOID   , -1, false);
duke@435:   def(_goto_w              , "goto_w"              , "boooo", NULL    , T_VOID   ,  0, false);
duke@435:   def(_jsr_w               , "jsr_w"               , "boooo", NULL    , T_INT    ,  0, false);
duke@435:   def(_breakpoint          , "breakpoint"          , ""     , NULL    , T_VOID   ,  0, true);
duke@435: 
duke@435:   //  JVM bytecodes
duke@435:   //  bytecode               bytecode name           format   wide f.   result tp  stk traps  std code
duke@435: 
jrose@1920:   def(_fast_agetfield      , "fast_agetfield"      , "bJJ"  , NULL    , T_OBJECT ,  0, true , _getfield       );
jrose@1920:   def(_fast_bgetfield      , "fast_bgetfield"      , "bJJ"  , NULL    , T_INT    ,  0, true , _getfield       );
jrose@1920:   def(_fast_cgetfield      , "fast_cgetfield"      , "bJJ"  , NULL    , T_CHAR   ,  0, true , _getfield       );
jrose@1920:   def(_fast_dgetfield      , "fast_dgetfield"      , "bJJ"  , NULL    , T_DOUBLE ,  0, true , _getfield       );
jrose@1920:   def(_fast_fgetfield      , "fast_fgetfield"      , "bJJ"  , NULL    , T_FLOAT  ,  0, true , _getfield       );
jrose@1920:   def(_fast_igetfield      , "fast_igetfield"      , "bJJ"  , NULL    , T_INT    ,  0, true , _getfield       );
jrose@1920:   def(_fast_lgetfield      , "fast_lgetfield"      , "bJJ"  , NULL    , T_LONG   ,  0, true , _getfield       );
jrose@1920:   def(_fast_sgetfield      , "fast_sgetfield"      , "bJJ"  , NULL    , T_SHORT  ,  0, true , _getfield       );
duke@435: 
jrose@1920:   def(_fast_aputfield      , "fast_aputfield"      , "bJJ"  , NULL    , T_OBJECT ,  0, true , _putfield       );
jrose@1920:   def(_fast_bputfield      , "fast_bputfield"      , "bJJ"  , NULL    , T_INT    ,  0, true , _putfield       );
jrose@1920:   def(_fast_cputfield      , "fast_cputfield"      , "bJJ"  , NULL    , T_CHAR   ,  0, true , _putfield       );
jrose@1920:   def(_fast_dputfield      , "fast_dputfield"      , "bJJ"  , NULL    , T_DOUBLE ,  0, true , _putfield       );
jrose@1920:   def(_fast_fputfield      , "fast_fputfield"      , "bJJ"  , NULL    , T_FLOAT  ,  0, true , _putfield       );
jrose@1920:   def(_fast_iputfield      , "fast_iputfield"      , "bJJ"  , NULL    , T_INT    ,  0, true , _putfield       );
jrose@1920:   def(_fast_lputfield      , "fast_lputfield"      , "bJJ"  , NULL    , T_LONG   ,  0, true , _putfield       );
jrose@1920:   def(_fast_sputfield      , "fast_sputfield"      , "bJJ"  , NULL    , T_SHORT  ,  0, true , _putfield       );
duke@435: 
duke@435:   def(_fast_aload_0        , "fast_aload_0"        , "b"    , NULL    , T_OBJECT ,  1, true , _aload_0        );
jrose@1920:   def(_fast_iaccess_0      , "fast_iaccess_0"      , "b_JJ" , NULL    , T_INT    ,  1, true , _aload_0        );
jrose@1920:   def(_fast_aaccess_0      , "fast_aaccess_0"      , "b_JJ" , NULL    , T_OBJECT ,  1, true , _aload_0        );
jrose@1920:   def(_fast_faccess_0      , "fast_faccess_0"      , "b_JJ" , NULL    , T_OBJECT ,  1, true , _aload_0        );
duke@435: 
duke@435:   def(_fast_iload          , "fast_iload"          , "bi"   , NULL    , T_INT    ,  1, false, _iload);
duke@435:   def(_fast_iload2         , "fast_iload2"         , "bi_i" , NULL    , T_INT    ,  2, false, _iload);
duke@435:   def(_fast_icaload        , "fast_icaload"        , "bi_"  , NULL    , T_INT    ,  0, false, _iload);
duke@435: 
duke@435:   // Faster method invocation.
jrose@1920:   def(_fast_invokevfinal   , "fast_invokevfinal"   , "bJJ"  , NULL    , T_ILLEGAL, -1, true, _invokevirtual   );
duke@435: 
duke@435:   def(_fast_linearswitch   , "fast_linearswitch"   , ""     , NULL    , T_VOID   , -1, false, _lookupswitch   );
duke@435:   def(_fast_binaryswitch   , "fast_binaryswitch"   , ""     , NULL    , T_VOID   , -1, false, _lookupswitch   );
duke@435: 
duke@435:   def(_return_register_finalizer , "return_register_finalizer" , "b"    , NULL    , T_VOID   ,  0, true, _return);
duke@435: 
twisti@3969:   def(_invokehandle        , "invokehandle"        , "bJJ"  , NULL    , T_ILLEGAL, -1, true, _invokevirtual   );
twisti@3969: 
jrose@1957:   def(_fast_aldc           , "fast_aldc"           , "bj"   , NULL    , T_OBJECT,   1, true,  _ldc   );
jrose@1957:   def(_fast_aldc_w         , "fast_aldc_w"         , "bJJ"  , NULL    , T_OBJECT,   1, true,  _ldc_w );
jrose@1957: 
duke@435:   def(_shouldnotreachhere  , "_shouldnotreachhere" , "b"    , NULL    , T_VOID   ,  0, false);
duke@435: 
duke@435:   // platform specific JVM bytecodes
duke@435:   pd_initialize();
duke@435: 
duke@435:   // compare can_trap information for each bytecode with the
duke@435:   // can_trap information for the corresponding base bytecode
duke@435:   // (if a rewritten bytecode can trap, so must the base bytecode)
duke@435:   #ifdef ASSERT
duke@435:     { for (int i = 0; i < number_of_codes; i++) {
duke@435:         if (is_defined(i)) {
duke@435:           Code code = cast(i);
duke@435:           Code java = java_code(code);
jcoomes@1845:           if (can_trap(code) && !can_trap(java))
jcoomes@1845:             fatal(err_msg("%s can trap => %s can trap, too", name(code),
jcoomes@1845:                           name(java)));
duke@435:         }
duke@435:       }
duke@435:     }
duke@435:   #endif
duke@435: 
duke@435:   // initialization successful
duke@435:   _is_initialized = true;
duke@435: }
duke@435: 
duke@435: 
duke@435: void bytecodes_init() {
duke@435:   Bytecodes::initialize();
duke@435: }
duke@435: 
duke@435: // Restore optimization
duke@435: #ifdef _M_AMD64
duke@435: #pragma optimize ("", on)
duke@435: #endif