GNU header update.
[cacao.git] / src / vm / builtin.h
index e2d48bd7501b6b2a30d4c5021433a5f3483ca0fd..c21a3c292864514e909295c33cea0ec034741320 100644 (file)
@@ -1,9 +1,9 @@
-/* builtin.h - prototypes of builtin functions
+/* vm/builtin.h - prototypes of builtin functions
 
-   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 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.
 
@@ -28,7 +28,7 @@
 
    Changes: Edwin Steiner
 
-   $Id: builtin.h 851 2004-01-05 23:59:28Z stefan $
+   $Id: builtin.h 1735 2004-12-07 14:33:27Z twisti $
 
 */
 
 #ifndef _BUILTIN_H
 #define _BUILTIN_H
 
+#include "arch.h"
 #include "config.h"
+#include "toolbox/logging.h"
+
+#if defined(USE_THREADS)
+# if defined(NATIVE_THREADS)
+#  include "threads/native/threads.h"
+# else
+#  include "threads/green/threads.h"
+# endif
+#endif
 
 
 /* define infinity for floating point numbers */
 #define DBL_NEGINF  0xfff0000000000000LL
 
 
-/* some platforms do not have float versions of these functions */
-
-#ifndef HAVE_COPYSIGNF
-#define copysignf copysign
-#endif
-
-#ifndef HAVE_FINITEF
-#define finitef finite
-#endif
-
-#ifndef HAVE_FMODF
-#define fmodf fmod
-#endif
+/* float versions are not defined in gnu classpath's fdlibm */
 
-#ifndef HAVE_ISNANF
-#define isnanf isnan
-#endif
+#define copysignf    copysign
+#define finitef      finite
+#define fmodf        fmod
+#define isnanf       isnan
 
 
 /**********************************************************************/
  * must be an entry in the builtin_desc table in jit/jit.c.
  */
  
-/* XXX delete */
-#if 0
-typedef struct builtin_descriptor {
-       functionptr bptr;
-       char        *name;
-       } builtin_descriptor;
-#endif
-
 typedef struct builtin_descriptor builtin_descriptor;
 
 /* There is a builtin_descriptor in builtin_desc for every builtin
@@ -115,7 +106,28 @@ extern builtin_descriptor builtin_desc[];
 /* GLOBAL VARIABLES                                                   */
 /**********************************************************************/
 
-extern java_objectheader* exceptionptr;
+#define THREADSPECIFIC
+#define exceptionptr (&_exceptionptr)
+#define threadrootmethod (&_threadrootmethod)
+
+#if defined(USE_THREADS) && defined(NATIVE_THREADS)
+#ifdef HAVE___THREAD
+
+#undef THREADSPECIFIC
+#define THREADSPECIFIC __thread
+
+#endif
+
+#undef exceptionptr
+#undef threadrootmethod
+#define exceptionptr builtin_get_exceptionptrptr()
+#define threadrootmethod  builtin_get_threadrootmethod()
+#endif
+
+#if !defined(USE_THREADS) || !defined(NATIVE_THREADS)
+extern java_objectheader *_exceptionptr;
+extern methodinfo* _threadrootmethod;
+#endif
 
 
 /**********************************************************************/
@@ -147,11 +159,11 @@ s4 builtin_instanceof(java_objectheader *obj, classinfo *class);
 #define BUILTIN_instanceof (functionptr) builtin_instanceof
 s4 builtin_isanysubclass (classinfo *sub, classinfo *super);
 /* NOT AN OP */
-s4 builtin_isanysubclass_vftbl (vftbl *sub, vftbl *super);
+s4 builtin_isanysubclass_vftbl (vftbl_t *sub, vftbl_t *super);
 /* NOT AN OP */
 s4 builtin_checkcast(java_objectheader *obj, classinfo *class);
 /* NOT AN OP */
-s4 builtin_arrayinstanceof(java_objectheader *obj, vftbl *target);
+s4 builtin_arrayinstanceof(java_objectheader *obj, vftbl_t *target);
 #define BUILTIN_arrayinstanceof (functionptr) builtin_arrayinstanceof
 
 #if defined(__I386__)
@@ -160,33 +172,35 @@ s4 asm_builtin_arrayinstanceof(java_objectheader *obj, classinfo *class); /* XXX
 #define BUILTIN_arrayinstanceof (functionptr) asm_builtin_arrayinstanceof
 #endif
 
-s4 builtin_checkarraycast(java_objectheader *obj, vftbl *target);
+s4 builtin_checkarraycast(java_objectheader *obj, vftbl_t *target);
 /* NOT AN OP */
-s4 asm_builtin_checkarraycast(java_objectheader *obj, vftbl *target);
+s4 asm_builtin_checkarraycast(java_objectheader *obj, vftbl_t *target);
 #define BUILTIN_checkarraycast (functionptr) asm_builtin_checkarraycast
 
 java_objectheader *builtin_throw_exception(java_objectheader *exception);
 /* NOT AN OP */
-java_objectheader *builtin_trace_exception(java_objectheader *exceptionptr,
-                                                                                  methodinfo *method, 
-                                                                                  int *pos, int noindent);
-/* NOT AN OP */
-
-java_objectheader *builtin_get_exceptionptr();
-/* NOT AN OP */
-void builtin_set_exceptionptr(java_objectheader*);
+java_objectheader *builtin_trace_exception(java_objectheader *xptr,
+                                                                                  methodinfo *m,
+                                                                                  void *pos,
+                                                                                  s4 line,
+                                                                                  s4 noindent);
 /* NOT AN OP */
 
 java_objectheader *builtin_new(classinfo *c);
+#ifdef __I386__
+java_objectheader *asm_builtin_new(classinfo *c);
+#define BUILTIN_new (functionptr) asm_builtin_new
+#else
 #define BUILTIN_new (functionptr) builtin_new
+#endif
 
-java_arrayheader *builtin_newarray(s4 size, vftbl *arrayvftbl);
+java_arrayheader *builtin_newarray(s4 size, vftbl_t *arrayvftbl);
 #define BUILTIN_newarray (functionptr) builtin_newarray
 java_objectarray *builtin_anewarray(s4 size, classinfo *component);
 /* NOT AN OP */
 
 #if defined(__I386__)
-void asm_builtin_newarray(s4 size, vftbl *arrayvftbl);
+void asm_builtin_newarray(s4 size, vftbl_t *arrayvftbl);
 #undef  BUILTIN_newarray
 #define BUILTIN_newarray (functionptr) asm_builtin_newarray
 #endif
@@ -207,8 +221,8 @@ java_intarray *builtin_newarray_int(s4 size);
 #define BUILTIN_newarray_int (functionptr) builtin_newarray_int
 java_longarray *builtin_newarray_long(s4 size);
 #define BUILTIN_newarray_long (functionptr) builtin_newarray_long
-java_arrayheader *builtin_nmultianewarray(int n,
-                                          vftbl *arrayvftbl, long *dims);
+java_arrayheader *builtin_nmultianewarray(int n, vftbl_t *arrayvftbl, long *dims);
+/*  java_arrayheader *builtin_nmultianewarray(int n, classinfo *arrayclass, long *dims); */
 /* NOT AN OP */
 
 s4 builtin_canstore(java_objectarray *a, java_objectheader *o);
@@ -218,28 +232,27 @@ void asm_builtin_aastore(java_objectarray *a, s4 index, java_objectheader *o);
 
 #ifdef TRACE_ARGS_NUM
 #if TRACE_ARGS_NUM == 6
-void builtin_trace_args(s8 a0, s8 a1, s8 a2, s8 a3, s8 a4, s8 a5, methodinfo *method);
+void builtin_trace_args(s8 a0, s8 a1, s8 a2, s8 a3, s8 a4, s8 a5, methodinfo *m);
 /* NOT AN OP */
 #else
-void builtin_trace_args(s8 a0, s8 a1, s8 a2, s8 a3, s8 a4, s8 a5, s8 a6, s8 a7, methodinfo *method);
+void builtin_trace_args(s8 a0, s8 a1, s8 a2, s8 a3, s8 a4, s8 a5, s8 a6, s8 a7, methodinfo *m);
 /* NOT AN OP */
 #endif
 #endif
-void builtin_displaymethodstart(methodinfo *method); /* XXX? */
-/* NOT AN OP */
-void builtin_displaymethodstop(methodinfo *method, s8 l, double d, float f);
+void builtin_displaymethodstart(methodinfo *m);
 /* NOT AN OP */
-/* void builtin_displaymethodstop(methodinfo *method); */ /* XXX? */
-void builtin_displaymethodexception(methodinfo *method); /* XXX? */
+void builtin_displaymethodstop(methodinfo *m, s8 l, double d, float f);
 /* NOT AN OP */
 
 void builtin_monitorenter(java_objectheader *o);
 /* NOT AN OP */
+void builtin_staticmonitorenter(classinfo *c);
+/* NOT AN OP */
 void asm_builtin_monitorenter(java_objectheader *o);
 #define BUILTIN_monitorenter (functionptr) asm_builtin_monitorenter
-void builtin_monitorexit(java_objectheader *o);
+void *builtin_monitorexit(java_objectheader *o);
 /* NOT AN OP */
-void asm_builtin_monitorexit(java_objectheader *o);
+void *asm_builtin_monitorexit(java_objectheader *o);
 #define BUILTIN_monitorexit (functionptr) asm_builtin_monitorexit
 
 s4 builtin_idiv(s4 a, s4 b);
@@ -282,36 +295,36 @@ s8 builtin_lneg(s8 a);
 s4 builtin_lcmp(s8 a, s8 b);
 #define BUILTIN_lcmp (functionptr) builtin_lcmp
 
-float builtin_fadd(float a, float b); /* XXX? */
+float builtin_fadd(float a, float b);
 /* NOT AN OP */
-float builtin_fsub(float a, float b); /* XXX? */
+float builtin_fsub(float a, float b);
 /* NOT AN OP */
-float builtin_fmul(float a, float b); /* XXX? */
+float builtin_fmul(float a, float b);
 /* NOT AN OP */
-float builtin_fdiv(float a, float b); /* XXX? */
+float builtin_fdiv(float a, float b);
 /* NOT AN OP */
-float builtin_fneg(float a);          /* XXX? */
+float builtin_fneg(float a);         
 /* NOT AN OP */
-s4 builtin_fcmpl(float a, float b);   /* XXX? */
+s4 builtin_fcmpl(float a, float b);  
 /* NOT AN OP */
-s4 builtin_fcmpg(float a, float b);   /* XXX? */
+s4 builtin_fcmpg(float a, float b);  
 /* NOT AN OP */
 float builtin_frem(float a, float b);
 #define BUILTIN_frem (functionptr) builtin_frem
 
-double builtin_dadd(double a, double b); /* XXX? */
+double builtin_dadd(double a, double b);
 /* NOT AN OP */
-double builtin_dsub(double a, double b); /* XXX? */
+double builtin_dsub(double a, double b);
 /* NOT AN OP */
-double builtin_dmul(double a, double b); /* XXX? */
+double builtin_dmul(double a, double b);
 /* NOT AN OP */
-double builtin_ddiv(double a, double b); /* XXX? */
+double builtin_ddiv(double a, double b);
 /* NOT AN OP */
-double builtin_dneg(double a);           /* XXX? */ 
+double builtin_dneg(double a);          
 /* NOT AN OP */
-s4 builtin_dcmpl(double a, double b);    /* XXX? */
+s4 builtin_dcmpl(double a, double b);   
 /* NOT AN OP */
-s4 builtin_dcmpg(double a, double b);    /* XXX? */
+s4 builtin_dcmpg(double a, double b);   
 /* NOT AN OP */
 double builtin_drem(double a, double b);
 #define BUILTIN_drem (functionptr) builtin_drem
@@ -338,7 +351,7 @@ s8       builtin_f2l(float a);
 s8       asm_builtin_f2l(float a);
 /* NOT AN OP */
 
-double   builtin_f2d(float a);     /* XXX? */
+double   builtin_f2d(float a);
 /* NOT AN OP */
 
 s4       builtin_d2i(double a);
@@ -350,17 +363,57 @@ s8       builtin_d2l(double a);
 s8       asm_builtin_d2l(double a);
 /* NOT AN OP */
 
-float    builtin_d2f(double a);    /* XXX? */
+float    builtin_d2f(double a);
 /* NOT AN OP */
 
 java_arrayheader *builtin_clone_array(void *env, java_arrayheader *o);
 /* NOT AN OP */
 
-/* conversion helper functions */
+/* builtin_dummy just panics if it is executed. */
+s4 builtin_dummy();
+/* NOT AN OP */
 
+/* conversion helper functions */
 inline float intBitsToFloat(s4 i);
 inline float longBitsToDouble(s8 l);
 
+/* this is a wrapper for calls from asmpart */
+java_objectheader **builtin_asm_get_exceptionptrptr();
+
+#if defined(USE_THREADS) && defined(NATIVE_THREADS)
+static inline java_objectheader **builtin_get_exceptionptrptr();
+/* NOT AN OP */
+static inline methodinfo **builtin_get_threadrootmethod();
+/* NOT AN OP */
+
+inline java_objectheader **builtin_get_exceptionptrptr()
+{
+       return &THREADINFO->_exceptionptr;
+}
+
+inline methodinfo **builtin_get_threadrootmethod()
+{
+       return &THREADINFO->_threadrootmethod;
+}
+#endif
+
+
+/* returns the root method of a thread. this is used in asmpart.S and delivers the abort condition
+   for the stack unwinding for getClassContext and getClassLoader. For the main thread this is the main function.
+   Otherwhise it is the thread's run method (at least that's how I see it) (jowenn) */
+methodinfo *builtin_asm_get_threadrootmethod();
+
+/* returns the current top element of the stack frame info list (needed for unwinding across native functions) */
+/* on i386 this is a pointer to a structure 
+               ------------------------------------------------
+               | return adress out of native stub              |
+               | pointer to method info                        | either i have to save an arbitrary adress within this native stub or the pointer to the method info, both are equaly costly, I have chosen the method  info (JOWENN)
+               | pointer to thread specific top of this list   |<----stack frame begin
+points here---->| previous element in list                     |
+               ------------------------------------------------
+*/
+void *builtin_asm_get_stackframeinfo();
+stacktraceelement *builtin_stacktrace_copy(stacktraceelement **,stacktraceelement *begin, stacktraceelement *end);
 #endif /* _BUILTIN_H */