Merge pull request #496 from nicolas-raoul/unit-test-for-issue2907
[mono.git] / mcs / class / corlib / System.Runtime.InteropServices / MarshalAsAttribute.cs
1 //
2 // System.Runtime.InteropServices.MarshalAsAttribute.cs
3 //
4 // Author:
5 //   Andreas Nahr (ClassDevelopment@A-SoftTech.com)
6 //
7
8 //
9 // Copyright (C) 2004 Novell, Inc (http://www.novell.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 using System;
32
33 namespace System.Runtime.InteropServices {
34
35         [ComVisible(true)]
36         [AttributeUsage (AttributeTargets.Field | AttributeTargets.Parameter | 
37                          AttributeTargets.ReturnValue, Inherited=false)]
38         [StructLayout (LayoutKind.Sequential)]
39         public sealed class MarshalAsAttribute : Attribute {
40                 /*keep these fields in sync with object-internals.h*/
41 #pragma warning disable 169, 414
42                 public string MarshalCookie;
43                 [ComVisible(true)]
44                 public string MarshalType;
45
46                 [ComVisible(true)]
47                 public Type MarshalTypeRef;
48                 public Type SafeArrayUserDefinedSubType;
49
50                 private UnmanagedType utype;
51                 public UnmanagedType ArraySubType;              
52 #if !MOONLIGHT
53                 public VarEnum SafeArraySubType;
54 #else
55                 private int SafeArraySubType;
56 #endif
57                 public int SizeConst;
58                 public int IidParameterIndex;
59                 public short SizeParamIndex;
60 #pragma warning disable 169, 414
61
62                 public MarshalAsAttribute (short unmanagedType) {
63                         utype = (UnmanagedType)unmanagedType;
64                 }
65                 public MarshalAsAttribute( UnmanagedType unmanagedType) {
66                         utype = unmanagedType;
67                 }
68                 public UnmanagedType Value {
69                         get {return utype;}
70                 }
71
72                 internal MarshalAsAttribute Copy ()
73                 {
74                         return (MarshalAsAttribute)this.MemberwiseClone ();
75                 }
76         }
77 }