[System.Data] Fix Azure SQL specific issues (ProviderTests) (#4622)
[mono.git] / mcs / class / System.Data / Test / ProviderTests / System.Data.SqlClient / SqlParameterTest.cs
index 65fa15727b332d4b69d702bdee7e173022876b90..893dba77c362f8ae5c4884cf98b51ed74b133b0e 100644 (file)
@@ -3,6 +3,8 @@
 //                          SqlParameter class
 // Author:
 //      Senganal T (tsenganal@novell.com)
+//      Amit Biswas (amit@amitbiswas.com)
+//      Veerapuram Varadhan  (vvaradhan@novell.com)
 //
 // Copyright (c) 2004 Novell Inc., and the individuals listed
 // on the ChangeLog entries.
 
 using System;
 using System.Data;
-using System.Data.Common;
 using System.Data.SqlClient;
 
 using NUnit.Framework;
 
-namespace MonoTests.System.Data.SqlClient
+namespace MonoTests.System.Data.Connected.SqlClient
 {
        [TestFixture]
        [Category ("sqlserver")]
-       //FIXME : Add more testcases
        public class SqlParameterTest
        {
-               //testcase for #77410
-               [Test]
-               public void ParameterNullTest ()
+               SqlConnection conn;
+               SqlCommand cmd;
+               SqlDataReader rdr;
+               EngineConfig engine;
+
+               [SetUp]
+               public void SetUp ()
+               {
+                       conn = ConnectionManager.Instance.Sql.Connection;
+                       engine = ConnectionManager.Instance.Sql.EngineConfig;
+               }
+
+               [TearDown]
+               public void TearDown ()
                {
-                       SqlParameter param = new SqlParameter ("param", SqlDbType.Decimal);
-                       Assert.AreEqual (0, param.Scale, "#1");
-                       param.Value = DBNull.Value;
-                       Assert.AreEqual (0, param.Scale, "#2");
-
-                       param = new SqlParameter ("param", SqlDbType.Int);
-                       Assert.AreEqual (0, param.Scale, "#3");
-                       param.Value = DBNull.Value;
-                       Assert.AreEqual (0, param.Scale, "#4");
+                       if (cmd != null)
+                               cmd.Dispose ();
+                       if (rdr != null)
+                               rdr.Close ();
+                       ConnectionManager.Instance.Close ();
+               }
+
+               [Test] // bug #324840
+               [Category("NotWorking")]
+               public void ParameterSizeTest ()
+               {
+                       if (ClientVersion == 7)
+                               Assert.Ignore ("Hangs on SQL Server 7.0");
+
+                       string longstring = new String('x', 20480);
+                       SqlParameter prm;
+                       cmd = new SqlCommand ("create table #text1 (ID int not null, Val1 ntext)", conn);
+                       cmd.ExecuteNonQuery ();
+                       cmd.CommandText = "INSERT INTO #text1(ID,Val1) VALUES (@ID,@Val1)";
+                       prm = new SqlParameter ();
+                       prm.ParameterName = "@ID";
+                       prm.Value = 1;
+                       cmd.Parameters.Add (prm);
+
+                       prm = new SqlParameter ();
+                       prm.ParameterName = "@Val1";
+                       prm.Value = longstring;
+                       prm.SqlDbType = SqlDbType.NText; // Comment and enjoy the truncation
+                       cmd.Parameters.Add (prm);
+                       cmd.ExecuteNonQuery ();
+                       cmd = new SqlCommand ("select datalength(Val1) from #text1", conn);
+                       Assert.AreEqual (20480 * 2, cmd.ExecuteScalar (), "#1");
+
+                       cmd.CommandText = "INSERT INTO #text1(ID,Val1) VALUES (@ID,@Val1)";
+                       prm = new SqlParameter ();
+                       prm.ParameterName = "@ID";
+                       prm.Value = 1;
+                       cmd.Parameters.Add (prm);
+
+                       prm = new SqlParameter ();
+                       prm.ParameterName = "@Val1";
+                       prm.Value = longstring;
+                       //prm.SqlDbType = SqlDbType.NText;
+                       cmd.Parameters.Add (prm);
+                       cmd.ExecuteNonQuery ();
+                       cmd = new SqlCommand ("select datalength(Val1) from #text1", conn);
+                       Assert.AreEqual (20480 * 2, cmd.ExecuteScalar (), "#2");
+
+                       cmd.CommandText = "INSERT INTO #text1(ID,Val1) VALUES (@ID,@Val1)";
+                       prm = new SqlParameter ();
+                       prm.ParameterName = "@ID";
+                       prm.Value = 1;
+                       cmd.Parameters.Add (prm);
+
+                       prm = new SqlParameter ();
+                       prm.ParameterName = "@Val1";
+                       prm.Value = longstring;
+                       prm.SqlDbType = SqlDbType.VarChar;
+                       cmd.Parameters.Add (prm);
+                       cmd.ExecuteNonQuery ();
+                       cmd = new SqlCommand ("select datalength(Val1) from #text1", conn);
+                       Assert.AreEqual (20480 * 2, cmd.ExecuteScalar (), "#3");
+                       cmd = new SqlCommand ("drop table #text1", conn);
+                       cmd.ExecuteNonQuery ();
+                       conn.Close ();
+               }
+
+               [Test] // bug #382635
+               [Category("NotWorking")]
+               public void ParameterSize_compatibility_Test ()
+               {
+                       string longstring = "abcdefghijklmnopqrstuvwxyz";
+
+                       cmd = new SqlCommand ("create table #bug382635 (description varchar(20))", conn);
+                       cmd.ExecuteNonQuery ();
+
+                       cmd.CommandText = 
+                                       "CREATE PROCEDURE #sp_bug382635 (@Desc varchar(20)) "
+                                       + "AS " + Environment.NewLine 
+                                       + "BEGIN" + Environment.NewLine 
+                                       + "UPDATE #bug382635 SET description = @Desc" + Environment.NewLine
+                                       + "END";
+                       cmd.CommandType = CommandType.Text;
+                       cmd.ExecuteNonQuery ();
+
+                       cmd.CommandText = "INSERT INTO #bug382635 " +
+                                         "(description) VALUES ('Verifies bug #382635')";
+                       cmd.ExecuteNonQuery ();
+
+                       cmd.CommandText = "#sp_bug382635";
+                       cmd.CommandType = CommandType.StoredProcedure;
+
+                       SqlParameter p1 = new SqlParameter ("@Desc", SqlDbType.NVarChar, 15);
+                       p1.Value = longstring;
+                       Assert.AreEqual (longstring, p1.Value);
+                       cmd.Parameters.Add (p1);
+                       cmd.ExecuteNonQuery ();
+
+                       // Test for truncation
+                       SqlCommand selectCmd = new SqlCommand ("SELECT DATALENGTH(description), description from #bug382635", conn);
+
+                       rdr = selectCmd.ExecuteReader ();
+                       Assert.IsTrue (rdr.Read (), "#A1");
+                       Assert.AreEqual (15, rdr.GetValue (0), "#A2");
+                       Assert.AreEqual (longstring.Substring (0, 15), rdr.GetValue (1), "#A3");
+                       Assert.AreEqual (longstring, p1.Value, "#A4");
+                       rdr.Close ();
+
+                       // Test to ensure truncation is not done in the Value getter/setter
+                       p1.Size = 12;
+                       p1.Value = longstring.Substring (0, 22);
+                       p1.Size = 14;
+                       cmd.ExecuteNonQuery ();
+
+                       rdr = selectCmd.ExecuteReader ();
+                       Assert.IsTrue (rdr.Read (), "#B1");
+                       Assert.AreEqual (14, rdr.GetValue (0), "#B2");
+                       Assert.AreEqual (longstring.Substring (0, 14), rdr.GetValue (1), "#B3");
+                       Assert.AreEqual (longstring.Substring (0, 22), p1.Value, "#B4");
+                       rdr.Close ();
+
+                       // Size exceeds size of value
+                       p1.Size = 40;
+                       cmd.ExecuteNonQuery ();
+
+                       rdr = selectCmd.ExecuteReader ();
+                       Assert.IsTrue (rdr.Read (), "#C1");
+                       Assert.AreEqual (14, rdr.GetValue (0), "#C2");
+                       Assert.AreEqual (longstring.Substring (0, 14), rdr.GetValue (1), "#C3");
+                       rdr.Close ();
                }
 
                [Test]
-               public void ParameterType ()
+               public void ConversionToSqlTypeInvalid ()
+               {
+                       string insert_data = "insert into datetime_family (id, type_datetime) values (6000, @type_datetime)";
+                       string delete_data = "delete from datetime_family where id = 6000";
+
+                       object [] values = new object [] {
+                               5,
+                               true,
+                               40L,
+                               "invalid date",
+                               };
+
+                       try {
+                               for (int i = 0; i < values.Length; i++) {
+                                       object value = values [i];
+
+                                       cmd = conn.CreateCommand ();
+                                       cmd.CommandText = insert_data;
+                                       SqlParameter param = cmd.Parameters.Add ("@type_datetime", SqlDbType.DateTime);
+                                       param.Value = value;
+                                       cmd.Prepare ();
+
+                                       try {
+                                               cmd.ExecuteNonQuery ();
+                                               Assert.Fail ("#1:" + i);
+                                       } catch (InvalidCastException) {
+                                               if (value is string)
+                                                       Assert.Fail ("#2");
+                                       } catch (FormatException) {
+                                               if (!(value is string))
+                                                       Assert.Fail ("#3");
+                                       }
+                               }
+                       } finally {
+                               DBHelper.ExecuteNonQuery (conn, delete_data);
+                       }
+               }
+
+               [Test] // bug #382589
+               public void DecimalMaxAsParamValueTest ()
+               {
+                       if (ClientVersion == 7)
+                               Assert.Ignore ("Maximum precision is 28.");
+
+                       string create_sp = "CREATE PROCEDURE #sp_bug382539 (@decmax decimal(29,0) OUT)"
+                               + "AS " + Environment.NewLine
+                               + "BEGIN" + Environment.NewLine
+                               + "SET @decmax = 102.34" + Environment.NewLine
+                               + "END";
+
+                       cmd = new SqlCommand (create_sp, conn);
+                       cmd.ExecuteNonQuery ();
+
+                       cmd.CommandText = "[#sp_bug382539]";
+                       cmd.CommandType = CommandType.StoredProcedure;
+                       SqlParameter pValue = new SqlParameter("@decmax", Decimal.MaxValue);
+                       pValue.Direction = ParameterDirection.InputOutput;
+                       cmd.Parameters.Add(pValue);
+
+                       Assert.AreEqual (Decimal.MaxValue, pValue.Value, "Parameter initialization value mismatch");
+                       cmd.ExecuteNonQuery();
+
+                       Assert.AreEqual (102m, pValue.Value, "Parameter value mismatch");
+               }
+
+               [Test] // bug #382589
+               public void DecimalMinAsParamValueTest ()
                {
-                       // If Type is not set, then type is inferred from the value
-                       // assigned. The Type should inferred everytime Value is assigned
-                       // If value is null/DBNull, then the current Type should retained.
-                       SqlParameter param = new SqlParameter ();
-                       Assert.AreEqual (SqlDbType.NVarChar, param.SqlDbType, "#1");
-                       param.Value = DBNull.Value;
-                       Assert.AreEqual (SqlDbType.NVarChar, param.SqlDbType, "#2");
-                       param.Value = 1;
-                       Assert.AreEqual (SqlDbType.Int, param.SqlDbType, "#3");
-                       param.Value = DBNull.Value;
-                       Assert.AreEqual (SqlDbType.Int, param.SqlDbType, "#4");
-                       param.Value = null;
-                       Assert.AreEqual (SqlDbType.Int, param.SqlDbType, "#4");
-
-                       //If Type is set, then the Type should not inferred from the value 
-                       //assigned.
-                       SqlParameter param1 = new SqlParameter ();
-                       param1.DbType = DbType.String; 
-                       Assert.AreEqual (SqlDbType.NVarChar, param1.SqlDbType, "#5");
-                       param1.Value = 1;
-                       Assert.AreEqual (SqlDbType.NVarChar, param1.SqlDbType, "#6");
-
-                       SqlParameter param2 = new SqlParameter ();
-                       param2.SqlDbType = SqlDbType.NVarChar;
-                       Assert.AreEqual (SqlDbType.NVarChar, param2.SqlDbType, "#7");
-                       param2.Value = 1;
-                       Assert.AreEqual (SqlDbType.NVarChar, param2.SqlDbType, "#8");
+                       if (ClientVersion == 7)
+                               Assert.Ignore ("Maximum precision is 28.");
+
+                       string create_sp = "CREATE PROCEDURE #sp_bug382539 (@decmax decimal(29,0) OUT)"
+                               + "AS " + Environment.NewLine
+                               + "BEGIN" + Environment.NewLine
+                               + "SET @decmax = 102.34" + Environment.NewLine
+                               + "END";
+
+                       cmd = new SqlCommand (create_sp, conn);
+                       cmd.ExecuteNonQuery ();
+
+                       cmd.CommandText = "[#sp_bug382539]";
+                       cmd.CommandType = CommandType.StoredProcedure;
+                       SqlParameter pValue = new SqlParameter("@decmax", Decimal.MinValue);
+                       pValue.Direction = ParameterDirection.InputOutput;
+                       cmd.Parameters.Add(pValue);
+
+                       Assert.AreEqual (Decimal.MinValue, pValue.Value, "Parameter initialization value mismatch");
+                       cmd.ExecuteNonQuery();
+
+                       Assert.AreEqual (102m, pValue.Value, "Parameter value mismatch");
+               }
+
+               [Test] // bug #382589
+               public void DecimalMaxAsParamValueExceptionTest ()
+               {
+                       if (ClientVersion == 7)
+                               Assert.Ignore ("Maximum precision is 28.");
+
+                       string create_sp = "CREATE PROCEDURE #sp_bug382539 (@decmax decimal(29,10) OUT)"
+                               + "AS " + Environment.NewLine
+                               + "BEGIN" + Environment.NewLine
+                               + "SET @decmax = 102.36" + Environment.NewLine
+                               + "END";
+
+                       cmd = new SqlCommand (create_sp, conn);
+                       cmd.ExecuteNonQuery ();
+
+                       cmd.CommandText = "[#sp_bug382539]";
+                       cmd.CommandType = CommandType.StoredProcedure;
+                       SqlParameter pValue = new SqlParameter("@decmax", Decimal.MaxValue);
+                       pValue.Direction = ParameterDirection.InputOutput;
+                       cmd.Parameters.Add(pValue);
+
+                       try {
+                               cmd.ExecuteNonQuery ();
+                               Assert.Fail ("#1");
+                       } catch (SqlException ex) {
+                               // Error converting data type numeric to decimal
+                               Assert.AreEqual (typeof (SqlException), ex.GetType (), "#2");
+                               Assert.AreEqual ((byte) 16, ex.Class, "#3");
+                               Assert.IsNull (ex.InnerException, "#4");
+                               Assert.IsNotNull (ex.Message, "#5");
+                               Assert.AreEqual (8114, ex.Number, "#6");
+                               Assert.AreEqual ((byte) 5, ex.State, "#7");
+                       }
+               }
+
+               [Test] // bug# 382589
+               public void DecimalMinAsParamValueExceptionTest ()
+               {
+                       if (ClientVersion == 7)
+                               Assert.Ignore ("Maximum precision is 28.");
+
+                       string create_sp = "CREATE PROCEDURE #sp_bug382539 (@decmax decimal(29,10) OUT)"
+                               + "AS " + Environment.NewLine
+                               + "BEGIN" + Environment.NewLine
+                               + "SET @decmax = 102.36" + Environment.NewLine
+                               + "END";
+
+                       cmd = new SqlCommand (create_sp, conn);
+                       cmd.ExecuteNonQuery ();
+
+                       cmd.CommandText = "[#sp_bug382539]";
+                       cmd.CommandType = CommandType.StoredProcedure;
+                       SqlParameter pValue = new SqlParameter("@decmax", Decimal.MinValue);
+                       pValue.Direction = ParameterDirection.InputOutput;
+                       cmd.Parameters.Add(pValue);
+                       try {
+                               cmd.ExecuteNonQuery ();
+                               Assert.Fail ("#1");
+                       } catch (SqlException ex) {
+                               // Error converting data type numeric to decimal
+                               Assert.AreEqual (typeof (SqlException), ex.GetType (), "#2");
+                               Assert.AreEqual ((byte) 16, ex.Class, "#3");
+                               Assert.IsNull (ex.InnerException, "#4");
+                               Assert.IsNotNull (ex.Message, "#5");
+                               Assert.AreEqual (8114, ex.Number, "#6");
+                               Assert.AreEqual ((byte) 5, ex.State, "#7");
+                       }
+               }
+
+               [Test] // bug #526794
+               public void ZeroLengthString ()
+               {
+                       cmd = new SqlCommand ("create table #bug526794 (name varchar(20) NULL)", conn);
+                       cmd.ExecuteNonQuery ();
+
+                       SqlParameter param;
+
+                       param = new SqlParameter ("@name", SqlDbType.VarChar);
+                       param.Value = string.Empty;
+
+                       cmd = new SqlCommand ("insert into #bug526794 values (@name)", conn);
+                       cmd.Parameters.Add (param);
+                       cmd.ExecuteNonQuery ();
+
+                       cmd = new SqlCommand ("select * from #bug526794", conn);
+                       rdr = cmd.ExecuteReader ();
+                       Assert.IsTrue (rdr.Read (), "#A1");
+                       Assert.AreEqual (string.Empty, rdr.GetValue (0), "#A2");
+                       rdr.Close ();
+
+                       param = new SqlParameter ("@name", SqlDbType.Int);
+                       param.Value = string.Empty;
+
+                       cmd = new SqlCommand ("insert into #bug526794 values (@name)", conn);
+                       cmd.Parameters.Add (param);
+
+                       try {
+                               cmd.ExecuteNonQuery ();
+                               Assert.Fail ("#B1");
+                       } catch (FormatException ex) {
+                               // Failed to convert parameter value from a String to a Int32
+                               Assert.AreEqual (typeof (FormatException), ex.GetType (), "#B2");
+                               Assert.IsNotNull (ex.Message, "#B3");
+                               Assert.IsTrue (ex.Message.IndexOf (typeof (string).Name) != -1, "#B4");
+                               Assert.IsTrue (ex.Message.IndexOf (typeof (int).Name) != -1, "#B5");
+
+                               // Input string was not in a correct format
+                               Exception inner = ex.InnerException;
+                               Assert.IsNotNull (inner, "#B6");
+                               Assert.AreEqual (typeof (FormatException), inner.GetType (), "#B7");
+                               Assert.IsNull (inner.InnerException, "#B8");
+                               Assert.IsNotNull (inner.Message, "#B9");
+                       }
+               }
+
+               [Test] // bug #595918
+               public void DecimalDefaultScaleTest ()
+               {
+                       string create_tbl = "CREATE TABLE #decimalScaleCheck (decsclcheck DECIMAL (19, 5) null)";
+                       string create_sp = "CREATE PROCEDURE #sp_bug595918(@decsclcheck decimal(19,5) OUT)"
+                               + "AS " + Environment.NewLine
+                               + "BEGIN" + Environment.NewLine
+                               + "INSERT INTO #decimalScaleCheck values (@decsclcheck)" + Environment.NewLine
+                               + "SELECT @decsclcheck=decsclcheck from #decimalScaleCheck" + Environment.NewLine
+                               + "END";
+                       
+                       cmd = new SqlCommand (create_tbl, conn);
+                       cmd.ExecuteNonQuery ();
+                       
+                       cmd.CommandText = create_sp;
+                       cmd.ExecuteNonQuery ();
+                       
+                       cmd.CommandText = "[#sp_bug595918]";
+                       cmd.CommandType = CommandType.StoredProcedure;
+                       SqlParameter pValue = new SqlParameter("@decsclcheck", SqlDbType.Decimal);
+                       pValue.Value = 128.425;
+                       pValue.Precision = 19;
+                       pValue.Scale = 3;
+                       pValue.Direction = ParameterDirection.InputOutput;
+                       cmd.Parameters.Add(pValue);
+                       cmd.ExecuteNonQuery();
+
+                       Assert.AreEqual (128.425, pValue.Value, "Stored decimal value is incorrect - DS - Bug#595918");
+               }
+               
+               [Test] // bug #595918
+               public void DecimalGreaterScaleTest ()
+               {
+                       string create_tbl = "CREATE TABLE #decimalScaleCheck (decsclcheck DECIMAL (19, 5) null)";
+                       string create_sp = "CREATE PROCEDURE #sp_bug595918(@decsclcheck decimal(19,5) OUT)"
+                               + "AS " + Environment.NewLine
+                               + "BEGIN" + Environment.NewLine
+                               + "INSERT INTO #decimalScaleCheck values (@decsclcheck)" + Environment.NewLine
+                               + "SELECT @decsclcheck=decsclcheck from #decimalScaleCheck" + Environment.NewLine
+                               + "END";
+                       
+                       cmd = new SqlCommand (create_tbl, conn);
+                       cmd.ExecuteNonQuery ();
+                       
+                       cmd.CommandText = create_sp;
+                       cmd.ExecuteNonQuery ();
+                       
+                       cmd.CommandText = "[#sp_bug595918]";
+                       cmd.CommandType = CommandType.StoredProcedure;
+                       SqlParameter pValue = new SqlParameter("@decsclcheck", SqlDbType.Decimal);
+                       pValue.Value = 128.425;
+                       pValue.Precision = 19;
+                       pValue.Scale = 5;
+                       pValue.Direction = ParameterDirection.InputOutput;
+                       cmd.Parameters.Add(pValue);
+                       cmd.ExecuteNonQuery();
+
+                       Assert.AreEqual (128.42500, pValue.Value, "Stored decimal value is incorrect - GS - Bug#595918");
+               }
+
+               [Test] // bug #595918
+               public void DecimalLesserScaleTest ()
+               {
+                       string create_tbl = "CREATE TABLE #decimalScaleCheck (decsclcheck DECIMAL (19, 5) null)";
+                       string create_sp = "CREATE PROCEDURE #sp_bug595918(@decsclcheck decimal(19,5) OUT)"
+                               + "AS " + Environment.NewLine
+                               + "BEGIN" + Environment.NewLine
+                               + "INSERT INTO #decimalScaleCheck values (@decsclcheck)" + Environment.NewLine
+                               + "SELECT @decsclcheck=decsclcheck from #decimalScaleCheck" + Environment.NewLine
+                               + "END";
+                       
+                       cmd = new SqlCommand (create_tbl, conn);
+                       cmd.ExecuteNonQuery ();
+                       
+                       cmd.CommandText = create_sp;
+                       cmd.ExecuteNonQuery ();
+                       
+                       cmd.CommandText = "[#sp_bug595918]";
+                       cmd.CommandType = CommandType.StoredProcedure;
+                       SqlParameter pValue = new SqlParameter("@decsclcheck", SqlDbType.Decimal);
+                       pValue.Value = 128.425;
+                       pValue.Precision = 19;
+                       pValue.Scale = 2;
+                       pValue.Direction = ParameterDirection.InputOutput;
+                       cmd.Parameters.Add(pValue);
+                       cmd.ExecuteNonQuery();
+
+                       Assert.AreEqual (128.42, pValue.Value, "Stored decimal value is incorrect - LS - Bug#595918");
+               }
+
+               int ClientVersion {
+                       get {
+                               return (engine.ClientVersion);
+                       }
                }
        }
 }