* src/vm/jit/inline/inline.c (emit_inlining_prolog): Set javaindex
[cacao.git] / src / cacaoh / headers.c
index 511eee4b62136e273ba2754f245559d73f5db51b..a4a21570908ab2246fa6196b9976f638d841efbe 100644 (file)
    Contact: cacao@cacaojvm.org
 
    Authors: Reinhard Grafl
-
-   Changes: Mark Probst
+            Mark Probst
             Philipp Tomsich
             Christian Thalinger
+            Edwin Steiner
 
-   $Id: headers.c 4595 2006-03-14 20:51:12Z edwin $
+   $Id: headers.c 5935 2006-11-08 20:27:37Z twisti $
 
 */
 
 
+#include "config.h"
+
 #include <assert.h>
 #include <ctype.h>
 #include <stdarg.h>
 #include <stdlib.h>
 #include <string.h>
 
-#include "config.h"
 #include "vm/types.h"
 
-#if defined(USE_THREADS) && defined(NATIVE_THREADS)
+#if defined(ENABLE_THREADS)
 # if defined(__DARWIN__)
 #  include <signal.h>
 # endif
 # include <ucontext.h>
 #endif
 
-#include "mm/boehm.h"
+#include "mm/gc-common.h"
 #include "mm/memory.h"
 #include "native/include/java_lang_String.h"
 #include "native/include/java_lang_Throwable.h"
 #include "vm/jit/asmpart.h"
 
 
+/* Invocation API variables ***************************************************/
+
+_Jv_JavaVM *_Jv_jvm;                    /* denotes a Java VM                  */
+char       *_Jv_bootclasspath;
+
 #if defined(ENABLE_INTRP)
 /* dummy interpreter stack to keep the compiler happy */
 
@@ -76,7 +82,7 @@ u1 *intrp_main_stack;
 
 /* for raising exceptions from native methods *********************************/
 
-#if !defined(USE_THREADS) || !defined(NATIVE_THREADS)
+#if !defined(ENABLE_THREADS)
 java_objectheader *_no_threads_exceptionptr = NULL;
 #endif
 
@@ -100,6 +106,20 @@ java_objectheader *native_new_and_init_throwable(classinfo *c, java_lang_Throwab
 java_objectheader *vm_call_method(methodinfo *m, java_objectheader *o, ...)
 { return NULL; }
 
+void vm_abort(const char *text, ...)
+{
+       va_list ap;
+
+       /* print the log message */
+
+       va_start(ap, text);
+       vfprintf(stderr, text, ap);
+       va_end(ap);
+
+       /* now abort the VM */
+
+       abort();
+}
 
 /* code patching functions */
 void patcher_builtin_arraycheckcast(u1 *sp) {}
@@ -121,7 +141,7 @@ u1 *createcompilerstub(methodinfo *m) { return NULL; }
 u1 *intrp_createcompilerstub(methodinfo *m) { return NULL; }
 #endif
 
-u1 *codegen_createnativestub(functionptr f, methodinfo *m) { return NULL; }
+codeinfo *codegen_createnativestub(functionptr f, methodinfo *m) { return NULL; }
 
 void removecompilerstub(u1 *stub) {}
 void removenativestub(u1 *stub) {}
@@ -133,15 +153,21 @@ void *asm_switchstackandcall(void *stack, void *func, void **stacktopsave, void
 
 void asm_handle_builtin_exception(classinfo *c) {}
 
-
 #if defined(ENABLE_JIT)
+void asm_abstractmethoderror(void) {}
 void asm_getclassvalues_atomic(vftbl_t *super, vftbl_t *sub, castinfo *out) {}
 #endif
 
 #if defined(ENABLE_INTRP)
+void intrp_asm_abstractmethoderror(void) {}
 void intrp_asm_getclassvalues_atomic(vftbl_t *super, vftbl_t *sub, castinfo *out) {}
 #endif
 
+u8 asm_get_cycle_count(void)
+{
+       return 0;
+}
+
 
 void *Java_java_lang_VMObject_clone(void *env, void *clazz, void * this)
 {
@@ -163,10 +189,12 @@ bool typeinfo_init_class(typeinfo *info,classref_or_classinfo c)
 }
 
 void typeinfo_print(FILE *file,typeinfo *info,int indent) {}
+void typeinfo_print_short(FILE *file,typeinfo *info) {}
 
 void exceptions_print_exception(java_objectheader *xptr) {}
+void stacktrace_dump_trace(threadobject *thread) {}
 void stacktrace_print_trace(java_objectheader *xptr) {}
-
+java_objectarray *stacktrace_getClassContext() { return NULL; }
 void code_free_code_of_method(methodinfo *m) {}
 
 
@@ -178,13 +206,9 @@ void throw_main_exception_exit(void) { assert(0); }
 void throw_exception(void) { assert(0); }
 void throw_exception_exit(void) { assert(0); }
 
-java_objectheader *new_verifyerror(methodinfo *m, const char *message)
+void exceptions_throw_verifyerror(methodinfo *m, const char *message)
 {
        assert(0);
-
-       /* keep compiler happy */
-
-       return NULL;
 }
 
 java_objectheader *new_exception_throwable(const char *classname, java_lang_Throwable *throwable)
@@ -245,7 +269,7 @@ java_objectheader *new_exception_message(const char *classname, const char *mess
 java_objectheader *new_exception_utfmessage(const char *classname, utf *message)
 {
        fprintf(stderr, "%s: ", classname);
-       utf_display(message);
+       utf_display_printable_ascii(message);
        fputc('\n', stderr);
 
        exit(1);
@@ -271,11 +295,19 @@ java_objectheader *new_exception_javastring(const char *classname,
 }
 
 
+void exceptions_throw_abstractmethoderror(void)
+{
+       fprintf(stderr, "java.lang.AbstractMethodError\n");
+
+       exit(1);
+}
+
+
 java_objectheader *new_classformaterror(classinfo *c, const char *message, ...)
 {
        va_list ap;
 
-       utf_display(c->name);
+       utf_display_printable_ascii(c->name);
        fprintf(stderr, ": ");
 
        va_start(ap, message);
@@ -305,7 +337,7 @@ void exceptions_throw_classformaterror(classinfo *c, const char *message, ...)
 java_objectheader *new_classnotfoundexception(utf *name)
 {
        fprintf(stderr, "java.lang.ClassNotFoundException: ");
-       utf_fprint(stderr, name);
+       utf_fprint_printable_ascii(stderr, name);
        fputc('\n', stderr);
 
        exit(1);
@@ -319,7 +351,7 @@ java_objectheader *new_classnotfoundexception(utf *name)
 java_objectheader *new_noclassdeffounderror(utf *name)
 {
        fprintf(stderr, "java.lang.NoClassDefFoundError: ");
-       utf_fprint(stderr, name);
+       utf_fprint_printable_ascii(stderr, name);
        fputc('\n', stderr);
 
        exit(1);
@@ -335,7 +367,7 @@ java_objectheader *exceptions_new_linkageerror(const char *message,
 {
        fprintf(stderr, "java.lang.LinkageError: %s",message);
        if (c) {
-               utf_fprint_classname(stderr, c->name);
+               utf_fprint_printable_ascii_classname(stderr, c->name);
        }
        fputc('\n', stderr);
 
@@ -350,10 +382,10 @@ java_objectheader *exceptions_new_nosuchmethoderror(classinfo *c,
                                                                                                        utf *name, utf *desc)
 {
        fprintf(stderr, "java.lang.NoSuchMethodError: ");
-       utf_fprint(stderr, c->name);
+       utf_fprint_printable_ascii(stderr, c->name);
        fprintf(stderr, ".");
-       utf_fprint(stderr, name);
-       utf_fprint(stderr, desc);
+       utf_fprint_printable_ascii(stderr, name);
+       utf_fprint_printable_ascii(stderr, desc);
        fputc('\n', stderr);
 
        exit(1);
@@ -364,6 +396,12 @@ java_objectheader *exceptions_new_nosuchmethoderror(classinfo *c,
 }
 
 
+void exceptions_throw_nosuchmethoderror(classinfo *c, utf *name, utf *desc)
+{
+       (void) exceptions_new_nosuchmethoderror(c, name, desc);
+}
+
+
 java_objectheader *new_internalerror(const char *message, ...)
 {
        va_list ap;
@@ -388,7 +426,7 @@ java_objectheader *new_unsupportedclassversionerror(classinfo *c, const char *me
 
        fprintf(stderr, "%s: ", string_java_lang_UnsupportedClassVersionError);
 
-       utf_display(c->name);
+       utf_display_printable_ascii(c->name);
        fprintf(stderr, ": ");
 
        va_start(ap, message);
@@ -403,7 +441,31 @@ java_objectheader *new_unsupportedclassversionerror(classinfo *c, const char *me
 }
 
 
-java_objectheader *new_illegalmonitorstateexception(void)
+void exceptions_throw_arrayindexoutofboundsexception(void)
+{
+       fprintf(stderr, "%s", string_java_lang_ArrayIndexOutOfBoundsException);
+       exit(1);
+}
+
+
+java_objectheader *exceptions_new_arraystoreexception(void)
+{
+       fprintf(stderr, "%s", string_java_lang_ArrayStoreException);
+       exit(1);
+
+       /* keep compiler happy */
+
+       return NULL;
+}
+
+
+void exceptions_throw_arraystoreexception(void)
+{
+       (void) exceptions_new_arraystoreexception();
+}
+
+
+java_objectheader *exceptions_throw_illegalmonitorstateexception(void)
 {
        fprintf(stderr, "%s", string_java_lang_IllegalMonitorStateException);
        exit(1);
@@ -431,7 +493,7 @@ void exceptions_throw_negativearraysizeexception(void)
 }
 
 
-java_objectheader *new_nullpointerexception(void)
+java_objectheader *exceptions_new_nullpointerexception(void)
 {
        fprintf(stderr, "%s", string_java_lang_NullPointerException);
        exit(1);
@@ -444,7 +506,7 @@ java_objectheader *new_nullpointerexception(void)
 
 void exceptions_throw_nullpointerexception(void)
 {
-       (void) new_nullpointerexception();
+       (void) exceptions_new_nullpointerexception();
 }
 
 
@@ -454,8 +516,8 @@ void classnotfoundexception_to_noclassdeffounderror(void)
 
 /* machine dependent stuff ****************************************************/
 
-#if defined(USE_THREADS) && defined(NATIVE_THREADS)
-threadcritnode asm_criticalsections;
+#if defined(ENABLE_THREADS)
+critical_section_node_t asm_criticalsections;
 void thread_restartcriticalsection(ucontext_t *uc) {}
 #endif
 
@@ -469,6 +531,8 @@ void print_dynamic_super_statistics(void) {}
 
 /************************ global variables **********************/
 
+#define ACC_NATIVELY_OVERLOADED    0x10000000
+
 chain *ident_chain;     /* chain with method and field names in current class */
 FILE *file = NULL;
 static u4 outputsize;
@@ -492,7 +556,7 @@ void printID(utf *u)
        char *utf_ptr = u->text;
        int i;
 
-       for (i = 0; i < utf_strlen(u); i++) 
+       for (i = 0; i < utf_get_number_of_u2s(u); i++) 
                printIDpart(utf_nextu2(&utf_ptr));
 }
 
@@ -502,7 +566,7 @@ static void addoutputsize (int len)
        u4 newsize,i;
        if (!dopadding) return;
 
-       newsize = ALIGN(outputsize, len);
+       newsize = MEMORY_ALIGN(outputsize, len);
        
        for (i = outputsize; i < newsize; i++) fprintf(file, "   u1 pad%d\n", (int) i);
        outputsize = newsize;
@@ -651,7 +715,7 @@ static void printfields(classinfo *c)
                        fprintf(file, "   ");
                        printtype(f->descriptor->text);
                        fprintf(file, " ");
-                       utf_fprint(file, f->name);
+                       utf_fprint_printable_ascii(file, f->name);
 
                        /* rename multiple fieldnames */
                        if ((ident_count = searchidentchain_utf(f->name)))
@@ -677,11 +741,11 @@ void printmethod(methodinfo *m)
 
        /* create remarks */
        fprintf(file, "\n/*\n * Class:     ");
-       utf_fprint(file, m->class->name);
+       utf_fprint_printable_ascii(file, m->class->name);
        fprintf(file, "\n * Method:    ");
-       utf_fprint(file, m->name);
+       utf_fprint_printable_ascii(file, m->name);
        fprintf(file, "\n * Signature: ");
-       utf_fprint(file, m->descriptor);
+       utf_fprint_printable_ascii(file, m->descriptor);
        fprintf(file, "\n */\n");
 
        /* create prototype */                  
@@ -695,11 +759,9 @@ void printmethod(methodinfo *m)
        fprintf(file, "_");
        printID(m->name);
 
-       /* ATTENTION: We use the methodinfo's isleafmethod variable as
-          nativelyoverloaded, so we can save some space during
-          runtime. */
+       /* ATTENTION: We use a dummy flag here. */
 
-       if (m->isleafmethod)
+       if (m->flags & ACC_NATIVELY_OVERLOADED)
                printOverloadPart(m->descriptor);
 
        fprintf(file, "(JNIEnv *env");
@@ -733,7 +795,7 @@ void gen_header_filename(char *buffer, utf *u)
 {
        s4 i;
   
-       for (i = 0; i < utf_strlen(u); i++) {
+       for (i = 0; i < utf_get_number_of_u2s(u); i++) {
                if ((u->text[i] == '/') || (u->text[i] == '$')) {
                        buffer[i] = '_';  /* convert '$' and '/' to '_' */
 
@@ -741,7 +803,7 @@ void gen_header_filename(char *buffer, utf *u)
                        buffer[i] = u->text[i];
                }
        }
-       buffer[utf_strlen(u)] = '\0';
+       buffer[utf_get_number_of_u2s(u)] = '\0';
 }
 
 
@@ -793,7 +855,7 @@ void headerfile_generate(classinfo *c, char *opt_directory)
 
        /* create structure for direct access to objects */     
        fprintf(file, "/* Structure information for class: ");
-       utf_fprint(file, c->name);
+       utf_fprint_printable_ascii(file, c->name);
        fprintf(file, " */\n\n");
        fprintf(file, "typedef struct ");
        printID(c->name);                                                       
@@ -821,11 +883,9 @@ void headerfile_generate(classinfo *c, char *opt_directory)
                if (!(m->flags & ACC_NATIVE))
                        continue;
 
-               /* We use the methodinfo's isleafmethod variable as
-                  nativelyoverloaded, so we can save some space during
-                  runtime. */
+               /* We use a dummy flag here. */
 
-               if (!m->isleafmethod) {
+               if (!(m->flags & ACC_NATIVELY_OVERLOADED)) {
                        nativelyoverloaded = false;
 
                        for (j = i + 1; j < c->methodscount; j++) {
@@ -835,13 +895,14 @@ void headerfile_generate(classinfo *c, char *opt_directory)
                                        continue;
 
                                if (m->name == m2->name) {
-                                       m2->isleafmethod = true;
-                                       nativelyoverloaded = true;
+                                       m2->flags          |= ACC_NATIVELY_OVERLOADED;
+                                       nativelyoverloaded  = true;
                                }
                        }
                }
 
-               m->isleafmethod = nativelyoverloaded;
+               if (nativelyoverloaded == true)
+                       m->flags |= ACC_NATIVELY_OVERLOADED;
        }
 
        for (i = 0; i < c->methodscount; i++) {
@@ -876,6 +937,15 @@ void print_classname(classinfo *clazz)
        }
 } 
 
+/* jvmti releated functions ************************************************/
+
+#if defined(ENABLE_JVMTI)
+void jvmti_ThreadStartEnd(int ev) {;}
+void jvmti_ClassLoadPrepare(bool prepared, classinfo *c) {;}
+void jvmti_MonitorContendedEntering(bool entered, jobject obj) {;}
+#endif
+
+
 
 /*
  * These are local overrides for various environment variables in Emacs.
@@ -888,4 +958,5 @@ void print_classname(classinfo *clazz)
  * c-basic-offset: 4
  * tab-width: 4
  * End:
+ * vim:noexpandtab:sw=4:ts=4:
  */