Merge -> trunk

[cacao.git] / src / cacaoh / dummy.c

diff --git a/src/cacaoh/dummy.c b/src/cacaoh/dummy.c
index 01340c09940dfbdfa21e612b2b6a78e1e854f3e8..900c74c936356988c5fd9ac1bda296ca05dfcc9e 100644 (file)
--- a/src/cacaoh/dummy.c
+++ b/src/cacaoh/dummy.c
@@ -1,9 +1,7 @@
 /* src/cacaoh/dummy.c - dummy functions for cacaoh
 
-   Copyright (C) 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
+   Copyright (C) 2007, 2008
+   CACAOVM - Verein zur Foerderung der freien virtuellen Maschine CACAO
 
    This file is part of CACAO.
 
@@ -28,6 +26,7 @@
 #include "config.h"
 
 #include <assert.h>
+#include <errno.h>
 #include <stdarg.h>
 #include <stdint.h>
 #include <stdio.h>
@@ -39,19 +38,22 @@
 
 #include "toolbox/logging.h"
 
+#include "vm/exceptions.h"
 #include "vm/global.h"
 #include "vm/primitive.h"
 #include "vm/vm.h"
 
 #include "vmcore/class.h"
-#include "vmcore/method.h"
-#include "vmcore/utf8.h"
 #include "vmcore/classcache.h"
 #include "vmcore/loader.h"
+#include "vmcore/method.h"
+#include "vmcore/utf8.h"
+#include "vmcore/system.h"
 
 
 /* global variables ***********************************************************/
 
+bool  vm_initializing = true;
 char *_Jv_bootclasspath;
 
 
@@ -98,7 +100,7 @@ java_handle_t *array_objectarray_element_get(java_handle_objectarray_t *a, int32
                return NULL;
        }
 
-       value = LLNI_array_direct(a, index);
+       value = LLNI_WRAP(LLNI_array_direct(a, index));
 
        return value;
 }
@@ -119,7 +121,7 @@ void array_objectarray_element_set(java_handle_objectarray_t *a, int32_t index,
                return;
        }
 
-       LLNI_array_direct(a, index) = value;
+       LLNI_array_direct(a, index) = LLNI_UNWRAP(value);
 }
 
 int32_t array_length_get(java_handle_t *a)
@@ -181,26 +183,30 @@ java_handle_t *builtin_new(classinfo *c)
 
 java_handle_objectarray_t *builtin_anewarray(int32_t size, classinfo *componentclass)
 {
-       java_handle_objectarray_t *oa = (java_handle_objectarray_t*)mem_alloc(
+       java_objectarray_t *oa = (java_objectarray_t*) mem_alloc(
                sizeof(java_array_t) + size * sizeof(java_object_t*));
+       java_handle_objectarray_t *h = (java_handle_objectarray_t*) LLNI_WRAP(
+               (java_object_t*) oa);
 
-       if (oa != NULL) {
-               LLNI_array_size(oa) = size;
+       if (h != NULL) {
+               LLNI_array_size(h) = size;
        }
 
-       return oa;
+       return h;
 }
 
 java_handle_bytearray_t *builtin_newarray_byte(int32_t size)
 {
-       java_handle_bytearray_t *ba = (java_handle_bytearray_t*)mem_alloc(
+       java_bytearray_t *ba = (java_bytearray_t*) mem_alloc(
                sizeof(java_array_t) + size * sizeof(int8_t));
+       java_handle_bytearray_t *h = (java_handle_bytearray_t*) LLNI_WRAP(
+               (java_object_t*) ba);
 
-       if (ba != NULL) {
-               LLNI_array_size(ba) = size;
+       if (h != NULL) {
+               LLNI_array_size(h) = size;
        }
        
-       return ba;
+       return h;
 }
 
 
@@ -291,7 +297,7 @@ void exceptions_throw_classformaterror(classinfo *c, const char *message, ...)
        abort();
 }
 
-void exceptions_throw_incompatibleclasschangeerror(classinfo *c)
+void exceptions_throw_incompatibleclasschangeerror(classinfo *c, const char *message)
 {
        fprintf(stderr, "java.lang.IncompatibleClassChangeError: ");
 
@@ -348,7 +354,7 @@ void exceptions_throw_noclassdeffounderror_wrong_name(classinfo *c, utf *name)
        abort();
 }
 
-void exceptions_throw_verifyerror(methodinfo *m, const char *message)
+void exceptions_throw_verifyerror(methodinfo *m, const char *message, ...)
 {
        fprintf(stderr, "java.lang.VerifyError: ");
        utf_fprint_printable_ascii(stderr, m->name);
@@ -380,21 +386,11 @@ void exceptions_throw_nosuchmethoderror(classinfo *c, utf *name, utf *desc)
        abort();
 }
 
-void exceptions_throw_unsupportedclassversionerror(classinfo *c,
-                                                                                                  const char *message, ...)
+void exceptions_throw_unsupportedclassversionerror(classinfo *c, u4 ma, u4 mi)
 {
-       va_list ap;
-
        fprintf(stderr, "java.lang.UnsupportedClassVersionError: " );
-
        utf_display_printable_ascii(c->name);
-       fprintf(stderr, ": ");
-
-       va_start(ap, message);
-       vfprintf(stderr, message, ap);
-       va_end(ap);
-
-       fputc('\n', stderr);
+       fprintf(stderr, " (Unsupported major.minor version %d.%d)\n", ma, mi);
 
        abort();
 }
@@ -482,12 +478,26 @@ void jit_invalidate_code(methodinfo *m)
 
 void llni_critical_start()
 {
-       vm_abort("llni_critical_start");
 }
 
 void llni_critical_end()
 {
-       vm_abort("llni_critical_end");
+}
+
+
+/* localref *******************************************************************/
+
+java_handle_t *localref_add(java_object_t *o)
+{
+#if defined(ENABLE_HANDLES)
+       java_handle_t *h = (java_handle_t*) mem_alloc(sizeof(java_handle_t));
+
+       h->heap_object = o;
+
+       return h;
+#else
+       return (java_handle_t*) o;
+#endif
 }
 
 
@@ -497,12 +507,12 @@ void lock_init_object_lock(java_object_t *o)
 {
 }
 
-bool lock_monitor_enter(java_object_t *o)
+bool lock_monitor_enter(java_handle_t *o)
 {
        return true;
 }
 
-bool lock_monitor_exit(java_object_t *o)
+bool lock_monitor_exit(java_handle_t *o)
 {
        return true;
 }
@@ -538,18 +548,27 @@ void mem_free(void *m, int32_t size)
        free(m);
 }
 
-void *dump_alloc(int32_t size)
+void *dumpmemory_get(size_t size)
 {
        return malloc(size);
 }
 
-void dump_release(int32_t size)
+int32_t dumpmemory_marker(void)
 {
+       return 0;
 }
 
-int32_t dump_size(void)
+void dumpmemory_release(int32_t size)
 {
-       return 0;
+}
+
+
+/* package ********************************************************************/
+
+/* void package_add(java_handle_t *packagename) */
+void package_add(utf *packagename)
+{
+       /* Do nothing. */
 }
 
 
@@ -718,15 +737,36 @@ 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 */
+       system_abort();
+}
 
-       abort();
+void vm_abort_errno(const char *text, ...)
+{
+       va_list ap;
+
+       va_start(ap, text);
+       vm_abort_errnum(errno, text, ap);
+       va_end(ap);
+}
+
+void vm_abort_errnum(int errnum, const char *text, ...)
+{
+       va_list ap;
+
+       log_start();
+
+       va_start(ap, text);
+       log_vprint(text, ap);
+       va_end(ap);
+
+       log_print(": %s", system_strerror(errnum));
+       log_finish();
+
+       system_abort();
 }
 
 java_handle_t *vm_call_method(methodinfo *m, java_handle_t *o, ...)
@@ -755,6 +795,21 @@ void print_dynamic_super_statistics(void)
 }
 
 
+#if defined(ENABLE_VMLOG)
+void vmlog_cacao_set_prefix(const char *arg)
+{
+}
+
+void vmlog_cacao_set_stringprefix(const char *arg)
+{
+}
+
+void vmlog_cacao_set_ignoreprefix(const char *arg)
+{
+}
+#endif
+
+
 /*
  * These are local overrides for various environment variables in Emacs.
  * Please do not remove this and leave it at the end of the file, where