* src/vm/options.h, src/vm/method.c, src/vm/jit/inline/inline.c,
[cacao.git] / src / cacaoh / headers.c
index 6d9f1916e0f3b1612bc858d309788a32b0fb2472..1aee589588388ef0b07b8c7f7be9bf38e44a8b6d 100644 (file)
@@ -1,9 +1,9 @@
-/* headers.c - functions for header generation
+/* src/cacaoh/headers.c - functions for header generation
 
-   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, 2006, 2007 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.
+   Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+   02110-1301, USA.
 
-   Contact: cacao@complang.tuwien.ac.at
-
-   Authors: Reinhard Grafl
-
-   Changes: Mark Probst
-            Philipp Tomsich
-            Christian Thalinger
-
-   $Id: headers.c 1296 2004-07-10 17:02:15Z stefan $
+   $Id: headers.c 7228 2007-01-19 01:13:48Z edwin $
 
 */
 
 
+#include "config.h"
+
+#include <assert.h>
+#include <ctype.h>
+#include <stdarg.h>
 #include <stdlib.h>
 #include <string.h>
-#include <ctype.h>
-#include "config.h"
-#include "global.h"
-#include "tables.h"
-#include "loader.h"
-#include "options.h"
-#include "builtin.h"
-#include "mm/boehm.h"
+
+#include "vm/types.h"
+
+#if defined(ENABLE_THREADS)
+# if defined(__DARWIN__)
+#  include <signal.h>
+# endif
+# include <ucontext.h>
+#endif
+
+#include "mm/gc-common.h"
+#include "mm/memory.h"
+#include "native/include/java_lang_String.h"
+#include "native/include/java_lang_Throwable.h"
 #include "toolbox/chain.h"
-#include "toolbox/memory.h"
 #include "toolbox/logging.h"
-#include "nat/java_lang_String.h"
+#include "vm/builtin.h"
+#include "vm/class.h"
+#include "vm/global.h"
+#include "vm/method.h"
+#include "vm/loader.h"
+#include "vm/options.h"
+#include "vm/stringlocal.h"
+#include "vm/jit/asmpart.h"
 
 
-/******* replace some external functions  *********/
-functionptr native_findfunction(utf *cname, utf *mname, utf *desc, bool isstatic)
-{ return NULL; }
+/* Invocation API variables ***************************************************/
 
-java_objectheader *javastring_new(utf *text)
-{ return NULL; }
+_Jv_JavaVM *_Jv_jvm;                    /* denotes a Java VM                  */
+char       *_Jv_bootclasspath;
 
-char *javastring_tochar(java_objectheader *so) { return NULL; }
-utf *javastring_toutf(java_lang_String *string, bool isclassname)
+char       *cacao_prefix;
+char       *classpath_libdir;
+
+char       *_Jv_classpath;
+char       *_Jv_java_library_path;
+
+#if defined(ENABLE_INTRP)
+/* dummy interpreter stack to keep the compiler happy */
+
+u1 *intrp_main_stack;
+#endif
+
+
+/* for raising exceptions from native methods *********************************/
+
+#if !defined(ENABLE_THREADS)
+java_objectheader *_no_threads_exceptionptr = NULL;
+#endif
+
+
+/* replace some non-vmcore functions ******************************************/
+
+functionptr native_findfunction(utf *cname, utf *mname, utf *desc,
+                                                               bool isstatic)
+{
+       /* return something different than NULL, otherwise we get an exception */
+
+       return (functionptr) 1;
+}
+
+java_objectheader *native_new_and_init(classinfo *c) { return NULL; }
+java_objectheader *native_new_and_init_string(classinfo *c, java_lang_String *s) { return NULL; }
+java_objectheader *native_new_and_init_int(classinfo *c, s4 i) { return NULL; }
+java_objectheader *native_new_and_init_throwable(classinfo *c, java_lang_Throwable *t) { return NULL; }
+
+
+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) {}
+
+
+long compare_and_swap(volatile long *p, long oldval, long newval)
+{
+       if (*p == oldval) {
+        *p = newval;
+        return oldval;
+       }
+       else
+        return *p;
+
+       return oldval;
+}
+
+long asm_compare_and_swap(volatile long *p, long oldval, long newval)
+{
+       if (*p == oldval) {
+        *p = newval;
+        return oldval;
+       }
+       else
+        return *p;
+
+       return oldval;
+}
+
+void asm_memory_barrier(void)
+{
+}
+
+
+u1 *createcompilerstub(methodinfo *m) { return NULL; }
+#if defined(ENABLE_INTRP)
+u1 *intrp_createcompilerstub(methodinfo *m) { return NULL; }
+#endif
+
+codeinfo *codegen_createnativestub(functionptr f, methodinfo *m) { return NULL; }
+
+void removecompilerstub(u1 *stub) {}
+void removenativestub(u1 *stub) {}
+
+void asm_perform_threadswitch(u1 **from, u1 **to, u1 **stackTop) {}
+u1* asm_initialize_thread_stack(void *func, u1 *stack) { return NULL; }
+
+void *asm_switchstackandcall(void *stack, void *func, void **stacktopsave, void * p) { return NULL; }
+
+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
 
-/* some exception stuff */
+u8 asm_get_cycle_count(void)
+{
+       return 0;
+}
 
-classinfo *class_java_lang_Exception;
 
+void *Java_java_lang_VMObject_clone(void *env, void *clazz, void * this)
+{
+       return NULL;
+}
 
-char *string_java_lang_IllegalMonitorStateException =
-    "java/lang/IllegalMonitorStateException";
+typecheck_result typeinfo_is_assignable_to_class(typeinfo *value,classref_or_classinfo dest)
+{
+       return typecheck_TRUE;
+}
 
-char *string_java_lang_NegativeArraySizeException =
-    "java/lang/NegativeArraySizeException";
+void typeinfo_init_classinfo(typeinfo *info,classinfo *c)
+{
+}
 
+bool typeinfo_init_class(typeinfo *info,classref_or_classinfo c)
+{
+       return true;
+}
 
-char *string_java_lang_AbstractMethodError =
-    "java/lang/AbstractMethodError";
+void typeinfo_print(FILE *file,typeinfo *info,int indent) {}
+void typeinfo_print_short(FILE *file,typeinfo *info) {}
 
-char *string_java_lang_ClassCircularityError =
-    "java/lang/ClassCircularityError";
+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) {}
 
-char *string_java_lang_ClassFormatError =
-    "java/lang/ClassFormatError";
+void jit_invalidate_code(methodinfo *m) {}
 
-char *string_java_lang_ExceptionInInitializerError =
-    "java/lang/ExceptionInInitializerError";
 
-char *string_java_lang_IncompatibleClassChangeError =
-    "java/lang/IncompatibleClassChangeError";
+/* exception functions ********************************************************/
 
-char *string_java_lang_InternalError =
-    "java/lang/InternalError";
+/* these should not be called */
 
-char *string_java_lang_LinkageError =
-    "java/lang/LinkageError";
+void throw_main_exception_exit(void) { assert(0); }
+void throw_exception(void) { assert(0); }
+void throw_exception_exit(void) { assert(0); }
 
-char *string_java_lang_NoClassDefFoundError =
-    "java/lang/NoClassDefFoundError";
+void exceptions_throw_verifyerror(methodinfo *m, const char *message)
+{
+       assert(0);
+}
 
-char *string_java_lang_NoSuchFieldError =
-    "java/lang/NoSuchFieldError";
+java_objectheader *new_exception_throwable(const char *classname, java_lang_Throwable *throwable)
+{
+       assert(0);
 
-char *string_java_lang_NoSuchMethodError =
-       "java/lang/NoSuchMethodError";
+       /* keep compiler happy */
 
-char *string_java_lang_OutOfMemoryError =
-    "java/lang/OutOfMemoryError";
+       return NULL;
+}
 
 
-void throw_exception() {}
-void throw_exception_exit() {}
+java_objectheader *new_exception(const char *classname)
+{
+       fprintf(stderr, "%s\n", classname);
+       exit(1);
+
+       /* keep compiler happy */
+
+       return NULL;
+}
+
 
-void throw_cacao_exception_exit(char *exception, char *message)
+java_objectheader *new_exception_message(const char *classname, const char *message)
 {
-       fprintf(stderr,
-                       "Exception in thread \"main\" %s: %s\n", exception, message);
-       fflush(stderr);
+       fprintf(stderr, "%s: %s\n", classname, message);
+       exit(1);
+
+       /* keep compiler happy */
+
+       return NULL;
+}
+
+
+java_objectheader *new_exception_utfmessage(const char *classname, utf *message)
+{
+       fprintf(stderr, "%s: ", classname);
+       utf_display_printable_ascii(message);
+       fputc('\n', stderr);
 
-       /* good bye! */
        exit(1);
+
+       /* keep compiler happy */
+
+       return NULL;
 }
 
 
-void new_exception(char *classname)
+java_objectheader *new_exception_javastring(const char *classname,
+                                                                                       java_lang_String *message)
 {
-       printf("Exception in thread \"main\" %s\n", classname);
+       fprintf(stderr, "%s: ", classname);
+       /* TODO print message */
+       fputc('\n', stderr);
+
        exit(1);
+
+       /* keep compiler happy */
+
+       return NULL;
 }
 
-void new_exception_message(char *classname, char *message)
+
+void exceptions_throw_abstractmethoderror(void)
 {
-       printf("Exception in thread \"main\" %s: %s\n", classname, message);
+       fprintf(stderr, "java.lang.AbstractMethodError\n");
+
        exit(1);
 }
 
-void new_exception_throwable(char *classname, java_objectheader *t) {}
-void new_exception_utfmessage(char *classname, utf *message)
+
+java_objectheader *new_classformaterror(classinfo *c, const char *message, ...)
 {
-       printf("Exception in thread \"main\" %s: ", classname);
-       utf_display(message);
-       printf("\n");
+       va_list ap;
+
+       utf_display_printable_ascii(c->name);
+       fprintf(stderr, ": ");
+
+       va_start(ap, message);
+       vfprintf(stderr, message, ap);
+       va_end(ap);
+
+       fputc('\n', stderr);
+
        exit(1);
+
+       /* keep compiler happy */
+
+       return NULL;
 }
 
-java_objectheader *literalstring_new(utf *u) { return NULL; }  
 
+void exceptions_throw_classformaterror(classinfo *c, const char *message, ...)
+{
+       va_list ap;
 
-void literalstring_free(java_objectheader *o) {}
-void stringtable_update() { }
-void synchronize_caches() { }
-void asm_call_jit_compiler() { }
-void asm_calljavafunction() { }
-s4 asm_builtin_checkcast(java_objectheader *obj, classinfo *class) { return 0; }
+       va_start(ap, message);
+       (void) new_classformaterror(c, message, ap);
+       va_end(ap);
+}
 
-s4 asm_builtin_idiv(s4 a, s4 b) {return 0;}
-s4 asm_builtin_irem(s4 a, s4 b) {return 0;}
-s8 asm_builtin_ldiv(s8 a, s8 b) {return 0;}
-s8 asm_builtin_lrem(s8 a, s8 b) {return 0;}
 
-s4 asm_builtin_f2i(float a) { return 0; }
-s8 asm_builtin_f2l(float a) { return 0; }
-s4 asm_builtin_d2i(double a) { return 0; }
-s8 asm_builtin_d2l(double a) { return 0; }
+java_objectheader *new_classnotfoundexception(utf *name)
+{
+       fprintf(stderr, "java.lang.ClassNotFoundException: ");
+       utf_fprint_printable_ascii(stderr, name);
+       fputc('\n', stderr);
 
-void use_class_as_object() {}
-void asm_builtin_monitorenter(java_objectheader *o) {}
-void asm_builtin_monitorexit(java_objectheader *o) {}
+       exit(1);
 
-s4 asm_builtin_checkarraycast(java_objectheader *obj, vftbl_t *target) {return 0;}
+       /* keep compiler happy */
 
-#if defined(__MIPS__)
-void atomic_swap() {}
-void compare_and_swap() {}
-#endif
+       return NULL;
+}
 
 
-#if defined(__I386__)
-s4 asm_builtin_arrayinstanceof(java_objectheader *obj, classinfo *class) { return 0; }
-void asm_builtin_newarray(s4 size, vftbl_t *arrayvftbl) {}
-#endif
+java_objectheader *new_noclassdeffounderror(utf *name)
+{
+       fprintf(stderr, "java.lang.NoClassDefFoundError: ");
+       utf_fprint_printable_ascii(stderr, name);
+       fputc('\n', stderr);
 
-void asm_builtin_aastore(java_objectarray *a, s4 index, java_objectheader *o) {}
+       exit(1);
 
-u1 *createcompilerstub(methodinfo *m) {return NULL;}
-u1 *createnativestub(functionptr f, methodinfo *m) {return NULL;}
-u1 *oldcreatenativestub(functionptr f, methodinfo *m) {return NULL;}
+       /* keep compiler happy */
 
-void removecompilerstub(u1 *stub) {}
-void removenativestub(u1 *stub) {}
+       return NULL;
+}
 
-void asm_perform_threadswitch(u1 **from, u1 **to, u1 **stackTop) {}
-u1* asm_initialize_thread_stack(void *func, u1 *stack) { return NULL; }
-void thread_restartcriticalsection() {}
-void asm_switchstackandcall() {}
-void asm_handle_builtin_exception(classinfo *c) {}
-void asm_getclassvalues_atomic() {}
 
-#if defined(__DARWIN__)
-int cacao_catch_Handler() {}
-#endif
+java_objectheader *exceptions_new_linkageerror(const char *message,
+                                                                                          classinfo *c)
+{
+       fprintf(stderr, "java.lang.LinkageError: %s",message);
+       if (c) {
+               utf_fprint_printable_ascii_classname(stderr, c->name);
+       }
+       fputc('\n', stderr);
+
+       exit(1);
+
+       /* keep compiler happy */
+
+       return NULL;
+}
+
+java_objectheader *exceptions_new_nosuchmethoderror(classinfo *c,
+                                                                                                       utf *name, utf *desc)
+{
+       fprintf(stderr, "java.lang.NoSuchMethodError: ");
+       utf_fprint_printable_ascii(stderr, c->name);
+       fprintf(stderr, ".");
+       utf_fprint_printable_ascii(stderr, name);
+       utf_fprint_printable_ascii(stderr, desc);
+       fputc('\n', stderr);
 
-#if defined(USE_THREADS) && defined(NATIVE_THREADS)
-threadcritnode asm_criticalsections;
+       exit(1);
+
+       /* keep compiler happy */
+
+       return NULL;
+}
+
+
+void exceptions_throw_nosuchmethoderror(classinfo *c, utf *name, utf *desc)
+{
+       (void) exceptions_new_nosuchmethoderror(c, name, desc);
+}
+
+
+void exceptions_throw_internalerror(const char *message, ...)
+{
+       va_list ap;
+
+       fprintf(stderr, "%s: ", string_java_lang_InternalError);
+
+       va_start(ap, message);
+       vfprintf(stderr, message, ap);
+       va_end(ap);
+
+       exit(1);
+}
+
+
+void exceptions_throw_outofmemoryerror(void)
+{
+       fprintf(stderr, "%s", string_java_lang_OutOfMemoryError);
+       exit(1);
+}
+
+
+java_objectheader *new_unsupportedclassversionerror(classinfo *c, const char *message, ...)
+{
+       va_list ap;
+
+       fprintf(stderr, "%s: ", string_java_lang_UnsupportedClassVersionError);
+
+       utf_display_printable_ascii(c->name);
+       fprintf(stderr, ": ");
+
+       va_start(ap, message);
+       vfprintf(stderr, message, ap);
+       va_end(ap);
+
+       exit(1);
+
+       /* keep compiler happy */
+
+       return NULL;
+}
+
+
+void exceptions_throw_virtualmachineerror(void)
+{
+       fprintf(stderr, "%s", string_java_lang_VirtualMachineError);
+       exit(1);
+}
+
+
+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);
+
+       /* keep compiler happy */
+
+       return NULL;
+}
+
+
+java_objectheader *new_negativearraysizeexception(void)
+{
+       fprintf(stderr, "%s", string_java_lang_NegativeArraySizeException);
+       exit(1);
+
+       /* keep compiler happy */
+
+       return NULL;
+}
+
+
+void exceptions_throw_negativearraysizeexception(void)
+{
+       (void) new_negativearraysizeexception();
+}
+
+
+java_objectheader *exceptions_new_nullpointerexception(void)
+{
+       fprintf(stderr, "%s", string_java_lang_NullPointerException);
+       exit(1);
+
+       /* keep compiler happy */
+
+       return NULL;
+}
+
+
+void exceptions_throw_nullpointerexception(void)
+{
+       (void) exceptions_new_nullpointerexception();
+}
+
+
+void classnotfoundexception_to_noclassdeffounderror(void)
+{
+}
+
+/* machine dependent stuff ****************************************************/
+
+#if defined(ENABLE_THREADS)
+critical_section_node_t asm_criticalsections;
+void thread_restartcriticalsection(ucontext_t *uc) {}
 #endif
 
-java_objectheader *native_new_and_init(void *p) { return NULL; }
+void md_param_alloc(methoddesc *md) {}
+
+
+#if defined(ENABLE_INTRP)
+void print_dynamic_super_statistics(void) {}
+#endif
 
 
 /************************ global variables **********************/
 
-THREADSPECIFIC java_objectheader *_exceptionptr;
+#define ACC_NATIVELY_OVERLOADED    0x10000000
 
-chain *nativemethod_chain;              /* chain with native methods          */
-chain *nativeclass_chain;               /* chain with processed classes       */
-static chain *ident_chain; /* chain with method and field names in current class */
+chain *ident_chain;     /* chain with method and field names in current class */
 FILE *file = NULL;
 static u4 outputsize;
 static bool dopadding;
 
 
-static void printIDpart(int c) 
+static void printIDpart(int c)
 {
-       if ((c >= 'a' && c <= 'z')
-               || (c >= 'A' && c <= 'Z')
-               || (c >= '0' && c <= '9')
-               || (c == '_'))
+       if ((c >= 'a' && c <= 'z') ||
+               (c >= 'A' && c <= 'Z') ||
+               (c >= '0' && c <= '9') ||
+               (c == '_'))
                putc(c, file);
        else
                putc('_', file);
 }
 
 
-static void printID(utf *u)
+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));
 }
 
@@ -248,42 +571,46 @@ 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;
 }
 
-static void printOverloadPart(utf *desc)
+
+void printOverloadPart(utf *desc)
 {
        char *utf_ptr=desc->text;
        u2 c;
 
-       fprintf(file,"__");
-       while ((c=utf_nextu2(&utf_ptr))!=')') {
+       fprintf(file, "__");
+
+       while ((c = utf_nextu2(&utf_ptr)) != ')') {
                switch (c) {
-                       case 'I':
-                       case 'S':
-                       case 'B':
-                       case 'C':
-                       case 'Z':
-                       case 'J':
-                       case 'F':
-                       case 'D': 
-                               fprintf (file, "%c",(char)c);
-                               break;
-                       case '[':
-                               fprintf(file,"_3");
-                               break;
-                       case 'L':
-                               putc('L',file);
-                               while ( (c=utf_nextu2(&utf_ptr)) != ';')
-                                       printIDpart (c);
-                               fprintf(file,"_2");
-                               break;
-                       case '(':
-                               break;
-                       default: panic ("invalid method descriptor");
+               case 'I':
+               case 'S':
+               case 'B':
+               case 'C':
+               case 'Z':
+               case 'J':
+               case 'F':
+               case 'D': 
+                       fprintf(file, "%c", (char) c);
+                       break;
+               case '[':
+                       fprintf(file, "_3");
+                       break;
+               case 'L':
+                       putc('L', file);
+                       while ((c = utf_nextu2(&utf_ptr)) != ';')
+                               printIDpart(c);
+                       fprintf(file, "_2");
+                       break;
+               case '(':
+                       break;
+               default: 
+                       log_text("invalid method descriptor");
+                       assert(0);
                }
        }
 }
@@ -323,16 +650,18 @@ static char *printtype(char *utf_ptr)
                case 'F':  fprintf (file, "java_floatarray*"); break;
                case 'D':  fprintf (file, "java_doublearray*"); break;
                                
-               case '[':  fprintf (file, "java_objectarray*");                                        
-                       while ((c = utf_nextu2(&utf_ptr)) == '[') ;
-                       if (c=='L') 
+               case '[': fprintf(file, "java_objectarray*");
+                       while ((c = utf_nextu2(&utf_ptr)) == '[');
+                       if (c == 'L')
                                while (utf_nextu2(&utf_ptr) != ';');
                        break;
                            
-               case 'L':  fprintf (file, "java_objectarray*");
-                       while ( utf_nextu2(&utf_ptr) != ';');
+               case 'L':  fprintf(file, "java_objectarray*");
+                       while (utf_nextu2(&utf_ptr) != ';');
                        break;
-               default: panic ("invalid type descriptor");
+               default:
+                       log_text("invalid type descriptor");
+                       assert(0);
                }
                break;
                
@@ -343,7 +672,9 @@ static char *printtype(char *utf_ptr)
                fprintf (file, "*");
                break;
                                        
-       default:  panic ("Unknown type in field descriptor");
+       default:
+               log_text("Unknown type in field descriptor");
+               assert(0);
        }
        
        return utf_ptr;
@@ -380,7 +711,7 @@ static void printfields(classinfo *c)
                return;
        }
                
-       printfields(c->super);
+       printfields(c->super.cls);
        
        for (i = 0; i < c->fieldscount; i++) {
                f = &(c->fields[i]);
@@ -389,7 +720,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)))
@@ -408,7 +739,6 @@ void printmethod(methodinfo *m)
 {
        char *utf_ptr;
        u2 paramnum = 1;
-       u2 ident_count;
 
        /* search for return-type in descriptor */      
        utf_ptr = m->descriptor->text;
@@ -416,24 +746,29 @@ 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);
-       fprintf(file, "\n */\n");       
+       utf_fprint_printable_ascii(file, m->descriptor);
+       fprintf(file, "\n */\n");
 
        /* create prototype */                  
-       fprintf(file, "JNIEXPORT ");                            
+       fprintf(file, "JNIEXPORT ");
        printtype(utf_ptr);
        fprintf(file, " JNICALL Java_");
-       printID(m->class->name);           
+       printID(m->class->name);
 
-       chain_addlast(ident_chain, m->name);    
+       chain_addlast(ident_chain, m->name);
 
        fprintf(file, "_");
        printID(m->name);
-       if (m->nativelyoverloaded) printOverloadPart(m->descriptor);
+
+       /* ATTENTION: We use a dummy flag here. */
+
+       if (m->flags & ACC_NATIVELY_OVERLOADED)
+               printOverloadPart(m->descriptor);
+
        fprintf(file, "(JNIEnv *env");
        
        utf_ptr = m->descriptor->text + 1;
@@ -465,7 +800,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 '_' */
 
@@ -473,37 +808,47 @@ 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';
 }
 
 
 /* create headerfile for classes and store native methods in chain ************/
 
-void headerfile_generate(classinfo *c)
+void headerfile_generate(classinfo *c, char *opt_directory)
 {
        char header_filename[1024] = "";
        char classname[1024]; 
        char uclassname[1024];
        u2 i;
        methodinfo *m;                  
-       u2 i2;
+       u2 j;
        methodinfo *m2;
-       u2 nativelyoverloaded;                  
-                     
-       /* store class in chain */                    
-       chain_addlast(nativeclass_chain, c);
-                               
+       bool nativelyoverloaded;
+
+       /* prevent compiler warnings */
+
+       nativelyoverloaded = false;
+
        /* open headerfile for class */
        gen_header_filename(classname, c->name);
 
        /* create chain for renaming fields */
        ident_chain = chain_new();
        
-       sprintf(header_filename, "nat/%s.h", classname);
+       if (opt_directory) {
+               sprintf(header_filename, "%s/%s.h", opt_directory, classname);
+
+       } else {
+               sprintf(header_filename, "%s.h", classname);
+       }
+
        file = fopen(header_filename, "w");
-       if (!file) panic("Can not open file to store header information");
+       if (!file) {
+               log_text("Can not open file to store header information");
+               assert(0);
+       }
 
-       fprintf(file, "/* This file is machine generated, don't edit it !*/\n\n");
+       fprintf(file, "/* This file is machine generated, don't edit it*/\n\n");
 
        /* convert to uppercase */
        for (i = 0; classname[i]; i++) {
@@ -515,7 +860,7 @@ void headerfile_generate(classinfo *c)
 
        /* 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);                                                       
@@ -536,34 +881,40 @@ void headerfile_generate(classinfo *c)
        /* create method-prototypes */
                                
        /* find overloaded methods */
-       for (i = 0; i < c->methodscount; i++) {
 
+       for (i = 0; i < c->methodscount; i++) {
                m = &(c->methods[i]);
 
-               if (!(m->flags & ACC_NATIVE)) continue;
-               if (!m->nativelyoverloaded) {
-                       nativelyoverloaded=false;
-                       for (i2=i+1;i2<c->methodscount; i2++) {
-                               m2 = &(c->methods[i2]);
-                               if (!(m2->flags & ACC_NATIVE)) continue;
-                               if (m->name==m2->name) {
-                                       m2->nativelyoverloaded=true;
-                                       nativelyoverloaded=true;
+               if (!(m->flags & ACC_NATIVE))
+                       continue;
+
+               /* We use a dummy flag here. */
+
+               if (!(m->flags & ACC_NATIVELY_OVERLOADED)) {
+                       nativelyoverloaded = false;
+
+                       for (j = i + 1; j < c->methodscount; j++) {
+                               m2 = &(c->methods[j]);
+
+                               if (!(m2->flags & ACC_NATIVE))
+                                       continue;
+
+                               if (m->name == m2->name) {
+                                       m2->flags          |= ACC_NATIVELY_OVERLOADED;
+                                       nativelyoverloaded  = true;
                                }
                        }
-                       m->nativelyoverloaded=nativelyoverloaded;
                }
 
+               if (nativelyoverloaded == true)
+                       m->flags |= ACC_NATIVELY_OVERLOADED;
        }
 
        for (i = 0; i < c->methodscount; i++) {
-
                m = &(c->methods[i]);
 
-               if (m->flags & ACC_NATIVE) {
-                       chain_addlast(nativemethod_chain, m);
+               if (m->flags & ACC_NATIVE)
                        printmethod(m);
-               }
        }
 
        chain_free(ident_chain);
@@ -584,51 +935,21 @@ void print_classname(classinfo *clazz)
        u2 c;
 
     while (utf_ptr < endpos) {
-               if ((c = utf_nextu2(&utf_ptr)) == '_') {
+               if ((c = utf_nextu2(&utf_ptr)) == '_')
                        putc('$', file);
-
-               } else {
+               else
                        putc(c, file);
-               }
        }
 } 
 
+/* jvmti releated functions ************************************************/
 
-/*************** create table for locating native functions ****************/
-
-void printnativetableentry(methodinfo *m)
-{
-       fprintf(file, "   { \"");
-       print_classname(m->class);
-       fprintf(file, "\",\n     \"");
-       utf_fprint(file, m->name);
-       fprintf(file, "\",\n     \"");
-       utf_fprint(file, m->descriptor);
-       fprintf(file, "\",\n     ");
-
-       if ((m->flags & ACC_STATIC) != 0)
-               fprintf(file, "true");
-       else
-               fprintf(file, "false");
-
-       fprintf(file, ",\n     ");
-       fprintf(file, "(functionptr) Java_");
-       printID(m->class->name);
-       fprintf(file,"_");
-       printID(m->name);
-       if (m->nativelyoverloaded) printOverloadPart(m->descriptor);
-       fprintf(file,"\n   },\n");
-}
-
-
-void setVMClassField(classinfo *c)
-{
-}
-
+#if defined(ENABLE_JVMTI)
+void jvmti_ThreadStartEnd(int ev) {;}
+void jvmti_ClassLoadPrepare(bool prepared, classinfo *c) {;}
+void jvmti_MonitorContendedEntering(bool entered, jobject obj) {;}
+#endif
 
-void *Java_java_lang_VMObject_clone(void *env, void *clazz, void * this) {
-       return 0;
-}
 
 
 /*
@@ -642,4 +963,5 @@ void *Java_java_lang_VMObject_clone(void *env, void *clazz, void * this) {
  * c-basic-offset: 4
  * tab-width: 4
  * End:
+ * vim:noexpandtab:sw=4:ts=4:
  */