Merge from subtype.
[cacao.git] / src / vm / jit / i386 / md.c
index e4f41da050c6992651ce249b6562343b07fd76d0..191cddabd02cdb6d88b8b99a1b62b38dd6598c02 100644 (file)
@@ -1,9 +1,7 @@
 /* src/vm/jit/i386/md.c - machine dependent i386 functions
 
-   Copyright (C) 1996-2005, 2006, 2007 R. Grafl, A. Krall, C. Kruegel,
-   C. Oates, R. Obermaisser, M. Platter, M. Probst, S. Ring,
-   E. Steiner, C. Thalinger, D. Thuernbeck, P. Tomsich, C. Ullrich,
-   J. Wenninger, Institut f. Computersprachen - TU Wien
+   Copyright (C) 1996-2005, 2006, 2007, 2008
+   CACAOVM - Verein zur Foerderung der freien virtuellen Maschine CACAO
 
    This file is part of CACAO.
 
 #include "config.h"
 
 #include <assert.h>
+#include <stdint.h>
 
 #include "vm/types.h"
 
 #include "vm/global.h"
+#include "vm/vm.hpp"
 
 #include "vm/jit/asmpart.h"
-#include "vm/jit/codegen-common.h"
-#include "vm/jit/md.h"
+#include "vm/jit/jit.hpp"
 
 
 /* md_init *********************************************************************
@@ -50,26 +49,7 @@ void md_init(void)
 }
 
 
-/* md_stacktrace_get_returnaddress *********************************************
-
-   Returns the return address of the current stackframe, specified by
-   the passed stack pointer and the stack frame size.
-
-*******************************************************************************/
-
-u1 *md_stacktrace_get_returnaddress(u1 *sp, u4 framesize)
-{
-       u1 *ra;
-
-       /* on i386 the return address is above the current stack frame */
-
-       ra = *((u1 **) (sp + framesize));
-
-       return ra;
-}
-
-
-/* md_get_method_patch_address *************************************************
+/* md_jit_method_patch_address *************************************************
 
    Gets the patch address of the currently compiled method. The offset
    is extracted from the load instruction(s) before the jump and added
@@ -95,115 +75,60 @@ u1 *md_stacktrace_get_returnaddress(u1 *sp, u4 framesize)
 
 *******************************************************************************/
 
-u1 *md_get_method_patch_address(u1 *ra, stackframeinfo *sfi, u1 *mptr)
+void *md_jit_method_patch_address(void *pv, void *ra, void *mptr)
 {
-       u1  mcode;
-       s4  offset;
-       u1 *pa;                             /* patch address                      */
+       uint8_t  *pc;
+       uint16_t  opcode;
+       int32_t   disp;
+       void     *pa;                                            /* patch address */
 
        /* go back to the actual call instruction (2-bytes) */
 
-       ra = ra - 2;
+       pc = ((uint8_t *) ra) - 2;
 
-       /* get the last byte of the call */
+       /* Get the opcode of the call. */
 
-       mcode = ra[1];
+       opcode = *((uint16_t *) pc);
 
        /* check for the different calls */
 
-       if (mcode == 0xd1) {
+       switch (opcode) {
+       case 0xd1ff:
                /* INVOKESTATIC/SPECIAL */
 
-               /* patch address is 4-bytes before the call instruction */
+               /* Patch address is 4-bytes before the call instruction. */
 
-               pa = ra - 4;
-       }
-       else if (mcode == 0xd2) {
+               pa = pc - 4;
+               break;
+
+       case 0xd2ff:
                /* INVOKEVIRTUAL/INTERFACE */
 
-               /* return NULL if no mptr was specified (used for replacement) */
+               /* Return NULL if no mptr was specified (used for
+                  replacement). */
 
                if (mptr == NULL)
                        return NULL;
 
-               /* Get the offset from the instruction (the offset address is
-                  4-bytes before the call instruction). */
+               /* Get the displacement from the instruction (the displacement
+                  address is 4-bytes before the call instruction). */
 
-               offset = *((s4 *) (ra - 4));
+               disp = *((int32_t *) (pc - 4));
 
-               /* add the offset to the method pointer */
+               /* Add the displacement to the method pointer. */
 
-               pa = mptr + offset;
-       }
-       else {
-               /* catch any problems */
+               pa = ((uint8_t *) mptr) + disp;
+               break;
 
-               pa = NULL; /* avoid warnings */
-
-               vm_abort("couldn't find a proper call instruction sequence");
+       default:
+               vm_abort_disassemble(pc, 1, "md_jit_method_patch_address: unknown instruction %x", opcode);
+               return NULL;
        }
 
        return pa;
 }
 
 
-/* md_codegen_get_pv_from_pc ***************************************************
-
-   On this architecture just a wrapper function to
-   codegen_get_pv_from_pc.
-
-*******************************************************************************/
-
-u1 *md_codegen_get_pv_from_pc(u1 *ra)
-{
-       u1 *pv;
-
-       /* Get the start address of the function which contains this
-       address from the method table. */
-
-       pv = codegen_get_pv_from_pc(ra);
-
-       return pv;
-}
-
-
-/* md_cacheflush ***************************************************************
-
-   Calls the system's function to flush the instruction and data
-   cache.
-
-*******************************************************************************/
-
-void md_cacheflush(u1 *addr, s4 nbytes)
-{
-       /* do nothing */
-}
-
-
-/* md_icacheflush **************************************************************
-
-   Calls the system's function to flush the instruction cache.
-
-*******************************************************************************/
-
-void md_icacheflush(u1 *addr, s4 nbytes)
-{
-       /* do nothing */
-}
-
-
-/* md_dcacheflush **************************************************************
-
-   Calls the system's function to flush the data cache.
-
-*******************************************************************************/
-
-void md_dcacheflush(u1 *addr, s4 nbytes)
-{
-       /* do nothing */
-}
-
-
 /* md_patch_replacement_point **************************************************
 
    Patch the given replacement point.