2 // field.cs: All field handlers
4 // Authors: Miguel de Icaza (miguel@gnu.org)
5 // Martin Baulig (martin@ximian.com)
6 // Marek Safar (marek.safar@seznam.cz)
8 // Dual licensed under the terms of the MIT X11 or GNU GPL
10 // Copyright 2001, 2002, 2003 Ximian, Inc (http://www.ximian.com)
11 // Copyright 2004-2008 Novell, Inc
12 // Copyright 2011 Xamarin Inc
16 using System.Collections.Generic;
17 using System.Runtime.InteropServices;
20 using MetaType = IKVM.Reflection.Type;
21 using IKVM.Reflection;
22 using IKVM.Reflection.Emit;
24 using MetaType = System.Type;
25 using System.Reflection;
26 using System.Reflection.Emit;
31 public class FieldDeclarator
33 public FieldDeclarator (SimpleMemberName name, Expression initializer)
36 this.Initializer = initializer;
41 public SimpleMemberName Name { get; private set; }
42 public Expression Initializer { get; private set; }
48 // Abstract class for all fields
50 abstract public class FieldBase : MemberBase
52 protected FieldBuilder FieldBuilder;
53 protected FieldSpec spec;
55 protected Expression initializer;
56 protected List<FieldDeclarator> declarators;
59 public enum Status : byte {
60 HAS_OFFSET = 4 // Used by FieldMember.
63 static readonly string[] attribute_targets = new string [] { "field" };
65 protected FieldBase (TypeDefinition parent, FullNamedExpression type, Modifiers mod, Modifiers allowed_mod, MemberName name, Attributes attrs)
66 : base (parent, type, mod, allowed_mod | Modifiers.ABSTRACT, Modifiers.PRIVATE, name, attrs)
68 if ((mod & Modifiers.ABSTRACT) != 0)
69 Report.Error (681, Location, "The modifier 'abstract' is not valid on fields. Try using a property instead");
74 public override AttributeTargets AttributeTargets {
76 return AttributeTargets.Field;
80 public List<FieldDeclarator> Declarators {
82 return this.declarators;
86 public Expression Initializer {
91 this.initializer = value;
97 return MemberName.Name;
101 public FieldSpec Spec {
107 public override string[] ValidAttributeTargets {
109 return attribute_targets;
115 public void AddDeclarator (FieldDeclarator declarator)
117 if (declarators == null)
118 declarators = new List<FieldDeclarator> (2);
120 declarators.Add (declarator);
122 Parent.AddNameToContainer (this, declarator.Name.Value);
125 public override void ApplyAttributeBuilder (Attribute a, MethodSpec ctor, byte[] cdata, PredefinedAttributes pa)
127 if (a.Type == pa.FieldOffset) {
128 status |= Status.HAS_OFFSET;
130 if (!Parent.PartialContainer.HasExplicitLayout) {
131 Report.Error (636, Location, "The FieldOffset attribute can only be placed on members of types marked with the StructLayout(LayoutKind.Explicit)");
135 if ((ModFlags & Modifiers.STATIC) != 0 || this is Const) {
136 Report.Error (637, Location, "The FieldOffset attribute is not allowed on static or const fields");
141 if (a.Type == pa.FixedBuffer) {
142 Report.Error (1716, Location, "Do not use 'System.Runtime.CompilerServices.FixedBuffer' attribute. Use the 'fixed' field modifier instead");
147 if (a.Type == pa.MarshalAs) {
148 UnmanagedMarshal marshal = a.GetMarshal (this);
149 if (marshal != null) {
150 FieldBuilder.SetMarshal (marshal);
155 if ((a.HasSecurityAttribute)) {
156 a.Error_InvalidSecurityParent ();
160 if (a.Type == pa.Dynamic) {
161 a.Error_MisusedDynamicAttribute ();
165 FieldBuilder.SetCustomAttribute ((ConstructorInfo) ctor.GetMetaInfo (), cdata);
168 public void SetCustomAttribute (MethodSpec ctor, byte[] data)
170 FieldBuilder.SetCustomAttribute ((ConstructorInfo) ctor.GetMetaInfo (), data);
173 protected override bool CheckBase ()
175 if (!base.CheckBase ())
178 MemberSpec candidate;
179 bool overrides = false;
180 var conflict_symbol = MemberCache.FindBaseMember (this, out candidate, ref overrides);
181 if (conflict_symbol == null)
182 conflict_symbol = candidate;
184 if (conflict_symbol == null) {
185 if ((ModFlags & Modifiers.NEW) != 0) {
186 Report.Warning (109, 4, Location, "The member `{0}' does not hide an inherited member. The new keyword is not required",
187 GetSignatureForError ());
190 if ((ModFlags & (Modifiers.NEW | Modifiers.OVERRIDE | Modifiers.BACKING_FIELD)) == 0) {
191 Report.SymbolRelatedToPreviousError (conflict_symbol);
192 Report.Warning (108, 2, Location, "`{0}' hides inherited member `{1}'. Use the new keyword if hiding was intended",
193 GetSignatureForError (), conflict_symbol.GetSignatureForError ());
196 if (conflict_symbol.IsAbstract) {
197 Report.SymbolRelatedToPreviousError (conflict_symbol);
198 Report.Error (533, Location, "`{0}' hides inherited abstract member `{1}'",
199 GetSignatureForError (), conflict_symbol.GetSignatureForError ());
206 public virtual Constant ConvertInitializer (ResolveContext rc, Constant expr)
208 return expr.ConvertImplicitly (MemberType);
211 protected override void DoMemberTypeDependentChecks ()
213 base.DoMemberTypeDependentChecks ();
215 if (MemberType.IsGenericParameter)
218 if (MemberType.IsStatic)
219 Error_VariableOfStaticClass (Location, GetSignatureForError (), MemberType, Report);
226 // Represents header string for documentation comment.
228 public override string DocCommentHeader {
232 public override void Emit ()
234 if (member_type.BuiltinType == BuiltinTypeSpec.Type.Dynamic) {
235 Module.PredefinedAttributes.Dynamic.EmitAttribute (FieldBuilder);
236 } else if (!(Parent is CompilerGeneratedClass) && member_type.HasDynamicElement) {
237 Module.PredefinedAttributes.Dynamic.EmitAttribute (FieldBuilder, member_type, Location);
240 if ((ModFlags & Modifiers.COMPILER_GENERATED) != 0 && !Parent.IsCompilerGenerated)
241 Module.PredefinedAttributes.CompilerGenerated.EmitAttribute (FieldBuilder);
243 if (OptAttributes != null) {
244 OptAttributes.Emit ();
247 if (((status & Status.HAS_OFFSET) == 0) && (ModFlags & (Modifiers.STATIC | Modifiers.BACKING_FIELD)) == 0 && Parent.PartialContainer.HasExplicitLayout) {
248 Report.Error (625, Location, "`{0}': Instance field types marked with StructLayout(LayoutKind.Explicit) must have a FieldOffset attribute", GetSignatureForError ());
251 ConstraintChecker.Check (this, member_type, type_expr.Location);
256 public static void Error_VariableOfStaticClass (Location loc, string variable_name, TypeSpec static_class, Report Report)
258 Report.SymbolRelatedToPreviousError (static_class);
259 Report.Error (723, loc, "`{0}': cannot declare variables of static types",
263 protected override bool VerifyClsCompliance ()
265 if (!base.VerifyClsCompliance ())
268 if (!MemberType.IsCLSCompliant () || this is FixedField) {
269 Report.Warning (3003, 1, Location, "Type of `{0}' is not CLS-compliant",
270 GetSignatureForError ());
277 // Field specification
279 public class FieldSpec : MemberSpec, IInterfaceMemberSpec
284 public FieldSpec (TypeSpec declaringType, IMemberDefinition definition, TypeSpec memberType, FieldInfo info, Modifiers modifiers)
285 : base (MemberKind.Field, declaringType, definition, modifiers)
287 this.metaInfo = info;
288 this.memberType = memberType;
293 public bool IsReadOnly {
295 return (Modifiers & Modifiers.READONLY) != 0;
299 public TypeSpec MemberType {
307 public FieldInfo GetMetaInfo ()
309 if ((state & StateFlags.PendingMetaInflate) != 0) {
310 var decl_meta = DeclaringType.GetMetaInfo ();
311 if (DeclaringType.IsTypeBuilder) {
312 metaInfo = TypeBuilder.GetField (decl_meta, metaInfo);
314 var orig_token = metaInfo.MetadataToken;
315 metaInfo = decl_meta.GetField (Name, BindingFlags.Public | BindingFlags.NonPublic | BindingFlags.Instance | BindingFlags.Static);
316 if (metaInfo.MetadataToken != orig_token)
317 throw new NotImplementedException ("Resolved to wrong meta token");
319 // What a stupid API, does not work because field handle is imported
320 // metaInfo = FieldInfo.GetFieldFromHandle (metaInfo.FieldHandle, DeclaringType.MetaInfo.TypeHandle);
323 state &= ~StateFlags.PendingMetaInflate;
329 public override MemberSpec InflateMember (TypeParameterInflator inflator)
331 var fs = (FieldSpec) base.InflateMember (inflator);
332 fs.memberType = inflator.Inflate (memberType);
336 public FieldSpec Mutate (TypeParameterMutator mutator)
338 var decl = DeclaringType;
339 if (DeclaringType.IsGenericOrParentIsGeneric)
340 decl = mutator.Mutate (decl);
342 if (decl == DeclaringType)
345 var fs = (FieldSpec) MemberwiseClone ();
346 fs.declaringType = decl;
347 fs.state |= StateFlags.PendingMetaInflate;
349 // Gets back FieldInfo in case of metaInfo was inflated
350 fs.metaInfo = MemberCache.GetMember (TypeParameterMutator.GetMemberDeclaringType (DeclaringType), this).metaInfo;
354 public override List<TypeSpec> ResolveMissingDependencies ()
356 return memberType.ResolveMissingDependencies ();
361 /// Fixed buffer implementation
363 public class FixedField : FieldBase
365 public const string FixedElementName = "FixedElementField";
366 static int GlobalCounter = 0;
368 TypeBuilder fixed_buffer_type;
370 const Modifiers AllowedModifiers =
373 Modifiers.PROTECTED |
378 public FixedField (TypeDefinition parent, FullNamedExpression type, Modifiers mod, MemberName name, Attributes attrs)
379 : base (parent, type, mod, AllowedModifiers, name, attrs)
386 // Explicit struct layout set by parent
388 public CharSet? CharSet {
394 public override Constant ConvertInitializer (ResolveContext rc, Constant expr)
396 return expr.ImplicitConversionRequired (rc, rc.BuiltinTypes.Int, Location);
399 public override bool Define ()
404 if (!BuiltinTypeSpec.IsPrimitiveType (MemberType)) {
405 Report.Error (1663, Location,
406 "`{0}': Fixed size buffers type must be one of the following: bool, byte, short, int, long, char, sbyte, ushort, uint, ulong, float or double",
407 GetSignatureForError ());
408 } else if (declarators != null) {
409 var t = new TypeExpression (MemberType, TypeExpression.Location);
410 foreach (var d in declarators) {
411 var f = new FixedField (Parent, t, ModFlags, new MemberName (d.Name.Value, d.Name.Location), OptAttributes);
412 f.initializer = d.Initializer;
413 ((ConstInitializer) f.initializer).Name = d.Name.Value;
415 Parent.PartialContainer.Members.Add (f);
419 // Create nested fixed buffer container
420 string name = String.Format ("<{0}>__FixedBuffer{1}", Name, GlobalCounter++);
421 fixed_buffer_type = Parent.TypeBuilder.DefineNestedType (name,
422 TypeAttributes.NestedPublic | TypeAttributes.Sealed | TypeAttributes.BeforeFieldInit,
423 Compiler.BuiltinTypes.ValueType.GetMetaInfo ());
425 var ffield = fixed_buffer_type.DefineField (FixedElementName, MemberType.GetMetaInfo (), FieldAttributes.Public);
427 FieldBuilder = Parent.TypeBuilder.DefineField (Name, fixed_buffer_type, ModifiersExtensions.FieldAttr (ModFlags));
429 var element_spec = new FieldSpec (null, this, MemberType, ffield, ModFlags);
430 spec = new FixedFieldSpec (Parent.Definition, this, FieldBuilder, element_spec, ModFlags);
432 Parent.MemberCache.AddMember (spec);
436 protected override void DoMemberTypeIndependentChecks ()
438 base.DoMemberTypeIndependentChecks ();
441 Expression.UnsafeError (Report, Location);
443 if (Parent.PartialContainer.Kind != MemberKind.Struct) {
444 Report.Error (1642, Location, "`{0}': Fixed size buffer fields may only be members of structs",
445 GetSignatureForError ());
449 public override void Emit()
451 ResolveContext rc = new ResolveContext (this);
452 IntConstant buffer_size_const = initializer.Resolve (rc) as IntConstant;
453 if (buffer_size_const == null)
456 int buffer_size = buffer_size_const.Value;
458 if (buffer_size <= 0) {
459 Report.Error (1665, Location, "`{0}': Fixed size buffers must have a length greater than zero", GetSignatureForError ());
463 EmitFieldSize (buffer_size);
466 if (Module.HasDefaultCharSet)
467 fixed_buffer_type.__SetAttributes (fixed_buffer_type.Attributes | Module.DefaultCharSetType);
470 Module.PredefinedAttributes.UnsafeValueType.EmitAttribute (fixed_buffer_type);
471 Module.PredefinedAttributes.CompilerGenerated.EmitAttribute (fixed_buffer_type);
472 fixed_buffer_type.CreateType ();
477 void EmitFieldSize (int buffer_size)
479 int type_size = BuiltinTypeSpec.GetSize (MemberType);
481 if (buffer_size > int.MaxValue / type_size) {
482 Report.Error (1664, Location, "Fixed size buffer `{0}' of length `{1}' and type `{2}' exceeded 2^31 limit",
483 GetSignatureForError (), buffer_size.ToString (), TypeManager.CSharpName (MemberType));
487 AttributeEncoder encoder;
489 var ctor = Module.PredefinedMembers.StructLayoutAttributeCtor.Resolve (Location);
493 var field_size = Module.PredefinedMembers.StructLayoutSize.Resolve (Location);
494 var field_charset = Module.PredefinedMembers.StructLayoutCharSet.Resolve (Location);
495 if (field_size == null || field_charset == null)
498 var char_set = CharSet ?? Module.DefaultCharSet ?? 0;
500 encoder = new AttributeEncoder ();
501 encoder.Encode ((short)LayoutKind.Sequential);
502 encoder.EncodeNamedArguments (
503 new [] { field_size, field_charset },
505 new IntConstant (Compiler.BuiltinTypes, buffer_size * type_size, Location),
506 new IntConstant (Compiler.BuiltinTypes, (int) char_set, Location)
510 fixed_buffer_type.SetCustomAttribute ((ConstructorInfo) ctor.GetMetaInfo (), encoder.ToArray ());
513 // Don't emit FixedBufferAttribute attribute for private types
515 if ((ModFlags & Modifiers.PRIVATE) != 0)
518 ctor = Module.PredefinedMembers.FixedBufferAttributeCtor.Resolve (Location);
522 encoder = new AttributeEncoder ();
523 encoder.EncodeTypeName (MemberType);
524 encoder.Encode (buffer_size);
525 encoder.EncodeEmptyNamedArguments ();
527 FieldBuilder.SetCustomAttribute ((ConstructorInfo) ctor.GetMetaInfo (), encoder.ToArray ());
531 class FixedFieldSpec : FieldSpec
533 readonly FieldSpec element;
535 public FixedFieldSpec (TypeSpec declaringType, IMemberDefinition definition, FieldInfo info, FieldSpec element, Modifiers modifiers)
536 : base (declaringType, definition, element.MemberType, info, modifiers)
538 this.element = element;
540 // It's never CLS-Compliant
541 state &= ~StateFlags.CLSCompliant_Undetected;
544 public FieldSpec Element {
550 public TypeSpec ElementType {
558 // The Field class is used to represents class/struct fields during parsing.
560 public class Field : FieldBase {
562 // Modifiers allowed in a class declaration
564 const Modifiers AllowedModifiers =
567 Modifiers.PROTECTED |
575 public Field (TypeDefinition parent, FullNamedExpression type, Modifiers mod, MemberName name, Attributes attrs)
576 : base (parent, type, mod, AllowedModifiers, name, attrs)
580 bool CanBeVolatile ()
582 switch (MemberType.BuiltinType) {
583 case BuiltinTypeSpec.Type.Bool:
584 case BuiltinTypeSpec.Type.Char:
585 case BuiltinTypeSpec.Type.SByte:
586 case BuiltinTypeSpec.Type.Byte:
587 case BuiltinTypeSpec.Type.Short:
588 case BuiltinTypeSpec.Type.UShort:
589 case BuiltinTypeSpec.Type.Int:
590 case BuiltinTypeSpec.Type.UInt:
591 case BuiltinTypeSpec.Type.Float:
592 case BuiltinTypeSpec.Type.UIntPtr:
593 case BuiltinTypeSpec.Type.IntPtr:
597 if (TypeSpec.IsReferenceType (MemberType))
600 if (MemberType.IsEnum)
606 public override void Accept (StructuralVisitor visitor)
608 visitor.Visit (this);
611 public override bool Define ()
616 MetaType[] required_modifier = null;
617 if ((ModFlags & Modifiers.VOLATILE) != 0) {
618 var mod = Module.PredefinedTypes.IsVolatile.Resolve ();
620 required_modifier = new MetaType[] { mod.GetMetaInfo () };
623 FieldBuilder = Parent.TypeBuilder.DefineField (
624 Name, member_type.GetMetaInfo (), required_modifier, null, ModifiersExtensions.FieldAttr (ModFlags));
626 spec = new FieldSpec (Parent.Definition, this, MemberType, FieldBuilder, ModFlags);
629 // Don't cache inaccessible fields except for struct where we
630 // need them for definitive assignment checks
632 if ((ModFlags & Modifiers.BACKING_FIELD) == 0 || Parent.Kind == MemberKind.Struct) {
633 Parent.MemberCache.AddMember (spec);
636 if (initializer != null) {
637 Parent.RegisterFieldForInitialization (this,
638 new FieldInitializer (spec, initializer, this));
641 if (declarators != null) {
642 var t = new TypeExpression (MemberType, TypeExpression.Location);
643 foreach (var d in declarators) {
644 var f = new Field (Parent, t, ModFlags, new MemberName (d.Name.Value, d.Name.Location), OptAttributes);
645 if (d.Initializer != null)
646 f.initializer = d.Initializer;
649 Parent.PartialContainer.Members.Add (f);
656 protected override void DoMemberTypeDependentChecks ()
658 if ((ModFlags & Modifiers.BACKING_FIELD) != 0)
661 base.DoMemberTypeDependentChecks ();
663 if ((ModFlags & Modifiers.VOLATILE) != 0) {
664 if (!CanBeVolatile ()) {
665 Report.Error (677, Location, "`{0}': A volatile field cannot be of the type `{1}'",
666 GetSignatureForError (), TypeManager.CSharpName (MemberType));
669 if ((ModFlags & Modifiers.READONLY) != 0) {
670 Report.Error (678, Location, "`{0}': A field cannot be both volatile and readonly",
671 GetSignatureForError ());
676 protected override bool VerifyClsCompliance ()
678 if (!base.VerifyClsCompliance ())
681 if ((ModFlags & Modifiers.VOLATILE) != 0) {
682 Report.Warning (3026, 1, Location, "CLS-compliant field `{0}' cannot be volatile", GetSignatureForError ());