+ /* convert ClassNotFoundException's to NoClassDefFoundError's */
+
+ if (builtin_instanceof(cause, class_java_lang_ClassNotFoundException)) {
+ /* clear exception, because we are calling jit code again */
+
+ *exceptionptr = NULL;
+
+ /* create new error */
+
+ xptr =
+ new_exception_javastring(string_java_lang_NoClassDefFoundError,
+ ((java_lang_Throwable *) cause)->detailMessage);
+
+ /* we had an exception while creating the error */
+
+ if (*exceptionptr)
+ return;
+
+ /* set new exception */
+
+ *exceptionptr = xptr;
+ }
+}
+
+
+/* new_internalerror ***********************************************************
+
+ Generates a java.lang.InternalError for the VM.
+
+ IN:
+ message......UTF-8 message format string
+
+ RETURN VALUE:
+ an exception pointer (in any case -- either it is the newly created
+ exception, or an exception thrown while trying to create it).
+
+*******************************************************************************/
+
+java_objectheader *new_internalerror(const char *message, ...)
+{
+ java_objectheader *o;
+ va_list ap;
+ char *msg;
+ s4 msglen;
+
+ /* calculate exception message length */
+
+ va_start(ap, message);
+ msglen = get_variable_message_length(message, ap);
+ va_end(ap);
+
+ /* allocate memory */
+
+ msg = MNEW(char, msglen);
+
+ /* generate message */
+
+ va_start(ap, message);
+ vsprintf(msg, message, ap);
+ va_end(ap);
+
+ /* create exception object */
+
+ o = new_exception_message(string_java_lang_InternalError, msg);
+
+ /* free memory */
+
+ MFREE(msg, char, msglen);
+
+ return o;
+}
+
+
+/* exceptions_new_linkageerror *************************************************
+
+ Generates a java.lang.LinkageError with an error message.
+
+ IN:
+ message......UTF-8 message
+ c............class related to the error. If this is != NULL
+ the name of c is appended to the error message.
+
+ RETURN VALUE:
+ an exception pointer (in any case -- either it is the newly created
+ exception, or an exception thrown while trying to create it).
+
+*******************************************************************************/
+
+java_objectheader *exceptions_new_linkageerror(const char *message,
+ classinfo *c)
+{
+ java_objectheader *o;
+ char *msg;
+ s4 msglen;
+
+ /* calculate exception message length */
+
+ msglen = strlen(message) + 1;
+ if (c) {
+ msglen += utf_bytes(c->name);
+ }
+
+ /* allocate memory */
+
+ msg = MNEW(char, msglen);
+
+ /* generate message */
+
+ strcpy(msg,message);
+ if (c) {
+ utf_cat_classname(msg, c->name);
+ }
+
+ o = native_new_and_init_string(class_java_lang_LinkageError,
+ javastring_new_from_utf_string(msg));
+
+ /* free memory */
+
+ MFREE(msg, char, msglen);
+
+ if (!o)
+ return *exceptionptr;
+
+ return o;
+}
+
+
+/* exceptions_new_nosuchmethoderror ********************************************
+
+ Generates a java.lang.NoSuchMethodError with an error message.
+
+ IN:
+ c............class in which the method was not found
+ name.........name of the method
+ desc.........descriptor of the method
+
+ RETURN VALUE:
+ an exception pointer (in any case -- either it is the newly created
+ exception, or an exception thrown while trying to create it).
+
+*******************************************************************************/
+
+java_objectheader *exceptions_new_nosuchmethoderror(classinfo *c,
+ utf *name, utf *desc)
+{
+ java_objectheader *o;
+ char *msg;
+ s4 msglen;
+
+ /* calculate exception message length */
+
+ msglen = utf_bytes(c->name) + strlen(".") + utf_bytes(name) +
+ utf_bytes(desc) + strlen("0");
+
+ /* allocate memory */
+
+ msg = MNEW(char, msglen);
+
+ /* generate message */
+
+ utf_copy_classname(msg, c->name);
+ strcat(msg, ".");
+ utf_cat(msg, name);
+ utf_cat(msg, desc);
+
+ o = native_new_and_init_string(class_java_lang_NoSuchMethodError,
+ javastring_new_from_utf_string(msg));
+
+ /* free memory */
+
+ MFREE(msg, char, msglen);
+
+ if (!o)
+ return *exceptionptr;
+
+ return o;
+}
+
+
+/* exceptions_throw_nosuchmethoderror ******************************************
+
+ Generates a java.lang.NoSuchMethodError with an error message.
+
+ IN:
+ c............class in which the method was not found
+ name.........name of the method
+ desc.........descriptor of the method
+
+*******************************************************************************/
+
+void exceptions_throw_nosuchmethoderror(classinfo *c, utf *name, utf *desc)
+{
+ *exceptionptr = exceptions_new_nosuchmethoderror(c, name, desc);
+}
+
+
+/* new_unsupportedclassversionerror ********************************************
+
+ Generate a java.lang.UnsupportedClassVersionError for the classloader
+
+ IN:
+ c............class in which the method was not found
+ message......UTF-8 format string
+
+ RETURN VALUE:
+ an exception pointer (in any case -- either it is the newly created
+ exception, or an exception thrown while trying to create it).
+
+*******************************************************************************/
+
+java_objectheader *new_unsupportedclassversionerror(classinfo *c, const char *message, ...)
+{
+ java_objectheader *o;
+ va_list ap;
+ char *msg;
+ s4 msglen;
+
+ /* calculate exception message length */
+
+ msglen = utf_bytes(c->name) + strlen(" (") + strlen(")") + strlen("0");
+
+ va_start(ap, message);
+ msglen += get_variable_message_length(message, ap);
+ va_end(ap);
+
+ /* allocate memory */
+
+ msg = MNEW(char, msglen);
+
+ /* generate message */
+
+ utf_copy_classname(msg, c->name);
+ strcat(msg, " (");
+
+ va_start(ap, message);
+ vsprintf(msg + strlen(msg), message, ap);
+ va_end(ap);
+
+ strcat(msg, ")");
+
+ /* create exception object */
+
+ o = new_exception_message(string_java_lang_UnsupportedClassVersionError,
+ msg);
+
+ /* free memory */
+
+ MFREE(msg, char, msglen);
+
+ return o;
+}
+
+
+/* exceptions_new_verifyerror **************************************************
+
+ Generates a java.lang.VerifyError for the JIT compiler.
+
+ IN:
+ m............method in which the error was found
+ message......UTF-8 format string
+
+ RETURN VALUE:
+ an exception pointer (in any case -- either it is the newly created
+ exception, or an exception thrown while trying to create it).
+
+*******************************************************************************/
+
+java_objectheader *exceptions_new_verifyerror(methodinfo *m,
+ const char *message, ...)
+{
+ java_objectheader *o;
+ va_list ap;
+ char *msg;
+ s4 msglen;
+
+ useinlining = false; /* at least until sure inlining works with exceptions*/
+
+ /* calculate exception message length */
+
+ msglen = 0;
+
+ if (m)
+ msglen = strlen("(class: ") + utf_bytes(m->class->name) +
+ strlen(", method: ") + utf_bytes(m->name) +
+ strlen(" signature: ") + utf_bytes(m->descriptor) +
+ strlen(") ") + strlen("0");
+
+ va_start(ap, message);
+ msglen += get_variable_message_length(message, ap);
+ va_end(ap);
+
+ /* allocate memory */
+
+ msg = MNEW(char, msglen);
+
+ /* generate message */
+
+ if (m) {
+ strcpy(msg, "(class: ");
+ utf_cat_classname(msg, m->class->name);
+ strcat(msg, ", method: ");
+ utf_cat(msg, m->name);
+ strcat(msg, " signature: ");
+ utf_cat(msg, m->descriptor);
+ strcat(msg, ") ");
+ }
+
+ va_start(ap, message);
+ vsprintf(msg + strlen(msg), message, ap);
+ va_end(ap);
+
+ /* create exception object */
+
+ o = new_exception_message(string_java_lang_VerifyError, msg);
+
+ /* free memory */
+
+ MFREE(msg, char, msglen);
+
+ return o;
+}
+
+
+/* exceptions_throw_verifyerror ************************************************
+
+ Throws a java.lang.VerifyError for the VM system.
+
+*******************************************************************************/
+
+void exceptions_throw_verifyerror(methodinfo *m, const char *message, ...)
+{
+ *exceptionptr = exceptions_new_verifyerror(m, message);
+}
+
+
+/* exceptions_throw_verifyerror_for_stack **************************************
+
+ throws a java.lang.VerifyError for an invalid stack slot type
+
+ IN:
+ m............method in which the error was found
+ type.........the expected type
+
+ RETURN VALUE:
+ an exception pointer (in any case -- either it is the newly created
+ exception, or an exception thrown while trying to create it).
+
+*******************************************************************************/
+
+void exceptions_throw_verifyerror_for_stack(methodinfo *m,int type)
+{
+ java_objectheader *o;
+ char *msg;
+ s4 msglen;
+ char *typename;
+
+ /* calculate exception message length */
+
+ msglen = 0;
+
+ if (m)
+ msglen = strlen("(class: ") + utf_bytes(m->class->name) +
+ strlen(", method: ") + utf_bytes(m->name) +
+ strlen(" signature: ") + utf_bytes(m->descriptor) +
+ strlen(") Expecting to find longest-------typename on stack")
+ + strlen("0");
+
+ /* allocate memory */
+
+ msg = MNEW(char, msglen);
+
+ /* generate message */
+
+ if (m) {
+ strcpy(msg, "(class: ");
+ utf_cat_classname(msg, m->class->name);
+ strcat(msg, ", method: ");
+ utf_cat(msg, m->name);
+ strcat(msg, " signature: ");
+ utf_cat(msg, m->descriptor);
+ strcat(msg, ") ");
+ }
+ else {
+ msg[0] = 0;
+ }
+
+ strcat(msg,"Expecting to find ");
+ switch (type) {
+ case TYPE_INT: typename = "integer"; break;
+ case TYPE_LNG: typename = "long"; break;
+ case TYPE_FLT: typename = "float"; break;
+ case TYPE_DBL: typename = "double"; break;
+ case TYPE_ADR: typename = "object/array"; break;
+ case TYPE_RET: typename = "returnAddress"; break;
+ default: typename = "<INVALID>"; assert(0); break;
+ }
+ strcat(msg, typename);
+ strcat(msg, " on stack");
+
+ /* create exception object */
+
+ o = new_exception_message(string_java_lang_VerifyError, msg);
+
+ /* free memory */
+
+ MFREE(msg, char, msglen);
+
+ *exceptionptr = o;
+}
+
+
+/* new_arithmeticexception *****************************************************
+
+ Generates a java.lang.ArithmeticException for the jit compiler.
+
+*******************************************************************************/
+
+java_objectheader *new_arithmeticexception(void)
+{
+ java_objectheader *e;
+
+ e = new_exception_message(string_java_lang_ArithmeticException,
+ string_java_lang_ArithmeticException_message);
+
+ if (!e)
+ return *exceptionptr;
+
+ return e;
+}
+
+
+/* exceptions_new_arrayindexoutofboundsexception *******************************
+
+ Generates a java.lang.ArrayIndexOutOfBoundsException for the VM
+ system.
+
+*******************************************************************************/
+
+java_objectheader *new_arrayindexoutofboundsexception(s4 index)
+{
+ java_objectheader *e;
+ methodinfo *m;
+ java_objectheader *o;
+ java_lang_String *s;
+
+ /* convert the index into a String, like Sun does */
+
+ m = class_resolveclassmethod(class_java_lang_String,
+ utf_new_char("valueOf"),
+ utf_new_char("(I)Ljava/lang/String;"),
+ class_java_lang_Object,
+ true);
+
+ if (m == NULL)
+ return *exceptionptr;
+
+ o = vm_call_method(m, NULL, index);
+
+ s = (java_lang_String *) o;
+
+ if (s == NULL)
+ return *exceptionptr;
+
+ e = new_exception_javastring(string_java_lang_ArrayIndexOutOfBoundsException,
+ s);
+
+ if (e == NULL)
+ return *exceptionptr;
+
+ return e;
+}
+
+
+/* exceptions_throw_arrayindexoutofboundsexception *****************************
+
+ Generates a java.lang.ArrayIndexOutOfBoundsException for the VM
+ system.
+
+*******************************************************************************/
+
+void exceptions_throw_arrayindexoutofboundsexception(void)
+{
+ java_objectheader *e;
+
+ e = new_exception(string_java_lang_ArrayIndexOutOfBoundsException);
+
+ if (!e)
+ return;
+
+ *exceptionptr = e;
+}
+
+
+/* exceptions_new_arraystoreexception ******************************************
+
+ Generates a java.lang.ArrayStoreException for the VM compiler.
+
+*******************************************************************************/
+
+java_objectheader *exceptions_new_arraystoreexception(void)
+{
+ java_objectheader *e;
+
+ e = new_exception(string_java_lang_ArrayStoreException);
+/* e = native_new_and_init(class_java_lang_ArrayStoreException); */
+
+ if (!e)
+ return *exceptionptr;
+
+ return e;
+}
+
+
+/* exceptions_throw_arraystoreexception ****************************************
+
+ Generates a java.lang.ArrayStoreException for the VM system and
+ throw it in the VM system.
+
+*******************************************************************************/
+
+void exceptions_throw_arraystoreexception(void)
+{
+ *exceptionptr = exceptions_new_arraystoreexception();
+}
+
+
+/* exceptions_new_classcastexception *******************************************
+
+ Generates a java.lang.ClassCastException for the JIT compiler.
+
+*******************************************************************************/
+
+java_objectheader *exceptions_new_classcastexception(java_objectheader *o)
+{
+ java_objectheader *e;
+ utf *classname;
+ java_lang_String *s;
+
+ classname = o->vftbl->class->name;
+
+ s = javastring_new(classname);
+
+ e = native_new_and_init_string(class_java_lang_ClassCastException, s);
+
+ if (e == NULL)
+ return *exceptionptr;
+
+ return e;
+}
+
+
+/* exceptions_new_illegalargumentexception *************************************
+
+ Generates a java.lang.IllegalArgumentException for the VM system.
+
+*******************************************************************************/
+
+java_objectheader *new_illegalargumentexception(void)
+{
+ java_objectheader *e;
+
+ e = native_new_and_init(class_java_lang_IllegalArgumentException);
+
+ if (!e)
+ return *exceptionptr;
+
+ return e;
+}
+
+
+/* exceptions_throw_illegalargumentexception ***********************************
+
+ Generates a java.lang.IllegalArgumentException for the VM system
+ and throw it in the VM system.
+
+*******************************************************************************/
+
+void exceptions_throw_illegalargumentexception(void)
+{
+ *exceptionptr = new_illegalargumentexception();
+}
+
+
+/* exceptions_new_illegalmonitorstateexception *********************************
+
+ Generates a java.lang.IllegalMonitorStateException for the VM
+ thread system.
+
+*******************************************************************************/
+
+java_objectheader *exceptions_new_illegalmonitorstateexception(void)
+{
+ java_objectheader *e;
+
+ e = native_new_and_init(class_java_lang_IllegalMonitorStateException);
+
+ if (e == NULL)
+ return *exceptionptr;
+
+ return e;
+}
+
+
+/* exceptions_throw_illegalmonitorstateexception *******************************
+
+ Generates a java.lang.IllegalMonitorStateException for the VM
+ system and throw it in the VM system.
+
+*******************************************************************************/
+
+void exceptions_throw_illegalmonitorstateexception(void)
+{
+ *exceptionptr = exceptions_new_illegalmonitorstateexception();
+}
+
+
+/* exceptions_new_negativearraysizeexception ***********************************
+
+ Generates a java.lang.NegativeArraySizeException for the VM system.
+
+*******************************************************************************/
+
+java_objectheader *new_negativearraysizeexception(void)
+{
+ java_objectheader *e;
+
+ e = new_exception(string_java_lang_NegativeArraySizeException);
+
+ if (!e)
+ return *exceptionptr;
+
+ return e;
+}
+
+
+/* exceptions_throw_negativearraysizeexception *********************************
+
+ Generates a java.lang.NegativeArraySizeException for the VM system.
+
+*******************************************************************************/
+
+void exceptions_throw_negativearraysizeexception(void)
+{
+ *exceptionptr = new_negativearraysizeexception();
+}
+
+
+/* exceptions_new_nullpointerexception *****************************************
+
+ Generates a java.lang.NullPointerException for the VM system.
+
+*******************************************************************************/
+
+java_objectheader *exceptions_new_nullpointerexception(void)
+{
+ java_objectheader *e;
+
+ e = native_new_and_init(class_java_lang_NullPointerException);
+
+ if (e == NULL)
+ return *exceptionptr;
+
+ return e;
+}
+
+
+/* exceptions_throw_nullpointerexception ***************************************
+
+ Generates a java.lang.NullPointerException for the VM system and
+ throw it in the VM system.
+
+*******************************************************************************/
+
+void exceptions_throw_nullpointerexception(void)
+{
+ *exceptionptr = exceptions_new_nullpointerexception();
+}
+
+
+/* exceptions_new_stringindexoutofboundsexception ******************************
+
+ Generates a java.lang.StringIndexOutOfBoundsException for the VM
+ system.
+
+*******************************************************************************/
+
+java_objectheader *exceptions_new_stringindexoutofboundsexception(void)
+{
+ java_objectheader *e;
+
+ e = new_exception(string_java_lang_StringIndexOutOfBoundsException);
+
+ if (e == NULL)
+ return *exceptionptr;
+
+ return e;
+}
+
+
+/* exceptions_throw_stringindexoutofboundsexception ****************************
+
+ Throws a java.lang.StringIndexOutOfBoundsException for the VM
+ system.
+
+*******************************************************************************/
+
+void exceptions_throw_stringindexoutofboundsexception(void)
+{
+ *exceptionptr = exceptions_new_stringindexoutofboundsexception();
+}
+
+
+/* exceptions_get_and_clear_exception ******************************************
+
+ Gets the exception pointer of the current thread and clears it.
+ This function may return NULL.
+
+*******************************************************************************/
+
+java_objectheader *exceptions_get_and_clear_exception(void)
+{
+ java_objectheader **p;
+ java_objectheader *e;
+
+ /* get the pointer of the exception pointer */
+
+ p = exceptionptr;
+
+ /* get the exception */
+
+ e = *p;
+
+ /* and clear the exception */
+
+ *p = NULL;
+
+ /* return the exception */
+
+ return e;
+}
+
+
+/* exceptions_handle_exception *************************************************
+
+ Try to find an exception handler for the given exception and return it.
+ If no handler is found, exit the monitor of the method (if any)
+ and return NULL.
+
+ IN:
+ xptr.........the exception object
+ xpc..........PC of where the exception was thrown
+ pv...........Procedure Value of the current method
+ sp...........current stack pointer
+
+ RETURN VALUE:
+ the address of the first matching exception handler, or
+ NULL if no handler was found
+
+*******************************************************************************/
+
+#if defined(ENABLE_JIT)
+u1 *exceptions_handle_exception(java_objectheader *xptr, u1 *xpc, u1 *pv, u1 *sp)
+{
+ methodinfo *m;
+ codeinfo *code;
+ s4 issync;
+ dseg_exception_entry *ex;
+ s4 exceptiontablelength;
+ s4 i;
+ classref_or_classinfo cr;
+ classinfo *c;
+#if defined(ENABLE_THREADS)
+ java_objectheader *o;
+#endif
+
+ /* get info from the method header */
+
+ code = *((codeinfo **) (pv + CodeinfoPointer));
+ issync = *((s4 *) (pv + IsSync));
+ ex = (dseg_exception_entry *) (pv + ExTableStart);
+ exceptiontablelength = *((s4 *) (pv + ExTableSize));
+
+ /* Get the methodinfo pointer from the codeinfo pointer. For
+ asm_vm_call_method the codeinfo pointer is NULL. */
+
+ m = (code == NULL) ? NULL : code->m;
+
+#if !defined(NDEBUG)
+ /* print exception trace */
+
+ if (opt_verbose || opt_verbosecall || opt_verboseexception)
+ builtin_trace_exception(xptr, m, xpc, 1);
+#endif
+
+ for (i = 0; i < exceptiontablelength; i++) {
+ /* ATTENTION: keep this here, as we need to decrement the
+ pointer before the loop executes! */
+
+ ex--;
+
+ /* If the start and end PC is NULL, this means we have the
+ special case of asm_vm_call_method. So, just return the
+ proper exception handler. */
+
+ if ((ex->startpc == NULL) && (ex->endpc == NULL))
+ return (u1 *) (ptrint) &asm_vm_call_method_exception_handler;
+
+ /* is the xpc is the current catch range */
+
+ if ((ex->startpc <= xpc) && (xpc < ex->endpc)) {
+ cr = ex->catchtype;
+
+ /* NULL catches everything */
+
+ if (cr.any == NULL) {
+#if !defined(NDEBUG)
+ /* Print stacktrace of exception when caught. */
+
+ if (opt_verboseexception) {
+ exceptions_print_exception(xptr);
+ stacktrace_print_trace(xptr);
+ }
+#endif
+
+ return ex->handlerpc;
+ }
+
+ /* resolve or load/link the exception class */
+
+ if (IS_CLASSREF(cr)) {
+ /* The exception class reference is unresolved. */
+ /* We have to do _eager_ resolving here. While the class of */
+ /* the exception object is guaranteed to be loaded, it may */
+ /* well have been loaded by a different loader than the */
+ /* defining loader of m's class, which is the one we must */
+ /* use to resolve the catch class. Thus lazy resolving */
+ /* might fail, even if the result of the resolution would */
+ /* be an already loaded class. */
+
+ c = resolve_classref_eager(cr.ref);
+
+ if (c == NULL) {
+ /* Exception resolving the exception class, argh! */
+ return NULL;
+ }
+
+ /* Ok, we resolved it. Enter it in the table, so we don't */
+ /* have to do this again. */
+ /* XXX this write should be atomic. Is it? */
+
+ ex->catchtype.cls = c;
+ } else {
+ c = cr.cls;
+
+ /* XXX I don't think this case can ever happen. -Edwin */
+ if (!(c->state & CLASS_LOADED))
+ /* use the methods' classloader */
+ if (!load_class_from_classloader(c->name,
+ m->class->classloader))
+ return NULL;
+
+ /* XXX I think, if it is not linked, we can be sure that */
+ /* the exception object is no (indirect) instance of it, no? */
+ /* -Edwin */
+ if (!(c->state & CLASS_LINKED))
+ if (!link_class(c))
+ return NULL;
+ }
+
+ /* is the thrown exception an instance of the catch class? */
+
+ if (builtin_instanceof(xptr, c)) {
+#if !defined(NDEBUG)
+ /* Print stacktrace of exception when caught. */
+
+ if (opt_verboseexception) {
+ exceptions_print_exception(xptr);
+ stacktrace_print_trace(xptr);
+ }
+#endif
+
+ return ex->handlerpc;
+ }
+ }
+ }
+
+#if defined(ENABLE_THREADS)
+ /* is this method synchronized? */
+
+ if (issync) {
+ /* get synchronization object */
+
+# if defined(__MIPS__) && (SIZEOF_VOID_P == 4)
+ /* XXX change this if we ever want to use 4-byte stackslots */
+ o = *((java_objectheader **) (sp + issync - 8));
+# else
+ o = *((java_objectheader **) (sp + issync - SIZEOF_VOID_P));
+#endif
+
+ assert(o != NULL);
+
+ lock_monitor_exit(o);
+ }
+#endif
+
+ /* none of the exceptions catch this one */
+
+ return NULL;
+}
+#endif /* defined(ENABLE_JIT) */
+
+
+/* exceptions_print_exception **************************************************
+
+ Prints an exception, the detail message and the cause, if
+ available, with CACAO internal functions to stdout.
+
+*******************************************************************************/
+
+void exceptions_print_exception(java_objectheader *xptr)
+{
+ java_lang_Throwable *t;
+ java_lang_Throwable *cause;
+ utf *u;
+
+ t = (java_lang_Throwable *) xptr;
+
+ if (t == NULL) {
+ puts("NULL\n");
+ return;
+ }
+
+ cause = t->cause;
+
+ /* print the root exception */
+
+ utf_display_printable_ascii_classname(t->header.vftbl->class->name);
+
+ if (t->detailMessage) {
+ u = javastring_toutf(t->detailMessage, false);
+
+ printf(": ");
+ utf_display_printable_ascii(u);
+ }
+
+ putc('\n', stdout);
+
+ /* print the cause if available */
+
+ if ((cause != NULL) && (cause != t)) {
+ printf("Caused by: ");
+ utf_display_printable_ascii_classname(cause->header.vftbl->class->name);
+
+ if (cause->detailMessage) {
+ u = javastring_toutf(cause->detailMessage, false);
+
+ printf(": ");
+ utf_display_printable_ascii(u);
+ }
+
+ putc('\n', stdout);
+ }