office-gobmx/scaddins/source/analysis/analysishelper.hxx
Vincent LE GARREC 24552a0b5b tdf#124176 Use pragma once in s*
sc, scaddins, sccomp, scripting

Change-Id: Ia99fec9e238033821cb784810edd4762c09bd5db
Reviewed-on: https://gerrit.libreoffice.org/c/core/+/112049
Tested-by: Jenkins
Reviewed-by: Ilmari Lauhakangas <ilmari.lauhakangas@libreoffice.org>
2021-03-23 13:39:56 +01:00

908 lines
38 KiB
C++

/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
/*
* This file is part of the LibreOffice project.
*
* This Source Code Form is subject to the terms of the Mozilla Public
* License, v. 2.0. If a copy of the MPL was not distributed with this
* file, You can obtain one at http://mozilla.org/MPL/2.0/.
*
* This file incorporates work covered by the following license notice:
*
* Licensed to the Apache Software Foundation (ASF) under one or more
* contributor license agreements. See the NOTICE file distributed
* with this work for additional information regarding copyright
* ownership. The ASF licenses this file to you under the Apache
* License, Version 2.0 (the "License"); you may not use this file
* except in compliance with the License. You may obtain a copy of
* the License at http://www.apache.org/licenses/LICENSE-2.0 .
*/
#pragma once
#include <com/sun/star/uno/Reference.hxx>
#include <math.h>
#include <memory>
#include <vector>
namespace com::sun::star::beans { class XPropertySet; }
namespace com::sun::star::uno { class XComponentContext; }
namespace com::sun::star::util { class XNumberFormatter2; }
namespace sca::analysis {
class ScaAnyConverter;
#define PI 3.1415926535897932
inline bool IsLeapYear( sal_uInt16 nYear );
#ifdef DISABLE_DYNLOADING
// Avoid clash with the functions with same name in
// scaddins/source/datefunc/datefunc.cxx. I am not sure if each pair
// have identical semantics, but if yes, one copy should be enough,
// but what would be a suitable library where such functions could go?
// Or can the analysis library depend on the date library or the other
// way around?
#define DaysInMonth analysishelper_DaysInMonth
#define DateToDays analysishelper_DateToDays
#define DaysToDate analysishelper_DaysToDate
#define GetNullDate analysishelper_GetNullDate
#endif
sal_uInt16 DaysInMonth( sal_uInt16 nMonth, sal_uInt16 nYear );
sal_Int32 DateToDays( sal_uInt16 nDay, sal_uInt16 nMonth, sal_uInt16 nYear );
/// @throws css::lang::IllegalArgumentException
void DaysToDate( sal_Int32 nDays, sal_uInt16& rDay, sal_uInt16& rMonth, sal_uInt16& rYear );
/// @throws css::uno::RuntimeException
sal_Int32 GetNullDate( const css::uno::Reference< css::beans::XPropertySet >& xOptions );
sal_Int32 GetDiffDate360(
sal_uInt16 nDay1, sal_uInt16 nMonth1, sal_uInt16 nYear1, bool bLeapYear1,
sal_uInt16 nDay2, sal_uInt16 nMonth2, sal_uInt16 nYear2,
bool bUSAMethod );
inline sal_Int32 GetDiffDate360( const css::uno::Reference< css::beans::XPropertySet >& xOpt, sal_Int32 nDate1, sal_Int32 nDate2, bool bUSAMethod );
sal_Int32 GetDiffDate360( sal_Int32 nNullDate, sal_Int32 nDate1, sal_Int32 nDate2, bool bUSAMethod );
sal_Int32 GetDaysInYears( sal_uInt16 nYear1, sal_uInt16 nYear2 );
inline sal_Int16 GetDayOfWeek( sal_Int32 nDate );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
sal_Int32 GetDiffDate( sal_Int32 nNullDate, sal_Int32 nStartDate, sal_Int32 nEndDate, sal_Int32 nMode,
sal_Int32* pOptDaysIn1stYear );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double GetYearDiff( sal_Int32 nNullDate, sal_Int32 nStartDate, sal_Int32 nEndDate, sal_Int32 nMode );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
sal_Int32 GetDaysInYear( sal_Int32 nNullDate, sal_Int32 nDate, sal_Int32 nMode );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double GetYearFrac( sal_Int32 nNullDate, sal_Int32 nStartDate, sal_Int32 nEndDate, sal_Int32 nMode );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
inline double GetYearFrac( const css::uno::Reference< css::beans::XPropertySet >& xOpt, sal_Int32 nStartDate, sal_Int32 nEndDate, sal_Int32 nMode );
double BinomialCoefficient( double n, double k );
double GetGcd( double f1, double f2 );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double ConvertToDec( const OUString& rFromNum, sal_uInt16 nBaseFrom, sal_uInt16 nCharLim );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
OUString ConvertFromDec(
double fNum, double fMin, double fMax, sal_uInt16 nBase,
sal_Int32 nPlaces, sal_Int32 nMaxPlaces, bool bUsePlaces );
double Erf( double fX );
double Erfc( double fX );
bool ParseDouble( const sal_Unicode*& rpDoubleAsString, double& rReturn );
OUString GetString( double fNumber, bool bLeadingSign, sal_uInt16 nMaxNumOfDigits = 15 );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double GetAmordegrc( sal_Int32 nNullDate, double fCost, sal_Int32 nDate, sal_Int32 nFirstPer,
double fRestVal, double fPer, double fRate, sal_Int32 nBase );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double GetAmorlinc( sal_Int32 nNullDate, double fCost, sal_Int32 nDate, sal_Int32 nFirstPer,
double fRestVal, double fPer, double fRate, sal_Int32 nBase );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double GetDuration( sal_Int32 nNullDate, sal_Int32 nSettle, sal_Int32 nMat, double fCoup,
double fYield, sal_Int32 nFreq, sal_Int32 nBase );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double GetYieldmat( sal_Int32 nNullDate, sal_Int32 nSettle, sal_Int32 nMat, sal_Int32 nIssue,
double fRate, double fPrice, sal_Int32 nBase );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double GetOddfprice( sal_Int32 nNullDate, sal_Int32 nSettle, sal_Int32 nMat, sal_Int32 nIssue,
sal_Int32 nFirstCoup, double fRate, double fYield, double fRedemp,
sal_Int32 nFreq, sal_Int32 nBase );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double getYield_( sal_Int32 nNullDate, sal_Int32 nSettle, sal_Int32 nMat, double fCoup, double fPrice,
double fRedemp, sal_Int32 nFreq, sal_Int32 nBase );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double getPrice_( sal_Int32 nNullDate, sal_Int32 nSettle, sal_Int32 nMat, double fRate, double fYield,
double fRedemp, sal_Int32 nFreq, sal_Int32 nBase );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double GetOddfyield( sal_Int32 nNullDate, sal_Int32 nSettle, sal_Int32 nMat, sal_Int32 nIssue,
sal_Int32 nFirstCoup, double fRate, double fPrice, double fRedemp,
sal_Int32 nFreq, sal_Int32 nBase );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double GetOddlprice( sal_Int32 nNullDate, sal_Int32 nSettle, sal_Int32 nMat, sal_Int32 nLastInterest,
double fRate, double fYield, double fRedemp, sal_Int32 nFreq, sal_Int32 nBase );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double GetOddlyield( sal_Int32 nNullDate, sal_Int32 nSettle, sal_Int32 nMat, sal_Int32 nLastInterest,
double fRate, double fPrice, double fRedemp, sal_Int32 nFreq, sal_Int32 nBase );
double GetPmt( double fRate, double fNper, double fPv, double fFv, sal_Int32 nPayType );
double GetFv( double fRate, double fNper, double fPmt, double fPv, sal_Int32 nPayType );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double GetCouppcd( sal_Int32 nNullDate, sal_Int32 nSettle, sal_Int32 nMat, sal_Int32 nFreq,
sal_Int32 nBase );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double GetCoupncd( sal_Int32 nNullDate, sal_Int32 nSettle, sal_Int32 nMat, sal_Int32 nFreq,
sal_Int32 nBase );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double GetCoupdaybs( sal_Int32 nNullDate, sal_Int32 nSettle, sal_Int32 nMat, sal_Int32 nFreq,
sal_Int32 nBase );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double GetCoupdaysnc( sal_Int32 nNullDate, sal_Int32 nSettle, sal_Int32 nMat, sal_Int32 nFreq,
sal_Int32 nBase );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double GetCoupnum( sal_Int32 nNullDate, sal_Int32 nSettle, sal_Int32 nMat,
sal_Int32 nFreq, sal_Int32 nBase );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double GetCoupdays( sal_Int32 nNullDate, sal_Int32 nSettle, sal_Int32 nMat, sal_Int32 nFreq,
sal_Int32 nBase );
enum class FDCategory
{
DateTime,
Finance,
Inf,
Math,
Tech
};
struct FuncDataBase
{
const char* pIntName;
const char* pUINameID; // resource ID to UI name
const char** pDescrID; // resource ID to description, parameter names and ~ description
bool bDouble; // name already exist in Calc
bool bWithOpt; // first parameter is internal
const char** pCompListID; // list of valid names
sal_uInt16 nNumOfParams; // number of named / described parameters
FDCategory eCat; // function category
const char* pSuffix; // if bDouble, append a suffix other than "_ADD" for UI
};
class FuncData final
{
private:
OUString aIntName;
const char* pUINameID;
const char** pDescrID; // leads also to parameter descriptions!
bool bDouble; // flag for names that already exist in Calc
bool bWithOpt; // has internal parameter on first position
sal_uInt16 nParam; // num of parameters
std::vector<OUString> aCompList; // list of all valid names
FDCategory eCat; // function category
OUString aSuffix; // if bDouble and not empty, append a suffix other than "_ADD" for UI
public:
FuncData(const FuncDataBase& rBaseData);
inline const char* GetUINameID() const;
inline const char** GetDescrID() const;
inline bool IsDouble() const;
inline const OUString& GetSuffix() const;
sal_uInt16 GetStrIndex( sal_uInt16 nParamNum ) const;
inline bool Is( std::u16string_view rCompareTo ) const;
inline const std::vector<OUString> &
GetCompNameList() const;
inline FDCategory GetCategory() const;
};
typedef std::vector< FuncData > FuncDataList;
void InitFuncDataList(FuncDataList& rList);
// Predicate for use with std::find_if
struct FindFuncData
{
const OUString& m_rId;
explicit FindFuncData( const OUString& rId ) : m_rId(rId) {}
bool operator() ( FuncData const & rCandidate ) const { return rCandidate.Is(m_rId); }
};
/// sorted list with unique sal_Int32 values
class SortedIndividualInt32List final
{
private:
std::vector<sal_Int32> maVector;
void Insert( sal_Int32 nDay );
void Insert( sal_Int32 nDay, sal_Int32 nNullDate, bool bInsertOnWeekend );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Insert( double fDay, sal_Int32 nNullDate, bool bInsertOnWeekend );
/** @param rAnyConv must be an initialized ScaAnyConmverter
@param bInsertOnWeekend insertion mode: false = holidays on weekend are omitted
@throws css::uno::RuntimeException
@throws css::lang::IllegalArgumentException
*/
void InsertHolidayList(
const ScaAnyConverter& rAnyConv,
const css::uno::Any& rHolAny,
sal_Int32 nNullDate,
bool bInsertOnWeekend );
public:
SortedIndividualInt32List();
~SortedIndividualInt32List();
sal_uInt32 Count() const
{ return maVector.size(); }
/// @return element on position nIndex or 0 on invalid index
sal_Int32 Get( sal_uInt32 n ) const
{ return maVector[n]; }
/// @return true if nVal (internal date representation) is contained
bool Find( sal_Int32 nVal ) const;
/** @param rAnyConv is an initialized or uninitialized ScaAnyConverter
holidays on weekend are omitted
@throws css::uno::RuntimeException
@throws css::lang::IllegalArgumentException
*/
void InsertHolidayList(
ScaAnyConverter& rAnyConv,
const css::uno::Reference< css::beans::XPropertySet >& xOptions,
const css::uno::Any& rHolAny,
sal_Int32 nNullDate);
};
class ScaDoubleList
{
private:
std::vector<double> maVector;
protected:
void ListAppend( double fValue ) { maVector.push_back(fValue); }
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Append( double fValue )
{ if( CheckInsert( fValue ) ) ListAppend( fValue ); }
/** @param rAnyConv must be an initialized ScaAnyConmverter
@param bIgnoreEmpty handling of empty Any's/strings: false = inserted as 0.0; true = omitted
@throws css::uno::RuntimeException
@throws css::lang::IllegalArgumentException
*/
void Append(
const ScaAnyConverter& rAnyConv,
const css::uno::Any& rAny,
bool bIgnoreEmpty );
/** @param rAnyConv must be an initialized ScaAnyConmverter
@param bIgnoreEmpty handling of empty Any's/strings: false = inserted as 0.0; true = omitted
@throws css::uno::RuntimeException
@throws css::lang::IllegalArgumentException
*/
void Append(
const ScaAnyConverter& rAnyConv,
const css::uno::Sequence< css::uno::Any >& rAnySeq,
bool bIgnoreEmpty );
/** @param rAnyConv must be an initialized ScaAnyConmverter
@param bIgnoreEmpty handling of empty Any's/strings: false = inserted as 0.0; true = omitted
@throws css::uno::RuntimeException
@throws css::lang::IllegalArgumentException
*/
void Append(
const ScaAnyConverter& rAnyConv,
const css::uno::Sequence< css::uno::Sequence< css::uno::Any > >& rAnySeq,
bool bIgnoreEmpty );
public:
virtual ~ScaDoubleList() {}
sal_uInt32 Count() const
{ return maVector.size(); }
double Get( sal_uInt32 n ) const
{ return maVector[n]; }
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Append( const css::uno::Sequence< css::uno::Sequence< double > >& rValueArr );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Append( const css::uno::Sequence< css::uno::Sequence< sal_Int32 > >& rValueArr );
/** @param rAnyConv is an initialized or uninitialized ScaAnyConverter
@param bIgnoreEmpty handling of empty Any's/strings: false = inserted as 0.0; true = omitted
@throws css::uno::RuntimeException
@throws css::lang::IllegalArgumentException
*/
void Append(
ScaAnyConverter& rAnyConv,
const css::uno::Reference< css::beans::XPropertySet >& xOpt,
const css::uno::Sequence< css::uno::Any >& rAnySeq );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
virtual bool CheckInsert( double fValue ) const;
};
/// stores double values >0.0, throws exception for double values <0.0, does nothing for 0.0
class ScaDoubleListGT0 : public ScaDoubleList
{
public:
virtual bool CheckInsert( double fValue ) const override;
};
/// stores double values >=0.0, throws exception for double values <0.0
class ScaDoubleListGE0 : public ScaDoubleList
{
public:
virtual bool CheckInsert( double fValue ) const override;
};
class Complex
{
double r;
double i;
sal_Unicode c;
public:
inline Complex( double fReal, double fImag = 0.0, sal_Unicode cC = '\0' );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
explicit Complex( const OUString& rComplexAsString );
inline static bool IsImagUnit( sal_Unicode c );
static bool ParseString( const OUString& rComplexAsString, Complex& rReturn );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
OUString GetString() const;
inline double Real() const;
inline double Imag() const;
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double Arg() const;
inline double Abs() const;
// following functions change the complex number itself to avoid unnecessary copy actions!
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Power( double fPower );
void Sqrt();
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Sin();
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Cos();
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Div( const Complex& rDivisor );
void Exp();
inline void Conjugate();
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Ln();
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Log10();
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Log2();
inline void Mult( double fFact );
inline void Mult( const Complex& rMult );
inline void Sub( const Complex& rMult );
inline void Add( const Complex& rAdd );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Tan();
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Sec();
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Csc();
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Cot();
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Sinh();
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Cosh();
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Sech();
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Csch();
};
class ComplexList final
{
private:
std::vector<Complex> maVector;
public:
~ComplexList();
inline const Complex& Get( sal_uInt32 nIndex ) const;
bool empty() const
{ return maVector.empty(); }
sal_uInt32 Count() const
{ return maVector.size(); }
inline void Append( Complex&& pNew );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Append( const css::uno::Sequence< css::uno::Sequence< OUString > >& rComplexNumList );
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
void Append( const css::uno::Sequence< css::uno::Any >& aMultPars );
};
enum ConvertDataClass
{
CDC_Mass, CDC_Length, CDC_Time, CDC_Pressure, CDC_Force, CDC_Energy, CDC_Power, CDC_Magnetism,
CDC_Temperature, CDC_Volume, CDC_Area, CDC_Speed, CDC_Information
};
#define INV_MATCHLEV 1764 // guess, what this is... :-)
class ConvertData
{
protected:
friend class ConvertDataList;
double fConst;
OUString aName;
ConvertDataClass eClass;
bool bPrefixSupport;
public:
ConvertData(
const char pUnitName[],
double fConvertConstant,
ConvertDataClass eClass,
bool bPrefSupport = false );
virtual ~ConvertData();
sal_Int16 GetMatchingLevel( const OUString& rRef ) const;
// 0.0 = no equality
// 1.0 = matches exact
// rest = matches without an assumed prefix of one character
// rest gives power for 10 represented by the prefix (e.g. 3 for k or -9 for n
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
virtual double Convert( double fVal, const ConvertData& rTo,
sal_Int16 nMatchLevelFrom, sal_Int16 nMatchLevelTo ) const;
virtual double ConvertFromBase( double fVal, sal_Int16 nMatchLevel ) const;
inline ConvertDataClass Class() const;
};
class ConvertDataLinear final : public ConvertData
{
double fOffs;
public:
inline ConvertDataLinear(
const char pUnitName[],
double fConvertConstant,
double fConvertOffset,
ConvertDataClass eClass,
bool bPrefSupport = false );
virtual ~ConvertDataLinear() override;
virtual double Convert( double fVal, const ConvertData& rTo,
sal_Int16 nMatchLevelFrom, sal_Int16 nMatchLevelTo ) const override;
// for cases where f(x) = a + bx applies (e.g. Temperatures)
// converts fVal from this unit to rFrom unit
// throws exception if not from same class
// this implementation is for proportional cases only
double ConvertToBase( double fVal, sal_Int16 nMatchLevel ) const;
virtual double ConvertFromBase( double fVal, sal_Int16 nMatchLevel ) const override;
};
class ConvertDataList
{
private:
std::vector<std::unique_ptr<ConvertData>> maVector;
public:
ConvertDataList();
~ConvertDataList();
/// @throws css::uno::RuntimeException
/// @throws css::lang::IllegalArgumentException
double Convert( double fVal, const OUString& rFrom, const OUString& rTo );
};
inline bool IsLeapYear( sal_uInt16 n )
{
return ( (( ( n % 4 ) == 0 ) && ( ( n % 100 ) != 0)) || ( ( n % 400 ) == 0 ) );
}
inline sal_Int32 GetDiffDate360( const css::uno::Reference< css::beans::XPropertySet >& xOpt, sal_Int32 nDate1, sal_Int32 nDate2, bool bUSAMethod )
{
return GetDiffDate360( GetNullDate( xOpt ), nDate1, nDate2, bUSAMethod );
}
inline sal_Int16 GetDayOfWeek( sal_Int32 n )
{ // monday = 0, ..., sunday = 6
return static_cast< sal_Int16 >( ( n - 1 ) % 7 );
}
inline double GetYearFrac( const css::uno::Reference< css::beans::XPropertySet >& xOpt, sal_Int32 nStartDate, sal_Int32 nEndDate, sal_Int32 nMode )
{
return GetYearFrac( GetNullDate( xOpt ), nStartDate, nEndDate, nMode );
}
inline const char* FuncData::GetUINameID() const
{
return pUINameID;
}
inline const char** FuncData::GetDescrID() const
{
return pDescrID;
}
inline bool FuncData::IsDouble() const
{
return bDouble;
}
inline const OUString& FuncData::GetSuffix() const
{
return aSuffix;
}
inline bool FuncData::Is( std::u16string_view r ) const
{
return aIntName == r;
}
inline const std::vector<OUString> & FuncData::GetCompNameList() const
{
return aCompList;
}
inline FDCategory FuncData::GetCategory() const
{
return eCat;
}
inline Complex::Complex( double fReal, double fImag, sal_Unicode cC ) :
r( fReal ), i( fImag ), c( cC )
{
}
inline double Complex::Real() const
{
return r;
}
inline double Complex::Imag() const
{
return i;
}
inline double Complex::Abs() const
{
return sqrt( r * r + i * i );
}
void Complex::Conjugate()
{
i = -i;
}
inline void Complex::Mult( double f )
{
i *= f;
r *= f;
}
inline void Complex::Mult( const Complex& rM )
{
double r_ = r;
double i_ = i;
r = r_ * rM.r - i_ * rM.i;
i = r_ * rM.i + i_ * rM.r;
if( !c ) c = rM.c;
}
inline void Complex::Sub( const Complex& rC )
{
r -= rC.r;
i -= rC.i;
if( !c ) c = rC.c;
}
inline void Complex::Add( const Complex& rAdd )
{
r += rAdd.r;
i += rAdd.i;
if( !c ) c = rAdd.c;
}
inline const Complex& ComplexList::Get( sal_uInt32 n ) const
{
return maVector[n];
}
inline void ComplexList::Append( Complex&& p )
{
maVector.emplace_back(p);
}
inline ConvertDataClass ConvertData::Class() const
{
return eClass;
}
inline ConvertDataLinear::ConvertDataLinear( const char p[], double fC, double fO, ConvertDataClass e,
bool bPrefSupport ) :
ConvertData( p, fC, e, bPrefSupport ),
fOffs( fO )
{
}
/// Helper class for date calculation for various financial functions
class ScaDate
{
private:
sal_uInt16 nOrigDay; /// is the day of the original date.
sal_uInt16 nDay; /// is the calculated day depending on the current month/year.
sal_uInt16 nMonth; /// is the current month (one-based).
sal_uInt16 nYear; /// is the current year.
bool bLastDayMode : 1; /// if true, recalculate nDay after every calculation.
bool bLastDay : 1; /// is true, if original date was the last day in month.
bool b30Days : 1; /// is true, if every month has 30 days in calculations.
bool bUSMode : 1; /// is true, if the US method of 30-day-calculations is used.
/// Calculates nDay from nOrigDay and current date.
void setDay();
/// @return count of days in current month
inline sal_uInt16 getDaysInMonth() const;
/// @return count of days in given month
inline sal_uInt16 getDaysInMonth( sal_uInt16 _nMon ) const;
/// @ return count of days in the given month range
sal_Int32 getDaysInMonthRange( sal_uInt16 nFrom, sal_uInt16 nTo ) const;
/// @ return count of days in the given year range
sal_Int32 getDaysInYearRange( sal_uInt16 nFrom, sal_uInt16 nTo ) const;
/// Adds/subtracts the given count of years, does not adjust day.
///
/// @throws css::lang::IllegalArgumentException
void doAddYears( sal_Int32 nYearCount );
public:
ScaDate();
/** @param nBase
date handling mode (days in month / days in year):
0 = 30 days / 360 days (US NASD)
1 = exact / exact
2 = exact / 360
3 = exact / 365
4 = 30 days / 360 days (Europe)
5 = exact / exact (no last day adjustment) */
ScaDate( sal_Int32 nNullDate, sal_Int32 nDate, sal_Int32 nBase );
ScaDate( const ScaDate& rCopy );
ScaDate& operator=( const ScaDate& rCopy );
/// @return the current month.
sal_uInt16 getMonth() const { return nMonth; };
/// @return the current year.
sal_uInt16 getYear() const { return nYear; };
/// adds/subtracts the given count of months, adjusts day
///
/// @throws css::lang::IllegalArgumentException
void addMonths( sal_Int32 nMonthCount );
/// sets the given year, adjusts day
inline void setYear( sal_uInt16 nNewYear );
/// adds/subtracts the given count of years, adjusts day
///
/// @throws css::lang::IllegalArgumentException
inline void addYears( sal_Int32 nYearCount );
/// @return the internal number of the current date
sal_Int32 getDate( sal_Int32 nNullDate ) const;
/// @return the number of days between the two dates
///
/// @throws css::lang::IllegalArgumentException
static sal_Int32 getDiff( const ScaDate& rFrom, const ScaDate& rTo );
bool operator<( const ScaDate& rCmp ) const;
bool operator<=( const ScaDate& rCmp ) const { return !(rCmp < *this); }
bool operator>( const ScaDate& rCmp ) const { return rCmp < *this; }
bool operator>=( const ScaDate& rCmp ) const { return !(*this < rCmp); }
};
inline sal_uInt16 ScaDate::getDaysInMonth() const
{
return getDaysInMonth( nMonth );
}
inline sal_uInt16 ScaDate::getDaysInMonth( sal_uInt16 _nMon ) const
{
return b30Days ? 30 : DaysInMonth( _nMon, nYear );
}
inline void ScaDate::setYear( sal_uInt16 nNewYear )
{
nYear = nNewYear;
setDay();
}
inline void ScaDate::addYears( sal_Int32 nYearCount )
{
doAddYears( nYearCount );
setDay();
}
/// Helper class for Any->double conversion, using current language settings
class ScaAnyConverter
{
private:
css::uno::Reference< css::util::XNumberFormatter2 > xFormatter;
sal_Int32 nDefaultFormat;
bool bHasValidFormat;
/** Converts a string to double using the number formatter. If the formatter is not
valid, ::rtl::math::stringToDouble() with english separators will be used.
@throws css::lang::IllegalArgumentException
on strings not representing any double value.
@return the converted double value. */
double convertToDouble(
const OUString& rString ) const;
public:
explicit ScaAnyConverter(
const css::uno::Reference< css::uno::XComponentContext >& xContext );
~ScaAnyConverter();
/// Initializing with current language settings
///
/// @throws css::uno::RuntimeException
void init(
const css::uno::Reference< css::beans::XPropertySet >& xPropSet );
/** Converts an Any to double (without initialization).
The Any can be empty or contain a double or string.
@throws css::lang::IllegalArgumentException
on other Any types or on invalid strings.
@return true if the Any contains a double or a non-empty valid string,
false if the Any is empty or the string is empty */
bool getDouble(
double& rfResult,
const css::uno::Any& rAny ) const;
/** Converts an Any to double (with initialization).
The Any can be empty or contain a double or string.
@throws css::lang::IllegalArgumentException
on other Any types or on invalid strings.
@return true if the Any contains a double or a non-empty valid string,
false if the Any is empty or the string is empty */
bool getDouble(
double& rfResult,
const css::uno::Reference< css::beans::XPropertySet >& xPropSet,
const css::uno::Any& rAny );
/** Converts an Any to double (with initialization).
The Any can be empty or contain a double or string.
@throws css::lang::IllegalArgumentException
on other Any types or on invalid strings.
@return the value of the double or string or fDefault if the Any or string is empty */
double getDouble(
const css::uno::Reference< css::beans::XPropertySet >& xPropSet,
const css::uno::Any& rAny,
double fDefault );
/** Converts an Any to sal_Int32 (with initialization).
The Any can be empty or contain a double or string.
@throws css::lang::IllegalArgumentException
on other Any types or on invalid values or strings.
@return true if the Any contains a double or a non-empty valid string,
false if the Any is empty or the string is empty */
bool getInt32(
sal_Int32& rnResult,
const css::uno::Reference< css::beans::XPropertySet >& xPropSet,
const css::uno::Any& rAny );
/** Converts an Any to sal_Int32 (with initialization).
The Any can be empty or contain a double or string.
@throws css::lang::IllegalArgumentException
on other Any types or on invalid values or strings.
@return the truncated value of the double or string or nDefault if the Any or string is empty */
sal_Int32 getInt32(
const css::uno::Reference< css::beans::XPropertySet >& xPropSet,
const css::uno::Any& rAny,
sal_Int32 nDefault );
};
}
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */