Added some missing vim modelines.
[cacao.git] / src / vm / jit / i386 / md-abi.c
index 3c057de4e9a53d120ea4a29e20778e65c4b4a568..53c3b3d35e8f99ac936dbdfa605087b58239fc29 100644 (file)
@@ -1,9 +1,7 @@
 /* src/vm/jit/i386/md-abi.c - functions for i386 Linux ABI
 
-   Copyright (C) 1996-2005 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.
 
 
    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
-   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
-   02111-1307, USA.
+   Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+   02110-1301, USA.
 
-   Contact: cacao@complang.tuwien.ac.at
+*/
 
-   Authors: Christian Ullrich
 
-   Changes: Christian Thalinger
+#include "config.h"
+#include "vm/types.h"
 
-   $Id: md-abi.c 2775 2005-06-22 09:48:28Z christian $
+#include "vm/jit/i386/md-abi.h"
 
-*/
+#include "vm/descriptor.hpp"
+#include "vm/global.h"
 
+#include "vm/jit/abi.h"
 
-#include "vm/jit/i386/types.h"
-#include "vm/jit/i386/md-abi.h"
 
-#include "vm/descriptor.h"
-#include "vm/global.h"
+/* register descripton - array ************************************************/
 
+s4 nregdescint[] = {
+    REG_RET, REG_RES, REG_RES, REG_TMP, REG_RES, REG_SAV, REG_SAV, REG_SAV,
+    REG_END
+};
+
+const char *abi_registers_integer_name[] = {
+       "eax", "ecx", "edx", "ebx", "esp", "ebp", "esi", "edi"
+};
+
+const s4 abi_registers_integer_argument[] = {
+       -1,
+};
+
+const s4 abi_registers_integer_saved[] = {
+       5, /* s0 */
+       6, /* s1 */
+       7, /* s2 */
+};
+
+const s4 abi_registers_integer_temporary[] = {
+       3, /* t0 */
+};
 
-/* md_param_alloc **************************************************************
 
-Allocate Arguments to Stackslots according the Calling Conventions
+s4 nregdescfloat[] = {
+ /* rounding problems with callee saved registers */
+ /* REG_SAV, REG_SAV, REG_SAV, REG_SAV, REG_TMP, REG_TMP, REG_RES, REG_RES, */
+ /* REG_TMP, REG_TMP, REG_TMP, REG_TMP, REG_TMP, REG_TMP, REG_RES, REG_RES, */
+    REG_RES, REG_RES, REG_RES, REG_RES, REG_RES, REG_RES, REG_RES, REG_RES,
+    REG_END
+};
 
---- in
-md->paramcount:           Number of arguments for this method
-md->paramtypes[].type:    Argument types
+const s4 abi_registers_float_argument[] = {
+       -1,
+};
 
---- out
-md->params[].inmemory:    Argument spilled on stack
-md->params[].regoff:      Stack offset or rd->arg[int|flt]regs index
-md->memuse:               Stackslots needed for argument spilling
-md->argintreguse:         max number of integer arguments used
-md->argfltreguse:         max number of float arguments used
+const s4 abi_registers_float_saved[] = {
+       -1,
+};
+
+const s4 abi_registers_float_temporary[] = {
+       -1,
+};
+
+
+/* md_param_alloc **************************************************************
+
+   Allocate Arguments to Stackslots according the Calling Conventions
+
+   --- in
+   md->paramcount:           Number of arguments for this method
+   md->paramtypes[].type:    Argument types
+   
+   --- out
+   md->params[].inmemory:    Argument spilled on stack
+   md->params[].regoff:      Stack offset or rd->arg[int|flt]regs index
+   md->memuse:               Stackslots needed for argument spilling
+   md->argintreguse:         max number of integer arguments used
+   md->argfltreguse:         max number of float arguments used
 
 *******************************************************************************/
 
 void md_param_alloc(methoddesc *md)
 {
        paramdesc *pd;
-       s4        stacksize;
-       s4        i;
+       int        stacksize;
+       int        i;
 
        pd = md->params;
        stacksize = 0;
 
        for (i = 0; i < md->paramcount; i++, pd++) {
                pd->inmemory = true;
-               pd->regoff = stacksize;
-               stacksize += IS_2_WORD_TYPE(md->paramtypes[i].type) ? 2 : 1;
+               pd->index    = stacksize;
+               pd->regoff   = stacksize * 8;
+               stacksize++;
        }
 
-       md->memuse = stacksize;
+       md->memuse       = stacksize;
        md->argintreguse = 0;
        md->argfltreguse = 0;
 }
 
 
+/* md_param_alloc_native *******************************************************
+
+   Pre-allocate arguments according the native ABI.
+
+*******************************************************************************/
+
+void md_param_alloc_native(methoddesc *md)
+{
+       paramdesc *pd;
+       int        stacksize;
+       int        i;
+
+       pd = md->params;
+       stacksize = 0;
+
+       for (i = 0; i < md->paramcount; i++, pd++) {
+               pd->inmemory  = true;
+               pd->index     = stacksize;
+               pd->regoff    = stacksize * 4;
+               stacksize    += IS_2_WORD_TYPE(md->paramtypes[i].type) ? 2 : 1;
+       }
+
+       md->memuse       = stacksize;
+       md->argintreguse = 0;
+       md->argfltreguse = 0;
+}
+
+
+/* md_return_alloc *************************************************************
+
+   No straight forward precoloring of the Java Stackelement containing
+   the return value possible for i386, since it uses "reserved"
+   registers for return values
+
+*******************************************************************************/
+
+void md_return_alloc(jitdata *jd, stackelement_t *stackslot)
+{
+       /* nothing */
+}
+
+
 /*
  * These are local overrides for various environment variables in Emacs.
  * Please do not remove this and leave it at the end of the file, where
@@ -89,4 +173,5 @@ void md_param_alloc(methoddesc *md)
  * c-basic-offset: 4
  * tab-width: 4
  * End:
+ * vim:noexpandtab:sw=4:ts=4:
  */