|
// Licensed to the .NET Foundation under one or more agreements.
// The .NET Foundation licenses this file to you under the MIT license.
using System.Collections;
using System.Data.SqlTypes;
using System.Diagnostics;
using System.Diagnostics.CodeAnalysis;
using System.IO;
using System.Xml;
using System.Xml.Serialization;
namespace System.Data.Common
{
internal sealed class SqlDoubleStorage : DataStorage
{
private SqlDouble[] _values = default!; // Late-initialized
public SqlDoubleStorage(DataColumn column)
: base(column, typeof(SqlDouble), SqlDouble.Null, SqlDouble.Null, StorageType.SqlDouble)
{
}
public override object Aggregate(int[] records, AggregateType kind)
{
bool hasData = false;
try
{
switch (kind)
{
case AggregateType.Sum:
SqlDouble sum = 0.0d;
foreach (int record in records)
{
if (IsNull(record))
continue;
checked { sum += _values[record]; }
hasData = true;
}
if (hasData)
{
return sum;
}
return _nullValue;
case AggregateType.Mean:
SqlDouble meanSum = 0.0d;
int meanCount = 0;
foreach (int record in records)
{
if (IsNull(record))
continue;
checked { meanSum += _values[record]; }
meanCount++;
hasData = true;
}
if (hasData)
{
SqlDouble mean = 0.0d;
checked { mean = (meanSum / meanCount); }
return mean;
}
return _nullValue;
case AggregateType.Var:
case AggregateType.StDev:
int count = 0;
SqlDouble var = 0.0d;
SqlDouble prec = 0.0d;
SqlDouble dsum = 0.0d;
SqlDouble sqrsum = 0.0d;
foreach (int record in records)
{
if (IsNull(record))
continue;
dsum += _values[record];
sqrsum += _values[record] * _values[record];
count++;
}
if (count > 1)
{
var = count * sqrsum - (dsum * dsum);
prec = var / (dsum * dsum);
// we are dealing with the risk of a cancellation error
// double is guaranteed only for 15 digits so a difference
// with a result less than 1e-15 should be considered as zero
if ((prec < 1e-15) || (var < 0))
var = 0;
else
var /= (count * (count - 1));
if (kind == AggregateType.StDev)
{
return Math.Sqrt(var.Value);
}
return var;
}
return _nullValue;
case AggregateType.Min:
SqlDouble min = SqlDouble.MaxValue;
for (int i = 0; i < records.Length; i++)
{
int record = records[i];
if (IsNull(record))
continue;
if ((SqlDouble.LessThan(_values[record], min)).IsTrue)
min = _values[record];
hasData = true;
}
if (hasData)
{
return min;
}
return _nullValue;
case AggregateType.Max:
SqlDouble max = SqlDouble.MinValue;
for (int i = 0; i < records.Length; i++)
{
int record = records[i];
if (IsNull(record))
continue;
if ((SqlDouble.GreaterThan(_values[record], max)).IsTrue)
max = _values[record];
hasData = true;
}
if (hasData)
{
return max;
}
return _nullValue;
case AggregateType.First: // Does not seem to be implemented
if (records.Length > 0)
{
return _values[records[0]];
}
return null!; // no data => null
case AggregateType.Count:
count = 0;
for (int i = 0; i < records.Length; i++)
{
if (!IsNull(records[i]))
count++;
}
return count;
}
}
catch (OverflowException)
{
throw ExprException.Overflow(typeof(SqlDouble));
}
throw ExceptionBuilder.AggregateException(kind, _dataType);
}
public override int Compare(int recordNo1, int recordNo2)
{
return _values[recordNo1].CompareTo(_values[recordNo2]);
}
public override int CompareValueTo(int recordNo, object? value)
{
Debug.Assert(null != value, "null value");
return _values[recordNo].CompareTo((SqlDouble)value);
}
public override object ConvertValue(object? value)
{
if (null != value)
{
return SqlConvert.ConvertToSqlDouble(value);
}
return _nullValue;
}
public override void Copy(int recordNo1, int recordNo2)
{
_values[recordNo2] = _values[recordNo1];
}
public override object Get(int record)
{
return _values[record];
}
public override bool IsNull(int record)
{
return (_values[record].IsNull);
}
public override void Set(int record, object value)
{
_values[record] = SqlConvert.ConvertToSqlDouble(value);
}
public override void SetCapacity(int capacity)
{
Array.Resize(ref _values, capacity);
}
[RequiresUnreferencedCode(DataSet.RequiresUnreferencedCodeMessage)]
public override object ConvertXmlToObject(string s)
{
SqlDouble newValue = default;
string tempStr = string.Concat("<col>", s, "</col>"); // this is done since you can give fragment to reader
StringReader strReader = new StringReader(tempStr);
IXmlSerializable tmp = newValue;
using (XmlTextReader xmlTextReader = new XmlTextReader(strReader))
{
tmp.ReadXml(xmlTextReader);
}
return ((SqlDouble)tmp);
}
[RequiresUnreferencedCode(DataSet.RequiresUnreferencedCodeMessage)]
public override string ConvertObjectToXml(object value)
{
Debug.Assert(!DataStorage.IsObjectNull(value), "we shouldn't have null here");
Debug.Assert((value.GetType() == typeof(SqlDouble)), "wrong input type");
StringWriter strwriter = new StringWriter(FormatProvider);
using (XmlTextWriter xmlTextWriter = new XmlTextWriter(strwriter))
{
((IXmlSerializable)value).WriteXml(xmlTextWriter);
}
return (strwriter.ToString());
}
protected override object GetEmptyStorage(int recordCount)
{
return new SqlDouble[recordCount];
}
protected override void CopyValue(int record, object store, BitArray nullbits, int storeIndex)
{
SqlDouble[] typedStore = (SqlDouble[])store;
typedStore[storeIndex] = _values[record];
nullbits.Set(storeIndex, IsNull(record));
}
protected override void SetStorage(object store, BitArray nullbits)
{
_values = (SqlDouble[])store;
//SetNullStorage(nullbits);
}
}
}
|