mcs/class/System.Data.Linq/src/DbLinq.Oracle/OracleSqlProvider.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.Collections.Generic;\r
  28 using System.Linq;\r
  29 using System.Text;\r
  30 #if MONO_STRICT\r
  31 using System.Data.Linq.Sql;\r
  32 #else\r
  33 using DbLinq.Data.Linq.Sql;\r
  34 #endif\r
  35 using DbLinq.Util;\r
  36 using DbLinq.Vendor.Implementation;\r
  37 \r
  38 namespace DbLinq.Oracle\r
  39 {\r
  40 #if MONO_STRICT\r
  41     internal\r
  42 #else\r
  43     public\r
  44 #endif\r
  45     class OracleSqlProvider : SqlProvider\r
  46     {\r
  47         //public override string  GetInsert(string table, IList<string> inputColumns, IList<string> inputValues)\r
  48         //{\r
  49         //     return "BEGIN " + base.GetInsert(table, inputColumns, inputValues);\r
  50         //}\r
  51 \r
  52         public override SqlStatement GetInsertIds(IList<SqlStatement> outputParameters, IList<SqlStatement> outputExpressions)\r
  53         {\r
  54             // no parameters? no need to get them back\r
  55             if (outputParameters.Count == 0)\r
  56                 return "";\r
  57             // otherwise we keep track of the new values\r
  58             return SqlStatement.Format("SELECT {0} INTO {1} FROM DUAL",\r
  59                 SqlStatement.Join(", ", (from outputExpression in outputExpressions select outputExpression.Replace(".NextVal", ".CurrVal", true)).ToArray()),\r
  60                 SqlStatement.Join(", ", outputParameters.ToArray()));\r
  61         }\r
  62 \r
  63         protected override SqlStatement GetLiteralModulo(SqlStatement a, SqlStatement b)\r
  64         {\r
  65             return string.Format("MOD({0}, {1})", a, b);\r
  66         }\r
  67 \r
  68         protected override SqlStatement GetLiteralCount(SqlStatement a)\r
  69         {\r
  70             return "COUNT(*)";\r
  71         }\r
  72 \r
  73         protected override SqlStatement GetLiteralStringLength(SqlStatement a)\r
  74         {\r
  75             return SqlStatement.Format("LENGTH({0})", a);\r
  76         }\r
  77 \r
  78         protected override SqlStatement GetLiteralStringToLower(SqlStatement a)\r
  79         {\r
  80             return SqlStatement.Format("LOWER({0})", a);\r
  81         }\r
  82 \r
  83         protected override SqlStatement GetLiteralStringToUpper(SqlStatement a)\r
  84         {\r
  85             return SqlStatement.Format("UPPER({0})", a);\r
  86         }\r
  87 \r
  88         //          SELECT * FROM (\r
  89         //          SELECT a.*, rownum RN FROM (\r
  90         //          select c$.CustomerID, c$.CompanyName from [Customers] c$ order by c$.CUSTOMERID\r
  91         //          ) a  WHERE rownum <=5\r
  92         //          ) WHERE rn >2\r
  93 \r
  94         protected const string LimitedTableName = "LimitedTable___";\r
  95         protected const string LimitedRownum = "Limit___";\r
  96 \r
  97         public override SqlStatement GetLiteralLimit(SqlStatement select, SqlStatement limit)\r
  98         {\r
  99             return SqlStatement.Format(\r
 100                 @"SELECT {2}.*, rownum {3} FROM ({4}{0}{4}) {2} WHERE rownum <= {1}",\r
 101                 select, limit, LimitedTableName, LimitedRownum, NewLine);\r
 102         }\r
 103 \r
 104         public override SqlStatement GetLiteralLimit(SqlStatement select, SqlStatement limit, SqlStatement offset, SqlStatement offsetAndLimit)\r
 105         {\r
 106             return SqlStatement.Format(\r
 107                 @"SELECT * FROM ({3}{0}{3}) WHERE {2} > {1}",\r
 108                 GetLiteralLimit(select, offsetAndLimit), offset, LimitedRownum, NewLine);\r
 109         }\r
 110 \r
 111         protected override SqlStatement GetLiteralStringIndexOf(SqlStatement baseString, SqlStatement searchString, SqlStatement startIndex, SqlStatement count)\r
 112         {\r
 113             // SUBSTR(baseString, StartIndex)\r
 114             var substring = GetLiteralSubString(baseString, startIndex, count);\r
 115 \r
 116             // INSTR(SUBSTR(baseString, StartIndex), searchString) ---> range 1:n , 0 => doesn't exist\r
 117             return SqlStatement.Format("INSTR({0},{1})", substring, searchString);\r
 118         }\r
 119 \r
 120         protected override SqlStatement GetLiteralStringIndexOf(SqlStatement baseString, SqlStatement searchString, SqlStatement startIndex)\r
 121         {\r
 122             // SUBSTR(baseString,StartIndex)\r
 123             var substring = GetLiteralSubString(baseString, startIndex);\r
 124 \r
 125             // INSTR(SUBSTR(baseString, StartIndex), searchString) ---> range 1:n , 0 => doesn't exist\r
 126             return SqlStatement.Format("INSTR({0},{1})", substring, searchString);\r
 127         }\r
 128 \r
 129         protected override SqlStatement GetLiteralStringIndexOf(SqlStatement baseString, SqlStatement searchString)\r
 130         {\r
 131             return GetLiteralSubtract(SqlStatement.Format("INSTR({0},{1})", baseString, searchString), "1");\r
 132         }\r
 133 \r
 134     }\r
 135 }\r