mcs/class/System.Data.OracleClient/System.Data.OracleClient.Oci/OciErrorHandle.cs

   1 //
   2 // OciErrorHandle.cs
   3 //
   4 // Part of managed C#/.NET library System.Data.OracleClient.dll
   5 //
   6 // Part of the Mono class libraries at
   7 // mcs/class/System.Data.OracleClient/System.Data.OracleClient.Oci
   8 //
   9 // Assembly: System.Data.OracleClient.dll
  10 // Namespace: System.Data.OracleClient.Oci
  11 //
  12 // Author:
  13 //     Tim Coleman <tim@timcoleman.com>
  14 //
  15 // Copyright (C) Tim Coleman, 2003
  16 //
  17
  18 using System;
  19 using System.Runtime.InteropServices;
  20
  21 namespace System.Data.OracleClient.Oci {
  22         internal sealed class OciErrorHandle : OciHandle, IDisposable
  23         {
  24                 #region Fields
  25
  26                 bool disposed = false;
  27
  28                 #endregion // Fields
  29
  30                 #region Constructors
  31
  32                 public OciErrorHandle (OciHandle parent, IntPtr newHandle)
  33                         : base (OciHandleType.Error, parent, newHandle)
  34                 {
  35                 }
  36
  37                 #endregion // Constructors
  38
  39                 #region Methods
  40
  41                 protected override void Dispose (bool disposing)
  42                 {
  43                         if (!disposed) {
  44                                 disposed = true;
  45                                 base.Dispose (disposing);
  46                         }
  47                 }
  48
  49                 public OciErrorInfo HandleError ()
  50                 {
  51                         OciErrorInfo info;
  52                         info.ErrorCode = 0;
  53                         info.ErrorMessage = String.Empty;
  54
  55                         int errbufSize = 512;
  56                         IntPtr errbuf = Marshal.AllocHGlobal (errbufSize);
  57
  58                         OciCalls.OCIErrorGet (this,
  59                                                 1,
  60                                                 IntPtr.Zero,
  61                                                 out info.ErrorCode,
  62                                                 errbuf,
  63                                                 (uint) errbufSize,
  64                                                 OciHandleType.Error);
  65
  66                         object err = Marshal.PtrToStringAnsi (errbuf);
  67                         if (err != null) {
  68                                 string errmsg = (string) err;
  69                                 info.ErrorMessage = String.Copy (errmsg);
  70                                 Marshal.FreeHGlobal (errbuf);
  71                         }
  72
  73                         return info;
  74                 }
  75
  76                 #endregion // Methods
  77         }
  78 }