Merge pull request #321 from RAOF/aot-cpu-safety

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

diff --git a/mcs/class/corlib/System.Reflection.Emit/UnmanagedMarshal.cs b/mcs/class/corlib/System.Reflection.Emit/UnmanagedMarshal.cs
old mode 100755 (executable)
new mode 100644 (file)
index ab033eb..b9ed853
--- a/mcs/class/corlib/System.Reflection.Emit/UnmanagedMarshal.cs
+++ b/mcs/class/corlib/System.Reflection.Emit/UnmanagedMarshal.cs
@@ -1,16 +1,76 @@
 
+//
+// 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/UnmanagedMarshal.cs
+//
+// Author:
+//   Paolo Molaro (lupus@ximian.com)
+//
+// (C) 2001-2002 Ximian, Inc.  http://www.ximian.com
+//
+
 using System.Reflection.Emit;
 using System.Runtime.InteropServices;
 using System;
 
 namespace System.Reflection.Emit {
 
+       [Obsolete ("An alternate API is available: Emit the MarshalAs custom attribute instead.")]
+       [ComVisible (true)]
+       [Serializable]
+       [StructLayout (LayoutKind.Sequential)]
        public sealed class UnmanagedMarshal {
+#pragma warning disable 169, 414
                private int count;
                private UnmanagedType t;
+               private UnmanagedType tbase;
+               string guid;
+               string mcookie;
+               string marshaltype;
+               Type marshaltyperef;
+               private int param_num;
+               private bool has_size;
+#pragma warning restore 169, 414
+               
+               private UnmanagedMarshal (UnmanagedType maint, int cnt) {
+                       count = cnt;
+                       t = maint;
+                       tbase = maint;
+               }
+               private UnmanagedMarshal (UnmanagedType maint, UnmanagedType elemt) {
+                       count = 0;
+                       t = maint;
+                       tbase = elemt;
+               }
                
                public UnmanagedType BaseType {
-                       get {return t;}
+                       get {
+                               if (t == UnmanagedType.LPArray || t == UnmanagedType.SafeArray)
+                                       throw new ArgumentException ();
+                               return tbase;
+                       }
                }
 
                public int ElementCount {
@@ -22,29 +82,66 @@ namespace System.Reflection.Emit {
                }
 
                public Guid IIDGuid {
-                       get {return Guid.Empty;}
+                       get {return new Guid (guid);}
                }
 
-               [MonoTODO]
                public static UnmanagedMarshal DefineByValArray( int elemCount) {
-                       throw new NotImplementedException ();
+                       return new UnmanagedMarshal (UnmanagedType.ByValArray, elemCount);
                }
-               [MonoTODO]
+
                public static UnmanagedMarshal DefineByValTStr( int elemCount) {
-                       throw new NotImplementedException ();
+                       return new UnmanagedMarshal (UnmanagedType.ByValTStr, elemCount);
                }
-               [MonoTODO]
+
                public static UnmanagedMarshal DefineLPArray( UnmanagedType elemType) {
-                       throw new NotImplementedException ();
+                       return new UnmanagedMarshal (UnmanagedType.LPArray, elemType);
                }
-               [MonoTODO]
+
                public static UnmanagedMarshal DefineSafeArray( UnmanagedType elemType) {
-                       throw new NotImplementedException ();
+                       return new UnmanagedMarshal (UnmanagedType.SafeArray, elemType);
                }
-               [MonoTODO]
+
                public static UnmanagedMarshal DefineUnmanagedMarshal( UnmanagedType unmanagedType) {
-                       throw new NotImplementedException ();
+                       return new UnmanagedMarshal (unmanagedType, unmanagedType);
+               }
+
+               internal static UnmanagedMarshal DefineCustom (Type typeref, string cookie, string mtype, Guid id) {
+                       UnmanagedMarshal res = new UnmanagedMarshal (UnmanagedType.CustomMarshaler, UnmanagedType.CustomMarshaler);
+                       res.mcookie = cookie;
+                       res.marshaltype = mtype;
+                       res.marshaltyperef = typeref;
+                       if (id == Guid.Empty)
+                               res.guid = String.Empty;
+                       else
+                               res.guid = id.ToString ();
+                       return res;
                }
                
+               // sizeConst and sizeParamIndex can be -1 meaning they are not specified
+               internal static UnmanagedMarshal DefineLPArrayInternal (UnmanagedType elemType, int sizeConst, int sizeParamIndex) {
+                       UnmanagedMarshal res = new UnmanagedMarshal (UnmanagedType.LPArray, elemType);
+                       res.count = sizeConst;
+                       res.param_num = sizeParamIndex;
+                       res.has_size = true;
+
+                       return res;
+               }
+
+               internal MarshalAsAttribute ToMarshalAsAttribute () {
+                       MarshalAsAttribute attr = new MarshalAsAttribute (t);
+                       attr.ArraySubType = tbase;
+                       attr.MarshalCookie = mcookie;
+                       attr.MarshalType = marshaltype;
+                       attr.MarshalTypeRef = marshaltyperef;
+                       if (count == -1)
+                               attr.SizeConst = 0;
+                       else
+                               attr.SizeConst = count;
+                       if (param_num == -1)
+                               attr.SizeParamIndex = 0;
+                       else
+                               attr.SizeParamIndex = (short)param_num;
+                       return attr;
+               }
        }
 }