namespace MonoTests.System.Reflection.Emit
{
+ [TestFixture]
+ public class ModuleBuilderTest
+ {
+ static string tempDir = Path.Combine (Path.GetTempPath (), typeof (ModuleBuilderTest).FullName);
+ static int nameIndex = 0;
-[TestFixture]
-public class ModuleBuilderTest : Assertion
-{
- static string TempFolder = Path.Combine (Path.GetTempPath (), "MT.S.R.E.MBT");
-
- [SetUp]
- public void SetUp () {
- Random AutoRand = new Random ( );
- string TempPath = TempFolder;
- while (Directory.Exists (TempFolder))
- TempFolder = Path.Combine (TempPath, AutoRand.Next ().ToString());
- Directory.CreateDirectory (TempFolder);
- }
-
- [TearDown]
- public void TearDown () {
- try {
- // This throws an exception under MS.NET, since the directory contains loaded
- // assemblies.
- Directory.Delete (TempFolder, true);
- }
- catch (Exception) {
+ [SetUp]
+ public void SetUp ()
+ {
+ Random AutoRand = new Random ();
+ string basePath = tempDir;
+ while (Directory.Exists (tempDir))
+ tempDir = Path.Combine (basePath, AutoRand.Next ().ToString ());
+ Directory.CreateDirectory (tempDir);
}
- }
- [Test]
- public void TestIsTransient () {
- AssemblyName assemblyName = new AssemblyName();
- assemblyName.Name = "foo";
-
- AssemblyBuilder ab
- = Thread.GetDomain().DefineDynamicAssembly(
- assemblyName, AssemblyBuilderAccess.RunAndSave, TempFolder);
- ModuleBuilder mb1 = ab.DefineDynamicModule ("foo.dll");
- AssertEquals (true, mb1.IsTransient ());
- ModuleBuilder mb2 = ab.DefineDynamicModule ("foo2.dll", "foo2.dll");
- AssertEquals (false, mb2.IsTransient ());
- }
+ [TearDown]
+ public void TearDown ()
+ {
+ try {
+ // This throws an exception under MS.NET, since the directory contains loaded
+ // assemblies.
+ Directory.Delete (tempDir, true);
+ } catch (Exception) {
+ }
+ }
+
+ private AssemblyName genAssemblyName ()
+ {
+ AssemblyName assemblyName = new AssemblyName();
+ assemblyName.Name = typeof (ModuleBuilderTest).FullName + (nameIndex ++);
+ return assemblyName;
+ }
+
+ private AssemblyBuilder genAssembly ()
+ {
+ return Thread.GetDomain ().DefineDynamicAssembly (genAssemblyName (),
+ AssemblyBuilderAccess.RunAndSave,
+ tempDir);
+ }
+
+ [Test]
+ public void TestIsTransient ()
+ {
+ AssemblyBuilder ab = genAssembly ();
+ ModuleBuilder mb1 = ab.DefineDynamicModule ("foo.dll");
+ Assert.IsTrue (mb1.IsTransient (), "#1");
+ ModuleBuilder mb2 = ab.DefineDynamicModule ("foo2.dll", "foo2.dll");
+ Assert.IsFalse (mb2.IsTransient (), "#2");
+ }
+
+ // Some of these tests overlap with the tests for Module
- // Some of these tests overlap with the tests for Module
+ [Test]
+ public void TestGlobalData ()
+ {
+ AssemblyBuilder ab = genAssembly ();
- [Test]
- public void TestGlobalData () {
+ string resfile = Path.Combine (tempDir, "res");
+ using (StreamWriter sw = new StreamWriter (resfile)) {
+ sw.WriteLine ("FOO");
+ }
- AssemblyName assemblyName = new AssemblyName();
- assemblyName.Name = "foo";
+ ModuleBuilder mb = ab.DefineDynamicModule ("foo.dll", "foo.dll");
- AssemblyBuilder ab
- = Thread.GetDomain().DefineDynamicAssembly(
- assemblyName, AssemblyBuilderAccess.RunAndSave, TempFolder);
+ mb.DefineInitializedData ("DATA", new byte [100], FieldAttributes.Public);
+ mb.DefineInitializedData ("DATA2", new byte [100], FieldAttributes.Public);
+ mb.DefineInitializedData ("DATA3", new byte [99], FieldAttributes.Public);
+ mb.DefineUninitializedData ("DATA4", 101, FieldAttributes.Public);
+ mb.DefineInitializedData ("DATA_PRIVATE", new byte [100], 0);
+ mb.CreateGlobalFunctions ();
- string resfile = Path.Combine (TempFolder, "res");
- using (StreamWriter sw = new StreamWriter (resfile)) {
- sw.WriteLine ("FOO");
+ ab.Save ("foo.dll");
+
+ Assembly assembly = Assembly.LoadFrom (Path.Combine (tempDir, "foo.dll"));
+
+ Module module = assembly.GetLoadedModules () [0];
+
+ string [] expectedFieldNames = new string [] {
+ "DATA", "DATA2", "DATA3", "DATA4" };
+ ArrayList fieldNames = new ArrayList ();
+ foreach (FieldInfo fi in module.GetFields ()) {
+ fieldNames.Add (fi.Name);
+ }
+ AssertArrayEqualsSorted (expectedFieldNames, fieldNames.ToArray (typeof (string)));
+
+ Assert.IsNotNull (module.GetField ("DATA"), "#1");
+ Assert.IsNotNull (module.GetField ("DATA2"), "#2");
+ Assert.IsNotNull (module.GetField ("DATA3"), "#3");
+ Assert.IsNotNull (module.GetField ("DATA4"), "#4");
+ Assert.IsNull (module.GetField ("DATA_PRIVATE"), "#5");
+ Assert.IsNotNull (module.GetField ("DATA_PRIVATE", BindingFlags.NonPublic | BindingFlags.Static), "#6");
}
- ModuleBuilder mb = ab.DefineDynamicModule("foo.dll", "foo.dll");
+ [Test]
+ public void TestGlobalMethods ()
+ {
+ AssemblyBuilder builder = genAssembly ();
+ ModuleBuilder module = builder.DefineDynamicModule ("MessageModule");
+ MethodBuilder method = module.DefinePInvokeMethod ("printf", "libc.so",
+ MethodAttributes.PinvokeImpl | MethodAttributes.Static | MethodAttributes.Public,
+ CallingConventions.Standard, typeof (void), new Type [] { typeof (string) }, CallingConvention.Winapi,
+ CharSet.Auto);
+ method.SetImplementationFlags (MethodImplAttributes.PreserveSig |
+ method.GetMethodImplementationFlags ());
- mb.DefineInitializedData ("DATA", new byte [100], FieldAttributes.Public);
- mb.DefineInitializedData ("DATA2", new byte [100], FieldAttributes.Public);
- mb.DefineInitializedData ("DATA3", new byte [99], FieldAttributes.Public);
- mb.DefineUninitializedData ("DATA4", 101, FieldAttributes.Public);
- mb.DefineInitializedData ("DATA_PRIVATE", new byte [100], 0);
- mb.CreateGlobalFunctions ();
+ Assert.IsNull (module.GetMethod ("printf"), "#1");
- ab.Save ("foo.dll");
+ module.CreateGlobalFunctions ();
- Assembly assembly = Assembly.LoadFrom (Path.Combine (TempFolder, "foo.dll"));
+ Assert.IsNotNull (module.GetMethod ("printf"), "#2");
+ }
- Module module = assembly.GetLoadedModules ()[0];
+ [Test]
+ public void DefineType_Name_Null ()
+ {
+ AssemblyBuilder ab = genAssembly ();
+ ModuleBuilder mb = ab.DefineDynamicModule ("foo.dll", "foo.dll", true);
+ try {
+ mb.DefineType ((string) null);
+ Assert.Fail ("#1");
+ } catch (ArgumentNullException ex) {
+ Assert.AreEqual (typeof (ArgumentNullException), ex.GetType (), "#2");
+ Assert.IsNull (ex.InnerException, "#3");
+ Assert.IsNotNull (ex.Message, "#4");
+ Assert.AreEqual ("fullname", ex.ParamName, "#5");
+ }
+ }
- string[] expectedFieldNames = new string [] {
- "DATA", "DATA2", "DATA3", "DATA4"
- };
- ArrayList fieldNames = new ArrayList ();
- foreach (FieldInfo fi in module.GetFields ()) {
- fieldNames.Add (fi.Name);
+ [Test]
+ public void DefineType_Name_Empty ()
+ {
+ AssemblyBuilder ab = genAssembly ();
+ ModuleBuilder mb = ab.DefineDynamicModule ("foo.dll", "foo.dll", true);
+ try {
+ mb.DefineType (string.Empty);
+ Assert.Fail ("#1");
+ } catch (ArgumentException ex) {
+ // Empty name is not legal
+ Assert.AreEqual (typeof (ArgumentException), ex.GetType (), "#2");
+ Assert.IsNull (ex.InnerException, "#3");
+ Assert.IsNotNull (ex.Message, "#4");
+ Assert.AreEqual ("fullname", ex.ParamName, "#5");
+ }
}
- AssertArrayEqualsSorted (expectedFieldNames, fieldNames.ToArray (typeof (string)));
- AssertEquals (module.GetField ("DATA") != null, true);
- AssertEquals (module.GetField ("DATA2") != null, true);
- AssertEquals (module.GetField ("DATA3") != null, true);
- AssertEquals (module.GetField ("DATA4") != null, true);
- AssertEquals (module.GetField ("DATA_PRIVATE"), null);
- AssertEquals (module.GetField ("DATA_PRIVATE", BindingFlags.NonPublic | BindingFlags.Static) != null, true);
- }
+ [Test]
+ public void DefineType_Name_NullChar ()
+ {
+ AssemblyBuilder ab = genAssembly ();
+ ModuleBuilder mb = ab.DefineDynamicModule ("foo.dll", "foo.dll", true);
+ try {
+ mb.DefineType ("\0test");
+ Assert.Fail ("#1");
+ } catch (ArgumentException ex) {
+ // Illegal name
+ Assert.AreEqual (typeof (ArgumentException), ex.GetType (), "#2");
+ Assert.IsNull (ex.InnerException, "#3");
+ Assert.IsNotNull (ex.Message, "#4");
+ Assert.AreEqual ("fullname", ex.ParamName, "#5");
+ }
- [Test]
- public void TestGlobalMethods () {
- AssemblyName an = new AssemblyName();
- an.Name = "TestGlobalMethods";
- AssemblyBuilder builder =
- AppDomain.CurrentDomain.DefineDynamicAssembly(an, AssemblyBuilderAccess.Run);
- ModuleBuilder module = builder.DefineDynamicModule("MessageModule");
- MethodBuilder method = module.DefinePInvokeMethod("printf", "libc.so",
- MethodAttributes.PinvokeImpl | MethodAttributes.Static | MethodAttributes.Public,
- CallingConventions.Standard, typeof(void), new Type[]{typeof(string)}, CallingConvention.Winapi,
- CharSet.Auto);
- method.SetImplementationFlags (MethodImplAttributes.PreserveSig |
- method.GetMethodImplementationFlags());
- module.CreateGlobalFunctions();
-
- Assert (module.GetMethod ("printf") != null);
- }
+ mb.DefineType ("te\0st");
+ }
- [Test]
- public void DuplicateSymbolDocument () {
- AssemblyName assemblyName = new AssemblyName();
- assemblyName.Name = "ModuleBuilderTest.DuplicateSymbolDocument";
+ [Test]
+ public void DefineType_InterfaceNotAbstract ()
+ {
+ AssemblyBuilder ab = genAssembly ();
+ ModuleBuilder mb = ab.DefineDynamicModule ("foo.dll", "foo.dll", true);
- AssemblyBuilder ab
- = Thread.GetDomain().DefineDynamicAssembly(
- assemblyName, AssemblyBuilderAccess.RunAndSave, TempFolder);
+ try {
+ mb.DefineType ("ITest1", TypeAttributes.Interface);
+ Assert.Fail ("#A1");
+ } catch (InvalidOperationException ex) {
+ // Interface must be declared abstract
+ Assert.AreEqual (typeof (InvalidOperationException), ex.GetType (), "#A2");
+ Assert.IsNull (ex.InnerException, "#A3");
+ Assert.IsNotNull (ex.Message, "#A4");
+ }
- ModuleBuilder mb = ab.DefineDynamicModule("foo.dll", "foo.dll", true);
+ try {
+ mb.DefineType ("ITest2", TypeAttributes.Interface, (Type) null);
+ Assert.Fail ("#B1");
+ } catch (InvalidOperationException ex) {
+ // Interface must be declared abstract
+ Assert.AreEqual (typeof (InvalidOperationException), ex.GetType (), "#B2");
+ Assert.IsNull (ex.InnerException, "#B3");
+ Assert.IsNotNull (ex.Message, "#B4");
+ }
- // Check that it is possible to redefine a symbol document
- ISymbolDocumentWriter doc1 =
- mb.DefineDocument("foo.il", SymDocumentType.Text,
- SymLanguageType.ILAssembly,SymLanguageVendor.Microsoft);
- ISymbolDocumentWriter doc2 =
- mb.DefineDocument("foo.il", SymDocumentType.Text,
- SymLanguageType.ILAssembly,SymLanguageVendor.Microsoft);
- }
-
- private static void AssertArrayEqualsSorted (Array o1, Array o2) {
- Array s1 = (Array)o1.Clone ();
- Array s2 = (Array)o2.Clone ();
+ // fail on MS .NET 1.1
+#if NET_2_0
+ TypeBuilder tb = mb.DefineType ("ITest2", TypeAttributes.Interface,
+ typeof (object));
+ Assert.AreEqual (typeof (object), tb.BaseType, "#C1");
+
+ tb = mb.DefineType ("ITest3", TypeAttributes.Interface,
+ typeof (IDisposable));
+ Assert.AreEqual (typeof (IDisposable), tb.BaseType, "#D1");
+#endif
+ }
+
+ [Test]
+#if ONLY_1_1
+ [Category ("NotDotNet")] // Parent type was not extensible by the given type
+#endif
+ public void DefineType_Parent_Interface ()
+ {
+ TypeBuilder tb;
+
+ AssemblyBuilder ab = genAssembly ();
+ ModuleBuilder mb = ab.DefineDynamicModule ("foo.dll", "foo.dll", true);
+
+ tb = mb.DefineType ("Foo", TypeAttributes.Class,
+ typeof (ICollection));
+ Assert.AreEqual (typeof (ICollection), tb.BaseType, "#1");
+
+ tb = mb.DefineType ("Bar", TypeAttributes.Interface,
+ typeof (ICollection));
+ Assert.AreEqual (typeof (ICollection), tb.BaseType, "#2");
+ }
+
+ [Test]
+ [ExpectedException (typeof (ArgumentException))]
+ public void DuplicateTypeName () {
+ AssemblyBuilder ab = genAssembly ();
+ ModuleBuilder module = ab.DefineDynamicModule ("foo.dll", "foo.dll", true);
+
+ var itb = module.DefineType ("TBase", TypeAttributes.Public);
+
+ itb.SetParent (typeof(ValueType));
+
+ var ptb = module.DefineType ("TBase", TypeAttributes.Public);
+
+ ptb.SetParent (typeof(Enum));
+ }
+
+ [Test]
+ public void DuplicateSymbolDocument ()
+ {
+ AssemblyBuilder ab = genAssembly ();
+ ModuleBuilder mb = ab.DefineDynamicModule ("foo.dll", "foo.dll", true);
+
+ // Check that it is possible to redefine a symbol document
+ ISymbolDocumentWriter doc1 =
+ mb.DefineDocument ("foo.il", SymDocumentType.Text,
+ SymLanguageType.ILAssembly, SymLanguageVendor.Microsoft);
+ ISymbolDocumentWriter doc2 =
+ mb.DefineDocument ("foo.il", SymDocumentType.Text,
+ SymLanguageType.ILAssembly, SymLanguageVendor.Microsoft);
+ }
+
+ [Test] // Test case for #80435.
+ public void GetArrayMethodToStringTest ()
+ {
+ AssemblyBuilder assembly = genAssembly ();
+ ModuleBuilder module = assembly.DefineDynamicModule ("m", "test.dll");
+
+ Type [] myArrayClass = new Type [1];
+ Type [] parameterTypes = { typeof (Array) };
+ MethodInfo myMethodInfo = module.GetArrayMethod (myArrayClass.GetType (), "Sort", CallingConventions.Standard, null, parameterTypes);
+
+ string str = myMethodInfo.ToString ();
+ Assert.IsNotNull (str);
+ // Don't compare string, since MS returns System.Reflection.Emit.SymbolMethod here
+ // (they do not provide an implementation of ToString).
+ }
- Array.Sort (s1);
- Array.Sort (s2);
+ private static void AssertArrayEqualsSorted (Array o1, Array o2)
+ {
+ Array s1 = (Array) o1.Clone ();
+ Array s2 = (Array) o2.Clone ();
- AssertEquals (s1.Length, s2.Length);
- for (int i = 0; i < s1.Length; ++i)
- AssertEquals (s1.GetValue (i), s2.GetValue (i));
+ Array.Sort (s1);
+ Array.Sort (s2);
+
+ Assert.AreEqual (s1.Length, s2.Length, "#1");
+ for (int i = 0; i < s1.Length; ++i)
+ Assert.AreEqual (s1.GetValue (i), s2.GetValue (i), "#2: " + i);
+ }
+
+#if NET_2_0
+ [Test]
+ public void ResolveFieldTokenFieldBuilder ()
+ {
+ AssemblyBuilder ab = genAssembly ();
+ ModuleBuilder mb = ab.DefineDynamicModule ("foo.dll", "foo.dll");
+
+ TypeBuilder tb = mb.DefineType ("foo");
+ FieldBuilder fb = tb.DefineField ("foo", typeof (int), 0);
+ tb.CreateType ();
+
+ FieldInfo fi = mb.ResolveField (fb.GetToken ().Token);
+ Assert.IsNotNull (fi);
+ Assert.AreEqual ("foo", fi.Name);
+ }
+
+ [Test]
+ [ExpectedException (typeof (ArgumentException))]
+ public void ResolveFieldTokenInvalidToken ()
+ {
+ AssemblyBuilder ab = genAssembly ();
+ ModuleBuilder mb = ab.DefineDynamicModule ("foo.dll", "foo.dll");
+
+ mb.ResolveField (0x4001234);
+ }
+
+ [Test]
+ public void ResolveMethodTokenMethodBuilder ()
+ {
+ AssemblyBuilder ab = genAssembly ();
+ ModuleBuilder moduleb = ab.DefineDynamicModule ("foo.dll", "foo.dll");
+
+ TypeBuilder tb = moduleb.DefineType ("foo");
+ MethodBuilder mb = tb.DefineMethod("Frub", MethodAttributes.Static, null, new Type[] { typeof(IntPtr) });
+ int tok = mb.GetToken().Token;
+ mb.SetImplementationFlags(MethodImplAttributes.NoInlining);
+ ILGenerator ilgen = mb.GetILGenerator();
+ ilgen.Emit(OpCodes.Ret);
+
+ tb.CreateType ();
+
+ MethodBase mi = moduleb.ResolveMethod (tok);
+ Assert.IsNotNull (mi);
+ Assert.AreEqual ("Frub", mi.Name);
+ }
+#endif
+
+ [Test]
+ public void GetTypes ()
+ {
+ AssemblyBuilder ab = genAssembly ();
+ ModuleBuilder mb = ab.DefineDynamicModule ("foo.dll", "foo.dll");
+
+ TypeBuilder tb1 = mb.DefineType("Foo", TypeAttributes.Public);
+
+ Type[] types = mb.GetTypes ();
+ Assert.AreEqual (1, types.Length);
+ Assert.AreEqual (tb1, types [0]);
+
+ // After the type is created, MS seems to return the created type
+ tb1.CreateType ();
+
+ types = mb.GetTypes ();
+ Assert.AreEqual (tb1.CreateType (), types [0]);
+ }
+
+ [Test] // GetTypeToken (Type)
+#if NET_2_0
+ [Category ("NotDotNet")] // http://support.microsoft.com/kb/950986
+#endif
+ public void GetTypeToken2_Type_Array ()
+ {
+ Type type;
+ TypeToken typeToken;
+ Type resolved_type;
+
+ AssemblyName aname = genAssemblyName ();
+ AssemblyBuilder ab = AppDomain.CurrentDomain.DefineDynamicAssembly (
+ aname, AssemblyBuilderAccess.RunAndSave);
+ ModuleBuilder mb = ab.DefineDynamicModule ("MyModule");
+
+ type = typeof (object []);
+ typeToken = mb.GetTypeToken (type);
+#if NET_2_0
+ Assert.IsFalse (typeToken == TypeToken.Empty, "#A1");
+ resolved_type = mb.ResolveType (typeToken.Token);
+ Assert.AreEqual (type, resolved_type, "#A2");
+#else
+ Assert.IsFalse (typeToken.Token == TypeToken.Empty.Token, "#A1");
+#endif
+
+#if NET_2_0
+ type = typeof (object).MakeArrayType ();
+ typeToken = mb.GetTypeToken (type);
+ Assert.IsFalse (typeToken == TypeToken.Empty, "#B1");
+ resolved_type = mb.ResolveType (typeToken.Token);
+ Assert.AreEqual (type, resolved_type, "#B2");
+#endif
+ }
+
+ [Test] // GetTypeToken (Type)
+ public void GetTypeToken2_Type_String ()
+ {
+ AssemblyName aname = genAssemblyName ();
+ AssemblyBuilder ab = AppDomain.CurrentDomain.DefineDynamicAssembly (
+ aname, AssemblyBuilderAccess.RunAndSave);
+ ModuleBuilder mb = ab.DefineDynamicModule ("MyModule");
+ Type type = typeof (string);
+ TypeToken typeToken = mb.GetTypeToken (type);
+#if NET_2_0
+ Assert.IsFalse (typeToken == TypeToken.Empty, "#1");
+ Type resolved_type = mb.ResolveType (typeToken.Token);
+ Assert.AreEqual (type, resolved_type, "#2");
+#else
+ Assert.IsFalse (typeToken.Token == TypeToken.Empty.Token, "#1");
+#endif
+ }
+
+#if NET_2_0
+ [Test] // bug #471302
+ public void ModuleBuilder_ModuleVersionId ()
+ {
+ var name = new AssemblyName () { Name = "Foo" };
+ var assembly = AppDomain.CurrentDomain.DefineDynamicAssembly (
+ name, AssemblyBuilderAccess.Run);
+
+ var module = assembly.DefineDynamicModule ("Foo");
+
+ Assert.AreNotEqual (new Guid (), module.ModuleVersionId);
+ }
+#endif
+
+ [Test]
+ public void GetType_String_Null ()
+ {
+ AssemblyName an = genAssemblyName ();
+ AssemblyBuilder ab = AppDomain.CurrentDomain.DefineDynamicAssembly (an, AssemblyBuilderAccess.Run);
+ ModuleBuilder module = ab.DefineDynamicModule ("GetTypeNullCheck");
+
+ try {
+ module.GetType (null);
+ Assert.Fail ("Expected ArgumentNullException for GetType(string)");
+ }
+ catch (ArgumentNullException) {
+ }
+ try {
+ module.GetType (null, true); // ignoreCase
+ Assert.Fail ("Expected ArgumentNullException for GetType(string,bool)");
+ }
+ catch (ArgumentNullException) {
+ }
+ try {
+ module.GetType (null, true, true); // throwOnError, ignoreCase
+ Assert.Fail ("Expected ArgumentNullException for GetType(string,bool,bool)");
+ }
+ catch (ArgumentNullException) {
+ }
+ }
+
+ [Test]
+ public void GetType_String_Empty ()
+ {
+ AssemblyName an = genAssemblyName ();
+ AssemblyBuilder ab = AppDomain.CurrentDomain.DefineDynamicAssembly (an, AssemblyBuilderAccess.Run);
+ ModuleBuilder module = ab.DefineDynamicModule ("GetTypeEmptyCheck");
+
+ try {
+ module.GetType (String.Empty);
+ Assert.Fail ("Expected ArgumentNullException for GetType(string)");
+ }
+ catch (ArgumentException) {
+ }
+ try {
+ module.GetType (String.Empty, true); // ignoreCase
+ Assert.Fail ("Expected ArgumentNullException for GetType(string,bool)");
+ }
+ catch (ArgumentException) {
+ }
+ try {
+ module.GetType (String.Empty, true, true); // throwOnError, ignoreCase
+ Assert.Fail ("Expected ArgumentNullException for GetType(string,bool,bool)");
+ }
+ catch (ArgumentException) {
+ }
+ }
}
}
-}
-