LCOV - code coverage report
Current view: top level - sc/source/core/data - dputil.cxx (source / functions) Hit Total Coverage
Test: commit 10e77ab3ff6f4314137acd6e2702a6e5c1ce1fae Lines: 121 179 67.6 %
Date: 2014-11-03 Functions: 16 18 88.9 %
Legend: Lines: hit not hit

          Line data    Source code
       1             : /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
       2             : /*
       3             :  * This file is part of the LibreOffice project.
       4             :  *
       5             :  * This Source Code Form is subject to the terms of the Mozilla Public
       6             :  * License, v. 2.0. If a copy of the MPL was not distributed with this
       7             :  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
       8             :  */
       9             : 
      10             : #include "dputil.hxx"
      11             : #include "dpitemdata.hxx"
      12             : #include "dpnumgroupinfo.hxx"
      13             : #include "globalnames.hxx"
      14             : #include "globstr.hrc"
      15             : 
      16             : #include <comphelper/string.hxx>
      17             : #include <unotools/localedatawrapper.hxx>
      18             : #include <unotools/calendarwrapper.hxx>
      19             : #include <svl/zforlist.hxx>
      20             : #include <rtl/math.hxx>
      21             : 
      22             : #include <com/sun/star/sheet/DataPilotFieldGroupBy.hpp>
      23             : #include <com/sun/star/i18n/CalendarDisplayIndex.hpp>
      24             : 
      25             : using namespace com::sun::star;
      26             : 
      27             : namespace {
      28             : 
      29             : const sal_uInt16 SC_DP_LEAPYEAR = 1648;     // arbitrary leap year for date calculations
      30             : 
      31           0 : OUString getTwoDigitString(sal_Int32 nValue)
      32             : {
      33           0 :     OUString aRet = OUString::number( nValue );
      34           0 :     if ( aRet.getLength() < 2 )
      35           0 :         aRet = "0" + aRet;
      36           0 :     return aRet;
      37             : }
      38             : 
      39          20 : void appendDateStr(OUStringBuffer& rBuffer, double fValue, SvNumberFormatter* pFormatter)
      40             : {
      41          20 :     sal_uLong nFormat = pFormatter->GetStandardFormat( NUMBERFORMAT_DATE, ScGlobal::eLnge );
      42          20 :     OUString aString;
      43          20 :     pFormatter->GetInputLineString(fValue, nFormat, aString);
      44          20 :     rBuffer.append(aString);
      45          20 : }
      46             : 
      47          20 : OUString getSpecialDateName(double fValue, bool bFirst, SvNumberFormatter* pFormatter)
      48             : {
      49          20 :     OUStringBuffer aBuffer;
      50          20 :     aBuffer.append( bFirst ? '<' : '>' );
      51          20 :     appendDateStr(aBuffer, fValue, pFormatter);
      52          20 :     return aBuffer.makeStringAndClear();
      53             : }
      54             : 
      55             : }
      56             : 
      57         314 : bool ScDPUtil::isDuplicateDimension(const OUString& rName)
      58             : {
      59         314 :     return rName.endsWith("*");
      60             : }
      61             : 
      62        1702 : OUString ScDPUtil::getSourceDimensionName(const OUString& rName)
      63             : {
      64        1702 :     return comphelper::string::stripEnd(rName, '*');
      65             : }
      66             : 
      67           8 : sal_uInt8 ScDPUtil::getDuplicateIndex(const OUString& rName)
      68             : {
      69             :     // Count all trailing '*'s.
      70             : 
      71           8 :     sal_Int32 n = rName.getLength();
      72           8 :     if (!n)
      73           0 :         return 0;
      74             : 
      75           8 :     sal_uInt8 nDupCount = 0;
      76           8 :     const sal_Unicode* p = rName.getStr();
      77           8 :     const sal_Unicode* pStart = p;
      78           8 :     p += n-1; // Set it to the last char.
      79          10 :     for (; p != pStart; --p, ++nDupCount)
      80             :     {
      81          10 :         if (*p != '*')
      82           8 :             break;
      83             :     }
      84             : 
      85           8 :     return nDupCount;
      86             : }
      87             : 
      88           8 : OUString ScDPUtil::createDuplicateDimensionName(const OUString& rOriginal, size_t nDupCount)
      89             : {
      90           8 :     if (!nDupCount)
      91           0 :         return rOriginal;
      92             : 
      93           8 :     OUStringBuffer aBuf(rOriginal);
      94          16 :     for (size_t i = 0; i < nDupCount; ++i)
      95           8 :         aBuf.append('*');
      96             : 
      97           8 :     return aBuf.makeStringAndClear();
      98             : }
      99             : 
     100        1592 : OUString ScDPUtil::getDateGroupName(
     101             :         sal_Int32 nDatePart, sal_Int32 nValue, SvNumberFormatter* pFormatter,
     102             :         double fStart, double fEnd)
     103             : {
     104        1592 :     if (nValue == ScDPItemData::DateFirst)
     105          10 :         return getSpecialDateName(fStart, true, pFormatter);
     106        1582 :     if (nValue == ScDPItemData::DateLast)
     107          10 :         return getSpecialDateName(fEnd, false, pFormatter);
     108             : 
     109        1572 :     switch ( nDatePart )
     110             :     {
     111             :         case sheet::DataPilotFieldGroupBy::YEARS:
     112          20 :             return OUString::number(nValue);
     113             :         case sheet::DataPilotFieldGroupBy::QUARTERS:
     114          24 :             return ScGlobal::pLocaleData->getQuarterAbbreviation(sal_Int16(nValue-1));    // nValue is 1-based
     115             :         case com::sun::star::sheet::DataPilotFieldGroupBy::MONTHS:
     116             :             return ScGlobal::GetCalendar()->getDisplayName(
     117          64 :                         i18n::CalendarDisplayIndex::MONTH, sal_Int16(nValue-1), 0);    // 0-based, get short name
     118             :         case sheet::DataPilotFieldGroupBy::DAYS:
     119             :         {
     120        1464 :             Date aDate(1, 1, SC_DP_LEAPYEAR);
     121        1464 :             aDate += (nValue - 1);            // nValue is 1-based
     122        1464 :             Date aNullDate = *pFormatter->GetNullDate();
     123        1464 :             long nDays = aDate - aNullDate;
     124             : 
     125        1464 :             sal_uLong nFormat = pFormatter->GetFormatIndex(NF_DATE_SYS_DDMMM, ScGlobal::eLnge);
     126             :             Color* pColor;
     127        1464 :             OUString aStr;
     128        1464 :             pFormatter->GetOutputString(nDays, nFormat, aStr, &pColor);
     129        1464 :             return aStr;
     130             :         }
     131             :         case sheet::DataPilotFieldGroupBy::HOURS:
     132             :         {
     133             :             //! allow am/pm format?
     134           0 :             return getTwoDigitString(nValue);
     135             :         }
     136             :         break;
     137             :         case sheet::DataPilotFieldGroupBy::MINUTES:
     138             :         case sheet::DataPilotFieldGroupBy::SECONDS:
     139             :         {
     140           0 :             OUStringBuffer aBuf(ScGlobal::pLocaleData->getTimeSep());
     141           0 :             aBuf.append(getTwoDigitString(nValue));
     142           0 :             return aBuf.makeStringAndClear();
     143             :         }
     144             :         break;
     145             :         default:
     146             :             OSL_FAIL("invalid date part");
     147             :     }
     148             : 
     149           0 :     return OUString("FIXME: unhandled value");
     150             : }
     151             : 
     152          36 : double ScDPUtil::getNumGroupStartValue(double fValue, const ScDPNumGroupInfo& rInfo)
     153             : {
     154          36 :     if (fValue < rInfo.mfStart && !rtl::math::approxEqual(fValue, rInfo.mfStart))
     155             :     {
     156          12 :         rtl::math::setInf(&fValue, true);
     157          12 :         return fValue;
     158             :     }
     159             : 
     160          24 :     if (fValue > rInfo.mfEnd && !rtl::math::approxEqual(fValue, rInfo.mfEnd))
     161             :     {
     162          12 :         rtl::math::setInf(&fValue, false);
     163          12 :         return fValue;
     164             :     }
     165             : 
     166          12 :     double fDiff = fValue - rInfo.mfStart;
     167          12 :     double fDiv = rtl::math::approxFloor( fDiff / rInfo.mfStep );
     168          12 :     double fGroupStart = rInfo.mfStart + fDiv * rInfo.mfStep;
     169             : 
     170          12 :     if (rtl::math::approxEqual(fGroupStart, rInfo.mfEnd) &&
     171           0 :         !rtl::math::approxEqual(fGroupStart, rInfo.mfStart))
     172             :     {
     173           0 :         if (!rInfo.mbDateValues)
     174             :         {
     175             :             // A group that would consist only of the end value is not
     176             :             // created, instead the value is included in the last group
     177             :             // before. So the previous group is used if the calculated group
     178             :             // start value is the selected end value.
     179             : 
     180           0 :             fDiv -= 1.0;
     181           0 :             return rInfo.mfStart + fDiv * rInfo.mfStep;
     182             :         }
     183             : 
     184             :         // For date values, the end value is instead treated as above the
     185             :         // limit if it would be a group of its own.
     186             : 
     187           0 :         return rInfo.mfEnd + rInfo.mfStep;
     188             :     }
     189             : 
     190          12 :     return fGroupStart;
     191             : }
     192             : 
     193             : namespace {
     194             : 
     195           0 : void lcl_AppendDateStr( OUStringBuffer& rBuffer, double fValue, SvNumberFormatter* pFormatter )
     196             : {
     197           0 :     sal_uLong nFormat = pFormatter->GetStandardFormat( NUMBERFORMAT_DATE, ScGlobal::eLnge );
     198           0 :     OUString aString;
     199           0 :     pFormatter->GetInputLineString( fValue, nFormat, aString );
     200           0 :     rBuffer.append( aString );
     201           0 : }
     202             : 
     203           8 : OUString lcl_GetSpecialNumGroupName( double fValue, bool bFirst, sal_Unicode cDecSeparator,
     204             :     bool bDateValues, SvNumberFormatter* pFormatter )
     205             : {
     206             :     OSL_ENSURE( cDecSeparator != 0, "cDecSeparator not initialized" );
     207             : 
     208           8 :     OUStringBuffer aBuffer;
     209           8 :     aBuffer.append( bFirst ? '<' : '>' );
     210           8 :     if ( bDateValues )
     211           0 :         lcl_AppendDateStr( aBuffer, fValue, pFormatter );
     212             :     else
     213             :         rtl::math::doubleToUStringBuffer( aBuffer, fValue, rtl_math_StringFormat_Automatic,
     214           8 :         rtl_math_DecimalPlaces_Max, cDecSeparator, true );
     215           8 :     return aBuffer.makeStringAndClear();
     216             : }
     217             : 
     218          12 : OUString lcl_GetNumGroupName(
     219             :     double fStartValue, const ScDPNumGroupInfo& rInfo, sal_Unicode cDecSep,
     220             :     SvNumberFormatter* pFormatter)
     221             : {
     222             :     OSL_ENSURE( cDecSep != 0, "cDecSeparator not initialized" );
     223             : 
     224          12 :     double fStep = rInfo.mfStep;
     225          12 :     double fEndValue = fStartValue + fStep;
     226          12 :     if (rInfo.mbIntegerOnly && (rInfo.mbDateValues || !rtl::math::approxEqual(fEndValue, rInfo.mfEnd)))
     227             :     {
     228             :         //  The second number of the group label is
     229             :         //  (first number + size - 1) if there are only integer numbers,
     230             :         //  (first number + size) if any non-integer numbers are involved.
     231             :         //  Exception: The last group (containing the end value) is always
     232             :         //  shown as including the end value (but not for dates).
     233             : 
     234           8 :         fEndValue -= 1.0;
     235             :     }
     236             : 
     237          12 :     if ( fEndValue > rInfo.mfEnd && !rInfo.mbAutoEnd )
     238             :     {
     239             :         // limit the last group to the end value
     240             : 
     241           0 :         fEndValue = rInfo.mfEnd;
     242             :     }
     243             : 
     244          12 :     OUStringBuffer aBuffer;
     245          12 :     if ( rInfo.mbDateValues )
     246             :     {
     247           0 :         lcl_AppendDateStr( aBuffer, fStartValue, pFormatter );
     248           0 :         aBuffer.appendAscii( " - " );   // with spaces
     249           0 :         lcl_AppendDateStr( aBuffer, fEndValue, pFormatter );
     250             :     }
     251             :     else
     252             :     {
     253             :         rtl::math::doubleToUStringBuffer( aBuffer, fStartValue, rtl_math_StringFormat_Automatic,
     254          12 :             rtl_math_DecimalPlaces_Max, cDecSep, true );
     255          12 :         aBuffer.append( '-' );
     256             :         rtl::math::doubleToUStringBuffer( aBuffer, fEndValue, rtl_math_StringFormat_Automatic,
     257          12 :             rtl_math_DecimalPlaces_Max, cDecSep, true );
     258             :     }
     259             : 
     260          12 :     return aBuffer.makeStringAndClear();
     261             : }
     262             : 
     263             : }
     264             : 
     265          20 : OUString ScDPUtil::getNumGroupName(
     266             :     double fValue, const ScDPNumGroupInfo& rInfo, sal_Unicode cDecSep, SvNumberFormatter* pFormatter)
     267             : {
     268          20 :     if ( fValue < rInfo.mfStart && !rtl::math::approxEqual( fValue, rInfo.mfStart ) )
     269           4 :         return lcl_GetSpecialNumGroupName( rInfo.mfStart, true, cDecSep, rInfo.mbDateValues, pFormatter );
     270             : 
     271          16 :     if ( fValue > rInfo.mfEnd && !rtl::math::approxEqual( fValue, rInfo.mfEnd ) )
     272           4 :         return lcl_GetSpecialNumGroupName( rInfo.mfEnd, false, cDecSep, rInfo.mbDateValues, pFormatter );
     273             : 
     274          12 :     double fDiff = fValue - rInfo.mfStart;
     275          12 :     double fDiv = rtl::math::approxFloor( fDiff / rInfo.mfStep );
     276          12 :     double fGroupStart = rInfo.mfStart + fDiv * rInfo.mfStep;
     277             : 
     278          12 :     if ( rtl::math::approxEqual( fGroupStart, rInfo.mfEnd ) &&
     279           0 :         !rtl::math::approxEqual( fGroupStart, rInfo.mfStart ) )
     280             :     {
     281           0 :         if (rInfo.mbDateValues)
     282             :         {
     283             :             //  For date values, the end value is instead treated as above the limit
     284             :             //  if it would be a group of its own.
     285           0 :             return lcl_GetSpecialNumGroupName( rInfo.mfEnd, false, cDecSep, rInfo.mbDateValues, pFormatter );
     286             :         }
     287             :     }
     288             : 
     289          12 :     return lcl_GetNumGroupName(fGroupStart, rInfo, cDecSep, pFormatter);
     290             : }
     291             : 
     292         108 : sal_Int32 ScDPUtil::getDatePartValue(
     293             :     double fValue, const ScDPNumGroupInfo* pInfo, sal_Int32 nDatePart,
     294             :     SvNumberFormatter* pFormatter)
     295             : {
     296             :     // Start and end are inclusive
     297             :     // (End date without a time value is included, with a time value it's not)
     298             : 
     299         108 :     if (pInfo)
     300             :     {
     301          96 :         if (fValue < pInfo->mfStart && !rtl::math::approxEqual(fValue, pInfo->mfStart))
     302           0 :             return ScDPItemData::DateFirst;
     303          96 :         if (fValue > pInfo->mfEnd && !rtl::math::approxEqual(fValue, pInfo->mfEnd))
     304           0 :             return ScDPItemData::DateLast;
     305             :     }
     306             : 
     307         108 :     sal_Int32 nResult = 0;
     308             : 
     309         108 :     if (nDatePart == sheet::DataPilotFieldGroupBy::HOURS ||
     310         108 :         nDatePart == sheet::DataPilotFieldGroupBy::MINUTES ||
     311             :         nDatePart == sheet::DataPilotFieldGroupBy::SECONDS)
     312             :     {
     313             :         // handle time
     314             :         // (as in the cell functions, ScInterpreter::ScGetHour etc.: seconds are rounded)
     315             : 
     316           0 :         double fTime = fValue - rtl::math::approxFloor(fValue);
     317           0 :         long nSeconds = (long)rtl::math::approxFloor(fTime*DATE_TIME_FACTOR+0.5);
     318             : 
     319           0 :         switch (nDatePart)
     320             :         {
     321             :             case sheet::DataPilotFieldGroupBy::HOURS:
     322           0 :                 nResult = nSeconds / 3600;
     323           0 :                 break;
     324             :             case sheet::DataPilotFieldGroupBy::MINUTES:
     325           0 :                 nResult = ( nSeconds % 3600 ) / 60;
     326           0 :                 break;
     327             :             case sheet::DataPilotFieldGroupBy::SECONDS:
     328           0 :                 nResult = nSeconds % 60;
     329           0 :                 break;
     330           0 :         }
     331             :     }
     332             :     else
     333             :     {
     334         108 :         Date aDate = *(pFormatter->GetNullDate());
     335         108 :         aDate += (long)::rtl::math::approxFloor(fValue);
     336             : 
     337         108 :         switch ( nDatePart )
     338             :         {
     339             :             case com::sun::star::sheet::DataPilotFieldGroupBy::YEARS:
     340          44 :                 nResult = aDate.GetYear();
     341          44 :                 break;
     342             :             case com::sun::star::sheet::DataPilotFieldGroupBy::QUARTERS:
     343          32 :                 nResult = 1 + (aDate.GetMonth() - 1) / 3;     // 1..4
     344          32 :                 break;
     345             :             case com::sun::star::sheet::DataPilotFieldGroupBy::MONTHS:
     346          32 :                 nResult = aDate.GetMonth();     // 1..12
     347          32 :                 break;
     348             :             case com::sun::star::sheet::DataPilotFieldGroupBy::DAYS:
     349             :                 {
     350           0 :                     Date aYearStart(1, 1, aDate.GetYear());
     351           0 :                     nResult = (aDate - aYearStart) + 1;       // Jan 01 has value 1
     352           0 :                     if (nResult >= 60 && !aDate.IsLeapYear())
     353             :                     {
     354             :                         // days are counted from 1 to 366 - if not from a leap year, adjust
     355           0 :                         ++nResult;
     356             :                     }
     357             :                 }
     358           0 :                 break;
     359             :             default:
     360             :                 OSL_FAIL("invalid date part");
     361             :         }
     362             :     }
     363             : 
     364         108 :     return nResult;
     365             : }
     366             : 
     367             : namespace {
     368             : 
     369             : sal_uInt16 nFuncStrIds[12] = {
     370             :     0,                              // SUBTOTAL_FUNC_NONE
     371             :     STR_FUN_TEXT_AVG,               // SUBTOTAL_FUNC_AVE
     372             :     STR_FUN_TEXT_COUNT,             // SUBTOTAL_FUNC_CNT
     373             :     STR_FUN_TEXT_COUNT,             // SUBTOTAL_FUNC_CNT2
     374             :     STR_FUN_TEXT_MAX,               // SUBTOTAL_FUNC_MAX
     375             :     STR_FUN_TEXT_MIN,               // SUBTOTAL_FUNC_MIN
     376             :     STR_FUN_TEXT_PRODUCT,           // SUBTOTAL_FUNC_PROD
     377             :     STR_FUN_TEXT_STDDEV,            // SUBTOTAL_FUNC_STD
     378             :     STR_FUN_TEXT_STDDEV,            // SUBTOTAL_FUNC_STDP
     379             :     STR_FUN_TEXT_SUM,               // SUBTOTAL_FUNC_SUM
     380             :     STR_FUN_TEXT_VAR,               // SUBTOTAL_FUNC_VAR
     381             :     STR_FUN_TEXT_VAR                // SUBTOTAL_FUNC_VARP
     382             : };
     383             : 
     384             : }
     385             : 
     386         272 : OUString ScDPUtil::getDisplayedMeasureName(const OUString& rName, ScSubTotalFunc eFunc)
     387             : {
     388         272 :     OUStringBuffer aRet;
     389         272 :     sal_uInt16 nId = nFuncStrIds[eFunc];
     390         272 :     if (nId)
     391             :     {
     392         250 :         aRet.append(ScGlobal::GetRscString(nId));        // function name
     393         250 :         aRet.append(" - ");
     394             :     }
     395         272 :     aRet.append(rName);                   // field name
     396             : 
     397         272 :     return aRet.makeStringAndClear();
     398             : }
     399             : 
     400         266 : ScSubTotalFunc ScDPUtil::toSubTotalFunc(com::sun::star::sheet::GeneralFunction eGenFunc)
     401             : {
     402             :     ScSubTotalFunc eSubTotal;
     403         266 :     switch (eGenFunc)
     404             :     {
     405           0 :         case sheet::GeneralFunction_NONE:       eSubTotal = SUBTOTAL_FUNC_NONE; break;
     406         242 :         case sheet::GeneralFunction_SUM:        eSubTotal = SUBTOTAL_FUNC_SUM;  break;
     407          22 :         case sheet::GeneralFunction_COUNT:      eSubTotal = SUBTOTAL_FUNC_CNT2; break;
     408           2 :         case sheet::GeneralFunction_AVERAGE:    eSubTotal = SUBTOTAL_FUNC_AVE;  break;
     409           0 :         case sheet::GeneralFunction_MAX:        eSubTotal = SUBTOTAL_FUNC_MAX;  break;
     410           0 :         case sheet::GeneralFunction_MIN:        eSubTotal = SUBTOTAL_FUNC_MIN;  break;
     411           0 :         case sheet::GeneralFunction_PRODUCT:    eSubTotal = SUBTOTAL_FUNC_PROD; break;
     412           0 :         case sheet::GeneralFunction_COUNTNUMS:  eSubTotal = SUBTOTAL_FUNC_CNT;  break;
     413           0 :         case sheet::GeneralFunction_STDEV:      eSubTotal = SUBTOTAL_FUNC_STD;  break;
     414           0 :         case sheet::GeneralFunction_STDEVP:     eSubTotal = SUBTOTAL_FUNC_STDP; break;
     415           0 :         case sheet::GeneralFunction_VAR:        eSubTotal = SUBTOTAL_FUNC_VAR;  break;
     416           0 :         case sheet::GeneralFunction_VARP:       eSubTotal = SUBTOTAL_FUNC_VARP; break;
     417             :         case sheet::GeneralFunction_AUTO:
     418             :         default:
     419           0 :             eSubTotal = SUBTOTAL_FUNC_NONE;
     420             :     }
     421         266 :     return eSubTotal;
     422         228 : }
     423             : 
     424             : /* vim:set shiftwidth=4 softtabstop=4 expandtab: */

Generated by: LCOV version 1.10