2004-12-02 Bernie Solomon <bernard@ugsolutions.com>

[mono.git] / mono / interpreter / interp.h

diff --git a/mono/interpreter/interp.h b/mono/interpreter/interp.h
index deb62de7df1c479e21f5814e8553f8f31c539427..18cc9f245d9447326ab1d1e0b6e70b7223b840c9 100644 (file)
--- a/mono/interpreter/interp.h
+++ b/mono/interpreter/interp.h
@@ -1,7 +1,10 @@
-
+#include <setjmp.h>
 #include <glib.h>
 #include <mono/metadata/loader.h>
 #include <mono/metadata/object.h>
+#include <mono/metadata/domain-internals.h>
+#include <mono/metadata/class-internals.h>
+#include "config.h"
 
 enum {
        VAL_I32     = 0,
@@ -12,10 +15,17 @@ enum {
        VAL_NATI    = 0 + VAL_POINTER,
        VAL_MP      = 1 + VAL_POINTER,
        VAL_TP      = 2 + VAL_POINTER,
-       VAL_OBJ     = 3 + VAL_POINTER,
-       VAL_VALUETA = 8
+       VAL_OBJ     = 3 + VAL_POINTER
 };
 
+#if SIZEOF_VOID_P == 4
+typedef guint32 mono_u;
+typedef gint32  mono_i;
+#elif SIZEOF_VOID_P == 8
+typedef guint64 mono_u;
+typedef gint64  mono_i;
+#endif
+
 /*
  * Value types are represented on the eval stack as pointers to the
  * actual storage. The size field tells how much storage is allocated.
@@ -28,31 +38,96 @@ typedef struct {
                double f;
                /* native size integer and pointer types */
                gpointer p;
-               struct {
-                       gpointer vt;
-                       MonoClass *klass;
-               } vt;
+               mono_u nati;
+               gpointer vt;
        } data;
-       unsigned int type;
+#if defined(__ppc__) || defined(__powerpc__)
+       int pad;
+#endif
 } stackval;
 
 typedef struct _MonoInvocation MonoInvocation;
 
+typedef void (*MonoFunc) (void);
+typedef void (*MonoPIFunc) (MonoFunc callme, void *retval, void *obj_this, stackval *arguments);
+
+/* 
+ * Structure representing a method transformed for the interpreter 
+ * This is domain specific
+ */
+typedef struct 
+{
+       guint32 locals_size;
+       guint32 args_size;
+       guint32 stack_size;
+       guint32 vt_stack_size;
+       guint32 alloca_size;
+       unsigned short *code;
+       unsigned short *new_body_start; /* after all STINARG instrs */
+       MonoMethod *method;
+       MonoPIFunc func;
+       int num_clauses;
+       MonoExceptionClause *clauses;
+       void **data_items;
+       int transformed;
+       guint32 *arg_offsets;
+       guint32 *local_offsets;
+       unsigned int param_count;
+       unsigned int hasthis;
+       unsigned int valuetype;
+} RuntimeMethod;
+
 struct _MonoInvocation {
        MonoInvocation *parent; /* parent */
-       MonoInvocation *child;
+       RuntimeMethod  *runtime_method; /* parent */
        MonoMethod     *method; /* parent */
        stackval       *retval; /* parent */
        void           *obj;    /* this - parent */
-       char           *locals;
        char           *args;
        stackval       *stack_args; /* parent */
        stackval       *stack;
+       stackval       *sp; /* For GC stack marking */
        /* exception info */
-       const unsigned char  *ip;
-       MonoObject     *ex;
+       unsigned char  invoke_trap;
+       const unsigned short  *ip;
+       MonoException     *ex;
        MonoExceptionClause *ex_handler;
 };
 
-void mono_init_icall ();
+typedef struct {
+       MonoDomain *domain;
+       MonoInvocation *base_frame;
+       MonoInvocation *current_frame;
+       MonoInvocation *env_frame;
+       jmp_buf *current_env;
+       unsigned char search_for_handler;
+       unsigned char managed_code;
+} ThreadContext;
+
+void mono_init_icall (void);
+
+MonoException *
+mono_interp_transform_method (RuntimeMethod *runtime_method, ThreadContext *context);
+
+MonoDelegate*
+mono_interp_ftnptr_to_delegate (MonoClass *klass, gpointer ftn);
+
+void
+mono_interp_transform_init (void);
+
+void inline stackval_from_data (MonoType *type, stackval *result, char *data, gboolean pinvoke);
+void inline stackval_to_data (MonoType *type, stackval *val, char *data, gboolean pinvoke);
+void ves_exec_method (MonoInvocation *frame);
+
+/*
+ * defined in an arch specific file.
+ */
+MonoPIFunc
+mono_arch_create_trampoline (MonoMethodSignature *sig, gboolean string_ctor);
+
+RuntimeMethod *
+mono_interp_get_runtime_method (MonoMethod *method);
+
+void *mono_arch_create_method_pointer (MonoMethod *method);
 
+extern int mono_interp_traceopt;