/*

 * Copyright 1998-2009 Sun Microsystems, Inc.  All Rights Reserved.

 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.

 *

 * This code is free software; you can redistribute it and/or modify it

 * under the terms of the GNU General Public License version 2 only, as

 * published by the Free Software Foundation.

 *

 * This code is distributed in the hope that it will be useful, but WITHOUT

 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or

 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License

 * version 2 for more details (a copy is included in the LICENSE file that

 * accompanied this code).

 *

 * You should have received a copy of the GNU General Public License version

 * 2 along with this work; if not, write to the Free Software Foundation,

 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.

 *

 * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,

 * CA 95054 USA or visit www.sun.com if you need additional information or

 * have any questions.

 *

 */

# include "incls/_precompiled.incl"

# include "incls/_rewriter.cpp.incl"

// that are referred to by the interpreter at runtime via the constant pool cache.

  for (int i = 0; i < length; i++) {

      case JVM_CONSTANT_Fieldref          : // fall through

      case JVM_CONSTANT_Methodref         : // fall through

    }

  }

}

// This creates the constant pool cache initially in a state

// that is unsafe for concurrent GC processing but sets it to

// a safe mode before the constant pool cache is returned.

}

// The new finalization semantics says that registration of

// finalizable objects must be performed on successful return from the

// Object.<init> constructor.  We could implement this trivially if

// <init> were never rewritten but since JVMTI allows this to occur, a

// more complicated solution is required.  A special return bytecode

// is used only by Object.<init> to signal the finalization

// registration point.  Additionally local 0 must be preserved so it's

// available to pass to the registration function.  For simplicty we

// require that local 0 is never overwritten so it's available as an

// argument for registration.

void Rewriter::rewrite_Object_init(methodHandle method, TRAPS) {

  RawBytecodeStream bcs(method);

  while (!bcs.is_last_bytecode()) {

    Bytecodes::Code opcode = bcs.raw_next();

    switch (opcode) {

      case Bytecodes::_return: *bcs.bcp() = Bytecodes::_return_register_finalizer; break;

      case Bytecodes::_istore:

      case Bytecodes::_lstore:

      case Bytecodes::_fstore:

      case Bytecodes::_dstore:

      case Bytecodes::_astore:

        if (bcs.get_index() != 0) continue;

        // fall through

      case Bytecodes::_istore_0:

      case Bytecodes::_lstore_0:

      case Bytecodes::_fstore_0:

      case Bytecodes::_dstore_0:

      case Bytecodes::_astore_0:

        THROW_MSG(vmSymbols::java_lang_IncompatibleClassChangeError(),

                  "can't overwrite local 0 in Object.<init>");

        break;

    }

  }

}

// Rewrites a method given the index_map information

  int nof_jsrs = 0;

  bool has_monitor_bytecodes = false;

  {

    // We cannot tolerate a GC in this block, because we've

    // cached the bytecodes in 'code_base'. If the methodOop

    // moves, the bytecodes will also move.

    No_Safepoint_Verifier nsv;

    Bytecodes::Code c;

    // Bytecodes and their length

    const address code_base = method->code_base();

    const int code_length = method->code_size();

    int bc_length;

    for (int bci = 0; bci < code_length; bci += bc_length) {

      address bcp = code_base + bci;

      c = (Bytecodes::Code)(*bcp);

      // Since we have the code, see if we can get the length

      // directly. Some more complicated bytecodes will report

      // a length of zero, meaning we need to make another method

      // call to calculate the length.

      bc_length = Bytecodes::length_for(c);

      if (bc_length == 0) {

        bc_length = Bytecodes::length_at(bcp);

        // length_at will put us at the bytecode after the one modified

        // by 'wide'. We don't currently examine any of the bytecodes

        // modified by wide, but in case we do in the future...

        if (c == Bytecodes::_wide) {

          c = (Bytecodes::Code)bcp[1];

        }

      }

      assert(bc_length != 0, "impossible bytecode length");

      switch (c) {

        case Bytecodes::_lookupswitch   : {

#ifndef CC_INTERP

          Bytecode_lookupswitch* bc = Bytecode_lookupswitch_at(bcp);

          bc->set_code(

            bc->number_of_pairs() < BinarySwitchThreshold

            ? Bytecodes::_fast_linearswitch

            : Bytecodes::_fast_binaryswitch

          );

#endif

          break;

        }

        case Bytecodes::_getstatic      : // fall through

        case Bytecodes::_putstatic      : // fall through

        case Bytecodes::_getfield       : // fall through

        case Bytecodes::_putfield       : // fall through

        case Bytecodes::_invokevirtual  : // fall through

        case Bytecodes::_invokespecial  : // fall through

          break;

        case Bytecodes::_jsr            : // fall through

        case Bytecodes::_jsr_w          : nof_jsrs++;                   break;

        case Bytecodes::_monitorenter   : // fall through

        case Bytecodes::_monitorexit    : has_monitor_bytecodes = true; break;

      }

    }

  }

  // Update access flags

  if (has_monitor_bytecodes) {

    method->set_has_monitor_bytecodes();

  }

  // The present of a jsr bytecode implies that the method might potentially

  // have to be rewritten, so we run the oopMapGenerator on the method

  if (nof_jsrs > 0) {

    method->set_has_jsrs();

  }

  return method;

}

void Rewriter::rewrite(instanceKlassHandle klass, TRAPS) {

  ResourceMark rm(THREAD);

  // determine index maps for methodOop rewriting

    while (i-- > 0) {

      if (method->intrinsic_id() == vmIntrinsics::_Object_init) {

        // rewrite the return bytecodes of Object.<init> to register the

        // object for finalization if needed.

        methodHandle m(THREAD, method);

        rewrite_Object_init(m, CHECK);

        break;

      }

    }

  }

      // Method might have gotten rewritten.

    }

  }

}