2009-07-11 Michael Barker <mike@middlesoft.co.uk>
[mono.git] / mcs / class / System.Data.Linq / src / DbLinq.Firebird / FirebirdSqlProvider.cs
1 #region MIT license\r
2 // \r
3 // MIT license\r
4 //\r
5 // Copyright (c) 2007-2008 Jiri Moudry, Pascal Craponne\r
6 // \r
7 // Permission is hereby granted, free of charge, to any person obtaining a copy\r
8 // of this software and associated documentation files (the "Software"), to deal\r
9 // in the Software without restriction, including without limitation the rights\r
10 // to use, copy, modify, merge, publish, distribute, sublicense, and/or sell\r
11 // copies of the Software, and to permit persons to whom the Software is\r
12 // furnished to do so, subject to the following conditions:\r
13 // \r
14 // The above copyright notice and this permission notice shall be included in\r
15 // all copies or substantial portions of the Software.\r
16 // \r
17 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR\r
18 // IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,\r
19 // FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE\r
20 // AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER\r
21 // LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,\r
22 // OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN\r
23 // THE SOFTWARE.\r
24 // \r
25 #endregion\r
26 \r
27 using System;\r
28 using System.Collections.Generic;\r
29 using System.Linq;\r
30 using System.Text;\r
31 \r
32 using DbLinq.Data.Linq.Sql;\r
33 using DbLinq.Util;\r
34 using DbLinq.Vendor.Implementation;\r
35 \r
36 namespace DbLinq.Firebird\r
37 {\r
38 #if !MONO_STRICT\r
39     public\r
40 #endif\r
41     class FirebirdSqlProvider : SqlProvider\r
42     {\r
43         public override string GetParameterName(string nameBase)\r
44         {\r
45             return "@" + nameBase;\r
46         }\r
47 \r
48         protected override SqlStatement GetLiteralCount(SqlStatement a)\r
49         {\r
50             return "COUNT(*)";\r
51         }\r
52 \r
53         protected override SqlStatement GetLiteralStringConcat(SqlStatement a, SqlStatement b)\r
54         {\r
55             return SqlStatement.Format("CONCAT({0}, {1})", a, b);\r
56         }\r
57 \r
58         protected override char SafeNameStartQuote { get { return ' '; } }\r
59         protected override char SafeNameEndQuote { get { return ' '; } }\r
60 \r
61         /// <summary>\r
62         /// MySQL is case insensitive, and names always specify a case (there is no default casing)\r
63         /// However, tables appear to be full lowercase\r
64         /// </summary>\r
65         /// <param name="dbName"></param>\r
66         /// <returns></returns>\r
67         protected override bool IsNameCaseSafe(string dbName)\r
68         {\r
69             return dbName == dbName.ToUpperInvariant();\r
70         }\r
71 \r
72         /// <summary>\r
73         /// Returns a table alias\r
74         /// </summary>\r
75         /// <param name="table"></param>\r
76         /// <returns></returns>\r
77         public override string GetTable(string table)\r
78         {\r
79             var parts = table.Split('.');\r
80             return GetSafeName(parts[parts.Length - 1]);\r
81         }\r
82 \r
83         /// <summary>\r
84         /// Returns a LIMIT clause around a SELECT clause\r
85         /// </summary>\r
86         /// <param name="select">SELECT clause</param>\r
87         /// <param name="limit">limit value (number of columns to be returned)</param>\r
88         /// <returns></returns>\r
89         public override SqlStatement GetLiteralLimit(SqlStatement select, SqlStatement limit)\r
90         {\r
91             string stmt = limit.Count == 2\r
92                 ? string.Format("SELECT FIRST {0}, LAST {1}", limit[0].Sql, limit[1].Sql)\r
93                 : string.Format("SELECT FIRST {0}", limit[0].Sql);\r
94             return select.Replace("SELECT", stmt, true);\r
95         }\r
96 \r
97         public override SqlStatement GetInsertIds(IList<SqlStatement> outputParameters, IList<SqlStatement> outputExpressions)\r
98         {\r
99             // no parameters? no need to get them back\r
100             if (outputParameters.Count == 0)\r
101                 return "";\r
102             // otherwise we keep track of the new values\r
103             return SqlStatement.Format("SELECT {0} INTO {1} FROM DUAL",\r
104                 SqlStatement.Join(", ", (from outputExpression in outputExpressions select outputExpression.Replace(".NextVal", ".CurrVal", true)).ToArray()),\r
105                 SqlStatement.Join(", ", outputParameters.ToArray()));\r
106         }\r
107     }\r
108 }\r