* Removed all Id tags.
[cacao.git] / src / vm / global.h
index bd440143a7a89923934135bb3449c37710ee5293..f3938b91abef16984c2d98c573f305848b272ea8 100644 (file)
@@ -1,9 +1,9 @@
-/* global.h - global definitions
+/* src/vm/global.h - global definitions
 
-   Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003
-   R. Grafl, A. Krall, C. Kruegel, C. Oates, R. Obermaisser,
-   M. Probst, S. Ring, E. Steiner, C. Thalinger, D. Thuernbeck,
-   P. Tomsich, J. Wenninger
+   Copyright (C) 1996-2005, 2007, 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
 
    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.
-
-   Contact: cacao@complang.tuwien.ac.at
-
-   Authors: Reinhard Grafl
-            Andreas Krall
-
-   Changes: Mark Probst
-            Philipp Tomsich
-                       Edwin Steiner
-
-   $Id: global.h 1128 2004-06-05 12:22:26Z twisti $
+   Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+   02110-1301, USA.
 
 */
 
 #ifndef _GLOBAL_H
 #define _GLOBAL_H
 
-
 #include "config.h"
-#include "types.h"
-#include "toolbox/list.h"
+#include "vm/types.h"
 
 
-#if defined(USE_THREADS) && defined(NATIVE_THREADS)
-#include <pthread.h>
-#endif
+/* additional data types ******************************************************/
 
-#define STATISTICS          /* if enabled collects program statistics         */
+typedef void *voidptr;                  /* generic pointer                    */
+typedef void (*functionptr) (void);     /* generic function pointer           */
+typedef u1* methodptr;
 
-/* 
- * SIZE_FROM_CLASSINFO toggles between the bitmap_based and the new method 
- * of determining the sizes of objects on the heap.
- */
-#define SIZE_FROM_CLASSINFO
+typedef unsigned int bool;              /* boolean data type                  */
 
-/*
- * CACAO_TYPECHECK activates typechecking (part of bytecode verification)
- */
-#define CACAO_TYPECHECK
+#define true         1
+#define false        0
 
-/*
- * TYPECHECK_STACK_COMPCAT activates full checking of computational
- * categories for stack manipulations (POP,POP2,SWAP,DUP,DUP2,DUP_X1,
- * DUP2_X1,DUP_X2,DUP2_X2).
- */
-/* #define TYPECHECK_STACK_COMPCAT */
 
-/*
- * Macros for configuration of the typechecking code
- *
- * TYPECHECK_STATISTICS activates gathering statistical information.
- * TYPEINFO_DEBUG activates debug checks and debug helpers in typeinfo.c
- * TYPECHECK_DEBUG activates debug checks in typecheck.c
- * TYPEINFO_DEBUG_TEST activates the typeinfo test at startup.
- * TYPECHECK_VERBOSE_IMPORTANT activates important debug messages
- * TYPECHECK_VERBOSE activates all debug messages
- */
-#ifdef CACAO_TYPECHECK
-/*#define TYPECHECK_STATISTICS*/
-/*#define TYPEINFO_DEBUG*/
-/*#define TYPECHECK_DEBUG*/
-/*#define TYPEINFO_DEBUG_TEST*/
-/*#define TYPECHECK_VERBOSE*/
-/*#define TYPECHECK_VERBOSE_IMPORTANT*/
-#if defined(TYPECHECK_VERBOSE) || defined(TYPECHECK_VERBOSE_IMPORTANT)
-#define TYPECHECK_VERBOSE_OPT
+#if defined(ENABLE_SSA)
+/* immediate to get an addidional target Local Var Index */
+/* for IINC in Combination with SSA */
+struct imm {
+       s4 i;
+       s4 op1_t;
+};
 #endif
+
+/* immediate data union */
+
+typedef union {
+       s4          i;
+       s8          l;
+       float       f;
+       double      d;
+       void       *a;
+       functionptr fp;
+       u1          b[8];
+#if defined(ENABLE_SSA)
+       struct imm  _i;
 #endif
+} imm_union;
 
 
-/* additional data types ******************************************************/
+/* alignment macros ***********************************************************/
 
-typedef void *voidptr;          /* generic pointer */
+#define ALIGN_EVEN(a)                   ((a) = (((a) + 1) & ~1))
+#define ALIGN_ODD(a)                    ((a) =   (a) | 1       )
 
-typedef int   bool;             /* boolean data type */
+#define ALIGN_2(a)                      ALIGN_EVEN(a)
 
-#define true  1
-#define false 0
 
+/* forward typedefs ***********************************************************/
 
-/* immediate data union */
+typedef struct java_object_t java_object_t; 
+typedef struct java_objectarray_t java_objectarray_t;
 
-typedef union {
-    s4 i;
-    s8 l;
-    float f;
-    double d;
-    void *a;
-    u1 b[8];
-} imm_union;
 
+#define MAX_ALIGN 8             /* most generic alignment for JavaVM values   */
 
-#define PRIMITIVETYPE_COUNT  9  /* number of primitive types */
 
-/* CAUTION: Don't change the numerical values! These constants are
- * used as indices into the primitive type table.
- */
-#define PRIMITIVETYPE_INT     0
-#define PRIMITIVETYPE_LONG    1
-#define PRIMITIVETYPE_FLOAT   2
-#define PRIMITIVETYPE_DOUBLE  3
-#define PRIMITIVETYPE_BYTE    4
-#define PRIMITIVETYPE_CHAR    5
-#define PRIMITIVETYPE_SHORT   6
-#define PRIMITIVETYPE_BOOLEAN 7
-#define PRIMITIVETYPE_VOID    8
+/* basic data types ***********************************************************/
 
-typedef void (*functionptr) (); /* generic function pointer */
+/* The JavaVM types must numbered in the same order as the ICMD_Ixxx
+   to ICMD_Axxx instructions (LOAD and STORE).  All other types can be
+   numbered arbitrarily. */
 
+#define TYPE_INT     0
+#define TYPE_LNG     1
+#define TYPE_FLT     2
+#define TYPE_DBL     3
+#define TYPE_ADR     4
 
-#define MAX_ALIGN 8             /* most generic alignment for JavaVM values   */
+#define TYPE_RET     8   /* must not share bits with TYPE_FLT or TYPE_LNG */
 
-/* shutdown function **********************************************************/
+#define TYPE_VOID    10
 
-void cacao_shutdown(s4 status);
 
+#define IS_INT_LNG_TYPE(a)      (!((a) & TYPE_FLT))
+#define IS_FLT_DBL_TYPE(a)      ((a) & TYPE_FLT)
+#define IS_2_WORD_TYPE(a)       ((a) & TYPE_LNG)
 
-/* basic data types ***********************************************************/
+#define IS_INT_TYPE(a)          ((a) == TYPE_INT)
+#define IS_LNG_TYPE(a)          ((a) == TYPE_LNG)
+#define IS_FLT_TYPE(a)          ((a) == TYPE_FLT)
+#define IS_DBL_TYPE(a)          ((a) == TYPE_DBL)
+#define IS_ADR_TYPE(a)          ((a) == TYPE_ADR)
 
-/* CAUTION: jit/jit.h relies on these numerical values! */
-#define TYPE_INT      0         /* the JavaVM types must numbered in the      */
-#define TYPE_LONG     1         /* same order as the ICMD_Ixxx to ICMD_Axxx   */
-#define TYPE_FLOAT    2         /* instructions (LOAD and STORE)              */
-#define TYPE_DOUBLE   3         /* integer, long, float, double, address      */
-#define TYPE_ADDRESS  4         /* all other types can be numbered arbitrarly */
+#define IS_VOID_TYPE(a)         ((a) == TYPE_VOID)
 
-#define TYPE_VOID    10
+
+/* some Java related defines **************************************************/
+
+#define JAVA_VERSION    "1.5.0"         /* this version is supported by CACAO */
+#define CLASS_VERSION   "50.0"
 
 
 /* Java class file constants **************************************************/
 
-#define MAGIC         0xcafebabe
-#define MINOR_VERSION 3
-#define MAJOR_VERSION 45
+#define MAGIC             0xCAFEBABE
+#define MAJOR_VERSION     50
+#define MINOR_VERSION     0
+
+
+/* Constant pool tags *********************************************************/
 
 #define CONSTANT_Class                 7
 #define CONSTANT_Fieldref              9
@@ -171,225 +145,79 @@ void cacao_shutdown(s4 status);
 
 #define CONSTANT_UNUSED                0
 
-#define ACC_PUBLIC                0x0001
-#define ACC_PRIVATE               0x0002
-#define ACC_PROTECTED             0x0004
-#define ACC_STATIC                0x0008
-#define ACC_FINAL                 0x0010
-#define ACC_SUPER                 0x0020
-#define ACC_SYNCHRONIZED          0x0020
-#define ACC_VOLATILE              0x0040
-#define ACC_TRANSIENT             0x0080
-#define ACC_NATIVE                0x0100
-#define ACC_INTERFACE             0x0200
-#define ACC_ABSTRACT              0x0400
-#define ACC_STRICT               0x0800
-
-/* resolve typedef cycles *****************************************************/
-
-typedef struct utf utf;
-typedef struct literalstring literalstring;
-typedef struct java_objectheader java_objectheader; 
-typedef struct classinfo classinfo; 
-typedef struct vftbl vftbl;
-typedef u1* methodptr;
-typedef struct fieldinfo  fieldinfo; 
-typedef struct methodinfo methodinfo; 
-typedef struct lineinfo lineinfo; 
-typedef struct arraydescriptor arraydescriptor;
-
-
-/* constant pool entries *******************************************************
-
-       All constant pool entries need a data structure which contain the entrys
-       value. In some cases this structure exist already, in the remaining cases
-       this structure must be generated:
-
-               kind                      structure                     generated?
-       ----------------------------------------------------------------------
-    CONSTANT_Class               classinfo                           no
-    CONSTANT_Fieldref            constant_FMIref                    yes
-    CONSTANT_Methodref           constant_FMIref                    yes
-    CONSTANT_InterfaceMethodref  constant_FMIref                    yes
-    CONSTANT_String              unicode                             no
-    CONSTANT_Integer             constant_integer                   yes
-    CONSTANT_Float               constant_float                     yes
-    CONSTANT_Long                constant_long                      yes
-    CONSTANT_Double              constant_double                    yes
-    CONSTANT_NameAndType         constant_nameandtype               yes
-    CONSTANT_Utf8                unicode                             no
-    CONSTANT_UNUSED              -
-
-*******************************************************************************/
-
-/* data structures for hashtables ********************************************
-
-
-       All utf-symbols, javastrings and classes are stored in global hashtables,
-       so every symbol exists only once. Equal symbols have identical pointers.
-       The functions for adding hashtable elements search the table for the 
-       element with the specified name/text and return it on success. Otherwise a 
-       new hashtable element is created.
-
-    The hashtables use external linking for handling collisions. The hashtable 
-       structure contains a pointer <ptr> to the array of hashtable slots. The 
-       number of hashtable slots and therefore the size of this array is specified 
-       by the element <size> of hashtable structure. <entries> contains the number
-       of all hashtable elements stored in the table, including those in the 
-       external chains.
-       The hashtable element structures (utf, literalstring, classinfo) contain
-       both a pointer to the next hashtable element as a link for the external hash 
-       chain and the key of the element. The key is computed from the text of
-       the string or the classname by using up to 8 characters.
-       
-       If the number of entries in the hashtable exceeds twice the size of the 
-       hashtableslot-array it is supposed that the average length of the 
-       external chains has reached a value beyond 2. Therefore the functions for
-       adding hashtable elements (utf_new, class_new, literalstring_new) double
-       the hashtableslot-array. In this restructuring process all elements have
-       to be inserted into the new hashtable and new external chains must be built.
-
-
-example for the layout of a hashtable:
-
-hashtable.ptr-->  +-------------------+
-                  |                   |
-                           ...
-                  |                   |
-                  +-------------------+   +-------------------+   +-------------------+
-                  | hashtable element |-->| hashtable element |-->| hashtable element |-->NULL
-                  +-------------------+   +-------------------+   +-------------------+
-                  | hashtable element |
-                  +-------------------+   +-------------------+   
-                  | hashtable element |-->| hashtable element |-->NULL
-                  +-------------------+   +-------------------+   
-                  | hashtable element |-->NULL
-                  +-------------------+
-                  |                   |
-                           ...
-                  |                   |
-                  +-------------------+
-
-*/
-
-
-/* data structure for utf8 symbols ********************************************/
-
-struct utf {
-       utf        *hashlink;       /* link for external hash chain               */
-       int         blength;        /* text length in bytes                       */           
-       char       *text;           /* pointer to text                            */
-};
-
-
-/* data structure of internal javastrings stored in global hashtable **********/
-
-struct literalstring {
-       literalstring     *hashlink;     /* link for external hash chain          */
-       java_objectheader *string;  
-};
-
-
-/* data structure for storing information needed for a stacktrace across native functions*/
-struct native_stackframeinfo {
-       void *oldThreadspecificHeadValue;
-       void **addressOfThreadspecificHead;
-       methodinfo *method;
-       void *returnToFromNative;
-
-#if 0
-       void *returnFromNative;
-       void *addrReturnFromNative;
-       methodinfo *method;
-       struct native_stackframeinfo *next;
-       struct native_stackframeinfo *prev;
-#endif
-};
-
-typedef struct native_stackframeinfo native_stackframeinfo;
-
-struct stacktraceelement {
-#if POINTERSIZE == 8
-       u8 linenumber;
-#else
-       u4 linenumber;
-#endif
-       methodinfo *method;
-};
-
-typedef struct stacktraceelement stacktraceelement;
-
-/* data structure for calls from c code to java methods */
 
-struct jni_callblock {
-       u8 itemtype;
-       u8 item;
-};
-
-typedef struct jni_callblock jni_callblock;
+/* Class/Field/Method access and property flags *******************************/
 
+#define ACC_UNDEF               -1      /* used internally                    */
+#define ACC_NONE                 0      /* used internally                    */
 
-/* data structure for accessing hashtables ************************************/
+#define ACC_PUBLIC          0x0001
+#define ACC_PRIVATE         0x0002
+#define ACC_PROTECTED       0x0004
+#define ACC_STATIC          0x0008
+#define ACC_FINAL           0x0010
+#define ACC_SUPER           0x0020
+#define ACC_SYNCHRONIZED    0x0020
+#define ACC_VOLATILE        0x0040
+#define ACC_BRIDGE          0x0040
+#define ACC_TRANSIENT       0x0080
+#define ACC_VARARGS         0x0080
+#define ACC_NATIVE          0x0100
+#define ACC_INTERFACE       0x0200
+#define ACC_ABSTRACT        0x0400
+#define ACC_STRICT          0x0800
+#define ACC_SYNTHETIC       0x1000
+#define ACC_ANNOTATION      0x2000
+#define ACC_ENUM            0x4000
+#define ACC_MIRANDA         0x8000
 
-typedef struct {            
-       u4 size;
-       u4 entries;        /* number of entries in the table */
-       void **ptr;        /* pointer to hashtable */
-} hashtable;
+/* special flags used in classinfo ********************************************/
 
+#define ACC_CLASS_REFLECT_MASK      0x0000ffff/* flags reported by reflection */
 
-/* data structures of remaining constant pool entries *************************/
+#define ACC_CLASS_PRIMITIVE         0x00010000
+#define ACC_CLASS_MEMBER            0x00020000
+#define ACC_CLASS_ANONYMOUS         0x00040000
 
-typedef struct {            /* Fieldref, Methodref and InterfaceMethodref     */
-       classinfo *class;       /* class containing this field/method/interface   */
-       utf       *name;        /* field/method/interface name                    */
-       utf       *descriptor;  /* field/method/interface type descriptor string  */
-} constant_FMIref;
+#define ACC_CLASS_HAS_POINTERS      0x00080000/* instance contains pointers   */
 
+#define ACC_CLASS_REFERENCE_MASK    0x00700000
+#define ACC_CLASS_REFERENCE_SOFT    0x00100000
+#define ACC_CLASS_REFERENCE_WEAK    0x00200000
+#define ACC_CLASS_REFERENCE_PHANTOM 0x00400000
 
-typedef struct {            /* Integer                                        */
-       s4 value;
-} constant_integer;
 
-       
-typedef struct {            /* Float                                          */
-       float value;
-} constant_float;
+/* special flags used in methodinfo *******************************************/
 
+#define ACC_METHOD_BUILTIN     0x00010000     /* use for descriptor parsing   */
+#define ACC_METHOD_IMPLEMENTED 0x00020000     /* there is an implementation   */
+#define ACC_METHOD_MONOMORPHIC 0x00040000     /* currently monomorphic method */
 
-typedef struct {            /* Long                                           */
-       s8 value;
-} constant_long;
-       
 
-typedef struct {            /* Double                                         */
-       double value;
-} constant_double;
+/* data structures of the runtime system **************************************/
 
+/* java_object_t ***************************************************************
 
-typedef struct {            /* NameAndType (Field or Method)                  */
-       utf *name;              /* field/method name                              */
-       utf *descriptor;        /* field/method type descriptor string            */
-} constant_nameandtype;
+   All objects (and arrays) which resides on the heap need the
+   following header at the beginning of the data structure.
 
+   TODO: Include detailed description from the Wiki (ObjectHeader) here.
 
-/* data structures of the runtime system **************************************/
+*******************************************************************************/
 
-/* objects *********************************************************************
+#define HDRFLAG_FLC 0x01
 
-       All objects (and arrays) which resides on the heap need the following
-       header at the beginning of the data structure.
-*/
-
-struct java_objectheader {              /* header for all objects             */
-       vftbl *vftbl;                       /* pointer to virtual function table  */
-#if defined(USE_THREADS) && defined(NATIVE_THREADS)
-       long monitorBits;
+struct java_object_t {                 /* header for all objects              */
+       struct _vftbl            *vftbl;   /* pointer to virtual function table   */
+#if defined(ENABLE_THREADS)
+       struct lock_record_t *monitorPtr;
+#endif
+#if defined(ENABLE_THREADS) || defined(ENABLE_GC_CACAO)
+       ptrint                hdrflags;    /* word containing the FLC and GC bits */
 #endif
 };
 
 
-
 /* arrays **********************************************************************
 
        All arrays are objects (they need the object header with a pointer
@@ -398,494 +226,111 @@ struct java_objectheader {              /* header for all objects             */
        which is referenced by the vftbl.
 */
 
-/* CAUTION: Don't change the numerical values! These constants (with
- * the exception of ARRAYTYPE_OBJECT) are used as indices in the
- * primitive type table.
- */
-#define ARRAYTYPE_INT      PRIMITIVETYPE_INT
-#define ARRAYTYPE_LONG     PRIMITIVETYPE_LONG
-#define ARRAYTYPE_FLOAT    PRIMITIVETYPE_FLOAT
-#define ARRAYTYPE_DOUBLE   PRIMITIVETYPE_DOUBLE
-#define ARRAYTYPE_BYTE     PRIMITIVETYPE_BYTE
-#define ARRAYTYPE_CHAR     PRIMITIVETYPE_CHAR
-#define ARRAYTYPE_SHORT    PRIMITIVETYPE_SHORT
-#define ARRAYTYPE_BOOLEAN  PRIMITIVETYPE_BOOLEAN
-#define ARRAYTYPE_OBJECT   PRIMITIVETYPE_VOID     /* don't use as index! */
-
-typedef struct java_arrayheader {       /* header for all arrays              */
-       java_objectheader objheader;        /* object header                      */
+typedef struct java_array_t {           /* header for all arrays              */
+       java_object_t objheader;            /* object header                      */
        s4 size;                            /* array size                         */
-#ifdef SIZE_FROM_CLASSINFO
-       s4 alignedsize; /* phil */
-#endif
-} java_arrayheader;
+} java_array_t;
 
 
 
 /* structs for all kinds of arrays ********************************************/
 
-typedef struct java_chararray {
-       java_arrayheader header;
-       u2 data[1];
-} java_chararray;
-
-typedef struct java_floatheader {
-       java_arrayheader header;
-       float data[1];
-} java_floatarray;
-
-typedef struct java_doublearray {
-       java_arrayheader header;
-       double data[1];
-} java_doublearray;
-
 /*  booleanarray and bytearray need identical memory layout (access methods
     use the same machine code */
 
-typedef struct java_booleanarray {
-       java_arrayheader header;
+typedef struct java_booleanarray_t {
+       java_array_t header;
        u1 data[1];
-} java_booleanarray;
+} java_booleanarray_t;
 
-typedef struct java_bytearray {
-       java_arrayheader header;
+typedef struct java_bytearray_t {
+       java_array_t header;
        s1 data[1];
-} java_bytearray;
+} java_bytearray_t;
+
+typedef struct java_chararray_t {
+       java_array_t header;
+       u2 data[1];
+} java_chararray_t;
 
-typedef struct java_shortarray {
-       java_arrayheader header;
+typedef struct java_shortarray_t {
+       java_array_t header;
        s2 data[1];
-} java_shortarray;
+} java_shortarray_t;
 
-typedef struct java_intarray {
-       java_arrayheader header;
+typedef struct java_intarray_t {
+       java_array_t header;
        s4 data[1];
-} java_intarray;
+} java_intarray_t;
 
-typedef struct java_longarray {
-       java_arrayheader header;
+typedef struct java_longarray_t {
+       java_array_t header;
        s8 data[1];
-} java_longarray;
+} java_longarray_t;
 
-/*  objectarray and arrayarray need identical memory layout (access methods
-    use the same machine code */
-
-typedef struct java_objectarray {
-       java_arrayheader header;
-       java_objectheader *data[1];
-} java_objectarray;
-
-
-/* structure for primitive classes ********************************************/
-
-typedef struct primitivetypeinfo {
-       classinfo *class_wrap;               /* class for wrapping primitive type */
-       classinfo *class_primitive;          /* primitive class                   */
-       char      *wrapname;                 /* name of class for wrapping        */
-       char      typesig;                   /* one character type signature      */
-       char      *name;                     /* name of primitive class           */
-       char      *arrayname;                /* name of primitive array class     */
-       classinfo *arrayclass;               /* primitive array class             */
-       vftbl     *arrayvftbl;               /* vftbl of primitive array class    */
-} primitivetypeinfo;
-
-
-/* field, method and class structures *****************************************/
-
-#include "jit/sets.h"
-typedef        struct xtafldinfo {
-       bool       fieldChecked;                
-       classinfo *fldClassType;
-       classSet  *XTAclassSet;          /* field class type set                  */
-} xtafldinfo;
-
-
-/* fieldinfo ******************************************************************/
-
-struct fieldinfo {           /* field of a class                                 */
-       s4  flags;            /* ACC flags                                        */
-       s4  type;             /* basic data type                                  */
-       utf *name;            /* name of field                                    */
-       utf *descriptor;      /* JavaVM descriptor string of field                */
-       
-       s4  offset;           /* offset from start of object (instance variables) */
-
-       imm_union value;      /* storage for static values (class variables)      */
-
-       classinfo *class;     /* needed by typechecker. Could be optimized        */
-                             /* away by using constant_FMIref instead of         */
-                             /* fieldinfo throughout the compiler.               */
-       
-       xtafldinfo *xta;
-};
-
-struct basicblock;
-
-
-/* exceptiontable *************************************************************/
-
-typedef struct xtable {         /* exceptiontable entry in a method           */
-       s4         startpc;         /* start pc of guarded area (inclusive)       */
-       struct basicblock *start;
-
-       s4         endpc;           /* end pc of guarded area (exklusive)         */
-       struct basicblock *end;
-
-       s4         handlerpc;       /* pc of exception handler                    */
-       struct basicblock *handler;
-
-       classinfo *catchtype;       /* catchtype of exception (NULL == catchall)  */
-       struct xtable *next;        /* used to build a list of exception when     */
-                                   /* loops are copied */
-       struct xtable *down;        /* instead of the old array, a list is used   */
-} xtable;
-
-
-typedef struct exceptiontable { /* exceptiontable entry in a method           */
-       s4         startpc;         /* start pc of guarded area (inclusive)       */
-       s4         endpc;           /* end pc of guarded area (exklusive)         */
-       s4         handlerpc;       /* pc of exception handler                    */
-       classinfo *catchtype;       /* catchtype of exception (NULL == catchall)  */
-} exceptiontable;
-
-
-/* methodinfo  static info ****************************************************/
-typedef struct xtainfo {
-       s4          XTAmethodUsed;     /* XTA if used in callgraph - not used /used */
-       classSet    *XTAclassSet;      /* method class type set                 */ 
-       /*classSet      *PartClassSet */   /* method class type set                 */ 
-
-       classSetNode    *paramClassSet; /* cone set of methods parameters       */
-
-       methSet         *calls;            /* methods this method calls                 */ 
-       methSet         *calledBy;         /* methods that call this method         */ 
-       methSet         *marked;  //not in Dez         /* methods that marked by this method    */ 
-       methSet         *markedBy;
-       fldSet          *fldsUsed;         /* fields used by this method             */ 
-       /*methSetNode  *interfaceCalls*/   /* methods this method calls as interface */ 
-       bool           chgdSinceLastParse; /* Changed since last parse ?          */
-} xtainfo; 
-
-
-/* lineinfo *****************************************************************/
-struct lineinfo {
-       u2 start_pc;
-       u2 line_number;
-};
-
-/* methodinfo *****************************************************************/
-
-struct methodinfo {                 /* method structure                       */
-       s4             flags;               /* ACC flags                              */
-       utf       *name;                /* name of method                         */
-       utf       *descriptor;          /* JavaVM descriptor string of method     */
-       s4         returntype;          /* only temporary valid, return type      */
-       classinfo *returnclass;         /* pointer to classinfo for the rtn type  */ /*XTA*/ 
-       s4         paramcount;          /* only temporary valid, parameter count  */
-       u1        *paramtypes;          /* only temporary valid, parameter types  */
-       classinfo **paramclass;         /* pointer to classinfo for a parameter   */ /*XTA*/
-       
-       classinfo *class;               /* class, the method belongs to           */
-       s4         vftblindex;          /* index of method in virtual function table
-                                          (if it is a virtual method)            */
-       s4         maxstack;            /* maximum stack depth of method          */
-       s4         maxlocals;           /* maximum number of local variables      */
-       s4         jcodelength;         /* length of JavaVM code                  */
-       u1        *jcode;               /* pointer to JavaVM code                 */
-
-       s4         exceptiontablelength;/* exceptiontable length                  */
-       exceptiontable *exceptiontable; /* the exceptiontable                     */
-
-       u2        thrownexceptionscount;/*number of exceptions declared to be thrown by a method*/
-       classinfo **thrownexceptions;   /*array of classinfos of declared exceptions*/
-
-       u2         linenumbercount;     /*number of linenumber attributes*/
-       lineinfo  *linenumbers;         /*array of lineinfo items (start_pc,line_number)*/
-
-       u1        *stubroutine;         /* stub for compiling or calling natives  */    
-       s4         mcodelength;         /* legth of generated machine code        */
-       u1        *mcode;               /* pointer to machine code                */
-       u1        *entrypoint;          /* entry point in machine code            */
-
-       /*rtainfo   rta;*/
-       xtainfo    *xta;
-
-       s4        methodUsed;           /* marked (might be used later) /not used /used */
-       s4        monoPoly;             /* call is mono or poly or unknown        */ /*RT stats */
-        /* should # method def'd and used be kept after static parse (will it be used?) */
-       s4        subRedefs;
-       s4        subRedefsUsed;
-};
-
-
-/* innerclassinfo *************************************************************/
-
-typedef struct innerclassinfo {
-       classinfo *inner_class;       /* inner class pointer                      */
-       classinfo *outer_class;       /* outer class pointer                      */
-       utf *name;                    /* innerclass name                          */ 
-       s4 flags;                     /* ACC flags                                */
-} innerclassinfo;
-
-
-/* classinfo ******************************************************************/
-
-struct classinfo {                /* class structure                          */
-       java_objectheader header;     /* classes are also objects                 */
-       java_objectarray* signers;
-       struct java_security_ProtectionDomain* pd;
-       struct java_lang_VMClass* vmClass;
-       struct java_lang_reflect_Constructor* constructor;
-
-       s4 initializing_thread;       /* gnu classpath                            */
-       s4 erroneous_state;           /* gnu classpath                            */
-       struct gnu_classpath_RawData* vmData; /* gnu classpath                    */
-
-       s4          flags;            /* ACC flags                                */
-       utf        *name;             /* class name                               */
-
-       s4          cpcount;          /* number of entries in constant pool       */
-       u1         *cptags;           /* constant pool tags                       */
-       voidptr    *cpinfos;          /* pointer to constant pool info structures */
-
-       classinfo  *super;            /* super class pointer                      */
-       classinfo  *sub;              /* sub class pointer                        */
-       classinfo  *nextsub;          /* pointer to next class in sub class list  */
-
-       s4          interfacescount;  /* number of interfaces                     */
-       classinfo **interfaces;       /* pointer to interfaces                    */
-
-       s4          fieldscount;      /* number of fields                         */
-       fieldinfo  *fields;           /* field table                              */
-
-       s4          methodscount;     /* number of methods                        */
-       methodinfo *methods;          /* method table                             */
-
-       listnode    listnode;         /* linkage                                  */
-
-       bool        initialized;      /* true, if class already initialised       */
-       bool        loaded;           /* true, if class already loaded            */
-       bool        linked;           /* true, if class already linked            */
-       s4          index;            /* hierarchy depth (classes) or index
-                                        (interfaces)                             */
-       s4          instancesize;     /* size of an instance of this class        */
-#ifdef SIZE_FROM_CLASSINFO
-       s4          alignedsize;      /* size of an instance, aligned to the 
-                                                                        allocation size on the heap              */
-#endif
-
-       vftbl      *vftbl;            /* pointer to virtual function table        */
-
-       methodinfo *finalizer;        /* finalizer method                         */
-
-    u2             innerclasscount;   /* number of inner classes              */
-    innerclassinfo *innerclass;
-
-    classinfo      *hashlink;         /* link for external hash chain         */
-       bool        classvftbl;       /* has its own copy of the Class vtbl       */
-
-       s4          classUsed;        /* 0= not used 1 = used   CO-RT             */
-
-       classSetNode *impldBy;        /* implemented by class set                 */
-       utf        *packagename;      /* full name of the package                 */
-       utf        *sourcefile;       /* classfile name containing this class     */
-       java_objectheader *classloader;       /* 0 for bootstrap classloader */
-};
-
-/* check if class is an array class. Only use for linked classes! */
-#define CLASS_IS_ARRAY(clsinfo)  ((clsinfo)->vftbl->arraydesc != NULL)
-
-
-/* virtual function table ******************************************************
-
-       The vtbl has a bidirectional layout with open ends at both sides.
-       interfacetablelength gives the number of entries of the interface table at
-       the start of the vftbl. The vftbl pointer points to &interfacetable[0].
-       vftbllength gives the number of entries of table at the end of the vftbl.
-
-       runtime type check (checkcast):
-
-       Different methods are used for runtime type check depending on the
-       argument of checkcast/instanceof.
-       
-       A check against a class is implemented via relative numbering on the class
-       hierachy tree. The tree is numbered in a depth first traversal setting
-       the base field and the diff field. The diff field gets the result of
-       (high - base) so that a range check can be implemented by an unsigned
-       compare. A sub type test is done by checking the inclusion of base of
-       the sub class in the range of the superclass.
-
-       A check against an interface is implemented via the interfacevftbl. If the
-       interfacevftbl contains a nonnull value a class is a subclass of this
-       interface.
-
-       interfacetable:
-
-       Like standard virtual methods interface methods are called using
-       virtual function tables. All interfaces are numbered sequentially
-       (starting with zero). For each class there exist an interface table
-       of virtual function tables for each implemented interface. The length
-       of the interface table is determined by the highest number of an
-       implemented interface.
-
-       The following example assumes a class which implements interface 0 and 3:
-
-       interfacetablelength = 4
-
-                  | ...       |            +----------+
-                     +-----------+            | method 2 |---> method z
-                     | class     |            | method 1 |---> method y
-                     +-----------+            | method 0 |---> method x
-                     | ivftbl  0 |----------> +----------+
-       vftblptr ---> +-----------+
-                  | ivftbl -1 |--> NULL    +----------+
-                  | ivftbl -2 |--> NULL    | method 1 |---> method x
-                  | ivftbl -3 |-----+      | method 0 |---> method a
-                  +-----------+     +----> +----------+
-     
-                              +---------------+
-                                 | length 3 = 2  |
-                                 | length 2 = 0  |
-                                 | length 1 = 0  |
-                                 | length 0 = 3  |
-       interfacevftbllength ---> +---------------+
-
-*******************************************************************************/
-
-struct vftbl {
-       methodptr   *interfacetable[1];    /* interface table (access via macro)  */
-
-       classinfo   *class;                /* class, the vtbl belongs to          */
-
-       arraydescriptor *arraydesc;        /* for array classes, otherwise NULL   */
+typedef struct java_floatarray_t {
+       java_array_t header;
+       float data[1];
+} java_floatarray_t;
 
-       s4           vftbllength;          /* virtual function table length       */
-       s4           interfacetablelength; /* interface table length              */
+typedef struct java_doublearray_t {
+       java_array_t header;
+       double data[1];
+} java_doublearray_t;
 
-       s4           baseval;              /* base for runtime type check         */
-                                          /* (-index for interfaces)             */
-       s4           diffval;              /* high - base for runtime type check  */
+/*  objectarray and arrayarray need identical memory layout (access methods
+    use the same machine code */
 
-       s4          *interfacevftbllength; /* length of interface vftbls          */
-       
-       methodptr    table[1];             /* class vftbl                         */
+struct java_objectarray_t {
+       java_array_t   header;
+       java_object_t *data[1];
 };
 
-#define VFTBLINTERFACETABLE(v,i)       (v)->interfacetable[-i]
-
 
-/* arraydescriptor ************************************************************
+/* java_handle_t ***************************************************************
 
-    For every array class an arraydescriptor is allocated which
-    describes the array class.
-       The arraydescriptor is referenced from the vftbl of the array
-       class.
+   TODO: document me!
 
 *******************************************************************************/
 
-struct arraydescriptor {
-       vftbl *componentvftbl;   /* vftbl of the component type, NULL for primit. */
-       vftbl *elementvftbl;     /* vftbl of the element type, NULL for primitive */
-       short  arraytype;        /* ARRAYTYPE_* constant                          */
-       short  dimension;        /* dimension of the array (always >= 1)          */
-    s4     dataoffset;       /* offset of the array data from object pointer  */
-       s4     componentsize;    /* size of a component in bytes                  */
-       short  elementtype;      /* ARRAYTYPE_* constant                          */
-};
-
-
-/* flag variables *************************************************************/
-
-extern bool compileall;
-extern bool runverbose;         
-extern bool verboseexception;         
-extern bool verbose;         
-extern bool opt_rt;             /* Rapid Type Analysis for better inlining CO-RT*/
-extern bool opt_xta;            /* X Type Analysis for better inlining    CO-XTA*/
-extern bool opt_vta;            /* Variable Type Analysis for better inlining    CO-VTA*/
-extern bool opt_verify;         /* true if classfiles should be verified      */
-#ifdef TYPECHECK_VERBOSE_OPT
-extern bool typecheckverbose;
+#if 0
+typedef struct java_handle_t {
+       java_object_t *heap_object;
+} java_handle_t;
+#elseif 0
+typedef union {
+       java_object_t    object;
+       java_array_t     array;
+} java_handle_t;
+#else
+typedef java_object_t       java_handle_t;
+typedef java_objectarray_t  java_handle_objectarray_t;
+typedef java_booleanarray_t java_handle_booleanarray_t;
+typedef java_bytearray_t    java_handle_bytearray_t;
+typedef java_chararray_t    java_handle_chararray_t;
+typedef java_shortarray_t   java_handle_shortarray_t;
+typedef java_intarray_t     java_handle_intarray_t;
+typedef java_longarray_t    java_handle_longarray_t;
+typedef java_floatarray_t   java_handle_floatarray_t;
+typedef java_doublearray_t  java_handle_doublearray_t;
 #endif
 
-/*extern int pClassHeir;*/
-/*extern int pCallgraph;*/
-/*extern int pOpcodes;*/
-/*extern int pStats;*/
-
-/*extern void RT_jit_parse(methodinfo *m);*/
 
+/* global constants related to the verifier ***********************************/
 
-/* statistic variables ********************************************************/
+/* The verifier needs additional variables in the variable array. Since these */
+/* must be reserved and set by parse.c and stack.c, we define these numbers   */
+/* here to avoid mysterious hard-coded constants.                             */
+/* stack.c needs an extra variable if the verifier is disabled.               */
 
-extern int count_class_infos;
-extern int count_const_pool_len;
-extern int count_vftbl_len;
-extern int count_utf_len;
-extern int count_all_methods;
-extern int count_vmcode_len;
-extern int count_extable_len;
-extern int count_class_loads;
-extern int count_class_inits;
-extern int count_utf_new;
-extern int count_utf_new_found;
-
-
-/* table of primitive types ***************************************************/
-
-/* This array can be indexed by the PRIMITIVETYPE_ and ARRAYTYPE_
- * constants (except ARRAYTYPE_OBJECT).
- */
-extern primitivetypeinfo primitivetype_table[PRIMITIVETYPE_COUNT];
-
-
-/* macros for descriptor parsing **********************************************/
-
-/* SKIP_FIELDDESCRIPTOR:
- * utf_ptr must point to the first character of a field descriptor.
- * After the macro call utf_ptr points to the first character after
- * the field descriptor.
- *
- * CAUTION: This macro does not check for an unexpected end of the
- * descriptor. Better use SKIP_FIELDDESCRIPTOR_SAFE.
- */
-#define SKIP_FIELDDESCRIPTOR(utf_ptr)                                                  \
-       do { while (*(utf_ptr)=='[') (utf_ptr)++;                                       \
-               if (*(utf_ptr)++=='L')                                                                  \
-                       while(*(utf_ptr)++ != ';') /* skip */; } while(0)
-
-/* SKIP_FIELDDESCRIPTOR_SAFE:
- * utf_ptr must point to the first character of a field descriptor.
- * After the macro call utf_ptr points to the first character after
- * the field descriptor.
- *
- * Input:
- *     utf_ptr....points to first char of descriptor
- *     end_ptr....points to first char after the end of the string
- *     errorflag..must be initialized (to false) by the caller!
- * Output:
- *     utf_ptr....points to first char after the descriptor
- *     errorflag..set to true if the string ended unexpectedly
- */
-#define SKIP_FIELDDESCRIPTOR_SAFE(utf_ptr,end_ptr,errorflag)                   \
-       do { while ((utf_ptr) != (end_ptr) && *(utf_ptr)=='[') (utf_ptr)++;     \
-               if ((utf_ptr) == (end_ptr))                                                                             \
-                       (errorflag) = true;                                                                                     \
-               else                                                                                                                    \
-                       if (*(utf_ptr)++=='L') {                                                                        \
-                               while((utf_ptr) != (end_ptr) && *(utf_ptr)++ != ';')    \
-                                       /* skip */;                                                                                     \
-                               if ((utf_ptr)[-1] != ';')                                                               \
-                                       (errorflag) = true; }} while(0)
-
-
-/* Synchronization ************************************************************/
-
-#if defined(USE_THREADS) && defined(NATIVE_THREADS)
-void cast_lock();
-void cast_unlock();
-void compiler_lock();
-void compiler_unlock();
+#if defined(ENABLE_VERIFIER)
+#    define VERIFIER_EXTRA_LOCALS  1
+#    define VERIFIER_EXTRA_VARS    1
+#    define STACK_EXTRA_VARS       0
+#else
+#    define VERIFIER_EXTRA_LOCALS  0
+#    define VERIFIER_EXTRA_VARS    0
+#    define STACK_EXTRA_VARS       1
 #endif
 
 #endif /* _GLOBAL_H */
@@ -902,4 +347,5 @@ void compiler_unlock();
  * c-basic-offset: 4
  * tab-width: 4
  * End:
+ * vim:noexpandtab:sw=4:ts=4:
  */