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

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