← Back to branch summary

~ubuntu-branches/ubuntu/trusty/monodevelop/trusty-proposed

« back to all changes in this revision

Viewing changes to external/ikvm/ikvmc/FakeTypes.cs

  • Committer: Package Import Robot
  • Author(s): Jo Shields
  • Date: 2013-05-12 09:46:03 UTC
  • mto: This revision was merged to the branch mainline in revision 29.
  • Revision ID: package-import@ubuntu.com-20130512094603-mad323bzcxvmcam0
Tags: upstream-4.0.5+dfsg
Import upstream version 4.0.5+dfsg

Show diffs side-by-side

added added

removed removed

Lines of Context:
external/ikvm/ikvmc/FakeTypes.cs
 
1
/*
 
2
  Copyright (C) 2008 Jeroen Frijters
 
3
 
 
4
  This software is provided 'as-is', without any express or implied
 
5
  warranty.  In no event will the authors be held liable for any damages
 
6
  arising from the use of this software.
 
7
 
 
8
  Permission is granted to anyone to use this software for any purpose,
 
9
  including commercial applications, and to alter it and redistribute it
 
10
  freely, subject to the following restrictions:
 
11
 
 
12
  1. The origin of this software must not be misrepresented; you must not
 
13
     claim that you wrote the original software. If you use this software
 
14
     in a product, an acknowledgment in the product documentation would be
 
15
     appreciated but is not required.
 
16
  2. Altered source versions must be plainly marked as such, and must not be
 
17
     misrepresented as being the original software.
 
18
  3. This notice may not be removed or altered from any source distribution.
 
19
 
 
20
  Jeroen Frijters
 
21
  jeroen@frijters.net
 
22
  
 
23
*/
 
24
using System;
 
25
using System.Collections.Generic;
 
26
using System.Text;
 
27
using IKVM.Reflection;
 
28
using IKVM.Reflection.Emit;
 
29
using Type = IKVM.Reflection.Type;
 
30
 
 
31
namespace IKVM.Internal
 
32
{
 
33
        static class FakeTypes
 
34
        {
 
35
                private static Type genericEnumEnumType;
 
36
                private static Type genericDelegateInterfaceType;
 
37
                private static Type genericAttributeAnnotationType;
 
38
                private static Type genericAttributeAnnotationMultipleType;
 
39
                private static Type genericAttributeAnnotationReturnValueType;
 
40
 
 
41
                internal static Type GetEnumType(Type enumType)
 
42
                {
 
43
                        return genericEnumEnumType.MakeGenericType(enumType);
 
44
                }
 
45
 
 
46
                internal static Type GetDelegateType(Type delegateType)
 
47
                {
 
48
                        return genericDelegateInterfaceType.MakeGenericType(delegateType);
 
49
                }
 
50
 
 
51
                internal static Type GetAttributeType(Type attributeType)
 
52
                {
 
53
                        return genericAttributeAnnotationType.MakeGenericType(attributeType);
 
54
                }
 
55
 
 
56
                internal static Type GetAttributeMultipleType(Type attributeType)
 
57
                {
 
58
                        return genericAttributeAnnotationMultipleType.MakeGenericType(attributeType);
 
59
                }
 
60
 
 
61
                internal static Type GetAttributeReturnValueType(Type attributeType)
 
62
                {
 
63
                        return genericAttributeAnnotationReturnValueType.MakeGenericType(attributeType);
 
64
                }
 
65
 
 
66
                internal static void Create(ModuleBuilder modb, ClassLoaderWrapper loader)
 
67
                {
 
68
                        TypeBuilder tb = modb.DefineType(DotNetTypeWrapper.GenericDelegateInterfaceTypeName, TypeAttributes.Interface | TypeAttributes.Abstract | TypeAttributes.Public);
 
69
                        tb.DefineGenericParameters("T")[0].SetBaseTypeConstraint(Types.MulticastDelegate);
 
70
                        genericDelegateInterfaceType = tb.CreateType();
 
71
 
 
72
                        genericAttributeAnnotationType = CreateAnnotationType(modb, DotNetTypeWrapper.GenericAttributeAnnotationTypeName);
 
73
                        genericAttributeAnnotationMultipleType = CreateAnnotationType(modb, DotNetTypeWrapper.GenericAttributeAnnotationMultipleTypeName);
 
74
                        genericAttributeAnnotationReturnValueType = CreateAnnotationType(modb, DotNetTypeWrapper.GenericAttributeAnnotationReturnValueTypeName);
 
75
                        CreateEnumEnum(modb, loader);
 
76
                }
 
77
 
 
78
                internal static void Finish(ClassLoaderWrapper loader)
 
79
                {
 
80
                        TypeBuilder tb = (TypeBuilder)genericEnumEnumType;
 
81
                        TypeWrapper enumTypeWrapper = loader.LoadClassByDottedName("java.lang.Enum");
 
82
                        enumTypeWrapper.Finish();
 
83
                        tb.SetParent(enumTypeWrapper.TypeAsBaseType);
 
84
                        CodeEmitter ilgen = CodeEmitter.Create(ReflectUtil.DefineConstructor(tb, MethodAttributes.Private, new Type[] { Types.String, Types.Int32 }));
 
85
                        ilgen.Emit(OpCodes.Ldarg_0);
 
86
                        ilgen.Emit(OpCodes.Ldarg_1);
 
87
                        ilgen.Emit(OpCodes.Ldarg_2);
 
88
                        enumTypeWrapper.GetMethodWrapper("<init>", "(Ljava.lang.String;I)V", false).EmitCall(ilgen);
 
89
                        ilgen.Emit(OpCodes.Ret);
 
90
                        ilgen.DoEmit();
 
91
                        genericEnumEnumType = tb.CreateType();
 
92
                }
 
93
 
 
94
                private static void CreateEnumEnum(ModuleBuilder modb, ClassLoaderWrapper loader)
 
95
                {
 
96
                        TypeBuilder tb = modb.DefineType(DotNetTypeWrapper.GenericEnumEnumTypeName, TypeAttributes.Class | TypeAttributes.Sealed | TypeAttributes.Public);
 
97
                        GenericTypeParameterBuilder gtpb = tb.DefineGenericParameters("T")[0];
 
98
                        gtpb.SetBaseTypeConstraint(Types.Enum);
 
99
                        genericEnumEnumType = tb;
 
100
                }
 
101
 
 
102
                private static Type CreateAnnotationType(ModuleBuilder modb, string name)
 
103
                {
 
104
                        TypeBuilder tb = modb.DefineType(name, TypeAttributes.Interface | TypeAttributes.Abstract | TypeAttributes.Public);
 
105
                        tb.DefineGenericParameters("T")[0].SetBaseTypeConstraint(Types.Attribute);
 
106
                        return tb.CreateType();
 
107
                }
 
108
 
 
109
                internal static void Load(Assembly assembly)
 
110
                {
 
111
                        genericEnumEnumType = assembly.GetType(DotNetTypeWrapper.GenericEnumEnumTypeName);
 
112
                        genericDelegateInterfaceType = assembly.GetType(DotNetTypeWrapper.GenericDelegateInterfaceTypeName);
 
113
                        genericAttributeAnnotationType = assembly.GetType(DotNetTypeWrapper.GenericAttributeAnnotationTypeName);
 
114
                        genericAttributeAnnotationMultipleType = assembly.GetType(DotNetTypeWrapper.GenericAttributeAnnotationMultipleTypeName);
 
115
                        genericAttributeAnnotationReturnValueType = assembly.GetType(DotNetTypeWrapper.GenericAttributeAnnotationReturnValueTypeName);
 
116
                }
 
117
        }
 
118
}