copying the latest Sys.Web.Services from trunk.
[mono.git] / mcs / class / IBM.Data.DB2 / IBM.Data.DB2 / DB2Environment.cs
1
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.
21 //
22 using System;\r
23 using System.Collections;\r
24 \r
25 namespace IBM.Data.DB2\r
26 {\r
27 \r
28         internal sealed class DB2Environment : IDisposable\r
29         {\r
30                 private static DB2Environment environment;\r
31                 internal Hashtable connectionPools;\r
32                 internal IntPtr penvHandle = IntPtr.Zero;\r
33 \r
34                 private DB2Environment()\r
35                 {\r
36                         connectionPools = Hashtable.Synchronized(new Hashtable());\r
37 \r
38                         //                      short sqlRet = DB2CLIWrapper.SQLAllocHandle(DB2Constants.SQL_HANDLE_ENV, IntPtr.Zero, ref penvHandle);\r
39                         short sqlRet = DB2CLIWrapper.Initialize(ref penvHandle);\r
40                         DB2ClientUtils.DB2CheckReturn(sqlRet, 0, IntPtr.Zero, "Unable to allocate Environment handle.", null);\r
41 \r
42                         // SQLSetEnvAttr( hEnv=0:1, fAttribute=SQL_ATTR_APP_TYPE 2473, vParam=4, cbParam=0 )    // 4=ADO.NET apptype????\r
43                         // SQLSetEnvAttr( hEnv=0:1, fAttribute=SQL_ATTR_OUTPUT_NTS 10001, vParam=0, cbParam=0 ) // strings not 0-terminated\r
44                 }\r
45 \r
46                 public static DB2Environment Instance\r
47                 {\r
48                         get\r
49                         {\r
50                                 if(environment == null)\r
51                                 {\r
52                                         lock(typeof(DB2Environment))\r
53                                         {\r
54                                                 if(environment == null)\r
55                                                 {\r
56                                                         environment = new DB2Environment();\r
57                                                 }\r
58                                         }\r
59                                 }\r
60                                 return environment;\r
61                         }\r
62                 }\r
63                 #region IDisposable Members\r
64 \r
65                 bool disposed;\r
66                 public void Dispose()\r
67                 {\r
68                         Dispose(true);\r
69                         GC.SuppressFinalize(this);\r
70                 }\r
71 \r
72                 public void Dispose(bool disposing)\r
73                 {\r
74                         if(disposed)\r
75                         {\r
76                                 DB2CLIWrapper.SQLFreeHandle(DB2Constants.SQL_HANDLE_ENV, penvHandle);\r
77                                 environment = null;\r
78                         }\r
79                         disposed = true;\r
80                 }\r
81 \r
82                 ~DB2Environment()\r
83                 {\r
84                         Dispose(false);\r
85                 }\r
86 \r
87                 #endregion\r
88         }\r
89 \r
90 }