sc/source/core/data/simpleformulacalc.cxx

   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 <memory>
  11 #include <simpleformulacalc.hxx>
  12 #include <document.hxx>
  13 #include <docsh.hxx>
  14 #include <tokenarray.hxx>
  15 #include <interpre.hxx>
  16 #include <compiler.hxx>
  17 #include <sfx2/linkmgr.hxx>
  18
  19 #define DISPLAY_LEN 66
  20
  21 ScSimpleFormulaCalculator::ScSimpleFormulaCalculator( ScDocument& rDoc, const ScAddress& rAddr,
  22         const OUString& rFormula, bool bMatrixFormula, formula::FormulaGrammar::Grammar eGram )
  23     : mnFormatType(SvNumFormatType::ALL)
  24     , mbCalculated(false)
  25     , maAddr(rAddr)
  26     , mrDoc(rDoc)
  27     , maGram(eGram)
  28     , mbMatrixResult(false)
  29     , mbLimitString(false)
  30     , mbMatrixFormula(bMatrixFormula)
  31 {
  32     // compile already here
  33     ScCompiler aComp(mrDoc, maAddr, eGram, true, bMatrixFormula);
  34     mpCode = aComp.CompileString(rFormula);
  35     if(mpCode->GetCodeError() == FormulaError::NONE && mpCode->GetLen())
  36         aComp.CompileTokenArray();
  37 }
  38
  39 ScSimpleFormulaCalculator::~ScSimpleFormulaCalculator()
  40 {
  41 }
  42
  43 void ScSimpleFormulaCalculator::Calculate()
  44 {
  45     if(mbCalculated)
  46         return;
  47
  48     mbCalculated = true;
  49
  50     ScInterpreter aInt(mrDoc.GetFormulaCell( maAddr ), mrDoc, mrDoc.GetNonThreadedContext(), maAddr, *mpCode);
  51     if (mbMatrixFormula)
  52         aInt.AssertFormulaMatrix();
  53
  54     sfx2::LinkManager aNewLinkMgr( mrDoc.GetDocumentShell() );
  55     aInt.SetLinkManager( &aNewLinkMgr );
  56
  57     formula::StackVar aIntType = aInt.Interpret();
  58     if ( aIntType == formula::svMatrixCell )
  59     {
  60         ScCompiler aComp(mrDoc, maAddr, maGram);
  61         OUStringBuffer aStr;
  62         aComp.CreateStringFromToken(aStr, aInt.GetResultToken().get());
  63
  64         mbMatrixResult = true;
  65
  66         if (mbLimitString)
  67         {
  68             const sal_Unicode cCol = ScCompiler::GetNativeSymbol(ocArrayColSep)[0];
  69             const sal_Unicode cRow = ScCompiler::GetNativeSymbol(ocArrayRowSep)[0];
  70             const sal_Int32 n = aStr.getLength();
  71             for (sal_Int32 i = DISPLAY_LEN; i < n; ++i)
  72             {
  73                 const sal_Unicode c = aStr[i];
  74                 if (c == cCol || c == cRow)
  75                 {
  76                     aStr.truncate(i+1);
  77                     aStr.append("...");
  78                     break;
  79                 }
  80             }
  81         }
  82
  83         maMatrixFormulaResult = aStr.makeStringAndClear();
  84     }
  85     mnFormatType = aInt.GetRetFormatType();
  86     maResult.SetToken(aInt.GetResultToken().get());
  87 }
  88
  89 bool ScSimpleFormulaCalculator::IsValue()
  90 {
  91     Calculate();
  92
  93     if (mbMatrixResult)
  94         return false;
  95
  96     return maResult.IsValue();
  97 }
  98
  99 bool ScSimpleFormulaCalculator::IsMatrix()
 100 {
 101     Calculate();
 102
 103     return mbMatrixResult;
 104 }
 105
 106 FormulaError ScSimpleFormulaCalculator::GetErrCode()
 107 {
 108     Calculate();
 109
 110     FormulaError nErr = mpCode->GetCodeError();
 111     if (nErr != FormulaError::NONE)
 112         return nErr;
 113     return maResult.GetResultError();
 114 }
 115
 116 double ScSimpleFormulaCalculator::GetValue()
 117 {
 118     Calculate();
 119
 120     if ((mpCode->GetCodeError() == FormulaError::NONE) &&
 121             maResult.GetResultError() == FormulaError::NONE)
 122         return maResult.GetDouble();
 123
 124     return 0.0;
 125 }
 126
 127 svl::SharedString ScSimpleFormulaCalculator::GetString()
 128 {
 129     Calculate();
 130
 131     if (mbMatrixResult)
 132         return svl::SharedString( maMatrixFormulaResult);   // string not interned
 133
 134     if ((mpCode->GetCodeError() == FormulaError::NONE) &&
 135             maResult.GetResultError() == FormulaError::NONE)
 136         return maResult.GetString();
 137
 138     return svl::SharedString::getEmptyString();
 139 }
 140
 141 bool ScSimpleFormulaCalculator::HasColRowName() const
 142 {
 143     return formula::FormulaTokenArrayPlainIterator(*mpCode).GetNextColRowName() != nullptr;
 144 }
 145
 146 ScTokenArray* ScSimpleFormulaCalculator::GetCode()
 147 {
 148     return mpCode.get();
 149 }
 150
 151 void ScSimpleFormulaCalculator::SetLimitString(bool bLimitString)
 152 {
 153     mbLimitString = bLimitString;
 154 }
 155
 156 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */