// 
// Copyright (c) 2006 Mainsoft Co.
// 
// Permission is hereby granted, free of charge, to any person obtaining
// a copy of this software and associated documentation files (the
// "Software"), to deal in the Software without restriction, including
// without limitation the rights to use, copy, modify, merge, publish,
// distribute, sublicense, and/or sell copies of the Software, and to
// permit persons to whom the Software is furnished to do so, subject to
// the following conditions:
// 
// The above copyright notice and this permission notice shall be
// included in all copies or substantial portions of the Software.
// 
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
// NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
// LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
// OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
// WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
//

using System;
using System.Data;
using System.Data.OracleClient;

using MonoTests.System.Data.Utils;

using MonoTests.System.Data.Utils.Data;

using NUnit.Framework;

namespace MonoTests.System.Data.OracleClient
{
[TestFixture]
public class OracleDataReader_GetDecimal_I : ADONetTesterClass
{
	private int testTypesInvocations;
	private Exception exp = null;

	public static void Main()
	{
		OracleDataReader_GetDecimal_I tc = new OracleDataReader_GetDecimal_I();
		Exception exp = null;
		try
		{
			tc.BeginTest("OracleDataReader_GetDecimal_I");
			tc.run();
		}
		catch(Exception ex)
		{
			exp = ex;
		}
		finally	
		{
			tc.EndTest(exp);
		}
	}

	[Test]
	public void run()
	{
		DoTestTypes(ConnectedDataProvider.GetSimpleDbTypesParameters());
		DoTestTypes(ConnectedDataProvider.GetExtendedDbTypesParameters());
		DoTestTextualFieldsThatContainNumbers(ConnectedDataProvider.GetSimpleDbTypesParameters());
		DoTestTextualFieldsThatContainNumbers(ConnectedDataProvider.GetExtendedDbTypesParameters());
	}

	public void DoTestTypes(DbTypeParametersCollection row)
	{
		testTypesInvocations++;
		exp = null;
		string rowId = "43968_" + this.testTypesInvocations.ToString();
		OracleDataReader rdr = null;
		OracleConnection con = null;
		try
		{
			row.ExecuteInsert(rowId);
			row.ExecuteSelectReader(rowId, out rdr, out con);
			while (rdr.Read())
			{
				//Run over all the columns in the result set row.
				//For each column, try to read it as a Decimal.
				for (int i=0; i<row.Count; i++)
				{
					if (row[i].Value.GetType() == typeof(decimal) ||
						row[i].Value.GetType() == typeof(double)) //The value in the result set should be a Decimal.
					{
						try
						{
							BeginCase(string.Format("Calling GetDecimal() on a field of dbtype {0}", row[i].DbTypeName));
							decimal retDecimal = rdr.GetDecimal(i);
							Compare(row[i].Value, retDecimal);
						}
						catch (Exception ex)
						{
							exp = ex;
						}
						finally
						{
							EndCase(exp);
							exp = null;
						}
					}
					else //The value in the result set should NOT be Decimal. In this case an Invalid case exception should be thrown.
					{
						try
						{
							BeginCase(string.Format("Calling GetDecimal() on a field of dbtype {0}", row[i].DbTypeName));
							decimal retDecimal = rdr.GetDecimal(i);
							ExpectedExceptionNotCaught("InvalidCastException");
						}
						catch (InvalidCastException ex)
						{
							ExpectedExceptionCaught(ex);
						}
						catch (Exception ex)
						{
							exp = ex;
						}
						finally
						{
							EndCase(exp);
							exp = null;
						}
					}
				}
			}
		}
		finally
		{
			row.ExecuteDelete(rowId);
			if ( (rdr != null) && (!rdr.IsClosed) )
			{
				rdr.Close();
			}
			if ( (con != null) && (con.State != ConnectionState.Closed) )
			{
				con.Close();
			}
		}
	}

	public void DoTestTextualFieldsThatContainNumbers(DbTypeParametersCollection row)
	{
		//Leave only textual fields in the collection, and set their value to the string "10"
		SetTextualFieldsWithNumericValues(ref row);
		if (row.Count < 1)
		{
			return;
		}

		testTypesInvocations++;
		exp = null;
		string rowId = "43968_" + this.testTypesInvocations.ToString();
		OracleDataReader rdr = null;
		OracleConnection con = null;
		try
		{
			row.ExecuteInsert(rowId);
			row.ExecuteSelectReader(rowId, out rdr, out con);
			while (rdr.Read())
			{
				//Run over all the columns in the result set row.
				//For each column, try to read it as a Decimal.
				//Because all the fields are textual, this should throw an InvalidCastException.
				for (int i=0; i<row.Count; i++)
				{
					try
					{
						BeginCase(string.Format("Calling GetDecimal() on a textual field of dbtype {0} with value '{1}'", row[i].DbTypeName, row[i].Value));
						decimal retDecimal = rdr.GetDecimal(i);
						ExpectedExceptionNotCaught(typeof(InvalidCastException).FullName);
					}
					catch (InvalidCastException ex)
					{
						ExpectedExceptionCaught(ex);
					}
					catch (Exception ex)
					{
						exp = ex;
					}
					finally
					{
						EndCase(exp);
						exp = null;
					}
				}
			}
		}
		finally
		{
			row.ExecuteDelete(rowId);
			if ( (rdr != null) && (!rdr.IsClosed) )
			{
				rdr.Close();
			}
			if ( (con != null) && (con.State != ConnectionState.Closed) )
			{
				con.Close();
			}
		}
	}

	private void SetTextualFieldsWithNumericValues(ref DbTypeParametersCollection row)
	{
		DbTypeParametersCollection newRow = new DbTypeParametersCollection(row.TableName);
		
		foreach (DbTypeParameter current in row)
		{
			if (current.Value is string)
			{
				newRow.Add(current.DbTypeName, "10");
			}
		}

		row = newRow;
	}
}

}