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

   1 // System.Reflection.ParameterInfo
   2 //
   3 // Sean MacIsaac (macisaac@ximian.com)
   4 //
   5 // (C) 2001 Ximian, Inc.
   6 // Copyright (C) 2004-2005 Novell, Inc (http://www.novell.com)
   7 //
   8 // Permission is hereby granted, free of charge, to any person obtaining
   9 // a copy of this software and associated documentation files (the
  10 // "Software"), to deal in the Software without restriction, including
  11 // without limitation the rights to use, copy, modify, merge, publish,
  12 // distribute, sublicense, and/or sell copies of the Software, and to
  13 // permit persons to whom the Software is furnished to do so, subject to
  14 // the following conditions:
  15 //
  16 // The above copyright notice and this permission notice shall be
  17 // included in all copies or substantial portions of the Software.
  18 //
  19 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  20 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  21 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  22 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
  23 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
  24 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
  25 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  26 //
  27
  28 using System.Reflection.Emit;
  29 using System.Runtime.CompilerServices;
  30 using System.Runtime.InteropServices;
  31
  32 namespace System.Reflection
  33 {
  34 #if NET_2_0
  35         [ComVisible (true)]
  36         [ComDefaultInterfaceAttribute (typeof (_ParameterInfo))]
  37 #endif
  38         [Serializable]
  39         [ClassInterfaceAttribute (ClassInterfaceType.None)]
  40         public class ParameterInfo : ICustomAttributeProvider, _ParameterInfo {
  41
  42                 protected Type ClassImpl;
  43                 protected object DefaultValueImpl;
  44                 protected MemberInfo MemberImpl;
  45                 protected string NameImpl;
  46                 protected int PositionImpl;
  47                 protected ParameterAttributes AttrsImpl;
  48                 private UnmanagedMarshal marshalAs;
  49
  50                 protected ParameterInfo () {
  51                 }
  52
  53                 internal ParameterInfo (ParameterBuilder pb, Type type, MemberInfo member, int position) {
  54                         this.ClassImpl = type;
  55                         this.MemberImpl = member;
  56                         if (pb != null) {
  57                                 this.NameImpl = pb.Name;
  58                                 this.PositionImpl = pb.Position - 1;    // ParameterInfo.Position is zero-based
  59                                 this.AttrsImpl = (ParameterAttributes) pb.Attributes;
  60                         } else {
  61                                 this.NameImpl = "";
  62                                 this.PositionImpl = position - 1;
  63                                 this.AttrsImpl = ParameterAttributes.None;
  64                         }
  65                 }
  66
  67                 /* to build a ParameterInfo for the return type of a method */
  68                 internal ParameterInfo (Type type, MemberInfo member, UnmanagedMarshal marshalAs) {
  69                         this.ClassImpl = type;
  70                         this.MemberImpl = member;
  71                         this.NameImpl = "";
  72                         this.PositionImpl = -1; // since parameter positions are zero-based, return type pos is -1
  73                         this.AttrsImpl = ParameterAttributes.Retval;
  74                         this.marshalAs = marshalAs;
  75                 }
  76
  77                 public override string ToString() {
  78                         Type elementType = ClassImpl;
  79                         while (elementType.HasElementType) {
  80                                         elementType = elementType.GetElementType();
  81                         }
  82                         bool useShort = elementType.IsPrimitive || ClassImpl == typeof(void)
  83                                 || ClassImpl.Namespace == MemberImpl.DeclaringType.Namespace;
  84                         string result = useShort
  85                                 ? ClassImpl.Name
  86                                 : ClassImpl.FullName;
  87                         // MS.NET seems to skip this check and produce an extra space for return types
  88                         if (!IsRetval) {
  89                                 result += ' ';
  90                                 result += NameImpl;
  91                         }
  92                         return result;
  93                 }
  94
  95                 public virtual Type ParameterType {
  96                         get {return ClassImpl;}
  97                 }
  98                 public virtual ParameterAttributes Attributes {
  99                         get {return AttrsImpl;}
 100                 }
 101                 public virtual object DefaultValue {
 102                         get {return DefaultValueImpl;}
 103                 }
 104
 105                 public bool IsIn {
 106                         get {return (AttrsImpl & ParameterAttributes.In) != 0;}
 107                 }
 108
 109                 public bool IsLcid {
 110                         get {return (AttrsImpl & ParameterAttributes.Lcid) != 0;}
 111                 }
 112
 113                 public bool IsOptional {
 114                         get {return (AttrsImpl & ParameterAttributes.Optional) != 0;}
 115                 }
 116
 117                 public bool IsOut {
 118                         get {return (AttrsImpl & ParameterAttributes.Out) != 0;}
 119                 }
 120
 121                 public bool IsRetval {
 122                         get {return (AttrsImpl & ParameterAttributes.Retval) != 0;}
 123                 }
 124
 125                 public virtual MemberInfo Member {
 126                         get {return MemberImpl;}
 127                 }
 128
 129                 public virtual string Name {
 130                         get {return NameImpl;}
 131                 }
 132
 133                 public virtual int Position {
 134                         get {return PositionImpl;}
 135                 }
 136
 137 #if NET_2_0 || BOOTSTRAP_NET_2_0
 138                 public
 139 #else
 140                 internal
 141 #endif
 142                 virtual extern int MetadataToken {
 143                         [MethodImplAttribute (MethodImplOptions.InternalCall)]
 144                         get;
 145                 }
 146
 147                 public virtual object[] GetCustomAttributes (bool inherit)
 148                 {
 149                         return MonoCustomAttrs.GetCustomAttributes (this, inherit);
 150                 }
 151
 152                 public virtual object[] GetCustomAttributes (Type attributeType, bool inherit)
 153                 {
 154                         return MonoCustomAttrs.GetCustomAttributes (this, attributeType, inherit);
 155                 }
 156
 157                 public virtual bool IsDefined( Type attributeType, bool inherit) {
 158                         return MonoCustomAttrs.IsDefined (this, attributeType, inherit);
 159                 }
 160
 161                 internal object[] GetPseudoCustomAttributes () {
 162                         int count = 0;
 163
 164                         if (IsIn)
 165                                 count ++;
 166                         if (IsOut)
 167                                 count ++;
 168                         if (IsOptional)
 169                                 count ++;
 170                         if (marshalAs != null)
 171                                 count ++;
 172
 173                         if (count == 0)
 174                                 return null;
 175                         object[] attrs = new object [count];
 176                         count = 0;
 177
 178                         if (IsIn)
 179                                 attrs [count ++] = new InAttribute ();
 180                         if (IsOptional)
 181                                 attrs [count ++] = new OptionalAttribute ();
 182                         if (IsOut)
 183                                 attrs [count ++] = new OutAttribute ();
 184
 185                         if (marshalAs != null)
 186                                 attrs [count ++] = marshalAs.ToMarshalAsAttribute ();
 187
 188                         return attrs;
 189                 }
 190
 191 #if NET_2_0 || BOOTSTRAP_NET_2_0
 192                 [Obsolete ("Use ParameterInfo.GetOptionalCustomModifiers().")]
 193                 public virtual Type[] OptionalCustomModifiers {
 194                         get {
 195                                 return GetOptionalCustomModifiers ();
 196                         }
 197                 }
 198
 199                 [Obsolete ("Use ParameterInfo.GetRequiredCustomModifiers().")]
 200                 public virtual Type[] RequiredCustomModifiers {
 201                         get {
 202                                 return GetRequiredCustomModifiers ();
 203                         }
 204                 }
 205
 206                 [MonoTODO]
 207                 public virtual Type[] GetOptionalCustomModifiers () {
 208                         throw new NotImplementedException ();
 209                 }
 210
 211                 [MonoTODO]
 212                 public virtual Type[] GetRequiredCustomModifiers () {
 213                         throw new NotImplementedException ();
 214                 }
 215
 216                 [MonoTODO]
 217                 public virtual object RawDefaultValue {
 218                         get {
 219                                 throw new NotImplementedException ();
 220                         }
 221                 }
 222 #endif
 223
 224 #if NET_1_1
 225                 void _ParameterInfo.GetIDsOfNames ([In] ref Guid riid, IntPtr rgszNames, uint cNames, uint lcid, IntPtr rgDispId)
 226                 {
 227                         throw new NotImplementedException ();
 228                 }
 229
 230                 void _ParameterInfo.GetTypeInfo (uint iTInfo, uint lcid, IntPtr ppTInfo)
 231                 {
 232                         throw new NotImplementedException ();
 233                 }
 234
 235                 void _ParameterInfo.GetTypeInfoCount (out uint pcTInfo)
 236                 {
 237                         throw new NotImplementedException ();
 238                 }
 239
 240                 void _ParameterInfo.Invoke (uint dispIdMember, [In] ref Guid riid, uint lcid, short wFlags, IntPtr pDispParams,
 241                         IntPtr pVarResult, IntPtr pExcepInfo, IntPtr puArgErr)
 242                 {
 243                         throw new NotImplementedException ();
 244                 }
 245 #endif
 246         }
 247 }