// (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.Text;
using System.Reflection;
private EventBuilder[] events;
private CustomAttributeBuilder[] cattrs;
internal TypeBuilder[] subtypes;
- private TypeAttributes attrs;
+ internal TypeAttributes attrs;
private int table_idx;
private ModuleBuilder pmodule;
private int class_size;
private PackingSize packing_size;
- private MonoGenericParam[] generic_params;
+#if NET_2_0 || BOOTSTRAP_NET_2_0
+ private GenericTypeParameterBuilder[] generic_params;
+#else
+ private Object generic_params; /* so offsets don't change */
+#endif
private RefEmitPermissionSet[] permissions;
#endregion
private Type created;
[MethodImplAttribute(MethodImplOptions.InternalCall)]
private extern void setup_generic_class (TypeBuilder tb);
+ [MethodImplAttribute(MethodImplOptions.InternalCall)]
+ private extern EventInfo get_event_info (EventBuilder eb);
+
internal TypeBuilder (ModuleBuilder mb, TypeAttributes attr) {
this.parent = null;
this.attrs = attr;
- this.class_size = -1;
+ this.class_size = 0;
fullname = this.tname = "<Module>";
+ this.table_idx = 1;
this.nspace = "";
pmodule = mb;
setup_internal_class (this);
return DefineConstructor (attributes, callingConvention, parameterTypes, null, null);
}
-#if NET_1_2
+#if NET_2_0 || BOOTSTRAP_NET_2_0
public
#else
internal
return DefineMethod (name, attributes, callingConvention, returnType, null, null, parameterTypes, null, null);
}
-#if NET_1_2
+#if NET_2_0 || BOOTSTRAP_NET_2_0
public
#else
internal
return DefinePInvokeMethod (name, dllName, entryName, attributes, callingConvention, returnType, null, null, parameterTypes, null, null, nativeCallConv, nativeCharSet);
}
-#if NET_1_2
+#if NET_2_0 || BOOTSTRAP_NET_2_0
public
#else
internal
return DefineField (fieldName, type, null, null, attributes);
}
-#if NET_1_2
+#if NET_2_0 || BOOTSTRAP_NET_2_0
public
#else
internal
return new EventInfo [0];
}
+ // This is only used from MonoGenericInst.initialize().
+ internal EventInfo[] GetEvents_internal (BindingFlags bindingAttr)
+ {
+ if (events == null)
+ return new EventInfo [0];
+ ArrayList l = new ArrayList ();
+ bool match;
+ MethodAttributes mattrs;
+ MethodInfo accessor;
+
+ foreach (EventBuilder eb in events) {
+ if (eb == null)
+ continue;
+ EventInfo c = get_event_info (eb);
+ match = false;
+ accessor = c.GetAddMethod (true);
+ if (accessor == null)
+ accessor = c.GetRemoveMethod (true);
+ if (accessor == null)
+ continue;
+ mattrs = accessor.Attributes;
+ if ((mattrs & MethodAttributes.MemberAccessMask) == MethodAttributes.Public) {
+ if ((bindingAttr & BindingFlags.Public) != 0)
+ match = true;
+ } else {
+ if ((bindingAttr & BindingFlags.NonPublic) != 0)
+ match = true;
+ }
+ if (!match)
+ continue;
+ match = false;
+ if ((mattrs & MethodAttributes.Static) != 0) {
+ if ((bindingAttr & BindingFlags.Static) != 0)
+ match = true;
+ } else {
+ if ((bindingAttr & BindingFlags.Instance) != 0)
+ match = true;
+ }
+ if (!match)
+ continue;
+ l.Add (c);
+ }
+ EventInfo[] result = new EventInfo [l.Count];
+ l.CopyTo (result);
+ return result;
+ }
+
public override FieldInfo GetField( string name, BindingFlags bindingAttr) {
if (fields == null)
return null;
throw not_supported ();
}
- public override MethodInfo[] GetMethods (BindingFlags bindingAttr) {
- if (methods == null)
+ private MethodInfo[] GetMethodsByName (string name, BindingFlags bindingAttr, bool ignoreCase, Type reflected_type) {
+ MethodInfo[] candidates;
+ if (((bindingAttr & BindingFlags.DeclaredOnly) == 0) && (parent != null)) {
+ MethodInfo[] parent_methods = parent.GetMethods (bindingAttr);
+ if (methods == null)
+ candidates = parent_methods;
+ else {
+ candidates = new MethodInfo [methods.Length + parent_methods.Length];
+ parent_methods.CopyTo (candidates, 0);
+ methods.CopyTo (candidates, parent_methods.Length);
+ }
+ }
+ else
+ candidates = methods;
+
+ if (candidates == null)
return new MethodInfo [0];
+
ArrayList l = new ArrayList ();
bool match;
MethodAttributes mattrs;
- foreach (MethodInfo c in methods) {
+ foreach (MethodInfo c in candidates) {
if (c == null)
continue;
+ if (name != null) {
+ if (String.Compare (c.Name, name, ignoreCase) != 0)
+ continue;
+ }
match = false;
mattrs = c.Attributes;
if ((mattrs & MethodAttributes.MemberAccessMask) == MethodAttributes.Public) {
continue;
l.Add (c);
}
+
MethodInfo[] result = new MethodInfo [l.Count];
l.CopyTo (result);
return result;
}
- protected override MethodInfo GetMethodImpl( string name, BindingFlags bindingAttr, Binder binder, CallingConventions callConvention, Type[] types, ParameterModifier[] modifiers) {
- throw not_supported ();
+ public override MethodInfo[] GetMethods (BindingFlags bindingAttr) {
+ return GetMethodsByName (null, bindingAttr, false, this);
}
-
+
+ protected override MethodInfo GetMethodImpl (string name, BindingFlags bindingAttr,
+ Binder binder,
+ CallingConventions callConvention,
+ Type[] types, ParameterModifier[] modifiers)
+ {
+ if (!is_created)
+ /* MS.Net throws this exception if the type is unfinished... */
+ throw not_supported ();
+
+ bool ignoreCase = ((bindingAttr & BindingFlags.IgnoreCase) != 0);
+ MethodInfo[] methods = GetMethodsByName (name, bindingAttr, ignoreCase, this);
+ MethodInfo found = null;
+ MethodBase[] match;
+ int typesLen = (types != null) ? types.Length : 0;
+ int count = 0;
+
+ foreach (MethodInfo m in methods) {
+ // Under MS.NET, Standard|HasThis matches Standard...
+ if (callConvention != CallingConventions.Any && ((m.CallingConvention & callConvention) != callConvention))
+ continue;
+ found = m;
+ count++;
+ }
+
+ if (count == 0)
+ return null;
+
+ if (count == 1 && typesLen == 0)
+ return found;
+
+ match = new MethodBase [count];
+ if (count == 1)
+ match [0] = found;
+ else {
+ count = 0;
+ foreach (MethodInfo m in methods) {
+ if (callConvention != CallingConventions.Any && ((m.CallingConvention & callConvention) != callConvention))
+ continue;
+ match [count++] = m;
+ }
+ }
+
+ if (types == null)
+ return (MethodInfo) Binder.FindMostDerivedMatch (match);
+
+ if (binder == null)
+ binder = Binder.DefaultBinder;
+
+ return (MethodInfo)binder.SelectMethod (bindingAttr, match, types, modifiers);
+ }
+
public override Type GetNestedType( string name, BindingFlags bindingAttr) {
throw not_supported ();
}
public override Type[] GetNestedTypes (BindingFlags bindingAttr) {
bool match;
ArrayList result = new ArrayList ();
-
+
if (subtypes == null)
return Type.EmptyTypes;
foreach (TypeBuilder t in subtypes) {
for (int i = 0; i < nnamed; ++i) {
byte named_type = data [pos++];
byte type = data [pos++];
- int len = CustomAttributeBuilder.decode_len (data, pos, out pos);
- string named_name = CustomAttributeBuilder.string_from_bytes (data, pos, len);
+ int len;
+ string named_name;
+
+ if (type == 0x55) {
+ len = CustomAttributeBuilder.decode_len (data, pos, out pos);
+ string named_typename = CustomAttributeBuilder.string_from_bytes (data, pos, len);
+ pos += len;
+ // FIXME: Check that 'named_type' and 'named_typename' match, etc.
+ // See related code/FIXME in mono/mono/metadata/reflection.c
+ }
+
+ len = CustomAttributeBuilder.decode_len (data, pos, out pos);
+ named_name = CustomAttributeBuilder.string_from_bytes (data, pos, len);
pos += len;
/* all the fields are integers in StructLayout */
int value = (int)data [pos++];
throw not_after_created ();
parent = parentType;
+ // will just set the parent-related bits if called a second time
+ setup_internal_class (this);
}
internal int get_next_table_index (object obj, int table, bool inc) {
return pmodule.get_next_table_index (obj, table, inc);
throw new ArgumentException (argName, "Illegal name.");
}
-#if NET_1_2
+ public override String ToString ()
+ {
+ return FullName;
+ }
+
+ [MonoTODO]
+ public override bool IsAssignableFrom (Type c)
+ {
+ return base.IsAssignableFrom (c);
+ }
+
+ [MonoTODO]
+ public override bool IsSubclassOf (Type c)
+ {
+ return base.IsSubclassOf (c);
+ }
+
+#if NET_2_0 || BOOTSTRAP_NET_2_0
+ public override Type[] GetGenericArguments ()
+ {
+ if (generic_params != null)
+ return generic_params;
+
+ throw new InvalidOperationException ();
+ }
+
public override Type GetGenericTypeDefinition ()
{
setup_generic_class (this);
public override bool ContainsGenericParameters {
get {
- throw new NotImplementedException ();
+ return generic_params != null;
}
}
}
}
- [MethodImplAttribute(MethodImplOptions.InternalCall)]
- private extern MonoGenericParam define_generic_parameter (string name, int index);
-
- public Type DefineGenericParameter (string name)
+ public GenericTypeParameterBuilder[] DefineGenericParameters (string[] names)
{
- int index;
- if (generic_params != null) {
- MonoGenericParam[] new_generic_params = new MonoGenericParam [generic_params.Length+1];
- System.Array.Copy (generic_params, new_generic_params, generic_params.Length);
- index = generic_params.Length;
- generic_params = new_generic_params;
- } else {
- generic_params = new MonoGenericParam [1];
- index = 0;
- }
+ generic_params = new GenericTypeParameterBuilder [names.Length];
+ for (int i = 0; i < names.Length; i++)
+ generic_params [i] = new GenericTypeParameterBuilder (
+ this, null, names [i], i);
- generic_params [index] = define_generic_parameter (name, index);
- return generic_params [index];
- }
-
- public void SetGenericParameterConstraints (int index, Type[] constraints)
- {
- generic_params [index].SetConstraints (constraints);
+ return generic_params;
}
public MethodBuilder DefineGenericMethod (string name, MethodAttributes attributes)