disable broken tests on net_4_0
[mcs.git] / class / IBM.Data.DB2 / IBM.Data.DB2 / DB2Environment.cs
blob8a2d87e7914070c98ec8718b33f337f1e307158a
2 //
3 // Permission is hereby granted, free of charge, to any person obtaining
4 // a copy of this software and associated documentation files (the
5 // "Software"), to deal in the Software without restriction, including
6 // without limitation the rights to use, copy, modify, merge, publish,
7 // distribute, sublicense, and/or sell copies of the Software, and to
8 // permit persons to whom the Software is furnished to do so, subject to
9 // the following conditions:
10 //
11 // The above copyright notice and this permission notice shall be
12 // included in all copies or substantial portions of the Software.
13 //
14 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
15 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
16 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
17 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
18 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
19 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
20 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
22 using System;
23 using System.Collections;
25 namespace IBM.Data.DB2
28 internal sealed class DB2Environment : IDisposable
30 volatile static DB2Environment environment;
31 static readonly object lockobj = new object ();
32 internal Hashtable connectionPools;
33 internal IntPtr penvHandle = IntPtr.Zero;
35 private DB2Environment()
37 connectionPools = Hashtable.Synchronized(new Hashtable());
39 // short sqlRet = DB2CLIWrapper.SQLAllocHandle(DB2Constants.SQL_HANDLE_ENV, IntPtr.Zero, ref penvHandle);
40 short sqlRet = DB2CLIWrapper.Initialize(ref penvHandle);
41 DB2ClientUtils.DB2CheckReturn(sqlRet, 0, IntPtr.Zero, "Unable to allocate Environment handle.", null);
43 // SQLSetEnvAttr( hEnv=0:1, fAttribute=SQL_ATTR_APP_TYPE 2473, vParam=4, cbParam=0 ) // 4=ADO.NET apptype????
44 // SQLSetEnvAttr( hEnv=0:1, fAttribute=SQL_ATTR_OUTPUT_NTS 10001, vParam=0, cbParam=0 ) // strings not 0-terminated
47 public static DB2Environment Instance
49 get
51 if(environment == null)
53 lock(lockobj)
55 if(environment == null)
57 environment = new DB2Environment();
61 return environment;
64 #region IDisposable Members
66 bool disposed;
67 public void Dispose()
69 Dispose(true);
70 GC.SuppressFinalize(this);
73 public void Dispose(bool disposing)
75 if(disposed)
77 DB2CLIWrapper.SQLFreeHandle(DB2Constants.SQL_HANDLE_ENV, penvHandle);
78 environment = null;
80 disposed = true;
83 ~DB2Environment()
85 Dispose(false);
88 #endregion