5 // Jb Evain (jbevain@gmail.com)
7 // (C) 2005 - 2007 Jb Evain
9 // Permission is hereby granted, free of charge, to any person obtaining
10 // a copy of this software and associated documentation files (the
11 // "Software"), to deal in the Software without restriction, including
12 // without limitation the rights to use, copy, modify, merge, publish,
13 // distribute, sublicense, and/or sell copies of the Software, and to
14 // permit persons to whom the Software is furnished to do so, subject to
15 // the following conditions:
17 // The above copyright notice and this permission notice shall be
18 // included in all copies or substantial portions of the Software.
20 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
21 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
22 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
23 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
24 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
25 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
26 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
29 namespace Mono.Cecil {
35 using Mono.Cecil.Binary;
37 using Mono.Cecil.Metadata;
38 using Mono.Cecil.Signatures;
40 internal abstract class ReflectionReader : BaseReflectionReader {
42 ModuleDefinition m_module;
44 SecurityDeclarationReader m_secReader;
45 protected MetadataTableReader m_tableReader;
46 protected MetadataRoot m_root;
47 protected TablesHeap m_tHeap;
48 protected bool m_checkDeleted;
50 protected TypeDefinition [] m_typeDefs;
51 protected TypeReference [] m_typeRefs;
52 protected TypeReference [] m_typeSpecs;
53 protected MethodDefinition [] m_meths;
54 protected FieldDefinition [] m_fields;
55 protected EventDefinition [] m_events;
56 protected PropertyDefinition [] m_properties;
57 protected MemberReference [] m_memberRefs;
58 protected ParameterDefinition [] m_parameters;
59 protected GenericParameter [] m_genericParameters;
60 protected GenericInstanceMethod [] m_methodSpecs;
63 AssemblyNameReference m_corlib;
65 protected SignatureReader m_sigReader;
66 protected CodeReader m_codeReader;
67 protected ISymbolReader m_symbolReader;
69 internal AssemblyNameReference Corlib {
74 foreach (AssemblyNameReference ar in m_module.AssemblyReferences) {
75 if (ar.Name == Constants.Corlib) {
85 public ModuleDefinition Module {
86 get { return m_module; }
89 public SignatureReader SigReader {
90 get { return m_sigReader; }
93 public MetadataTableReader TableReader {
94 get { return m_tableReader; }
97 public CodeReader Code {
98 get { return m_codeReader; }
101 public ISymbolReader SymbolReader {
102 get { return m_symbolReader; }
103 set { m_symbolReader = value; }
106 public MetadataRoot MetadataRoot {
107 get { return m_root; }
110 public ReflectionReader (ModuleDefinition module)
113 m_reader = m_module.ImageReader;
114 m_root = m_module.Image.MetadataRoot;
115 m_tHeap = m_root.Streams.TablesHeap;
116 m_checkDeleted = (m_tHeap.HeapSizes & 0x80) != 0;
117 if (m_reader != null)
118 m_tableReader = m_reader.MetadataReader.TableReader;
119 m_codeReader = new CodeReader (this);
120 m_sigReader = new SignatureReader (m_root, this);
121 m_isCorlib = module.Assembly.Name.Name == Constants.Corlib;
124 public TypeDefinition GetTypeDefAt (uint rid)
126 if (rid > m_typeDefs.Length)
129 return m_typeDefs [rid - 1];
132 public TypeReference GetTypeRefAt (uint rid)
134 if (rid > m_typeRefs.Length)
137 return m_typeRefs [rid - 1];
140 public TypeReference GetTypeSpecAt (uint rid, GenericContext context)
142 if (rid > m_typeSpecs.Length)
145 int index = (int) rid - 1;
146 TypeReference tspec = m_typeSpecs [index];
150 TypeSpecTable tsTable = m_tableReader.GetTypeSpecTable ();
151 TypeSpecRow tsRow = tsTable [index];
152 TypeSpec ts = m_sigReader.GetTypeSpec (tsRow.Signature);
153 tspec = GetTypeRefFromSig (ts.Type, context);
154 tspec = GetModifierType (ts.CustomMods, tspec);
155 tspec.MetadataToken = MetadataToken.FromMetadataRow (TokenType.TypeSpec, index);
156 m_typeSpecs [index] = tspec;
161 public FieldDefinition GetFieldDefAt (uint rid)
163 if (rid > m_fields.Length)
166 return m_fields [rid - 1];
169 public MethodDefinition GetMethodDefAt (uint rid)
171 if (rid > m_meths.Length)
174 return m_meths [rid - 1];
177 protected bool IsDeleted (IMemberDefinition member)
182 if (!member.IsSpecialName || !member.IsRuntimeSpecialName)
185 return member.Name.StartsWith (Constants.Deleted);
188 public MemberReference GetMemberRefAt (uint rid, GenericContext context)
190 if (rid > m_memberRefs.Length)
193 int index = (int) rid - 1;
194 MemberReference member = m_memberRefs [index];
198 MemberRefTable mrTable = m_tableReader.GetMemberRefTable ();
199 MemberRefRow mrefRow = mrTable [index];
201 Signature sig = m_sigReader.GetMemberRefSig (mrefRow.Class.TokenType, mrefRow.Signature);
202 switch (mrefRow.Class.TokenType) {
203 case TokenType.TypeDef :
204 case TokenType.TypeRef :
205 case TokenType.TypeSpec :
206 TypeReference declaringType = GetTypeDefOrRef (mrefRow.Class, context);
207 GenericContext nc = context.Clone ();
209 if (declaringType is GenericInstanceType) {
210 TypeReference ct = declaringType;
211 while (ct is GenericInstanceType)
212 ct = (ct as GenericInstanceType).ElementType;
217 if (sig is FieldSig) {
218 FieldSig fs = sig as FieldSig;
219 TypeReference fieldType = GetTypeRefFromSig (fs.Type, nc);
220 fieldType = GetModifierType (fs.CustomMods, fieldType);
222 member = new FieldReference (
223 m_root.Streams.StringsHeap [mrefRow.Name],
227 string name = m_root.Streams.StringsHeap [mrefRow.Name];
228 MethodSig ms = (MethodSig) sig;
230 member = CreateMethodReferenceFromSig (ms, name, declaringType, nc);
233 case TokenType.Method :
234 // really not sure about this
235 MethodDefinition methdef = GetMethodDefAt (mrefRow.Class.RID);
237 member = CreateMethodReferenceFromSig ((MethodSig) sig, methdef.Name, methdef.DeclaringType, new GenericContext ());
239 case TokenType.ModuleRef :
240 break; // TODO, implement that, or not
243 member.MetadataToken = MetadataToken.FromMetadataRow (TokenType.MemberRef, index);
244 m_module.MemberReferences.Add (member);
245 m_memberRefs [index] = member;
250 MethodReference CreateMethodReferenceFromSig (MethodSig ms, string name, TypeReference declaringType, GenericContext context)
252 MethodReference methref = new MethodReference (
253 name, ms.HasThis, ms.ExplicitThis, ms.MethCallConv);
254 methref.DeclaringType = declaringType;
256 if (ms is MethodDefSig) {
257 int arity = (ms as MethodDefSig).GenericParameterCount;
258 for (int i = 0; i < arity; i++)
259 methref.GenericParameters.Add (new GenericParameter (i, methref));
262 if (methref.GenericParameters.Count > 0)
263 context.Method = methref;
265 methref.ReturnType = GetMethodReturnType (ms, context);
267 methref.ReturnType.Method = methref;
268 for (int j = 0; j < ms.ParamCount; j++) {
269 Param p = ms.Parameters [j];
270 ParameterDefinition pdef = BuildParameterDefinition (j, p, context);
271 pdef.Method = methref;
272 methref.Parameters.Add (pdef);
275 CreateSentinelIfNeeded (methref, ms);
280 public static void CreateSentinelIfNeeded (IMethodSignature meth, MethodSig signature)
282 MethodDefSig sig = signature as MethodDefSig;
286 int sentinel = sig.Sentinel;
288 if (sig.Sentinel < 0 || sig.Sentinel >= meth.Parameters.Count)
291 ParameterDefinition param = meth.Parameters [sentinel];
292 param.ParameterType = new SentinelType (param.ParameterType);
295 public PropertyDefinition GetPropertyDefAt (uint rid)
297 if (rid > m_properties.Length)
300 return m_properties [rid - 1];
303 public EventDefinition GetEventDefAt (uint rid)
305 if (rid > m_events.Length)
308 return m_events [rid - 1];
311 public ParameterDefinition GetParamDefAt (uint rid)
313 if (rid > m_parameters.Length)
316 return m_parameters [rid - 1];
319 public GenericParameter GetGenericParameterAt (uint rid)
321 if (rid > m_genericParameters.Length)
324 return m_genericParameters [rid - 1];
327 public GenericInstanceMethod GetMethodSpecAt (uint rid, GenericContext context)
329 if (rid > m_methodSpecs.Length)
332 int index = (int) rid - 1;
333 GenericInstanceMethod gim = m_methodSpecs [index];
337 MethodSpecTable msTable = m_tableReader.GetMethodSpecTable ();
338 MethodSpecRow msRow = msTable [index];
340 MethodSpec sig = m_sigReader.GetMethodSpec (msRow.Instantiation);
342 MethodReference meth;
343 if (msRow.Method.TokenType == TokenType.Method)
344 meth = GetMethodDefAt (msRow.Method.RID);
345 else if (msRow.Method.TokenType == TokenType.MemberRef)
346 meth = (MethodReference) GetMemberRefAt (msRow.Method.RID, context);
348 throw new ReflectionException ("Unknown method type for method spec");
350 gim = new GenericInstanceMethod (meth);
351 context.CheckProvider (meth, sig.Signature.Arity);
352 foreach (GenericArg arg in sig.Signature.Types)
353 gim.GenericArguments.Add (GetGenericArg (arg, context));
355 m_methodSpecs [index] = gim;
360 public TypeReference GetTypeDefOrRef (MetadataToken token, GenericContext context)
365 switch (token.TokenType) {
366 case TokenType.TypeDef :
367 return GetTypeDefAt (token.RID);
368 case TokenType.TypeRef :
369 return GetTypeRefAt (token.RID);
370 case TokenType.TypeSpec :
371 return GetTypeSpecAt (token.RID, context);
377 public TypeReference SearchCoreType (string fullName)
380 return m_module.Types [fullName];
382 TypeReference coreType = m_module.TypeReferences [fullName];
383 if (coreType == null) {
384 string [] parts = fullName.Split ('.');
385 if (parts.Length != 2)
386 throw new ReflectionException ("Unvalid core type name");
387 coreType = new TypeReference (parts [1], parts [0], Corlib);
388 m_module.TypeReferences.Add (coreType);
390 if (!coreType.IsValueType) {
391 switch (coreType.FullName) {
392 case Constants.Boolean :
393 case Constants.Char :
394 case Constants.Single :
395 case Constants.Double :
396 case Constants.SByte :
397 case Constants.Byte :
398 case Constants.Int16 :
399 case Constants.UInt16 :
400 case Constants.Int32 :
401 case Constants.UInt32 :
402 case Constants.Int64 :
403 case Constants.UInt64 :
404 case Constants.IntPtr :
405 case Constants.UIntPtr :
406 coreType.IsValueType = true;
413 public IMetadataTokenProvider LookupByToken (MetadataToken token)
415 switch (token.TokenType) {
416 case TokenType.TypeDef :
417 return GetTypeDefAt (token.RID);
418 case TokenType.TypeRef :
419 return GetTypeRefAt (token.RID);
420 case TokenType.Method :
421 return GetMethodDefAt (token.RID);
422 case TokenType.Field :
423 return GetFieldDefAt (token.RID);
424 case TokenType.Event :
425 return GetEventDefAt (token.RID);
426 case TokenType.Property :
427 return GetPropertyDefAt (token.RID);
428 case TokenType.Param :
429 return GetParamDefAt (token.RID);
431 throw new NotSupportedException ("Lookup is not allowed on this kind of token");
435 public CustomAttribute GetCustomAttribute (MethodReference ctor, byte [] data, bool resolve)
437 CustomAttrib sig = m_sigReader.GetCustomAttrib (data, ctor, resolve);
438 return BuildCustomAttribute (ctor, data, sig);
441 public CustomAttribute GetCustomAttribute (MethodReference ctor, byte [] data)
443 return GetCustomAttribute (ctor, data, false);
446 public override void VisitModuleDefinition (ModuleDefinition mod)
448 VisitTypeDefinitionCollection (mod.Types);
451 public override void VisitTypeDefinitionCollection (TypeDefinitionCollection types)
454 TypeDefTable typesTable = m_tableReader.GetTypeDefTable ();
455 m_typeDefs = new TypeDefinition [typesTable.Rows.Count];
456 for (int i = 0; i < typesTable.Rows.Count; i++) {
457 TypeDefRow type = typesTable [i];
458 TypeDefinition t = new TypeDefinition (
459 m_root.Streams.StringsHeap [type.Name],
460 m_root.Streams.StringsHeap [type.Namespace],
462 t.MetadataToken = MetadataToken.FromMetadataRow (TokenType.TypeDef, i);
468 if (m_tHeap.HasTable (NestedClassTable.RId)) {
469 NestedClassTable nested = m_tableReader.GetNestedClassTable ();
470 for (int i = 0; i < nested.Rows.Count; i++) {
471 NestedClassRow row = nested [i];
473 TypeDefinition parent = GetTypeDefAt (row.EnclosingClass);
474 TypeDefinition child = GetTypeDefAt (row.NestedClass);
476 if (!IsDeleted (child))
477 parent.NestedTypes.Add (child);
481 foreach (TypeDefinition type in m_typeDefs)
482 if (!IsDeleted (type))
486 if (m_tHeap.HasTable (TypeRefTable.RId)) {
487 TypeRefTable typesRef = m_tableReader.GetTypeRefTable ();
489 m_typeRefs = new TypeReference [typesRef.Rows.Count];
491 for (int i = 0; i < typesRef.Rows.Count; i++)
492 AddTypeRef (typesRef, i);
494 m_typeRefs = new TypeReference [0];
500 ReadGenericParameters ();
503 for (int i = 0; i < typesTable.Rows.Count; i++) {
504 TypeDefRow type = typesTable [i];
505 TypeDefinition child = m_typeDefs [i];
506 child.BaseType = GetTypeDefOrRef (type.Extends, new GenericContext (child));
511 ReadMemberReferences ();
514 void AddTypeRef (TypeRefTable typesRef, int i)
516 // Check if index has been already added.
517 if (m_typeRefs [i] != null)
520 TypeRefRow type = typesRef [i];
521 IMetadataScope scope = null;
522 TypeReference parent = null;
524 if (type.ResolutionScope.RID != 0) {
525 int rid = (int) type.ResolutionScope.RID - 1;
526 switch (type.ResolutionScope.TokenType) {
527 case TokenType.AssemblyRef:
528 scope = m_module.AssemblyReferences [rid];
530 case TokenType.ModuleRef:
531 scope = m_module.ModuleReferences [rid];
533 case TokenType.Module:
534 scope = m_module.Assembly.Modules [rid];
536 case TokenType.TypeRef:
537 AddTypeRef (typesRef, rid);
538 parent = GetTypeRefAt (type.ResolutionScope.RID);
539 scope = parent.Scope;
544 TypeReference t = new TypeReference (
545 m_root.Streams.StringsHeap [type.Name],
546 m_root.Streams.StringsHeap [type.Namespace],
548 t.MetadataToken = MetadataToken.FromMetadataRow (TokenType.TypeRef, i);
551 t.DeclaringType = parent;
554 m_module.TypeReferences.Add (t);
557 void ReadTypeSpecs ()
559 if (!m_tHeap.HasTable (TypeSpecTable.RId))
562 TypeSpecTable tsTable = m_tableReader.GetTypeSpecTable ();
563 m_typeSpecs = new TypeReference [tsTable.Rows.Count];
566 void ReadMethodSpecs ()
568 if (!m_tHeap.HasTable (MethodSpecTable.RId))
571 MethodSpecTable msTable = m_tableReader.GetMethodSpecTable ();
572 m_methodSpecs = new GenericInstanceMethod [msTable.Rows.Count];
575 void ReadGenericParameters ()
577 if (!m_tHeap.HasTable (GenericParamTable.RId))
580 GenericParamTable gpTable = m_tableReader.GetGenericParamTable ();
581 m_genericParameters = new GenericParameter [gpTable.Rows.Count];
582 for (int i = 0; i < gpTable.Rows.Count; i++) {
583 GenericParamRow gpRow = gpTable [i];
584 IGenericParameterProvider owner;
585 if (gpRow.Owner.TokenType == TokenType.Method)
586 owner = GetMethodDefAt (gpRow.Owner.RID);
587 else if (gpRow.Owner.TokenType == TokenType.TypeDef)
588 owner = GetTypeDefAt (gpRow.Owner.RID);
590 throw new ReflectionException ("Unknown owner type for generic parameter");
592 GenericParameter gp = new GenericParameter (gpRow.Number, owner);
593 gp.Attributes = gpRow.Flags;
594 gp.Name = MetadataRoot.Streams.StringsHeap [gpRow.Name];
595 gp.MetadataToken = MetadataToken.FromMetadataRow (TokenType.GenericParam, i);
597 owner.GenericParameters.Add (gp);
598 m_genericParameters [i] = gp;
602 void ReadAllFields ()
604 TypeDefTable tdefTable = m_tableReader.GetTypeDefTable ();
606 if (!m_tHeap.HasTable (FieldTable.RId)) {
607 m_fields = new FieldDefinition [0];
611 FieldTable fldTable = m_tableReader.GetFieldTable ();
612 m_fields = new FieldDefinition [fldTable.Rows.Count];
614 for (int i = 0; i < m_typeDefs.Length; i++) {
615 TypeDefinition dec = m_typeDefs [i];
616 GenericContext context = new GenericContext (dec);
620 if (index == tdefTable.Rows.Count - 1)
621 next = fldTable.Rows.Count + 1;
623 next = (int) (tdefTable [index + 1]).FieldList;
625 for (int j = (int) tdefTable [index].FieldList; j < next; j++) {
626 FieldRow frow = fldTable [j - 1];
627 FieldSig fsig = m_sigReader.GetFieldSig (frow.Signature);
629 FieldDefinition fdef = new FieldDefinition (
630 m_root.Streams.StringsHeap [frow.Name],
631 GetTypeRefFromSig (fsig.Type, context), frow.Flags);
632 fdef.MetadataToken = MetadataToken.FromMetadataRow (TokenType.Field, j - 1);
634 if (fsig.CustomMods.Length > 0)
635 fdef.FieldType = GetModifierType (fsig.CustomMods, fdef.FieldType);
637 if (!IsDeleted (fdef))
638 dec.Fields.Add (fdef);
640 m_fields [j - 1] = fdef;
647 if (!m_tHeap.HasTable (MethodTable.RId)) {
648 m_meths = new MethodDefinition [0];
652 MethodTable mTable = m_tableReader.GetMethodTable ();
653 m_meths = new MethodDefinition [mTable.Rows.Count];
654 for (int i = 0; i < mTable.Rows.Count; i++) {
655 MethodRow mRow = mTable [i];
656 MethodDefinition meth = new MethodDefinition (
657 m_root.Streams.StringsHeap [mRow.Name],
660 meth.ImplAttributes = mRow.ImplFlags;
662 meth.MetadataToken = MetadataToken.FromMetadataRow (TokenType.Method, i);
668 void CompleteMethods ()
670 TypeDefTable tdefTable = m_tableReader.GetTypeDefTable ();
672 if (!m_tHeap.HasTable (MethodTable.RId)) {
673 m_meths = new MethodDefinition [0];
677 MethodTable methTable = m_tableReader.GetMethodTable ();
678 ParamTable paramTable = m_tableReader.GetParamTable ();
679 if (!m_tHeap.HasTable (ParamTable.RId))
680 m_parameters = new ParameterDefinition [0];
682 m_parameters = new ParameterDefinition [paramTable.Rows.Count];
684 for (int i = 0; i < m_typeDefs.Length; i++) {
685 TypeDefinition dec = m_typeDefs [i];
689 if (index == tdefTable.Rows.Count - 1)
690 next = methTable.Rows.Count + 1;
692 next = (int) (tdefTable [index + 1]).MethodList;
694 for (int j = (int) tdefTable [index].MethodList; j < next; j++) {
695 MethodRow methRow = methTable [j - 1];
696 MethodDefinition mdef = m_meths [j - 1];
698 if (!IsDeleted (mdef)) {
699 if (mdef.IsConstructor)
700 dec.Constructors.Add (mdef);
702 dec.Methods.Add (mdef);
705 GenericContext context = new GenericContext (mdef);
707 MethodDefSig msig = m_sigReader.GetMethodDefSig (methRow.Signature);
708 mdef.HasThis = msig.HasThis;
709 mdef.ExplicitThis = msig.ExplicitThis;
710 mdef.CallingConvention = msig.MethCallConv;
713 if (j == methTable.Rows.Count)
714 prms = m_parameters.Length + 1;
716 prms = (int) (methTable [j]).ParamList;
718 ParameterDefinition retparam = null;
720 //TODO: optimize this
721 int start = (int) methRow.ParamList - 1;
723 if (paramTable != null && start < prms - 1) {
725 ParamRow pRetRow = paramTable [start];
727 if (pRetRow != null && pRetRow.Sequence == 0) { // ret type
729 retparam = new ParameterDefinition (
730 m_root.Streams.StringsHeap [pRetRow.Name],
735 retparam.Method = mdef;
736 m_parameters [start] = retparam;
741 for (int k = 0; k < msig.ParamCount; k++) {
743 int pointer = start + k;
745 ParamRow pRow = null;
747 if (paramTable != null && pointer < prms - 1)
748 pRow = paramTable [pointer];
750 Param psig = msig.Parameters [k];
752 ParameterDefinition pdef;
754 pdef = BuildParameterDefinition (
755 m_root.Streams.StringsHeap [pRow.Name],
756 pRow.Sequence, pRow.Flags, psig, context);
757 pdef.MetadataToken = MetadataToken.FromMetadataRow (TokenType.Param, pointer);
758 m_parameters [pointer] = pdef;
760 pdef = BuildParameterDefinition (k + 1, psig, context);
763 mdef.Parameters.Add (pdef);
766 mdef.ReturnType = GetMethodReturnType (msig, context);
767 MethodReturnType mrt = mdef.ReturnType;
769 if (retparam != null) {
770 mrt.Parameter = retparam;
771 mrt.Parameter.ParameterType = mrt.ReturnType;
776 uint eprid = CodeReader.GetRid ((int) m_reader.Image.CLIHeader.EntryPointToken);
777 if (eprid > 0 && eprid <= m_meths.Length)
778 m_module.Assembly.EntryPoint = GetMethodDefAt (eprid);
781 void ReadMemberReferences ()
783 if (!m_tHeap.HasTable (MemberRefTable.RId))
786 MemberRefTable mrefTable = m_tableReader.GetMemberRefTable ();
787 m_memberRefs = new MemberReference [mrefTable.Rows.Count];
790 public override void VisitExternTypeCollection (ExternTypeCollection externs)
792 ExternTypeCollection ext = externs;
794 if (!m_tHeap.HasTable (ExportedTypeTable.RId))
797 ExportedTypeTable etTable = m_tableReader.GetExportedTypeTable ();
798 TypeReference [] buffer = new TypeReference [etTable.Rows.Count];
800 for (int i = 0; i < etTable.Rows.Count; i++) {
801 ExportedTypeRow etRow = etTable [i];
802 if (etRow.Implementation.TokenType != TokenType.File)
805 string name = m_root.Streams.StringsHeap [etRow.TypeName];
806 string ns = m_root.Streams.StringsHeap [etRow.TypeNamespace];
808 buffer [i] = m_module.TypeReferences [name];
810 buffer [i] = m_module.TypeReferences [string.Concat (ns, '.', name)];
813 for (int i = 0; i < etTable.Rows.Count; i++) {
814 ExportedTypeRow etRow = etTable [i];
815 if (etRow.Implementation.TokenType != TokenType.ExportedType)
818 TypeReference owner = buffer [etRow.Implementation.RID - 1];
819 string name = m_root.Streams.StringsHeap [etRow.TypeName];
820 buffer [i] = m_module.TypeReferences [string.Concat (owner.FullName, '/', name)];
823 for (int i = 0; i < buffer.Length; i++) {
824 TypeReference curs = buffer [i];
830 static object GetFixedArgValue (CustomAttrib.FixedArg fa)
833 object [] vals = new object [fa.NumElem];
834 for (int j = 0; j < vals.Length; j++)
835 vals [j] = fa.Elems [j].Value;
838 return fa.Elems [0].Value;
841 TypeReference GetFixedArgType (CustomAttrib.FixedArg fa)
845 return new ArrayType (SearchCoreType (Constants.Object));
847 return new ArrayType (fa.Elems [0].ElemType);
849 return fa.Elems [0].ElemType;
852 TypeReference GetNamedArgType (CustomAttrib.NamedArg na)
854 if (na.FieldOrPropType == ElementType.Boxed)
855 return SearchCoreType (Constants.Object);
857 return GetFixedArgType (na.FixedArg);
860 protected CustomAttribute BuildCustomAttribute (MethodReference ctor, byte [] data, CustomAttrib sig)
862 CustomAttribute cattr = new CustomAttribute (ctor);
864 cattr.Resolved = false;
869 foreach (CustomAttrib.FixedArg fa in sig.FixedArgs)
870 cattr.ConstructorParameters.Add (GetFixedArgValue (fa));
872 foreach (CustomAttrib.NamedArg na in sig.NamedArgs) {
873 object value = GetFixedArgValue (na.FixedArg);
875 cattr.Fields [na.FieldOrPropName] = value;
876 cattr.SetFieldType (na.FieldOrPropName, GetNamedArgType (na));
877 } else if (na.Property) {
878 cattr.Properties [na.FieldOrPropName] = value;
879 cattr.SetPropertyType (na.FieldOrPropName, GetNamedArgType (na));
881 throw new ReflectionException ("Non valid named arg");
887 void CompleteParameter (ParameterDefinition parameter, Param signature, GenericContext context)
889 TypeReference paramType;
891 if (signature.TypedByRef)
892 paramType = SearchCoreType (Constants.TypedReference);
894 paramType = GetTypeRefFromSig (signature.Type, context);
896 paramType = GetModifierType (signature.CustomMods, paramType);
899 paramType = new ReferenceType (paramType);
901 parameter.ParameterType = paramType;
904 public ParameterDefinition BuildParameterDefinition (int sequence, Param psig, GenericContext context)
906 ParameterDefinition parameter = new ParameterDefinition (null);
907 parameter.Sequence = sequence;
909 CompleteParameter (parameter, psig, context);
914 public ParameterDefinition BuildParameterDefinition (string name, int sequence, ParameterAttributes attrs, Param psig, GenericContext context)
916 ParameterDefinition parameter = new ParameterDefinition (name, sequence, attrs, null);
918 CompleteParameter (parameter, psig, context);
923 protected SecurityDeclaration BuildSecurityDeclaration (DeclSecurityRow dsRow)
925 return BuildSecurityDeclaration (dsRow.Action, m_root.Streams.BlobHeap.Read (dsRow.PermissionSet));
928 public SecurityDeclaration BuildSecurityDeclaration (SecurityAction action, byte [] permset)
930 if (m_secReader == null)
931 m_secReader = new SecurityDeclarationReader (m_root, this);
933 return m_secReader.FromByteArray (action, permset);
936 protected MarshalSpec BuildMarshalDesc (MarshalSig ms, IHasMarshalSpec container)
938 if (ms.Spec is MarshalSig.Array) {
939 ArrayMarshalSpec amd = new ArrayMarshalSpec (container);
940 MarshalSig.Array ar = (MarshalSig.Array) ms.Spec;
941 amd.ElemType = ar.ArrayElemType;
942 amd.NumElem = ar.NumElem;
943 amd.ParamNum = ar.ParamNum;
944 amd.ElemMult = ar.ElemMult;
946 } else if (ms.Spec is MarshalSig.CustomMarshaler) {
947 CustomMarshalerSpec cmd = new CustomMarshalerSpec (container);
948 MarshalSig.CustomMarshaler cmsig = (MarshalSig.CustomMarshaler) ms.Spec;
949 cmd.Guid = cmsig.Guid.Length > 0 ? new Guid (cmsig.Guid) : new Guid ();
950 cmd.UnmanagedType = cmsig.UnmanagedType;
951 cmd.ManagedType = cmsig.ManagedType;
952 cmd.Cookie = cmsig.Cookie;
954 } else if (ms.Spec is MarshalSig.FixedArray) {
955 FixedArraySpec fad = new FixedArraySpec (container);
956 MarshalSig.FixedArray fasig = (MarshalSig.FixedArray) ms.Spec;
957 fad.ElemType = fasig.ArrayElemType;
958 fad.NumElem = fasig.NumElem;
960 } else if (ms.Spec is MarshalSig.FixedSysString) {
961 FixedSysStringSpec fssc = new FixedSysStringSpec (container);
962 fssc.Size = ((MarshalSig.FixedSysString) ms.Spec).Size;
964 } else if (ms.Spec is MarshalSig.SafeArray) {
965 SafeArraySpec sad = new SafeArraySpec (container);
966 sad.ElemType = ((MarshalSig.SafeArray) ms.Spec).ArrayElemType;
969 return new MarshalSpec (ms.NativeInstrinsic, container);
973 public TypeReference GetModifierType (CustomMod [] cmods, TypeReference type)
975 if (cmods == null || cmods.Length == 0)
978 TypeReference ret = type;
979 for (int i = cmods.Length - 1; i >= 0; i--) {
980 CustomMod cmod = cmods [i];
981 TypeReference modType;
983 if (cmod.TypeDefOrRef.RID == 0)
986 if (cmod.TypeDefOrRef.TokenType == TokenType.TypeDef)
987 modType = GetTypeDefAt (cmod.TypeDefOrRef.RID);
989 modType = GetTypeRefAt (cmod.TypeDefOrRef.RID);
991 if (cmod.CMOD == CustomMod.CMODType.OPT)
992 ret = new ModifierOptional (ret, modType);
993 else if (cmod.CMOD == CustomMod.CMODType.REQD)
994 ret = new ModifierRequired (ret, modType);
999 public MethodReturnType GetMethodReturnType (MethodSig msig, GenericContext context)
1001 TypeReference retType;
1002 if (msig.RetType.Void)
1003 retType = SearchCoreType (Constants.Void);
1004 else if (msig.RetType.TypedByRef)
1005 retType = SearchCoreType (Constants.TypedReference);
1007 retType = GetTypeRefFromSig (msig.RetType.Type, context);
1009 retType = GetModifierType (msig.RetType.CustomMods, retType);
1011 if (msig.RetType.ByRef)
1012 retType = new ReferenceType (retType);
1014 return new MethodReturnType (retType);
1017 public TypeReference GetTypeRefFromSig (SigType t, GenericContext context)
1019 switch (t.ElementType) {
1020 case ElementType.Class :
1021 CLASS c = t as CLASS;
1022 return GetTypeDefOrRef (c.Type, context);
1023 case ElementType.ValueType :
1024 VALUETYPE vt = t as VALUETYPE;
1025 TypeReference vtr = GetTypeDefOrRef (vt.Type, context);
1026 vtr.IsValueType = true;
1028 case ElementType.String :
1029 return SearchCoreType (Constants.String);
1030 case ElementType.Object :
1031 return SearchCoreType (Constants.Object);
1032 case ElementType.Void :
1033 return SearchCoreType (Constants.Void);
1034 case ElementType.Boolean :
1035 return SearchCoreType (Constants.Boolean);
1036 case ElementType.Char :
1037 return SearchCoreType (Constants.Char);
1038 case ElementType.I1 :
1039 return SearchCoreType (Constants.SByte);
1040 case ElementType.U1 :
1041 return SearchCoreType (Constants.Byte);
1042 case ElementType.I2 :
1043 return SearchCoreType (Constants.Int16);
1044 case ElementType.U2 :
1045 return SearchCoreType (Constants.UInt16);
1046 case ElementType.I4 :
1047 return SearchCoreType (Constants.Int32);
1048 case ElementType.U4 :
1049 return SearchCoreType (Constants.UInt32);
1050 case ElementType.I8 :
1051 return SearchCoreType (Constants.Int64);
1052 case ElementType.U8 :
1053 return SearchCoreType (Constants.UInt64);
1054 case ElementType.R4 :
1055 return SearchCoreType (Constants.Single);
1056 case ElementType.R8 :
1057 return SearchCoreType (Constants.Double);
1058 case ElementType.I :
1059 return SearchCoreType (Constants.IntPtr);
1060 case ElementType.U :
1061 return SearchCoreType (Constants.UIntPtr);
1062 case ElementType.TypedByRef :
1063 return SearchCoreType (Constants.TypedReference);
1064 case ElementType.Array :
1065 ARRAY ary = t as ARRAY;
1066 return new ArrayType (GetTypeRefFromSig (ary.Type, context), ary.Shape);
1067 case ElementType.SzArray :
1068 SZARRAY szary = t as SZARRAY;
1069 ArrayType at = new ArrayType (GetTypeRefFromSig (szary.Type, context));
1071 case ElementType.Ptr :
1072 PTR pointer = t as PTR;
1074 return new PointerType (SearchCoreType (Constants.Void));
1075 return new PointerType (GetTypeRefFromSig (pointer.PtrType, context));
1076 case ElementType.FnPtr :
1077 FNPTR funcptr = t as FNPTR;
1078 FunctionPointerType fnptr = new FunctionPointerType (funcptr.Method.HasThis, funcptr.Method.ExplicitThis,
1079 funcptr.Method.MethCallConv, GetMethodReturnType (funcptr.Method, context));
1081 for (int i = 0; i < funcptr.Method.ParamCount; i++) {
1082 Param p = funcptr.Method.Parameters [i];
1083 fnptr.Parameters.Add (BuildParameterDefinition (i, p, context));
1086 CreateSentinelIfNeeded (fnptr, funcptr.Method);
1089 case ElementType.Var:
1091 context.CheckProvider (context.Type, var.Index + 1);
1093 if (context.Type is GenericInstanceType)
1094 return (context.Type as GenericInstanceType).GenericArguments [var.Index];
1096 return context.Type.GenericParameters [var.Index];
1097 case ElementType.MVar:
1098 MVAR mvar = t as MVAR;
1099 context.CheckProvider (context.Method, mvar.Index + 1);
1101 if (context.Method is GenericInstanceMethod)
1102 return (context.Method as GenericInstanceMethod).GenericArguments [mvar.Index];
1104 return context.Method.GenericParameters [mvar.Index];
1105 case ElementType.GenericInst:
1106 GENERICINST ginst = t as GENERICINST;
1107 GenericInstanceType instance = new GenericInstanceType (GetTypeDefOrRef (ginst.Type, context));
1108 instance.IsValueType = ginst.ValueType;
1109 context.CheckProvider (instance.GetOriginalType (), ginst.Signature.Arity);
1111 for (int i = 0; i < ginst.Signature.Arity; i++)
1112 instance.GenericArguments.Add (GetGenericArg (
1113 ginst.Signature.Types [i], context));
1122 TypeReference GetGenericArg (GenericArg arg, GenericContext context)
1124 TypeReference type = GetTypeRefFromSig (arg.Type, context);
1125 type = GetModifierType (arg.CustomMods, type);
1129 static bool IsOdd (int i)
1131 return (i & 1) == 1;
1134 protected object GetConstant (uint pos, ElementType elemType)
1136 if (elemType == ElementType.Class)
1139 byte [] constant = m_root.Streams.BlobHeap.Read (pos);
1141 if (elemType == ElementType.String) {
1142 int length = constant.Length;
1146 return Encoding.Unicode.GetString (constant, 0, length);
1149 // One byte types can always be read using BitConverter. However it can't be used
1150 // elsewhere since it behaves differently in Mono compared to CF on BE architectures
1152 case ElementType.Boolean :
1153 return BitConverter.ToBoolean (constant, 0);
1154 case ElementType.I1 :
1155 return (sbyte) constant [0];
1156 case ElementType.U1 :
1157 return (byte) constant [0];
1158 case ElementType.Object: // illegal, but foundable
1161 if (BitConverter.IsLittleEndian)
1162 return GetConstantLittleEndian (elemType, constant);
1164 return GetConstantBigEndian (elemType, constant);
1168 static object GetConstantLittleEndian (ElementType elemType, byte [] constant)
1171 case ElementType.Char :
1172 return BitConverter.ToChar (constant, 0);
1173 case ElementType.I2 :
1174 return BitConverter.ToInt16 (constant, 0);
1175 case ElementType.I4 :
1176 return BitConverter.ToInt32 (constant, 0);
1177 case ElementType.I8 :
1178 return BitConverter.ToInt64 (constant, 0);
1179 case ElementType.U2 :
1180 return BitConverter.ToUInt16 (constant, 0);
1181 case ElementType.U4 :
1182 return BitConverter.ToUInt32 (constant, 0);
1183 case ElementType.U8 :
1184 return BitConverter.ToUInt64 (constant, 0);
1185 case ElementType.R4 :
1186 return BitConverter.ToSingle (constant, 0);
1187 case ElementType.R8 :
1188 return BitConverter.ToDouble (constant, 0);
1190 throw new ReflectionException ("Non valid element in constant table");
1194 static object GetConstantBigEndian (ElementType elemType, byte [] constant)
1196 // BinaryReader always read it's data in LE format
1197 // note: this could be further optimized (even without unsafe code)
1198 BinaryReader br = new BinaryReader (new MemoryStream (constant));
1200 case ElementType.Char :
1201 return (char) br.ReadUInt16 ();
1202 case ElementType.I2 :
1203 return br.ReadInt16 ();
1204 case ElementType.I4 :
1205 return br.ReadInt32 ();
1206 case ElementType.I8 :
1207 return br.ReadInt64 ();
1208 case ElementType.U2 :
1209 return br.ReadUInt16 ();
1210 case ElementType.U4 :
1211 return br.ReadUInt32 ();
1212 case ElementType.U8 :
1213 return br.ReadUInt64 ();
1214 case ElementType.R4 :
1215 return br.ReadSingle ();
1216 case ElementType.R8 :
1217 return br.ReadDouble ();
1219 throw new ReflectionException ("Non valid element in constant table");
1223 protected void SetInitialValue (FieldDefinition field)
1226 TypeReference fieldType = field.FieldType;
1227 switch (fieldType.FullName) {
1228 case Constants.Boolean:
1229 case Constants.Byte:
1230 case Constants.SByte:
1233 case Constants.Int16:
1234 case Constants.UInt16:
1235 case Constants.Char:
1238 case Constants.Int32:
1239 case Constants.UInt32:
1240 case Constants.Single:
1243 case Constants.Int64:
1244 case Constants.UInt64:
1245 case Constants.Double:
1249 fieldType = fieldType.GetOriginalType ();
1251 TypeDefinition fieldTypeDef = fieldType as TypeDefinition;
1253 if (fieldTypeDef != null)
1254 size = (int) fieldTypeDef.ClassSize;
1258 if (size > 0 && field.RVA != RVA.Zero) {
1259 byte [] data = new byte [size];
1260 Section sect = m_reader.Image.GetSectionAtVirtualAddress (field.RVA);
1262 Buffer.BlockCopy (sect.Data, (int) (long) (field.RVA - sect.VirtualAddress), data, 0, size);
1263 field.InitialValue = data;
1265 field.InitialValue = new byte [0];