connectivity/source/drivers/file/FNumericFunctions.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: FNumericFunctions.cxx,v $
  10  * $Revision: 1.8 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_connectivity.hxx"
  33
  34 #include <cmath>
  35 #include "file/FNumericFunctions.hxx"
  36 #include <rtl/math.hxx>
  37
  38 using namespace connectivity;
  39 using namespace connectivity::file;
  40 //------------------------------------------------------------------
  41 ORowSetValue OOp_Abs::operate(const ORowSetValue& lhs) const
  42 {
  43     if ( lhs.isNull() )
  44         return lhs;
  45
  46     double nVal(lhs);
  47     if ( nVal < 0 )
  48         nVal *= -1.0;
  49     return fabs(nVal);
  50 }
  51 //------------------------------------------------------------------
  52 ORowSetValue OOp_Sign::operate(const ORowSetValue& lhs) const
  53 {
  54     if ( lhs.isNull() )
  55         return lhs;
  56
  57     sal_Int32 nRet = 0;
  58     double nVal(lhs);
  59     if ( nVal < 0 )
  60         nRet = -1;
  61     else if ( nVal > 0 )
  62         nRet = 1;
  63
  64     return nRet;
  65 }
  66 //------------------------------------------------------------------
  67 ORowSetValue OOp_Mod::operate(const ORowSetValue& lhs,const ORowSetValue& rhs) const
  68 {
  69     if ( lhs.isNull() || rhs.isNull() )
  70         return ORowSetValue();
  71
  72     return fmod((double)lhs,(double)rhs);
  73 }
  74 //------------------------------------------------------------------
  75 ORowSetValue OOp_Floor::operate(const ORowSetValue& lhs) const
  76 {
  77     if ( lhs.isNull() )
  78         return lhs;
  79
  80     return floor((double)lhs);
  81 }
  82 // -----------------------------------------------------------------------------
  83 ORowSetValue OOp_Ceiling::operate(const ORowSetValue& lhs) const
  84 {
  85     if ( lhs.isNull() )
  86         return lhs;
  87
  88     double nVal(lhs);
  89     return ceil(nVal);
  90 }
  91 // -----------------------------------------------------------------------------
  92 ORowSetValue OOp_Round::operate(const ::std::vector<ORowSetValue>& lhs) const
  93 {
  94     if ( lhs.empty() || lhs.size() > 2 )
  95         return ORowSetValue();
  96
  97     size_t nSize = lhs.size();
  98     double nVal = lhs[nSize-1];
  99
 100     sal_Int32 nDec = 0;
 101     if ( nSize == 2 && !lhs[0].isNull() )
 102         nDec = lhs[0];
 103     return ::rtl::math::round(nVal,nDec);
 104 }
 105 // -----------------------------------------------------------------------------
 106 ORowSetValue OOp_Exp::operate(const ORowSetValue& lhs) const
 107 {
 108     if ( lhs.isNull() )
 109         return lhs;
 110
 111     double nVal(lhs);
 112     return exp(nVal);
 113 }
 114 // -----------------------------------------------------------------------------
 115 ORowSetValue OOp_Ln::operate(const ORowSetValue& lhs) const
 116 {
 117     if ( lhs.isNull() || static_cast<double>(lhs) < 0.0 )
 118         return lhs;
 119
 120     double nVal(lhs);
 121     nVal = log(nVal);
 122     if ( rtl::math::isNan(nVal) )
 123         return ORowSetValue();
 124     return nVal;
 125 }
 126 // -----------------------------------------------------------------------------
 127 ORowSetValue OOp_Log::operate(const ::std::vector<ORowSetValue>& lhs) const
 128 {
 129     if ( lhs.empty() || lhs.size() > 2 )
 130         return ORowSetValue();
 131     size_t nSize = lhs.size();
 132     double nVal = log( (double)lhs[nSize-1] );
 133
 134
 135     if ( nSize == 2 && !lhs[0].isNull() )
 136         nVal /= log((double)lhs[0]);
 137
 138     if ( rtl::math::isNan(nVal) )
 139         return ORowSetValue();
 140     return nVal;
 141 }
 142 // -----------------------------------------------------------------------------
 143 ORowSetValue OOp_Log10::operate(const ORowSetValue& lhs) const
 144 {
 145     if ( lhs.isNull() || static_cast<double>(lhs) < 0.0 )
 146         return lhs;
 147
 148     double nVal = log((double)lhs);
 149     if ( rtl::math::isNan(nVal) )
 150         return ORowSetValue();
 151     nVal /= log(10.0);
 152     return nVal;
 153 }
 154 // -----------------------------------------------------------------------------
 155 ORowSetValue OOp_Pow::operate(const ORowSetValue& lhs,const ORowSetValue& rhs) const
 156 {
 157     if ( lhs.isNull() || rhs.isNull() )
 158         return lhs;
 159
 160     return pow((double)lhs,(double)rhs);
 161 }
 162 //------------------------------------------------------------------
 163 ORowSetValue OOp_Sqrt::operate(const ORowSetValue& lhs) const
 164 {
 165     if ( lhs.isNull() )
 166         return lhs;
 167
 168     double nVal = sqrt((double)lhs);
 169     if ( rtl::math::isNan(nVal) )
 170         return ORowSetValue();
 171     return nVal;
 172 }
 173 // -----------------------------------------------------------------------------
 174 ORowSetValue OOp_Pi::operate(const ::std::vector<ORowSetValue>& /*lhs*/) const
 175 {
 176     return 3.141592653589793116;
 177 }
 178 // -----------------------------------------------------------------------------
 179 ORowSetValue OOp_Cos::operate(const ORowSetValue& lhs) const
 180 {
 181     if ( lhs.isNull() )
 182         return lhs;
 183
 184     return cos((double)lhs);
 185 }
 186 // -----------------------------------------------------------------------------
 187 ORowSetValue OOp_Sin::operate(const ORowSetValue& lhs) const
 188 {
 189     if ( lhs.isNull() )
 190         return lhs;
 191
 192     return sin((double)lhs);
 193 }
 194 // -----------------------------------------------------------------------------
 195 ORowSetValue OOp_Tan::operate(const ORowSetValue& lhs) const
 196 {
 197     if ( lhs.isNull() )
 198         return lhs;
 199
 200     return tan((double)lhs);
 201 }
 202 // -----------------------------------------------------------------------------
 203 ORowSetValue OOp_ACos::operate(const ORowSetValue& lhs) const
 204 {
 205     if ( lhs.isNull() )
 206         return lhs;
 207
 208     return acos((double)lhs);
 209 }
 210 // -----------------------------------------------------------------------------
 211 ORowSetValue OOp_ASin::operate(const ORowSetValue& lhs) const
 212 {
 213     if ( lhs.isNull() )
 214         return lhs;
 215
 216     return asin((double)lhs);
 217 }
 218 // -----------------------------------------------------------------------------
 219 ORowSetValue OOp_ATan::operate(const ORowSetValue& lhs) const
 220 {
 221     if ( lhs.isNull() )
 222         return lhs;
 223
 224     return atan((double)lhs);
 225 }
 226 // -----------------------------------------------------------------------------
 227 ORowSetValue OOp_ATan2::operate(const ORowSetValue& lhs,const ORowSetValue& rhs) const
 228 {
 229     if ( lhs.isNull() || rhs.isNull() )
 230         return lhs;
 231
 232     return atan2((double)lhs,(double)rhs);
 233 }
 234 // -----------------------------------------------------------------------------
 235 ORowSetValue OOp_Degrees::operate(const ORowSetValue& lhs) const
 236 {
 237     if ( lhs.isNull() )
 238         return lhs;
 239
 240     double nLhs = lhs;
 241     return nLhs*180*(1.0/3.141592653589793116);
 242 }
 243 // -----------------------------------------------------------------------------
 244 ORowSetValue OOp_Radians::operate(const ORowSetValue& lhs) const
 245 {
 246     if ( lhs.isNull() )
 247         return lhs;
 248
 249     double nLhs = lhs;
 250     return nLhs*3.141592653589793116*(1.0/180.0);
 251 }
 252 // -----------------------------------------------------------------------------