2007-11-20 Atsushi Enomoto <atsushi@ximian.com>

[mono.git] / mcs / class / corlib / System.Reflection.Emit / ParameterBuilder.cs

diff --git a/mcs/class/corlib/System.Reflection.Emit/ParameterBuilder.cs b/mcs/class/corlib/System.Reflection.Emit/ParameterBuilder.cs
old mode 100755 (executable)
new mode 100644 (file)
index 02ba649..2832768
--- a/mcs/class/corlib/System.Reflection.Emit/ParameterBuilder.cs
+++ b/mcs/class/corlib/System.Reflection.Emit/ParameterBuilder.cs
@@ -1,4 +1,27 @@
 
+//
+// Copyright (C) 2004 Novell, Inc (http://www.novell.com)
+//
+// Permission is hereby granted, free of charge, to any person obtaining
+// a copy of this software and associated documentation files (the
+// "Software"), to deal in the Software without restriction, including
+// without limitation the rights to use, copy, modify, merge, publish,
+// distribute, sublicense, and/or sell copies of the Software, and to
+// permit persons to whom the Software is furnished to do so, subject to
+// the following conditions:
+// 
+// The above copyright notice and this permission notice shall be
+// included in all copies or substantial portions of the Software.
+// 
+// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+// NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+// LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+// OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+// WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+//
+
 
 //
 // System.Reflection.Emit/ParameterBuilder.cs
@@ -17,21 +40,32 @@ using System.Runtime.CompilerServices;
 using System.Runtime.InteropServices;
 
 namespace System.Reflection.Emit {
-       public class ParameterBuilder {
-               private MethodBase methodb; /* MethodBuilder or ConstructorBuilder */
+#if NET_2_0
+       [ComVisible (true)]
+       [ComDefaultInterface (typeof (_ParameterBuilder))]
+#endif
+       [ClassInterface (ClassInterfaceType.None)]
+       public class ParameterBuilder : _ParameterBuilder {
+               private MethodBase methodb; /* MethodBuilder, ConstructorBuilder or DynamicMethod */
                private string name;
                private CustomAttributeBuilder[] cattrs;
                private UnmanagedMarshal marshal_info;
                private ParameterAttributes attrs;
                private int position;
                private int table_idx;
+               object def_value;
                
                internal ParameterBuilder (MethodBase mb, int pos, ParameterAttributes attributes, string strParamName) {
                        name = strParamName;
                        position = pos;
                        attrs = attributes;
                        methodb = mb;
-                       table_idx = mb.get_next_table_index (this, 0x08, true);
+#if NET_2_0
+                       if (mb is DynamicMethod)
+                               table_idx = 0;
+                       else
+#endif
+                               table_idx = mb.get_next_table_index (this, 0x08, true);
                }
 
                public virtual int Attributes {
@@ -57,9 +91,10 @@ namespace System.Reflection.Emit {
                        return new ParameterToken (0x08 | table_idx);
                }
 
-               [MonoTODO]
-               public virtual void SetConstant( object defaultValue) {
-                       /* FIXME */
+               public virtual void SetConstant (object defaultValue)
+               {
+                       def_value = defaultValue;
+                       attrs |= ParameterAttributes.HasDefault;
                }
                
                public void SetCustomAttribute( CustomAttributeBuilder customBuilder) {
@@ -74,10 +109,18 @@ namespace System.Reflection.Emit {
                                attrs |= ParameterAttributes.Optional;
                                return;
                        } else if (attrname == "System.Runtime.InteropServices.MarshalAsAttribute") {
+                               attrs |= ParameterAttributes.HasFieldMarshal;
                                marshal_info = CustomAttributeBuilder.get_umarshal (customBuilder, true);
                                /* FIXME: check for errors */
                                return;
+                       } else if (attrname == "System.Runtime.InteropServices.DefaultParameterValueAttribute") {
+                               /* MS.NET doesn't handle this attribute but we handle it for consistency */
+                               CustomAttributeBuilder.CustomAttributeInfo cinfo = CustomAttributeBuilder.decode_cattr (customBuilder);
+                               /* FIXME: check for type compatibility */
+                               SetConstant (cinfo.ctorArgs [0]);
+                               return;
                        }
+
                        if (cattrs != null) {
                                CustomAttributeBuilder[] new_array = new CustomAttributeBuilder [cattrs.Length + 1];
                                cattrs.CopyTo (new_array, 0);
@@ -88,15 +131,41 @@ namespace System.Reflection.Emit {
                                cattrs [0] = customBuilder;
                        }
                }
+
+#if NET_2_0
+               [ComVisible (true)]
+#endif
                public void SetCustomAttribute( ConstructorInfo con, byte[] binaryAttribute) {
                        SetCustomAttribute (new CustomAttributeBuilder (con, binaryAttribute));
                }
 
+#if NET_2_0
+               [Obsolete ("An alternate API is available: Emit the MarshalAs custom attribute instead.")]
+#endif
                public virtual void SetMarshal( UnmanagedMarshal unmanagedMarshal) {
                        marshal_info = unmanagedMarshal;
                        attrs |= ParameterAttributes.HasFieldMarshal;
                }
 
+                void _ParameterBuilder.GetIDsOfNames([In] ref Guid riid, IntPtr rgszNames, uint cNames, uint lcid, IntPtr rgDispId)
+                {
+                        throw new NotImplementedException ();
+                }
+
+                void _ParameterBuilder.GetTypeInfo (uint iTInfo, uint lcid, IntPtr ppTInfo)
+                {
+                        throw new NotImplementedException ();
+                }
+
+                void _ParameterBuilder.GetTypeInfoCount (out uint pcTInfo)
+                {
+                        throw new NotImplementedException ();
+                }
+
+                void _ParameterBuilder.Invoke (uint dispIdMember, [In] ref Guid riid, uint lcid, short wFlags, IntPtr pDispParams, IntPtr pVarResult, IntPtr pExcepInfo, IntPtr puArgErr)
+                {
+                        throw new NotImplementedException ();
+                }
        }
 }