never@1445: /*
never@1445:  * Copyright 2003-2005 Sun Microsystems, Inc.  All Rights Reserved.
never@1445:  * Copyright 2007, 2008 Red Hat, Inc.
never@1445:  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
never@1445:  *
never@1445:  * This code is free software; you can redistribute it and/or modify it
never@1445:  * under the terms of the GNU General Public License version 2 only, as
never@1445:  * published by the Free Software Foundation.
never@1445:  *
never@1445:  * This code is distributed in the hope that it will be useful, but WITHOUT
never@1445:  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
never@1445:  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
never@1445:  * version 2 for more details (a copy is included in the LICENSE file that
never@1445:  * accompanied this code).
never@1445:  *
never@1445:  * You should have received a copy of the GNU General Public License version
never@1445:  * 2 along with this work; if not, write to the Free Software Foundation,
never@1445:  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
never@1445:  *
never@1445:  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
never@1445:  * CA 95054 USA or visit www.sun.com if you need additional information or
never@1445:  * have any questions.
never@1445:  *
never@1445:  */
never@1445: 
never@1445: #include "incls/_precompiled.incl"
never@1445: #include "incls/_interpreterRT_zero.cpp.incl"
never@1445: 
never@1445: void InterpreterRuntime::SignatureHandlerGeneratorBase::pass_int() {
never@1445:   push(T_INT);
never@1445:   _cif->nargs++;
never@1445: }
never@1445: 
never@1445: void InterpreterRuntime::SignatureHandlerGeneratorBase::pass_long() {
never@1445:   push(T_LONG);
never@1445:   _cif->nargs++;
never@1445: }
never@1445: 
never@1445: void InterpreterRuntime::SignatureHandlerGeneratorBase::pass_float() {
never@1445:   push(T_FLOAT);
never@1445:   _cif->nargs++;
never@1445: }
never@1445: 
never@1445: void InterpreterRuntime::SignatureHandlerGeneratorBase::pass_double() {
never@1445:   push(T_DOUBLE);
never@1445:   _cif->nargs++;
never@1445: }
never@1445: 
never@1445: void InterpreterRuntime::SignatureHandlerGeneratorBase::pass_object() {
never@1445:   push(T_OBJECT);
never@1445:   _cif->nargs++;
never@1445: }
never@1445: 
never@1445: void InterpreterRuntime::SignatureHandlerGeneratorBase::push(BasicType type) {
never@1445:   ffi_type *ftype;
never@1445:   switch (type) {
never@1445:   case T_VOID:
never@1445:     ftype = &ffi_type_void;
never@1445:     break;
never@1445: 
never@1445:   case T_BOOLEAN:
never@1445:     ftype = &ffi_type_uint8;
never@1445:     break;
never@1445: 
never@1445:   case T_CHAR:
never@1445:     ftype = &ffi_type_uint16;
never@1445:     break;
never@1445: 
never@1445:   case T_BYTE:
never@1445:     ftype = &ffi_type_sint8;
never@1445:     break;
never@1445: 
never@1445:   case T_SHORT:
never@1445:     ftype = &ffi_type_sint16;
never@1445:     break;
never@1445: 
never@1445:   case T_INT:
never@1445:     ftype = &ffi_type_sint32;
never@1445:     break;
never@1445: 
never@1445:   case T_LONG:
never@1445:     ftype = &ffi_type_sint64;
never@1445:     break;
never@1445: 
never@1445:   case T_FLOAT:
never@1445:     ftype = &ffi_type_float;
never@1445:     break;
never@1445: 
never@1445:   case T_DOUBLE:
never@1445:     ftype = &ffi_type_double;
never@1445:     break;
never@1445: 
never@1445:   case T_OBJECT:
never@1445:   case T_ARRAY:
never@1445:     ftype = &ffi_type_pointer;
never@1445:     break;
never@1445: 
never@1445:   default:
never@1445:     ShouldNotReachHere();
never@1445:   }
never@1445:   push((intptr_t) ftype);
never@1445: }
never@1445: 
never@1445: // For fast signature handlers the "signature handler" is generated
never@1445: // into a temporary buffer.  It is then copied to its final location,
never@1445: // and pd_set_handler is called on it.  We have this two stage thing
never@1445: // to accomodate this.
never@1445: 
never@1445: void InterpreterRuntime::SignatureHandlerGeneratorBase::generate(
never@1445:   uint64_t fingerprint) {
never@1445: 
never@1445:   // Build the argument types list
never@1445:   pass_object();
never@1445:   if (method()->is_static())
never@1445:     pass_object();
never@1445:   iterate(fingerprint);
never@1445: 
never@1445:   // Tack on the result type
never@1445:   push(method()->result_type());
never@1445: }
never@1445: 
never@1445: void InterpreterRuntime::SignatureHandler::finalize() {
never@1445:   ffi_status status =
never@1445:     ffi_prep_cif(cif(),
never@1445:                  FFI_DEFAULT_ABI,
never@1445:                  argument_count(),
never@1445:                  result_type(),
never@1445:                  argument_types());
never@1445: 
never@1445:   assert(status == FFI_OK, "should be");
never@1445: }
never@1445: 
never@1445: IRT_ENTRY(address,
never@1445:           InterpreterRuntime::slow_signature_handler(JavaThread* thread,
never@1445:                                                      methodOop   method,
never@1445:                                                      intptr_t*   unused1,
never@1445:                                                      intptr_t*   unused2))
never@1445:   ZeroStack *stack = thread->zero_stack();
never@1445: 
never@1445:   int required_words =
never@1445:     (align_size_up(sizeof(ffi_cif), wordSize) >> LogBytesPerWord) +
never@1445:     (method->is_static() ? 2 : 1) + method->size_of_parameters() + 1;
never@1445:   if (required_words > stack->available_words()) {
never@1445:     Unimplemented();
never@1445:   }
never@1445: 
never@1445:   intptr_t *buf = (intptr_t *) stack->alloc(required_words * wordSize);
never@1445:   SlowSignatureHandlerGenerator sshg(methodHandle(thread, method), buf);
never@1445:   sshg.generate(UCONST64(-1));
never@1445: 
never@1445:   SignatureHandler *handler = sshg.handler();
never@1445:   handler->finalize();
never@1445: 
never@1445:   return (address) handler;
never@1445: IRT_END
never@1445: 
never@1445: void SignatureHandlerLibrary::pd_set_handler(address handlerAddr) {
never@1445:   InterpreterRuntime::SignatureHandler *handler =
never@1445:     InterpreterRuntime::SignatureHandler::from_handlerAddr(handlerAddr);
never@1445: 
never@1445:   handler->finalize();
never@1445: }