/**
* mono_error_set_invalid_cast:
*
* System.InvalidCastException
*/
void
mono_error_set_invalid_cast (MonoError *oerror)
{
mono_error_set_generic_error (oerror, "System", "InvalidCastException", "");
}
void
mono_error_set_from_loader_error (MonoError *oerror)
{
MonoLoaderError *loader_error = mono_loader_get_last_error ();
MonoErrorInternal *error = (MonoErrorInternal*)oerror;
gboolean dup_strings = TRUE;
mono_error_prepare (error);
if (!loader_error) {
mono_error_set_generic_error (oerror, "System", "ExecutionEngineException", "Runtime tried to produce a mono-error from an empty loader-error");
return;
}
switch (loader_error->exception_type) {
case MONO_EXCEPTION_NONE:
mono_error_set_generic_error (oerror, "System", "ExecutionEngineException", "Runtime tried to produce a mono-error from a non-error loader-error");
break;
case MONO_EXCEPTION_INVALID_PROGRAM:
mono_error_set_generic_error (oerror, "System", "InvalidProgramException", "Failed for unknown reasons.");
break;
case MONO_EXCEPTION_UNVERIFIABLE_IL:
mono_error_set_generic_error (oerror, "System.Security", "VerificationException", "Failed for unknown reasons.");
break;
case MONO_EXCEPTION_MISSING_METHOD:
error->error_code = MONO_ERROR_MISSING_METHOD;
mono_error_set_type_name (oerror, loader_error->class_name);
mono_error_set_member_name (oerror, loader_error->member_name);
error->full_message = g_strdup ("Failed for unknown reasons.");
break;
case MONO_EXCEPTION_MISSING_FIELD:
mono_error_set_field_load (oerror, loader_error->klass, loader_error->member_name, "Failed for unknown reasons.");
break;
case MONO_EXCEPTION_TYPE_LOAD:
mono_error_set_type_load_name (oerror, g_strdup (loader_error->class_name), g_strdup (loader_error->assembly_name), "Failed for unknown reasons.");
dup_strings = FALSE;
break;
case MONO_EXCEPTION_FILE_NOT_FOUND:
mono_error_set_assembly_load_simple (oerror, loader_error->assembly_name, loader_error->ref_only);
break;
case MONO_EXCEPTION_METHOD_ACCESS:
mono_error_set_generic_error (oerror, "System", "MethodAccessException", "Failed for unknown reasons.");
break;
case MONO_EXCEPTION_FIELD_ACCESS:
mono_error_set_generic_error (oerror, "System", "FieldAccessException", "Failed for unknown reasons.");
break;
case MONO_EXCEPTION_OBJECT_SUPPLIED:
case MONO_EXCEPTION_GENERIC_SHARING_FAILED:
mono_error_set_generic_error (oerror, "System", "ExecutionEngineException", "Runtime tried to produce a mono-error from JIT internal error %d", loader_error->exception_type);
break;
case MONO_EXCEPTION_BAD_IMAGE:
mono_error_set_bad_image_name (oerror, "<unknown>", "%s", loader_error->msg);
break;
case MONO_EXCEPTION_OUT_OF_MEMORY:
mono_error_set_out_of_memory (oerror, "Failed for unknown reasons.");
break;
default:
mono_error_set_generic_error (oerror, "System", "ExecutionEngineException", "Runtime tried to produce an unknown loader-error %d", loader_error->exception_type);
break;
}
mono_error_dup_strings (oerror, dup_strings);
mono_loader_clear_error ();
}
/*Can fail with out-of-memory*/
MonoException*
mono_error_prepare_exception (MonoError *oerror, MonoError *error_out)
{
MonoErrorInternal *error = (MonoErrorInternal*)oerror;
MonoException* exception = NULL;
MonoString *assembly_name = NULL, *type_name = NULL, *method_name = NULL, *field_name = NULL, *msg = NULL;
MonoDomain *domain = mono_domain_get ();
mono_error_init (error_out);
switch (error->error_code) {
case MONO_ERROR_NONE:
return NULL;
case MONO_ERROR_MISSING_METHOD:
if ((error->type_name || error->exn.klass) && error->member_name) {
type_name = get_type_name_as_mono_string (error, domain, error_out);
if (!mono_error_ok (error_out))
break;
method_name = mono_string_new (domain, error->member_name);
if (!method_name) {
mono_error_set_out_of_memory (error_out, "Could not allocate method name");
break;
}
exception = mono_exception_from_name_two_strings (mono_defaults.corlib, "System", "MissingMethodException", type_name, method_name);
if (exception)
set_message_on_exception (exception, error, error_out);
} else {
exception = mono_exception_from_name_msg (mono_defaults.corlib, "System", "MissingMethodException", error->full_message);
}
break;
case MONO_ERROR_MISSING_FIELD:
if ((error->type_name || error->exn.klass) && error->member_name) {
type_name = get_type_name_as_mono_string (error, domain, error_out);
if (!mono_error_ok (error_out))
break;
field_name = mono_string_new (domain, error->member_name);
if (!field_name) {
mono_error_set_out_of_memory (error_out, "Could not allocate field name");
break;
}
exception = mono_exception_from_name_two_strings (mono_defaults.corlib, "System", "MissingFieldException", type_name, field_name);
if (exception)
set_message_on_exception (exception, error, error_out);
} else {
exception = mono_exception_from_name_msg (mono_defaults.corlib, "System", "MissingFieldException", error->full_message);
}
break;
case MONO_ERROR_TYPE_LOAD:
if (error->type_name || error->assembly_name) {
type_name = get_type_name_as_mono_string (error, domain, error_out);
if (!mono_error_ok (error_out))
break;
if (error->assembly_name) {
assembly_name = mono_string_new (domain, error->assembly_name);
if (!assembly_name) {
mono_error_set_out_of_memory (error_out, "Could not allocate assembly name");
break;
}
}
exception = mono_exception_from_name_two_strings (mono_get_corlib (), "System", "TypeLoadException", type_name, assembly_name);
if (exception)
set_message_on_exception (exception, error, error_out);
} else {
exception = mono_exception_from_name_msg (mono_defaults.corlib, "System", "TypeLoadException", error->full_message);
}
break;
case MONO_ERROR_FILE_NOT_FOUND:
case MONO_ERROR_BAD_IMAGE:
if (error->assembly_name) {
msg = mono_string_new (domain, error->full_message);
if (!msg) {
mono_error_set_out_of_memory (error_out, "Could not allocate message");
break;
}
if (error->assembly_name) {
assembly_name = mono_string_new (domain, error->assembly_name);
if (!assembly_name) {
mono_error_set_out_of_memory (error_out, "Could not allocate assembly name");
break;
}
}
if (error->error_code == MONO_ERROR_FILE_NOT_FOUND)
exception = mono_exception_from_name_two_strings (mono_get_corlib (), "System.IO", "FileNotFoundException", msg, assembly_name);
else
exception = mono_exception_from_name_two_strings (mono_defaults.corlib, "System", "BadImageFormatException", msg, assembly_name);
} else {
if (error->error_code == MONO_ERROR_FILE_NOT_FOUND)
exception = mono_exception_from_name_msg (mono_get_corlib (), "System.IO", "FileNotFoundException", error->full_message);
else
exception = mono_exception_from_name_msg (mono_defaults.corlib, "System", "BadImageFormatException", error->full_message);
}
break;
case MONO_ERROR_OUT_OF_MEMORY:
exception = mono_get_exception_out_of_memory ();
break;
case MONO_ERROR_ARGUMENT:
exception = mono_get_exception_argument (error->first_argument, error->full_message);
break;
case MONO_ERROR_NOT_VERIFIABLE: {
char *type_name = NULL, *message;
if (error->exn.klass) {
type_name = mono_type_get_full_name (error->exn.klass);
if (!type_name) {
mono_error_set_out_of_memory (error_out, "Could not allocate message");
break;
}
}
message = g_strdup_printf ("Error in %s:%s %s", type_name, error->member_name, error->full_message);
if (!message) {
g_free (type_name);
mono_error_set_out_of_memory (error_out, "Could not allocate message");
break;
}
exception = mono_exception_from_name_msg (mono_defaults.corlib, "System.Security", "VerificationException", message);
g_free (message);
g_free (type_name);
break;
}
case MONO_ERROR_GENERIC:
if (!error->exception_name_space || !error->exception_name)
mono_error_set_generic_error (error_out, "System", "ExecutionEngineException", "MonoError with generic error but no exception name was supplied");
else
exception = mono_exception_from_name_msg (mono_defaults.corlib, error->exception_name_space, error->exception_name, error->full_message);
break;
case MONO_ERROR_EXCEPTION_INSTANCE:
exception = (MonoException*) mono_gchandle_get_target (error->exn.instance_handle);
break;
default:
mono_error_set_generic_error (error_out, "System", "ExecutionEngineException", "Invalid error-code %d", error->error_code);
}
if (!mono_error_ok (error_out))
return NULL;
if (!exception)
mono_error_set_out_of_memory (error_out, "Could not allocate exception object");
return exception;
}
void
mono_error_set_from_loader_error (MonoError *oerror)
{
MonoLoaderError *loader_error = mono_loader_get_last_error ();
MonoErrorInternal *error = (MonoErrorInternal*)oerror;
mono_error_prepare (error);
if (!loader_error) {
mono_error_set_generic_error (oerror, "System", "ExecutionEngineException", "Runtime tried to produce a mono-error from an empty loader-error");
return;
}
switch (loader_error->exception_type) {
case MONO_EXCEPTION_NONE:
mono_error_set_generic_error (oerror, "System", "ExecutionEngineException", "Runtime tried to produce a mono-error from a non-error loader-error");
break;
case MONO_EXCEPTION_SECURITY_LINKDEMAND:
case MONO_EXCEPTION_SECURITY_INHERITANCEDEMAND:
mono_error_set_generic_error (oerror, "System.Security", "SecurityException", "Failed for unknown reasons.");
break;
case MONO_EXCEPTION_INVALID_PROGRAM:
mono_error_set_generic_error (oerror, "System", "InvalidProgramException", "Failed for unknown reasons.");
break;
case MONO_EXCEPTION_UNVERIFIABLE_IL:
mono_error_set_generic_error (oerror, "System.Security", "VerificationException", "Failed for unknown reasons.");
break;
case MONO_EXCEPTION_MISSING_METHOD:
error->error_code = MONO_ERROR_MISSING_METHOD;
mono_error_set_type_name (oerror, loader_error->class_name);
mono_error_set_member_name (oerror, loader_error->member_name);
g_snprintf (error->message, sizeof (error->message), "Failed for unknown reasons.");
break;
case MONO_EXCEPTION_MISSING_FIELD:
mono_error_set_field_load (oerror, loader_error->klass, loader_error->member_name, "Failed for unknown reasons.");
break;
case MONO_EXCEPTION_TYPE_LOAD:
mono_error_set_type_load_name (oerror, loader_error->class_name, loader_error->assembly_name, "Failed for unknown reasons.");
break;
case MONO_EXCEPTION_FILE_NOT_FOUND:
if (loader_error->ref_only)
mono_error_set_assembly_load (oerror, loader_error->assembly_name, "Cannot resolve dependency to assembly because it has not been preloaded. When using the ReflectionOnly APIs, dependent assemblies must be pre-loaded or loaded on demand through the ReflectionOnlyAssemblyResolve event.");
else
mono_error_set_assembly_load (oerror, loader_error->assembly_name, "Could not load file or assembly or one of its dependencies.");
break;
case MONO_EXCEPTION_METHOD_ACCESS:
mono_error_set_generic_error (oerror, "System", "MethodAccessException", "Failed for unknown reasons.");
break;
case MONO_EXCEPTION_FIELD_ACCESS:
mono_error_set_generic_error (oerror, "System", "FieldAccessException", "Failed for unknown reasons.");
break;
case MONO_EXCEPTION_OBJECT_SUPPLIED:
case MONO_EXCEPTION_GENERIC_SHARING_FAILED:
mono_error_set_generic_error (oerror, "System", "ExecutionEngineException", "Runtime tried to produce a mono-error from JIT internal error %d", loader_error->exception_type);
break;
case MONO_EXCEPTION_BAD_IMAGE:
mono_error_set_bad_image_name (oerror, "<unknown>", "%s", loader_error->msg);
break;
case MONO_EXCEPTION_OUT_OF_MEMORY:
mono_error_set_out_of_memory (oerror, "Failed for unknown reasons.");
break;
default:
mono_error_set_generic_error (oerror, "System", "ExecutionEngineException", "Runtime tried to produce an unknown loader-error %d", loader_error->exception_type);
break;
}
mono_error_dup_strings (oerror, TRUE);
mono_loader_clear_error ();
}
