mcs/class/corlib/System.Reflection/MonoField.cs

   1
   2 //
   3 // Copyright (C) 2004 Novell, Inc (http://www.novell.com)
   4 //
   5 // Permission is hereby granted, free of charge, to any person obtaining
   6 // a copy of this software and associated documentation files (the
   7 // "Software"), to deal in the Software without restriction, including
   8 // without limitation the rights to use, copy, modify, merge, publish,
   9 // distribute, sublicense, and/or sell copies of the Software, and to
  10 // permit persons to whom the Software is furnished to do so, subject to
  11 // the following conditions:
  12 //
  13 // The above copyright notice and this permission notice shall be
  14 // included in all copies or substantial portions of the Software.
  15 //
  16 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  17 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  18 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  19 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
  20 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
  21 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
  22 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  23 //
  24
  25 //
  26 // System.Reflection/MonoField.cs
  27 // The class used to represent Fields from the mono runtime.
  28 //
  29 // Author:
  30 //   Paolo Molaro (lupus@ximian.com)
  31 //
  32 // (C) 2001 Ximian, Inc.  http://www.ximian.com
  33 //
  34
  35 using System;
  36 using System.Globalization;
  37 using System.Runtime.CompilerServices;
  38 using System.Runtime.InteropServices;
  39
  40 namespace System.Reflection {
  41
  42         internal class MonoField : FieldInfo {
  43                 internal IntPtr klass;
  44                 internal RuntimeFieldHandle fhandle;
  45                 string name;
  46                 Type type;
  47                 FieldAttributes attrs;
  48
  49                 public override FieldAttributes Attributes {
  50                         get {
  51                                 return attrs;
  52                         }
  53                 }
  54                 public override RuntimeFieldHandle FieldHandle {
  55                         get {
  56                                 return fhandle;
  57                         }
  58                 }
  59
  60                 public override Type FieldType {
  61                         get {
  62                                 return type;
  63                         }
  64                 }
  65
  66                 [MethodImplAttribute(MethodImplOptions.InternalCall)]
  67                 private extern Type GetParentType (bool declaring);
  68
  69                 public override Type ReflectedType {
  70                         get {
  71                                 return GetParentType (false);
  72                         }
  73                 }
  74                 public override Type DeclaringType {
  75                         get {
  76                                 return GetParentType (true);
  77                         }
  78                 }
  79                 public override string Name {
  80                         get {
  81                                 return name;
  82                         }
  83                 }
  84
  85                 public override bool IsDefined (Type attributeType, bool inherit) {
  86                         return MonoCustomAttrs.IsDefined (this, attributeType, inherit);
  87                 }
  88
  89                 public override object[] GetCustomAttributes( bool inherit) {
  90                         return MonoCustomAttrs.GetCustomAttributes (this, inherit);
  91                 }
  92                 public override object[] GetCustomAttributes( Type attributeType, bool inherit) {
  93                         return MonoCustomAttrs.GetCustomAttributes (this, attributeType, inherit);
  94                 }
  95
  96                 [MethodImplAttribute(MethodImplOptions.InternalCall)]
  97                 private extern object GetValueInternal (object obj);
  98
  99                 public override object GetValue (object obj)
 100                 {
 101                         return GetValueInternal (obj);
 102                 }
 103
 104                 public override string ToString () {
 105                         return String.Format ("{0} {1}", type, name);
 106                 }
 107
 108                 [MethodImplAttribute(MethodImplOptions.InternalCall)]
 109                 private static extern void SetValueInternal (FieldInfo fi, object obj, object value);
 110
 111                 public override void SetValue (object obj, object val, BindingFlags invokeAttr, Binder binder, CultureInfo culture)
 112                 {
 113                         if (!IsStatic && obj == null)
 114                                 throw new ArgumentNullException ("obj");
 115                         if (binder == null)
 116                                 binder = Binder.DefaultBinder;
 117                         if (val != null) {
 118                                 val = binder.ChangeType (val, type, culture);
 119                                 if (val == null)
 120                                         throw new ArgumentException ("Object type cannot be converted to target type.", "val");
 121                         }
 122                         SetValueInternal (this, obj, val);
 123                 }
 124
 125 #if NET_2_0 || BOOTSTRAP_NET_2_0
 126                 [MonoTODO]
 127                 public override Type[] OptionalCustomModifiers {
 128                         get {
 129                                 throw new NotImplementedException ();
 130                         }
 131                 }
 132
 133                 [MonoTODO]
 134                 public override Type[] RequiredCustomModifiers {
 135                         get {
 136                                 throw new NotImplementedException ();
 137                         }
 138                 }
 139 #endif
 140
 141 #if NET_2_0 || BOOTSTRAP_NET_2_0
 142                 [MethodImplAttribute(MethodImplOptions.InternalCall)]
 143                 public override extern FieldInfo Mono_GetGenericFieldDefinition ();
 144 #endif
 145         }
 146 }