[bcl] Remove NET_4_5 defines from class libs.
[mono.git] / 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 using System.Runtime.Serialization;
39
40 namespace System.Reflection
41 {
42         [ComVisible (true)]
43         [ComDefaultInterfaceAttribute (typeof (_ParameterInfo))]
44         [Serializable]
45         [ClassInterfaceAttribute (ClassInterfaceType.None)]
46         [StructLayout (LayoutKind.Sequential)]
47         public partial class ParameterInfo : ICustomAttributeProvider
48
49 #if !MOBILE
50         , _ParameterInfo
51 #endif
52
53         , IObjectReference
54         {
55                 protected Type ClassImpl;
56                 protected object DefaultValueImpl;
57                 protected MemberInfo MemberImpl;
58                 protected string NameImpl;
59                 protected int PositionImpl;
60                 protected ParameterAttributes AttrsImpl;
61                 internal MarshalAsAttribute marshalAs;
62
63                 protected ParameterInfo () {
64                 }
65
66                 public override string ToString() {
67                         Type elementType = ClassImpl;
68                         while (elementType.HasElementType) {
69                                         elementType = elementType.GetElementType();
70                         }
71                         bool useShort = elementType.IsPrimitive || ClassImpl == typeof(void)
72                                 || ClassImpl.Namespace == MemberImpl.DeclaringType.Namespace;
73                         string result = useShort
74                                 ? ClassImpl.Name
75                                 : ClassImpl.FullName;
76                         // MS.NET seems to skip this check and produce an extra space for return types
77                         if (!IsRetval) {
78                                 result += ' ';
79                                 result += NameImpl;
80                         }
81                         return result;
82                 }
83
84                 internal static void FormatParameters (StringBuilder sb, ParameterInfo[] p)
85                 {
86                         for (int i = 0; i < p.Length; ++i) {
87                                 if (i > 0)
88                                         sb.Append (", ");
89
90                                 Type pt = p[i].ParameterType;
91                                 bool byref = pt.IsByRef;
92                                 if (byref)
93                                         pt = pt.GetElementType ();
94
95                                 if (Type.ShouldPrintFullName (pt))
96                                         sb.Append (pt.ToString ());
97                                 else
98                                         sb.Append (pt.Name);
99
100                                 if (byref)
101                                         sb.Append (" ByRef");
102                         }
103                 }
104
105                 public virtual Type ParameterType {
106                         get {return ClassImpl;}
107                 }
108                 public virtual ParameterAttributes Attributes {
109                         get {return AttrsImpl;}
110                 }
111
112                 public bool IsIn {
113                         get {
114                                 return (Attributes & ParameterAttributes.In) != 0;
115                         }
116                 }
117
118                 public bool IsLcid {
119                         get {
120                                 return (Attributes & ParameterAttributes.Lcid) != 0;
121                         }
122                 }
123
124                 public bool IsOptional {
125                         get {
126                                 return (Attributes & ParameterAttributes.Optional) != 0;
127                         }
128                 }
129
130                 public bool IsOut {
131                         get {
132                                 return (Attributes & ParameterAttributes.Out) != 0;
133                         }
134                 }
135
136                 public bool IsRetval {
137                         get {
138                                 return (Attributes & ParameterAttributes.Retval) != 0;
139                         }
140                 }
141
142                 public virtual MemberInfo Member {
143                         get {return MemberImpl;}
144                 }
145
146                 public virtual string Name {
147                         get {return NameImpl;}
148                 }
149
150                 public virtual int Position {
151                         get {return PositionImpl;}
152                 }
153
154                 [MethodImplAttribute (MethodImplOptions.InternalCall)]
155                 internal extern int GetMetadataToken ();
156
157                 internal object[] GetPseudoCustomAttributes () {
158                         int count = 0;
159
160                         if (IsIn)
161                                 count ++;
162                         if (IsOut)
163                                 count ++;
164                         if (IsOptional)
165                                 count ++;
166                         if (marshalAs != null)
167                                 count ++;
168
169                         if (count == 0)
170                                 return null;
171                         object[] attrs = new object [count];
172                         count = 0;
173
174                         if (IsIn)
175                                 attrs [count ++] = new InAttribute ();
176                         if (IsOptional)
177                                 attrs [count ++] = new OptionalAttribute ();
178                         if (IsOut)
179                                 attrs [count ++] = new OutAttribute ();
180
181                         if (marshalAs != null)
182                                 attrs [count ++] = marshalAs.Copy ();
183
184                         return attrs;
185                 }                       
186
187                 [MethodImplAttribute (MethodImplOptions.InternalCall)]
188                 internal extern Type[] GetTypeModifiers (bool optional);
189
190                 internal object GetDefaultValueImpl ()
191                 {
192                         return DefaultValueImpl;
193                 }
194
195                 public virtual IEnumerable<CustomAttributeData> CustomAttributes {
196                         get { return GetCustomAttributesData (); }
197                 }
198                 
199                 public virtual bool HasDefaultValue {
200                         get { throw new NotImplementedException (); }
201                 }
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                 public virtual object DefaultValue {
227                         get { throw new NotImplementedException (); }
228                 }
229
230                 public virtual object RawDefaultValue {
231                         get { throw new NotImplementedException (); }
232                 }
233
234                 public virtual int MetadataToken {
235                         get { return 0x8000000; }
236                 }
237
238                 public virtual object[] GetCustomAttributes (bool inherit)
239                 {
240                         return new object [0];
241                 }
242
243                 public virtual object[] GetCustomAttributes (Type attributeType, bool inherit)
244                 {
245                         return new object [0];
246                 }
247
248                 public object GetRealObject (StreamingContext context)
249                 {
250                         throw new NotImplementedException ();
251                 }               
252
253                 public virtual bool IsDefined( Type attributeType, bool inherit) {
254                         return false;
255                 }
256
257                 public virtual Type[] GetRequiredCustomModifiers () {
258                         return new Type [0];
259                 }
260
261                 public virtual Type[] GetOptionalCustomModifiers () {
262                         return new Type [0];
263                 }
264
265                 public virtual IList<CustomAttributeData> GetCustomAttributesData () {
266                         throw new NotImplementedException ();
267                 }
268
269 #if !FULL_AOT_RUNTIME
270                 internal static ParameterInfo New (ParameterBuilder pb, Type type, MemberInfo member, int position)
271                 {
272                         return new MonoParameterInfo (pb, type, member, position);
273                 }
274 #endif
275
276                 internal static ParameterInfo New (ParameterInfo pinfo, Type type, MemberInfo member, int position)
277                 {
278                         return new MonoParameterInfo (pinfo, type, member, position);
279                 }
280
281                 internal static ParameterInfo New (ParameterInfo pinfo, MemberInfo member)
282                 {
283                         return new MonoParameterInfo (pinfo, member);
284                 }
285
286                 internal static ParameterInfo New (Type type, MemberInfo member, MarshalAsAttribute marshalAs)
287                 {
288                         return new MonoParameterInfo (type, member, marshalAs);
289                 }
290         }
291 }