/*

 * 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.

 *

 *

 */

#include "incls/_precompiled.incl"

#include "incls/_interpreterRT_x86_32.cpp.incl"

#define __ _masm->

// Implementation of SignatureHandlerGenerator

void InterpreterRuntime::SignatureHandlerGenerator::pass_int() {

  move(offset(), jni_offset() + 1);

}

void InterpreterRuntime::SignatureHandlerGenerator::pass_long() {

   move(offset(), jni_offset() + 2);

   move(offset() + 1, jni_offset() + 1);

}

void InterpreterRuntime::SignatureHandlerGenerator::pass_object() {

  box (offset(), jni_offset() + 1);

}

void InterpreterRuntime::SignatureHandlerGenerator::move(int from_offset, int to_offset) {

  __ movl(temp(), Address(from(), Interpreter::local_offset_in_bytes(from_offset)));

  __ movl(Address(to(), to_offset * wordSize), temp());

}

void InterpreterRuntime::SignatureHandlerGenerator::box(int from_offset, int to_offset) {

  __ lea(temp(), Address(from(), Interpreter::local_offset_in_bytes(from_offset)));

  __ cmpptr(Address(from(), Interpreter::local_offset_in_bytes(from_offset)), (int32_t)NULL_WORD); // do not use temp() to avoid AGI

  Label L;

  __ jcc(Assembler::notZero, L);

  __ movptr(temp(), NULL_WORD);

  __ bind(L);

  __ movptr(Address(to(), to_offset * wordSize), temp());

}

void InterpreterRuntime::SignatureHandlerGenerator::generate( uint64_t fingerprint) {

  // generate code to handle arguments

  iterate(fingerprint);

  // return result handler

  __ lea(rax,

         ExternalAddress((address)Interpreter::result_handler(method()->result_type())));

  // return

  __ ret(0);

  __ flush();

}

Register InterpreterRuntime::SignatureHandlerGenerator::from()       { return rdi; }

Register InterpreterRuntime::SignatureHandlerGenerator::to()         { return rsp; }

Register InterpreterRuntime::SignatureHandlerGenerator::temp()       { return rcx; }

// Implementation of SignatureHandlerLibrary

void SignatureHandlerLibrary::pd_set_handler(address handler) {}

class SlowSignatureHandler: public NativeSignatureIterator {

 private:

  address   _from;

  intptr_t* _to;

  virtual void pass_int() {

    *_to++ = *(jint *)(_from+Interpreter::local_offset_in_bytes(0));

    _from -= Interpreter::stackElementSize;

  }

  virtual void pass_long() {

    _to[0] = *(intptr_t*)(_from+Interpreter::local_offset_in_bytes(1));

    _to[1] = *(intptr_t*)(_from+Interpreter::local_offset_in_bytes(0));

    _to += 2;

    _from -= 2*Interpreter::stackElementSize;

  }

  virtual void pass_object() {

    // pass address of from

    intptr_t from_addr = (intptr_t)(_from + Interpreter::local_offset_in_bytes(0));

    *_to++ = (*(intptr_t*)from_addr == 0) ? NULL_WORD : from_addr;

    _from -= Interpreter::stackElementSize;

   }

 public:

  SlowSignatureHandler(methodHandle method, address from, intptr_t* to) :

    NativeSignatureIterator(method) {

    _from = from;

    _to   = to + (is_static() ? 2 : 1);

  }

};

IRT_ENTRY(address, InterpreterRuntime::slow_signature_handler(JavaThread* thread, methodOopDesc* method, intptr_t* from, intptr_t* to))

  methodHandle m(thread, (methodOop)method);

  assert(m->is_native(), "sanity check");

  // handle arguments

  SlowSignatureHandler(m, (address)from, to + 1).iterate(UCONST64(-1));

  // return result handler

  return Interpreter::result_handler(m->result_type());

IRT_END