mcs/class/corlib/System.Reflection.Emit/UnmanagedMarshal.cs

   1
   2 //
   3 // System.Reflection.Emit/UnmanagedMarshal.cs
   4 //
   5 // Author:
   6 //   Paolo Molaro (lupus@ximian.com)
   7 //
   8 // (C) 2001-2002 Ximian, Inc.  http://www.ximian.com
   9 //
  10
  11 using System.Reflection.Emit;
  12 using System.Runtime.InteropServices;
  13 using System;
  14
  15 namespace System.Reflection.Emit {
  16
  17         [Serializable]
  18         public sealed class UnmanagedMarshal {
  19                 private int count;
  20                 private UnmanagedType t;
  21                 private UnmanagedType tbase;
  22                 string guid;
  23                 string mcookie;
  24                 string marshaltype;
  25                 Type marshaltyperef;
  26
  27                 private UnmanagedMarshal (UnmanagedType maint, int cnt) {
  28                         count = cnt;
  29                         t = maint;
  30                         tbase = maint;
  31                 }
  32                 private UnmanagedMarshal (UnmanagedType maint, UnmanagedType elemt) {
  33                         count = 0;
  34                         t = maint;
  35                         tbase = elemt;
  36                 }
  37
  38                 public UnmanagedType BaseType {
  39                         get {
  40                                 if (t == UnmanagedType.LPArray || t == UnmanagedType.SafeArray)
  41                                         throw new ArgumentException ();
  42                                 return tbase;
  43                         }
  44                 }
  45
  46                 public int ElementCount {
  47                         get {return count;}
  48                 }
  49
  50                 public UnmanagedType GetUnmanagedType {
  51                         get {return t;}
  52                 }
  53
  54                 public Guid IIDGuid {
  55                         get {return new Guid (guid);}
  56                 }
  57
  58                 public static UnmanagedMarshal DefineByValArray( int elemCount) {
  59                         return new UnmanagedMarshal (UnmanagedType.ByValArray, elemCount);
  60                 }
  61
  62                 public static UnmanagedMarshal DefineByValTStr( int elemCount) {
  63                         return new UnmanagedMarshal (UnmanagedType.ByValTStr, elemCount);
  64                 }
  65
  66                 public static UnmanagedMarshal DefineLPArray( UnmanagedType elemType) {
  67                         return new UnmanagedMarshal (UnmanagedType.LPArray, elemType);
  68                 }
  69
  70                 public static UnmanagedMarshal DefineSafeArray( UnmanagedType elemType) {
  71                         return new UnmanagedMarshal (UnmanagedType.SafeArray, elemType);
  72                 }
  73
  74                 public static UnmanagedMarshal DefineUnmanagedMarshal( UnmanagedType unmanagedType) {
  75                         return new UnmanagedMarshal (unmanagedType, unmanagedType);
  76                 }
  77
  78                 /* this one is missing from the MS implementation */
  79                 public static UnmanagedMarshal DefineCustom (Type typeref, string cookie, string mtype, Guid id) {
  80                         UnmanagedMarshal res = new UnmanagedMarshal (UnmanagedType.CustomMarshaler, UnmanagedType.CustomMarshaler);
  81                         res.mcookie = cookie;
  82                         res.marshaltype = mtype;
  83                         res.marshaltyperef = typeref;
  84                         if (id == Guid.Empty)
  85                                 res.guid = "";
  86                         else
  87                                 res.guid = id.ToString ();
  88                         return res;
  89                 }
  90
  91         }
  92 }