// (C) 2001 Ximian, Inc. http://www.ximian.com
//
+//
+// 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.
+//
+
using System;
using System.Reflection;
using System.Reflection.Emit;
using System.Security.Permissions;
using System.Runtime.CompilerServices;
using System.Runtime.InteropServices;
+using System.Diagnostics.SymbolStore;
namespace System.Reflection.Emit {
private MethodInfo override_method;
private string pi_dll;
private string pi_entry;
- private CharSet ncharset;
+ private CharSet charset;
+ private uint extra_flags; /* this encodes set_last_error etc */
private CallingConvention native_cc;
private CallingConventions call_conv;
private bool init_locals = true;
-#if NET_1_2
+ private IntPtr generic_container;
+#if NET_2_0 || BOOTSTRAP_NET_2_0
private GenericTypeParameterBuilder[] generic_params;
+#else
+ private Object generic_params; /* so offsets are the same */
#endif
private Type[] returnModReq;
private Type[] returnModOpt;
if ((attributes & MethodAttributes.Static) == 0)
this.call_conv |= CallingConventions.HasThis;
if (parameterTypes != null) {
+ for (int i = 0; i < parameterTypes.Length; ++i)
+ if (parameterTypes [i] == null)
+ throw new ArgumentException ("Elements of the parameterTypes array cannot be null", "parameterTypes");
+
this.parameters = new Type [parameterTypes.Length];
System.Array.Copy (parameterTypes, this.parameters, parameterTypes.Length);
}
pi_dll = dllName;
pi_entry = entryName;
native_cc = nativeCConv;
- ncharset = nativeCharset;
+ charset = nativeCharset;
}
public bool InitLocals {
}
}
+ /* Used by mcs */
+ internal bool BestFitMapping {
+ set {
+ extra_flags = (uint) ((extra_flags & ~0x30) | (value ? 0x10 : 0x20));
+ }
+ }
+
+ /* Used by mcs */
+ internal bool ThrowOnUnmappableChar {
+ set {
+ extra_flags = (uint) ((extra_flags & ~0x3000) | (value ? 0x1000 : 0x2000));
+ }
+ }
+
+ /* Used by mcs */
+ internal bool ExactSpelling {
+ set {
+ extra_flags = (uint) ((extra_flags & ~0x01) | (value ? 0x01 : 0x00));
+ }
+ }
+
+ /* Used by mcs */
+ internal bool SetLastError {
+ set {
+ extra_flags = (uint) ((extra_flags & ~0x40) | (value ? 0x40 : 0x00));
+ }
+ }
+
public MethodToken GetToken() {
return new MethodToken(0x06000000 | table_idx);
}
return iattrs;
}
public override ParameterInfo[] GetParameters() {
+ if (!type.is_created)
+ throw NotSupported ();
if (parameters == null)
return null;
public ParameterBuilder DefineParameter (int position, ParameterAttributes attributes, string strParamName)
{
+ RejectIfCreated ();
+
//
// Extension: Mono allows position == 0 for the return attribute
//
if ((position < 0) || (position > parameters.Length))
throw new ArgumentOutOfRangeException ("position");
- RejectIfCreated ();
-
ParameterBuilder pb = new ParameterBuilder (this, position, attributes, strParamName);
if (pinfo == null)
pinfo = new ParameterBuilder [parameters.Length + 1];
}
internal void fixup () {
+ if (((attrs & (MethodAttributes.Abstract | MethodAttributes.PinvokeImpl)) == 0) && ((iattrs & (MethodImplAttributes.Runtime | MethodImplAttributes.InternalCall)) == 0)) {
+ if (((ilgen == null) || (ILGenerator.Mono_GetCurrentOffset (ilgen) == 0)) && (code == null))
+ throw new InvalidOperationException ("Method '" + Name + "' does not have a method body.");
+ }
if (ilgen != null)
ilgen.label_fixup ();
}
+
+ internal void GenerateDebugInfo (ISymbolWriter symbolWriter)
+ {
+ if (ilgen != null && ilgen.HasDebugInfo) {
+ SymbolToken token = new SymbolToken (GetToken().Token);
+ symbolWriter.OpenMethod (token);
+ symbolWriter.SetSymAttribute (token, "__name", System.Text.Encoding.UTF8.GetBytes (Name));
+ ilgen.GenerateDebugInfo (symbolWriter);
+ symbolWriter.CloseMethod ();
+ }
+ }
public void SetCustomAttribute( CustomAttributeBuilder customBuilder) {
if (customBuilder == null)
SetImplementationFlags ((MethodImplAttributes)impla);
return;
}
+ if (attrname == "System.Runtime.InteropServices.DllImportAttribute") {
+ CustomAttributeBuilder.CustomAttributeInfo attr = CustomAttributeBuilder.decode_cattr (customBuilder);
+ bool preserveSig = true;
+
+ /*
+ * It would be easier to construct a DllImportAttribute from
+ * the custom attribute builder, but the DllImportAttribute
+ * does not contain all the information required here, ie.
+ * - some parameters, like BestFitMapping has three values
+ * ("on", "off", "missing"), but DllImportAttribute only
+ * contains two (on/off).
+ * - PreserveSig is true by default, while it is false by
+ * default in DllImportAttribute.
+ */
+
+ pi_dll = (string)attr.ctorArgs [0];
+ native_cc = System.Runtime.InteropServices.CallingConvention.Winapi;
+
+ for (int i = 0; i < attr.namedParamNames.Length; ++i) {
+ string name = attr.namedParamNames [i];
+ object value = attr.namedParamValues [i];
+
+ if (name == "CallingConvention")
+ native_cc = (CallingConvention)value;
+ else if (name == "CharSet")
+ charset = (CharSet)value;
+ else if (name == "EntryPoint")
+ pi_entry = (string)value;
+ else if (name == "ExactSpelling")
+ ExactSpelling = (bool)value;
+ else if (name == "SetLastError")
+ SetLastError = (bool)value;
+ else if (name == "PreserveSig")
+ preserveSig = (bool)value;
+#if NET_1_1
+ else if (name == "BestFitMapping")
+ BestFitMapping = (bool)value;
+ else if (name == "ThrowOnUnmappableChar")
+ ThrowOnUnmappableChar = (bool)value;
+#endif
+ }
+
+ attrs |= MethodAttributes.PinvokeImpl;
+ if (preserveSig)
+ iattrs |= MethodImplAttributes.PreserveSig;
+ return;
+ }
if (cattrs != null) {
CustomAttributeBuilder[] new_array = new CustomAttributeBuilder [cattrs.Length + 1];
cattrs.CopyTo (new_array, 0);
attrs |= MethodAttributes.HasSecurity;
}
- [MonoTODO]
+#if NET_2_0
+ [Obsolete ("An alternate API is available: Emit the MarshalAs custom attribute instead.")]
+#endif
public void SetMarshal (UnmanagedMarshal unmanagedMarshal)
{
RejectIfCreated ();
throw new NotImplementedException ();
}
+ public override string ToString()
+ {
+ return "MethodBuilder [" + type.Name + "::" + name + "]";
+ }
+
+ [MonoTODO]
+ public override bool Equals (object obj)
+ {
+ return base.Equals (obj);
+ }
+
+ public override int GetHashCode ()
+ {
+ return name.GetHashCode ();
+ }
+
internal override int get_next_table_index (object obj, int table, bool inc) {
- return type.get_next_table_index (obj, table, inc);
+ return type.get_next_table_index (obj, table, inc);
}
internal void set_override (MethodInfo mdecl) {
return new NotSupportedException ("The invoked member is not supported in a dynamic module.");
}
-#if NET_1_2
+#if NET_2_0 || BOOTSTRAP_NET_2_0
[MethodImplAttribute(MethodImplOptions.InternalCall)]
public override extern MethodInfo BindGenericParameters (Type [] types);
return result;
}
- public GenericTypeParameterBuilder[] DefineGenericParameters (string[] names)
+ public GenericTypeParameterBuilder[] DefineGenericParameters (params string[] names)
{
generic_params = new GenericTypeParameterBuilder [names.Length];
for (int i = 0; i < names.Length; i++)
projects / mono.git / blobdiff