*/
#include <mono/metadata/exception.h>
-#include <mono/metadata/class.h>
+#include <mono/metadata/object-internals.h>
#include <mono/metadata/appdomain.h>
#include <string.h>
mono_exception_from_name (MonoImage *image, const char *name_space,
const char *name)
{
- MonoDomain *domain = mono_domain_get ();
+ return mono_exception_from_name_domain (mono_domain_get (), image, name_space, name);
+}
+
+MonoException *
+mono_exception_from_name_domain (MonoDomain *domain, MonoImage *image,
+ const char* name_space, const char *name)
+{
MonoClass *klass;
MonoObject *o;
*
* Returns: the initialized exception instance.
*/
-static MonoException *
+MonoException *
mono_exception_from_name_two_strings (MonoImage *image, const char *name_space,
const char *name, MonoString *a1, MonoString *a2)
{
MonoClass *klass;
MonoMethod *method = NULL;
MonoObject *o;
- int i;
+ int count = 1;
gpointer args [2];
+ gpointer iter;
+ MonoMethod *m;
+
+ if (a2 != NULL)
+ count++;
klass = mono_class_from_name (image, name_space, name);
o = mono_object_new (domain, klass);
- for (i = 0; i < klass->method.count; ++i) {
+ iter = NULL;
+ while ((m = mono_class_get_methods (klass, &iter))) {
MonoMethodSignature *sig;
- if (strcmp (".ctor", klass->methods [i]->name))
+ if (strcmp (".ctor", mono_method_get_name (m)))
continue;
- sig = klass->methods [i]->signature;
- if (sig->param_count != 2)
+ sig = mono_method_signature (m);
+ if (sig->param_count != count)
continue;
- if (sig->params [0]->type != MONO_TYPE_STRING ||
- sig->params [1]->type != MONO_TYPE_STRING)
+ if (sig->params [0]->type != MONO_TYPE_STRING)
+ continue;
+ if (count == 2 && sig->params [1]->type != MONO_TYPE_STRING)
continue;
- method = klass->methods [i];
+ method = m;
}
args [0] = a1;
return (MonoException *) o;
}
+/**
+ * mono_exception_from_name_msg:
+ * @image: the Mono image where to look for the class
+ * @name_space: the namespace for the class
+ * @name: class name
+ * @msg: the message to embed inside the exception
+ *
+ * Creates an exception and initializes its message field.
+ *
+ * Returns: the initialized exception instance.
+ */
+MonoException *
+mono_exception_from_name_msg (MonoImage *image, const char *name_space,
+ const char *name, const guchar *msg)
+{
+ MonoException *ex;
+
+ ex = mono_exception_from_name (image, name_space, name);
+
+ if (msg)
+ ex->message = mono_string_new (mono_object_get_domain ((MonoObject*)ex), msg);
+
+ return ex;
+}
+
MonoException *
mono_get_exception_divide_by_zero ()
{
- return mono_exception_from_name (mono_defaults.corlib, "System",
+ return mono_exception_from_name (mono_get_corlib (), "System",
"DivideByZeroException");
}
MonoException *
mono_get_exception_security ()
{
- return mono_exception_from_name (mono_defaults.corlib, "System",
+ return mono_exception_from_name (mono_get_corlib (), "System.Security",
"SecurityException");
}
MonoException *
mono_get_exception_thread_abort ()
{
- return mono_exception_from_name (mono_defaults.corlib, "System.Threading",
+ return mono_exception_from_name (mono_get_corlib (), "System.Threading",
"ThreadAbortException");
}
MonoException *
mono_get_exception_arithmetic ()
{
- return mono_exception_from_name (mono_defaults.corlib, "System",
+ return mono_exception_from_name (mono_get_corlib (), "System",
"ArithmeticException");
}
MonoException *
mono_get_exception_overflow ()
{
- return mono_exception_from_name (mono_defaults.corlib, "System",
+ return mono_exception_from_name (mono_get_corlib (), "System",
"OverflowException");
}
MonoException *
mono_get_exception_null_reference ()
{
- return mono_exception_from_name (mono_defaults.corlib, "System",
+ return mono_exception_from_name (mono_get_corlib (), "System",
"NullReferenceException");
}
MonoException *
mono_get_exception_execution_engine (const guchar *msg)
{
- MonoException *ex;
- MonoDomain *domain;
-
- ex = mono_exception_from_name (mono_defaults.corlib, "System",
- "ExecutionEngineException");
-
- domain = ((MonoObject *)ex)->vtable->domain;
-
- if (msg)
- ex->message = mono_string_new (domain, msg);
-
- return ex;
+ return mono_exception_from_name_msg (mono_get_corlib (), "System",
+ "ExecutionEngineException", msg);
}
MonoException *
mono_get_exception_serialization (const guchar *msg)
{
- MonoException *ex;
- MonoDomain *domain;
-
- ex = mono_exception_from_name (mono_defaults.corlib, "System.Runtime.Serialization",
- "SerializationException");
-
- domain = ((MonoObject *)ex)->vtable->domain;
-
- if (msg)
- ex->message = mono_string_new (domain, msg);
-
- return ex;
+ return mono_exception_from_name_msg (mono_get_corlib (), "System.Runtime.Serialization",
+ "SerializationException", msg);
}
MonoException *
mono_get_exception_invalid_cast ()
{
- return mono_exception_from_name (mono_defaults.corlib, "System",
+ return mono_exception_from_name (mono_get_corlib (), "System",
"InvalidCastException");
}
MonoException *
mono_get_exception_index_out_of_range ()
{
- return mono_exception_from_name (mono_defaults.corlib, "System",
+ return mono_exception_from_name (mono_get_corlib (), "System",
"IndexOutOfRangeException");
}
MonoException *
mono_get_exception_array_type_mismatch ()
{
- return mono_exception_from_name (mono_defaults.corlib, "System",
+ return mono_exception_from_name (mono_get_corlib (), "System",
"ArrayTypeMismatchException");
}
MonoException *
-mono_get_exception_type_load ()
+mono_get_exception_type_load (MonoString *type_name)
{
- return mono_exception_from_name (mono_defaults.corlib, "System",
- "TypeLoadException");
+ MonoTypeLoadException *exc;
+
+ exc = (MonoTypeLoadException *) mono_exception_from_name (mono_get_corlib (),
+ "System",
+ "TypeLoadException");
+
+ exc->type_name = type_name;
+ return (MonoException *) exc;
}
MonoException *
-mono_get_exception_not_implemented ()
+mono_get_exception_not_implemented (const guchar *msg)
{
- return mono_exception_from_name (mono_defaults.corlib, "System",
- "NotImplementedException");
+ MonoException *ex;
+
+ ex = mono_exception_from_name (mono_get_corlib (), "System",
+ "NotImplementedException");
+
+ if (msg)
+ ex->message = mono_string_new (mono_object_get_domain ((MonoObject*)ex), msg);
+
+ return ex;
}
MonoException *
mono_get_exception_missing_method ()
{
- return mono_exception_from_name (mono_defaults.corlib, "System",
+ return mono_exception_from_name (mono_get_corlib (), "System",
"MissingMethodException");
}
mono_get_exception_argument_null (const guchar *arg)
{
MonoException *ex;
- MonoDomain *domain;
- ex = (MonoException *)mono_exception_from_name (
- mono_defaults.corlib, "System", "ArgumentNullException");
-
- domain = ((MonoObject *)ex)->vtable->domain;
+ ex = mono_exception_from_name (
+ mono_get_corlib (), "System", "ArgumentNullException");
if (arg)
((MonoArgumentException *)ex)->param_name =
- mono_string_new (domain, arg);
+ mono_string_new (mono_object_get_domain ((MonoObject*)ex), arg);
return ex;
}
mono_get_exception_argument (const guchar *arg, const guchar *msg)
{
MonoException *ex;
- MonoDomain *domain;
-
- ex = (MonoException *)mono_exception_from_name (
- mono_defaults.corlib, "System", "ArgumentException");
- domain = ((MonoObject *)ex)->vtable->domain;
+ ex = mono_exception_from_name_msg (
+ mono_get_corlib (), "System", "ArgumentException", msg);
- if (msg)
- ex->message = mono_string_new (domain, msg);
-
if (arg)
((MonoArgumentException *)ex)->param_name =
- mono_string_new (domain, arg);
+ mono_string_new (mono_object_get_domain ((MonoObject*)ex), arg);
return ex;
}
mono_get_exception_argument_out_of_range (const guchar *arg)
{
MonoException *ex;
- MonoDomain *domain;
-
- ex = (MonoException *)mono_exception_from_name (
- mono_defaults.corlib, "System", "ArgumentOutOfRangeException");
- domain = ((MonoObject *)ex)->vtable->domain;
+ ex = mono_exception_from_name (
+ mono_get_corlib (), "System", "ArgumentOutOfRangeException");
if (arg)
((MonoArgumentException *)ex)->param_name =
- mono_string_new (domain, arg);
+ mono_string_new (mono_object_get_domain ((MonoObject*)ex), arg);
return ex;
}
MonoException *
mono_get_exception_thread_state (const guchar *msg)
{
- MonoException *ex;
- MonoDomain *domain;
-
- ex = (MonoException *)mono_exception_from_name (
- mono_defaults.corlib, "System.Threading", "ThreadStateException");
-
- domain = ((MonoObject *)ex)->vtable->domain;
-
- if (msg)
- ex->message = mono_string_new (domain, msg);
-
- return ex;
+ return mono_exception_from_name_msg (
+ mono_get_corlib (), "System.Threading", "ThreadStateException", msg);
}
MonoException *
mono_get_exception_io (const guchar *msg)
{
- MonoException *ex;
- MonoDomain *domain;
-
- ex=(MonoException *)mono_exception_from_name (
- mono_defaults.corlib, "System.IO", "IOException");
-
- domain = ((MonoObject *)ex)->vtable->domain;
-
- ex->message=mono_string_new (domain, msg);
-
- return(ex);
+ return mono_exception_from_name_msg (
+ mono_get_corlib (), "System.IO", "IOException", msg);
}
MonoException *
mono_get_exception_file_not_found (MonoString *fname)
{
return mono_exception_from_name_two_strings (
- mono_defaults.corlib, "System.IO", "FileNotFoundException", fname, fname);
+ mono_get_corlib (), "System.IO", "FileNotFoundException", fname, fname);
}
MonoException *
gpointer args [2];
MonoObject *exc;
MonoMethod *method;
- gint i;
+ gpointer iter;
- klass = mono_class_from_name (mono_defaults.corlib, "System", "TypeInitializationException");
+ klass = mono_class_from_name (mono_get_corlib (), "System", "TypeInitializationException");
g_assert (klass);
mono_class_init (klass);
/* TypeInitializationException only has 1 ctor with 2 args */
- for (i = 0; i < klass->method.count; ++i) {
- method = klass->methods [i];
- if (!strcmp (".ctor", method->name) && method->signature->param_count == 2)
+ iter = NULL;
+ while ((method = mono_class_get_methods (klass, &iter))) {
+ if (!strcmp (".ctor", mono_method_get_name (method)) && mono_method_signature (method)->param_count == 2)
break;
method = NULL;
}
MonoException *
mono_get_exception_synchronization_lock (const guchar *msg)
{
- MonoException *ex;
- MonoDomain *domain;
-
- ex=(MonoException *)mono_exception_from_name (mono_defaults.corlib, "System.Threading", "SynchronizationLockException");
- domain=((MonoObject *)ex)->vtable->domain;
-
- if(msg) {
- ex->message=mono_string_new (domain, msg);
- }
-
- return(ex);
+ return mono_exception_from_name_msg (mono_get_corlib (), "System.Threading", "SynchronizationLockException", msg);
+}
+
+MonoException *
+mono_get_exception_cannot_unload_appdomain (const guchar *msg)
+{
+ return mono_exception_from_name_msg (mono_get_corlib (), "System", "CannotUnloadAppDomainException", msg);
+}
+
+MonoException *
+mono_get_exception_appdomain_unloaded (void)
+{
+ return mono_exception_from_name (mono_get_corlib (), "System", "AppDomainUnloadedException");
+}
+
+MonoException *
+mono_get_exception_bad_image_format (const guchar *msg)
+{
+ return mono_exception_from_name_msg (mono_get_corlib (), "System", "BadImageFormatException", msg);
+}
+
+MonoException *
+mono_get_exception_stack_overflow (void)
+{
+ return mono_exception_from_name (mono_get_corlib (), "System", "StackOverflowException");
}