mcs/class/corlib/System.Reflection.Emit/ParameterBuilder.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 //
  27 // System.Reflection.Emit/ParameterBuilder.cs
  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.Reflection;
  37 using System.Reflection.Emit;
  38 using System.Globalization;
  39 using System.Runtime.CompilerServices;
  40 using System.Runtime.InteropServices;
  41
  42 namespace System.Reflection.Emit {
  43 #if NET_2_0
  44         [ComVisible (true)]
  45         [ComDefaultInterface (typeof (_ParameterBuilder))]
  46 #endif
  47         [ClassInterface (ClassInterfaceType.None)]
  48         public class ParameterBuilder : _ParameterBuilder {
  49                 private MethodBase methodb; /* MethodBuilder, ConstructorBuilder or DynamicMethod */
  50                 private string name;
  51                 private CustomAttributeBuilder[] cattrs;
  52                 private UnmanagedMarshal marshal_info;
  53                 private ParameterAttributes attrs;
  54                 private int position;
  55                 private int table_idx;
  56                 object def_value;
  57
  58                 internal ParameterBuilder (MethodBase mb, int pos, ParameterAttributes attributes, string strParamName) {
  59                         name = strParamName;
  60                         position = pos;
  61                         attrs = attributes;
  62                         methodb = mb;
  63 #if NET_2_0
  64                         if (mb is DynamicMethod)
  65                                 table_idx = 0;
  66                         else
  67 #endif
  68                                 table_idx = mb.get_next_table_index (this, 0x08, true);
  69                 }
  70
  71                 public virtual int Attributes {
  72                         get {return (int)attrs;}
  73                 }
  74                 public bool IsIn {
  75                         get {return ((int)attrs & (int)ParameterAttributes.In) != 0;}
  76                 }
  77                 public bool IsOut {
  78                         get {return ((int)attrs & (int)ParameterAttributes.Out) != 0;}
  79                 }
  80                 public bool IsOptional {
  81                         get {return ((int)attrs & (int)ParameterAttributes.Optional) != 0;}
  82                 }
  83                 public virtual string Name {
  84                         get {return name;}
  85                 }
  86                 public virtual int Position {
  87                         get {return position;}
  88                 }
  89
  90                 public virtual ParameterToken GetToken() {
  91                         return new ParameterToken (0x08 | table_idx);
  92                 }
  93
  94                 public virtual void SetConstant (object defaultValue)
  95                 {
  96                         def_value = defaultValue;
  97                         attrs |= ParameterAttributes.HasDefault;
  98                 }
  99
 100                 public void SetCustomAttribute( CustomAttributeBuilder customBuilder) {
 101                         string attrname = customBuilder.Ctor.ReflectedType.FullName;
 102                         if (attrname == "System.Runtime.InteropServices.InAttribute") {
 103                                 attrs |= ParameterAttributes.In;
 104                                 return;
 105                         } else if (attrname == "System.Runtime.InteropServices.OutAttribute") {
 106                                 attrs |= ParameterAttributes.Out;
 107                                 return;
 108                         } else if (attrname == "System.Runtime.InteropServices.OptionalAttribute") {
 109                                 attrs |= ParameterAttributes.Optional;
 110                                 return;
 111                         } else if (attrname == "System.Runtime.InteropServices.MarshalAsAttribute") {
 112                                 attrs |= ParameterAttributes.HasFieldMarshal;
 113                                 marshal_info = CustomAttributeBuilder.get_umarshal (customBuilder, true);
 114                                 /* FIXME: check for errors */
 115                                 return;
 116                         } else if (attrname == "System.Runtime.InteropServices.DefaultParameterValueAttribute") {
 117                                 /* MS.NET doesn't handle this attribute but we handle it for consistency */
 118                                 CustomAttributeBuilder.CustomAttributeInfo cinfo = CustomAttributeBuilder.decode_cattr (customBuilder);
 119                                 /* FIXME: check for type compatibility */
 120                                 SetConstant (cinfo.ctorArgs [0]);
 121                                 return;
 122                         }
 123
 124                         if (cattrs != null) {
 125                                 CustomAttributeBuilder[] new_array = new CustomAttributeBuilder [cattrs.Length + 1];
 126                                 cattrs.CopyTo (new_array, 0);
 127                                 new_array [cattrs.Length] = customBuilder;
 128                                 cattrs = new_array;
 129                         } else {
 130                                 cattrs = new CustomAttributeBuilder [1];
 131                                 cattrs [0] = customBuilder;
 132                         }
 133                 }
 134
 135 #if NET_2_0
 136                 [ComVisible (true)]
 137 #endif
 138                 public void SetCustomAttribute( ConstructorInfo con, byte[] binaryAttribute) {
 139                         SetCustomAttribute (new CustomAttributeBuilder (con, binaryAttribute));
 140                 }
 141
 142 #if NET_2_0
 143                 [Obsolete ("An alternate API is available: Emit the MarshalAs custom attribute instead.")]
 144 #endif
 145                 public virtual void SetMarshal( UnmanagedMarshal unmanagedMarshal) {
 146                         marshal_info = unmanagedMarshal;
 147                         attrs |= ParameterAttributes.HasFieldMarshal;
 148                 }
 149
 150                 void _ParameterBuilder.GetIDsOfNames([In] ref Guid riid, IntPtr rgszNames, uint cNames, uint lcid, IntPtr rgDispId)
 151                 {
 152                         throw new NotImplementedException ();
 153                 }
 154
 155                 void _ParameterBuilder.GetTypeInfo (uint iTInfo, uint lcid, IntPtr ppTInfo)
 156                 {
 157                         throw new NotImplementedException ();
 158                 }
 159
 160                 void _ParameterBuilder.GetTypeInfoCount (out uint pcTInfo)
 161                 {
 162                         throw new NotImplementedException ();
 163                 }
 164
 165                 void _ParameterBuilder.Invoke (uint dispIdMember, [In] ref Guid riid, uint lcid, short wFlags, IntPtr pDispParams, IntPtr pVarResult, IntPtr pExcepInfo, IntPtr puArgErr)
 166                 {
 167                         throw new NotImplementedException ();
 168                 }
 169         }
 170 }
 171