2009-07-11 Michael Barker <mike@middlesoft.co.uk>
[mono.git] / mcs / class / System.Data.Linq / src / DbLinq.Ingres / IngresSqlProvider.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 DbLinq.Data.Linq.Sql;\r
31 using DbLinq.Vendor.Implementation;\r
32 \r
33 namespace DbLinq.Ingres\r
34 {\r
35 #if !MONO_STRICT\r
36     public\r
37 #endif\r
38     class IngresSqlProvider : SqlProvider\r
39     {\r
40         public override SqlStatement GetInsertIds(IList<SqlStatement> outputParameters, IList<SqlStatement> outputExpressions)\r
41         {\r
42             // no parameters? no need to get them back\r
43             if (outputParameters.Count == 0)\r
44                 return "";\r
45             // otherwise we keep track of the new values\r
46             return SqlStatement.Format("SELECT {0}",\r
47                 SqlStatement.Join(", ", (from outputExpression in outputExpressions\r
48                                          select outputExpression.Replace("next value", "current value", true)).ToArray())\r
49                 );\r
50         }\r
51 \r
52         protected override SqlStatement GetLiteralCount(SqlStatement a)\r
53         {\r
54             return "COUNT(*)";\r
55         }\r
56 \r
57         protected override SqlStatement GetLiteralStringToLower(SqlStatement a)\r
58         {\r
59             return string.Format("LOWER({0})", a);\r
60         }\r
61 \r
62         protected override SqlStatement GetLiteralStringToUpper(SqlStatement a)\r
63         {\r
64             return string.Format("UPPER({0})", a);\r
65         }\r
66 \r
67         public override SqlStatement GetLiteralLimit(SqlStatement select, SqlStatement limit)\r
68         {\r
69             // return string.Format("SELECT FIRST {0} FROM ({1})", limit, select);\r
70             var trimSelect = "SELECT ";\r
71             if (select.Count > 0 && select[0].Sql.StartsWith(trimSelect))\r
72             {\r
73                 var selectBuilder = new SqlStatementBuilder(select);\r
74                 var remaining = select[0].Sql.Substring(trimSelect.Length);\r
75                 selectBuilder.Parts[0] = new SqlLiteralPart(remaining);\r
76                 return SqlStatement.Format("SELECT FIRST {0} {1}", limit, selectBuilder.ToSqlStatement());\r
77             }\r
78             throw new ArgumentException("Invalid SELECT format");\r
79         }\r
80 \r
81         public override SqlStatement GetLiteralLimit(SqlStatement select, SqlStatement limit, SqlStatement offset, SqlStatement offsetAndLimit)\r
82         {\r
83             // Ingres 9.2 and above support offset clauses now\r
84             return SqlStatement.Format("{0} OFFSET {1}", GetLiteralLimit(select, limit), offset);\r
85         }\r
86 \r
87         public override string GetParameterName(string nameBase)\r
88         {\r
89             return "?";\r
90         }\r
91 \r
92         protected override bool IsNameCaseSafe(string dbName)\r
93         {\r
94             return dbName == dbName.ToLower();\r
95         }\r
96 \r
97         protected override SqlStatement GetLiteralStringConcat(SqlStatement a, SqlStatement b)\r
98         {\r
99             // This needs to be bracketed in case subsequent functions are called upon it\r
100             return SqlStatement.Format("({0} || {1})", a, b);\r
101         }\r
102     }\r
103 }\r