ikvm-fork/runtime/TypeWrapper.cs

6152 строки
182 KiB
C#
Исходник Обычный вид История

2002-12-18 19:00:25 +03:00
/*
2004-04-23 18:21:43 +04:00
Copyright (C) 2002, 2003, 2004 Jeroen Frijters
2002-12-18 19:00:25 +03:00
This software is provided 'as-is', without any express or implied
warranty. In no event will the authors be held liable for any damages
arising from the use of this software.
Permission is granted to anyone to use this software for any purpose,
including commercial applications, and to alter it and redistribute it
freely, subject to the following restrictions:
1. The origin of this software must not be misrepresented; you must not
claim that you wrote the original software. If you use this software
in a product, an acknowledgment in the product documentation would be
appreciated but is not required.
2. Altered source versions must be plainly marked as such, and must not be
misrepresented as being the original software.
3. This notice may not be removed or altered from any source distribution.
Jeroen Frijters
jeroen@frijters.net
*/
using System;
using System.Collections;
using System.Reflection;
using System.Reflection.Emit;
using System.Diagnostics;
2004-09-09 15:17:55 +04:00
using IKVM.Runtime;
using IKVM.Attributes;
using IKVM.Internal;
2002-12-18 19:00:25 +03:00
2004-10-19 17:43:55 +04:00
using ILGenerator = CountingILGenerator;
2003-05-13 00:00:15 +04:00
class EmitHelper
{
2005-01-03 11:26:21 +03:00
private static MethodInfo objectToString = typeof(object).GetMethod("ToString", BindingFlags.Public | BindingFlags.Instance, null, Type.EmptyTypes, null);
2004-03-08 18:18:47 +03:00
internal static void Throw(ILGenerator ilgen, string dottedClassName)
{
TypeWrapper exception = ClassLoaderWrapper.GetBootstrapClassLoader().LoadClassByDottedName(dottedClassName);
2005-01-03 11:26:21 +03:00
MethodWrapper mw = exception.GetMethodWrapper("<init>", "()V", false);
2004-08-17 13:05:21 +04:00
mw.Link();
mw.EmitNewobj(ilgen);
2004-03-08 18:18:47 +03:00
ilgen.Emit(OpCodes.Throw);
}
2003-05-13 00:00:15 +04:00
internal static void Throw(ILGenerator ilgen, string dottedClassName, string message)
{
TypeWrapper exception = ClassLoaderWrapper.GetBootstrapClassLoader().LoadClassByDottedName(dottedClassName);
ilgen.Emit(OpCodes.Ldstr, message);
2005-01-03 11:26:21 +03:00
MethodWrapper mw = exception.GetMethodWrapper("<init>", "(Ljava.lang.String;)V", false);
2004-08-17 13:05:21 +04:00
mw.Link();
mw.EmitNewobj(ilgen);
2003-05-13 00:00:15 +04:00
ilgen.Emit(OpCodes.Throw);
}
2003-05-30 16:08:59 +04:00
internal static void RunClassConstructor(ILGenerator ilgen, Type type)
{
2004-10-19 17:43:55 +04:00
// NOTE we're *not* running the .cctor if the class is not a Java class
2003-11-17 15:01:50 +03:00
// NOTE this is a potential versioning problem, if the base class lives in another assembly and doesn't
// have a <clinit> now, a newer version that does have a <clinit> will not have it's <clinit> called by us.
// A possible solution would be to use RuntimeHelpers.RunClassConstructor when "type" is a Java type and
// lives in another assembly as the caller (which we don't know at the moment).
2004-08-30 19:56:23 +04:00
FieldInfo field = type.GetField("__<clinit>", BindingFlags.Static | BindingFlags.NonPublic);
2003-11-17 15:01:50 +03:00
if(field != null)
{
ilgen.Emit(OpCodes.Ldsfld, field);
ilgen.Emit(OpCodes.Pop);
}
2003-05-30 16:08:59 +04:00
}
2004-03-08 18:18:47 +03:00
internal static void NullCheck(ILGenerator ilgen)
{
// I think this is the most efficient way to generate a NullReferenceException if the
// reference is null
ilgen.Emit(OpCodes.Ldvirtftn, objectToString);
ilgen.Emit(OpCodes.Pop);
}
2003-05-30 16:08:59 +04:00
}
class AttributeHelper
{
2003-10-17 12:08:31 +04:00
private static CustomAttributeBuilder ghostInterfaceAttribute;
2004-08-17 13:05:21 +04:00
private static CustomAttributeBuilder hideFromJavaAttribute;
2003-11-17 15:01:50 +03:00
private static CustomAttributeBuilder deprecatedAttribute;
2004-11-23 20:46:39 +03:00
private static CustomAttributeBuilder editorBrowsableNever;
2003-07-24 11:29:51 +04:00
private static ConstructorInfo implementsAttribute;
2003-11-17 15:01:50 +03:00
private static ConstructorInfo throwsAttribute;
2004-10-19 17:43:55 +04:00
private static ConstructorInfo sourceFileAttribute;
private static ConstructorInfo lineNumberTableAttribute;
2005-01-03 11:26:21 +03:00
private static ConstructorInfo methodImplAttribute;
internal static void SetMethodImplAttribute(MethodBuilder mb, System.Runtime.CompilerServices.MethodImplOptions options)
{
if(methodImplAttribute == null)
{
methodImplAttribute = typeof(System.Runtime.CompilerServices.MethodImplAttribute).GetConstructor(new Type[] { typeof(System.Runtime.CompilerServices.MethodImplOptions) });
}
mb.SetCustomAttribute(new CustomAttributeBuilder(methodImplAttribute, new object[] { options }));
}
2004-11-23 20:46:39 +03:00
internal static void SetEditorBrowsableNever(MethodBuilder mb)
{
if(editorBrowsableNever == null)
{
editorBrowsableNever = new CustomAttributeBuilder(typeof(System.ComponentModel.EditorBrowsableAttribute).GetConstructor(new Type[] { typeof(System.ComponentModel.EditorBrowsableState) }), new object[] { System.ComponentModel.EditorBrowsableState.Never });
}
mb.SetCustomAttribute(editorBrowsableNever);
}
internal static void SetEditorBrowsableNever(PropertyBuilder pb)
{
if(editorBrowsableNever == null)
{
editorBrowsableNever = new CustomAttributeBuilder(typeof(System.ComponentModel.EditorBrowsableAttribute).GetConstructor(new Type[] { typeof(System.ComponentModel.EditorBrowsableState) }), new object[] { System.ComponentModel.EditorBrowsableState.Never });
}
pb.SetCustomAttribute(editorBrowsableNever);
}
2003-11-17 15:01:50 +03:00
internal static void SetDeprecatedAttribute(MethodBase mb)
{
if(deprecatedAttribute == null)
{
deprecatedAttribute = new CustomAttributeBuilder(typeof(ObsoleteAttribute).GetConstructor(Type.EmptyTypes), new object[0]);
}
MethodBuilder method = mb as MethodBuilder;
if(method != null)
{
method.SetCustomAttribute(deprecatedAttribute);
}
else
{
((ConstructorBuilder)mb).SetCustomAttribute(deprecatedAttribute);
}
}
internal static void SetDeprecatedAttribute(TypeBuilder tb)
{
if(deprecatedAttribute == null)
{
deprecatedAttribute = new CustomAttributeBuilder(typeof(ObsoleteAttribute).GetConstructor(Type.EmptyTypes), new object[0]);
}
tb.SetCustomAttribute(deprecatedAttribute);
}
internal static void SetDeprecatedAttribute(FieldBuilder fb)
{
if(deprecatedAttribute == null)
{
deprecatedAttribute = new CustomAttributeBuilder(typeof(ObsoleteAttribute).GetConstructor(Type.EmptyTypes), new object[0]);
}
fb.SetCustomAttribute(deprecatedAttribute);
}
internal static void SetThrowsAttribute(MethodBase mb, string[] exceptions)
{
2004-05-14 13:31:54 +04:00
if(exceptions != null && exceptions.Length != 0)
2003-11-17 15:01:50 +03:00
{
if(throwsAttribute == null)
{
2004-05-14 13:31:54 +04:00
throwsAttribute = typeof(ThrowsAttribute).GetConstructor(new Type[] { typeof(string[]) });
2003-11-17 15:01:50 +03:00
}
if(mb is MethodBuilder)
{
MethodBuilder method = (MethodBuilder)mb;
2004-05-14 13:31:54 +04:00
method.SetCustomAttribute(new CustomAttributeBuilder(throwsAttribute, new object[] { exceptions }));
2003-11-17 15:01:50 +03:00
}
else
{
ConstructorBuilder constructor = (ConstructorBuilder)mb;
2004-05-14 13:31:54 +04:00
constructor.SetCustomAttribute(new CustomAttributeBuilder(throwsAttribute, new object[] { exceptions }));
2003-11-17 15:01:50 +03:00
}
}
}
2003-10-17 12:08:31 +04:00
internal static void SetGhostInterface(TypeBuilder typeBuilder)
{
if(ghostInterfaceAttribute == null)
{
ghostInterfaceAttribute = new CustomAttributeBuilder(typeof(GhostInterfaceAttribute).GetConstructor(Type.EmptyTypes), new object[0]);
}
typeBuilder.SetCustomAttribute(ghostInterfaceAttribute);
}
2004-08-17 13:05:21 +04:00
internal static void MirandaMethod(MethodBuilder mb)
2003-10-17 12:08:31 +04:00
{
2004-08-17 13:05:21 +04:00
CustomAttributeBuilder cab = new CustomAttributeBuilder(typeof(MirandaMethodAttribute).GetConstructor(Type.EmptyTypes), new object[0]);
mb.SetCustomAttribute(cab);
}
internal static bool IsMirandaMethod(MethodInfo mi)
{
return mi.IsDefined(typeof(MirandaMethodAttribute), false);
}
internal static void HideFromJava(TypeBuilder typeBuilder)
{
if(hideFromJavaAttribute == null)
2003-10-17 12:08:31 +04:00
{
2004-08-17 13:05:21 +04:00
hideFromJavaAttribute = new CustomAttributeBuilder(typeof(HideFromJavaAttribute).GetConstructor(Type.EmptyTypes), new object[0]);
2003-10-17 12:08:31 +04:00
}
2004-08-17 13:05:21 +04:00
typeBuilder.SetCustomAttribute(hideFromJavaAttribute);
2003-10-17 12:08:31 +04:00
}
2003-05-30 16:08:59 +04:00
2004-08-17 13:05:21 +04:00
internal static void HideFromJava(ConstructorBuilder cb)
2003-05-30 16:08:59 +04:00
{
2004-08-17 13:05:21 +04:00
if(hideFromJavaAttribute == null)
2003-05-30 16:08:59 +04:00
{
2004-08-17 13:05:21 +04:00
hideFromJavaAttribute = new CustomAttributeBuilder(typeof(HideFromJavaAttribute).GetConstructor(Type.EmptyTypes), new object[0]);
2003-05-30 16:08:59 +04:00
}
2004-08-17 13:05:21 +04:00
cb.SetCustomAttribute(hideFromJavaAttribute);
2003-05-30 16:08:59 +04:00
}
2004-08-17 13:05:21 +04:00
internal static void HideFromJava(MethodBuilder mb)
2003-05-30 16:08:59 +04:00
{
2004-08-17 13:05:21 +04:00
if(hideFromJavaAttribute == null)
2003-05-30 16:08:59 +04:00
{
2004-08-17 13:05:21 +04:00
hideFromJavaAttribute = new CustomAttributeBuilder(typeof(HideFromJavaAttribute).GetConstructor(Type.EmptyTypes), new object[0]);
2003-05-30 16:08:59 +04:00
}
2004-08-17 13:05:21 +04:00
mb.SetCustomAttribute(hideFromJavaAttribute);
2003-05-30 16:08:59 +04:00
}
2004-08-17 13:05:21 +04:00
internal static void HideFromJava(FieldBuilder fb)
2003-10-17 12:08:31 +04:00
{
2004-08-17 13:05:21 +04:00
if(hideFromJavaAttribute == null)
2003-10-17 12:08:31 +04:00
{
2004-08-17 13:05:21 +04:00
hideFromJavaAttribute = new CustomAttributeBuilder(typeof(HideFromJavaAttribute).GetConstructor(Type.EmptyTypes), new object[0]);
2003-10-17 12:08:31 +04:00
}
2004-08-17 13:05:21 +04:00
fb.SetCustomAttribute(hideFromJavaAttribute);
2003-10-17 12:08:31 +04:00
}
2004-08-17 13:05:21 +04:00
internal static bool IsHideFromJava(MemberInfo mi)
2003-05-30 16:08:59 +04:00
{
2004-08-17 13:05:21 +04:00
// NOTE all privatescope fields and methods are "hideFromJava"
2003-05-30 16:08:59 +04:00
// because Java cannot deal with the potential name clashes
FieldInfo fi = mi as FieldInfo;
if(fi != null && (fi.Attributes & FieldAttributes.FieldAccessMask) == FieldAttributes.PrivateScope)
{
return true;
}
MethodBase mb = mi as MethodBase;
if(mb != null && (mb.Attributes & MethodAttributes.MemberAccessMask) == MethodAttributes.PrivateScope)
{
return true;
}
2004-08-17 13:05:21 +04:00
return mi.IsDefined(typeof(HideFromJavaAttribute), false);
2003-05-30 16:08:59 +04:00
}
2004-05-14 13:31:54 +04:00
internal static void SetImplementsAttribute(TypeBuilder typeBuilder, TypeWrapper[] ifaceWrappers)
2003-07-24 11:29:51 +04:00
{
2004-05-14 13:31:54 +04:00
if(ifaceWrappers != null && ifaceWrappers.Length != 0)
2003-07-24 11:29:51 +04:00
{
2004-05-14 13:31:54 +04:00
string[] interfaces = new string[ifaceWrappers.Length];
for(int i = 0; i < interfaces.Length; i++)
{
interfaces[i] = ifaceWrappers[i].Name;
}
if(implementsAttribute == null)
{
implementsAttribute = typeof(ImplementsAttribute).GetConstructor(new Type[] { typeof(string[]) });
}
typeBuilder.SetCustomAttribute(new CustomAttributeBuilder(implementsAttribute, new object[] { interfaces }));
2003-08-05 18:07:22 +04:00
}
2003-07-24 11:29:51 +04:00
}
2003-12-24 14:51:41 +03:00
internal static Modifiers GetModifiers(MethodBase mb, bool assemblyIsPrivate)
2003-05-30 16:08:59 +04:00
{
object[] customAttribute = mb.GetCustomAttributes(typeof(ModifiersAttribute), false);
if(customAttribute.Length == 1)
{
return ((ModifiersAttribute)customAttribute[0]).Modifiers;
}
Modifiers modifiers = 0;
if(mb.IsPublic)
{
modifiers |= Modifiers.Public;
}
2003-12-24 14:51:41 +03:00
else if(mb.IsPrivate)
2003-05-30 16:08:59 +04:00
{
modifiers |= Modifiers.Private;
}
2003-12-24 14:51:41 +03:00
else if(mb.IsFamily || mb.IsFamilyOrAssembly)
2003-05-30 16:08:59 +04:00
{
modifiers |= Modifiers.Protected;
}
2003-12-24 14:51:41 +03:00
else if(assemblyIsPrivate)
{
modifiers |= Modifiers.Private;
}
2003-05-30 16:08:59 +04:00
// NOTE Java doesn't support non-virtual methods, but we set the Final modifier for
// non-virtual methods to approximate the semantics
2004-11-04 15:50:28 +03:00
if((mb.IsFinal || (!mb.IsVirtual && ((modifiers & Modifiers.Private) == 0))) && !mb.IsStatic && !mb.IsConstructor)
2003-05-30 16:08:59 +04:00
{
modifiers |= Modifiers.Final;
}
if(mb.IsAbstract)
{
modifiers |= Modifiers.Abstract;
}
2003-08-21 14:06:34 +04:00
else
2003-05-30 16:08:59 +04:00
{
2003-08-21 14:06:34 +04:00
// Some .NET interfaces (like System._AppDomain) have synchronized methods,
// Java doesn't allow synchronized on an abstract methods, so we ignore it for
// abstract methods.
if((mb.GetMethodImplementationFlags() & MethodImplAttributes.Synchronized) != 0)
{
modifiers |= Modifiers.Synchronized;
}
2003-05-30 16:08:59 +04:00
}
2003-08-21 14:06:34 +04:00
if(mb.IsStatic)
2003-05-30 16:08:59 +04:00
{
2003-08-21 14:06:34 +04:00
modifiers |= Modifiers.Static;
2003-05-30 16:08:59 +04:00
}
if((mb.Attributes & MethodAttributes.PinvokeImpl) != 0)
{
modifiers |= Modifiers.Native;
}
return modifiers;
}
2003-12-24 14:51:41 +03:00
internal static Modifiers GetModifiers(FieldInfo fi, bool assemblyIsPrivate)
2003-05-30 16:08:59 +04:00
{
object[] customAttribute = fi.GetCustomAttributes(typeof(ModifiersAttribute), false);
if(customAttribute.Length == 1)
{
return ((ModifiersAttribute)customAttribute[0]).Modifiers;
}
Modifiers modifiers = 0;
if(fi.IsPublic)
{
modifiers |= Modifiers.Public;
}
2003-12-24 14:51:41 +03:00
else if(fi.IsPrivate)
2003-05-30 16:08:59 +04:00
{
modifiers |= Modifiers.Private;
}
2003-12-24 14:51:41 +03:00
else if(fi.IsFamily || fi.IsFamilyOrAssembly)
2003-05-30 16:08:59 +04:00
{
modifiers |= Modifiers.Protected;
}
2003-12-24 14:51:41 +03:00
else if(assemblyIsPrivate)
{
modifiers |= Modifiers.Private;
}
2003-05-30 16:08:59 +04:00
if(fi.IsInitOnly || fi.IsLiteral)
{
modifiers |= Modifiers.Final;
}
if(fi.IsNotSerialized)
{
modifiers |= Modifiers.Transient;
}
if(fi.IsStatic)
{
modifiers |= Modifiers.Static;
}
// TODO reflection doesn't support volatile
return modifiers;
}
internal static void SetModifiers(MethodBuilder mb, Modifiers modifiers)
{
CustomAttributeBuilder customAttributeBuilder = new CustomAttributeBuilder(typeof(ModifiersAttribute).GetConstructor(new Type[] { typeof(Modifiers) }), new object[] { modifiers });
mb.SetCustomAttribute(customAttributeBuilder);
}
internal static void SetModifiers(ConstructorBuilder cb, Modifiers modifiers)
{
CustomAttributeBuilder customAttributeBuilder = new CustomAttributeBuilder(typeof(ModifiersAttribute).GetConstructor(new Type[] { typeof(Modifiers) }), new object[] { modifiers });
cb.SetCustomAttribute(customAttributeBuilder);
}
internal static void SetModifiers(FieldBuilder fb, Modifiers modifiers)
{
CustomAttributeBuilder customAttributeBuilder = new CustomAttributeBuilder(typeof(ModifiersAttribute).GetConstructor(new Type[] { typeof(Modifiers) }), new object[] { modifiers });
fb.SetCustomAttribute(customAttributeBuilder);
}
internal static void SetModifiers(TypeBuilder tb, Modifiers modifiers)
{
CustomAttributeBuilder customAttributeBuilder = new CustomAttributeBuilder(typeof(ModifiersAttribute).GetConstructor(new Type[] { typeof(Modifiers) }), new object[] { modifiers });
tb.SetCustomAttribute(customAttributeBuilder);
}
2003-07-31 16:49:29 +04:00
2004-08-17 13:05:21 +04:00
internal static void SetNameSig(MethodBase mb, string name, string sig)
{
CustomAttributeBuilder customAttributeBuilder = new CustomAttributeBuilder(typeof(NameSigAttribute).GetConstructor(new Type[] { typeof(string), typeof(string) }), new object[] { name, sig });
MethodBuilder method = mb as MethodBuilder;
if(method != null)
{
method.SetCustomAttribute(customAttributeBuilder);
}
else
{
((ConstructorBuilder)mb).SetCustomAttribute(customAttributeBuilder);
}
}
internal static void SetNameSig(FieldBuilder fb, string name, string sig)
{
CustomAttributeBuilder customAttributeBuilder = new CustomAttributeBuilder(typeof(NameSigAttribute).GetConstructor(new Type[] { typeof(string), typeof(string) }), new object[] { name, sig });
fb.SetCustomAttribute(customAttributeBuilder);
}
2004-03-08 18:18:47 +03:00
internal static byte[] FreezeDryType(Type type)
2003-08-01 16:12:08 +04:00
{
System.IO.MemoryStream mem = new System.IO.MemoryStream();
System.IO.BinaryWriter bw = new System.IO.BinaryWriter(mem, System.Text.UTF8Encoding.UTF8);
bw.Write((short)1);
bw.Write(type.FullName);
bw.Write((short)0);
return mem.ToArray();
}
2003-08-21 14:06:34 +04:00
internal static void SetInnerClass(TypeBuilder typeBuilder, string innerClass, string outerClass, string name, Modifiers modifiers)
{
Type[] argTypes = new Type[] { typeof(string), typeof(string), typeof(string), typeof(Modifiers) };
object[] args = new object[] { innerClass, outerClass, name, modifiers };
ConstructorInfo ci = typeof(InnerClassAttribute).GetConstructor(argTypes);
CustomAttributeBuilder customAttributeBuilder = new CustomAttributeBuilder(ci, args);
typeBuilder.SetCustomAttribute(customAttributeBuilder);
}
2004-10-19 17:43:55 +04:00
internal static void SetSourceFile(TypeBuilder typeBuilder, string filename)
{
if(sourceFileAttribute == null)
{
sourceFileAttribute = typeof(SourceFileAttribute).GetConstructor(new Type[] { typeof(string) });
}
typeBuilder.SetCustomAttribute(new CustomAttributeBuilder(sourceFileAttribute, new object[] { filename }));
}
internal static void SetLineNumberTable(MethodBase mb, byte[] table)
{
if(lineNumberTableAttribute == null)
{
2004-11-23 20:46:39 +03:00
lineNumberTableAttribute = typeof(LineNumberTableAttribute).GetConstructor(new Type[] { typeof(byte[]) });
2004-10-19 17:43:55 +04:00
}
if(mb is ConstructorBuilder)
{
((ConstructorBuilder)mb).SetCustomAttribute(new CustomAttributeBuilder(lineNumberTableAttribute, new object[] { table }));
}
else
{
((MethodBuilder)mb).SetCustomAttribute(new CustomAttributeBuilder(lineNumberTableAttribute, new object[] { table }));
}
}
2003-05-13 00:00:15 +04:00
}
2002-12-18 19:00:25 +03:00
abstract class TypeWrapper
{
2003-05-30 16:08:59 +04:00
private readonly ClassLoaderWrapper classLoader;
private readonly string name; // java name (e.g. java.lang.Object)
private readonly Modifiers modifiers;
2005-01-03 11:26:21 +03:00
private MethodWrapper[] methods;
private FieldWrapper[] fields;
2003-05-30 16:08:59 +04:00
private readonly TypeWrapper baseWrapper;
2004-12-21 17:59:29 +03:00
private readonly object classObject;
2003-05-13 00:00:15 +04:00
private bool hasIncompleteInterfaceImplementation;
2004-03-08 18:18:47 +03:00
internal static readonly TypeWrapper[] EmptyArray = new TypeWrapper[0];
internal const Modifiers UnloadableModifiersHack = Modifiers.Final | Modifiers.Interface | Modifiers.Private;
internal const Modifiers VerifierTypeModifiersHack = Modifiers.Final | Modifiers.Interface;
2002-12-18 19:00:25 +03:00
2004-12-21 17:59:29 +03:00
internal TypeWrapper(Modifiers modifiers, string name, TypeWrapper baseWrapper, ClassLoaderWrapper classLoader, object protectionDomain)
2002-12-18 19:00:25 +03:00
{
2003-05-30 16:08:59 +04:00
Profiler.Count("TypeWrapper");
// class name should be dotted or null for primitives
Debug.Assert(name == null || name.IndexOf('/') < 0);
2002-12-18 19:00:25 +03:00
this.modifiers = modifiers;
this.name = name;
this.baseWrapper = baseWrapper;
this.classLoader = classLoader;
2004-12-21 17:59:29 +03:00
if(JVM.IsStaticCompiler)
{
this.classObject = null;
}
else
{
this.classObject = JVM.Library.newClass(this, protectionDomain);
}
}
internal object ClassObject
{
get
{
Debug.Assert(!IsUnloadable);
return classObject;
}
2002-12-18 19:00:25 +03:00
}
2003-01-06 16:56:37 +03:00
public override string ToString()
{
return GetType().Name + "[" + name + "]";
}
2003-05-13 00:00:15 +04:00
internal bool HasIncompleteInterfaceImplementation
{
get
{
return hasIncompleteInterfaceImplementation || (baseWrapper != null && baseWrapper.HasIncompleteInterfaceImplementation);
}
set
{
hasIncompleteInterfaceImplementation = value;
}
}
2004-09-15 17:35:44 +04:00
internal virtual bool HasStaticInitializer
{
get
{
return false;
}
}
2003-07-31 16:49:29 +04:00
// a ghost is an interface that appears to be implemented by a .NET type
// (e.g. System.String (aka java.lang.String) appears to implement java.lang.CharSequence,
// so java.lang.CharSequence is a ghost)
2004-03-08 18:18:47 +03:00
internal virtual bool IsGhost
2003-07-31 16:49:29 +04:00
{
get
{
2004-03-08 18:18:47 +03:00
return false;
2003-07-31 16:49:29 +04:00
}
}
2003-08-12 17:09:31 +04:00
// is this an array type of which the ultimate element type is a ghost?
internal bool IsGhostArray
{
get
{
return IsArray && (ElementTypeWrapper.IsGhost || ElementTypeWrapper.IsGhostArray);
}
}
2003-10-17 12:08:31 +04:00
internal virtual FieldInfo GhostRefField
{
get
{
throw new InvalidOperationException();
}
}
2004-03-08 18:18:47 +03:00
internal virtual bool IsRemapped
{
get
{
return false;
}
}
2003-03-21 16:41:43 +03:00
internal bool IsArray
{
get
{
2003-06-20 17:46:13 +04:00
return name != null && name[0] == '[';
2003-03-21 16:41:43 +03:00
}
}
2003-01-06 16:56:37 +03:00
// NOTE for non-array types this returns 0
internal int ArrayRank
{
get
{
int i = 0;
2003-06-20 17:46:13 +04:00
if(name != null)
2003-01-06 16:56:37 +03:00
{
2003-06-20 17:46:13 +04:00
while(name[i] == '[')
{
i++;
}
2003-01-06 16:56:37 +03:00
}
return i;
}
}
2003-04-14 13:41:58 +04:00
internal bool IsNonPrimitiveValueType
{
get
{
2004-01-11 16:14:42 +03:00
return this != VerifierTypeWrapper.Null && !IsPrimitive && !IsGhost && TypeAsTBD.IsValueType;
2003-04-14 13:41:58 +04:00
}
}
2003-05-30 16:08:59 +04:00
internal bool IsPrimitive
2003-01-06 16:56:37 +03:00
{
get
{
2003-05-30 16:08:59 +04:00
return name == null;
2003-01-06 16:56:37 +03:00
}
}
2003-11-17 15:01:50 +03:00
internal bool IsWidePrimitive
{
get
{
return this == PrimitiveTypeWrapper.LONG || this == PrimitiveTypeWrapper.DOUBLE;
}
}
internal bool IsIntOnStackPrimitive
{
get
{
return name == null &&
(this == PrimitiveTypeWrapper.BOOLEAN ||
this == PrimitiveTypeWrapper.BYTE ||
this == PrimitiveTypeWrapper.CHAR ||
this == PrimitiveTypeWrapper.SHORT ||
this == PrimitiveTypeWrapper.INT);
}
}
2003-01-06 16:56:37 +03:00
internal bool IsUnloadable
{
get
{
// NOTE we abuse modifiers to note unloadable classes
2003-05-30 16:08:59 +04:00
return modifiers == UnloadableModifiersHack;
2003-01-06 16:56:37 +03:00
}
}
internal bool IsVerifierType
{
get
{
// NOTE we abuse modifiers to note verifier types
2003-05-30 16:08:59 +04:00
return modifiers == VerifierTypeModifiersHack;
2003-01-06 16:56:37 +03:00
}
}
2004-03-08 18:18:47 +03:00
internal virtual bool IsMapUnsafeException
{
get
{
return false;
}
}
2002-12-18 19:00:25 +03:00
internal Modifiers Modifiers
{
get
{
return modifiers;
}
}
2003-05-30 16:08:59 +04:00
// since for inner classes, the modifiers returned by Class.getModifiers are different from the actual
// modifiers (as used by the VM access control mechanism), we have this additional property
internal virtual Modifiers ReflectiveModifiers
{
get
{
return modifiers;
}
}
2002-12-18 19:00:25 +03:00
internal bool IsPublic
{
get
{
return (modifiers & Modifiers.Public) != 0;
}
}
internal bool IsAbstract
{
get
{
2004-10-19 17:43:55 +04:00
// interfaces don't need to marked abstract explicitly (and javac 1.1 didn't do it)
return (modifiers & (Modifiers.Abstract | Modifiers.Interface)) != 0;
2002-12-18 19:00:25 +03:00
}
}
internal bool IsFinal
{
get
{
return (modifiers & Modifiers.Final) != 0;
}
}
2003-05-30 16:08:59 +04:00
internal bool IsInterface
{
get
{
Debug.Assert(!IsUnloadable && !IsVerifierType);
return (modifiers & Modifiers.Interface) != 0;
}
}
2003-08-29 14:14:08 +04:00
// this exists because interfaces and arrays of interfaces are treated specially
// by the verifier, interfaces don't have a common base (other than java.lang.Object)
// so any object reference or object array reference can be used where an interface
// or interface array reference is expected (the compiler will insert the required casts).
internal bool IsInterfaceOrInterfaceArray
{
get
{
TypeWrapper tw = this;
while(tw.IsArray)
{
tw = tw.ElementTypeWrapper;
}
return tw.IsInterface;
}
}
2003-04-14 13:41:58 +04:00
internal virtual ClassLoaderWrapper GetClassLoader()
2002-12-18 19:00:25 +03:00
{
return classLoader;
}
2005-01-03 11:26:21 +03:00
internal FieldWrapper GetFieldWrapper(string fieldName, string fieldSig)
2002-12-18 19:00:25 +03:00
{
2005-01-03 11:26:21 +03:00
lock(this)
2002-12-18 19:00:25 +03:00
{
2005-01-03 11:26:21 +03:00
if(fields == null)
2002-12-18 19:00:25 +03:00
{
2005-01-03 11:26:21 +03:00
LazyPublishMembers();
}
}
foreach(FieldWrapper fw in fields)
{
if(fw.Name == fieldName && fw.Signature == fieldSig)
{
return fw;
}
}
foreach(TypeWrapper iface in this.Interfaces)
{
FieldWrapper fw = iface.GetFieldWrapper(fieldName, fieldSig);
if(fw != null)
{
return fw;
2002-12-18 19:00:25 +03:00
}
2005-01-03 11:26:21 +03:00
}
if(baseWrapper != null)
{
return baseWrapper.GetFieldWrapper(fieldName, fieldSig);
}
return null;
}
protected virtual void LazyPublishMembers()
{
if(methods == null)
{
methods = MethodWrapper.EmptyArray;
}
if(fields == null)
{
fields = FieldWrapper.EmptyArray;
2002-12-18 19:00:25 +03:00
}
}
2005-01-03 11:26:21 +03:00
internal MethodWrapper[] GetMethods()
2002-12-18 19:00:25 +03:00
{
2005-01-03 11:26:21 +03:00
lock(this)
{
if(methods == null)
{
LazyPublishMembers();
}
}
return methods;
2002-12-18 19:00:25 +03:00
}
2005-01-03 11:26:21 +03:00
internal FieldWrapper[] GetFields()
2002-12-18 19:00:25 +03:00
{
2005-01-03 11:26:21 +03:00
lock(this)
{
if(fields == null)
{
LazyPublishMembers();
}
}
return fields;
2002-12-18 19:00:25 +03:00
}
2005-01-03 11:26:21 +03:00
internal MethodWrapper GetMethodWrapper(string name, string sig, bool inherit)
2002-12-18 19:00:25 +03:00
{
2005-01-03 11:26:21 +03:00
lock(this)
2002-12-18 19:00:25 +03:00
{
2005-01-03 11:26:21 +03:00
if(methods == null)
{
LazyPublishMembers();
}
}
foreach(MethodWrapper mw in methods)
{
if(mw.Name == name && mw.Signature == sig)
{
return mw;
}
}
if(inherit && baseWrapper != null)
{
return baseWrapper.GetMethodWrapper(name, sig, inherit);
2002-12-18 19:00:25 +03:00
}
2005-01-03 11:26:21 +03:00
return null;
2002-12-18 19:00:25 +03:00
}
2005-01-03 11:26:21 +03:00
internal void SetMethods(MethodWrapper[] methods)
2002-12-18 19:00:25 +03:00
{
2005-01-03 11:26:21 +03:00
Debug.Assert(methods != null);
this.methods = methods;
2002-12-18 19:00:25 +03:00
}
2005-01-03 11:26:21 +03:00
internal void SetFields(FieldWrapper[] fields)
2002-12-18 19:00:25 +03:00
{
2005-01-03 11:26:21 +03:00
Debug.Assert(fields != null);
this.fields = fields;
2002-12-18 19:00:25 +03:00
}
2004-03-08 18:18:47 +03:00
internal string Name
2002-12-18 19:00:25 +03:00
{
get
{
return name;
}
}
2003-08-21 14:06:34 +04:00
// the name of the type as it appears in a Java signature string (e.g. "Ljava.lang.Object;" or "I")
internal virtual string SigName
{
get
{
return "L" + this.Name + ";";
}
}
2004-08-17 13:05:21 +04:00
internal abstract Assembly Assembly
{
get;
}
2002-12-18 19:00:25 +03:00
// returns true iff wrapper is allowed to access us
internal bool IsAccessibleFrom(TypeWrapper wrapper)
{
return IsPublic || IsInSamePackageAs(wrapper);
}
2003-12-24 14:51:41 +03:00
internal bool IsInSamePackageAs(TypeWrapper wrapper)
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
if(GetClassLoader() == wrapper.GetClassLoader() &&
// Both types must also be in the same assembly, otherwise
// the packages are not accessible.
wrapper.Assembly == this.Assembly)
2002-12-18 19:00:25 +03:00
{
2003-05-30 16:08:59 +04:00
int index1 = name.LastIndexOf('.');
int index2 = wrapper.name.LastIndexOf('.');
2002-12-18 19:00:25 +03:00
if(index1 == -1 && index2 == -1)
{
return true;
}
2003-12-24 14:51:41 +03:00
// for array types we need to skip the brackets
int skip1 = 0;
int skip2 = 0;
while(name[skip1] == '[')
{
skip1++;
}
while(wrapper.name[skip2] == '[')
{
skip2++;
}
if(skip1 > 0)
{
// skip over the L that follows the brackets
skip1++;
}
if(skip2 > 0)
{
// skip over the L that follows the brackets
skip2++;
}
if((index1 - skip1) != (index2 - skip2))
2002-12-18 19:00:25 +03:00
{
return false;
}
2004-04-02 12:13:01 +04:00
return String.CompareOrdinal(name, skip1, wrapper.name, skip2, index1 - skip1) == 0;
2002-12-18 19:00:25 +03:00
}
return false;
}
2004-03-08 18:18:47 +03:00
internal abstract Type TypeAsTBD
2002-12-18 19:00:25 +03:00
{
get;
}
2004-03-08 18:18:47 +03:00
internal virtual TypeBuilder TypeAsBuilder
2003-08-12 17:09:31 +04:00
{
get
{
2004-01-11 16:14:42 +03:00
TypeBuilder typeBuilder = TypeAsTBD as TypeBuilder;
2003-08-12 17:09:31 +04:00
Debug.Assert(typeBuilder != null);
return typeBuilder;
}
}
2003-09-10 18:58:19 +04:00
internal Type TypeAsFieldType
2003-01-06 16:56:37 +03:00
{
get
{
2003-10-17 12:08:31 +04:00
return TypeAsParameterType;
}
}
internal Type TypeAsParameterType
{
get
{
if(IsUnloadable)
2003-01-06 16:56:37 +03:00
{
return typeof(object);
}
2003-08-12 17:09:31 +04:00
if(IsGhostArray)
{
int rank = ArrayRank;
string type = "System.Object";
for(int i = 0; i < rank; i++)
{
type += "[]";
}
return Type.GetType(type, true);
}
2004-01-11 16:14:42 +03:00
return TypeAsTBD;
2003-09-10 18:58:19 +04:00
}
}
2003-10-17 12:08:31 +04:00
internal virtual Type TypeAsBaseType
2003-09-10 18:58:19 +04:00
{
get
{
2004-01-11 16:14:42 +03:00
return TypeAsTBD;
2003-09-10 18:58:19 +04:00
}
}
internal Type TypeAsLocalOrStackType
{
get
{
2005-01-03 11:26:21 +03:00
// NOTE as a convenience to the compiler, we replace return address types with typeof(int)
2003-01-06 16:56:37 +03:00
if(VerifierTypeWrapper.IsRet(this))
{
return typeof(int);
}
2004-09-09 15:17:55 +04:00
if(IsUnloadable || IsGhost)
2003-09-10 18:58:19 +04:00
{
return typeof(object);
}
2004-09-09 15:17:55 +04:00
if(IsNonPrimitiveValueType)
{
// return either System.ValueType or System.Enum
return TypeAsTBD.BaseType;
}
2003-09-10 18:58:19 +04:00
if(IsGhostArray)
{
int rank = ArrayRank;
string type = "System.Object";
for(int i = 0; i < rank; i++)
{
type += "[]";
}
return Type.GetType(type, true);
}
2004-01-11 16:14:42 +03:00
return TypeAsTBD;
2003-09-10 18:58:19 +04:00
}
}
2004-01-11 16:14:42 +03:00
/** <summary>Use this if the type is used as an array or array element</summary> */
2003-09-10 18:58:19 +04:00
internal Type TypeAsArrayType
{
get
{
2003-10-17 12:08:31 +04:00
if(IsUnloadable || IsGhost)
{
return typeof(object);
}
if(IsGhostArray)
{
int rank = ArrayRank;
string type = "System.Object";
for(int i = 0; i < rank; i++)
{
type += "[]";
}
return Type.GetType(type, true);
}
2004-08-17 13:05:21 +04:00
Type t = TypeAsTBD;
// HACK BYTE[]
//if(t == typeof(sbyte))
//{
// return typeof(byte);
//}
return t;
2003-09-10 18:58:19 +04:00
}
}
internal Type TypeAsExceptionType
{
get
{
if(IsUnloadable)
{
return typeof(Exception);
}
2004-01-11 16:14:42 +03:00
return TypeAsTBD;
2003-01-06 16:56:37 +03:00
}
}
2004-03-08 18:18:47 +03:00
internal TypeWrapper BaseTypeWrapper
2002-12-18 19:00:25 +03:00
{
get
{
return baseWrapper;
}
}
2003-01-06 16:56:37 +03:00
internal TypeWrapper ElementTypeWrapper
{
get
{
2003-12-24 14:51:41 +03:00
Debug.Assert(!this.IsUnloadable);
2004-02-10 20:16:35 +03:00
Debug.Assert(this == VerifierTypeWrapper.Null || this.IsArray);
2003-12-24 14:51:41 +03:00
2003-06-13 19:13:20 +04:00
if(this == VerifierTypeWrapper.Null)
{
return VerifierTypeWrapper.Null;
}
2004-01-11 16:14:42 +03:00
2003-01-06 16:56:37 +03:00
// TODO consider caching the element type
switch(name[1])
{
case '[':
2004-01-11 16:14:42 +03:00
// NOTE this call to LoadClassByDottedNameFast can never fail and will not trigger a class load
// (because the ultimate element type was already loaded when this type was created)
return classLoader.LoadClassByDottedNameFast(name.Substring(1));
2003-01-06 16:56:37 +03:00
case 'L':
2004-01-11 16:14:42 +03:00
// NOTE this call to LoadClassByDottedNameFast can never fail and will not trigger a class load
// (because the ultimate element type was already loaded when this type was created)
return classLoader.LoadClassByDottedNameFast(name.Substring(2, name.Length - 3));
2003-01-06 16:56:37 +03:00
case 'Z':
return PrimitiveTypeWrapper.BOOLEAN;
case 'B':
return PrimitiveTypeWrapper.BYTE;
case 'S':
return PrimitiveTypeWrapper.SHORT;
case 'C':
return PrimitiveTypeWrapper.CHAR;
case 'I':
return PrimitiveTypeWrapper.INT;
case 'J':
return PrimitiveTypeWrapper.LONG;
case 'F':
return PrimitiveTypeWrapper.FLOAT;
case 'D':
return PrimitiveTypeWrapper.DOUBLE;
default:
throw new InvalidOperationException(name);
}
}
}
2003-12-24 14:51:41 +03:00
internal TypeWrapper MakeArrayType(int rank)
{
2004-01-11 16:14:42 +03:00
// NOTE this call to LoadClassByDottedNameFast can never fail and will not trigger a class load
return GetClassLoader().LoadClassByDottedNameFast(new String('[', rank) + this.SigName);
2003-12-24 14:51:41 +03:00
}
2004-03-08 18:18:47 +03:00
internal bool ImplementsInterface(TypeWrapper interfaceWrapper)
2002-12-18 19:00:25 +03:00
{
TypeWrapper typeWrapper = this;
while(typeWrapper != null)
{
2004-02-02 12:46:13 +03:00
TypeWrapper[] interfaces = typeWrapper.Interfaces;
for(int i = 0; i < interfaces.Length; i++)
2002-12-18 19:00:25 +03:00
{
2004-02-02 12:46:13 +03:00
if(interfaces[i] == interfaceWrapper)
2002-12-18 19:00:25 +03:00
{
return true;
}
2004-02-02 12:46:13 +03:00
if(interfaces[i].ImplementsInterface(interfaceWrapper))
2002-12-18 19:00:25 +03:00
{
return true;
}
}
typeWrapper = typeWrapper.BaseTypeWrapper;
}
return false;
}
2004-03-08 18:18:47 +03:00
internal bool IsSubTypeOf(TypeWrapper baseType)
2002-12-18 19:00:25 +03:00
{
2003-01-07 17:53:17 +03:00
// make sure IsSubTypeOf isn't used on primitives
Debug.Assert(!this.IsPrimitive);
Debug.Assert(!baseType.IsPrimitive);
2003-08-12 17:09:31 +04:00
// can't be used on Unloadable
Debug.Assert(!this.IsUnloadable);
Debug.Assert(!baseType.IsUnloadable);
2003-01-07 17:53:17 +03:00
2002-12-18 19:00:25 +03:00
if(baseType.IsInterface)
{
if(baseType == this)
{
return true;
}
return ImplementsInterface(baseType);
}
2003-01-07 17:53:17 +03:00
// NOTE this isn't just an optimization, it is also required when this is an interface
2004-03-20 16:25:08 +03:00
if(baseType == CoreClasses.java.lang.Object.Wrapper)
2003-01-07 17:53:17 +03:00
{
return true;
}
2002-12-18 19:00:25 +03:00
TypeWrapper subType = this;
while(subType != baseType)
{
subType = subType.BaseTypeWrapper;
if(subType == null)
{
return false;
}
}
return true;
}
2003-01-06 16:56:37 +03:00
internal bool IsAssignableTo(TypeWrapper wrapper)
{
if(this == wrapper)
{
return true;
}
2003-01-07 17:53:17 +03:00
if(this.IsPrimitive || wrapper.IsPrimitive)
2003-01-06 16:56:37 +03:00
{
return false;
}
if(this == VerifierTypeWrapper.Null)
{
return true;
}
2004-02-02 12:46:13 +03:00
if(wrapper.IsInterface)
{
return ImplementsInterface(wrapper);
}
2003-01-06 16:56:37 +03:00
int rank1 = this.ArrayRank;
int rank2 = wrapper.ArrayRank;
if(rank1 > 0 && rank2 > 0)
{
rank1--;
rank2--;
TypeWrapper elem1 = this.ElementTypeWrapper;
TypeWrapper elem2 = wrapper.ElementTypeWrapper;
while(rank1 != 0 && rank2 != 0)
{
elem1 = elem1.ElementTypeWrapper;
elem2 = elem2.ElementTypeWrapper;
rank1--;
rank2--;
}
2003-04-14 13:41:58 +04:00
return !elem1.IsNonPrimitiveValueType && elem1.IsSubTypeOf(elem2);
2003-01-06 16:56:37 +03:00
}
return this.IsSubTypeOf(wrapper);
}
2004-03-08 18:18:47 +03:00
internal abstract TypeWrapper[] Interfaces
2002-12-18 19:00:25 +03:00
{
get;
}
2003-05-30 16:08:59 +04:00
// NOTE this property can only be called for finished types!
2004-03-08 18:18:47 +03:00
internal abstract TypeWrapper[] InnerClasses
2003-02-18 12:30:34 +03:00
{
get;
}
2003-05-30 16:08:59 +04:00
// NOTE this property can only be called for finished types!
2004-03-08 18:18:47 +03:00
internal abstract TypeWrapper DeclaringTypeWrapper
2003-02-18 12:30:34 +03:00
{
get;
}
2004-08-17 13:05:21 +04:00
internal void Finish()
{
Finish(false);
}
internal abstract void Finish(bool forDebugSave);
2002-12-18 19:00:25 +03:00
2004-08-17 13:05:21 +04:00
private void ImplementInterfaceMethodStubImpl(MethodWrapper ifmethod, TypeBuilder typeBuilder, DynamicTypeWrapper wrapper)
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
// we're mangling the name to prevent subclasses from accidentally overriding this method and to
// prevent clashes with overloaded method stubs that are erased to the same signature (e.g. unloadable types and ghost arrays)
string mangledName = this.Name + "/" + ifmethod.Name + ifmethod.Signature;
MethodWrapper mce = null;
TypeWrapper lookup = wrapper;
while(lookup != null)
2003-06-10 17:28:47 +04:00
{
2005-01-03 11:26:21 +03:00
mce = lookup.GetMethodWrapper(ifmethod.Name, ifmethod.Signature, true);
2004-08-17 13:05:21 +04:00
if(mce == null || !mce.IsStatic)
{
break;
}
lookup = mce.DeclaringType.BaseTypeWrapper;
2003-06-10 17:28:47 +04:00
}
2002-12-18 19:00:25 +03:00
if(mce != null)
{
if(!mce.IsPublic)
{
// NOTE according to the ECMA spec it isn't legal for a privatescope method to be virtual, but this works and
// it makes sense, so I hope the spec is wrong
// UPDATE unfortunately, according to Serge Lidin the spec is correct, and it is not allowed to have virtual privatescope
// methods. Sigh! So I have to use private methods and mangle the name
2004-08-17 13:05:21 +04:00
MethodBuilder mb = typeBuilder.DefineMethod(mangledName, MethodAttributes.NewSlot | MethodAttributes.Private | MethodAttributes.Virtual | MethodAttributes.Final, ifmethod.ReturnTypeForDefineMethod, ifmethod.GetParametersForDefineMethod());
AttributeHelper.HideFromJava(mb);
2005-01-03 11:26:21 +03:00
EmitHelper.Throw(mb.GetILGenerator(), "java.lang.IllegalAccessError", wrapper.Name + "." + ifmethod.Name + ifmethod.Signature);
2004-08-17 13:05:21 +04:00
typeBuilder.DefineMethodOverride(mb, (MethodInfo)ifmethod.GetMethod());
2003-05-13 00:00:15 +04:00
wrapper.HasIncompleteInterfaceImplementation = true;
2002-12-18 19:00:25 +03:00
}
2004-08-17 13:05:21 +04:00
else if(mce.GetMethod() == null || mce.RealName != ifmethod.RealName)
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
MethodBuilder mb = typeBuilder.DefineMethod(mangledName, MethodAttributes.NewSlot | MethodAttributes.Private | MethodAttributes.Virtual | MethodAttributes.Final, ifmethod.ReturnTypeForDefineMethod, ifmethod.GetParametersForDefineMethod());
AttributeHelper.HideFromJava(mb);
2002-12-18 19:00:25 +03:00
ILGenerator ilGenerator = mb.GetILGenerator();
ilGenerator.Emit(OpCodes.Ldarg_0);
2004-08-17 13:05:21 +04:00
int argc = mce.GetParameters().Length;
2002-12-18 19:00:25 +03:00
for(int n = 0; n < argc; n++)
{
ilGenerator.Emit(OpCodes.Ldarg_S, (byte)(n + 1));
}
2004-08-17 13:05:21 +04:00
mce.EmitCallvirt(ilGenerator);
2002-12-18 19:00:25 +03:00
ilGenerator.Emit(OpCodes.Ret);
2004-08-17 13:05:21 +04:00
typeBuilder.DefineMethodOverride(mb, (MethodInfo)ifmethod.GetMethod());
2002-12-18 19:00:25 +03:00
}
2004-01-11 16:14:42 +03:00
else if(mce.DeclaringType.TypeAsTBD.Assembly != typeBuilder.Assembly)
2002-12-29 19:27:00 +03:00
{
// NOTE methods inherited from base classes in a different assembly do *not* automatically implement
// interface methods, so we have to generate a stub here that doesn't do anything but call the base
// implementation
2004-08-17 13:05:21 +04:00
MethodBuilder mb = typeBuilder.DefineMethod(mangledName, MethodAttributes.NewSlot | MethodAttributes.Private | MethodAttributes.Virtual | MethodAttributes.Final, ifmethod.ReturnTypeForDefineMethod, ifmethod.GetParametersForDefineMethod());
typeBuilder.DefineMethodOverride(mb, (MethodInfo)ifmethod.GetMethod());
AttributeHelper.HideFromJava(mb);
2002-12-29 19:27:00 +03:00
ILGenerator ilGenerator = mb.GetILGenerator();
ilGenerator.Emit(OpCodes.Ldarg_0);
2004-08-17 13:05:21 +04:00
int argc = mce.GetParameters().Length;
2002-12-29 19:27:00 +03:00
for(int n = 0; n < argc; n++)
{
ilGenerator.Emit(OpCodes.Ldarg_S, (byte)(n + 1));
}
2004-08-17 13:05:21 +04:00
mce.EmitCallvirt(ilGenerator);
2002-12-29 19:27:00 +03:00
ilGenerator.Emit(OpCodes.Ret);
}
2002-12-18 19:00:25 +03:00
}
else
{
if(!wrapper.IsAbstract)
2002-12-18 19:00:25 +03:00
{
// the type doesn't implement the interface method and isn't abstract either. The JVM allows this, but the CLR doesn't,
// so we have to create a stub method that throws an AbstractMethodError
2004-08-17 13:05:21 +04:00
MethodBuilder mb = typeBuilder.DefineMethod(mangledName, MethodAttributes.NewSlot | MethodAttributes.Private | MethodAttributes.Virtual | MethodAttributes.Final, ifmethod.ReturnTypeForDefineMethod, ifmethod.GetParametersForDefineMethod());
AttributeHelper.HideFromJava(mb);
2005-01-03 11:26:21 +03:00
EmitHelper.Throw(mb.GetILGenerator(), "java.lang.AbstractMethodError", wrapper.Name + "." + ifmethod.Name + ifmethod.Signature);
2004-08-17 13:05:21 +04:00
typeBuilder.DefineMethodOverride(mb, (MethodInfo)ifmethod.GetMethod());
2003-05-13 00:00:15 +04:00
wrapper.HasIncompleteInterfaceImplementation = true;
2002-12-18 19:00:25 +03:00
}
}
}
2003-05-30 16:08:59 +04:00
internal void ImplementInterfaceMethodStubs(TypeBuilder typeBuilder, DynamicTypeWrapper wrapper, Hashtable doneSet)
2002-12-18 19:00:25 +03:00
{
2004-01-11 16:14:42 +03:00
Debug.Assert(this.IsInterface);
2002-12-18 19:00:25 +03:00
// make sure we don't do the same method twice
if(doneSet.ContainsKey(this))
{
return;
}
doneSet.Add(this, this);
2004-08-17 13:05:21 +04:00
foreach(MethodWrapper method in GetMethods())
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
if(!method.IsStatic)
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
ImplementInterfaceMethodStubImpl(method, typeBuilder, wrapper);
2002-12-18 19:00:25 +03:00
}
}
TypeWrapper[] interfaces = Interfaces;
for(int i = 0; i < interfaces.Length; i++)
{
interfaces[i].ImplementInterfaceMethodStubs(typeBuilder, wrapper, doneSet);
}
}
2003-02-22 15:28:12 +03:00
[Conditional("DEBUG")]
internal static void AssertFinished(Type type)
{
if(type != null)
{
while(type.IsArray)
{
type = type.GetElementType();
}
Debug.Assert(!(type is TypeBuilder));
}
}
2003-11-17 15:01:50 +03:00
2004-01-11 16:14:42 +03:00
internal void RunClassInit()
{
System.Runtime.CompilerServices.RuntimeHelpers.RunClassConstructor(TypeAsTBD.TypeHandle);
}
2003-11-17 15:01:50 +03:00
internal void EmitUnbox(ILGenerator ilgen)
{
Debug.Assert(this.IsNonPrimitiveValueType);
2004-01-11 16:14:42 +03:00
Type type = this.TypeAsTBD;
2003-11-17 15:01:50 +03:00
// NOTE if the reference is null, we treat it as a default instance of the value type.
ilgen.Emit(OpCodes.Dup);
Label label1 = ilgen.DefineLabel();
ilgen.Emit(OpCodes.Brtrue_S, label1);
ilgen.Emit(OpCodes.Pop);
ilgen.Emit(OpCodes.Ldloc, ilgen.DeclareLocal(type));
Label label2 = ilgen.DefineLabel();
ilgen.Emit(OpCodes.Br_S, label2);
ilgen.MarkLabel(label1);
ilgen.Emit(OpCodes.Unbox, type);
ilgen.Emit(OpCodes.Ldobj, type);
ilgen.MarkLabel(label2);
}
2004-10-19 17:43:55 +04:00
internal void EmitBox(ILGenerator ilgen)
2003-11-17 15:01:50 +03:00
{
Debug.Assert(this.IsNonPrimitiveValueType);
2004-01-11 16:14:42 +03:00
ilgen.Emit(OpCodes.Box, this.TypeAsTBD);
2003-11-17 15:01:50 +03:00
}
2003-12-20 01:19:18 +03:00
2004-03-08 18:18:47 +03:00
// NOTE sourceType is optional and only used for special types (e.g. interfaces),
// it is *not* used to automatically downcast
2003-12-20 01:19:18 +03:00
internal void EmitConvStackToParameterType(ILGenerator ilgen, TypeWrapper sourceType)
{
if(!IsUnloadable)
{
2004-03-08 18:18:47 +03:00
if(IsGhost)
2003-12-20 01:19:18 +03:00
{
LocalBuilder local1 = ilgen.DeclareLocal(TypeAsLocalOrStackType);
ilgen.Emit(OpCodes.Stloc, local1);
LocalBuilder local2 = ilgen.DeclareLocal(TypeAsParameterType);
ilgen.Emit(OpCodes.Ldloca, local2);
ilgen.Emit(OpCodes.Ldloc, local1);
ilgen.Emit(OpCodes.Stfld, GhostRefField);
ilgen.Emit(OpCodes.Ldloca, local2);
ilgen.Emit(OpCodes.Ldobj, TypeAsParameterType);
}
2004-08-17 13:05:21 +04:00
// because of the way interface merging works, any reference is valid
// for any interface reference
2004-03-08 18:18:47 +03:00
else if(IsInterfaceOrInterfaceArray && (sourceType == null || sourceType.IsUnloadable || !sourceType.IsAssignableTo(this)))
{
ilgen.Emit(OpCodes.Castclass, TypeAsTBD);
}
else if(IsNonPrimitiveValueType)
{
EmitUnbox(ilgen);
}
2003-12-20 01:19:18 +03:00
}
}
internal void EmitConvParameterToStackType(ILGenerator ilgen)
{
if(IsUnloadable)
{
// nothing to do
}
else if(IsNonPrimitiveValueType)
{
EmitBox(ilgen);
}
else if(IsGhost)
{
LocalBuilder local = ilgen.DeclareLocal(TypeAsParameterType);
ilgen.Emit(OpCodes.Stloc, local);
ilgen.Emit(OpCodes.Ldloca, local);
ilgen.Emit(OpCodes.Ldfld, GhostRefField);
}
}
2004-01-11 16:14:42 +03:00
internal virtual void EmitCheckcast(TypeWrapper context, ILGenerator ilgen)
{
if(IsGhost)
{
ilgen.Emit(OpCodes.Dup);
// TODO make sure we get the right "Cast" method and cache it
2004-01-18 01:46:43 +03:00
// NOTE for dynamic ghosts we don't end up here because DynamicTypeWrapper overrides this method,
// so we're safe to call GetMethod on TypeAsTBD (because it has to be a compiled type, if we're here)
2004-01-11 16:14:42 +03:00
ilgen.Emit(OpCodes.Call, TypeAsTBD.GetMethod("Cast"));
ilgen.Emit(OpCodes.Pop);
}
else if(IsGhostArray)
{
2004-03-08 18:18:47 +03:00
ilgen.Emit(OpCodes.Dup);
// TODO make sure we get the right "CastArray" method and cache it
// NOTE for dynamic ghosts we don't end up here because DynamicTypeWrapper overrides this method,
// so we're safe to call GetMethod on TypeAsTBD (because it has to be a compiled type, if we're here)
TypeWrapper tw = this;
int rank = 0;
while(tw.IsArray)
2004-01-11 16:14:42 +03:00
{
2004-03-08 18:18:47 +03:00
rank++;
tw = tw.ElementTypeWrapper;
2004-01-11 16:14:42 +03:00
}
2004-03-08 18:18:47 +03:00
ilgen.Emit(OpCodes.Ldc_I4, rank);
ilgen.Emit(OpCodes.Call, tw.TypeAsTBD.GetMethod("CastArray"));
2004-01-11 16:14:42 +03:00
}
else
{
ilgen.Emit(OpCodes.Castclass, TypeAsTBD);
}
}
internal virtual void EmitInstanceOf(TypeWrapper context, ILGenerator ilgen)
{
if(IsGhost)
{
// TODO make sure we get the right "IsInstance" method and cache it
2004-01-18 01:46:43 +03:00
// NOTE for dynamic ghosts we don't end up here because DynamicTypeWrapper overrides this method,
// so we're safe to call GetMethod on TypeAsTBD (because it has to be a compiled type, if we're here)
2004-01-11 16:14:42 +03:00
ilgen.Emit(OpCodes.Call, TypeAsTBD.GetMethod("IsInstance"));
}
else if(IsGhostArray)
{
2004-03-08 18:18:47 +03:00
// TODO make sure we get the right "IsInstanceArray" method and cache it
// NOTE for dynamic ghosts we don't end up here because DynamicTypeWrapper overrides this method,
// so we're safe to call GetMethod on TypeAsTBD (because it has to be a compiled type, if we're here)
ilgen.Emit(OpCodes.Call, TypeAsTBD.GetMethod("IsInstanceArray"));
2004-01-11 16:14:42 +03:00
}
else
{
ilgen.Emit(OpCodes.Isinst, TypeAsTBD);
ilgen.Emit(OpCodes.Ldnull);
2004-08-30 19:56:23 +04:00
ilgen.Emit(OpCodes.Cgt_Un);
2004-01-11 16:14:42 +03:00
}
}
internal static string GetSigNameFromType(Type type)
{
TypeWrapper wrapper = ClassLoaderWrapper.GetWrapperFromTypeFast(type);
if(wrapper != null)
{
return wrapper.SigName;
}
if(type.IsArray)
{
System.Text.StringBuilder sb = new System.Text.StringBuilder();
while(type.IsArray)
{
sb.Append('[');
type = type.GetElementType();
}
return sb.Append(GetSigNameFromType(type)).ToString();
}
string s = TypeWrapper.GetNameFromType(type);
if(s[0] != '[')
{
s = "L" + s + ";";
}
return s;
}
// NOTE returns null for primitive types
internal static string GetNameFromType(Type type)
{
TypeWrapper.AssertFinished(type);
if(type.IsArray)
{
return GetSigNameFromType(type);
}
// first we check if a wrapper exists, because if it does we must use the name from the wrapper to
// make sure that remapped types return the proper name
TypeWrapper wrapper = ClassLoaderWrapper.GetWrapperFromTypeFast(type);
if(wrapper != null)
{
return wrapper.Name;
}
if(type.Module.IsDefined(typeof(JavaModuleAttribute), false))
{
return CompiledTypeWrapper.GetName(type);
}
else
{
return DotNetTypeWrapper.GetName(type);
}
}
2004-08-17 13:05:21 +04:00
// NOTE don't call this method, call MethodWrapper.Link instead
internal virtual MethodBase LinkMethod(MethodWrapper mw)
{
return mw.GetMethod();
}
// NOTE don't call this method, call FieldWrapper.Link instead
2005-01-03 11:26:21 +03:00
internal virtual FieldInfo LinkField(FieldWrapper fw)
2004-08-17 13:05:21 +04:00
{
2005-01-03 11:26:21 +03:00
return fw.GetField();
2004-08-17 13:05:21 +04:00
}
2002-12-18 19:00:25 +03:00
}
2003-01-06 16:56:37 +03:00
class UnloadableTypeWrapper : TypeWrapper
{
internal UnloadableTypeWrapper(string name)
2004-12-21 17:59:29 +03:00
: base(TypeWrapper.UnloadableModifiersHack, name, null, null, null)
2003-01-06 16:56:37 +03:00
{
}
2004-08-17 13:05:21 +04:00
internal override Assembly Assembly
{
get
{
return null;
}
}
internal override string SigName
{
get
{
string name = Name;
if(name.StartsWith("["))
{
return name;
}
return "L" + name + ";";
}
}
2005-01-03 11:26:21 +03:00
protected override void LazyPublishMembers()
2003-01-06 16:56:37 +03:00
{
2005-01-03 11:26:21 +03:00
throw new InvalidOperationException("LazyPublishMembers called on UnloadableTypeWrapper: " + Name);
2003-01-06 16:56:37 +03:00
}
2004-03-08 18:18:47 +03:00
internal override Type TypeAsTBD
2003-01-06 16:56:37 +03:00
{
get
{
2003-03-17 17:02:46 +03:00
throw new InvalidOperationException("get_Type called on UnloadableTypeWrapper: " + Name);
}
}
2003-01-06 16:56:37 +03:00
2004-03-08 18:18:47 +03:00
internal override TypeWrapper[] Interfaces
2003-01-06 16:56:37 +03:00
{
get
{
2003-03-17 17:02:46 +03:00
throw new InvalidOperationException("get_Interfaces called on UnloadableTypeWrapper: " + Name);
2003-01-06 16:56:37 +03:00
}
}
2004-03-08 18:18:47 +03:00
internal override TypeWrapper[] InnerClasses
2003-02-18 12:30:34 +03:00
{
get
{
2003-03-17 17:02:46 +03:00
throw new InvalidOperationException("get_InnerClasses called on UnloadableTypeWrapper: " + Name);
2003-02-18 12:30:34 +03:00
}
}
2004-03-08 18:18:47 +03:00
internal override TypeWrapper DeclaringTypeWrapper
2003-02-18 12:30:34 +03:00
{
get
{
2003-03-17 17:02:46 +03:00
throw new InvalidOperationException("get_DeclaringTypeWrapper called on UnloadableTypeWrapper: " + Name);
2003-02-18 12:30:34 +03:00
}
}
2004-08-17 13:05:21 +04:00
internal override void Finish(bool forDebugSave)
2003-01-06 16:56:37 +03:00
{
2003-03-17 17:02:46 +03:00
throw new InvalidOperationException("Finish called on UnloadableTypeWrapper: " + Name);
2003-01-06 16:56:37 +03:00
}
2004-01-11 16:14:42 +03:00
internal override void EmitCheckcast(TypeWrapper context, ILGenerator ilgen)
{
ilgen.Emit(OpCodes.Ldtoken, context.TypeAsTBD);
ilgen.Emit(OpCodes.Ldstr, Name);
ilgen.Emit(OpCodes.Call, typeof(ByteCodeHelper).GetMethod("DynamicCast"));
}
internal override void EmitInstanceOf(TypeWrapper context, ILGenerator ilgen)
{
ilgen.Emit(OpCodes.Ldtoken, context.TypeAsTBD);
ilgen.Emit(OpCodes.Ldstr, Name);
ilgen.Emit(OpCodes.Call, typeof(ByteCodeHelper).GetMethod("DynamicInstanceOf"));
}
2003-01-06 16:56:37 +03:00
}
2002-12-18 19:00:25 +03:00
class PrimitiveTypeWrapper : TypeWrapper
{
2003-08-21 14:06:34 +04:00
internal static readonly PrimitiveTypeWrapper BYTE = new PrimitiveTypeWrapper(typeof(sbyte), "B");
internal static readonly PrimitiveTypeWrapper CHAR = new PrimitiveTypeWrapper(typeof(char), "C");
internal static readonly PrimitiveTypeWrapper DOUBLE = new PrimitiveTypeWrapper(typeof(double), "D");
internal static readonly PrimitiveTypeWrapper FLOAT = new PrimitiveTypeWrapper(typeof(float), "F");
internal static readonly PrimitiveTypeWrapper INT = new PrimitiveTypeWrapper(typeof(int), "I");
internal static readonly PrimitiveTypeWrapper LONG = new PrimitiveTypeWrapper(typeof(long), "J");
internal static readonly PrimitiveTypeWrapper SHORT = new PrimitiveTypeWrapper(typeof(short), "S");
internal static readonly PrimitiveTypeWrapper BOOLEAN = new PrimitiveTypeWrapper(typeof(bool), "Z");
internal static readonly PrimitiveTypeWrapper VOID = new PrimitiveTypeWrapper(typeof(void), "V");
2002-12-18 19:00:25 +03:00
2003-05-30 16:08:59 +04:00
private readonly Type type;
2003-08-21 14:06:34 +04:00
private readonly string sigName;
2002-12-18 19:00:25 +03:00
2003-08-21 14:06:34 +04:00
private PrimitiveTypeWrapper(Type type, string sigName)
2004-12-21 17:59:29 +03:00
: base(Modifiers.Public | Modifiers.Abstract | Modifiers.Final, null, null, null, null)
2002-12-18 19:00:25 +03:00
{
this.type = type;
2003-08-21 14:06:34 +04:00
this.sigName = sigName;
}
2004-08-17 13:05:21 +04:00
internal override Assembly Assembly
{
get
{
return null;
}
}
2003-08-21 14:06:34 +04:00
internal override string SigName
{
get
{
return sigName;
}
2002-12-18 19:00:25 +03:00
}
2003-04-14 13:41:58 +04:00
internal override ClassLoaderWrapper GetClassLoader()
{
return ClassLoaderWrapper.GetBootstrapClassLoader();
}
2004-03-08 18:18:47 +03:00
internal override Type TypeAsTBD
2002-12-18 19:00:25 +03:00
{
get
{
return type;
}
}
2004-03-08 18:18:47 +03:00
internal override TypeWrapper[] Interfaces
2002-12-18 19:00:25 +03:00
{
get
{
2003-05-30 16:08:59 +04:00
return TypeWrapper.EmptyArray;
2002-12-18 19:00:25 +03:00
}
}
2004-03-08 18:18:47 +03:00
internal override TypeWrapper[] InnerClasses
2003-02-18 12:30:34 +03:00
{
get
{
2003-05-30 16:08:59 +04:00
return TypeWrapper.EmptyArray;
2003-02-18 12:30:34 +03:00
}
}
2004-03-08 18:18:47 +03:00
internal override TypeWrapper DeclaringTypeWrapper
2003-02-18 12:30:34 +03:00
{
get
{
return null;
}
}
2004-08-17 13:05:21 +04:00
internal override void Finish(bool forDebugSave)
2002-12-18 19:00:25 +03:00
{
}
}
2005-01-03 11:26:21 +03:00
class BakedTypeCleanupHack
{
private static readonly FieldInfo m_methodBuilder = typeof(ConstructorBuilder).GetField("m_methodBuilder", BindingFlags.Instance | BindingFlags.NonPublic);
private static readonly FieldInfo[] methodBuilderFields = GetFieldList(typeof(MethodBuilder), new string[]
{
"m_ilGenerator",
"m_ubBody",
"m_RVAFixups",
"mm_mdMethodFixups",
"m_localSignature",
"m_localSymInfo",
"m_exceptions",
"m_parameterTypes",
"m_retParam",
"m_returnType",
"m_signature"
});
private static readonly FieldInfo[] fieldBuilderFields = GetFieldList(typeof(FieldBuilder), new string[]
{
"m_data",
"m_fieldType",
});
2005-01-05 15:11:50 +03:00
private static bool IsSupportedVersion
{
get
{
return Environment.Version.Major == 1 && Environment.Version.Minor == 1 && Environment.Version.Build == 4322;
}
}
2005-01-03 11:26:21 +03:00
private static FieldInfo[] GetFieldList(Type type, string[] list)
{
2005-01-05 15:11:50 +03:00
if(JVM.IsStaticCompiler || ClassLoaderWrapper.IsSaveDebugImage || !IsSupportedVersion)
2005-01-03 11:26:21 +03:00
{
// if we're going to be saving the image, we cannot bash the MethodBuilder fields,
// because the data is required to generated the PE file.
return null;
}
FieldInfo[] fields = new FieldInfo[list.Length];
for(int i = 0; i < list.Length; i++)
{
fields[i] = type.GetField(list[i], BindingFlags.Instance | BindingFlags.NonPublic);
if(fields[i] == null)
{
return null;
}
}
return fields;
}
internal static void Process(DynamicTypeWrapper wrapper)
{
if(m_methodBuilder != null && methodBuilderFields != null && fieldBuilderFields != null)
{
foreach(MethodWrapper mw in wrapper.GetMethods())
{
MethodBuilder mb = mw.GetMethod() as MethodBuilder;
if(mb == null)
{
ConstructorBuilder cb = mw.GetMethod() as ConstructorBuilder;
if(cb != null)
{
mb = (MethodBuilder)m_methodBuilder.GetValue(cb);
}
}
if(mb != null)
{
foreach(FieldInfo fi in methodBuilderFields)
{
fi.SetValue(mb, null);
}
}
}
foreach(FieldWrapper fw in wrapper.GetFields())
{
FieldBuilder fb = fw.GetField() as FieldBuilder;
if(fb != null)
{
foreach(FieldInfo fi in fieldBuilderFields)
{
fi.SetValue(fb, null);
}
}
}
}
}
}
2004-08-17 13:05:21 +04:00
sealed class DynamicTypeWrapper : TypeWrapper
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
private volatile DynamicImpl impl;
2002-12-18 19:00:25 +03:00
private TypeWrapper[] interfaces;
2003-10-17 12:08:31 +04:00
private FieldInfo ghostRefField;
2004-01-18 01:46:43 +03:00
private MethodBuilder ghostIsInstanceMethod;
2004-03-08 18:18:47 +03:00
private MethodBuilder ghostIsInstanceArrayMethod;
2004-01-18 01:46:43 +03:00
private MethodBuilder ghostCastMethod;
2004-03-08 18:18:47 +03:00
private MethodBuilder ghostCastArrayMethod;
2004-09-15 17:35:44 +04:00
private bool hasStaticInitializer;
2004-03-08 18:18:47 +03:00
private static TypeWrapper[] mappedExceptions;
2004-07-10 11:19:42 +04:00
private static bool[] mappedExceptionsAllSubClasses;
2004-03-08 18:18:47 +03:00
private static Hashtable ghosts;
private static Hashtable nativeMethods;
2002-12-18 19:00:25 +03:00
2004-08-17 13:05:21 +04:00
private static TypeWrapper LoadTypeWrapper(ClassLoaderWrapper classLoader, string name)
{
TypeWrapper tw = classLoader.LoadClassByDottedNameFast(name);
if(tw == null)
{
throw new NoClassDefFoundError(name);
}
return tw;
}
2004-12-21 17:59:29 +03:00
internal DynamicTypeWrapper(ClassFile f, ClassLoaderWrapper classLoader, object protectionDomain)
: base(f.Modifiers, f.Name, f.IsInterface ? null : LoadTypeWrapper(classLoader, f.SuperClass), classLoader, protectionDomain)
2002-12-18 19:00:25 +03:00
{
2003-05-30 16:08:59 +04:00
Profiler.Count("DynamicTypeWrapper");
2003-06-10 17:28:47 +04:00
if(BaseTypeWrapper != null)
2003-01-06 16:56:37 +03:00
{
2003-06-10 17:28:47 +04:00
if(!BaseTypeWrapper.IsAccessibleFrom(this))
{
2004-08-17 13:05:21 +04:00
throw new IllegalAccessError("Class " + f.Name + " cannot access its superclass " + BaseTypeWrapper.Name);
2003-06-10 17:28:47 +04:00
}
if(BaseTypeWrapper.IsFinal)
{
2004-08-17 13:05:21 +04:00
throw new VerifyError("Cannot inherit from final class");
2003-06-10 17:28:47 +04:00
}
if(BaseTypeWrapper.IsInterface)
{
2004-08-17 13:05:21 +04:00
throw new IncompatibleClassChangeError("Class " + f.Name + " has interface " + BaseTypeWrapper.Name + " as superclass");
2003-06-10 17:28:47 +04:00
}
2004-10-04 23:30:53 +04:00
if(!f.IsFinal)
{
if(BaseTypeWrapper.TypeAsTBD == typeof(ValueType) || BaseTypeWrapper.TypeAsTBD == typeof(Enum))
{
throw new VerifyError("Value types must be final");
}
if(BaseTypeWrapper.TypeAsTBD == typeof(MulticastDelegate))
{
throw new VerifyError("Delegates must be final");
}
}
if(BaseTypeWrapper.TypeAsTBD == typeof(Delegate))
{
throw new VerifyError(BaseTypeWrapper.Name + " cannot be used as a base class");
}
// NOTE defining value types, enums and delegates is not supported in IKVM v1
if(BaseTypeWrapper.TypeAsTBD == typeof(ValueType) || BaseTypeWrapper.TypeAsTBD == typeof(Enum))
{
throw new VerifyError("Defining value types in Java is not implemented in IKVM v1");
}
if(BaseTypeWrapper.TypeAsTBD == typeof(MulticastDelegate))
{
throw new VerifyError("Defining delegates in Java is not implemented in IKVM v1");
}
2003-01-06 16:56:37 +03:00
}
2004-08-17 13:05:21 +04:00
ClassFile.ConstantPoolItemClass[] interfaces = f.Interfaces;
this.interfaces = new TypeWrapper[interfaces.Length];
2003-01-06 16:56:37 +03:00
for(int i = 0; i < interfaces.Length; i++)
{
2004-08-17 13:05:21 +04:00
TypeWrapper iface = LoadTypeWrapper(classLoader, interfaces[i].Name);
if(!iface.IsAccessibleFrom(this))
2003-01-06 16:56:37 +03:00
{
2004-08-17 13:05:21 +04:00
throw new IllegalAccessError("Class " + f.Name + " cannot access its superinterface " + iface.Name);
2003-01-06 16:56:37 +03:00
}
2004-08-17 13:05:21 +04:00
if(!iface.IsInterface)
2003-01-06 16:56:37 +03:00
{
2004-08-17 13:05:21 +04:00
throw new IncompatibleClassChangeError("Implementing class");
2003-01-06 16:56:37 +03:00
}
2004-08-17 13:05:21 +04:00
this.interfaces[i] = iface;
2003-01-06 16:56:37 +03:00
}
2004-03-08 18:18:47 +03:00
impl = new JavaTypeImpl(f, this);
2003-05-30 16:08:59 +04:00
}
2004-09-15 17:35:44 +04:00
internal override bool HasStaticInitializer
{
get
{
return hasStaticInitializer;
}
}
2004-08-17 13:05:21 +04:00
internal override Assembly Assembly
{
get
{
return GetClassLoader().ModuleBuilder.Assembly;
}
}
2003-10-17 12:08:31 +04:00
internal override FieldInfo GhostRefField
{
get
{
return ghostRefField;
}
}
2003-05-30 16:08:59 +04:00
internal override Modifiers ReflectiveModifiers
{
get
{
return impl.ReflectiveModifiers;
}
2002-12-18 19:00:25 +03:00
}
2004-03-08 18:18:47 +03:00
internal override TypeWrapper[] Interfaces
2002-12-18 19:00:25 +03:00
{
get
{
return interfaces;
}
}
2004-03-08 18:18:47 +03:00
internal override TypeWrapper[] InnerClasses
2003-02-18 12:30:34 +03:00
{
get
{
return impl.InnerClasses;
}
}
2004-03-08 18:18:47 +03:00
internal override TypeWrapper DeclaringTypeWrapper
2003-02-18 12:30:34 +03:00
{
get
{
return impl.DeclaringTypeWrapper;
}
}
2004-03-08 18:18:47 +03:00
internal override Type TypeAsTBD
2002-12-18 19:00:25 +03:00
{
get
{
return impl.Type;
}
}
2003-10-17 12:08:31 +04:00
internal override Type TypeAsBaseType
{
get
{
return impl.TypeAsBaseType;
}
}
2004-08-17 13:05:21 +04:00
internal override void Finish(bool forDebugSave)
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
lock(this)
2003-01-02 16:46:16 +03:00
{
2003-05-30 16:08:59 +04:00
Profiler.Enter("DynamicTypeWrapper.Finish");
try
{
2004-08-17 13:05:21 +04:00
impl = impl.Finish(forDebugSave);
2004-12-21 13:26:51 +03:00
// call Finish again to get the verify error for doomed types
impl.Finish(forDebugSave);
2003-05-30 16:08:59 +04:00
}
finally
{
Profiler.Leave("DynamicTypeWrapper.Finish");
}
2003-01-02 16:46:16 +03:00
}
2002-12-18 19:00:25 +03:00
}
2004-09-09 15:17:55 +04:00
internal static void SetupGhosts(IKVM.Internal.MapXml.Root map)
2004-03-08 18:18:47 +03:00
{
ghosts = new Hashtable();
// find the ghost interfaces
2004-09-09 15:17:55 +04:00
foreach(IKVM.Internal.MapXml.Class c in map.assembly)
2004-03-08 18:18:47 +03:00
{
2004-04-23 18:21:43 +04:00
if(c.Shadows != null && c.Interfaces != null)
2004-03-08 18:18:47 +03:00
{
// NOTE we don't support interfaces that inherit from other interfaces
// (actually, if they are explicitly listed it would probably work)
TypeWrapper typeWrapper = ClassLoaderWrapper.GetBootstrapClassLoader().GetLoadedClass(c.Name);
2004-09-09 15:17:55 +04:00
foreach(IKVM.Internal.MapXml.Interface iface in c.Interfaces)
2004-03-08 18:18:47 +03:00
{
TypeWrapper ifaceWrapper = ClassLoaderWrapper.GetBootstrapClassLoader().GetLoadedClass(iface.Name);
if(ifaceWrapper == null || !ifaceWrapper.TypeAsTBD.IsAssignableFrom(typeWrapper.TypeAsTBD))
{
AddGhost(iface.Name, typeWrapper);
}
}
}
}
// we manually add the array ghost interfaces
TypeWrapper array = ClassLoaderWrapper.GetWrapperFromType(typeof(Array));
AddGhost("java.io.Serializable", array);
AddGhost("java.lang.Cloneable", array);
}
private static void AddGhost(string interfaceName, TypeWrapper implementer)
{
ArrayList list = (ArrayList)ghosts[interfaceName];
if(list == null)
{
list = new ArrayList();
ghosts[interfaceName] = list;
}
list.Add(implementer);
}
internal override bool IsGhost
{
get
{
return ghosts != null && IsInterface && ghosts.ContainsKey(Name);
}
}
private static TypeWrapper[] GetGhostImplementers(TypeWrapper wrapper)
{
ArrayList list = (ArrayList)ghosts[wrapper.Name];
if(list == null)
{
return TypeWrapper.EmptyArray;
}
return (TypeWrapper[])list.ToArray(typeof(TypeWrapper));
}
private class ExceptionMapEmitter : CodeEmitter
{
2004-09-09 15:17:55 +04:00
private IKVM.Internal.MapXml.ExceptionMapping[] map;
2004-03-08 18:18:47 +03:00
2004-09-09 15:17:55 +04:00
internal ExceptionMapEmitter(IKVM.Internal.MapXml.ExceptionMapping[] map)
2004-03-08 18:18:47 +03:00
{
this.map = map;
}
2004-03-29 14:11:33 +04:00
internal override void Emit(ILGenerator ilgen)
{
ilgen.Emit(OpCodes.Ldarg_0);
ilgen.Emit(OpCodes.Callvirt, typeof(Object).GetMethod("GetType"));
MethodInfo GetTypeFromHandle = typeof(Type).GetMethod("GetTypeFromHandle");
for(int i = 0; i < map.Length; i++)
{
ilgen.Emit(OpCodes.Dup);
ilgen.Emit(OpCodes.Ldtoken, Type.GetType(map[i].src));
ilgen.Emit(OpCodes.Call, GetTypeFromHandle);
ilgen.Emit(OpCodes.Ceq);
Label label = ilgen.DefineLabel();
ilgen.Emit(OpCodes.Brfalse_S, label);
ilgen.Emit(OpCodes.Pop);
if(map[i].code != null)
{
ilgen.Emit(OpCodes.Ldarg_0);
map[i].code.Emit(ilgen);
ilgen.Emit(OpCodes.Ret);
}
else
{
TypeWrapper tw = ClassLoaderWrapper.GetBootstrapClassLoader().LoadClassByDottedName(map[i].dst);
2005-01-03 11:26:21 +03:00
MethodWrapper mw = tw.GetMethodWrapper("<init>", "()V", false);
2004-08-17 13:05:21 +04:00
mw.Link();
mw.EmitNewobj(ilgen);
2004-03-29 14:11:33 +04:00
ilgen.Emit(OpCodes.Ret);
}
ilgen.MarkLabel(label);
}
ilgen.Emit(OpCodes.Pop);
ilgen.Emit(OpCodes.Ldarg_0);
ilgen.Emit(OpCodes.Ret);
}
2004-03-08 18:18:47 +03:00
}
2004-09-09 15:17:55 +04:00
internal static void LoadNativeMethods(IKVM.Internal.MapXml.Root map)
2004-03-08 18:18:47 +03:00
{
nativeMethods = new Hashtable();
// HACK we've got a hardcoded location for the exception mapping method that is generated from the xml mapping
nativeMethods["java.lang.ExceptionHelper.MapExceptionImpl(Ljava.lang.Throwable;)Ljava.lang.Throwable;"] = new ExceptionMapEmitter(map.exceptionMappings);
2004-09-09 15:17:55 +04:00
foreach(IKVM.Internal.MapXml.Class c in map.assembly)
2004-03-08 18:18:47 +03:00
{
2004-04-23 18:21:43 +04:00
// HACK if it is not a remapped type, we assume it is a container for native methods
if(c.Shadows == null)
2004-03-08 18:18:47 +03:00
{
2004-04-23 18:21:43 +04:00
string className = c.Name;
2004-09-09 15:17:55 +04:00
foreach(IKVM.Internal.MapXml.Method method in c.Methods)
2004-04-23 18:21:43 +04:00
{
if(method.body != null)
{
string methodName = method.Name;
string methodSig = method.Sig;
nativeMethods[className + "." + methodName + methodSig] = method.body;
}
}
2004-03-08 18:18:47 +03:00
}
}
}
internal override bool IsMapUnsafeException
{
get
{
if(mappedExceptions != null)
{
for(int i = 0; i < mappedExceptions.Length; i++)
{
2004-07-10 11:19:42 +04:00
if(mappedExceptions[i].IsSubTypeOf(this) ||
(mappedExceptionsAllSubClasses[i] && this.IsSubTypeOf(mappedExceptions[i])))
2004-03-08 18:18:47 +03:00
{
return true;
}
}
}
return false;
}
}
2004-09-09 15:17:55 +04:00
internal static void LoadMappedExceptions(IKVM.Internal.MapXml.Root map)
2004-03-08 18:18:47 +03:00
{
2004-07-10 11:19:42 +04:00
mappedExceptionsAllSubClasses = new bool[map.exceptionMappings.Length];
2004-03-08 18:18:47 +03:00
mappedExceptions = new TypeWrapper[map.exceptionMappings.Length];
for(int i = 0; i < mappedExceptions.Length; i++)
{
2004-07-10 11:19:42 +04:00
string dst = map.exceptionMappings[i].dst;
if(dst[0] == '*')
{
mappedExceptionsAllSubClasses[i] = true;
dst = dst.Substring(1);
}
mappedExceptions[i] = ClassLoaderWrapper.GetBootstrapClassLoader().LoadClassByDottedName(dst);
2004-03-08 18:18:47 +03:00
}
}
2004-09-17 13:32:06 +04:00
// NOTE can only be used if the type hasn't been finished yet!
internal FieldInfo ClassObjectField
{
get
{
return ((JavaTypeImpl)impl).ClassObjectField;
}
}
2002-12-18 19:00:25 +03:00
private abstract class DynamicImpl
{
2004-08-17 13:05:21 +04:00
internal abstract Type Type { get; }
2003-10-17 12:08:31 +04:00
internal abstract Type TypeAsBaseType { get; }
2004-08-17 13:05:21 +04:00
internal abstract TypeWrapper[] InnerClasses { get; }
internal abstract TypeWrapper DeclaringTypeWrapper { get; }
internal abstract Modifiers ReflectiveModifiers { get; }
internal abstract DynamicImpl Finish(bool forDebugSave);
internal abstract MethodBase LinkMethod(MethodWrapper mw);
2005-01-03 11:26:21 +03:00
internal abstract FieldInfo LinkField(FieldWrapper fw);
2002-12-18 19:00:25 +03:00
}
private class JavaTypeImpl : DynamicImpl
{
2003-05-30 16:08:59 +04:00
private readonly ClassFile classFile;
private readonly DynamicTypeWrapper wrapper;
private readonly TypeBuilder typeBuilder;
2002-12-18 19:00:25 +03:00
private MethodWrapper[] methods;
2004-08-17 13:05:21 +04:00
private MethodWrapper[] baseMethods;
2002-12-18 19:00:25 +03:00
private FieldWrapper[] fields;
private bool finishing;
2004-08-17 13:05:21 +04:00
private bool finishingForDebugSave;
2003-01-02 18:44:17 +03:00
private FinishedTypeImpl finishedType;
2003-05-30 16:08:59 +04:00
private readonly TypeWrapper outerClassWrapper;
2003-10-17 12:08:31 +04:00
private readonly TypeBuilder typeBuilderGhostInterface;
2004-08-17 13:05:21 +04:00
private Hashtable memberclashtable;
2004-08-30 19:56:23 +04:00
private Hashtable classCache = new Hashtable();
2004-09-17 13:32:06 +04:00
private FieldInfo classObjectField;
2002-12-18 19:00:25 +03:00
2004-03-08 18:18:47 +03:00
internal JavaTypeImpl(ClassFile f, DynamicTypeWrapper wrapper)
2002-12-18 19:00:25 +03:00
{
2004-03-08 18:18:47 +03:00
Tracer.Info(Tracer.Compiler, "constructing JavaTypeImpl for " + f.Name);
2002-12-18 19:00:25 +03:00
this.classFile = f;
this.wrapper = wrapper;
2004-08-17 13:05:21 +04:00
// process all methods
2004-09-15 17:35:44 +04:00
bool hasclinit = wrapper.BaseTypeWrapper == null ? false : wrapper.BaseTypeWrapper.HasStaticInitializer;
2004-08-17 13:05:21 +04:00
methods = new MethodWrapper[classFile.Methods.Length];
baseMethods = new MethodWrapper[classFile.Methods.Length];
for(int i = 0; i < methods.Length; i++)
2003-02-20 17:18:38 +03:00
{
2004-08-17 13:05:21 +04:00
ClassFile.Method m = classFile.Methods[i];
2004-09-15 17:35:44 +04:00
if(m.IsClassInitializer)
{
if(JVM.IsStaticCompiler)
{
if(!IsSideEffectFreeStaticInitializer(m))
{
hasclinit = true;
}
}
else
{
hasclinit = true;
}
}
2004-08-17 13:05:21 +04:00
if(wrapper.IsGhost)
2003-02-20 17:18:38 +03:00
{
2005-01-03 11:26:21 +03:00
methods[i] = new MethodWrapper.GhostMethodWrapper(wrapper, m.Name, m.Signature, null, null, null, m.Modifiers, MemberFlags.None);
2003-02-20 17:18:38 +03:00
}
2004-08-17 13:05:21 +04:00
else if(m.Name == "<init>")
2003-02-20 17:18:38 +03:00
{
2005-01-03 11:26:21 +03:00
methods[i] = new SmartConstructorMethodWrapper(wrapper, m.Name, m.Signature, null, null, m.Modifiers, MemberFlags.None);
2003-02-20 17:18:38 +03:00
}
else
{
2004-08-17 13:05:21 +04:00
bool explicitOverride = false;
if(!classFile.IsInterface && !m.IsStatic && !m.IsPrivate)
{
2005-01-03 11:26:21 +03:00
baseMethods[i] = FindBaseMethod(m.Name, m.Signature, out explicitOverride);
2004-08-17 13:05:21 +04:00
}
2005-01-03 11:26:21 +03:00
methods[i] = new SmartCallMethodWrapper(wrapper, m.Name, m.Signature, null, null, null, m.Modifiers, explicitOverride ? MemberFlags.ExplicitOverride : MemberFlags.None, SimpleOpCode.Call, SimpleOpCode.Callvirt);
2003-02-20 17:18:38 +03:00
}
}
2004-09-15 17:35:44 +04:00
wrapper.hasStaticInitializer = hasclinit;
2004-08-17 13:05:21 +04:00
if(wrapper.IsAbstract && !wrapper.IsInterface)
2003-02-20 17:18:38 +03:00
{
2004-08-17 13:05:21 +04:00
ArrayList methodsArray = new ArrayList(methods);
ArrayList baseMethodsArray = new ArrayList(baseMethods);
AddMirandaMethods(methodsArray, baseMethodsArray, wrapper);
this.methods = (MethodWrapper[])methodsArray.ToArray(typeof(MethodWrapper));
this.baseMethods = (MethodWrapper[])baseMethodsArray.ToArray(typeof(MethodWrapper));
2002-12-18 19:00:25 +03:00
}
2005-01-03 11:26:21 +03:00
wrapper.SetMethods(methods);
fields = new FieldWrapper[classFile.Fields.Length];
for(int i = 0; i < fields.Length; i++)
{
ClassFile.Field fld = classFile.Fields[i];
if(fld.IsStatic && fld.IsFinal && fld.ConstantValue != null)
{
fields[i] = new ConstantFieldWrapper(wrapper, null, fld.Name, fld.Signature, fld.Modifiers, null, fld.ConstantValue);
}
else if(fld.IsFinal && (fld.IsPublic || fld.IsProtected) && !wrapper.IsInterface)
{
fields[i] = new GetterFieldWrapper(wrapper, null, null, fld.Name, fld.Signature, fld.Modifiers, null);
}
else
{
fields[i] = FieldWrapper.Create(wrapper, null, null, fld.Name, fld.Signature, fld.Modifiers);
}
}
wrapper.SetFields(fields);
2004-08-17 13:05:21 +04:00
// from now on we shouldn't be throwing any exceptions (to be precise, after we've
// called ModuleBuilder.DefineType)
try
2002-12-29 19:27:00 +03:00
{
2004-08-17 13:05:21 +04:00
TypeAttributes typeAttribs = 0;
if(f.IsAbstract)
{
typeAttribs |= TypeAttributes.Abstract;
}
if(f.IsFinal)
2003-02-20 17:18:38 +03:00
{
2004-08-17 13:05:21 +04:00
typeAttribs |= TypeAttributes.Sealed;
}
2004-09-15 17:35:44 +04:00
if(!hasclinit)
{
typeAttribs |= TypeAttributes.BeforeFieldInit;
}
2004-08-17 13:05:21 +04:00
TypeBuilder outer = null;
// only if requested, we compile inner classes as nested types, because it has a higher cost
// and doesn't buy us anything, unless we're compiling a library that could be used from C# (e.g.)
if(JVM.CompileInnerClassesAsNestedTypes)
{
if(f.OuterClass != null)
2003-10-17 12:08:31 +04:00
{
2004-08-17 13:05:21 +04:00
if(!CheckInnerOuterNames(f.Name, f.OuterClass.Name))
{
Tracer.Warning(Tracer.Compiler, "Incorrect InnerClasses attribute on {0}", f.Name);
}
else
{
outerClassWrapper = wrapper.GetClassLoader().LoadClassByDottedName(f.OuterClass.Name);
if(outerClassWrapper is DynamicTypeWrapper)
{
outer = outerClassWrapper.TypeAsBuilder;
}
}
2003-10-17 12:08:31 +04:00
}
2003-02-20 17:18:38 +03:00
}
2004-08-17 13:05:21 +04:00
if(f.IsPublic)
2003-02-20 17:18:38 +03:00
{
2004-08-17 13:05:21 +04:00
if(outer != null)
2003-10-17 12:08:31 +04:00
{
2004-08-17 13:05:21 +04:00
typeAttribs |= TypeAttributes.NestedPublic;
2003-10-17 12:08:31 +04:00
}
else
{
2004-08-17 13:05:21 +04:00
typeAttribs |= TypeAttributes.Public;
2003-10-17 12:08:31 +04:00
}
2003-02-20 17:18:38 +03:00
}
2004-08-17 13:05:21 +04:00
else if(outer != null)
2003-02-20 17:18:38 +03:00
{
2004-08-17 13:05:21 +04:00
typeAttribs |= TypeAttributes.NestedAssembly;
}
if(f.IsInterface)
{
typeAttribs |= TypeAttributes.Interface | TypeAttributes.Abstract;
if(outer != null)
{
if(wrapper.IsGhost)
{
throw new NotImplementedException();
}
// LAMESPEC the CLI spec says interfaces cannot contain nested types (Part.II, 9.6), but that rule isn't enforced
// (and broken by J# as well), so we'll just ignore it too.
typeBuilder = outer.DefineNestedType(GetInnerClassName(outerClassWrapper.Name, f.Name), typeAttribs);
}
else
{
if(wrapper.IsGhost)
{
typeAttribs &= ~(TypeAttributes.Interface | TypeAttributes.Abstract);
typeAttribs |= TypeAttributes.Class | TypeAttributes.Sealed;
typeBuilder = wrapper.GetClassLoader().ModuleBuilder.DefineType(wrapper.GetClassLoader().MangleTypeName(f.Name), typeAttribs, typeof(ValueType));
AttributeHelper.SetGhostInterface(typeBuilder);
AttributeHelper.SetModifiers(typeBuilder, wrapper.Modifiers);
2004-11-23 20:46:39 +03:00
wrapper.ghostRefField = typeBuilder.DefineField("__<ref>", typeof(object), FieldAttributes.Public | FieldAttributes.SpecialName);
2004-08-17 13:05:21 +04:00
AttributeHelper.HideFromJava((FieldBuilder)wrapper.ghostRefField);
typeBuilderGhostInterface = typeBuilder.DefineNestedType("__Interface", TypeAttributes.Interface | TypeAttributes.Abstract | TypeAttributes.NestedPublic);
AttributeHelper.HideFromJava(typeBuilderGhostInterface);
wrapper.ghostIsInstanceMethod = typeBuilder.DefineMethod("IsInstance", MethodAttributes.Public | MethodAttributes.Static, typeof(bool), new Type[] { typeof(object) });
wrapper.ghostIsInstanceArrayMethod = typeBuilder.DefineMethod("IsInstanceArray", MethodAttributes.Public | MethodAttributes.Static, typeof(bool), new Type[] { typeof(object), typeof(int) });
wrapper.ghostCastMethod = typeBuilder.DefineMethod("Cast", MethodAttributes.Public | MethodAttributes.Static, typeBuilder, new Type[] { typeof(object) });
wrapper.ghostCastArrayMethod = typeBuilder.DefineMethod("CastArray", MethodAttributes.Public | MethodAttributes.Static, typeof(void), new Type[] { typeof(object), typeof(int) });
}
else
{
typeBuilder = wrapper.GetClassLoader().ModuleBuilder.DefineType(wrapper.GetClassLoader().MangleTypeName(f.Name), typeAttribs);
}
}
2003-02-20 17:18:38 +03:00
}
else
{
2004-08-17 13:05:21 +04:00
typeAttribs |= TypeAttributes.Class;
if(outer != null)
{
// LAMESPEC the CLI spec says interfaces cannot contain nested types (Part.II, 9.6), but that rule isn't enforced
// (and broken by J# as well), so we'll just ignore it too.
typeBuilder = outer.DefineNestedType(GetInnerClassName(outerClassWrapper.Name, f.Name), typeAttribs, wrapper.BaseTypeWrapper.TypeAsBaseType);
}
else
{
typeBuilder = wrapper.GetClassLoader().ModuleBuilder.DefineType(wrapper.GetClassLoader().MangleTypeName(f.Name), typeAttribs, wrapper.BaseTypeWrapper.TypeAsBaseType);
}
}
TypeWrapper[] interfaces = wrapper.Interfaces;
for(int i = 0; i < interfaces.Length; i++)
{
// NOTE we're using TypeAsBaseType for the interfaces!
typeBuilder.AddInterfaceImplementation(interfaces[i].TypeAsBaseType);
}
AttributeHelper.SetImplementsAttribute(typeBuilder, interfaces);
if(JVM.IsStaticCompiler && classFile.DeprecatedAttribute)
{
AttributeHelper.SetDeprecatedAttribute(typeBuilder);
2003-02-20 17:18:38 +03:00
}
2004-10-19 17:43:55 +04:00
if(f.SourceFileAttribute != null && !JVM.NoStackTraceInfo)
{
AttributeHelper.SetSourceFile(typeBuilder, f.SourceFileAttribute);
}
2002-12-29 19:27:00 +03:00
}
2004-08-17 13:05:21 +04:00
catch(Exception x)
2002-12-29 19:27:00 +03:00
{
2004-08-17 13:05:21 +04:00
if(typeBuilder != null)
{
JVM.CriticalFailure("Exception during critical part of JavaTypeImpl construction", x);
}
throw;
2002-12-18 19:00:25 +03:00
}
2004-08-17 13:05:21 +04:00
}
2004-09-15 17:35:44 +04:00
private bool IsSideEffectFreeStaticInitializer(ClassFile.Method m)
{
if(m.ExceptionTable.Length != 0)
{
return false;
}
for(int i = 0; i < m.Instructions.Length; i++)
{
ByteCode bc = m.Instructions[i].OpCode;
if(bc == ByteCode.__getstatic || bc == ByteCode.__putstatic)
{
ClassFile.ConstantPoolItemFieldref fld = classFile.GetFieldref(m.Instructions[i].Arg1);
if(fld.Class != classFile.Name)
{
return false;
}
// don't allow getstatic to load non-primitive fields, because that would
// cause the verifier to try to load the type
if(bc == ByteCode.__getstatic && "L[".IndexOf(fld.Signature[0]) != -1)
{
return false;
}
}
else if(bc == ByteCode.__areturn ||
bc == ByteCode.__ireturn ||
bc == ByteCode.__lreturn ||
bc == ByteCode.__freturn ||
bc == ByteCode.__dreturn)
{
return false;
}
else if(ByteCodeMetaData.CanThrowException(bc))
{
return false;
}
}
// the method needs to be verifiable to be side effect free, since we already analysed it,
// we know that the verifier won't try to load any types (which isn't allowed at this time)
try
{
new MethodAnalyzer(wrapper, null, classFile, m, null);
return true;
}
catch(VerifyError)
{
return false;
}
}
2005-01-03 11:26:21 +03:00
private MethodWrapper GetMethodWrapperDuringCtor(TypeWrapper lookup, ArrayList methods, string name, string sig)
{
if(lookup == wrapper)
{
foreach(MethodWrapper mw in methods)
{
if(mw.Name == name && mw.Signature == sig)
{
return mw;
}
}
if(lookup.BaseTypeWrapper == null)
{
return null;
}
else
{
return lookup.BaseTypeWrapper.GetMethodWrapper(name, sig, true);
}
}
else
{
return lookup.GetMethodWrapper(name, sig, true);
}
}
2004-08-17 13:05:21 +04:00
private void AddMirandaMethods(ArrayList methods, ArrayList baseMethods, TypeWrapper tw)
{
foreach(TypeWrapper iface in tw.Interfaces)
2003-11-17 15:01:50 +03:00
{
2004-08-17 13:05:21 +04:00
AddMirandaMethods(methods, baseMethods, iface);
foreach(MethodWrapper ifmethod in iface.GetMethods())
{
// skip <clinit>
if(!ifmethod.IsStatic)
{
TypeWrapper lookup = wrapper;
while(lookup != null)
{
2005-01-03 11:26:21 +03:00
MethodWrapper mw = GetMethodWrapperDuringCtor(lookup, methods, ifmethod.Name, ifmethod.Signature);
2004-08-17 13:05:21 +04:00
if(mw == null)
{
2005-01-03 11:26:21 +03:00
mw = new SmartCallMethodWrapper(wrapper, ifmethod.Name, ifmethod.Signature, null, null, null, Modifiers.Public | Modifiers.Abstract, MemberFlags.HideFromReflection, SimpleOpCode.Call, SimpleOpCode.Callvirt);
2004-08-17 13:05:21 +04:00
methods.Add(mw);
baseMethods.Add(ifmethod);
break;
}
if(!mw.IsStatic)
{
break;
}
lookup = mw.DeclaringType.BaseTypeWrapper;
}
}
}
2003-11-17 15:01:50 +03:00
}
2003-02-20 17:18:38 +03:00
}
2004-05-14 13:31:54 +04:00
private static bool CheckInnerOuterNames(string inner, string outer)
2003-02-20 17:18:38 +03:00
{
2004-05-14 13:31:54 +04:00
// do some sanity checks on the inner/outer class names
return inner.Length > outer.Length + 1 && inner[outer.Length] == '$' && inner.IndexOf('$', outer.Length + 1) == -1;
}
2004-01-11 16:14:42 +03:00
2004-05-14 13:31:54 +04:00
private static string GetInnerClassName(string outer, string inner)
{
Debug.Assert(CheckInnerOuterNames(inner, outer));
2003-02-20 17:18:38 +03:00
return inner.Substring(outer.Length + 1);
2002-12-18 19:00:25 +03:00
}
2003-11-17 15:01:50 +03:00
private static bool IsCompatibleArgList(TypeWrapper[] caller, TypeWrapper[] callee)
{
if(caller.Length == callee.Length)
{
for(int i = 0; i < caller.Length; i++)
{
2004-01-11 16:14:42 +03:00
if(caller[i].TypeAsParameterType == typeof(sbyte[]) && callee[i].TypeAsParameterType == typeof(byte[]))
2003-11-17 15:01:50 +03:00
{
// special case for byte array cheating...
}
else if(!caller[i].IsAssignableTo(callee[i]))
{
return false;
}
}
return true;
}
return false;
}
2003-12-20 01:19:18 +03:00
private void EmitConstantValueInitialization(ILGenerator ilGenerator)
{
ClassFile.Field[] fields = classFile.Fields;
for(int i = 0; i < fields.Length; i++)
{
ClassFile.Field f = fields[i];
if(f.IsStatic && !f.IsFinal)
{
object constant = f.ConstantValue;
if(constant != null)
{
if(constant is int)
{
ilGenerator.Emit(OpCodes.Ldc_I4, (int)constant);
}
else if(constant is long)
{
ilGenerator.Emit(OpCodes.Ldc_I8, (long)constant);
}
else if(constant is double)
{
ilGenerator.Emit(OpCodes.Ldc_R8, (double)constant);
}
else if(constant is float)
{
ilGenerator.Emit(OpCodes.Ldc_R4, (float)constant);
}
else if(constant is string)
{
ilGenerator.Emit(OpCodes.Ldstr, (string)constant);
}
else
{
throw new InvalidOperationException();
}
2004-08-17 13:05:21 +04:00
this.fields[i].EmitSet(ilGenerator);
2003-12-20 01:19:18 +03:00
}
}
}
}
2004-09-17 13:32:06 +04:00
internal FieldInfo ClassObjectField
{
get
{
lock(this)
{
if(classObjectField == null)
{
2004-09-17 18:12:51 +04:00
classObjectField = typeBuilder.DefineField("__<classObject>", typeof(object), FieldAttributes.Private | FieldAttributes.Static);
2004-09-17 13:32:06 +04:00
AttributeHelper.HideFromJava((FieldBuilder)classObjectField);
}
return classObjectField;
}
}
}
2005-01-03 11:26:21 +03:00
private int GetMethodIndex(MethodWrapper mw)
{
for(int i = 0; i < methods.Length; i++)
{
if(methods[i] == mw)
{
return i;
}
}
throw new InvalidOperationException();
}
2004-08-17 13:05:21 +04:00
internal override MethodBase LinkMethod(MethodWrapper mw)
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
Debug.Assert(mw != null);
bool unloadableOverrideStub = false;
2005-01-03 11:26:21 +03:00
int index = GetMethodIndex(mw);
2004-08-17 13:05:21 +04:00
MethodWrapper baseMethod = baseMethods[index];
if(baseMethod != null)
{
baseMethod.Link();
// check the loader constraints
if(mw.ReturnType != baseMethod.ReturnType)
{
if(baseMethod.ReturnType.IsUnloadable || finishingForDebugSave)
{
if(!mw.ReturnType.IsUnloadable || (!baseMethod.ReturnType.IsUnloadable && finishingForDebugSave))
{
unloadableOverrideStub = true;
}
}
else
{
throw new LinkageError("Loader constraints violated");
}
}
TypeWrapper[] here = mw.GetParameters();
TypeWrapper[] there = baseMethod.GetParameters();
for(int i = 0; i < here.Length; i++)
{
if(here[i] != there[i])
{
if(there[i].IsUnloadable || finishingForDebugSave)
{
if(!here[i].IsUnloadable || (!there[i].IsUnloadable && finishingForDebugSave))
{
unloadableOverrideStub = true;
}
}
else
{
throw new LinkageError("Loader constraints violated");
}
}
}
}
Debug.Assert(mw.GetMethod() == null);
2005-01-03 11:26:21 +03:00
MethodBase mb = GenerateMethod(index, unloadableOverrideStub);
if((mw.Modifiers & (Modifiers.Synchronized | Modifiers.Static)) == Modifiers.Synchronized)
{
// note that constructors cannot be synchronized in Java
AttributeHelper.SetMethodImplAttribute((MethodBuilder)mb, System.Runtime.CompilerServices.MethodImplOptions.Synchronized);
}
return mb;
2004-08-17 13:05:21 +04:00
}
2005-01-03 11:26:21 +03:00
private int GetFieldIndex(FieldWrapper fw)
{
for(int i = 0; i < fields.Length; i++)
{
if(fields[i] == fw)
{
return i;
}
}
throw new InvalidOperationException();
}
internal override FieldInfo LinkField(FieldWrapper fw)
2004-08-17 13:05:21 +04:00
{
Debug.Assert(fw != null);
2005-01-03 11:26:21 +03:00
FieldBuilder field;
ClassFile.Field fld = classFile.Fields[GetFieldIndex(fw)];
string fieldName = fld.Name;
TypeWrapper typeWrapper = fw.FieldTypeWrapper;
Type type = typeWrapper.TypeAsFieldType;
bool setNameSig = typeWrapper.IsUnloadable || typeWrapper.IsGhostArray;
if(setNameSig)
{
// TODO use clashtable
// the field name is mangled here, because otherwise it can (theoretically)
// conflict with another unloadable or object or ghost array field
// (fields can be overloaded on type)
fieldName += "/" + typeWrapper.Name;
}
FieldAttributes attribs = 0;
MethodAttributes methodAttribs = 0;
bool setModifiers = false;
if(fld.IsPrivate)
{
attribs |= FieldAttributes.Private;
}
else if(fld.IsProtected)
{
attribs |= FieldAttributes.FamORAssem;
methodAttribs |= MethodAttributes.FamORAssem;
}
else if(fld.IsPublic)
{
attribs |= FieldAttributes.Public;
methodAttribs |= MethodAttributes.Public;
}
else
{
attribs |= FieldAttributes.Assembly;
methodAttribs |= MethodAttributes.Assembly;
}
if(fld.IsStatic)
{
attribs |= FieldAttributes.Static;
methodAttribs |= MethodAttributes.Static;
}
// NOTE "constant" static finals are converted into literals
// TODO it would be possible for Java code to change the value of a non-blank static final, but I don't
// know if we want to support this (since the Java JITs don't really support it either)
object constantValue = fld.ConstantValue;
if(fld.IsStatic && fld.IsFinal && constantValue != null)
{
Profiler.Count("Static Final Constant");
attribs |= FieldAttributes.Literal;
field = typeBuilder.DefineField(fieldName, type, attribs);
field.SetConstant(constantValue);
}
else
{
bool isWrappedFinal = false;
if(fld.IsFinal && (fld.IsPublic || fld.IsProtected))
{
if(wrapper.IsInterface)
{
attribs |= FieldAttributes.InitOnly;
}
else
{
// NOTE public/protected blank final fields get converted into a read-only property with a private field
// backing store
// we used to make the field privatescope, but that really serves no purpose (and it hinders
// serialization, which uses .NET reflection to get at the field)
attribs &= ~FieldAttributes.FieldAccessMask;
attribs |= FieldAttributes.Private;
setModifiers = true;
isWrappedFinal = true;
}
}
else if(fld.IsFinal)
{
setModifiers = true;
}
field = typeBuilder.DefineField(fieldName, type, attribs);
if(fld.IsTransient)
{
CustomAttributeBuilder transientAttrib = new CustomAttributeBuilder(typeof(NonSerializedAttribute).GetConstructor(Type.EmptyTypes), new object[0]);
field.SetCustomAttribute(transientAttrib);
}
if(fld.IsVolatile)
{
// TODO the field should be marked as modreq(IsVolatile), but Reflection.Emit doesn't have a way of doing this
setModifiers = true;
}
// Instance fields can also have a ConstantValue attribute (and are inlined by the compiler),
// and ikvmstub has to export them, so we have to add a custom attribute.
if(constantValue != null)
{
CustomAttributeBuilder constantValueAttrib = new CustomAttributeBuilder(typeof(ConstantValueAttribute).GetConstructor(new Type[] { constantValue.GetType() }), new object[] { constantValue });
field.SetCustomAttribute(constantValueAttrib);
}
if(isWrappedFinal)
{
methodAttribs |= MethodAttributes.SpecialName;
// TODO we should ensure that the getter method name doesn't clash with an existing method
MethodBuilder getter = typeBuilder.DefineMethod("get_" + fld.Name, methodAttribs, CallingConventions.Standard, type, Type.EmptyTypes);
AttributeHelper.HideFromJava(getter);
ILGenerator ilgen = getter.GetILGenerator();
if(fld.IsStatic)
{
ilgen.Emit(OpCodes.Ldsfld, field);
}
else
{
ilgen.Emit(OpCodes.Ldarg_0);
ilgen.Emit(OpCodes.Ldfld, field);
}
ilgen.Emit(OpCodes.Ret);
PropertyBuilder pb = typeBuilder.DefineProperty(fld.Name, PropertyAttributes.None, type, Type.EmptyTypes);
pb.SetGetMethod(getter);
((GetterFieldWrapper)fw).SetGetter(getter);
}
}
// if the Java modifiers cannot be expressed in .NET, we emit the Modifiers attribute to store
// the Java modifiers
if(setModifiers)
{
AttributeHelper.SetModifiers(field, fld.Modifiers);
}
if(setNameSig)
{
AttributeHelper.SetNameSig(field, fld.Name, fld.Signature);
}
if(JVM.IsStaticCompiler && fld.DeprecatedAttribute)
{
AttributeHelper.SetDeprecatedAttribute(field);
}
return field;
2004-08-17 13:05:21 +04:00
}
internal override DynamicImpl Finish(bool forDebugSave)
{
this.finishingForDebugSave = forDebugSave;
2003-12-20 01:19:18 +03:00
// NOTE if a finish is triggered during static compilation phase 1, it cannot be handled properly,
// so we bail out.
// (this should only happen during compilation of classpath.dll and is most likely caused by a bug somewhere)
if(JVM.IsStaticCompilerPhase1)
{
2003-12-24 14:51:41 +03:00
JVM.CriticalFailure("Finish triggered during phase 1 of compilation.", null);
return null;
2003-12-20 01:19:18 +03:00
}
2003-05-30 16:08:59 +04:00
if(wrapper.BaseTypeWrapper != null)
{
2004-08-17 13:05:21 +04:00
wrapper.BaseTypeWrapper.Finish(forDebugSave);
}
2003-02-20 17:18:38 +03:00
if(outerClassWrapper != null)
{
2004-08-17 13:05:21 +04:00
outerClassWrapper.Finish(forDebugSave);
2003-02-20 17:18:38 +03:00
}
2003-06-03 12:38:37 +04:00
// NOTE there is a bug in the CLR (.NET 1.0 & 1.1 [1.2 is not yet available]) that
// causes the AppDomain.TypeResolve event to receive the incorrect type name for nested types.
// The Name in the ResolveEventArgs contains only the nested type name, not the full type name,
// for example, if the type being resolved is "MyOuterType+MyInnerType", then the event only
// receives "MyInnerType" as the name. Since we only compile inner classes as nested types
// when we're statically compiling, we can only run into this bug when we're statically compiling.
// NOTE To work around this bug, we have to make sure that all types that are going to be
// required in finished form, are finished explicitly here. It isn't clear what other types are
// required to be finished. I instrumented a static compilation of classpath.dll and this
// turned up no other cases of the TypeResolve event firing.
for(int i = 0; i < wrapper.Interfaces.Length; i++)
{
2004-08-17 13:05:21 +04:00
wrapper.Interfaces[i].Finish(forDebugSave);
2003-06-03 12:38:37 +04:00
}
2003-01-02 18:44:17 +03:00
// make sure all classes are loaded, before we start finishing the type. During finishing, we
// may not run any Java code, because that might result in a request to finish the type that we
// are in the process of finishing, and this would be a problem.
2004-08-30 19:56:23 +04:00
classFile.Link(wrapper, classCache);
2005-01-03 11:26:21 +03:00
for(int i = 0; i < fields.Length; i++)
{
fields[i].Link();
}
2004-08-17 13:05:21 +04:00
for(int i = 0; i < methods.Length; i++)
{
methods[i].Link();
}
2003-01-02 18:44:17 +03:00
// it is possible that the loading of the referenced classes triggered a finish of us,
// if that happens, we just return
if(finishedType != null)
2002-12-18 19:00:25 +03:00
{
2003-01-02 18:44:17 +03:00
return finishedType;
2002-12-18 19:00:25 +03:00
}
2003-05-30 16:08:59 +04:00
Profiler.Enter("JavaTypeImpl.Finish.Core");
2003-01-02 18:44:17 +03:00
try
2002-12-18 19:00:25 +03:00
{
2003-05-30 16:08:59 +04:00
Debug.Assert(!finishing);
2003-01-02 18:44:17 +03:00
finishing = true;
2003-05-30 16:08:59 +04:00
TypeWrapper declaringTypeWrapper = null;
TypeWrapper[] innerClassesTypeWrappers = TypeWrapper.EmptyArray;
// if we're an inner class, we need to attach an InnerClass attribute
2003-02-18 12:30:34 +03:00
ClassFile.InnerClass[] innerclasses = classFile.InnerClasses;
2003-05-30 16:08:59 +04:00
if(innerclasses != null)
2003-02-18 12:30:34 +03:00
{
2003-05-30 16:08:59 +04:00
// TODO consider not pre-computing innerClassesTypeWrappers and declaringTypeWrapper here
ArrayList wrappers = new ArrayList();
for(int i = 0; i < innerclasses.Length; i++)
2003-02-18 12:30:34 +03:00
{
2003-05-30 16:08:59 +04:00
if(innerclasses[i].innerClass != 0 && innerclasses[i].outerClass != 0)
2003-02-18 12:30:34 +03:00
{
2004-08-30 19:56:23 +04:00
if(classFile.GetConstantPoolClassType(innerclasses[i].outerClass) == wrapper)
2003-05-30 16:08:59 +04:00
{
2004-08-30 19:56:23 +04:00
wrappers.Add(classFile.GetConstantPoolClassType(innerclasses[i].innerClass));
2003-05-30 16:08:59 +04:00
}
2004-08-30 19:56:23 +04:00
if(classFile.GetConstantPoolClassType(innerclasses[i].innerClass) == wrapper)
2003-05-30 16:08:59 +04:00
{
2004-08-30 19:56:23 +04:00
declaringTypeWrapper = classFile.GetConstantPoolClassType(innerclasses[i].outerClass);
2003-08-21 14:06:34 +04:00
AttributeHelper.SetInnerClass(typeBuilder,
2003-05-30 16:08:59 +04:00
classFile.GetConstantPoolClass(innerclasses[i].innerClass),
classFile.GetConstantPoolClass(innerclasses[i].outerClass),
innerclasses[i].name == 0 ? null : classFile.GetConstantPoolUtf8String(innerclasses[i].name),
2004-08-17 13:05:21 +04:00
innerclasses[i].accessFlags);
2003-05-30 16:08:59 +04:00
}
2003-02-18 12:30:34 +03:00
}
}
2003-05-30 16:08:59 +04:00
innerClassesTypeWrappers = (TypeWrapper[])wrappers.ToArray(typeof(TypeWrapper));
2003-02-18 12:30:34 +03:00
}
2003-10-17 12:08:31 +04:00
if(typeBuilderGhostInterface != null)
{
// TODO consider adding methods from base interface and java.lang.Object as well
for(int i = 0; i < methods.Length; i++)
{
// skip <clinit>
if(!methods[i].IsStatic)
{
2004-08-17 13:05:21 +04:00
TypeWrapper[] args = methods[i].GetParameters();
MethodBuilder stub = typeBuilder.DefineMethod(methods[i].Name, MethodAttributes.Public, methods[i].ReturnTypeForDefineMethod, methods[i].GetParametersForDefineMethod());
2003-10-17 12:08:31 +04:00
AttributeHelper.SetModifiers(stub, methods[i].Modifiers);
ILGenerator ilgen = stub.GetILGenerator();
Label end = ilgen.DefineLabel();
2004-03-08 18:18:47 +03:00
TypeWrapper[] implementers = GetGhostImplementers(wrapper);
2003-10-17 12:08:31 +04:00
ilgen.Emit(OpCodes.Ldarg_0);
ilgen.Emit(OpCodes.Ldfld, wrapper.GhostRefField);
ilgen.Emit(OpCodes.Dup);
ilgen.Emit(OpCodes.Isinst, wrapper.TypeAsBaseType);
Label label = ilgen.DefineLabel();
ilgen.Emit(OpCodes.Brfalse_S, label);
ilgen.Emit(OpCodes.Castclass, wrapper.TypeAsBaseType);
for(int k = 0; k < args.Length; k++)
{
ilgen.Emit(OpCodes.Ldarg_S, (byte)(k + 1));
}
ilgen.Emit(OpCodes.Callvirt, (MethodInfo)methods[i].GetMethod());
ilgen.Emit(OpCodes.Br, end);
ilgen.MarkLabel(label);
for(int j = 0; j < implementers.Length; j++)
{
ilgen.Emit(OpCodes.Dup);
2004-03-08 18:18:47 +03:00
ilgen.Emit(OpCodes.Isinst, implementers[j].TypeAsTBD);
2003-10-17 12:08:31 +04:00
label = ilgen.DefineLabel();
ilgen.Emit(OpCodes.Brfalse_S, label);
2004-03-08 18:18:47 +03:00
ilgen.Emit(OpCodes.Castclass, implementers[j].TypeAsTBD);
2003-10-17 12:08:31 +04:00
for(int k = 0; k < args.Length; k++)
{
ilgen.Emit(OpCodes.Ldarg_S, (byte)(k + 1));
}
2005-01-03 11:26:21 +03:00
MethodWrapper mw = implementers[j].GetMethodWrapper(methods[i].Name, methods[i].Signature, true);
2004-08-17 13:05:21 +04:00
mw.EmitCallvirt(ilgen);
2003-10-17 12:08:31 +04:00
ilgen.Emit(OpCodes.Br, end);
ilgen.MarkLabel(label);
}
// we need to do a null check (null fails all the isinst checks)
2004-03-08 18:18:47 +03:00
EmitHelper.NullCheck(ilgen);
2003-10-17 12:08:31 +04:00
EmitHelper.Throw(ilgen, "java.lang.IncompatibleClassChangeError", wrapper.Name);
ilgen.MarkLabel(end);
ilgen.Emit(OpCodes.Ret);
}
}
// HACK create a scope to enable reuse of "implementers" name
if(true)
{
MethodBuilder mb;
ILGenerator ilgen;
LocalBuilder local;
// add implicit conversions for all the ghost implementers
2004-03-08 18:18:47 +03:00
TypeWrapper[] implementers = GetGhostImplementers(wrapper);
2003-10-17 12:08:31 +04:00
for(int i = 0; i < implementers.Length; i++)
{
mb = typeBuilder.DefineMethod("op_Implicit", MethodAttributes.Public | MethodAttributes.Static | MethodAttributes.SpecialName, wrapper.TypeAsParameterType, new Type[] { implementers[i].TypeAsParameterType });
2004-08-17 13:05:21 +04:00
AttributeHelper.HideFromJava(mb);
2003-10-17 12:08:31 +04:00
ilgen = mb.GetILGenerator();
local = ilgen.DeclareLocal(wrapper.TypeAsParameterType);
ilgen.Emit(OpCodes.Ldloca, local);
ilgen.Emit(OpCodes.Ldarg_0);
ilgen.Emit(OpCodes.Stfld, wrapper.GhostRefField);
ilgen.Emit(OpCodes.Ldloca, local);
ilgen.Emit(OpCodes.Ldobj, wrapper.TypeAsParameterType);
ilgen.Emit(OpCodes.Ret);
}
2004-01-18 01:46:43 +03:00
// Implement the "IsInstance" method
mb = wrapper.ghostIsInstanceMethod;
2004-08-17 13:05:21 +04:00
AttributeHelper.HideFromJava(mb);
2003-10-17 12:08:31 +04:00
ilgen = mb.GetILGenerator();
Label end = ilgen.DefineLabel();
for(int i = 0; i < implementers.Length; i++)
{
ilgen.Emit(OpCodes.Ldarg_0);
2004-03-08 18:18:47 +03:00
ilgen.Emit(OpCodes.Isinst, implementers[i].TypeAsTBD);
2003-10-17 12:08:31 +04:00
Label label = ilgen.DefineLabel();
ilgen.Emit(OpCodes.Brfalse_S, label);
ilgen.Emit(OpCodes.Ldc_I4_1);
ilgen.Emit(OpCodes.Br, end);
ilgen.MarkLabel(label);
}
ilgen.Emit(OpCodes.Ldarg_0);
ilgen.Emit(OpCodes.Isinst, wrapper.TypeAsBaseType);
ilgen.Emit(OpCodes.Ldnull);
2004-08-30 19:56:23 +04:00
ilgen.Emit(OpCodes.Cgt_Un);
2003-10-17 12:08:31 +04:00
ilgen.MarkLabel(end);
ilgen.Emit(OpCodes.Ret);
2004-03-08 18:18:47 +03:00
// Implement the "IsInstanceArray" method
mb = wrapper.ghostIsInstanceArrayMethod;
2004-08-17 13:05:21 +04:00
AttributeHelper.HideFromJava(mb);
2004-03-08 18:18:47 +03:00
ilgen = mb.GetILGenerator();
LocalBuilder localType = ilgen.DeclareLocal(typeof(Type));
ilgen.Emit(OpCodes.Ldarg_0);
Label skip = ilgen.DefineLabel();
ilgen.Emit(OpCodes.Brtrue_S, skip);
ilgen.Emit(OpCodes.Ldc_I4_0);
ilgen.Emit(OpCodes.Ret);
ilgen.MarkLabel(skip);
ilgen.Emit(OpCodes.Ldarg_0);
ilgen.Emit(OpCodes.Call, typeof(object).GetMethod("GetType"));
ilgen.Emit(OpCodes.Stloc, localType);
skip = ilgen.DefineLabel();
ilgen.Emit(OpCodes.Br_S, skip);
Label iter = ilgen.DefineLabel();
ilgen.MarkLabel(iter);
ilgen.Emit(OpCodes.Ldarg_1);
ilgen.Emit(OpCodes.Ldc_I4_1);
ilgen.Emit(OpCodes.Sub);
ilgen.Emit(OpCodes.Starg_S, (byte)1);
ilgen.Emit(OpCodes.Ldloc, localType);
ilgen.Emit(OpCodes.Callvirt, typeof(Type).GetMethod("GetElementType"));
ilgen.Emit(OpCodes.Stloc, localType);
ilgen.MarkLabel(skip);
ilgen.Emit(OpCodes.Ldloc, localType);
ilgen.Emit(OpCodes.Callvirt, typeof(Type).GetMethod("get_IsArray"));
ilgen.Emit(OpCodes.Brtrue_S, iter);
ilgen.Emit(OpCodes.Ldarg_1);
skip = ilgen.DefineLabel();
ilgen.Emit(OpCodes.Brfalse_S, skip);
ilgen.Emit(OpCodes.Ldc_I4_0);
ilgen.Emit(OpCodes.Ret);
ilgen.MarkLabel(skip);
for(int i = 0; i < implementers.Length; i++)
{
ilgen.Emit(OpCodes.Ldtoken, implementers[i].TypeAsTBD);
ilgen.Emit(OpCodes.Call, typeof(Type).GetMethod("GetTypeFromHandle"));
ilgen.Emit(OpCodes.Ldloc, localType);
ilgen.Emit(OpCodes.Callvirt, typeof(Type).GetMethod("IsAssignableFrom"));
Label label = ilgen.DefineLabel();
ilgen.Emit(OpCodes.Brfalse_S, label);
ilgen.Emit(OpCodes.Ldc_I4_1);
ilgen.Emit(OpCodes.Ret);
ilgen.MarkLabel(label);
}
ilgen.Emit(OpCodes.Ldtoken, wrapper.TypeAsBaseType);
ilgen.Emit(OpCodes.Call, typeof(Type).GetMethod("GetTypeFromHandle"));
ilgen.Emit(OpCodes.Ldloc, localType);
ilgen.Emit(OpCodes.Callvirt, typeof(Type).GetMethod("IsAssignableFrom"));
ilgen.Emit(OpCodes.Ret);
2004-01-18 01:46:43 +03:00
// Implement the "Cast" method
mb = wrapper.ghostCastMethod;
2004-08-17 13:05:21 +04:00
AttributeHelper.HideFromJava(mb);
2003-10-17 12:08:31 +04:00
ilgen = mb.GetILGenerator();
end = ilgen.DefineLabel();
for(int i = 0; i < implementers.Length; i++)
{
ilgen.Emit(OpCodes.Ldarg_0);
2004-03-08 18:18:47 +03:00
ilgen.Emit(OpCodes.Isinst, implementers[i].TypeAsTBD);
2003-10-17 12:08:31 +04:00
ilgen.Emit(OpCodes.Brtrue, end);
}
ilgen.Emit(OpCodes.Ldarg_0);
ilgen.Emit(OpCodes.Castclass, wrapper.TypeAsBaseType);
ilgen.Emit(OpCodes.Pop);
ilgen.MarkLabel(end);
local = ilgen.DeclareLocal(wrapper.TypeAsParameterType);
ilgen.Emit(OpCodes.Ldloca, local);
ilgen.Emit(OpCodes.Ldarg_0);
2004-03-08 18:18:47 +03:00
ilgen.Emit(OpCodes.Stfld, wrapper.ghostRefField);
2003-10-17 12:08:31 +04:00
ilgen.Emit(OpCodes.Ldloca, local);
ilgen.Emit(OpCodes.Ldobj, wrapper.TypeAsParameterType);
ilgen.Emit(OpCodes.Ret);
// Add "ToObject" methods
mb = typeBuilder.DefineMethod("ToObject", MethodAttributes.Public, typeof(object), Type.EmptyTypes);
2004-08-17 13:05:21 +04:00
AttributeHelper.HideFromJava(mb);
2003-10-17 12:08:31 +04:00
ilgen = mb.GetILGenerator();
ilgen.Emit(OpCodes.Ldarg_0);
ilgen.Emit(OpCodes.Ldfld, wrapper.GhostRefField);
ilgen.Emit(OpCodes.Ret);
2004-03-08 18:18:47 +03:00
// Implement the "CastArray" method
// NOTE unlike "Cast" this doesn't return anything, it just throws a ClassCastException if the
// cast is unsuccessful. Also, because of the complexity of this test, we call IsInstanceArray
// instead of reimplementing the check here.
mb = wrapper.ghostCastArrayMethod;
2004-08-17 13:05:21 +04:00
AttributeHelper.HideFromJava(mb);
2004-03-08 18:18:47 +03:00
ilgen = mb.GetILGenerator();
end = ilgen.DefineLabel();
ilgen.Emit(OpCodes.Ldarg_0);
ilgen.Emit(OpCodes.Brfalse_S, end);
ilgen.Emit(OpCodes.Ldarg_0);
ilgen.Emit(OpCodes.Ldarg_1);
ilgen.Emit(OpCodes.Call, wrapper.ghostIsInstanceArrayMethod);
ilgen.Emit(OpCodes.Brtrue_S, end);
EmitHelper.Throw(ilgen, "java.lang.ClassCastException");
ilgen.MarkLabel(end);
ilgen.Emit(OpCodes.Ret);
2003-10-17 12:08:31 +04:00
}
}
2003-03-28 17:33:47 +03:00
// if we're not abstract make sure we don't inherit any abstract methods
if(!wrapper.IsAbstract)
{
TypeWrapper parent = wrapper.BaseTypeWrapper;
// if parent is not abstract, the .NET implementation will never have abstract methods (only
// stubs that throw AbstractMethodError)
2003-06-10 17:28:47 +04:00
// NOTE interfaces are supposed to be abstract, but the VM doesn't enforce this, so
// we have to check for a null parent (interfaces have no parent).
while(parent != null && parent.IsAbstract)
2003-03-28 17:33:47 +03:00
{
2004-08-17 13:05:21 +04:00
foreach(MethodWrapper mw in parent.GetMethods())
2003-03-28 17:33:47 +03:00
{
2004-08-17 13:05:21 +04:00
MethodInfo mi = mw.GetMethod() as MethodInfo;
2005-01-03 11:26:21 +03:00
if(mi != null && mi.IsAbstract && wrapper.GetMethodWrapper(mw.Name, mw.Signature, true).IsAbstract)
2003-03-28 17:33:47 +03:00
{
2003-05-10 19:34:49 +04:00
// NOTE in Sun's JRE 1.4.1 this method cannot be overridden by subclasses,
// but I think this is a bug, so we'll support it anyway.
2004-08-17 13:05:21 +04:00
MethodBuilder mb = typeBuilder.DefineMethod(mi.Name, mi.Attributes & ~(MethodAttributes.Abstract|MethodAttributes.NewSlot), CallingConventions.Standard, mw.ReturnTypeForDefineMethod, mw.GetParametersForDefineMethod());
AttributeHelper.HideFromJava(mb);
EmitHelper.Throw(mb.GetILGenerator(), "java.lang.AbstractMethodError", wrapper.Name + "." + mw.Name + mw.Signature);
2003-03-28 17:33:47 +03:00
}
}
parent = parent.BaseTypeWrapper;
}
}
2004-12-21 13:26:51 +03:00
string verifyError = null;
2004-09-15 17:35:44 +04:00
bool basehasclinit = wrapper.BaseTypeWrapper != null && wrapper.BaseTypeWrapper.HasStaticInitializer;
2003-01-02 18:44:17 +03:00
bool hasclinit = false;
2004-08-17 13:05:21 +04:00
for(int i = 0; i < classFile.Methods.Length; i++)
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
ClassFile.Method m = classFile.Methods[i];
2003-01-02 18:44:17 +03:00
MethodBase mb = methods[i].GetMethod();
2002-12-18 19:00:25 +03:00
if(mb is ConstructorBuilder)
{
2004-08-17 13:05:21 +04:00
ILGenerator ilGenerator = ((ConstructorBuilder)mb).GetILGenerator();
2004-08-30 19:56:23 +04:00
Tracer.EmitMethodTrace(ilGenerator, classFile.Name + "." + m.Name + m.Signature);
2004-08-17 13:05:21 +04:00
if(basehasclinit && m.IsClassInitializer && !classFile.IsInterface)
2003-01-02 18:44:17 +03:00
{
hasclinit = true;
2003-12-20 01:19:18 +03:00
// before we call the base class initializer, we need to set the non-final static ConstantValue fields
EmitConstantValueInitialization(ilGenerator);
2003-05-30 16:08:59 +04:00
EmitHelper.RunClassConstructor(ilGenerator, Type.BaseType);
2003-01-02 18:44:17 +03:00
}
2004-12-21 13:26:51 +03:00
Compiler.Compile(wrapper, methods[i], classFile, m, ilGenerator, ref verifyError);
2002-12-18 19:00:25 +03:00
}
else
{
2004-08-17 13:05:21 +04:00
if(m.IsAbstract)
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
// NOTE in the JVM it is apparently legal for a non-abstract class to have abstract methods, but
// the CLR doens't allow this, so we have to emit a method that throws an AbstractMethodError
2004-10-19 17:43:55 +04:00
if(!classFile.IsAbstract)
2003-01-02 18:44:17 +03:00
{
2004-08-17 13:05:21 +04:00
ILGenerator ilGenerator = ((MethodBuilder)mb).GetILGenerator();
2004-08-30 19:56:23 +04:00
Tracer.EmitMethodTrace(ilGenerator, classFile.Name + "." + m.Name + m.Signature);
EmitHelper.Throw(ilGenerator, "java.lang.AbstractMethodError", classFile.Name + "." + m.Name + m.Signature);
2002-12-18 19:00:25 +03:00
}
2004-08-17 13:05:21 +04:00
}
else if(m.IsNative)
{
Profiler.Enter("JavaTypeImpl.Finish.Native");
try
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
ILGenerator ilGenerator = ((MethodBuilder)mb).GetILGenerator();
2004-08-30 19:56:23 +04:00
Tracer.EmitMethodTrace(ilGenerator, classFile.Name + "." + m.Name + m.Signature);
2004-08-17 13:05:21 +04:00
// do we have a native implementation in map.xml?
if(nativeMethods != null)
2003-11-17 15:01:50 +03:00
{
2004-08-17 13:05:21 +04:00
CodeEmitter opcodes = (CodeEmitter)nativeMethods[classFile.Name + "." + m.Name + m.Signature];
if(opcodes != null)
{
opcodes.Emit(ilGenerator);
continue;
}
2003-11-17 15:01:50 +03:00
}
2004-09-09 15:17:55 +04:00
// see if there exists a IKVM.NativeCode class for this type
Type nativeCodeType = Type.GetType("IKVM.NativeCode." + classFile.Name.Replace('$', '+'));
2004-08-17 13:05:21 +04:00
MethodInfo nativeMethod = null;
2004-08-30 19:56:23 +04:00
TypeWrapper[] args = methods[i].GetParameters();
2004-08-17 13:05:21 +04:00
if(nativeCodeType != null)
2003-11-17 15:01:50 +03:00
{
2004-08-17 13:05:21 +04:00
TypeWrapper[] nargs = args;
if(!m.IsStatic)
2003-11-17 15:01:50 +03:00
{
2004-08-17 13:05:21 +04:00
nargs = new TypeWrapper[args.Length + 1];
args.CopyTo(nargs, 1);
nargs[0] = this.wrapper;
2003-11-17 15:01:50 +03:00
}
2004-08-17 13:05:21 +04:00
MethodInfo[] nativeCodeTypeMethods = nativeCodeType.GetMethods(BindingFlags.Static | BindingFlags.Public);
foreach(MethodInfo method in nativeCodeTypeMethods)
2003-11-17 15:01:50 +03:00
{
2004-08-17 13:05:21 +04:00
ParameterInfo[] param = method.GetParameters();
TypeWrapper[] match = new TypeWrapper[param.Length];
for(int j = 0; j < param.Length; j++)
{
match[j] = ClassLoaderWrapper.GetWrapperFromType(param[j].ParameterType);
}
if(m.Name == method.Name && IsCompatibleArgList(nargs, match))
{
// TODO instead of taking the first matching method, we should find the best one
nativeMethod = method;
break;
}
2003-11-17 15:01:50 +03:00
}
}
2004-08-17 13:05:21 +04:00
if(nativeMethod != null)
2003-01-02 18:44:17 +03:00
{
2004-08-17 13:05:21 +04:00
int add = 0;
if(!m.IsStatic)
{
ilGenerator.Emit(OpCodes.Ldarg_0);
add = 1;
}
for(int j = 0; j < args.Length; j++)
{
ilGenerator.Emit(OpCodes.Ldarg_S, (byte)(j + add));
}
ilGenerator.Emit(OpCodes.Call, nativeMethod);
TypeWrapper retTypeWrapper = methods[i].ReturnType;
if(!retTypeWrapper.TypeAsTBD.Equals(nativeMethod.ReturnType) && !retTypeWrapper.IsGhost)
{
ilGenerator.Emit(OpCodes.Castclass, retTypeWrapper.TypeAsTBD);
}
ilGenerator.Emit(OpCodes.Ret);
2003-01-02 18:44:17 +03:00
}
2004-08-17 13:05:21 +04:00
else
2003-01-02 18:44:17 +03:00
{
2004-08-17 13:05:21 +04:00
if(JVM.NoJniStubs)
{
// since NoJniStubs can only be set when we're statically compiling, it is safe to use the "compiler" trace switch
Tracer.Warning(Tracer.Compiler, "Native method not implemented: {0}.{1}.{2}", classFile.Name, m.Name, m.Signature);
EmitHelper.Throw(ilGenerator, "java.lang.UnsatisfiedLinkError", "Native method not implemented: " + classFile.Name + "." + m.Name + m.Signature);
}
else
{
if(ClassLoaderWrapper.IsSaveDebugImage)
{
2004-08-30 19:56:23 +04:00
JniProxyBuilder.Generate(ilGenerator, wrapper, methods[i], typeBuilder, classFile, m, args);
2004-08-17 13:05:21 +04:00
}
else
{
2004-09-05 13:37:58 +04:00
JniBuilder.Generate(ilGenerator, wrapper, methods[i], typeBuilder, classFile, m, args, false);
2004-08-17 13:05:21 +04:00
}
}
2003-01-02 18:44:17 +03:00
}
}
2004-08-17 13:05:21 +04:00
finally
2003-01-02 18:44:17 +03:00
{
2004-08-17 13:05:21 +04:00
Profiler.Leave("JavaTypeImpl.Finish.Native");
2003-01-02 18:44:17 +03:00
}
2003-05-30 16:08:59 +04:00
}
2004-08-17 13:05:21 +04:00
else
2003-05-30 16:08:59 +04:00
{
2004-08-17 13:05:21 +04:00
ILGenerator ilGenerator = ((MethodBuilder)mb).GetILGenerator();
2004-08-30 19:56:23 +04:00
Tracer.EmitMethodTrace(ilGenerator, classFile.Name + "." + m.Name + m.Signature);
2004-11-23 20:46:39 +03:00
if(nativeMethods != null)
{
CodeEmitter opcodes = (CodeEmitter)nativeMethods[classFile.Name + "." + m.Name + m.Signature];
if(opcodes != null)
{
opcodes.Emit(ilGenerator);
continue;
}
}
2004-12-21 13:26:51 +03:00
Compiler.Compile(wrapper, methods[i], classFile, m, ilGenerator, ref verifyError);
2002-12-27 12:01:16 +03:00
}
2003-01-02 18:44:17 +03:00
}
2002-12-18 19:00:25 +03:00
}
2004-08-17 13:05:21 +04:00
// NOTE non-final fields aren't allowed in interfaces so we don't have to initialize constant fields
2003-01-02 18:44:17 +03:00
if(!classFile.IsInterface)
2002-12-18 19:00:25 +03:00
{
2003-12-20 01:19:18 +03:00
// if we don't have a <clinit> we may need to inject one
if(!hasclinit)
2003-05-30 16:08:59 +04:00
{
2003-12-20 01:19:18 +03:00
bool hasconstantfields = false;
if(!basehasclinit)
{
foreach(ClassFile.Field f in classFile.Fields)
{
if(f.IsStatic && !f.IsFinal && f.ConstantValue != null)
{
hasconstantfields = true;
break;
}
}
}
if(basehasclinit || hasconstantfields)
{
ConstructorBuilder cb = DefineClassInitializer();
2004-08-17 13:05:21 +04:00
AttributeHelper.HideFromJava(cb);
2003-12-20 01:19:18 +03:00
ILGenerator ilGenerator = cb.GetILGenerator();
EmitConstantValueInitialization(ilGenerator);
if(basehasclinit)
{
EmitHelper.RunClassConstructor(ilGenerator, Type.BaseType);
}
ilGenerator.Emit(OpCodes.Ret);
}
2003-05-30 16:08:59 +04:00
}
2003-01-02 18:44:17 +03:00
// here we loop thru all the interfaces to explicitly implement any methods that we inherit from
// base types that may have a different name from the name in the interface
// (e.g. interface that has an equals() method that should override System.Object.Equals())
// also deals with interface methods that aren't implemented (generate a stub that throws AbstractMethodError)
// and with methods that aren't public (generate a stub that throws IllegalAccessError)
Hashtable doneSet = new Hashtable();
2003-05-30 16:08:59 +04:00
TypeWrapper[] interfaces = wrapper.Interfaces;
2003-01-02 18:44:17 +03:00
for(int i = 0; i < interfaces.Length; i++)
{
2003-10-17 12:08:31 +04:00
// if we implement a ghost interface, add an implicit conversion to the ghost reference value type
2004-08-17 13:05:21 +04:00
// TODO do this for indirectly implemented interfaces (interfaces implemented by interfaces) as well
2003-10-17 12:08:31 +04:00
if(interfaces[i].IsGhost)
{
MethodBuilder mb = typeBuilder.DefineMethod("op_Implicit", MethodAttributes.Public | MethodAttributes.Static | MethodAttributes.SpecialName, interfaces[i].TypeAsParameterType, new Type[] { wrapper.TypeAsParameterType });
2004-08-17 13:05:21 +04:00
AttributeHelper.HideFromJava(mb);
2003-10-17 12:08:31 +04:00
ILGenerator ilgen = mb.GetILGenerator();
LocalBuilder local = ilgen.DeclareLocal(interfaces[i].TypeAsParameterType);
ilgen.Emit(OpCodes.Ldloca, local);
ilgen.Emit(OpCodes.Ldarg_0);
ilgen.Emit(OpCodes.Stfld, interfaces[i].GhostRefField);
ilgen.Emit(OpCodes.Ldloca, local);
ilgen.Emit(OpCodes.Ldobj, interfaces[i].TypeAsParameterType);
ilgen.Emit(OpCodes.Ret);
}
2003-01-02 18:44:17 +03:00
interfaces[i].ImplementInterfaceMethodStubs(typeBuilder, wrapper, doneSet);
}
2003-05-13 00:00:15 +04:00
// if any of our base classes has an incomplete interface implementation we need to look through all
// the base class interfaces to see if we've got an implementation now
TypeWrapper baseTypeWrapper = wrapper.BaseTypeWrapper;
while(baseTypeWrapper.HasIncompleteInterfaceImplementation)
{
for(int i = 0; i < baseTypeWrapper.Interfaces.Length; i++)
{
baseTypeWrapper.Interfaces[i].ImplementInterfaceMethodStubs(typeBuilder, wrapper, doneSet);
}
baseTypeWrapper = baseTypeWrapper.BaseTypeWrapper;
}
2004-08-17 13:05:21 +04:00
foreach(MethodWrapper mw in methods)
{
if(mw.Name != "<init>" && !mw.IsStatic && !mw.IsPrivate)
{
if(wrapper.BaseTypeWrapper != null && wrapper.BaseTypeWrapper.HasIncompleteInterfaceImplementation)
{
Hashtable hashtable = null;
TypeWrapper tw = wrapper.BaseTypeWrapper;
while(tw.HasIncompleteInterfaceImplementation)
{
foreach(TypeWrapper iface in tw.Interfaces)
{
2005-01-03 11:26:21 +03:00
AddMethodOverride(mw, (MethodBuilder)mw.GetMethod(), iface, mw.Name, mw.Signature, ref hashtable, false);
2004-08-17 13:05:21 +04:00
}
tw = tw.BaseTypeWrapper;
}
}
if(true)
{
Hashtable hashtable = null;
foreach(TypeWrapper iface in wrapper.Interfaces)
{
2005-01-03 11:26:21 +03:00
AddMethodOverride(mw, (MethodBuilder)mw.GetMethod(), iface, mw.Name, mw.Signature, ref hashtable, true);
2004-08-17 13:05:21 +04:00
}
}
}
}
2002-12-18 19:00:25 +03:00
}
2005-01-03 11:26:21 +03:00
// If we're an interface that has public/protected fields, we create an inner class
// to expose these fields to C# (which stubbornly refuses to see fields in interfaces).
TypeBuilder tbFields = null;
if(JVM.IsStaticCompiler && classFile.IsInterface && !wrapper.IsGhost && classFile.Fields.Length > 0)
{
// TODO handle name clash
tbFields = typeBuilder.DefineNestedType("__Fields", TypeAttributes.Class | TypeAttributes.NestedPublic | TypeAttributes.Sealed);
tbFields.DefineDefaultConstructor(MethodAttributes.Private);
AttributeHelper.HideFromJava(tbFields);
ILGenerator ilgenClinit = null;
foreach(ClassFile.Field f in classFile.Fields)
{
TypeWrapper typeWrapper = ClassFile.FieldTypeWrapperFromSig(wrapper.GetClassLoader(), classCache, f.Signature);
if(f.ConstantValue != null)
{
FieldAttributes attribs = FieldAttributes.Public | FieldAttributes.Static | FieldAttributes.Literal;
FieldBuilder fb = tbFields.DefineField(f.Name, typeWrapper.TypeAsFieldType, attribs);
fb.SetConstant(f.ConstantValue);
}
else
{
FieldAttributes attribs = FieldAttributes.Public | FieldAttributes.Static | FieldAttributes.InitOnly;
FieldBuilder fb = tbFields.DefineField(f.Name, typeWrapper.TypeAsFieldType, attribs);
if(ilgenClinit == null)
{
ilgenClinit = tbFields.DefineTypeInitializer().GetILGenerator();
}
wrapper.GetFieldWrapper(f.Name, f.Signature).EmitGet(ilgenClinit);
ilgenClinit.Emit(OpCodes.Stsfld, fb);
}
}
if(ilgenClinit != null)
{
ilgenClinit.Emit(OpCodes.Ret);
}
}
2002-12-29 19:27:00 +03:00
Type type;
Profiler.Enter("TypeBuilder.CreateType");
try
{
type = typeBuilder.CreateType();
2005-01-03 11:26:21 +03:00
if(tbFields != null)
{
tbFields.CreateType();
}
BakedTypeCleanupHack.Process(wrapper);
2002-12-29 19:27:00 +03:00
}
finally
{
Profiler.Leave("TypeBuilder.CreateType");
}
2002-12-18 19:00:25 +03:00
ClassLoaderWrapper.SetWrapperForType(type, wrapper);
2004-12-21 13:26:51 +03:00
if(verifyError != null)
{
return new DoomedTypeImpl(verifyError);
}
else
{
finishedType = new FinishedTypeImpl(type, typeBuilderGhostInterface != null ? typeBuilderGhostInterface.CreateType() : null, innerClassesTypeWrappers, declaringTypeWrapper, this.ReflectiveModifiers);
return finishedType;
}
2002-12-18 19:00:25 +03:00
}
2003-01-02 18:44:17 +03:00
catch(Exception x)
2002-12-18 19:00:25 +03:00
{
2003-12-24 14:51:41 +03:00
JVM.CriticalFailure("Exception during finishing of: " + wrapper.Name, x);
return null;
}
finally
{
Profiler.Leave("JavaTypeImpl.Finish.Core");
}
}
internal class JniProxyBuilder
{
private static ModuleBuilder mod;
private static int count;
2004-09-05 13:37:58 +04:00
static JniProxyBuilder()
{
2004-11-16 14:11:53 +03:00
mod = ((AssemblyBuilder)ClassLoaderWrapper.GetBootstrapClassLoader().ModuleBuilder.Assembly).DefineDynamicModule("jniproxy.dll", "jniproxy.dll");
2004-09-05 13:37:58 +04:00
}
2003-12-24 14:51:41 +03:00
private static string Cleanup(string n)
{
n = n.Replace('\\', '_');
n = n.Replace('[', '_');
n = n.Replace(']', '_');
n = n.Replace('+', '_');
n = n.Replace(',', '_');
return n;
}
2004-09-17 13:32:06 +04:00
internal static void Generate(ILGenerator ilGenerator, DynamicTypeWrapper wrapper, MethodWrapper mw, TypeBuilder typeBuilder, ClassFile classFile, ClassFile.Method m, TypeWrapper[] args)
2003-12-24 14:51:41 +03:00
{
TypeBuilder tb = mod.DefineType("class" + (count++), TypeAttributes.Public | TypeAttributes.Class);
int instance = m.IsStatic ? 0 : 1;
2004-09-05 13:37:58 +04:00
Type[] argTypes = new Type[args.Length + instance + 1];
2003-12-24 14:51:41 +03:00
if(instance != 0)
2003-08-13 19:00:41 +04:00
{
2003-12-24 14:51:41 +03:00
argTypes[0] = wrapper.TypeAsParameterType;
2003-08-13 19:00:41 +04:00
}
2004-09-27 14:17:34 +04:00
for(int i = 0; i < args.Length; i++)
2003-08-13 19:00:41 +04:00
{
2004-09-27 14:17:34 +04:00
argTypes[i + instance] = args[i].TypeAsParameterType;
2003-08-13 19:00:41 +04:00
}
2004-09-05 13:37:58 +04:00
argTypes[argTypes.Length - 1] = typeof(RuntimeMethodHandle);
2004-08-30 19:56:23 +04:00
MethodBuilder mb = tb.DefineMethod("method", MethodAttributes.Public | MethodAttributes.Static, mw.ReturnType.TypeAsParameterType, argTypes);
2004-09-05 13:37:58 +04:00
JniBuilder.Generate(mb.GetILGenerator(), wrapper, mw, tb, classFile, m, args, true);
for(int i = 0; i < argTypes.Length - 1; i++)
2003-08-13 19:00:41 +04:00
{
2004-08-17 13:05:21 +04:00
ilGenerator.Emit(OpCodes.Ldarg, (short)i);
2003-08-13 19:00:41 +04:00
}
2004-09-05 13:37:58 +04:00
ilGenerator.Emit(OpCodes.Ldtoken, (MethodInfo)mw.GetMethod());
2003-12-24 14:51:41 +03:00
ilGenerator.Emit(OpCodes.Call, mb);
ilGenerator.Emit(OpCodes.Ret);
2004-08-17 13:05:21 +04:00
Type type = tb.CreateType();
// HACK since we're creating a type in the dynamic assembly, we must also register its wrapper,
// because the ClassLoaderWrapper assumes that all dynamic types are in its hashtable,
// but note that this only registers it for reverse lookup (from Type -> TypeWrapper), this
// is necessary to make stack walking work.
ClassLoaderWrapper.SetWrapperForType(type, new CompiledTypeWrapper(type.FullName, type));
2003-05-30 16:08:59 +04:00
}
}
private class JniBuilder
{
2004-09-09 15:17:55 +04:00
private static readonly Type localRefStructType = typeof(IKVM.Runtime.JNI.Frame);
2004-08-30 19:56:23 +04:00
private static readonly MethodInfo jniFuncPtrMethod = localRefStructType.GetMethod("GetFuncPtr");
2003-05-30 16:08:59 +04:00
private static readonly MethodInfo enterLocalRefStruct = localRefStructType.GetMethod("Enter");
private static readonly MethodInfo leaveLocalRefStruct = localRefStructType.GetMethod("Leave");
private static readonly MethodInfo makeLocalRef = localRefStructType.GetMethod("MakeLocalRef");
private static readonly MethodInfo unwrapLocalRef = localRefStructType.GetMethod("UnwrapLocalRef");
2004-09-09 15:17:55 +04:00
private static readonly MethodInfo getClassFromTypeHandle = typeof(ByteCodeHelper).GetMethod("GetClassFromTypeHandle");
2003-05-30 16:08:59 +04:00
private static readonly MethodInfo writeLine = typeof(Console).GetMethod("WriteLine", new Type[] { typeof(object) }, null);
2005-01-03 11:26:21 +03:00
private static readonly MethodInfo monitorEnter = typeof(System.Threading.Monitor).GetMethod("Enter", new Type[] { typeof(object) });
2004-09-27 14:17:34 +04:00
private static readonly MethodInfo monitorExit = typeof(System.Threading.Monitor).GetMethod("Exit", new Type[] { typeof(object) });
2003-05-30 16:08:59 +04:00
2004-09-17 13:32:06 +04:00
internal static void Generate(ILGenerator ilGenerator, DynamicTypeWrapper wrapper, MethodWrapper mw, TypeBuilder typeBuilder, ClassFile classFile, ClassFile.Method m, TypeWrapper[] args, bool thruProxy)
2003-05-30 16:08:59 +04:00
{
2004-09-27 14:17:34 +04:00
LocalBuilder syncObject = null;
FieldInfo classObjectField;
if(thruProxy)
{
classObjectField = typeBuilder.DefineField("__<classObject>", typeof(object), FieldAttributes.Static | FieldAttributes.Private);
}
else
{
classObjectField = wrapper.ClassObjectField;
}
2005-01-03 11:26:21 +03:00
if(m.IsSynchronized && m.IsStatic)
2004-09-27 14:17:34 +04:00
{
2005-01-03 11:26:21 +03:00
ilGenerator.Emit(OpCodes.Ldsfld, classObjectField);
Label label = ilGenerator.DefineLabel();
ilGenerator.Emit(OpCodes.Brtrue_S, label);
ilGenerator.Emit(OpCodes.Ldtoken, wrapper.TypeAsTBD);
ilGenerator.Emit(OpCodes.Call, getClassFromTypeHandle);
ilGenerator.Emit(OpCodes.Stsfld, classObjectField);
ilGenerator.MarkLabel(label);
ilGenerator.Emit(OpCodes.Ldsfld, classObjectField);
2004-09-27 14:17:34 +04:00
ilGenerator.Emit(OpCodes.Dup);
syncObject = ilGenerator.DeclareLocal(typeof(object));
ilGenerator.Emit(OpCodes.Stloc, syncObject);
ilGenerator.Emit(OpCodes.Call, monitorEnter);
ilGenerator.BeginExceptionBlock();
}
2004-11-23 20:46:39 +03:00
FieldBuilder methodPtr = typeBuilder.DefineField(JNI.METHOD_PTR_FIELD_PREFIX + m.Name + m.Signature + ">", typeof(IntPtr), FieldAttributes.Static | FieldAttributes.PrivateScope);
2003-05-30 16:08:59 +04:00
LocalBuilder localRefStruct = ilGenerator.DeclareLocal(localRefStructType);
ilGenerator.Emit(OpCodes.Ldloca, localRefStruct);
ilGenerator.Emit(OpCodes.Initobj, localRefStructType);
ilGenerator.Emit(OpCodes.Ldsfld, methodPtr);
Label oklabel = ilGenerator.DefineLabel();
ilGenerator.Emit(OpCodes.Brtrue, oklabel);
2004-09-05 13:37:58 +04:00
if(thruProxy)
{
ilGenerator.Emit(OpCodes.Ldarg_S, (byte)(args.Length + (mw.IsStatic ? 0 : 1)));
}
else
{
ilGenerator.Emit(OpCodes.Ldtoken, (MethodInfo)mw.GetMethod());
}
2004-08-30 19:56:23 +04:00
ilGenerator.Emit(OpCodes.Ldstr, classFile.Name.Replace('.', '/'));
2003-05-30 16:08:59 +04:00
ilGenerator.Emit(OpCodes.Ldstr, m.Name);
ilGenerator.Emit(OpCodes.Ldstr, m.Signature.Replace('.', '/'));
ilGenerator.Emit(OpCodes.Call, jniFuncPtrMethod);
ilGenerator.Emit(OpCodes.Stsfld, methodPtr);
ilGenerator.MarkLabel(oklabel);
ilGenerator.Emit(OpCodes.Ldloca, localRefStruct);
2004-09-05 13:37:58 +04:00
if(thruProxy)
{
ilGenerator.Emit(OpCodes.Ldarg_S, (byte)(args.Length + (mw.IsStatic ? 0 : 1)));
}
else
{
ilGenerator.Emit(OpCodes.Ldtoken, (MethodInfo)mw.GetMethod());
}
2003-05-30 16:08:59 +04:00
ilGenerator.Emit(OpCodes.Call, enterLocalRefStruct);
LocalBuilder jnienv = ilGenerator.DeclareLocal(typeof(IntPtr));
ilGenerator.Emit(OpCodes.Stloc, jnienv);
Label tryBlock = ilGenerator.BeginExceptionBlock();
2004-08-30 19:56:23 +04:00
TypeWrapper retTypeWrapper = mw.ReturnType;
2003-08-12 17:09:31 +04:00
if(!retTypeWrapper.IsPrimitive)
2003-05-30 16:08:59 +04:00
{
// this one is for use after we return from "calli"
ilGenerator.Emit(OpCodes.Ldloca, localRefStruct);
}
ilGenerator.Emit(OpCodes.Ldloc, jnienv);
Type[] modargs = new Type[args.Length + 2];
modargs[0] = typeof(IntPtr);
modargs[1] = typeof(IntPtr);
2003-06-10 17:28:47 +04:00
for(int i = 0; i < args.Length; i++)
{
2003-09-10 18:58:19 +04:00
modargs[i + 2] = args[i].TypeAsParameterType;
2003-06-10 17:28:47 +04:00
}
2003-05-30 16:08:59 +04:00
int add = 0;
if(!m.IsStatic)
{
ilGenerator.Emit(OpCodes.Ldloca, localRefStruct);
ilGenerator.Emit(OpCodes.Ldarg_0);
ilGenerator.Emit(OpCodes.Call, makeLocalRef);
add = 1;
}
else
{
ilGenerator.Emit(OpCodes.Ldloca, localRefStruct);
2004-09-17 13:32:06 +04:00
ilGenerator.Emit(OpCodes.Ldsfld, classObjectField);
Label label = ilGenerator.DefineLabel();
ilGenerator.Emit(OpCodes.Brtrue_S, label);
2004-01-11 16:14:42 +03:00
ilGenerator.Emit(OpCodes.Ldtoken, wrapper.TypeAsTBD);
2004-09-09 15:17:55 +04:00
ilGenerator.Emit(OpCodes.Call, getClassFromTypeHandle);
2004-09-17 13:32:06 +04:00
ilGenerator.Emit(OpCodes.Stsfld, classObjectField);
ilGenerator.MarkLabel(label);
ilGenerator.Emit(OpCodes.Ldsfld, classObjectField);
2003-05-30 16:08:59 +04:00
ilGenerator.Emit(OpCodes.Call, makeLocalRef);
}
for(int j = 0; j < args.Length; j++)
{
2003-08-01 16:12:08 +04:00
if(!args[j].IsPrimitive)
2003-05-30 16:08:59 +04:00
{
ilGenerator.Emit(OpCodes.Ldloca, localRefStruct);
2003-10-17 12:08:31 +04:00
ilGenerator.Emit(OpCodes.Ldarg_S, (byte)(j + add));
2003-08-01 16:12:08 +04:00
if(args[j].IsNonPrimitiveValueType)
{
2003-11-17 15:01:50 +03:00
args[j].EmitBox(ilGenerator);
2003-08-01 16:12:08 +04:00
}
2003-05-30 16:08:59 +04:00
ilGenerator.Emit(OpCodes.Call, makeLocalRef);
modargs[j + 2] = typeof(IntPtr);
}
else
{
2003-10-17 12:08:31 +04:00
ilGenerator.Emit(OpCodes.Ldarg_S, (byte)(j + add));
2003-05-30 16:08:59 +04:00
}
}
ilGenerator.Emit(OpCodes.Ldsfld, methodPtr);
2004-01-11 16:14:42 +03:00
ilGenerator.EmitCalli(OpCodes.Calli, System.Runtime.InteropServices.CallingConvention.StdCall, (retTypeWrapper.IsPrimitive) ? retTypeWrapper.TypeAsParameterType : typeof(IntPtr), modargs);
2003-05-30 16:08:59 +04:00
LocalBuilder retValue = null;
2003-08-12 17:09:31 +04:00
if(retTypeWrapper != PrimitiveTypeWrapper.VOID)
2003-05-30 16:08:59 +04:00
{
2003-08-12 17:09:31 +04:00
if(!retTypeWrapper.IsUnloadable && !retTypeWrapper.IsPrimitive)
2003-05-30 16:08:59 +04:00
{
ilGenerator.Emit(OpCodes.Call, unwrapLocalRef);
2003-08-01 16:12:08 +04:00
if(retTypeWrapper.IsNonPrimitiveValueType)
{
2003-11-17 15:01:50 +03:00
retTypeWrapper.EmitUnbox(ilGenerator);
2003-08-01 16:12:08 +04:00
}
else if(!retTypeWrapper.IsGhost)
{
2004-01-11 16:14:42 +03:00
ilGenerator.Emit(OpCodes.Castclass, retTypeWrapper.TypeAsTBD);
2003-08-01 16:12:08 +04:00
}
2003-05-30 16:08:59 +04:00
}
2003-09-10 18:58:19 +04:00
retValue = ilGenerator.DeclareLocal(retTypeWrapper.TypeAsParameterType);
2003-05-30 16:08:59 +04:00
ilGenerator.Emit(OpCodes.Stloc, retValue);
}
ilGenerator.BeginCatchBlock(typeof(object));
ilGenerator.EmitWriteLine("*** exception in native code ***");
ilGenerator.Emit(OpCodes.Call, writeLine);
ilGenerator.Emit(OpCodes.Rethrow);
ilGenerator.BeginFinallyBlock();
ilGenerator.Emit(OpCodes.Ldloca, localRefStruct);
ilGenerator.Emit(OpCodes.Call, leaveLocalRefStruct);
ilGenerator.EndExceptionBlock();
2005-01-03 11:26:21 +03:00
if(m.IsSynchronized && m.IsStatic)
2004-09-27 14:17:34 +04:00
{
ilGenerator.BeginFinallyBlock();
ilGenerator.Emit(OpCodes.Ldloc, syncObject);
ilGenerator.Emit(OpCodes.Call, monitorExit);
ilGenerator.EndExceptionBlock();
}
2003-08-12 17:09:31 +04:00
if(retTypeWrapper != PrimitiveTypeWrapper.VOID)
2003-05-30 16:08:59 +04:00
{
ilGenerator.Emit(OpCodes.Ldloc, retValue);
}
ilGenerator.Emit(OpCodes.Ret);
}
2002-12-18 19:00:25 +03:00
}
2004-08-17 13:05:21 +04:00
internal override TypeWrapper[] InnerClasses
2002-12-18 19:00:25 +03:00
{
get
{
2003-05-30 16:08:59 +04:00
throw new InvalidOperationException("InnerClasses is only available for finished types");
2002-12-18 19:00:25 +03:00
}
}
2004-08-17 13:05:21 +04:00
internal override TypeWrapper DeclaringTypeWrapper
2003-02-18 12:30:34 +03:00
{
get
{
2003-05-30 16:08:59 +04:00
throw new InvalidOperationException("DeclaringTypeWrapper is only available for finished types");
2003-02-18 12:30:34 +03:00
}
}
2004-08-17 13:05:21 +04:00
internal override Modifiers ReflectiveModifiers
2003-02-18 12:30:34 +03:00
{
get
{
2004-08-17 13:05:21 +04:00
ClassFile.InnerClass[] innerclasses = classFile.InnerClasses;
if(innerclasses != null)
{
for(int i = 0; i < innerclasses.Length; i++)
{
if(innerclasses[i].innerClass != 0)
{
if(classFile.GetConstantPoolClass(innerclasses[i].innerClass) == wrapper.Name)
{
return innerclasses[i].accessFlags;
}
}
}
}
return classFile.Modifiers;
2003-02-18 12:30:34 +03:00
}
}
2004-08-17 13:05:21 +04:00
private void UpdateClashTable()
{
lock(this)
{
if(memberclashtable == null)
{
memberclashtable = new Hashtable();
for(int i = 0; i < methods.Length; i++)
{
2004-11-04 15:50:28 +03:00
// TODO at the moment we don't support constructor signature clash resolving, so we better
// not put them in the clash table
if(methods[i].IsLinked && methods[i].Name != "<init>")
2004-08-17 13:05:21 +04:00
{
string key = GenerateClashKey("method", methods[i].RealName, methods[i].ReturnTypeForDefineMethod, methods[i].GetParametersForDefineMethod());
memberclashtable.Add(key, key);
}
}
}
}
}
private string GenerateClashKey(string type, string name, Type retOrFieldType, Type[] args)
{
System.Text.StringBuilder sb = new System.Text.StringBuilder(type);
sb.Append(':').Append(name).Append(':').Append(retOrFieldType.FullName);
if(args != null)
{
foreach(Type t in args)
{
sb.Append(':').Append(t.FullName);
}
}
return sb.ToString();
}
2003-11-17 15:01:50 +03:00
private ConstructorBuilder DefineClassInitializer()
{
2004-09-15 17:35:44 +04:00
if(!classFile.IsFinal && !classFile.IsInterface && wrapper.HasStaticInitializer)
2003-11-17 15:01:50 +03:00
{
// We create a field that the derived classes can access in their .cctor to trigger our .cctor
// (previously we used RuntimeHelpers.RunClassConstructor, but that is slow and requires additional privileges)
2004-08-30 19:56:23 +04:00
FieldBuilder field = typeBuilder.DefineField("__<clinit>", typeof(int), FieldAttributes.SpecialName | FieldAttributes.Family | FieldAttributes.Static);
2004-08-17 13:05:21 +04:00
AttributeHelper.HideFromJava(field);
2003-11-17 15:01:50 +03:00
}
2004-03-08 18:18:47 +03:00
if(typeBuilder.IsInterface)
{
// LAMESPEC the ECMA spec says (part. I, sect. 8.5.3.2) that all interface members must be public, so we make
// the class constructor public
return typeBuilder.DefineConstructor(MethodAttributes.Static | MethodAttributes.Public, CallingConventions.Standard, Type.EmptyTypes);
}
2004-09-15 17:35:44 +04:00
// NOTE we don't need to record the modifiers here, because they aren't visible from Java reflection
2004-03-08 18:18:47 +03:00
return typeBuilder.DefineTypeInitializer();
2003-11-17 15:01:50 +03:00
}
2004-08-17 13:05:21 +04:00
// this finds the method that md is going to be overriding
2005-01-03 11:26:21 +03:00
private MethodWrapper FindBaseMethod(string name, string sig, out bool explicitOverride)
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
Debug.Assert(!classFile.IsInterface);
2005-01-03 11:26:21 +03:00
Debug.Assert(name != "<init>");
2004-08-17 13:05:21 +04:00
explicitOverride = false;
TypeWrapper tw = wrapper.BaseTypeWrapper;
while(tw != null)
2002-12-29 19:27:00 +03:00
{
2004-08-17 13:05:21 +04:00
// TODO we need to handle static methods (duh!)
2005-01-03 11:26:21 +03:00
MethodWrapper baseMethod = tw.GetMethodWrapper(name, sig, true);
2004-08-17 13:05:21 +04:00
if(baseMethod == null)
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
return null;
2002-12-18 19:00:25 +03:00
}
2004-08-17 13:05:21 +04:00
// here are the complex rules for determining whether this method overrides the method we found
// RULE 1: final methods may not be overridden
if(baseMethod.IsFinal && !baseMethod.IsPrivate)
{
throw new VerifyError("final method " + baseMethod.Name + baseMethod.Signature + " in " + tw.Name + " is overriden in " + wrapper.Name);
}
// RULE 2: public & protected methods can be overridden (package methods are handled by RULE 4)
// (by public, protected & *package* methods [even if they are in a different package])
if(baseMethod.IsPublic || baseMethod.IsProtected)
2003-05-10 19:34:49 +04:00
{
2004-08-17 13:05:21 +04:00
// if we already encountered a package method, we cannot override the base method of
// that package method
if(explicitOverride)
2003-05-30 16:08:59 +04:00
{
2004-08-17 13:05:21 +04:00
explicitOverride = false;
return null;
2003-05-30 16:08:59 +04:00
}
2004-08-17 13:05:21 +04:00
return baseMethod;
}
// RULE 3: private methods are ignored
if(!baseMethod.IsPrivate)
{
// RULE 4: package methods can only be overridden in the same package
if(baseMethod.DeclaringType.IsInSamePackageAs(wrapper))
2003-05-30 16:08:59 +04:00
{
2004-08-17 13:05:21 +04:00
return baseMethod;
2003-05-30 16:08:59 +04:00
}
2004-08-17 13:05:21 +04:00
// since we encountered a method with the same name/signature that we aren't overriding,
// we need to specify an explicit override
// NOTE we only do this if baseMethod isn't private, because if it is, Reflection.Emit
// will complain about the explicit MethodOverride (possibly a bug)
explicitOverride = true;
}
tw = baseMethod.DeclaringType.BaseTypeWrapper;
}
return null;
}
private string GenerateUniqueMethodName(string basename, MethodWrapper mw)
{
string name = basename;
string key = GenerateClashKey("method", name, mw.ReturnTypeForDefineMethod, mw.GetParametersForDefineMethod());
UpdateClashTable();
lock(memberclashtable.SyncRoot)
{
for(int clashcount = 0; memberclashtable.ContainsKey(key); clashcount++)
{
name = basename + "$" + clashcount;
key = GenerateClashKey("method", name, mw.ReturnTypeForDefineMethod, mw.GetParametersForDefineMethod());
2003-05-10 19:34:49 +04:00
}
2004-08-17 13:05:21 +04:00
memberclashtable.Add(key, key);
}
return name;
}
private MethodBase GenerateMethod(int index, bool unloadableOverrideStub)
{
methods[index].AssertLinked();
Profiler.Enter("JavaTypeImpl.GenerateMethod");
try
{
if(index >= classFile.Methods.Length)
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
// We're a Miranda method
Debug.Assert(baseMethods[index].DeclaringType.IsInterface);
string name = GenerateUniqueMethodName(methods[index].Name, baseMethods[index]);
// TODO if the interface is not public, we probably shouldn't make the Miranda method public
MethodBuilder mb = typeBuilder.DefineMethod(methods[index].Name, MethodAttributes.NewSlot | MethodAttributes.Public | MethodAttributes.Virtual | MethodAttributes.Abstract | MethodAttributes.CheckAccessOnOverride, baseMethods[index].ReturnTypeForDefineMethod, baseMethods[index].GetParametersForDefineMethod());
AttributeHelper.MirandaMethod(mb);
if(unloadableOverrideStub || name != methods[index].Name)
2003-05-30 16:08:59 +04:00
{
2004-08-17 13:05:21 +04:00
// instead of creating an override stub, we created the Miranda method with the proper signature and
// decorate it with a NameSigAttribute that contains the real signature
AttributeHelper.SetNameSig(mb, methods[index].Name, methods[index].Signature);
2003-05-30 16:08:59 +04:00
}
2004-08-17 13:05:21 +04:00
// if we changed the name or if the interface method name is remapped, we need to add an explicit methodoverride.
if(name != baseMethods[index].RealName)
2003-05-30 16:08:59 +04:00
{
2004-08-17 13:05:21 +04:00
typeBuilder.DefineMethodOverride(mb, (MethodInfo)baseMethods[index].GetMethod());
2003-05-30 16:08:59 +04:00
}
2004-08-17 13:05:21 +04:00
return mb;
2002-12-18 19:00:25 +03:00
}
2004-08-17 13:05:21 +04:00
ClassFile.Method m = classFile.Methods[index];
MethodBase method;
bool setNameSig = methods[index].ReturnType.IsUnloadable || methods[index].ReturnType.IsGhostArray;
foreach(TypeWrapper tw in methods[index].GetParameters())
{
setNameSig |= tw.IsUnloadable || tw.IsGhostArray;
}
bool setModifiers = m.IsNative;
MethodAttributes attribs = 0;
2003-05-30 16:08:59 +04:00
if(m.IsPrivate)
2003-05-10 19:34:49 +04:00
{
2003-05-30 16:08:59 +04:00
attribs |= MethodAttributes.Private;
2003-05-10 19:34:49 +04:00
}
2003-05-30 16:08:59 +04:00
else if(m.IsProtected)
{
attribs |= MethodAttributes.FamORAssem;
}
else if(m.IsPublic)
2002-12-18 19:00:25 +03:00
{
attribs |= MethodAttributes.Public;
}
2003-05-30 16:08:59 +04:00
else
{
attribs |= MethodAttributes.Assembly;
}
if(m.Name == "<init>")
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
if(setNameSig)
{
// TODO we might have to mangle the signature to make it unique
}
// strictfp is the only modifier that a constructor can have
if(m.IsStrictfp)
{
setModifiers = true;
}
method = typeBuilder.DefineConstructor(attribs, CallingConventions.Standard, methods[index].GetParametersForDefineMethod());
if(JVM.IsStaticCompiler || ClassLoaderWrapper.IsSaveDebugImage)
2003-07-31 16:49:29 +04:00
{
2004-08-17 13:05:21 +04:00
AddParameterNames(method, m);
2003-07-31 16:49:29 +04:00
}
2002-12-18 19:00:25 +03:00
}
2003-08-13 19:00:41 +04:00
else if(m.IsClassInitializer)
2002-12-18 19:00:25 +03:00
{
2003-11-17 15:01:50 +03:00
method = DefineClassInitializer();
2003-05-30 16:08:59 +04:00
}
else
{
2004-08-17 13:05:21 +04:00
if(m.IsAbstract)
{
// only if the classfile is abstract, we make the CLR method abstract, otherwise,
// we have to generate a method that throws an AbstractMethodError (because the JVM
// allows abstract methods in non-abstract classes)
2004-10-19 17:43:55 +04:00
if(classFile.IsAbstract)
2004-08-17 13:05:21 +04:00
{
attribs |= MethodAttributes.Abstract;
}
else
{
setModifiers = true;
}
}
if(m.IsFinal)
{
if(!m.IsStatic && !m.IsPrivate)
{
attribs |= MethodAttributes.Final;
}
else
{
setModifiers = true;
}
}
if(m.IsStatic)
{
attribs |= MethodAttributes.Static;
}
else if(!m.IsPrivate)
2003-05-30 16:08:59 +04:00
{
2004-05-14 13:31:54 +04:00
attribs |= MethodAttributes.Virtual | MethodAttributes.CheckAccessOnOverride;
2003-05-30 16:08:59 +04:00
}
string name = m.Name;
// if a method is virtual, we need to find the method it overrides (if any), for several reasons:
// - if we're overriding a method that has a different name (e.g. some of the virtual methods
// in System.Object [Equals <-> equals]) we need to add an explicit MethodOverride
// - if one of the base classes has a similar method that is private (or package) that we aren't
// overriding, we need to specify an explicit MethodOverride
2004-08-17 13:05:21 +04:00
MethodWrapper baseMce = baseMethods[index];
bool explicitOverride = methods[index].IsExplicitOverride;
2003-05-30 16:08:59 +04:00
if((attribs & MethodAttributes.Virtual) != 0 && !classFile.IsInterface)
{
2004-08-17 13:05:21 +04:00
// make sure the base method is already defined
Debug.Assert(baseMce == null || baseMce.GetMethod() != null);
if(baseMce == null || baseMce.DeclaringType.IsInterface)
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
// we need to set NewSlot here, to prevent accidentally overriding methods
2003-05-30 16:08:59 +04:00
// (for example, if a Java class has a method "boolean Equals(object)", we don't want that method
// to override System.Object.Equals)
2004-08-17 13:05:21 +04:00
attribs |= MethodAttributes.NewSlot;
2002-12-18 19:00:25 +03:00
}
2003-05-30 16:08:59 +04:00
else
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
// if we have a method overriding a more accessible method (the JVM allows this), we need to make the
// method more accessible, because otherwise the CLR will complain that we're reducing access
MethodBase baseMethod = baseMce.GetMethod();
2003-05-30 16:08:59 +04:00
if((baseMethod.IsPublic && !m.IsPublic) ||
(baseMethod.IsFamily && !m.IsPublic && !m.IsProtected) ||
(!m.IsPublic && !m.IsProtected && !baseMce.DeclaringType.IsInSamePackageAs(wrapper)))
2002-12-18 19:00:25 +03:00
{
2003-05-30 16:08:59 +04:00
attribs &= ~MethodAttributes.MemberAccessMask;
attribs |= baseMethod.IsPublic ? MethodAttributes.Public : MethodAttributes.FamORAssem;
setModifiers = true;
2002-12-18 19:00:25 +03:00
}
}
}
2003-10-17 12:08:31 +04:00
MethodBuilder mb;
if(typeBuilderGhostInterface != null)
2003-07-21 16:12:40 +04:00
{
2004-08-17 13:05:21 +04:00
mb = typeBuilderGhostInterface.DefineMethod(name, attribs, methods[index].ReturnTypeForDefineMethod, methods[index].GetParametersForDefineMethod());
2003-07-31 16:49:29 +04:00
}
2003-10-17 12:08:31 +04:00
else
2003-07-31 16:49:29 +04:00
{
2004-03-16 20:10:09 +03:00
bool needFinalize = false;
bool needDispatch = false;
2005-01-03 11:26:21 +03:00
if(baseMce != null && m.Name == "finalize" && m.Signature == "()V")
2004-03-16 20:10:09 +03:00
{
2004-08-17 13:05:21 +04:00
if(baseMce.RealName == "Finalize")
2004-03-16 20:10:09 +03:00
{
2004-12-02 11:43:05 +03:00
// We're overriding Finalize (that was renamed to finalize by DotNetTypeWrapper)
// in a non-Java base class.
2004-03-16 20:10:09 +03:00
attribs |= MethodAttributes.NewSlot;
needFinalize = true;
needDispatch = true;
}
2004-08-17 13:05:21 +04:00
else if(baseMce.DeclaringType == CoreClasses.java.lang.Object.Wrapper)
2004-03-16 20:10:09 +03:00
{
2004-12-02 11:43:05 +03:00
// This type is the first type in the hierarchy to introduce a finalize method
// (other than the one in java.lang.Object obviously), so we need to override
// the real Finalize method and emit a dispatch call to our finalize method.
2004-03-16 20:10:09 +03:00
needFinalize = true;
needDispatch = true;
}
else if(m.IsFinal)
{
2004-12-02 11:43:05 +03:00
// One of our base classes already has a finalize method, so we already are
// hooked into the real Finalize, but we need to override it again, to make it
// final (so that non-Java types cannot override it either).
2004-03-16 20:10:09 +03:00
needFinalize = true;
needDispatch = false;
2004-12-02 11:43:05 +03:00
// If the base class finalize was optimized away, we need a dispatch call after all.
Type baseFinalizeType = typeBuilder.BaseType.GetMethod("Finalize", BindingFlags.NonPublic | BindingFlags.Public | BindingFlags.Instance, null, Type.EmptyTypes, null).DeclaringType;
if(baseFinalizeType == typeof(object))
{
needDispatch = true;
}
}
else
{
// One of our base classes already has a finalize method, but it may have been an empty
// method so that the hookup to the real Finalize was optimized away, we need to check
// for that.
Type baseFinalizeType = typeBuilder.BaseType.GetMethod("Finalize", BindingFlags.NonPublic | BindingFlags.Public | BindingFlags.Instance, null, Type.EmptyTypes, null).DeclaringType;
if(baseFinalizeType == typeof(object))
{
needFinalize = true;
needDispatch = true;
}
}
if(needFinalize &&
(!m.IsFinal || classFile.IsFinal) &&
m.Instructions.Length > 0 &&
m.Instructions[0].NormalizedOpCode == NormalizedByteCode.__return)
{
// we've got an empty finalize method, so we don't need to override the real finalizer
// (not having a finalizer makes a huge perf difference)
needFinalize = false;
2004-03-16 20:10:09 +03:00
}
}
2004-08-17 13:05:21 +04:00
if(unloadableOverrideStub)
{
attribs |= MethodAttributes.NewSlot;
}
if(setNameSig || memberclashtable != null)
{
name = GenerateUniqueMethodName(name, methods[index]);
}
mb = typeBuilder.DefineMethod(name, attribs, methods[index].ReturnTypeForDefineMethod, methods[index].GetParametersForDefineMethod());
if(unloadableOverrideStub)
{
GenerateUnloadableOverrideStub(baseMce, mb, methods[index].ReturnTypeForDefineMethod, methods[index].GetParametersForDefineMethod());
}
2004-12-02 11:43:05 +03:00
else if(baseMce != null && (explicitOverride || baseMce.RealName != name) && !needFinalize)
2004-08-17 13:05:21 +04:00
{
// assert that the method we're overriding is in fact virtual and not final!
Debug.Assert(baseMce.GetMethod().IsVirtual && !baseMce.GetMethod().IsFinal);
typeBuilder.DefineMethodOverride(mb, (MethodInfo)baseMce.GetMethod());
}
2004-03-16 20:10:09 +03:00
// if we're overriding java.lang.Object.finalize we need to emit a stub to override System.Object.Finalize,
// or if we're subclassing a non-Java class that has a Finalize method, we need a new Finalize override
if(needFinalize)
2004-03-08 18:18:47 +03:00
{
2004-03-16 20:10:09 +03:00
MethodInfo baseFinalize = typeBuilder.BaseType.GetMethod("Finalize", BindingFlags.NonPublic | BindingFlags.Public | BindingFlags.Instance, null, Type.EmptyTypes, null);
MethodAttributes attr = MethodAttributes.Virtual;
// make sure we don't reduce accessibility
attr |= baseFinalize.IsPublic ? MethodAttributes.Public : MethodAttributes.Family;
if(m.IsFinal)
{
attr |= MethodAttributes.Final;
}
2004-08-17 13:05:21 +04:00
// TODO if the Java class also defines a Finalize() method, we need to name the stub differently
// (and make it effectively appear hidden by the class's Finalize method)
2004-03-16 20:10:09 +03:00
MethodBuilder finalize = typeBuilder.DefineMethod("Finalize", attr, CallingConventions.Standard, typeof(void), Type.EmptyTypes);
2004-08-17 13:05:21 +04:00
AttributeHelper.HideFromJava(finalize);
2004-03-08 18:18:47 +03:00
ILGenerator ilgen = finalize.GetILGenerator();
2004-03-16 20:10:09 +03:00
if(needDispatch)
{
ilgen.BeginExceptionBlock();
ilgen.Emit(OpCodes.Ldarg_0);
ilgen.Emit(OpCodes.Callvirt, mb);
ilgen.BeginCatchBlock(typeof(object));
ilgen.EndExceptionBlock();
}
else
{
ilgen.Emit(OpCodes.Ldarg_0);
ilgen.Emit(OpCodes.Call, baseFinalize);
}
2004-03-08 18:18:47 +03:00
ilgen.Emit(OpCodes.Ret);
}
2003-07-31 16:49:29 +04:00
}
2004-08-17 13:05:21 +04:00
if(JVM.IsStaticCompiler || ClassLoaderWrapper.IsSaveDebugImage)
2003-07-31 16:49:29 +04:00
{
2004-08-17 13:05:21 +04:00
AddParameterNames(mb, m);
if(setModifiers)
2003-05-10 19:34:49 +04:00
{
2004-08-17 13:05:21 +04:00
AttributeHelper.SetModifiers(mb, m.Modifiers);
2003-05-10 19:34:49 +04:00
}
2003-04-26 16:13:02 +04:00
}
2003-05-30 16:08:59 +04:00
method = mb;
2003-05-10 19:34:49 +04:00
}
2003-11-17 15:01:50 +03:00
string[] exceptions = m.ExceptionsAttribute;
methods[index].SetDeclaredExceptions(exceptions);
2004-08-17 13:05:21 +04:00
if(JVM.IsStaticCompiler || ClassLoaderWrapper.IsSaveDebugImage)
2003-11-17 15:01:50 +03:00
{
2004-08-17 13:05:21 +04:00
AttributeHelper.SetThrowsAttribute(method, exceptions);
if(m.DeprecatedAttribute)
{
AttributeHelper.SetDeprecatedAttribute(method);
}
if(setNameSig)
{
AttributeHelper.SetNameSig(method, m.Name, m.Signature);
}
2003-11-17 15:01:50 +03:00
}
2004-08-17 13:05:21 +04:00
return method;
2002-12-18 19:00:25 +03:00
}
2003-05-30 16:08:59 +04:00
finally
2003-01-06 16:56:37 +03:00
{
2003-05-30 16:08:59 +04:00
Profiler.Leave("JavaTypeImpl.GenerateMethod");
2003-01-06 16:56:37 +03:00
}
2002-12-18 19:00:25 +03:00
}
2003-07-31 16:49:29 +04:00
private static ParameterBuilder[] AddParameterNames(MethodBase mb, ClassFile.Method m)
2003-07-21 16:12:40 +04:00
{
2004-08-30 19:56:23 +04:00
ClassFile.Method.LocalVariableTableEntry[] localVars = m.LocalVariableTableAttribute;
if(localVars != null)
2003-07-21 16:12:40 +04:00
{
2004-08-30 19:56:23 +04:00
int bias = 1;
if(m.IsStatic)
2003-07-21 16:12:40 +04:00
{
2004-08-30 19:56:23 +04:00
bias = 0;
}
ParameterBuilder[] parameterBuilders = new ParameterBuilder[m.ArgMap.Length - bias];
for(int i = bias; i < m.ArgMap.Length; i++)
{
if(m.ArgMap[i] != -1)
2003-07-21 16:12:40 +04:00
{
2004-08-30 19:56:23 +04:00
for(int j = 0; j < localVars.Length; j++)
2003-07-21 16:12:40 +04:00
{
2004-08-30 19:56:23 +04:00
if(localVars[j].index == i && parameterBuilders[i - bias] == null)
2003-07-21 16:12:40 +04:00
{
2004-08-30 19:56:23 +04:00
if(mb is MethodBuilder)
2003-07-21 16:12:40 +04:00
{
2004-08-30 19:56:23 +04:00
parameterBuilders[i - bias] = ((MethodBuilder)mb).DefineParameter(m.ArgMap[i] + 1 - bias, ParameterAttributes.None, localVars[j].name);
2003-07-21 16:12:40 +04:00
}
2004-08-30 19:56:23 +04:00
else if(mb is ConstructorBuilder)
{
parameterBuilders[i - bias] = ((ConstructorBuilder)mb).DefineParameter(m.ArgMap[i], ParameterAttributes.None, localVars[j].name);
}
break;
2003-07-21 16:12:40 +04:00
}
}
}
}
2004-08-30 19:56:23 +04:00
return parameterBuilders;
2003-07-21 16:12:40 +04:00
}
2003-07-31 16:49:29 +04:00
return null;
2003-07-21 16:12:40 +04:00
}
2004-08-17 13:05:21 +04:00
private void GenerateUnloadableOverrideStub(MethodWrapper baseMethod, MethodInfo target, Type targetRet, Type[] targetArgs)
2003-06-18 12:48:00 +04:00
{
2004-08-17 13:05:21 +04:00
Type stubret = baseMethod.ReturnTypeForDefineMethod;
Type[] stubargs = baseMethod.GetParametersForDefineMethod();
string name = GenerateUniqueMethodName(baseMethod.RealName + "/unloadablestub", baseMethod);
MethodBuilder overrideStub = typeBuilder.DefineMethod(name, MethodAttributes.Private | MethodAttributes.Virtual | MethodAttributes.NewSlot | MethodAttributes.Final, stubret, stubargs);
AttributeHelper.HideFromJava(overrideStub);
typeBuilder.DefineMethodOverride(overrideStub, (MethodInfo)baseMethod.GetMethod());
ILGenerator ilgen = overrideStub.GetILGenerator();
ilgen.Emit(OpCodes.Ldarg_0);
for(int i = 0; i < targetArgs.Length; i++)
2003-06-18 12:48:00 +04:00
{
2004-08-17 13:05:21 +04:00
ilgen.Emit(OpCodes.Ldarg_S, (byte)(i + 1));
if(targetArgs[i] != stubargs[i])
2003-06-18 12:48:00 +04:00
{
2004-08-17 13:05:21 +04:00
ilgen.Emit(OpCodes.Castclass, targetArgs[i]);
}
}
ilgen.Emit(OpCodes.Callvirt, target);
if(targetRet != stubret)
{
ilgen.Emit(OpCodes.Castclass, stubret);
}
ilgen.Emit(OpCodes.Ret);
}
private static bool CheckRequireOverrideStub(MethodWrapper mw1, MethodWrapper mw2)
{
// TODO this is too late to generate LinkageErrors so we need to figure this out earlier
if(mw1.ReturnType != mw2.ReturnType && !(mw1.ReturnType.IsUnloadable && mw2.ReturnType.IsUnloadable))
{
return true;
}
TypeWrapper[] args1 = mw1.GetParameters();
TypeWrapper[] args2 = mw2.GetParameters();
for(int i = 0; i < args1.Length; i++)
{
if(args1[i] != args2[i] && !(args1[i].IsUnloadable && args2[i].IsUnloadable))
{
return true;
2003-06-18 12:48:00 +04:00
}
}
return false;
}
2005-01-03 11:26:21 +03:00
private void AddMethodOverride(MethodWrapper method, MethodBuilder mb, TypeWrapper iface, string name, string sig, ref Hashtable hashtable, bool unloadableOnly)
2003-05-10 19:34:49 +04:00
{
if(hashtable != null && hashtable.ContainsKey(iface))
{
return;
}
2005-01-03 11:26:21 +03:00
MethodWrapper mw = iface.GetMethodWrapper(name, sig, false);
2003-05-10 19:34:49 +04:00
if(mw != null)
{
if(hashtable == null)
{
hashtable = new Hashtable();
}
hashtable.Add(iface, iface);
2004-08-17 13:05:21 +04:00
if(CheckRequireOverrideStub(method, mw))
{
GenerateUnloadableOverrideStub(mw, mb, method.ReturnTypeForDefineMethod, method.GetParametersForDefineMethod());
}
else if(!unloadableOnly)
{
typeBuilder.DefineMethodOverride(mb, (MethodInfo)mw.GetMethod());
}
2003-05-10 19:34:49 +04:00
}
foreach(TypeWrapper iface2 in iface.Interfaces)
{
2005-01-03 11:26:21 +03:00
AddMethodOverride(method, mb, iface2, name, sig, ref hashtable, unloadableOnly);
2003-05-10 19:34:49 +04:00
}
}
2004-08-17 13:05:21 +04:00
internal override Type Type
2002-12-18 19:00:25 +03:00
{
get
{
return typeBuilder;
}
}
2003-10-17 12:08:31 +04:00
internal override Type TypeAsBaseType
{
get
{
return typeBuilderGhostInterface != null ? typeBuilderGhostInterface : typeBuilder;
}
}
2002-12-18 19:00:25 +03:00
}
2004-12-21 13:26:51 +03:00
private class DoomedTypeImpl : DynamicImpl
{
private string message;
internal DoomedTypeImpl(string message)
{
this.message = message;
}
internal override TypeWrapper DeclaringTypeWrapper
{
get
{
return null;
}
}
internal override DynamicImpl Finish(bool forDebugSave)
{
if(!forDebugSave)
{
throw new VerifyError(message);
}
return this;
}
internal override TypeWrapper[] InnerClasses
{
get
{
return null;
}
}
2005-01-03 11:26:21 +03:00
internal override FieldInfo LinkField(FieldWrapper fw)
2004-12-21 13:26:51 +03:00
{
2005-01-03 11:26:21 +03:00
return null;
2004-12-21 13:26:51 +03:00
}
internal override MethodBase LinkMethod(MethodWrapper mw)
{
return null;
}
internal override Modifiers ReflectiveModifiers
{
get
{
return (Modifiers)0;
}
}
internal override Type Type
{
get
{
return null;
}
}
internal override Type TypeAsBaseType
{
get
{
return null;
}
}
}
2002-12-18 19:00:25 +03:00
private class FinishedTypeImpl : DynamicImpl
{
private Type type;
2003-10-17 12:08:31 +04:00
private Type typeGhostInterface;
2003-02-18 12:30:34 +03:00
private TypeWrapper[] innerclasses;
private TypeWrapper declaringTypeWrapper;
2003-05-30 16:08:59 +04:00
private Modifiers reflectiveModifiers;
2002-12-18 19:00:25 +03:00
2004-08-17 13:05:21 +04:00
internal FinishedTypeImpl(Type type, Type typeGhostInterface, TypeWrapper[] innerclasses, TypeWrapper declaringTypeWrapper, Modifiers reflectiveModifiers)
2002-12-18 19:00:25 +03:00
{
this.type = type;
2003-10-17 12:08:31 +04:00
this.typeGhostInterface = typeGhostInterface;
2003-02-18 12:30:34 +03:00
this.innerclasses = innerclasses;
this.declaringTypeWrapper = declaringTypeWrapper;
2003-05-30 16:08:59 +04:00
this.reflectiveModifiers = reflectiveModifiers;
2003-02-18 12:30:34 +03:00
}
2004-08-17 13:05:21 +04:00
internal override TypeWrapper[] InnerClasses
2003-02-18 12:30:34 +03:00
{
get
{
// TODO compute the innerclasses lazily (and fix JavaTypeImpl to not always compute them)
return innerclasses;
}
}
2004-08-17 13:05:21 +04:00
internal override TypeWrapper DeclaringTypeWrapper
2003-02-18 12:30:34 +03:00
{
get
{
// TODO compute lazily (and fix JavaTypeImpl to not always compute it)
return declaringTypeWrapper;
}
2002-12-18 19:00:25 +03:00
}
2004-08-17 13:05:21 +04:00
internal override Modifiers ReflectiveModifiers
2002-12-18 19:00:25 +03:00
{
get
{
2003-05-30 16:08:59 +04:00
return reflectiveModifiers;
2002-12-18 19:00:25 +03:00
}
}
2004-08-17 13:05:21 +04:00
internal override Type Type
2002-12-18 19:00:25 +03:00
{
get
{
return type;
}
}
2003-10-17 12:08:31 +04:00
internal override Type TypeAsBaseType
{
get
{
return typeGhostInterface != null ? typeGhostInterface : type;
}
}
2004-08-17 13:05:21 +04:00
internal override DynamicImpl Finish(bool forDebugSave)
2002-12-18 19:00:25 +03:00
{
return this;
}
2004-08-17 13:05:21 +04:00
internal override MethodBase LinkMethod(MethodWrapper mw)
{
// we should never be called, because all methods on a finished type are already linked
Debug.Assert(false);
return mw.GetMethod();
}
2005-01-03 11:26:21 +03:00
internal override FieldInfo LinkField(FieldWrapper fw)
2004-08-17 13:05:21 +04:00
{
// we should never be called, because all fields on a finished type are already linked
Debug.Assert(false);
2005-01-03 11:26:21 +03:00
return fw.GetField();
2004-08-17 13:05:21 +04:00
}
2002-12-18 19:00:25 +03:00
}
2004-01-18 01:46:43 +03:00
internal override void EmitCheckcast(TypeWrapper context, ILGenerator ilgen)
{
if(IsGhost)
{
ilgen.Emit(OpCodes.Dup);
ilgen.Emit(OpCodes.Call, ghostCastMethod);
ilgen.Emit(OpCodes.Pop);
}
2004-03-08 18:18:47 +03:00
else if(IsGhostArray)
{
ilgen.Emit(OpCodes.Dup);
ilgen.Emit(OpCodes.Call, ghostCastArrayMethod);
}
2004-01-18 01:46:43 +03:00
else
{
base.EmitCheckcast(context, ilgen);
}
}
internal override void EmitInstanceOf(TypeWrapper context, ILGenerator ilgen)
{
if(IsGhost)
{
ilgen.Emit(OpCodes.Call, ghostIsInstanceMethod);
}
2004-03-08 18:18:47 +03:00
else if(IsGhostArray)
{
ilgen.Emit(OpCodes.Call, ghostIsInstanceArrayMethod);
}
2004-01-18 01:46:43 +03:00
else
{
base.EmitInstanceOf(context, ilgen);
}
}
2004-08-17 13:05:21 +04:00
internal override MethodBase LinkMethod(MethodWrapper mw)
{
mw.AssertLinked();
return impl.LinkMethod(mw);
}
2005-01-03 11:26:21 +03:00
internal override FieldInfo LinkField(FieldWrapper fw)
2004-08-17 13:05:21 +04:00
{
fw.AssertLinked();
2005-01-03 11:26:21 +03:00
return impl.LinkField(fw);
2004-08-17 13:05:21 +04:00
}
2002-12-18 19:00:25 +03:00
}
2005-01-03 11:26:21 +03:00
sealed class CompiledTypeWrapper : TypeWrapper
2002-12-18 19:00:25 +03:00
{
2003-05-30 16:08:59 +04:00
private readonly Type type;
2003-08-21 14:06:34 +04:00
private TypeWrapper[] interfaces;
private TypeWrapper[] innerclasses;
2003-10-17 12:08:31 +04:00
private FieldInfo ghostRefField;
private Type typeAsBaseType;
2004-03-08 18:18:47 +03:00
private Type remappedType;
2002-12-18 19:00:25 +03:00
2003-08-21 14:06:34 +04:00
internal static string GetName(Type type)
2002-12-18 19:00:25 +03:00
{
2004-01-11 16:14:42 +03:00
Debug.Assert(type.Module.IsDefined(typeof(JavaModuleAttribute), false));
2003-08-21 14:06:34 +04:00
// look for our custom attribute, that contains the real name of the type (for inner classes)
Object[] attribs = type.GetCustomAttributes(typeof(InnerClassAttribute), false);
if(attribs.Length == 1)
2002-12-18 19:00:25 +03:00
{
2003-08-21 14:06:34 +04:00
return ((InnerClassAttribute)attribs[0]).InnerClassName;
2002-12-18 19:00:25 +03:00
}
2003-08-21 14:06:34 +04:00
return type.FullName;
2002-12-18 19:00:25 +03:00
}
// TODO consider resolving the baseType lazily
2004-04-23 18:21:43 +04:00
private static TypeWrapper GetBaseTypeWrapper(Type type)
2003-08-13 19:00:41 +04:00
{
2003-10-17 12:08:31 +04:00
if(type.IsInterface || type.IsDefined(typeof(GhostInterfaceAttribute), false))
2003-08-13 19:00:41 +04:00
{
return null;
}
else if(type.BaseType == null)
{
// System.Object must appear to be derived from java.lang.Object
2004-03-20 16:25:08 +03:00
return CoreClasses.java.lang.Object.Wrapper;
2003-08-13 19:00:41 +04:00
}
else
{
2004-03-08 18:18:47 +03:00
object[] attribs = type.GetCustomAttributes(typeof(RemappedTypeAttribute), false);
if(attribs.Length == 1)
{
if(((RemappedTypeAttribute)attribs[0]).Type == typeof(object))
{
return null;
}
else
{
2004-03-20 16:25:08 +03:00
return CoreClasses.java.lang.Object.Wrapper;
2004-03-08 18:18:47 +03:00
}
}
2003-08-13 19:00:41 +04:00
return ClassLoaderWrapper.GetWrapperFromType(type.BaseType);
}
}
2004-10-04 23:30:53 +04:00
private static ClassLoaderWrapper GetClassLoader(Type type)
{
return ClassLoaderWrapper.IsCoreAssemblyType(type) ? ClassLoaderWrapper.GetBootstrapClassLoader() : ClassLoaderWrapper.GetSystemClassLoader();
}
2003-08-13 19:00:41 +04:00
internal CompiledTypeWrapper(string name, Type type)
2005-01-03 11:26:21 +03:00
: base(GetModifiers(type), name, GetBaseTypeWrapper(type), GetClassLoader(type), null)
2002-12-18 19:00:25 +03:00
{
2003-05-30 16:08:59 +04:00
Debug.Assert(!(type is TypeBuilder));
2003-02-22 15:28:12 +03:00
Debug.Assert(!type.IsArray);
2004-03-08 18:18:47 +03:00
object[] attribs = type.GetCustomAttributes(typeof(RemappedTypeAttribute), false);
if(attribs.Length == 1)
{
this.typeAsBaseType = type;
this.remappedType = ((RemappedTypeAttribute)attribs[0]).Type;
}
2003-08-21 14:06:34 +04:00
2002-12-18 19:00:25 +03:00
this.type = type;
}
2003-10-22 20:34:22 +04:00
private static Modifiers GetModifiers(Type type)
2002-12-18 19:00:25 +03:00
{
2003-10-22 20:34:22 +04:00
object[] customAttribute = type.GetCustomAttributes(typeof(ModifiersAttribute), false);
if(customAttribute.Length == 1)
2003-05-30 16:08:59 +04:00
{
2003-10-22 20:34:22 +04:00
return ((ModifiersAttribute)customAttribute[0]).Modifiers;
2003-05-30 16:08:59 +04:00
}
// only returns public, protected, private, final, static, abstract and interface (as per
// the documentation of Class.getModifiers())
Modifiers modifiers = 0;
2003-10-22 20:34:22 +04:00
if(type.IsPublic)
2003-05-30 16:08:59 +04:00
{
modifiers |= Modifiers.Public;
}
2003-10-22 20:34:22 +04:00
// TODO do we really need to look for nested attributes? I think all inner classes will have the ModifiersAttribute.
else if(type.IsNestedPublic)
2003-05-30 16:08:59 +04:00
{
2003-10-22 20:34:22 +04:00
modifiers |= Modifiers.Public | Modifiers.Static;
2003-05-30 16:08:59 +04:00
}
2003-10-22 20:34:22 +04:00
else if(type.IsNestedPrivate)
2003-05-30 16:08:59 +04:00
{
2003-10-22 20:34:22 +04:00
modifiers |= Modifiers.Private | Modifiers.Static;
2003-05-30 16:08:59 +04:00
}
2003-10-22 20:34:22 +04:00
else if(type.IsNestedFamily || type.IsNestedFamORAssem)
2003-05-30 16:08:59 +04:00
{
2003-10-22 20:34:22 +04:00
modifiers |= Modifiers.Protected | Modifiers.Static;
2003-05-30 16:08:59 +04:00
}
2003-10-22 20:34:22 +04:00
else if(type.IsNestedAssembly || type.IsNestedFamANDAssem)
2003-05-30 16:08:59 +04:00
{
modifiers |= Modifiers.Static;
}
2003-10-22 20:34:22 +04:00
if(type.IsSealed)
{
modifiers |= Modifiers.Final;
}
2003-05-30 16:08:59 +04:00
if(type.IsAbstract)
{
modifiers |= Modifiers.Abstract;
}
if(type.IsInterface)
2002-12-18 19:00:25 +03:00
{
2003-05-30 16:08:59 +04:00
modifiers |= Modifiers.Interface;
2002-12-18 19:00:25 +03:00
}
2003-05-30 16:08:59 +04:00
return modifiers;
2002-12-18 19:00:25 +03:00
}
2004-09-15 17:35:44 +04:00
internal override bool HasStaticInitializer
{
get
{
return type.GetField("__<clinit>", BindingFlags.NonPublic | BindingFlags.Static) != null;
}
}
2004-08-17 13:05:21 +04:00
internal override Assembly Assembly
{
get
{
return type.Assembly;
}
}
2004-03-08 18:18:47 +03:00
internal override TypeWrapper[] Interfaces
2002-12-18 19:00:25 +03:00
{
get
{
if(interfaces == null)
{
2003-07-24 11:29:51 +04:00
// NOTE instead of getting the interfaces list from Type, we use a custom
// attribute to list the implemented interfaces, because Java reflection only
// reports the interfaces *directly* implemented by the type, not the inherited
// interfaces. This is significant for serialVersionUID calculation (for example).
object[] attribs = type.GetCustomAttributes(typeof(ImplementsAttribute), false);
2004-05-14 13:31:54 +04:00
if(attribs.Length == 1)
{
string[] interfaceNames = ((ImplementsAttribute)attribs[0]).Interfaces;
TypeWrapper[] interfaceWrappers = new TypeWrapper[interfaceNames.Length];
for(int i = 0; i < interfaceWrappers.Length; i++)
{
interfaceWrappers[i] = GetClassLoader().LoadClassByDottedName(interfaceNames[i]);
}
this.interfaces = interfaceWrappers;
}
else
2002-12-18 19:00:25 +03:00
{
2004-05-14 13:31:54 +04:00
interfaces = TypeWrapper.EmptyArray;
2002-12-18 19:00:25 +03:00
}
}
return interfaces;
}
}
2004-03-08 18:18:47 +03:00
internal override TypeWrapper[] InnerClasses
2003-02-18 12:30:34 +03:00
{
get
{
if(innerclasses == null)
{
2003-02-20 17:18:38 +03:00
Type[] nestedTypes = type.GetNestedTypes(BindingFlags.Public | BindingFlags.NonPublic | BindingFlags.DeclaredOnly);
2003-10-17 12:08:31 +04:00
ArrayList wrappers = new ArrayList();
2003-02-20 17:18:38 +03:00
for(int i = 0; i < nestedTypes.Length; i++)
{
2004-08-17 13:05:21 +04:00
if(!AttributeHelper.IsHideFromJava(nestedTypes[i]))
2003-10-17 12:08:31 +04:00
{
wrappers.Add(ClassLoaderWrapper.GetWrapperFromType(nestedTypes[i]));
}
2003-02-20 17:18:38 +03:00
}
2003-10-17 12:08:31 +04:00
innerclasses = (TypeWrapper[])wrappers.ToArray(typeof(TypeWrapper));
2003-02-18 12:30:34 +03:00
}
return innerclasses;
}
}
2004-03-08 18:18:47 +03:00
internal override TypeWrapper DeclaringTypeWrapper
2003-02-18 12:30:34 +03:00
{
get
{
2003-02-20 17:18:38 +03:00
Type declaringType = type.DeclaringType;
if(declaringType != null)
{
return ClassLoaderWrapper.GetWrapperFromType(declaringType);
}
return null;
2003-02-18 12:30:34 +03:00
}
}
2003-05-30 16:08:59 +04:00
internal override Modifiers ReflectiveModifiers
{
get
{
object[] customAttribute = type.GetCustomAttributes(typeof(InnerClassAttribute), false);
if(customAttribute.Length == 1)
{
2004-08-17 13:05:21 +04:00
return ((InnerClassAttribute)customAttribute[0]).Modifiers;
}
return Modifiers;
}
}
internal override Type TypeAsBaseType
{
get
{
if(typeAsBaseType == null)
{
if(IsGhost)
{
typeAsBaseType = type.GetNestedType("__Interface");
}
else
{
typeAsBaseType = type;
}
}
return typeAsBaseType;
}
}
internal override FieldInfo GhostRefField
{
get
{
if(ghostRefField == null)
{
2004-11-23 20:46:39 +03:00
ghostRefField = type.GetField("__<ref>");
2004-08-17 13:05:21 +04:00
}
return ghostRefField;
}
}
private void SigTypePatchUp(string sigtype, ref TypeWrapper type)
{
if(sigtype != type.SigName)
{
// if type is an array, we know that it is a ghost array, because arrays of unloadable are compiled
// as object (not as arrays of object)
if(type.IsArray)
{
type = GetClassLoader().FieldTypeWrapperFromSig(sigtype);
}
else
{
if(sigtype[0] == 'L')
{
sigtype = sigtype.Substring(1, sigtype.Length - 2);
}
type = new UnloadableTypeWrapper(sigtype);
2003-05-30 16:08:59 +04:00
}
}
}
2004-08-17 13:05:21 +04:00
private static void ParseSig(string sig, out string[] sigparam, out string sigret)
2003-10-17 12:08:31 +04:00
{
2004-08-17 13:05:21 +04:00
ArrayList list = new ArrayList();
int pos = 1;
for(;;)
2003-10-17 12:08:31 +04:00
{
2004-08-17 13:05:21 +04:00
switch(sig[pos])
2003-10-17 12:08:31 +04:00
{
2004-08-17 13:05:21 +04:00
case 'L':
2003-10-17 12:08:31 +04:00
{
2004-08-17 13:05:21 +04:00
int end = sig.IndexOf(';', pos) + 1;
list.Add(sig.Substring(pos, end - pos));
pos = end;
break;
2003-10-17 12:08:31 +04:00
}
2004-08-17 13:05:21 +04:00
case '[':
2003-10-17 12:08:31 +04:00
{
2004-08-17 13:05:21 +04:00
int skip = 1;
while(sig[pos + skip] == '[') skip++;
if(sig[pos + skip] == 'L')
{
int end = sig.IndexOf(';', pos) + 1;
list.Add(sig.Substring(pos, end - pos));
pos = end;
}
else
{
skip++;
list.Add(sig.Substring(pos, skip));
pos += skip;
}
break;
2003-10-17 12:08:31 +04:00
}
2004-08-17 13:05:21 +04:00
case ')':
sigparam = (string[])list.ToArray(typeof(string));
sigret = sig.Substring(pos + 1);
return;
default:
list.Add(sig.Substring(pos, 1));
pos++;
break;
2003-10-17 12:08:31 +04:00
}
}
}
2004-08-17 13:05:21 +04:00
private void GetNameSigFromMethodBase(MethodBase method, out string name, out string sig, out TypeWrapper retType, out TypeWrapper[] paramTypes)
2003-10-17 12:08:31 +04:00
{
2004-08-17 13:05:21 +04:00
retType = method is ConstructorInfo ? PrimitiveTypeWrapper.VOID : ClassLoaderWrapper.GetWrapperFromType(((MethodInfo)method).ReturnType);
ParameterInfo[] parameters = method.GetParameters();
paramTypes = new TypeWrapper[parameters.Length];
for(int i = 0; i < parameters.Length; i++)
2003-10-17 12:08:31 +04:00
{
2004-08-17 13:05:21 +04:00
paramTypes[i] = ClassLoaderWrapper.GetWrapperFromType(parameters[i].ParameterType);
}
if(method.IsDefined(typeof(NameSigAttribute), false))
{
NameSigAttribute attr = (NameSigAttribute)method.GetCustomAttributes(typeof(NameSigAttribute), false)[0];
name = attr.Name;
sig = attr.Sig;
string[] sigparams;
string sigret;
ParseSig(sig, out sigparams, out sigret);
// HACK newhelper methods have a return type, but it should be void
if(name == "<init>")
2003-10-17 12:08:31 +04:00
{
2004-08-17 13:05:21 +04:00
retType = PrimitiveTypeWrapper.VOID;
2003-10-17 12:08:31 +04:00
}
2004-08-17 13:05:21 +04:00
SigTypePatchUp(sigret, ref retType);
// if we have a remapped method, the paramTypes array contains an additional entry for "this" so we have
// to remove that
if(paramTypes.Length == sigparams.Length + 1)
{
TypeWrapper[] temp = paramTypes;
paramTypes = new TypeWrapper[sigparams.Length];
Array.Copy(temp, 1, paramTypes, 0, paramTypes.Length);
}
Debug.Assert(sigparams.Length == paramTypes.Length);
for(int i = 0; i < sigparams.Length; i++)
{
SigTypePatchUp(sigparams[i], ref paramTypes[i]);
}
}
else
{
if(method is ConstructorInfo)
{
name = method.IsStatic ? "<clinit>" : "<init>";
}
else
{
name = method.Name;
}
System.Text.StringBuilder sb = new System.Text.StringBuilder("(");
foreach(TypeWrapper tw in paramTypes)
{
sb.Append(tw.SigName);
}
sb.Append(")");
sb.Append(retType.SigName);
sig = sb.ToString();
2003-10-17 12:08:31 +04:00
}
}
2004-01-28 14:28:16 +03:00
protected override void LazyPublishMembers()
2002-12-18 19:00:25 +03:00
{
2005-01-03 11:26:21 +03:00
ArrayList methods = new ArrayList();
ArrayList fields = new ArrayList();
2004-01-28 14:28:16 +03:00
MemberInfo[] members = type.GetMembers(BindingFlags.DeclaredOnly | BindingFlags.Public | BindingFlags.NonPublic | BindingFlags.Static | BindingFlags.Instance);
2004-03-08 18:18:47 +03:00
if(remappedType == null)
{
foreach(MemberInfo m in members)
{
2004-08-17 13:05:21 +04:00
if(!AttributeHelper.IsHideFromJava(m))
2004-03-08 18:18:47 +03:00
{
MethodBase method = m as MethodBase;
if(method != null)
{
2004-08-17 13:05:21 +04:00
string name;
string sig;
TypeWrapper retType;
TypeWrapper[] paramTypes;
GetNameSigFromMethodBase(method, out name, out sig, out retType, out paramTypes);
MethodInfo mi = method as MethodInfo;
bool miranda = mi != null ? AttributeHelper.IsMirandaMethod(mi) : false;
2005-01-03 11:26:21 +03:00
methods.Add(MethodWrapper.Create(this, name, sig, method, retType, paramTypes, AttributeHelper.GetModifiers(method, false), miranda));
2004-03-08 18:18:47 +03:00
}
else
{
FieldInfo field = m as FieldInfo;
if(field != null)
{
2005-01-03 11:26:21 +03:00
fields.Add(CreateFieldWrapper(field));
2004-03-08 18:18:47 +03:00
}
}
}
}
}
else
{
foreach(MemberInfo m in members)
{
2004-08-17 13:05:21 +04:00
if(!AttributeHelper.IsHideFromJava(m))
2004-03-08 18:18:47 +03:00
{
MethodBase method = m as MethodBase;
if(method != null &&
(remappedType.IsSealed || !m.Name.StartsWith("instancehelper_")) &&
(!remappedType.IsSealed || method.IsStatic))
{
2005-01-03 11:26:21 +03:00
methods.Add(CreateRemappedMethodWrapper(method));
2004-03-08 18:18:47 +03:00
}
else
{
FieldInfo field = m as FieldInfo;
if(field != null)
{
2005-01-03 11:26:21 +03:00
fields.Add(CreateFieldWrapper(field));
2004-03-08 18:18:47 +03:00
}
}
}
}
// if we're a remapped interface, we need to get the methods from the real interface
if(remappedType.IsInterface)
{
2004-07-10 11:19:42 +04:00
Type nestedHelper = type.GetNestedType("__Helper", BindingFlags.Public | BindingFlags.Static);
2004-03-08 18:18:47 +03:00
foreach(RemappedInterfaceMethodAttribute m in type.GetCustomAttributes(typeof(RemappedInterfaceMethodAttribute), false))
{
MethodInfo method = remappedType.GetMethod(m.MappedTo);
2004-08-17 13:05:21 +04:00
MethodInfo mbHelper = method;
2004-03-08 18:18:47 +03:00
Modifiers modifiers = AttributeHelper.GetModifiers(method, false);
2004-08-17 13:05:21 +04:00
string name;
string sig;
TypeWrapper retType;
TypeWrapper[] paramTypes;
GetNameSigFromMethodBase(method, out name, out sig, out retType, out paramTypes);
2004-07-10 11:19:42 +04:00
if(nestedHelper != null)
{
mbHelper = nestedHelper.GetMethod(m.Name);
2004-08-17 13:05:21 +04:00
if(mbHelper == null)
{
mbHelper = method;
}
2004-07-10 11:19:42 +04:00
}
2005-01-03 11:26:21 +03:00
methods.Add(new CompiledRemappedMethodWrapper(this, m.Name, sig, method, retType, paramTypes, modifiers, false, mbHelper, null));
2004-03-08 18:18:47 +03:00
}
}
}
2005-01-03 11:26:21 +03:00
SetMethods((MethodWrapper[])methods.ToArray(typeof(MethodWrapper)));
SetFields((FieldWrapper[])fields.ToArray(typeof(FieldWrapper)));
2004-03-08 18:18:47 +03:00
}
2004-08-17 13:05:21 +04:00
private class CompiledRemappedMethodWrapper : SmartMethodWrapper
2004-06-14 14:36:38 +04:00
{
2004-08-17 13:05:21 +04:00
private MethodInfo mbHelper;
private MethodInfo mbNonvirtualHelper;
2004-06-14 14:36:38 +04:00
2005-01-03 11:26:21 +03:00
internal CompiledRemappedMethodWrapper(TypeWrapper declaringType, string name, string sig, MethodBase method, TypeWrapper returnType, TypeWrapper[] parameterTypes, Modifiers modifiers, bool hideFromReflection, MethodInfo mbHelper, MethodInfo mbNonvirtualHelper)
: base(declaringType, name, sig, method, returnType, parameterTypes, modifiers, hideFromReflection ? MemberFlags.HideFromReflection : MemberFlags.None)
2004-06-14 14:36:38 +04:00
{
this.mbHelper = mbHelper;
2004-08-17 13:05:21 +04:00
this.mbNonvirtualHelper = mbNonvirtualHelper;
2004-06-14 14:36:38 +04:00
}
2004-08-17 13:05:21 +04:00
protected override void CallImpl(ILGenerator ilgen)
2004-06-14 14:36:38 +04:00
{
2004-08-17 13:05:21 +04:00
MethodBase mb = GetMethod();
MethodInfo mi = mb as MethodInfo;
if(mi != null)
{
ilgen.Emit(OpCodes.Call, mi);
}
else
{
ilgen.Emit(OpCodes.Call, (ConstructorInfo)mb);
}
2004-06-14 14:36:38 +04:00
}
2004-08-17 13:05:21 +04:00
protected override void CallvirtImpl(ILGenerator ilgen)
2004-03-08 18:18:47 +03:00
{
2004-08-17 13:05:21 +04:00
Debug.Assert(!mbHelper.IsStatic || mbHelper.Name.StartsWith("instancehelper_") || mbHelper.DeclaringType.Name == "__Helper");
ilgen.Emit(mbHelper.IsStatic ? OpCodes.Call : OpCodes.Callvirt, mbHelper);
2004-03-08 18:18:47 +03:00
}
2004-08-17 13:05:21 +04:00
protected override void NewobjImpl(ILGenerator ilgen)
2004-06-14 14:36:38 +04:00
{
2004-08-17 13:05:21 +04:00
MethodBase mb = GetMethod();
MethodInfo mi = mb as MethodInfo;
if(mi != null)
2004-06-14 14:36:38 +04:00
{
2004-08-17 13:05:21 +04:00
Debug.Assert(mi.Name == "newhelper");
ilgen.Emit(OpCodes.Call, mi);
2004-06-14 14:36:38 +04:00
}
2004-08-17 13:05:21 +04:00
else
2004-06-14 14:36:38 +04:00
{
2004-08-17 13:05:21 +04:00
ilgen.Emit(OpCodes.Newobj, (ConstructorInfo)mb);
2004-06-14 14:36:38 +04:00
}
}
2004-08-17 13:05:21 +04:00
internal override object Invoke(object obj, object[] args, bool nonVirtual)
2004-03-08 18:18:47 +03:00
{
2004-08-17 13:05:21 +04:00
MethodBase mb;
if(nonVirtual)
2002-12-18 19:00:25 +03:00
{
2004-08-17 13:05:21 +04:00
if(DeclaringType.TypeAsBaseType.IsInstanceOfType(obj))
2003-09-10 18:58:19 +04:00
{
2004-08-17 13:05:21 +04:00
mb = GetMethod();
2003-07-02 18:50:35 +04:00
}
2004-08-17 13:05:21 +04:00
else if(mbNonvirtualHelper != null)
2003-07-02 18:50:35 +04:00
{
2004-08-17 13:05:21 +04:00
mb = mbNonvirtualHelper;
2003-07-02 18:50:35 +04:00
}
2004-08-17 13:05:21 +04:00
else if(mbHelper != null)
2004-03-08 18:18:47 +03:00
{
2004-08-17 13:05:21 +04:00
mb = mbHelper;
2004-03-08 18:18:47 +03:00
}
else
{
2004-08-17 13:05:21 +04:00
// we can end up here if someone calls a constructor with nonVirtual set (which is pointless, but legal)
mb = GetMethod();
2004-03-08 18:18:47 +03:00
}
}
2004-08-17 13:05:21 +04:00
else
2004-06-25 13:38:07 +04:00
{
2004-08-17 13:05:21 +04:00
mb = mbHelper != null ? mbHelper : GetMethod();
}
return InvokeImpl(mb, obj, args, nonVirtual);
}
}
private MethodWrapper CreateRemappedMethodWrapper(MethodBase mb)
{
Modifiers modifiers = AttributeHelper.GetModifiers(mb, false);
string name;
string sig;
TypeWrapper retType;
TypeWrapper[] paramTypes;
GetNameSigFromMethodBase(mb, out name, out sig, out retType, out paramTypes);
MethodInfo mbHelper = mb as MethodInfo;
MethodInfo mbNonvirtualHelper = null;
if(!mb.IsStatic && !mb.IsConstructor)
{
ParameterInfo[] parameters = mb.GetParameters();
Type[] argTypes = new Type[parameters.Length + 1];
argTypes[0] = remappedType;
for(int i = 0; i < parameters.Length; i++)
{
argTypes[i + 1] = parameters[i].ParameterType;
}
MethodInfo helper = type.GetMethod("instancehelper_" + mb.Name, BindingFlags.NonPublic | BindingFlags.Public | BindingFlags.Static, null, argTypes, null);
if(helper != null)
{
mbHelper = helper;
2004-06-25 13:38:07 +04:00
}
2004-08-17 13:05:21 +04:00
mbNonvirtualHelper = type.GetMethod("nonvirtualhelper/" + mb.Name, BindingFlags.NonPublic | BindingFlags.Static, null, argTypes, null);
2002-12-18 19:00:25 +03:00
}
2005-01-03 11:26:21 +03:00
return new CompiledRemappedMethodWrapper(this, name, sig, mb, retType, paramTypes, modifiers, false, mbHelper, mbNonvirtualHelper);
2002-12-18 19:00:25 +03:00
}
2004-01-28 14:28:16 +03:00
private FieldWrapper CreateFieldWrapper(FieldInfo field)
2003-11-17 15:01:50 +03:00
{
2004-01-28 14:28:16 +03:00
Modifiers modifiers = AttributeHelper.GetModifiers(field, false);
2004-10-04 23:30:53 +04:00
string name = field.Name;
TypeWrapper type = ClassLoaderWrapper.GetWrapperFromType(field.FieldType);
if(field.IsDefined(typeof(NameSigAttribute), false))
{
NameSigAttribute attr = (NameSigAttribute)field.GetCustomAttributes(typeof(NameSigAttribute), false)[0];
name = attr.Name;
SigTypePatchUp(attr.Sig, ref type);
}
2004-01-28 14:28:16 +03:00
2004-08-17 13:05:21 +04:00
// If the backing field is private, but the modifiers aren't, we've got a final field that
2004-01-28 14:28:16 +03:00
// has a property accessor method.
if(field.IsPrivate && ((modifiers & Modifiers.Private) == 0))
2003-11-17 15:01:50 +03:00
{
2004-01-28 14:28:16 +03:00
BindingFlags bindingFlags = BindingFlags.DeclaredOnly | BindingFlags.NonPublic | BindingFlags.Public;
bindingFlags |= field.IsStatic ? BindingFlags.Static : BindingFlags.Instance;
PropertyInfo prop = field.DeclaringType.GetProperty(field.Name, bindingFlags, null, field.FieldType, Type.EmptyTypes, null);
2004-10-04 23:30:53 +04:00
MethodInfo getter = prop.GetGetMethod(true);
return new GetterFieldWrapper(this, type, field, name, type.SigName, modifiers, getter);
2004-01-28 14:28:16 +03:00
}
else if(field.IsLiteral)
{
2004-10-04 23:30:53 +04:00
return new ConstantFieldWrapper(this, type, name, type.SigName, modifiers, field, null);
2002-12-18 19:00:25 +03:00
}
2004-01-28 14:28:16 +03:00
else
2002-12-18 19:00:25 +03:00
{
2004-10-04 23:30:53 +04:00
return FieldWrapper.Create(this, type, field, name, type.SigName, modifiers);
2004-01-28 14:28:16 +03:00
}
2002-12-18 19:00:25 +03:00
}
2004-03-08 18:18:47 +03:00
internal override bool IsGhost
2002-12-18 19:00:25 +03:00
{
get
{
2004-03-08 18:18:47 +03:00
return type.IsDefined(typeof(GhostInterfaceAttribute), false);
}
}
internal override bool IsRemapped
{
get
{
return remappedType != null;
}
}
internal override Type TypeAsTBD
{
get
{
return remappedType != null ? remappedType : type;
}
}
internal override bool IsMapUnsafeException
{
get
{
return type.IsDefined(typeof(ExceptionIsUnsafeForMappingAttribute), false);
2002-12-18 19:00:25 +03:00
}
}
2005-01-03 11:26:21 +03:00
internal override void Finish(bool forDebugSave)
{
}
2002-12-18 19:00:25 +03:00
}
2004-10-04 23:30:53 +04:00
sealed class Whidbey
{
private static readonly object[] noargs = new object[0];
private static readonly MethodInfo get_IsGenericTypeDefinition = typeof(Type).GetMethod("get_IsGenericTypeDefinition");
private static readonly MethodInfo get_IsGenericMethodDefinition = typeof(MethodBase).GetMethod("get_IsGenericMethodDefinition");
internal static bool IsGenericTypeDefinition(Type type)
{
return get_IsGenericTypeDefinition != null && (bool)get_IsGenericTypeDefinition.Invoke(type, noargs);
}
internal static bool IsGenericMethodDefinition(MethodBase mb)
{
return get_IsGenericMethodDefinition != null && (bool)get_IsGenericMethodDefinition.Invoke(mb, noargs);
}
}
2005-01-03 11:26:21 +03:00
sealed class DotNetTypeWrapper : TypeWrapper
2003-02-22 15:28:12 +03:00
{
2003-08-21 14:06:34 +04:00
private const string NamePrefix = "cli.";
private const string DelegateInterfaceSuffix = "$Method";
private readonly Type type;
private TypeWrapper[] innerClasses;
private TypeWrapper outerClass;
2004-08-17 13:05:21 +04:00
private TypeWrapper[] interfaces;
2003-02-22 15:28:12 +03:00
2003-08-21 14:06:34 +04:00
private static Modifiers GetModifiers(Type type)
2003-02-22 15:28:12 +03:00
{
2003-10-22 20:34:22 +04:00
Modifiers modifiers = 0;
if(type.IsPublic)
{
modifiers |= Modifiers.Public;
}
else if(type.IsNestedPublic)
2003-02-22 15:28:12 +03:00
{
2004-07-10 11:19:42 +04:00
modifiers |= Modifiers.Static;
if(IsVisible(type))
{
modifiers |= Modifiers.Public;
}
2003-02-22 15:28:12 +03:00
}
2003-10-22 20:34:22 +04:00
else if(type.IsNestedPrivate)
{
modifiers |= Modifiers.Private | Modifiers.Static;
}
else if(type.IsNestedFamily || type.IsNestedFamORAssem)
{
modifiers |= Modifiers.Protected | Modifiers.Static;
}
else if(type.IsNestedAssembly || type.IsNestedFamANDAssem)
{
modifiers |= Modifiers.Static;
}
2004-04-23 18:21:43 +04:00
if(type.IsSealed)
2003-10-22 20:34:22 +04:00
{
modifiers |= Modifiers.Final;
}
if(type.IsAbstract)
{
modifiers |= Modifiers.Abstract;
}
if(type.IsInterface)
{
modifiers |= Modifiers.Interface;
}
return modifiers;
2003-08-21 14:06:34 +04:00
}
// NOTE when this is called on a remapped type, the "warped" underlying type name is returned.
// E.g. GetName(typeof(object)) returns "cli.System.Object".
internal static string GetName(Type type)
{
2004-01-11 16:14:42 +03:00
Debug.Assert(!type.IsArray && !type.Module.IsDefined(typeof(JavaModuleAttribute), false));
2003-08-21 14:06:34 +04:00
2003-10-17 12:08:31 +04:00
if(type.IsDefined(typeof(NoPackagePrefixAttribute), false) || type.Assembly.IsDefined(typeof(NoPackagePrefixAttribute), false))
{
2004-04-23 18:21:43 +04:00
// TODO figure out if this is even required
2003-10-17 12:08:31 +04:00
return type.FullName.Replace('+', '$');
}
2004-04-23 18:21:43 +04:00
return MangleTypeName(type.FullName);
}
private static string MangleTypeName(string name)
{
2003-08-21 14:06:34 +04:00
// TODO a fully reversible name mangling should be used (all characters not supported by Java should be escaped)
2004-04-23 18:21:43 +04:00
return NamePrefix + name.Replace('+', '$');
}
private static string DemangleTypeName(string name)
{
Debug.Assert(name.StartsWith(NamePrefix));
// TODO a fully reversible name mangling should be used (all characters not supported by Java should be escaped)
name = name.Substring(NamePrefix.Length);
if(name.EndsWith(DelegateInterfaceSuffix))
{
// HACK if we're a delegate nested type, don't replace the $ sign
return name;
}
return name.Replace('$', '+');
2003-08-21 14:06:34 +04:00
}
2004-08-17 13:05:21 +04:00
// this method returns a new TypeWrapper instance for each invocation (doesn't prevent duplicates)
// the caller is responsible for making sure that only one TypeWrapper with the specified name escapes
// out into the world
internal static TypeWrapper CreateDotNetTypeWrapper(string name)
2003-08-21 14:06:34 +04:00
{
2003-10-17 12:08:31 +04:00
bool prefixed = name.StartsWith(NamePrefix);
if(prefixed)
2003-02-22 15:28:12 +03:00
{
2004-04-23 18:21:43 +04:00
name = DemangleTypeName(name);
2003-10-17 12:08:31 +04:00
}
Type type = LoadTypeFromLoadedAssemblies(name);
if(type != null)
{
2004-10-04 23:30:53 +04:00
if(Whidbey.IsGenericTypeDefinition(type))
{
return null;
}
2003-10-17 12:08:31 +04:00
if(prefixed || type.IsDefined(typeof(NoPackagePrefixAttribute), false) || type.Assembly.IsDefined(typeof(NoPackagePrefixAttribute), false))
2003-08-21 14:06:34 +04:00
{
return new DotNetTypeWrapper(type);
}
2003-10-17 12:08:31 +04:00
}
if(name.EndsWith(DelegateInterfaceSuffix))
{
Type delegateType = LoadTypeFromLoadedAssemblies(name.Substring(0, name.Length - DelegateInterfaceSuffix.Length));
2004-04-23 18:21:43 +04:00
if(delegateType != null && delegateType.IsSubclassOf(typeof(Delegate)))
2003-08-21 14:06:34 +04:00
{
2003-10-17 12:08:31 +04:00
ModuleBuilder moduleBuilder = ClassLoaderWrapper.GetBootstrapClassLoader().ModuleBuilder;
TypeBuilder typeBuilder = moduleBuilder.DefineType(NamePrefix + name, TypeAttributes.Public | TypeAttributes.Interface | TypeAttributes.Abstract);
AttributeHelper.SetInnerClass(typeBuilder, NamePrefix + name, NamePrefix + delegateType.FullName, "Method", Modifiers.Public | Modifiers.Interface | Modifiers.Static | Modifiers.Abstract);
MethodInfo invoke = delegateType.GetMethod("Invoke");
if(invoke != null)
2003-08-21 14:06:34 +04:00
{
2003-10-17 12:08:31 +04:00
ParameterInfo[] parameters = invoke.GetParameters();
Type[] args = new Type[parameters.Length];
for(int i = 0; i < args.Length; i++)
2003-08-21 14:06:34 +04:00
{
2003-10-17 12:08:31 +04:00
// HACK if the delegate has pointer args, we cannot handle them, but it is already
2004-03-16 20:10:09 +03:00
// too late to refuse to load the class, so we replace pointers with IntPtr.
2003-10-17 12:08:31 +04:00
// This is not a solution, because if the delegate would be instantiated the generated
// code would be invalid.
if(parameters[i].ParameterType.IsPointer)
2003-08-21 14:06:34 +04:00
{
2003-10-17 12:08:31 +04:00
args[i] = typeof(IntPtr);
}
else
{
args[i] = parameters[i].ParameterType;
2003-08-21 14:06:34 +04:00
}
}
2003-10-17 12:08:31 +04:00
typeBuilder.DefineMethod("Invoke", MethodAttributes.Public | MethodAttributes.Abstract | MethodAttributes.Virtual, CallingConventions.Standard, invoke.ReturnType, args);
return new CompiledTypeWrapper(NamePrefix + name, typeBuilder.CreateType());
2003-08-21 14:06:34 +04:00
}
}
2003-02-22 15:28:12 +03:00
}
2003-08-21 14:06:34 +04:00
return null;
}
private static Type LoadTypeFromLoadedAssemblies(string name)
{
foreach(Assembly a in AppDomain.CurrentDomain.GetAssemblies())
2003-02-22 15:28:12 +03:00
{
2003-08-21 14:06:34 +04:00
// HACK we also look inside Java assemblies, because precompiled delegate interfaces might have ended up there
if(!(a is AssemblyBuilder))
{
Type t = a.GetType(name);
if(t != null)
{
return t;
}
// HACK we might be looking for an inner classes
2004-04-23 18:21:43 +04:00
// (if we remove the mangling of NoPackagePrefix types from GetName, we don't need this anymore)
2003-08-21 14:06:34 +04:00
t = a.GetType(name.Replace('$', '+'));
if(t != null)
{
return t;
}
}
}
return null;
}
2004-11-04 15:50:28 +03:00
internal static TypeWrapper GetWrapperFromDotNetType(Type type)
{
// TODO there should be a better way
return ClassLoaderWrapper.GetBootstrapClassLoader().LoadClassByDottedName(DotNetTypeWrapper.GetName(type));
}
2004-04-23 18:21:43 +04:00
private static TypeWrapper GetBaseTypeWrapper(Type type)
{
if(type.IsInterface)
{
return null;
}
else if(ClassLoaderWrapper.IsRemappedType(type))
{
// Remapped types extend their alter ego
// (e.g. cli.System.Object must appear to be derived from java.lang.Object)
// except when they're sealed, of course.
if(type.IsSealed)
{
return CoreClasses.java.lang.Object.Wrapper;
}
return ClassLoaderWrapper.GetWrapperFromType(type);
}
2004-11-04 15:50:28 +03:00
else if(ClassLoaderWrapper.IsRemappedType(type.BaseType))
{
return GetWrapperFromDotNetType(type.BaseType);
}
2004-04-23 18:21:43 +04:00
else
{
return ClassLoaderWrapper.GetWrapperFromType(type.BaseType);
}
}
2003-08-21 14:06:34 +04:00
internal DotNetTypeWrapper(Type type)
2005-01-03 11:26:21 +03:00
: base(GetModifiers(type), GetName(type), GetBaseTypeWrapper(type), null, null)
2003-08-21 14:06:34 +04:00
{
Debug.Assert(!(type.IsByRef), type.FullName);
Debug.Assert(!(type.IsPointer), type.FullName);
Debug.Assert(!(type.IsArray), type.FullName);
Debug.Assert(!(type is TypeBuilder), type.FullName);
2004-01-11 16:14:42 +03:00
Debug.Assert(!(type.Module.IsDefined(typeof(JavaModuleAttribute), false)));
2003-08-21 14:06:34 +04:00
this.type = type;
}
2004-11-08 13:01:39 +03:00
internal override ClassLoaderWrapper GetClassLoader()
{
return ClassLoaderWrapper.GetSystemClassLoader();
}
2003-08-26 15:24:17 +04:00
private class DelegateMethodWrapper : MethodWrapper
{
2004-08-17 13:05:21 +04:00
private ConstructorInfo delegateConstructor;
private MethodInfo method;
internal DelegateMethodWrapper(TypeWrapper declaringType, Type delegateType, TypeWrapper iface)
2005-01-03 11:26:21 +03:00
: base(declaringType, "<init>", "(" + iface.SigName + ")V", null, PrimitiveTypeWrapper.VOID, new TypeWrapper[] { iface }, Modifiers.Public, MemberFlags.None)
2004-08-17 13:05:21 +04:00
{
this.delegateConstructor = delegateType.GetConstructor(new Type[] { typeof(object), typeof(IntPtr) });
this.method = iface.TypeAsTBD.GetMethod("Invoke");
}
internal override void EmitNewobj(ILGenerator ilgen)
2003-08-26 15:24:17 +04:00
{
2004-08-17 13:05:21 +04:00
ilgen.Emit(OpCodes.Dup);
ilgen.Emit(OpCodes.Ldvirtftn, method);
ilgen.Emit(OpCodes.Newobj, delegateConstructor);
2003-08-26 15:24:17 +04:00
}
internal override object Invoke(object obj, object[] args, bool nonVirtual)
{
// TODO map exceptions
2004-01-11 16:14:42 +03:00
return Delegate.CreateDelegate(DeclaringType.TypeAsTBD, args[0], "Invoke");
2003-08-26 15:24:17 +04:00
}
}
2004-08-17 13:05:21 +04:00
private class ByRefMethodWrapper : SmartMethodWrapper
2003-08-26 15:24:17 +04:00
{
private bool[] byrefs;
2004-08-17 13:05:21 +04:00
private Type[] args;
2003-08-26 15:24:17 +04:00
2005-01-03 11:26:21 +03:00
internal ByRefMethodWrapper(Type[] args, bool[] byrefs, TypeWrapper declaringType, string name, string sig, MethodBase method, TypeWrapper returnType, TypeWrapper[] parameterTypes, Modifiers modifiers, bool hideFromReflection)
: base(declaringType, name, sig, method, returnType, parameterTypes, modifiers, hideFromReflection ? MemberFlags.HideFromReflection : MemberFlags.None)
2003-08-26 15:24:17 +04:00
{
2004-08-17 13:05:21 +04:00
this.args = args;
2003-08-26 15:24:17 +04:00
this.byrefs = byrefs;
}
2004-08-17 13:05:21 +04:00
protected override void CallImpl(ILGenerator ilgen)
{
MethodBase mb = GetMethod();
MethodInfo mi = mb as MethodInfo;
if(mi != null)
{
ilgen.Emit(OpCodes.Call, mi);
}
else
{
ilgen.Emit(OpCodes.Call, (ConstructorInfo)mb);
}
}
protected override void CallvirtImpl(ILGenerator ilgen)
{
ilgen.Emit(OpCodes.Callvirt, (MethodInfo)GetMethod());
}
protected override void NewobjImpl(ILGenerator ilgen)
{
ilgen.Emit(OpCodes.Newobj, (ConstructorInfo)GetMethod());
}
protected override void PreEmit(ILGenerator ilgen)
{
LocalBuilder[] locals = new LocalBuilder[args.Length];
for(int i = args.Length - 1; i >= 0; i--)
{
Type type = args[i];
if(type.IsByRef)
{
type = type.Assembly.GetType(type.GetElementType().FullName + "[]", true);
}
locals[i] = ilgen.DeclareLocal(type);
ilgen.Emit(OpCodes.Stloc, locals[i]);
}
for(int i = 0; i < args.Length; i++)
{
ilgen.Emit(OpCodes.Ldloc, locals[i]);
if(args[i].IsByRef)
{
ilgen.Emit(OpCodes.Ldc_I4_0);
ilgen.Emit(OpCodes.Ldelema, args[i].GetElementType());
}
}
base.PreEmit(ilgen);
}
2003-08-26 15:24:17 +04:00
internal override object Invoke(object obj, object[] args, bool nonVirtual)
{
object[] newargs = (object[])args.Clone();
for(int i = 0; i < newargs.Length; i++)
{
if(byrefs[i])
{
newargs[i] = ((Array)args[i]).GetValue(0);
}
}
try
{
return base.Invoke(obj, newargs, nonVirtual);
}
finally
{
for(int i = 0; i < newargs.Length; i++)
{
if(byrefs[i])
{
((Array)args[i]).SetValue(newargs[i], 0);
}
}
}
}
}
2004-07-10 11:19:42 +04:00
internal static bool IsVisible(Type type)
2003-10-17 12:08:31 +04:00
{
return type.IsPublic || (type.IsNestedPublic && IsVisible(type.DeclaringType));
}
2004-06-25 13:38:07 +04:00
private class EnumWrapMethodWrapper : MethodWrapper
{
internal EnumWrapMethodWrapper(DotNetTypeWrapper tw, TypeWrapper fieldType)
2005-01-03 11:26:21 +03:00
: base(tw, "wrap", "(" + fieldType.SigName + ")" + tw.SigName, null, tw, new TypeWrapper[] { fieldType }, Modifiers.Static | Modifiers.Public, MemberFlags.None)
2004-08-17 13:05:21 +04:00
{
}
internal override void EmitCall(ILGenerator ilgen)
2004-06-25 13:38:07 +04:00
{
// NOTE we don't support custom boxing rules for enums
2004-08-17 13:05:21 +04:00
ilgen.Emit(OpCodes.Box, ((DotNetTypeWrapper)DeclaringType).type);
2004-06-25 13:38:07 +04:00
}
internal override object Invoke(object obj, object[] args, bool nonVirtual)
{
return Enum.ToObject(DeclaringType.TypeAsTBD, ((IConvertible)args[0]).ToInt64(null));
}
}
2004-12-21 13:26:51 +03:00
internal class EnumValueFieldWrapper : FieldWrapper
2004-06-25 13:38:07 +04:00
{
// NOTE if the reference on the stack is null, we *want* the NullReferenceException, so we don't use TypeWrapper.EmitUnbox
internal EnumValueFieldWrapper(DotNetTypeWrapper tw, TypeWrapper fieldType)
2004-10-04 23:30:53 +04:00
: base(tw, fieldType, "Value", fieldType.SigName, Modifiers.Public | Modifiers.Final, null)
{
}
protected override void EmitGetImpl(ILGenerator ilgen)
{
DotNetTypeWrapper tw = (DotNetTypeWrapper)this.DeclaringType;
ilgen.Emit(OpCodes.Unbox, tw.type);
2004-12-21 13:26:51 +03:00
// FXBUG the .NET 1.1 verifier doesn't understand that ldobj on an enum that has an underlying type
// of byte or short that the resulting type on the stack is an int32, so we have to
// to it the hard way. Note that this is fixed in Whidbey.
Type underlyingType = Enum.GetUnderlyingType(tw.type);
if(underlyingType == typeof(sbyte) || underlyingType == typeof(byte))
{
ilgen.Emit(OpCodes.Ldind_I1);
}
else if(underlyingType == typeof(short) || underlyingType == typeof(ushort))
{
ilgen.Emit(OpCodes.Ldind_I2);
}
else if(underlyingType == typeof(int) || underlyingType == typeof(uint))
{
ilgen.Emit(OpCodes.Ldind_I4);
}
else if(underlyingType == typeof(long) || underlyingType == typeof(ulong))
{
ilgen.Emit(OpCodes.Ldind_I8);
}
2004-10-04 23:30:53 +04:00
}
protected override void EmitSetImpl(ILGenerator ilgen)
2004-06-25 13:38:07 +04:00
{
2004-10-04 23:30:53 +04:00
throw new InvalidOperationException();
2004-06-25 13:38:07 +04:00
}
internal override void SetValue(object obj, object val)
{
// NOTE even though the field is final, JNI reflection can still be used to set its value!
// NOTE the CLI spec says that an enum has exactly one instance field, so we take advantage of that fact.
FieldInfo f = DeclaringType.TypeAsTBD.GetFields(BindingFlags.Public | BindingFlags.NonPublic | BindingFlags.Instance)[0];
f.SetValue(obj, val);
}
2004-12-21 13:26:51 +03:00
// this method takes a boxed Enum and returns its value as a boxed primitive
// of the subset of Java primitives (i.e. sbyte, short, int, long)
internal static object GetEnumPrimitiveValue(object obj)
2004-06-25 13:38:07 +04:00
{
2004-12-21 13:26:51 +03:00
Type underlyingType = Enum.GetUnderlyingType(obj.GetType());
if(underlyingType == typeof(sbyte) || underlyingType == typeof(byte))
{
return unchecked((sbyte)((IConvertible)obj).ToInt32(null));
}
else if(underlyingType == typeof(short) || underlyingType == typeof(ushort))
{
return unchecked((short)((IConvertible)obj).ToInt32(null));
}
else if(underlyingType == typeof(int))
{
return ((IConvertible)obj).ToInt32(null);
}
else if(underlyingType == typeof(uint))
{
return unchecked((int)((IConvertible)obj).ToUInt32(null));
}
else if(underlyingType == typeof(long))
2004-06-25 13:38:07 +04:00
{
return ((IConvertible)obj).ToInt64(null);
}
2004-12-21 13:26:51 +03:00
else if(underlyingType == typeof(ulong))
{
return unchecked((long)((IConvertible)obj).ToUInt64(null));
}
2004-06-25 13:38:07 +04:00
else
{
2004-12-21 13:26:51 +03:00
throw new InvalidOperationException();
2004-06-25 13:38:07 +04:00
}
}
2004-12-21 13:26:51 +03:00
internal override object GetValue(object obj)
{
return GetEnumPrimitiveValue(obj);
}
2004-06-25 13:38:07 +04:00
}
2004-08-17 13:05:21 +04:00
internal override Assembly Assembly
{
get
{
return type.Assembly;
}
}
2004-10-19 17:43:55 +04:00
private class ValueTypeDefaultCtor : MethodWrapper
{
internal ValueTypeDefaultCtor(DotNetTypeWrapper tw)
2005-01-03 11:26:21 +03:00
: base(tw, "<init>", "()V", null, PrimitiveTypeWrapper.VOID, TypeWrapper.EmptyArray, Modifiers.Public, MemberFlags.None)
2004-10-19 17:43:55 +04:00
{
}
internal override void EmitNewobj(ILGenerator ilgen)
{
LocalBuilder local = ilgen.DeclareLocal(DeclaringType.TypeAsTBD);
ilgen.Emit(OpCodes.Ldloc, local);
ilgen.Emit(OpCodes.Box, DeclaringType.TypeAsTBD);
}
internal override object Invoke(object obj, object[] args, bool nonVirtual)
{
if(obj == null)
{
obj = Activator.CreateInstance(DeclaringType.TypeAsTBD);
}
return obj;
}
}
2004-01-28 14:28:16 +03:00
protected override void LazyPublishMembers()
2003-08-21 14:06:34 +04:00
{
2005-01-03 11:26:21 +03:00
ArrayList fieldsList = new ArrayList();
ArrayList methodsList = new ArrayList();
2003-08-21 14:06:34 +04:00
// special support for enums
if(type.IsEnum)
{
2004-12-21 13:26:51 +03:00
Type underlyingType = Enum.GetUnderlyingType(type);
if(underlyingType == typeof(byte))
{
underlyingType = typeof(sbyte);
}
else if(underlyingType == typeof(ushort))
{
underlyingType = typeof(short);
}
else if(underlyingType == typeof(uint))
{
underlyingType = typeof(int);
}
else if(underlyingType == typeof(ulong))
{
underlyingType = typeof(long);
}
TypeWrapper fieldType = ClassLoaderWrapper.GetWrapperFromType(underlyingType);
2003-08-21 14:06:34 +04:00
FieldInfo[] fields = type.GetFields(BindingFlags.DeclaredOnly | BindingFlags.Public | BindingFlags.Static);
for(int i = 0; i < fields.Length; i++)
{
if(fields[i].FieldType == type)
{
2004-06-25 13:38:07 +04:00
string name = fields[i].Name;
if(name == "Value")
{
name = "_Value";
}
else if(name.StartsWith("_") && name.EndsWith("Value"))
{
name = "_" + name;
}
2004-12-21 13:26:51 +03:00
object val = EnumValueFieldWrapper.GetEnumPrimitiveValue(fields[i].GetValue(null));
2005-01-03 11:26:21 +03:00
fieldsList.Add(new ConstantFieldWrapper(this, fieldType, name, fieldType.SigName, Modifiers.Public | Modifiers.Static | Modifiers.Final, fields[i], val));
2003-08-21 14:06:34 +04:00
}
}
2005-01-03 11:26:21 +03:00
fieldsList.Add(new EnumValueFieldWrapper(this, fieldType));
methodsList.Add(new EnumWrapMethodWrapper(this, fieldType));
2003-08-21 14:06:34 +04:00
}
else
{
FieldInfo[] fields = type.GetFields(BindingFlags.DeclaredOnly | BindingFlags.Public | BindingFlags.NonPublic | BindingFlags.Static | BindingFlags.Instance);
for(int i = 0; i < fields.Length; i++)
{
// TODO for remapped types, instance fields need to be converted to static getter/setter methods
if(fields[i].FieldType.IsPointer)
{
// skip, pointer fields are not supported
}
else
{
// TODO handle name/signature clash
2005-01-03 11:26:21 +03:00
fieldsList.Add(CreateFieldWrapperDotNet(AttributeHelper.GetModifiers(fields[i], true), fields[i].Name, fields[i].FieldType, fields[i]));
2003-08-21 14:06:34 +04:00
}
}
// special case for delegate constructors!
2004-09-05 13:37:58 +04:00
if(IsDelegate)
2003-08-21 14:06:34 +04:00
{
2004-09-05 13:37:58 +04:00
TypeWrapper iface = InnerClasses[0];
Debug.Assert(iface is CompiledTypeWrapper);
iface.Finish();
2005-01-03 11:26:21 +03:00
methodsList.Add(new DelegateMethodWrapper(this, type, iface));
2003-08-21 14:06:34 +04:00
}
2004-10-19 17:43:55 +04:00
bool fabricateDefaultCtor = type.IsValueType;
2003-08-21 14:06:34 +04:00
ConstructorInfo[] constructors = type.GetConstructors(BindingFlags.DeclaredOnly | BindingFlags.Public | BindingFlags.NonPublic | BindingFlags.Static | BindingFlags.Instance);
for(int i = 0; i < constructors.Length; i++)
{
2005-01-03 11:26:21 +03:00
string name;
string sig;
if(MakeMethodDescriptor(constructors[i], out name, out sig))
2003-08-21 14:06:34 +04:00
{
2005-01-03 11:26:21 +03:00
if(fabricateDefaultCtor && !constructors[i].IsStatic && sig == "()V")
2004-10-19 17:43:55 +04:00
{
fabricateDefaultCtor = false;
}
2003-08-21 14:06:34 +04:00
// TODO handle name/signature clash
2005-01-03 11:26:21 +03:00
methodsList.Add(CreateMethodWrapper(name, sig, constructors[i], false));
2003-08-21 14:06:34 +04:00
}
}
2004-10-19 17:43:55 +04:00
if(fabricateDefaultCtor)
{
// Value types have an implicit default ctor
2005-01-03 11:26:21 +03:00
methodsList.Add(new ValueTypeDefaultCtor(this));
2004-10-19 17:43:55 +04:00
}
2003-08-21 14:06:34 +04:00
MethodInfo[] methods = type.GetMethods(BindingFlags.DeclaredOnly | BindingFlags.Public | BindingFlags.NonPublic | BindingFlags.Static | BindingFlags.Instance);
for(int i = 0; i < methods.Length; i++)
{
2003-11-17 15:01:50 +03:00
if(methods[i].IsStatic && type.IsInterface)
2003-08-21 14:06:34 +04:00
{
2003-11-17 15:01:50 +03:00
// skip, Java cannot deal with static methods on interfaces
}
else
{
2005-01-03 11:26:21 +03:00
string name;
string sig;
if(MakeMethodDescriptor(methods[i], out name, out sig))
2003-11-17 15:01:50 +03:00
{
2004-11-04 15:50:28 +03:00
if(!methods[i].IsStatic && !methods[i].IsPrivate && BaseTypeWrapper != null)
{
2005-01-03 11:26:21 +03:00
MethodWrapper baseMethod = BaseTypeWrapper.GetMethodWrapper(name, sig, true);
2004-11-04 15:50:28 +03:00
if(baseMethod != null && baseMethod.IsFinal && !baseMethod.IsStatic && !baseMethod.IsPrivate)
{
continue;
}
}
2003-11-17 15:01:50 +03:00
// TODO handle name/signature clash
2005-01-03 11:26:21 +03:00
methodsList.Add(CreateMethodWrapper(name, sig, methods[i], false));
2003-12-20 01:19:18 +03:00
}
}
}
// HACK private interface implementations need to be published as well
// (otherwise the type appears abstract while it isn't)
2004-10-19 17:43:55 +04:00
if(!type.IsAbstract)
2003-12-20 01:19:18 +03:00
{
Type[] interfaces = type.GetInterfaces();
for(int i = 0; i < interfaces.Length; i++)
{
if(interfaces[i].IsPublic)
{
InterfaceMapping map = type.GetInterfaceMap(interfaces[i]);
for(int j = 0; j < map.InterfaceMethods.Length; j++)
{
if(!map.TargetMethods[j].IsPublic && map.TargetMethods[j].DeclaringType == type)
{
2005-01-03 11:26:21 +03:00
string name;
string sig;
if(MakeMethodDescriptor(map.InterfaceMethods[j], out name, out sig))
2003-12-20 01:19:18 +03:00
{
2004-11-04 15:50:28 +03:00
if(BaseTypeWrapper != null)
{
2005-01-03 11:26:21 +03:00
MethodWrapper baseMethod = BaseTypeWrapper.GetMethodWrapper(name, sig, true);
2004-11-04 15:50:28 +03:00
if(baseMethod != null && !baseMethod.IsStatic && baseMethod.IsPublic)
{
continue;
}
}
2003-12-20 01:19:18 +03:00
// TODO handle name/signature clash
2005-01-03 11:26:21 +03:00
methodsList.Add(CreateMethodWrapper(name, sig, map.InterfaceMethods[j], true));
2003-12-20 01:19:18 +03:00
}
}
}
2003-11-17 15:01:50 +03:00
}
2003-08-21 14:06:34 +04:00
}
}
2004-04-23 18:21:43 +04:00
// for non-final remapped types, we need to add all the virtual methods in our alter ego (which
// appears as our base class) and make them final (to prevent Java code from overriding these
// methods, which don't really exist).
if(ClassLoaderWrapper.IsRemappedType(type) && !type.IsSealed && !type.IsInterface)
{
// Finish the type, to make sure the methods are populated
this.BaseTypeWrapper.Finish();
Hashtable h = new Hashtable();
TypeWrapper baseTypeWrapper = this.BaseTypeWrapper;
while(baseTypeWrapper != null)
{
foreach(MethodWrapper m in baseTypeWrapper.GetMethods())
{
if(!m.IsStatic && !m.IsFinal && (m.IsPublic || m.IsProtected) && m.Name != "<init>")
{
2004-08-17 13:05:21 +04:00
if(!h.ContainsKey(m.Name + m.Signature))
2004-04-23 18:21:43 +04:00
{
2004-08-17 13:05:21 +04:00
h.Add(m.Name + m.Signature, "");
2004-04-23 18:21:43 +04:00
// TODO handle name/sig clash (what should we do?)
2005-01-03 11:26:21 +03:00
methodsList.Add(new BaseFinalMethodWrapper(this, m));
2004-04-23 18:21:43 +04:00
}
}
}
baseTypeWrapper = baseTypeWrapper.BaseTypeWrapper;
}
}
2003-08-21 14:06:34 +04:00
}
2005-01-03 11:26:21 +03:00
SetMethods((MethodWrapper[])methodsList.ToArray(typeof(MethodWrapper)));
SetFields((FieldWrapper[])fieldsList.ToArray(typeof(FieldWrapper)));
2003-08-21 14:06:34 +04:00
}
2004-08-17 13:05:21 +04:00
private class BaseFinalMethodWrapper : MethodWrapper
{
private MethodWrapper m;
internal BaseFinalMethodWrapper(DotNetTypeWrapper tw, MethodWrapper m)
2005-01-03 11:26:21 +03:00
: base(tw, m.Name, m.Signature, m.GetMethod(), m.ReturnType, m.GetParameters(), m.Modifiers | Modifiers.Final, MemberFlags.None)
2004-08-17 13:05:21 +04:00
{
this.m = m;
}
internal override void EmitCall(ILGenerator ilgen)
{
// we direct EmitCall to EmitCallvirt, because we always want to end up at the instancehelper method
// (EmitCall would go to our alter ego .NET type and that wouldn't be legal)
m.EmitCallvirt(ilgen);
}
internal override void EmitCallvirt(ILGenerator ilgen)
{
m.EmitCallvirt(ilgen);
}
internal override object Invoke(object obj, object[] args, bool nonVirtual)
{
return m.Invoke(obj, args, nonVirtual);
}
}
2005-01-03 11:26:21 +03:00
private bool MakeMethodDescriptor(MethodBase mb, out string name, out string sig)
2003-08-21 14:06:34 +04:00
{
2004-10-04 23:30:53 +04:00
if(Whidbey.IsGenericMethodDefinition(mb))
{
2005-01-03 11:26:21 +03:00
name = null;
sig = null;
return false;
2004-10-04 23:30:53 +04:00
}
2003-08-21 14:06:34 +04:00
System.Text.StringBuilder sb = new System.Text.StringBuilder();
sb.Append('(');
ParameterInfo[] parameters = mb.GetParameters();
2004-04-23 18:21:43 +04:00
TypeWrapper[] args = new TypeWrapper[parameters.Length];
2003-08-21 14:06:34 +04:00
for(int i = 0; i < parameters.Length; i++)
{
Type type = parameters[i].ParameterType;
if(type.IsPointer)
{
2005-01-03 11:26:21 +03:00
name = null;
sig = null;
return false;
2003-08-21 14:06:34 +04:00
}
if(type.IsByRef)
{
2004-10-04 23:30:53 +04:00
if(type.GetElementType().IsPointer)
{
2005-01-03 11:26:21 +03:00
name = null;
sig = null;
return false;
2004-10-04 23:30:53 +04:00
}
2003-08-21 14:06:34 +04:00
type = type.Assembly.GetType(type.GetElementType().FullName + "[]", true);
2003-08-26 15:24:17 +04:00
if(mb.IsAbstract)
{
// Since we cannot override methods with byref arguments, we don't report abstract
// methods with byref args.
2005-01-03 11:26:21 +03:00
name = null;
sig = null;
return false;
2003-08-26 15:24:17 +04:00
}
2003-08-21 14:06:34 +04:00
}
TypeWrapper tw = ClassLoaderWrapper.GetWrapperFromType(type);
2004-04-23 18:21:43 +04:00
args[i] = tw;
2003-08-21 14:06:34 +04:00
sb.Append(tw.SigName);
}
sb.Append(')');
if(mb is ConstructorInfo)
{
TypeWrapper ret = PrimitiveTypeWrapper.VOID;
if(mb.IsStatic)
{
name = "<clinit>";
}
else
{
name = "<init>";
}
sb.Append(ret.SigName);
2005-01-03 11:26:21 +03:00
sig = sb.ToString();
return true;
2003-08-21 14:06:34 +04:00
}
else
{
Type type = ((MethodInfo)mb).ReturnType;
2003-08-26 15:24:17 +04:00
if(type.IsPointer || type.IsByRef)
2003-08-21 14:06:34 +04:00
{
2005-01-03 11:26:21 +03:00
name = null;
sig = null;
return false;
2003-08-21 14:06:34 +04:00
}
TypeWrapper ret = ClassLoaderWrapper.GetWrapperFromType(type);
sb.Append(ret.SigName);
2005-01-03 11:26:21 +03:00
name = mb.Name;
sig = sb.ToString();
return true;
2003-08-21 14:06:34 +04:00
}
}
2004-03-08 18:18:47 +03:00
internal override TypeWrapper[] Interfaces
2003-08-21 14:06:34 +04:00
{
get
{
2004-08-17 13:05:21 +04:00
lock(this)
2003-08-21 14:06:34 +04:00
{
2004-08-17 13:05:21 +04:00
if(interfaces == null)
{
Type[] interfaceTypes = type.GetInterfaces();
interfaces = new TypeWrapper[interfaceTypes.Length];
for(int i = 0; i < interfaces.Length; i++)
{
2004-12-02 11:43:05 +03:00
if(interfaceTypes[i].DeclaringType != null &&
interfaceTypes[i].IsDefined(typeof(HideFromJavaAttribute), false) &&
interfaceTypes[i].Name == "__Interface")
{
// we have to return the declaring type for ghost interfaces
interfaces[i] = ClassLoaderWrapper.GetWrapperFromType(interfaceTypes[i].DeclaringType);
}
else
{
interfaces[i] = ClassLoaderWrapper.GetWrapperFromType(interfaceTypes[i]);
}
2004-08-17 13:05:21 +04:00
}
}
return interfaces;
2003-08-21 14:06:34 +04:00
}
}
}
2004-09-05 13:37:58 +04:00
private bool IsDelegate
{
get
{
// HACK non-public delegates do not get the special treatment (because they are likely to refer to
// non-public types in the arg list and they're not really useful anyway)
// NOTE we don't have to check in what assembly the type lives, because this is a DotNetTypeWrapper,
// we know that it is a different assembly.
return !type.IsAbstract && type.IsSubclassOf(typeof(MulticastDelegate)) && IsVisible(type);
}
}
2004-03-08 18:18:47 +03:00
internal override TypeWrapper[] InnerClasses
2003-08-21 14:06:34 +04:00
{
get
{
lock(this)
{
if(innerClasses == null)
{
2004-09-05 13:37:58 +04:00
if(IsDelegate)
{
innerClasses = new TypeWrapper[] { GetClassLoader().LoadClassByDottedName(Name + DelegateInterfaceSuffix) };
}
else
2003-08-21 14:06:34 +04:00
{
2004-09-05 13:37:58 +04:00
Type[] nestedTypes = type.GetNestedTypes(BindingFlags.Public | BindingFlags.NonPublic);
2004-10-04 23:30:53 +04:00
ArrayList list = new ArrayList(nestedTypes.Length);
2004-09-05 13:37:58 +04:00
for(int i = 0; i < nestedTypes.Length; i++)
{
2004-10-04 23:30:53 +04:00
if(!Whidbey.IsGenericTypeDefinition(nestedTypes[i]))
{
list.Add(ClassLoaderWrapper.GetWrapperFromType(nestedTypes[i]));
}
2004-09-05 13:37:58 +04:00
}
2004-10-04 23:30:53 +04:00
innerClasses = (TypeWrapper[])list.ToArray(typeof(TypeWrapper));
2003-08-21 14:06:34 +04:00
}
}
}
return innerClasses;
}
}
2004-03-08 18:18:47 +03:00
internal override TypeWrapper DeclaringTypeWrapper
2003-08-21 14:06:34 +04:00
{
get
{
if(outerClass == null)
{
Type outer = type.DeclaringType;
if(outer != null)
{
outerClass = ClassLoaderWrapper.GetWrapperFromType(outer);
}
}
return outerClass;
}
}
internal override Modifiers ReflectiveModifiers
{
get
{
if(DeclaringTypeWrapper != null)
{
return Modifiers | Modifiers.Static;
}
return Modifiers;
}
}
2004-10-04 23:30:53 +04:00
private FieldWrapper CreateFieldWrapperDotNet(Modifiers modifiers, string name, Type fieldType, FieldInfo field)
2003-08-21 14:06:34 +04:00
{
2004-10-04 23:30:53 +04:00
TypeWrapper type = ClassLoaderWrapper.GetWrapperFromType(fieldType);
if(field.IsLiteral)
2003-08-21 14:06:34 +04:00
{
2004-10-04 23:30:53 +04:00
return new ConstantFieldWrapper(this, type, name, type.SigName, modifiers, field, null);
2003-08-21 14:06:34 +04:00
}
else
{
2004-10-04 23:30:53 +04:00
return FieldWrapper.Create(this, type, field, name, type.SigName, modifiers);
2003-08-21 14:06:34 +04:00
}
}
2005-01-03 11:26:21 +03:00
private MethodWrapper CreateMethodWrapper(string name, string sig, MethodBase mb, bool privateInterfaceImplHack)
2003-08-21 14:06:34 +04:00
{
2004-03-16 20:10:09 +03:00
Modifiers mods = AttributeHelper.GetModifiers(mb, true);
2005-01-03 11:26:21 +03:00
if(name == "Finalize" && sig == "()V" && !mb.IsStatic &&
2004-03-20 16:25:08 +03:00
TypeAsBaseType.IsSubclassOf(CoreClasses.java.lang.Object.Wrapper.TypeAsBaseType))
2004-03-16 20:10:09 +03:00
{
// TODO if the .NET also has a "finalize" method, we need to hide that one (or rename it, or whatever)
2005-01-03 11:26:21 +03:00
MethodWrapper mw = new SimpleCallMethodWrapper(this, "finalize", "()V", (MethodInfo)mb, null, null, mods, false, SimpleOpCode.Call, SimpleOpCode.Callvirt);
2004-03-16 20:10:09 +03:00
mw.SetDeclaredExceptions(new string[] { "java.lang.Throwable" });
return mw;
}
2003-08-21 14:06:34 +04:00
ParameterInfo[] parameters = mb.GetParameters();
Type[] args = new Type[parameters.Length];
bool hasByRefArgs = false;
2003-08-26 15:24:17 +04:00
bool[] byrefs = null;
2003-08-21 14:06:34 +04:00
for(int i = 0; i < parameters.Length; i++)
{
args[i] = parameters[i].ParameterType;
if(parameters[i].ParameterType.IsByRef)
{
2003-08-26 15:24:17 +04:00
if(byrefs == null)
{
byrefs = new bool[args.Length];
}
byrefs[i] = true;
2003-08-21 14:06:34 +04:00
hasByRefArgs = true;
}
}
2003-12-20 01:19:18 +03:00
if(privateInterfaceImplHack)
{
mods &= ~Modifiers.Abstract;
mods |= Modifiers.Final;
}
2004-08-17 13:05:21 +04:00
if(hasByRefArgs)
2003-08-21 14:06:34 +04:00
{
2004-08-17 13:05:21 +04:00
if(!(mb is ConstructorInfo) && !mb.IsStatic)
2003-08-21 14:06:34 +04:00
{
2004-08-17 13:05:21 +04:00
mods |= Modifiers.Final;
2003-08-21 14:06:34 +04:00
}
2004-08-17 13:05:21 +04:00
// TODO pass in the argument and return types
2005-01-03 11:26:21 +03:00
return new ByRefMethodWrapper(args, byrefs, this, name, sig, mb, null, null, mods, false);
2003-08-21 14:06:34 +04:00
}
else
{
2004-08-17 13:05:21 +04:00
if(mb is ConstructorInfo)
2003-08-21 14:06:34 +04:00
{
2004-08-17 13:05:21 +04:00
// TODO pass in the argument and return types
2005-01-03 11:26:21 +03:00
return new SmartConstructorMethodWrapper(this, name, sig, (ConstructorInfo)mb, null, mods, false);
2003-08-21 14:06:34 +04:00
}
2004-08-17 13:05:21 +04:00
else
2003-08-21 14:06:34 +04:00
{
2004-08-17 13:05:21 +04:00
// TODO pass in the argument and return types
2005-01-03 11:26:21 +03:00
return new SmartCallMethodWrapper(this, name, sig, (MethodInfo)mb, null, null, mods, false, SimpleOpCode.Call, SimpleOpCode.Callvirt);
2003-08-21 14:06:34 +04:00
}
}
}
2004-03-08 18:18:47 +03:00
internal override Type TypeAsTBD
2003-08-21 14:06:34 +04:00
{
get
{
return type;
}
}
2004-04-23 18:21:43 +04:00
internal override bool IsRemapped
{
get
{
return ClassLoaderWrapper.IsRemappedType(type);
}
}
2004-10-19 17:43:55 +04:00
internal override void EmitInstanceOf(TypeWrapper context, ILGenerator ilgen)
{
if(IsRemapped)
{
TypeWrapper shadow = ClassLoaderWrapper.GetWrapperFromTypeFast(type);
2004-11-23 20:46:39 +03:00
MethodInfo method = shadow.TypeAsBaseType.GetMethod("__<instanceof>");
2004-10-19 17:43:55 +04:00
if(method != null)
{
ilgen.Emit(OpCodes.Call, method);
return;
}
}
ilgen.Emit(OpCodes.Isinst, type);
ilgen.Emit(OpCodes.Ldnull);
ilgen.Emit(OpCodes.Cgt_Un);
}
internal override void EmitCheckcast(TypeWrapper context, ILGenerator ilgen)
{
if(IsRemapped)
{
TypeWrapper shadow = ClassLoaderWrapper.GetWrapperFromTypeFast(type);
2004-11-23 20:46:39 +03:00
MethodInfo method = shadow.TypeAsBaseType.GetMethod("__<checkcast>");
2004-10-19 17:43:55 +04:00
if(method != null)
{
ilgen.Emit(OpCodes.Call, method);
return;
}
}
ilgen.Emit(OpCodes.Castclass, type);
}
2005-01-03 11:26:21 +03:00
internal override void Finish(bool forDebugSave)
{
// TODO instead of linking here, we should just pre-link in LazyPublishMembers
foreach(MethodWrapper mw in GetMethods())
{
mw.Link();
}
foreach(FieldWrapper fw in GetFields())
{
fw.Link();
}
}
2003-08-21 14:06:34 +04:00
}
2004-08-17 13:05:21 +04:00
sealed class ArrayTypeWrapper : TypeWrapper
2003-08-21 14:06:34 +04:00
{
private static TypeWrapper[] interfaces;
private static MethodInfo clone;
private Type type;
2004-12-22 11:04:10 +03:00
private Modifiers reflectiveModifiers;
2003-08-21 14:06:34 +04:00
2004-12-22 11:04:10 +03:00
internal ArrayTypeWrapper(Type type, Modifiers modifiers, Modifiers reflectiveModifiers, string name, ClassLoaderWrapper classLoader)
2004-12-21 17:59:29 +03:00
: base(modifiers, name, CoreClasses.java.lang.Object.Wrapper, classLoader, null)
2003-08-21 14:06:34 +04:00
{
this.type = type;
2004-12-22 11:04:10 +03:00
this.reflectiveModifiers = reflectiveModifiers;
2005-01-03 11:26:21 +03:00
}
protected override void LazyPublishMembers()
{
2003-08-21 14:06:34 +04:00
if(clone == null)
{
2005-01-03 11:26:21 +03:00
clone = typeof(Array).GetMethod("Clone", BindingFlags.Public | BindingFlags.Instance, null, Type.EmptyTypes, null);
2003-08-21 14:06:34 +04:00
}
2005-01-03 11:26:21 +03:00
MethodWrapper mw = new SimpleCallMethodWrapper(this, "clone", "()Ljava.lang.Object;", clone, CoreClasses.java.lang.Object.Wrapper, TypeWrapper.EmptyArray, Modifiers.Public, true, SimpleOpCode.Callvirt, SimpleOpCode.Callvirt);
2004-08-17 13:05:21 +04:00
mw.Link();
2005-01-03 11:26:21 +03:00
SetMethods(new MethodWrapper[] { mw });
SetFields(FieldWrapper.EmptyArray);
2004-08-17 13:05:21 +04:00
}
2004-12-22 11:04:10 +03:00
internal override Modifiers ReflectiveModifiers
{
get
{
return reflectiveModifiers;
}
}
2004-08-17 13:05:21 +04:00
internal override Assembly Assembly
{
get
2003-08-21 14:06:34 +04:00
{
2004-08-17 13:05:21 +04:00
return type.Assembly;
2003-08-21 14:06:34 +04:00
}
}
internal override string SigName
{
get
{
// for arrays the signature name is the same as the normal name
return Name;
2003-02-22 15:28:12 +03:00
}
}
2004-03-08 18:18:47 +03:00
internal override TypeWrapper[] Interfaces
2003-02-22 15:28:12 +03:00
{
get
{
if(interfaces == null)
{
TypeWrapper[] tw = new TypeWrapper[2];
2003-12-24 14:51:41 +03:00
tw[0] = ClassLoaderWrapper.LoadClassCritical("java.lang.Cloneable");
tw[1] = ClassLoaderWrapper.LoadClassCritical("java.io.Serializable");
2003-02-22 15:28:12 +03:00
interfaces = tw;
}
return interfaces;
}
}
2004-03-08 18:18:47 +03:00
internal override TypeWrapper[] InnerClasses
2003-02-22 15:28:12 +03:00
{
get
{
2003-05-30 16:08:59 +04:00
return TypeWrapper.EmptyArray;
2003-02-22 15:28:12 +03:00
}
}
2004-03-08 18:18:47 +03:00
internal override TypeWrapper DeclaringTypeWrapper
2003-02-22 15:28:12 +03:00
{
get
{
return null;
}
}
2004-03-08 18:18:47 +03:00
internal override Type TypeAsTBD
2003-02-22 15:28:12 +03:00
{
get
{
return type;
}
}
private bool IsFinished
{
get
{
Type elem = type.GetElementType();
while(elem.IsArray)
{
elem = elem.GetElementType();
}
return !(elem is TypeBuilder);
}
}
2004-08-17 13:05:21 +04:00
internal override void Finish(bool forDebugSave)
2003-02-22 15:28:12 +03:00
{
lock(this)
{
2004-08-17 13:05:21 +04:00
// TODO optimize this
2003-02-22 15:28:12 +03:00
if(!IsFinished)
{
TypeWrapper elementTypeWrapper = ElementTypeWrapper;
2004-01-11 16:14:42 +03:00
Type elementType = elementTypeWrapper.TypeAsArrayType;
2003-02-22 15:28:12 +03:00
elementTypeWrapper.Finish();
2003-06-10 17:28:47 +04:00
type = elementType.Assembly.GetType(elementType.FullName + "[]", true);
2003-02-22 15:28:12 +03:00
ClassLoaderWrapper.SetWrapperForType(type, this);
}
}
}
}