| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734 |
- //
- // Copyright (C) 2004 Novell, Inc (http://www.novell.com)
- //
- // Permission is hereby granted, free of charge, to any person obtaining
- // a copy of this software and associated documentation files (the
- // "Software"), to deal in the Software without restriction, including
- // without limitation the rights to use, copy, modify, merge, publish,
- // distribute, sublicense, and/or sell copies of the Software, and to
- // permit persons to whom the Software is furnished to do so, subject to
- // the following conditions:
- //
- // The above copyright notice and this permission notice shall be
- // included in all copies or substantial portions of the Software.
- //
- // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
- // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
- // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
- // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
- // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
- // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
- // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
- //
- //
- // System.Reflection.Emit/ModuleBuilder.cs
- //
- // Author:
- // Paolo Molaro ([email protected])
- //
- // (C) 2001 Ximian, Inc. http://www.ximian.com
- //
- using System;
- using System.Reflection;
- using System.Collections;
- using System.Runtime.CompilerServices;
- using System.Runtime.InteropServices;
- using System.Diagnostics.SymbolStore;
- using System.IO;
- using System.Resources;
- using System.Globalization;
- namespace System.Reflection.Emit {
- #if NET_2_0
- [ComVisible (true)]
- [ClassInterfaceAttribute (ClassInterfaceType.None)]
- [ComDefaultInterfaceAttribute (typeof (_ModuleBuilder))]
- #endif
- public class ModuleBuilder : Module {
- #region Sync with reflection.h
- private IntPtr dynamic_image;
- private int num_types;
- private TypeBuilder[] types;
- private CustomAttributeBuilder[] cattrs;
- private byte[] guid;
- private int table_idx;
- internal AssemblyBuilder assemblyb;
- private MethodBuilder[] global_methods;
- private FieldBuilder[] global_fields;
- bool is_main;
- private MonoResource[] resources;
- #endregion
- private TypeBuilder global_type;
- private Type global_type_created;
- Hashtable name_cache;
- Hashtable us_string_cache = new Hashtable ();
- private int[] table_indexes;
- bool transient;
- ModuleBuilderTokenGenerator token_gen;
- ArrayList resource_writers = null;
- ISymbolWriter symbolWriter;
- [MethodImplAttribute(MethodImplOptions.InternalCall)]
- private static extern void basic_init (ModuleBuilder ab);
- internal ModuleBuilder (AssemblyBuilder assb, string name, string fullyqname, bool emitSymbolInfo, bool transient) {
- this.name = this.scopename = name;
- this.fqname = fullyqname;
- this.assembly = this.assemblyb = assb;
- this.transient = transient;
- // to keep mcs fast we do not want CryptoConfig wo be involved to create the RNG
- guid = Guid.FastNewGuidArray ();
- // guid = Guid.NewGuid().ToByteArray ();
- table_idx = get_next_table_index (this, 0x00, true);
- name_cache = new Hashtable ();
- basic_init (this);
- CreateGlobalType ();
-
- if (emitSymbolInfo) {
- Assembly asm = Assembly.LoadWithPartialName ("Mono.CompilerServices.SymbolWriter");
- Type t = asm.GetType ("Mono.CompilerServices.SymbolWriter.SymbolWriterImpl");
- if (t != null) {
- symbolWriter = (ISymbolWriter) Activator.CreateInstance (t, new object[] { this });
- string fileName = fqname;
- if (assemblyb.AssemblyDir != null)
- fileName = Path.Combine (assemblyb.AssemblyDir, fileName);
- symbolWriter.Initialize (IntPtr.Zero, fileName, true);
- }
- }
- }
- public override string FullyQualifiedName {get { return fqname;}}
- public bool IsTransient () {
- return transient;
- }
- public void CreateGlobalFunctions ()
- {
- if (global_type_created != null)
- throw new InvalidOperationException ("global methods already created");
- if (global_type != null)
- global_type_created = global_type.CreateType ();
- }
- public FieldBuilder DefineInitializedData( string name, byte[] data, FieldAttributes attributes) {
- if (data == null)
- throw new ArgumentNullException ("data");
- FieldBuilder fb = DefineUninitializedData (name, data.Length,
- attributes | FieldAttributes.HasFieldRVA);
- fb.SetRVAData (data);
- return fb;
- }
- public FieldBuilder DefineUninitializedData( string name, int size, FieldAttributes attributes) {
- if (name == null)
- throw new ArgumentNullException ("name");
- if (global_type_created != null)
- throw new InvalidOperationException ("global fields already created");
- if (global_type == null)
- global_type = new TypeBuilder (this, 0);
- string typeName = "$ArrayType$" + size;
- Type datablobtype = GetType (typeName, false, false);
- if (datablobtype == null) {
- TypeBuilder tb = DefineType (typeName,
- TypeAttributes.Public|TypeAttributes.ExplicitLayout|TypeAttributes.Sealed,
- assemblyb.corlib_value_type, null, PackingSize.Size1, size);
- tb.CreateType ();
- datablobtype = tb;
- }
- FieldBuilder fb = global_type.DefineField (name, datablobtype, attributes|FieldAttributes.Static);
- if (global_fields != null) {
- FieldBuilder[] new_fields = new FieldBuilder [global_fields.Length+1];
- System.Array.Copy (global_fields, new_fields, global_fields.Length);
- new_fields [global_fields.Length] = fb;
- global_fields = new_fields;
- } else {
- global_fields = new FieldBuilder [1];
- global_fields [0] = fb;
- }
- return fb;
- }
- private void addGlobalMethod (MethodBuilder mb) {
- if (global_methods != null) {
- MethodBuilder[] new_methods = new MethodBuilder [global_methods.Length+1];
- System.Array.Copy (global_methods, new_methods, global_methods.Length);
- new_methods [global_methods.Length] = mb;
- global_methods = new_methods;
- } else {
- global_methods = new MethodBuilder [1];
- global_methods [0] = mb;
- }
- }
- public MethodBuilder DefineGlobalMethod (string name, MethodAttributes attributes, Type returnType, Type[] parameterTypes)
- {
- return DefineGlobalMethod (name, attributes, CallingConventions.Standard, returnType, parameterTypes);
- }
- public MethodBuilder DefineGlobalMethod (string name, MethodAttributes attributes, CallingConventions callingConvention, Type returnType, Type[] parameterTypes) {
- return DefineGlobalMethod (name, attributes, callingConvention, returnType, null, null, parameterTypes, null, null);
- }
- #if NET_2_0 || BOOTSTRAP_NET_2_0
- public
- #else
- internal
- #endif
- MethodBuilder DefineGlobalMethod (string name, MethodAttributes attributes, CallingConventions callingConvention, Type returnType, Type[] requiredReturnTypeCustomModifiers, Type[] optionalReturnTypeCustomModifiers, Type[] parameterTypes, Type[][] requiredParameterTypeCustomModifiers, Type[][] optionalParameterTypeCustomModifiers)
- {
- if (name == null)
- throw new ArgumentNullException ("name");
- if ((attributes & MethodAttributes.Static) == 0)
- throw new ArgumentException ("global methods must be static");
- if (global_type_created != null)
- throw new InvalidOperationException ("global methods already created");
- if (global_type == null)
- global_type = new TypeBuilder (this, 0);
- MethodBuilder mb = global_type.DefineMethod (name, attributes, callingConvention, returnType, requiredReturnTypeCustomModifiers, optionalReturnTypeCustomModifiers, parameterTypes, requiredParameterTypeCustomModifiers, optionalParameterTypeCustomModifiers);
- addGlobalMethod (mb);
- return mb;
- }
- public MethodBuilder DefinePInvokeMethod (string name, string dllName, MethodAttributes attributes, CallingConventions callingConvention, Type returnType, Type[] parameterTypes, CallingConvention nativeCallConv, CharSet nativeCharSet) {
- return DefinePInvokeMethod (name, dllName, name, attributes, callingConvention, returnType, parameterTypes, nativeCallConv, nativeCharSet);
- }
- public MethodBuilder DefinePInvokeMethod (string name, string dllName, string entryName, MethodAttributes attributes, CallingConventions callingConvention, Type returnType, Type[] parameterTypes, CallingConvention nativeCallConv, CharSet nativeCharSet) {
- if (name == null)
- throw new ArgumentNullException ("name");
- if ((attributes & MethodAttributes.Static) == 0)
- throw new ArgumentException ("global methods must be static");
- if (global_type_created != null)
- throw new InvalidOperationException ("global methods already created");
- if (global_type == null)
- global_type = new TypeBuilder (this, 0);
- MethodBuilder mb = global_type.DefinePInvokeMethod (name, dllName, entryName, attributes, callingConvention, returnType, parameterTypes, nativeCallConv, nativeCharSet);
- addGlobalMethod (mb);
- return mb;
- }
- public TypeBuilder DefineType (string name) {
- return DefineType (name, 0);
- }
- public TypeBuilder DefineType (string name, TypeAttributes attr) {
- if ((attr & TypeAttributes.Interface) != 0)
- return DefineType (name, attr, null, null);
- return DefineType (name, attr, typeof(object), null);
- }
- public TypeBuilder DefineType (string name, TypeAttributes attr, Type parent) {
- return DefineType (name, attr, parent, null);
- }
- private void AddType (TypeBuilder tb)
- {
- if (types != null) {
- if (types.Length == num_types) {
- TypeBuilder[] new_types = new TypeBuilder [types.Length * 2];
- System.Array.Copy (types, new_types, num_types);
- types = new_types;
- }
- } else {
- types = new TypeBuilder [1];
- }
- types [num_types] = tb;
- num_types ++;
- }
- private TypeBuilder DefineType (string name, TypeAttributes attr, Type parent, Type[] interfaces, PackingSize packsize, int typesize) {
- if (name_cache.Contains (name))
- throw new ArgumentException ("Duplicate type name within an assembly.");
- TypeBuilder res = new TypeBuilder (this, name, attr, parent, interfaces, packsize, typesize, null);
- AddType (res);
- name_cache.Add (name, res);
- return res;
- }
- internal void RegisterTypeName (TypeBuilder tb, string name) {
- name_cache.Add (name, tb);
- }
- #if NET_2_0
- [ComVisible (true)]
- #endif
- public TypeBuilder DefineType (string name, TypeAttributes attr, Type parent, Type[] interfaces) {
- return DefineType (name, attr, parent, interfaces, PackingSize.Unspecified, TypeBuilder.UnspecifiedTypeSize);
- }
- public TypeBuilder DefineType (string name, TypeAttributes attr, Type parent, int typesize) {
- return DefineType (name, attr, parent, null, PackingSize.Unspecified, TypeBuilder.UnspecifiedTypeSize);
- }
- public TypeBuilder DefineType (string name, TypeAttributes attr, Type parent, PackingSize packsize) {
- return DefineType (name, attr, parent, null, packsize, TypeBuilder.UnspecifiedTypeSize);
- }
- public TypeBuilder DefineType (string name, TypeAttributes attr, Type parent, PackingSize packsize, int typesize) {
- return DefineType (name, attr, parent, null, packsize, typesize);
- }
- public MethodInfo GetArrayMethod( Type arrayClass, string methodName, CallingConventions callingConvention, Type returnType, Type[] parameterTypes) {
- return new MonoArrayMethod (arrayClass, methodName, callingConvention, returnType, parameterTypes);
- }
- public EnumBuilder DefineEnum( string name, TypeAttributes visibility, Type underlyingType) {
- if (name_cache.Contains (name))
- throw new ArgumentException ("Duplicate type name within an assembly.");
- EnumBuilder eb = new EnumBuilder (this, name, visibility, underlyingType);
- TypeBuilder res = eb.GetTypeBuilder ();
- AddType (res);
- name_cache.Add (name, res);
- return eb;
- }
- #if NET_2_0
- [ComVisible (true)]
- #endif
- public override Type GetType( string className) {
- return GetType (className, false, false);
- }
-
- #if NET_2_0
- [ComVisible (true)]
- #endif
- public override Type GetType( string className, bool ignoreCase) {
- return GetType (className, false, ignoreCase);
- }
- private TypeBuilder search_in_array (TypeBuilder[] arr, int validElementsInArray, string className) {
- int i;
- for (i = 0; i < validElementsInArray; ++i) {
- if (String.Compare (className, arr [i].FullName, true, CultureInfo.InvariantCulture) == 0) {
- return arr [i];
- }
- }
- return null;
- }
- private TypeBuilder search_nested_in_array (TypeBuilder[] arr, int validElementsInArray, string className) {
- int i;
- for (i = 0; i < validElementsInArray; ++i) {
- if (String.Compare (className, arr [i].Name, true, CultureInfo.InvariantCulture) == 0)
- return arr [i];
- }
- return null;
- }
- [MethodImplAttribute(MethodImplOptions.InternalCall)]
- private static extern Type create_modified_type (TypeBuilder tb, string modifiers);
- static readonly char [] type_modifiers = {'&', '[', '*'};
- private TypeBuilder GetMaybeNested (TypeBuilder t, string className) {
- int subt;
- string pname, rname;
- subt = className.IndexOf ('+');
- if (subt < 0) {
- if (t.subtypes != null)
- return search_nested_in_array (t.subtypes, t.subtypes.Length, className);
- return null;
- }
- if (t.subtypes != null) {
- pname = className.Substring (0, subt);
- rname = className.Substring (subt + 1);
- TypeBuilder result = search_nested_in_array (t.subtypes, t.subtypes.Length, pname);
- if (result != null)
- return GetMaybeNested (result, rname);
- }
- return null;
- }
- #if NET_2_0
- [ComVisible (true)]
- #endif
- public override Type GetType (string className, bool throwOnError, bool ignoreCase) {
- int subt;
- string orig = className;
- string modifiers;
- TypeBuilder result = null;
- if (types == null && throwOnError)
- throw new TypeLoadException (className);
- subt = className.IndexOfAny (type_modifiers);
- if (subt >= 0) {
- modifiers = className.Substring (subt);
- className = className.Substring (0, subt);
- } else
- modifiers = null;
- if (!ignoreCase) {
- result = name_cache [className] as TypeBuilder;
- } else {
- subt = className.IndexOf ('+');
- if (subt < 0) {
- if (types != null)
- result = search_in_array (types, num_types, className);
- } else {
- string pname, rname;
- pname = className.Substring (0, subt);
- rname = className.Substring (subt + 1);
- result = search_in_array (types, num_types, pname);
- if (result != null)
- result = GetMaybeNested (result, rname);
- }
- }
- if ((result == null) && throwOnError)
- throw new TypeLoadException (orig);
- if (result != null && (modifiers != null))
- return create_modified_type (result, modifiers);
- return result;
- }
- internal int get_next_table_index (object obj, int table, bool inc) {
- if (table_indexes == null) {
- table_indexes = new int [64];
- for (int i=0; i < 64; ++i)
- table_indexes [i] = 1;
- /* allow room for .<Module> in TypeDef table */
- table_indexes [0x02] = 2;
- }
- // Console.WriteLine ("getindex for table "+table.ToString()+" got "+table_indexes [table].ToString());
- if (inc)
- return table_indexes [table]++;
- return table_indexes [table];
- }
- public void SetCustomAttribute( CustomAttributeBuilder customBuilder) {
- if (cattrs != null) {
- CustomAttributeBuilder[] new_array = new CustomAttributeBuilder [cattrs.Length + 1];
- cattrs.CopyTo (new_array, 0);
- new_array [cattrs.Length] = customBuilder;
- cattrs = new_array;
- } else {
- cattrs = new CustomAttributeBuilder [1];
- cattrs [0] = customBuilder;
- }
- }
- #if NET_2_0
- [ComVisible (true)]
- #endif
- public void SetCustomAttribute( ConstructorInfo con, byte[] binaryAttribute) {
- SetCustomAttribute (new CustomAttributeBuilder (con, binaryAttribute));
- }
- public ISymbolWriter GetSymWriter () {
- return symbolWriter;
- }
- public ISymbolDocumentWriter DefineDocument (string url, Guid language, Guid languageVendor, Guid documentType)
- {
- if (symbolWriter != null)
- return symbolWriter.DefineDocument (url, language, languageVendor, documentType);
- else
- return null;
- }
- public override Type [] GetTypes ()
- {
- if (types == null)
- return new TypeBuilder [0];
- int n = num_types;
- TypeBuilder [] copy = new TypeBuilder [n];
- Array.Copy (types, copy, n);
- return copy;
- }
- public IResourceWriter DefineResource (string name, string description, ResourceAttributes attribute)
- {
- if (name == null)
- throw new ArgumentNullException ("name");
- if (name == String.Empty)
- throw new ArgumentException ("name cannot be empty");
- if (transient)
- throw new InvalidOperationException ("The module is transient");
- if (!assemblyb.IsSave)
- throw new InvalidOperationException ("The assembly is transient");
- ResourceWriter writer = new ResourceWriter (new MemoryStream ());
- if (resource_writers == null)
- resource_writers = new ArrayList ();
- resource_writers.Add (writer);
- // The data is filled out later
- if (resources != null) {
- MonoResource[] new_r = new MonoResource [resources.Length + 1];
- System.Array.Copy(resources, new_r, resources.Length);
- resources = new_r;
- } else {
- resources = new MonoResource [1];
- }
- int p = resources.Length - 1;
- resources [p].name = name;
- resources [p].attrs = attribute;
- return writer;
- }
- public IResourceWriter DefineResource (string name, string description)
- {
- return DefineResource (name, description, ResourceAttributes.Public);
- }
- [MonoTODO]
- public void DefineUnmanagedResource (byte[] resource)
- {
- if (resource == null)
- throw new ArgumentNullException ("resource");
- throw new NotImplementedException ();
- }
- [MonoTODO]
- public void DefineUnmanagedResource (string resourceFileName)
- {
- if (resourceFileName == null)
- throw new ArgumentNullException ("resourceFileName");
- if (resourceFileName == String.Empty)
- throw new ArgumentException ("resourceFileName");
- if (!File.Exists (resourceFileName) || Directory.Exists (resourceFileName))
- throw new FileNotFoundException ("File '" + resourceFileName + "' does not exists or is a directory.");
- throw new NotImplementedException ();
- }
- [MonoTODO]
- public void SetSymCustomAttribute (string name, byte[] data)
- {
- throw new NotImplementedException ();
- }
- [MonoTODO]
- public void SetUserEntryPoint (MethodInfo entryPoint)
- {
- if (entryPoint == null)
- throw new ArgumentNullException ("entryPoint");
- if (entryPoint.DeclaringType.Module != this)
- throw new InvalidOperationException ("entryPoint is not contained in this module");
- throw new NotImplementedException ();
- }
- public MethodToken GetMethodToken (MethodInfo method)
- {
- if (method == null)
- throw new ArgumentNullException ("method");
- if (method.DeclaringType.Module != this)
- throw new InvalidOperationException ("The method is not in this module");
- return new MethodToken (GetToken (method));
- }
- public MethodToken GetArrayMethodToken (Type arrayClass, string methodName, CallingConventions callingConvention, Type returnType, Type[] parameterTypes)
- {
- return GetMethodToken (GetArrayMethod (arrayClass, methodName, callingConvention, returnType, parameterTypes));
- }
- #if NET_2_0
- [ComVisible (true)]
- #endif
- public MethodToken GetConstructorToken (ConstructorInfo con)
- {
- if (con == null)
- throw new ArgumentNullException ("con");
- return new MethodToken (GetToken (con));
- }
- public FieldToken GetFieldToken (FieldInfo field)
- {
- if (field == null)
- throw new ArgumentNullException ("field");
- if (field.DeclaringType.Module != this)
- throw new InvalidOperationException ("The method is not in this module");
- return new FieldToken (GetToken (field));
- }
- [MonoTODO]
- public SignatureToken GetSignatureToken (byte[] sigBytes, int sigLength)
- {
- throw new NotImplementedException ();
- }
- public SignatureToken GetSignatureToken (SignatureHelper sigHelper)
- {
- if (sigHelper == null)
- throw new ArgumentNullException ("sigHelper");
- return new SignatureToken (GetToken (sigHelper));
- }
- public StringToken GetStringConstant (string str)
- {
- if (str == null)
- throw new ArgumentNullException ("str");
- return new StringToken (GetToken (str));
- }
- public TypeToken GetTypeToken (Type type)
- {
- if (type == null)
- throw new ArgumentNullException ("type");
- if (type.IsByRef)
- throw new ArgumentException ("type can't be a byref type", "type");
- if (!IsTransient () && (type.Module is ModuleBuilder) && ((ModuleBuilder)type.Module).IsTransient ())
- throw new InvalidOperationException ("a non-transient module can't reference a transient module");
- return new TypeToken (GetToken (type));
- }
- public TypeToken GetTypeToken (string type)
- {
- return GetTypeToken (GetType (name));
- }
- [MethodImplAttribute(MethodImplOptions.InternalCall)]
- private static extern int getUSIndex (ModuleBuilder mb, string str);
- [MethodImplAttribute(MethodImplOptions.InternalCall)]
- private static extern int getToken (ModuleBuilder mb, object obj);
- [MethodImplAttribute(MethodImplOptions.InternalCall)]
- private static extern int getMethodToken (ModuleBuilder mb, MethodInfo method,
- Type[] opt_param_types);
- internal int GetToken (string str) {
- if (us_string_cache.Contains (str))
- return (int)us_string_cache [str];
- int result = getUSIndex (this, str);
- us_string_cache [str] = result;
- return result;
- }
- internal int GetToken (MemberInfo member) {
- return getToken (this, member);
- }
- internal int GetToken (MethodInfo method, Type[] opt_param_types) {
- return getMethodToken (this, method, opt_param_types);
- }
- internal int GetToken (SignatureHelper helper) {
- return getToken (this, helper);
- }
- internal TokenGenerator GetTokenGenerator () {
- if (token_gen == null)
- token_gen = new ModuleBuilderTokenGenerator (this);
- return token_gen;
- }
- [MethodImplAttribute(MethodImplOptions.InternalCall)]
- private static extern void build_metadata (ModuleBuilder mb);
- [MethodImplAttribute(MethodImplOptions.InternalCall)]
- private extern void WriteToFile (IntPtr handle);
- internal void Save ()
- {
- if (transient && !is_main)
- return;
- if (types != null) {
- for (int i = 0; i < num_types; ++i)
- if (!types [i].is_created)
- throw new NotSupportedException ("Type '" + types [i].FullName + "' was not completed.");
- }
- if ((global_type != null) && (global_type_created == null))
- global_type_created = global_type.CreateType ();
- if (resource_writers != null) {
- for (int i = 0; i < resource_writers.Count; ++i) {
- ResourceWriter writer = (ResourceWriter)resource_writers [i];
- writer.Generate ();
- MemoryStream stream = (MemoryStream)writer.Stream;
- resources [i].data = new byte [stream.Length];
- stream.Seek (0, SeekOrigin.Begin);
- stream.Read (resources [i].data, 0, (int)stream.Length);
- }
- }
- build_metadata (this);
- string fileName = fqname;
- if (assemblyb.AssemblyDir != null)
- fileName = Path.Combine (assemblyb.AssemblyDir, fileName);
-
- using (FileStream file = new FileStream (fileName, FileMode.Create, FileAccess.Write))
- WriteToFile (file.Handle);
-
- //
- // The constant 0x80000000 is internal to Mono, it means `make executable'
- //
- File.SetAttributes (fileName, (FileAttributes) (unchecked ((int) 0x80000000)));
-
- if (types != null && symbolWriter != null) {
- for (int i = 0; i < num_types; ++i)
- types [i].GenerateDebugInfo (symbolWriter);
- symbolWriter.Close ();
- }
- }
- internal string FileName {
- get {
- return fqname;
- }
- }
- internal bool IsMain {
- set {
- is_main = value;
- }
- }
- internal void CreateGlobalType () {
- if (global_type == null)
- global_type = new TypeBuilder (this, 0);
- }
- internal static Guid Mono_GetGuid (ModuleBuilder mb)
- {
- return new Guid (mb.guid);
- }
- }
- internal class ModuleBuilderTokenGenerator : TokenGenerator {
- private ModuleBuilder mb;
- public ModuleBuilderTokenGenerator (ModuleBuilder mb) {
- this.mb = mb;
- }
- public int GetToken (string str) {
- return mb.GetToken (str);
- }
- public int GetToken (MemberInfo member) {
- return mb.GetToken (member);
- }
- public int GetToken (MethodInfo method, Type[] opt_param_types) {
- return mb.GetToken (method, opt_param_types);
- }
- public int GetToken (SignatureHelper helper) {
- return mb.GetToken (helper);
- }
- }
- }
|