Added some missing vim modelines.

[cacao.git] / src / vm / jit / sparc64 / md-abi.c

diff --git a/src/vm/jit/sparc64/md-abi.c b/src/vm/jit/sparc64/md-abi.c
index af256859df4577965488f5b3d788198bbc525691..51a53a8fb402f638d1738c0d4678c0b6b7f24240 100644 (file)
--- a/src/vm/jit/sparc64/md-abi.c
+++ b/src/vm/jit/sparc64/md-abi.c
@@ -1,9 +1,7 @@
 /* src/vm/jit/sparc64/md-abi.c - functions for Sparc ABI
 
-   Copyright (C) 1996-2005, 2006 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, 2008
+   CACAOVM - Verein zur Foerderung der freien virtuellen Maschine CACAO
 
    This file is part of CACAO.
 
@@ -22,8 +20,6 @@
    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
    02110-1301, USA.
 
-   $Id: md-abi.h 4357 2006-01-22 23:33:38Z twisti $
-
 */
 
 
@@ -32,14 +28,14 @@
 
 #include "vm/jit/sparc64/md-abi.h"
 
+#include "vm/descriptor.hpp"
 #include "vm/global.h"
 
 #include "vm/jit/abi.h"
-
-#include "vmcore/descriptor.h"
+#include "vm/jit/stack.h"
 
 /* temp */
-#include "mm/memory.h"
+#include "mm/memory.hpp"
 #include <assert.h>
 
 
@@ -56,8 +52,8 @@ s4 nregdescint[] = {
        /* l0    l1       l2       l3       l4       l5       l6       l7     */
        REG_SAV, REG_SAV, REG_SAV, REG_SAV, REG_SAV, REG_SAV, REG_SAV, REG_SAV,
        
-       /* i0/v0 i1       i2       i3       i4       pv/i5    fp/i6    ra/i7  */
-       REG_RET, REG_SAV, REG_SAV, REG_SAV, REG_SAV, REG_RES, REG_RES, REG_RES,
+       /* i0    i1       i2       i3       i4       pv/i5    fp/i6    ra/i7  */
+       REG_SAV, REG_SAV, REG_SAV, REG_SAV, REG_SAV, REG_RES, REG_RES, REG_RES,
        REG_END
 };
 
@@ -85,14 +81,13 @@ const s4 abi_registers_integer_saved[] = {
        21, /* l5  */
        22, /* l6  */
        23, /* l7  */
+       24, /* i0  */
        25, /* i1  */
        26, /* i2  */
        27, /* i3  */
        28, /* i4  */
 };
 
-const s4 abi_registers_integer_temporary[] = {
-};
 
 
 s4 nregdescfloat[] = {
@@ -110,9 +105,6 @@ const s4 abi_registers_float_argument[] = {
        12, /* f24  */
 };
 
-const s4 abi_registers_float_saved[] = {
-};
-
 const s4 abi_registers_float_temporary[] = {
        4,  /* f8   */
        5,  /* f10  */
@@ -168,13 +160,15 @@ void md_param_alloc(methoddesc *md)
                case TYPE_LNG:
                        if (i < INT_ARG_CNT) {
                                pd->inmemory = false;
+                               pd->index = reguse;
                                pd->regoff   = abi_registers_integer_argument[reguse];
                                reguse++;
                                md->argintreguse = reguse;
                        }
                        else {
                                pd->inmemory = true;
-                               pd->regoff = stacksize;
+                               pd->index = stacksize;
+                               pd->regoff = stacksize * 8;
                                stacksize++;
                        }
                        break;
@@ -183,17 +177,20 @@ void md_param_alloc(methoddesc *md)
                case TYPE_DBL:
                        if (i < FLT_ARG_CNT) {
                                pd->inmemory = false;
+                               pd->index = reguse;
                                pd->regoff   = abi_registers_float_argument[reguse];
                                reguse++;
                                md->argfltreguse = reguse;
                        }
                        else {
                                pd->inmemory = true;
-                               pd->regoff = stacksize;
+                               pd->index = stacksize;
+                               pd->regoff = stacksize * 8;
                                stacksize++;
                        }
                        break;
                }
+               assert(pd->regoff != 26);
        }
        
        /* Since O0 is used for passing return values, this */
@@ -221,11 +218,17 @@ void md_param_alloc_native(methoddesc *md)
        s4         i;
        s4         reguse;
        s4         stacksize;
+       s4         min_nat_regs;
 
+       /* Note: regoff will be set relative to a stack base of $sp+16 */
+        
        /* set default values */
-
        reguse = 0;
-       stacksize = 6;
+       stacksize = 6; /* abi params: allocated, but not used */
+
+       /* when we are above this, we have to increase the stacksize with every */
+       /* single argument to create the proper argument array                  */
+       min_nat_regs = MIN(INT_NATARG_CNT, FLT_NATARG_CNT);
 
        /* get params field of methoddesc */
 
@@ -238,15 +241,14 @@ void md_param_alloc_native(methoddesc *md)
                case TYPE_LNG:
                        if (i < INT_NATARG_CNT) {
                                pd->inmemory = false;
-                               pd->regoff = reguse;
+                               pd->regoff = nat_argintregs[reguse];
                                reguse++;
                                md->argintreguse = reguse;
 
                        } else {
                                pd->inmemory = true;
-                               pd->regoff = reguse;
+                               pd->regoff = reguse * 8;
                                reguse++;
-                               stacksize++;
                        }
                        break;
                case TYPE_FLT:
@@ -258,12 +260,15 @@ void md_param_alloc_native(methoddesc *md)
                                md->argfltreguse = reguse;
                        } else {
                                pd->inmemory = true;
-                               pd->regoff = reguse;
+                               pd->regoff = reguse * 8;
                                reguse++;
-                               stacksize++;
                        }
+
                        break;
                }
+
+               if (i >= min_nat_regs)
+                       stacksize++;
        }
        
        /* Since O0 is used for passing return values, this */
@@ -284,7 +289,7 @@ void md_param_alloc_native(methoddesc *md)
 
 *******************************************************************************/
 
-void md_return_alloc(jitdata *jd, stackptr stackslot)
+void md_return_alloc(jitdata *jd, stackelement_t* stackslot)
 {
        /* XXX */
 }
@@ -301,4 +306,5 @@ void md_return_alloc(jitdata *jd, stackptr stackslot)
  * c-basic-offset: 4
  * tab-width: 4
  * End:
+ * vim:noexpandtab:sw=4:ts=4:
  */