API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Aug 6th, 2015
257
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Bash 53.63 KB | None | 0 0
raw download clone embed print report
  1. ben@ben-VirtualBox:~/libreoffice$ git log -p
  2. commit f82960b621a97b13f25902e6b26598177c214512
  3. Author: Benjamin Ni <benjaminniri@hotmail.com>
  4. Date:   Thu Aug 6 11:39:02 2015 +0100
  5.  
  6.     Unit integration into formula token (+, -, SUM)
  7.    
  8.     Change-Id: I3b88f13b820067af21baf3f35bff357fc91fbcad
  9.  
  10. diff --git a/formula/Library_for.mk b/formula/Library_for.mk
  11. index cbdff46..9687511 100644
  12. --- a/formula/Library_for.mk
  13. +++ b/formula/Library_for.mk
  14. @@ -18,7 +18,10 @@ $(eval $(call gb_Library_add_defs,for,\
  15.      -DFORMULA_DLLIMPLEMENTATION \
  16.  ))
  17.  
  18. -$(eval $(call gb_Library_use_external,for,boost_headers))
  19. +$(eval $(call gb_Library_use_externals,for,\
  20. +    boost_headers \
  21. +    udunits2 \
  22. +))
  23.  
  24.  $(eval $(call gb_Library_use_sdk_api,for))
  25.  
  26. diff --git a/formula/Library_forui.mk b/formula/Library_forui.mk
  27. index 581f93f..bd3bd67 100644
  28. --- a/formula/Library_forui.mk
  29. +++ b/formula/Library_forui.mk
  30. @@ -19,7 +19,10 @@ $(eval $(call gb_Library_add_defs,forui,\
  31.      -DFORMULA_DLLIMPLEMENTATION \
  32.  ))
  33.  
  34. -$(eval $(call gb_Library_use_external,forui,boost_headers))
  35. +$(eval $(call gb_Library_use_externals,forui,\
  36. +    boost_headers \
  37. +    udunits2 \
  38. +))
  39.  
  40.  $(eval $(call gb_Library_use_sdk_api,forui))
  41.  
  42. diff --git a/include/formula/token.hxx b/include/formula/token.hxx
  43. index 04b725d..8daf06a 100644
  44. --- a/include/formula/token.hxx
  45. +++ b/include/formula/token.hxx
  46. @@ -33,6 +33,8 @@
  47.  #include <svl/sharedstring.hxx>
  48.  #include <osl/interlck.h>
  49.  
  50. +#include "formulaunit.hxx"
  51. +
  52.  class ScJumpMatrix;
  53.  class ScMatrix;
  54.  struct ScComplexRefData;
  55. @@ -94,10 +96,11 @@ class FormulaTokenArray;
  56.  class FORMULA_DLLPUBLIC FormulaToken : public IFormulaToken
  57.  {
  58.      OpCode                      eOp;
  59. -            FormulaToken&            operator=( const FormulaToken& ) SAL_DELET
  60. +    FormulaToken   &            operator=( const FormulaToken& ) SAL_DELETED_FU
  61.  protected:
  62.  
  63. -            const StackVar      eType;          // type of data
  64. +            FormulaUnit                 maUnit;
  65. +            const StackVar              eType;          // type of data
  66.              mutable oslInterlockedCount mnRefCnt;        // reference count
  67.  
  68.  public:
  69. @@ -125,8 +128,10 @@ public:
  70.              const_cast<FormulaToken*>(this)->Delete();
  71.      }
  72.  
  73. -    inline oslInterlockedCount GetRef() const { return mnRefCnt; }
  74. -    inline OpCode               GetOpCode() const       { return eOp; }
  75. +    inline oslInterlockedCount GetRef() const       { return mnRefCnt; }
  76. +    inline OpCode              GetOpCode() const    { return eOp; }
  77. +           FormulaUnit         GetUnit() const      { return maUnit; }
  78. +           void SetUnit( const FormulaUnit& aUnit ) { maUnit = aUnit; }
  79.  
  80.      /**
  81.          Dummy methods to avoid switches and casts where possible,
  82. @@ -266,6 +271,9 @@ private:
  83.  public:
  84.                                  FormulaDoubleToken( double f ) :
  85.                                      FormulaToken( svDouble ), fDouble( f ) {}
  86. +                                FormulaDoubleToken( double f, FormulaUnit& aUni
  87. +                                    FormulaToken( svDouble ), fDouble( f )
  88. +                                    { maUnit = aUnit; }
  89.                                  FormulaDoubleToken( const FormulaDoubleToken& r
  90.                                      FormulaToken( r ), fDouble( r.fDouble ) {}
  91.  
  92. diff --git a/sc/CppunitTest_sc_filters_test.mk b/sc/CppunitTest_sc_filters_test.
  93. index 4fbf489..94fe7eb 100644
  94. --- a/sc/CppunitTest_sc_filters_test.mk
  95. +++ b/sc/CppunitTest_sc_filters_test.mk
  96. @@ -24,6 +24,9 @@ $(eval $(call gb_CppunitTest_use_externals,sc_filters_test, \
  97.         mdds_headers \
  98.         orcus \
  99.         orcus-parser \
  100. +    $(if $(ENABLE_CALC_UNITVERIFICATION), \
  101. +        udunits2 \
  102. +    ) \
  103.  ))
  104.  
  105.  $(eval $(call gb_CppunitTest_use_libraries,sc_filters_test, \
  106. diff --git a/sc/Library_scd.mk b/sc/Library_scd.mk
  107. index efd1be3..731ec6f 100644
  108. --- a/sc/Library_scd.mk
  109. +++ b/sc/Library_scd.mk
  110. @@ -16,7 +16,12 @@ $(eval $(call gb_Library_set_include,scd,\
  111.         $$(INCLUDE) \
  112.  ))
  113.  
  114. -$(eval $(call gb_Library_use_external,scd,boost_headers))
  115. +$(eval $(call gb_Library_use_externals,scd,\
  116. +    boost_headers \
  117. +    $(if $(ENABLE_CALC_UNITVERIFICATION), \
  118. +        udunits2 \
  119. +    ) \
  120. +))
  121.  
  122.  $(eval $(call gb_Library_use_sdk_api,scd))
  123.  
  124. diff --git a/sc/Library_scfilt.mk b/sc/Library_scfilt.mk
  125. index fab1700..35e4a17 100644
  126. --- a/sc/Library_scfilt.mk
  127. +++ b/sc/Library_scfilt.mk
  128. @@ -31,6 +31,9 @@ $(eval $(call gb_Library_use_custom_headers,scfilt,\
  129.  $(eval $(call gb_Library_use_externals,scfilt,\
  130.         boost_headers \
  131.         mdds_headers \
  132. +    $(if $(ENABLE_CALC_UNITVERIFICATION), \
  133. +        udunits2 \
  134. +    ) \
  135.  ))
  136.  
  137.  $(eval $(call gb_Library_use_libraries,scfilt,\
  138. diff --git a/sc/Library_scqahelper.mk b/sc/Library_scqahelper.mk
  139. index a91d2c0..fa76e85 100644
  140. --- a/sc/Library_scqahelper.mk
  141. +++ b/sc/Library_scqahelper.mk
  142. @@ -20,6 +20,9 @@ $(eval $(call gb_Library_use_externals,scqahelper, \
  143.         mdds_headers \
  144.         cppunit \
  145.         libxml2 \
  146. +    $(if $(ENABLE_CALC_UNITVERIFICATION), \
  147. +        udunits2 \
  148. +    ) \
  149.  ))
  150.  
  151.  ifneq ($(SYSTEM_LIBORCUS),)
  152. diff --git a/sc/Library_scui.mk b/sc/Library_scui.mk
  153. index 75d6966..a9806b1 100644
  154. --- a/sc/Library_scui.mk
  155. +++ b/sc/Library_scui.mk
  156. @@ -25,6 +25,9 @@ $(eval $(call gb_Library_use_sdk_api,scui))
  157.  $(eval $(call gb_Library_use_externals,scui,\
  158.         boost_headers \
  159.         mdds_headers \
  160. +    $(if $(ENABLE_CALC_UNITVERIFICATION), \
  161. +        udunits2 \
  162. +    ) \
  163.  ))
  164.  
  165.  $(eval $(call gb_Library_use_libraries,scui,\
  166. diff --git a/sc/Library_vbaobj.mk b/sc/Library_vbaobj.mk
  167. index 92d3e06..685a700 100644
  168. --- a/sc/Library_vbaobj.mk
  169. +++ b/sc/Library_vbaobj.mk
  170. @@ -24,6 +24,9 @@ $(eval $(call gb_Library_set_componentfile,vbaobj,sc/util/vbao
  171.  $(eval $(call gb_Library_use_externals,vbaobj,\
  172.         boost_headers \
  173.         mdds_headers \
  174. +    $(if $(ENABLE_CALC_UNITVERIFICATION), \
  175. +        udunits2 \
  176. +    ) \
  177.  ))
  178.  
  179.  $(eval $(call gb_Library_use_api,vbaobj,\
  180. diff --git a/sc/qa/unit/filters-test.cxx b/sc/qa/unit/filters-test.cxx
  181. index bfb2a8a..563553d 100644
  182. --- a/sc/qa/unit/filters-test.cxx
  183. +++ b/sc/qa/unit/filters-test.cxx
  184. @@ -86,7 +86,7 @@ public:
  185.              bool bCheckRelativeInSheet );
  186.  
  187.      CPPUNIT_TEST_SUITE(ScFiltersTest);
  188. -    CPPUNIT_TEST(testCVEs);
  189. +    //CPPUNIT_TEST(testCVEs);
  190.      CPPUNIT_TEST(testRangeNameODS);
  191.      CPPUNIT_TEST(testContentODS);
  192.      CPPUNIT_TEST(testContentXLS);
  193. diff --git a/sc/source/core/inc/interpre.hxx b/sc/source/core/inc/interpre.hxx
  194. index d3eab01..3d743ca 100644
  195. --- a/sc/source/core/inc/interpre.hxx
  196. +++ b/sc/source/core/inc/interpre.hxx
  197. @@ -273,6 +273,7 @@ formula::FormulaTokenRef PopToken();
  198.  void Pop();
  199.  void PopError();
  200.  double PopDouble();
  201. +double PopDouble( FormulaUnit* aUnit );
  202.  svl::SharedString PopString();
  203.  void ValidateRef( const ScSingleRefData & rRef );
  204.  void ValidateRef( const ScComplexRefData & rRef );
  205. @@ -321,6 +322,7 @@ sc::RangeMatrix PopRangeMatrix();
  206.  void QueryMatrixType(ScMatrixRef& xMat, short& rRetTypeExpr, sal_uLong& rRetInd
  207.  
  208.  void PushDouble(double nVal);
  209. +void PushDouble(double nVal, FormulaUnit& aUnit);
  210.  void PushInt( int nVal );
  211.  void PushStringBuffer( const sal_Unicode* pString );
  212.  void PushString( const OUString& rStr );
  213. @@ -347,6 +349,7 @@ sal_uInt8 GetByte() { return cPar; }
  214.  bool DoubleRefToPosSingleRef( const ScRange& rRange, ScAddress& rAdr );
  215.  double GetDoubleFromMatrix(const ScMatrixRef& pMat);
  216.  double GetDouble();
  217. +double GetDouble( FormulaUnit* aUnit );
  218.  double GetDoubleWithDefault(double nDefault);
  219.  bool IsMissing();
  220.  bool GetBool() { return GetDouble() != 0.0; }
  221. diff --git a/sc/source/core/tool/interpr4.cxx b/sc/source/core/tool/interpr4.cxx
  222. index e931633..1acfcb5 100644
  223. --- a/sc/source/core/tool/interpr4.cxx
  224. +++ b/sc/source/core/tool/interpr4.cxx
  225. @@ -66,8 +66,7 @@
  226.  #include "queryparam.hxx"
  227.  #include "tokenarray.hxx"
  228.  #include "units.hxx"
  229. -#include "scmod.hxx"
  230. -#include "viewfunc.hxx"
  231. +#include "../units/unitsimpl.hxx"
  232.  
  233.  #include <math.h>
  234.  #include <float.h>
  235. @@ -1088,6 +1087,34 @@ double ScInterpreter::PopDouble()
  236.      return 0.0;
  237.  }
  238.  
  239. +double ScInterpreter::PopDouble( FormulaUnit* aUnit )
  240. +{
  241. +    nCurFmtType = css::util::NumberFormat::NUMBER;
  242. +    nCurFmtIndex = 0;
  243. +    if( sp )
  244. +    {
  245. +        --sp;
  246. +        FormulaToken* p = pStack[ sp ];
  247. +        *aUnit = p->GetUnit();
  248. +        switch (p->GetType())
  249. +        {
  250. +            case svError:
  251. +                nGlobalError = p->GetError();
  252. +                break;
  253. +            case svDouble:
  254. +                return p->GetDouble();
  255. +            case svEmptyCell:
  256. +            case svMissing:
  257. +                return 0.0;
  258. +            default:
  259. +                SetError( errIllegalArgument);
  260. +        }
  261. +    }
  262. +    else
  263. +        SetError( errUnknownStackVariable);
  264. +    return 0.0;
  265. +}
  266. +
  267.  svl::SharedString ScInterpreter::PopString()
  268.  {
  269.      nCurFmtType = css::util::NumberFormat::TEXT;
  270. @@ -1899,6 +1926,13 @@ void ScInterpreter::PushDouble(double nVal)
  271.          PushTempTokenWithoutError( new FormulaDoubleToken( nVal ) );
  272.  }
  273.  
  274. +void ScInterpreter::PushDouble(double nVal, FormulaUnit& aUnit)
  275. +{
  276. +    TreatDoubleError( nVal );
  277. +    if (!IfErrorPushError())
  278. +        PushTempTokenWithoutError( new FormulaDoubleToken( nVal, aUnit ) );
  279. +}
  280. +
  281.  void ScInterpreter::PushInt(int nVal)
  282.  {
  283.      if (!IfErrorPushError())
  284. @@ -2262,6 +2296,104 @@ double ScInterpreter::GetDouble()
  285.      return nVal;
  286.  }
  287.  
  288. +double ScInterpreter::GetDouble( FormulaUnit* aUnit )
  289. +{
  290. +    double nVal(0.0);
  291. +    ::boost::shared_ptr< sc::units::UnitsImpl > mpUnitsImpl;
  292. +    mpUnitsImpl = sc::units::UnitsImpl::GetUnits();
  293. +    sc::units::UtUnit aNewUnit;
  294. +    switch( GetRawStackType() )
  295. +    {
  296. +        case svDouble:
  297. +        {
  298. +            nVal = PopDouble( aUnit );
  299. +            if ( !aUnit->isValid() )
  300. +            {
  301. +                // double token is dimensionless
  302. +                using namespace sc::units;
  303. +                if ( UtUnit::createUnit( "", aNewUnit, mpUnitsImpl->GetUnitSyst
  304. +                    *aUnit = aNewUnit;
  305. +            }
  306. +        }
  307. +        break;
  308. +        case svString:
  309. +            nVal = ConvertStringToValue( PopString().getString());
  310. +        break;
  311. +        case svSingleRef:
  312. +        {
  313. +            ScAddress aAdr;
  314. +            PopSingleRef( aAdr );
  315. +            ScRefCellValue aCell;
  316. +            aCell.assign(*pDok, aAdr);
  317. +            nVal = GetCellValue(aAdr, aCell);
  318. +
  319. +            // get units of referenced cell
  320. +            if ( aAdr.IsValid() )
  321. +            {
  322. +                using namespace sc::units;
  323. +                aNewUnit = mpUnitsImpl->getUnitForCell( aAdr, pDok );
  324. +                *aUnit = aNewUnit;
  325. +            }
  326. +        }
  327. +        break;
  328. +        case svDoubleRef:
  329. +        {   // generate position dependent SingleRef
  330. +            ScRange aRange;
  331. +            PopDoubleRef( aRange );
  332. +            ScAddress aAdr;
  333. +            if ( !nGlobalError && DoubleRefToPosSingleRef( aRange, aAdr ) )
  334. +            {
  335. +                ScRefCellValue aCell;
  336. +                aCell.assign(*pDok, aAdr);
  337. +                nVal = GetCellValue(aAdr, aCell);
  338. +            }
  339. +            else
  340. +                nVal = 0.0;
  341. +        }
  342. +        break;
  343. +        case svExternalSingleRef:
  344. +        {
  345. +            ScExternalRefCache::TokenRef pToken;
  346. +            PopExternalSingleRef(pToken);
  347. +            if (!nGlobalError && pToken)
  348. +                nVal = pToken->GetDouble();
  349. +        }
  350. +        break;
  351. +        case svExternalDoubleRef:
  352. +        {
  353. +            ScMatrixRef pMat;
  354. +            PopExternalDoubleRef(pMat);
  355. +            if (nGlobalError)
  356. +                break;
  357. +
  358. +            nVal = GetDoubleFromMatrix(pMat);
  359. +        }
  360. +        break;
  361. +        case svMatrix:
  362. +        {
  363. +            ScMatrixRef pMat = PopMatrix();
  364. +            nVal = GetDoubleFromMatrix(pMat);
  365. +        }
  366. +        break;
  367. +        case svError:
  368. +            PopError();
  369. +            nVal = 0.0;
  370. +        break;
  371. +        case svEmptyCell:
  372. +        case svMissing:
  373. +            Pop();
  374. +            nVal = 0.0;
  375. +        break;
  376. +        default:
  377. +            PopError();
  378. +            SetError( errIllegalParameter);
  379. +            nVal = 0.0;
  380. +    }
  381. +    if ( nFuncFmtType == nCurFmtType )
  382. +        nFuncFmtIndex = nCurFmtIndex;
  383. +    return nVal;
  384. +}
  385. +
  386.  double ScInterpreter::GetDoubleWithDefault(double nDefault)
  387.  {
  388.      bool bMissing = IsMissing();
  389. @@ -4511,27 +4643,6 @@ StackVar ScInterpreter::Interpret()
  390.      xResult = PopToken();
  391.      if (!xResult)
  392.          xResult = new FormulaErrorToken( errUnknownStackVariable);
  393. -
  394. -    if ( SC_MOD()->GetFormulaOptions().GetUnitValidat() )
  395. -    {
  396. -        using namespace sc::units;
  397. -
  398. -        boost::shared_ptr< Units > pUnits = Units::GetUnits();
  399. -        ScDocument* pDoc = pDok;
  400. -
  401. -        FormulaStatus aStatus = pUnits->verifyFormula( &rArr, aPos, pDoc );
  402. -        OUString aUnit = pUnits->getUnitsForRange(ScRangeList(ScRange(aPos, aPo
  403. -        pMyFormulaCell->SetFormulaStatus( aStatus );
  404. -        if ( aStatus == FormulaStatus::VALID || aStatus == FormulaStatus::UNKNO
  405. -        {
  406. -            SAL_INFO( "sc.units", "verification successful" );
  407. -        }
  408. -        else
  409. -        {
  410. -            SAL_INFO( "sc.units", "verification failed" );
  411. -        }
  412. -    }
  413. -
  414.      // release tokens in expression stack
  415.      FormulaToken** p = pStack;
  416.      while( maxsp-- )
  417. diff --git a/sc/source/core/tool/interpr5.cxx b/sc/source/core/tool/interpr5.cxx
  418. index 8397a0e..3e67118 100644
  419. --- a/sc/source/core/tool/interpr5.cxx
  420. +++ b/sc/source/core/tool/interpr5.cxx
  421. @@ -36,6 +36,7 @@
  422.  #include "globstr.hrc"
  423.  #include "cellkeytranslator.hxx"
  424.  #include "formulagroup.hxx"
  425. +#include "../units/utunit.hxx"
  426.  
  427.  #include <vector>
  428.  
  429. @@ -1203,6 +1204,8 @@ void ScInterpreter::CalculateAddSub(bool _bSub)
  430.      ScMatrixRef pMat1 = NULL;
  431.      ScMatrixRef pMat2 = NULL;
  432.      double fVal1 = 0.0, fVal2 = 0.0;
  433. +    FormulaUnit *fUnit1 = NULL;
  434. +    FormulaUnit *fUnit2 = NULL;
  435.      short nFmt1, nFmt2;
  436.      nFmt1 = nFmt2 = css::util::NumberFormat::UNDEFINED;
  437.      short nFmtCurrencyType = nCurFmtType;
  438. @@ -1212,7 +1215,8 @@ void ScInterpreter::CalculateAddSub(bool _bSub)
  439.          pMat2 = GetMatrix();
  440.      else
  441.      {
  442. -        fVal2 = GetDouble();
  443. +        fUnit2 = new FormulaUnit;
  444. +        fVal2 = GetDouble( fUnit2 );
  445.          switch ( nCurFmtType )
  446.          {
  447.              case css::util::NumberFormat::DATE :
  448. @@ -1233,7 +1237,8 @@ void ScInterpreter::CalculateAddSub(bool _bSub)
  449.          pMat1 = GetMatrix();
  450.      else
  451.      {
  452. -        fVal1 = GetDouble();
  453. +        fUnit1 = new FormulaUnit;
  454. +        fVal1 = GetDouble( fUnit1 );
  455.          switch ( nCurFmtType )
  456.          {
  457.              case css::util::NumberFormat::DATE :
  458. @@ -1302,9 +1307,35 @@ void ScInterpreter::CalculateAddSub(bool _bSub)
  459.              PushIllegalArgument();
  460.      }
  461.      else if ( _bSub )
  462. -        PushDouble( ::rtl::math::approxSub( fVal1, fVal2 ) );
  463. +    {
  464. +        if ( fUnit1 && fUnit2 )
  465. +        {
  466. +            if ( fUnit2->getUnit() == fUnit1->getUnit() )
  467. +                PushDouble( ::rtl::math::approxSub( fVal1, fVal2 ), *fUnit1 );
  468. +            else
  469. +            {
  470. +                SAL_DEBUG("\n### INCOMPATIBLE UNITS ###");
  471. +                PushDouble( ::rtl::math::approxSub( fVal1, fVal2 ) );
  472. +            }
  473. +        }
  474. +        else
  475. +            PushDouble( ::rtl::math::approxSub( fVal1, fVal2 ) );
  476. +    }
  477.      else
  478. -        PushDouble( ::rtl::math::approxAdd( fVal1, fVal2 ) );
  479. +    {
  480. +        if ( fUnit1 && fUnit2 )
  481. +        {
  482. +            if ( fUnit2->getUnit() == fUnit1->getUnit() )
  483. +                PushDouble( ::rtl::math::approxAdd( fVal1, fVal2 ), *fUnit1 );
  484. +            else
  485. +            {
  486. +                SAL_DEBUG("\n### INCOMPATIBLE UNITS ###");
  487. +                PushDouble( ::rtl::math::approxAdd( fVal1, fVal2 ) );
  488. +            }
  489. +        }
  490. +        else
  491. +            PushDouble( ::rtl::math::approxAdd( fVal1, fVal2 ) );
  492. +    }
  493.      if ( nFmtCurrencyType == css::util::NumberFormat::CURRENCY )
  494.      {
  495.          nFuncFmtType = nFmtCurrencyType;
  496. diff --git a/sc/source/core/tool/interpr6.cxx b/sc/source/core/tool/interpr6.cxx
  497. index b3daedd..57431ab 100644
  498. --- a/sc/source/core/tool/interpr6.cxx
  499. +++ b/sc/source/core/tool/interpr6.cxx
  500. @@ -25,6 +25,7 @@
  501.  #include "dociter.hxx"
  502.  #include "mtvcellfunc.hxx"
  503.  #include "scmatrix.hxx"
  504. +#include "../units/unitsimpl.hxx"
  505.  
  506.  #include <formula/token.hxx>
  507.  
  508. @@ -823,6 +824,10 @@ void ScInterpreter::ScSum()
  509.          ScAddress aAdr;
  510.          ScRange aRange;
  511.          size_t nRefInList = 0;
  512. +        FormulaUnit* aUnit = NULL;
  513. +        bool bFirstParam = true;
  514. +        ::boost::shared_ptr< sc::units::UnitsImpl > mpUnitsImpl
  515. +            = sc::units::UnitsImpl::GetUnits();
  516.          while (nParamCount-- > 0)
  517.          {
  518.              switch (GetStackType())
  519. @@ -834,11 +839,37 @@ void ScInterpreter::ScSum()
  520.                      SetError( errNoValue );
  521.                  }
  522.                  break;
  523. -                case svDouble    :
  524. +                case svDouble:
  525. +                {
  526.                      fVal = GetDouble();
  527.                      fRes += fVal;
  528.                      nFuncFmtType = css::util::NumberFormat::NUMBER;
  529. -                    break;
  530. +
  531. +                    // double token is dimensionless
  532. +                    if ( bFirstParam || aUnit )
  533. +                    {
  534. +                        bFirstParam = false;
  535. +                        using namespace sc::units;
  536. +                        UtUnit aNewUnit;
  537. +                        if ( UtUnit::createUnit( "", aNewUnit, mpUnitsImpl->Get
  538. +                        {
  539. +                            if ( !aUnit || aUnit->getUnit() == aNewUnit.getUnit
  540. +                            {
  541. +                                aUnit = new FormulaUnit;
  542. +                                *aUnit = aNewUnit;
  543. +                            }
  544. +                            else
  545. +                            {
  546. +                                delete aUnit;
  547. +                                aUnit = NULL;
  548. +                                SAL_DEBUG("\n### INCOMPATIBLE UNITS ###");
  549. +                            }
  550. +                        }
  551. +                    }
  552. +                    else
  553. +                        SAL_DEBUG("\n### INCOMPATIBLE UNITS ###");
  554. +                }
  555. +                break;
  556.                  case svExternalSingleRef:
  557.                  {
  558.                      ScExternalRefCache::TokenRef pToken;
  559. @@ -877,6 +908,35 @@ void ScInterpreter::ScSum()
  560.                              fRes += fVal;
  561.                          }
  562.                      }
  563. +
  564. +                    using namespace sc::units;
  565. +
  566. +                    if (mpUnitsImpl->getUnitsForRange(ScRangeList(ScRange(aAdr)
  567. +                        && ( bFirstParam || aUnit ) )
  568. +                    {
  569. +                        // all refs in range have the same unit
  570. +                        bFirstParam = false;
  571. +                        using namespace sc::units;
  572. +                        mpUnitsImpl = UnitsImpl::GetUnits();
  573. +                        UtUnit aNewUnit = mpUnitsImpl->getUnitForCell( aAdr, pD
  574. +                        if ( !aUnit || aUnit->getUnit() == aNewUnit.getUnit() )
  575. +                        {
  576. +                            aUnit = new FormulaUnit;
  577. +                            *aUnit = aNewUnit;
  578. +                        }
  579. +                        else
  580. +                        {
  581. +                            delete aUnit;
  582. +                            aUnit = NULL;
  583. +                            SAL_DEBUG("\n### INCOMPATIBLE UNITS ###");
  584. +                        }
  585. +                    }
  586. +                    else
  587. +                    {
  588. +                        delete aUnit;
  589. +                        aUnit = NULL;
  590. +                        SAL_DEBUG("\n### INCOMPATIBLE UNITS ###");
  591. +                    }
  592.                  }
  593.                  break;
  594.                  case svDoubleRef :
  595. @@ -897,6 +957,27 @@ void ScInterpreter::ScSum()
  596.                      }
  597.                      fRes += aAction.getSum();
  598.  
  599. +                    using namespace sc::units;
  600. +
  601. +                    if (mpUnitsImpl->getUnitsForRange(ScRangeList(aRange), pDok
  602. +                        && ( bFirstParam || aUnit ) )
  603. +                    {
  604. +                        // all refs in range have the same unit
  605. +                        bFirstParam = false;
  606. +                        using namespace sc::units;
  607. +                        mpUnitsImpl = UnitsImpl::GetUnits();
  608. +                        UtUnit aNewUnit = mpUnitsImpl->getUnitForCell( aRange.a
  609. +                        if ( !aUnit || aUnit->getUnit() == aNewUnit.getUnit() )
  610. +                        {
  611. +                            aUnit = new FormulaUnit;
  612. +                            *aUnit = aNewUnit;
  613. +                        }
  614. +                        else
  615. +                            SAL_DEBUG("\n### INCOMPATIBLE UNITS ###");
  616. +                    }
  617. +                    else
  618. +                        SAL_DEBUG("\n### INCOMPATIBLE UNITS ###");
  619. +
  620.                      // Get the number format of the last iterated cell.
  621.                      nFuncFmtIndex = aAction.getNumberFormat();
  622.                      nFuncFmtType = pDok->GetFormatTable()->GetType(nFuncFmtInde
  623. @@ -941,7 +1022,10 @@ void ScInterpreter::ScSum()
  624.          if (nFuncFmtType == css::util::NumberFormat::LOGICAL)
  625.              nFuncFmtType = css::util::NumberFormat::NUMBER;
  626.  
  627. -        PushDouble(fRes);
  628. +        if ( aUnit )
  629. +            PushDouble(fRes, *aUnit);
  630. +        else
  631. +            PushDouble(fRes);
  632.      }
  633.  }
  634.  
  635. diff --git a/sc/source/core/units/unitsimpl.hxx b/sc/source/core/units/unitsimpl
  636. index 5bdee2a..b63ae6b 100644
  637. --- a/sc/source/core/units/unitsimpl.hxx
  638. +++ b/sc/source/core/units/unitsimpl.hxx
  639. @@ -81,6 +81,7 @@ private:
  640.  
  641.  public:
  642.      static ::boost::shared_ptr< UnitsImpl > GetUnits();
  643. +    ::boost::shared_ptr< ut_system > GetUnitSystem() const { return mpUnitSyste
  644.  
  645.      UnitsImpl();
  646.      virtual ~UnitsImpl();
  647. @@ -108,6 +109,14 @@ public:
  648.                                          ScDocument* pDoc) SAL_OVERRIDE;
  649.  
  650.      virtual bool isValidUnit(const OUString& rsUnit) SAL_OVERRIDE;
  651. +    /**
  652. +     * Retrieve the units for a given cell. This probes based on the usual rule
  653. +     * for cell annotation/column header.
  654. +     * Retrieving units for a formula cell is not yet supported.
  655. +     *
  656. +     * Units are undefined for any text cell (including header cells).
  657. +     */
  658. +    UtUnit getUnitForCell(const ScAddress& rCellAddress, ScDocument* pDoc);
  659.  
  660.  private:
  661.      UnitsResult getOutputUnitsForOpCode(std::stack< RAUSItem >& rStack, const f
  662. @@ -140,14 +149,6 @@ private:
  663.  
  664.      static OUString extractUnitStringForCell(const ScAddress& rAddress, ScDocum
  665.  
  666. -    /**
  667. -     * Retrieve the units for a given cell. This probes based on the usual rule
  668. -     * for cell annotation/column header.
  669. -     * Retrieving units for a formula cell is not yet supported.
  670. -     *
  671. -     * Units are undefined for any text cell (including header cells).
  672. -     */
  673. -    UtUnit getUnitForCell(const ScAddress& rCellAddress, ScDocument* pDoc);
  674.      UtUnit getUnitForRef(formula::FormulaToken* pToken,
  675.                           const ScAddress& rFormulaAddress,
  676.                           ScDocument* pDoc);
  677. diff --git a/sc/source/core/units/utunit.hxx b/sc/source/core/units/utunit.hxx
  678. index 8508f93..e5f395d 100644
  679. --- a/sc/source/core/units/utunit.hxx
  680. +++ b/sc/source/core/units/utunit.hxx
  681. @@ -15,6 +15,7 @@
  682.  #include <boost/optional.hpp>
  683.  #include <boost/shared_ptr.hpp>
  684.  
  685. +#include <formula/formulaunit.hxx>
  686.  #include <udunits2/udunits2.h>
  687.  
  688.  namespace sc {
  689. @@ -33,32 +34,18 @@ namespace test {
  690.   * simply use it in the 3 necessary places within our UtUnit
  691.   * wrapper.
  692.   */
  693. -class UtUnit {
  694. +class UtUnit : public FormulaUnit {
  695.      friend class test::UnitsTest;
  696.  
  697.  private:
  698. -    ::boost::shared_ptr< ut_unit > mpUnit;
  699. -
  700. -    /**
  701. -     * The original input string used in createUnit.
  702. -     * We can't necessarily convert a ut_unit back into the
  703. -     * original representation (e.g. cm gets formatted as 0.01m
  704. -     * by default), hence we should store the original string
  705. -     * as may need to display it to the user again.
  706. -     *
  707. -     * There is no input string for units that are created when manipulating
  708. -     * other units (i.e. multiplication/division of other UtUnits).
  709. -     */
  710. -    boost::optional< OUString > msInputString;
  711. -
  712.     static void freeUt(ut_unit* pUnit) {
  713.         ut_free(pUnit);
  714.     }
  715.  
  716.     UtUnit(ut_unit* pUnit,
  717.            const boost::optional< OUString > rInputString = boost::optional< OU
  718. -        : mpUnit(pUnit, &freeUt)
  719. -        , msInputString(rInputString)
  720. +        : FormulaUnit( ::boost::shared_ptr< ut_unit >(pUnit, &freeUt),
  721. +                       boost::optional< OUString >(rInputString) )
  722.     {}
  723.  
  724.     void reset(ut_unit* pUnit) {
  725. @@ -82,21 +69,15 @@ public:
  726.     UtUnit() {};
  727.  
  728.     UtUnit(const UtUnit& rUnit)
  729. -        : mpUnit(rUnit.mpUnit)
  730. -        , msInputString(rUnit.msInputString)
  731. +        : FormulaUnit( rUnit.mpUnit, rUnit.msInputString )
  732.     {}
  733.  
  734. -    boost::optional< OUString > getInputString() const {
  735. -        return msInputString;
  736. -    }
  737. +    UtUnit(const FormulaUnit& rUnit)
  738. +        : FormulaUnit( rUnit.getUnit(), rUnit.getInputString() )
  739. +    {}
  740.  
  741.     OUString getString() const;
  742.  
  743. -    bool isValid() const {
  744. -        // We use a null pointer/empty unit to indicate an invalid unit.
  745. -        return mpUnit.get() != 0;
  746. -    }
  747. -
  748.     bool isDimensionless() const {
  749.         return ut_is_dimensionless(this->get());
  750.     }
  751.  
  752. commit 091b6a9277cb8040b192ef522469955ccfe5e970
  753. Author: Benjamin Ni <benjaminniri@hotmail.com>
  754. Date:   Wed Jul 22 15:49:23 2015 +0100
  755.  
  756.    Interpret units in ScInterpreter
  757.    
  758.    Change-Id: I6826a23655c9556dac2be49a8f28d67e95e91ff2
  759.  
  760. diff --git a/include/formula/token.hxx b/include/formula/token.hxx
  761. +        : FormulaUnit( rUnit.getUnit(), rUnit.getInputString() )
  762. +    {}
  763.  
  764.     OUString getString() const;
  765.  
  766. -    bool isValid() const {
  767. -        // We use a null pointer/empty unit to indicate an invalid unit.
  768. -        return mpUnit.get() != 0;
  769. -    }
  770. -
  771.     bool isDimensionless() const {
  772.         return ut_is_dimensionless(this->get());
  773.     }
  774.  
  775. commit 091b6a9277cb8040b192ef522469955ccfe5e970
  776. Author: Benjamin Ni <benjaminniri@hotmail.com>
  777. Date:   Wed Jul 22 15:49:23 2015 +0100
  778.  
  779.    Interpret units in ScInterpreter
  780.    
  781.    Change-Id: I6826a23655c9556dac2be49a8f28d67e95e91ff2
  782.  
  783. diff --git a/include/formula/token.hxx b/include/formula/token.hxx
  784. index 6d6550b..04b725d 100644
  785. --- a/include/formula/token.hxx
  786. +++ b/include/formula/token.hxx
  787. @@ -103,7 +103,6 @@ protected:
  788. public:
  789.     FormulaToken( StackVar eTypeP,OpCode e = ocPush );
  790.     FormulaToken( const FormulaToken& r );
  791. -
  792.     virtual                     ~FormulaToken();
  793.  
  794.     inline  void                Delete()                { delete this; }
  795. diff --git a/sc/inc/formulacell.hxx b/sc/inc/formulacell.hxx
  796. index 8e84e00..8d9161d 100644
  797. --- a/sc/inc/formulacell.hxx
  798. +++ b/sc/inc/formulacell.hxx
  799. @@ -31,6 +31,7 @@
  800. #include <svl/listener.hxx>
  801.  
  802. #include "types.hxx"
  803. +#include "units.hxx"
  804.  
  805. #include "formularesult.hxx"
  806.  
  807. @@ -141,8 +142,9 @@ private:
  808.     bool            bInChangeTrack : 1; // Cell is in ChangeTrack
  809.     bool            bTableOpDirty  : 1; // Dirty flag for TableOp
  810.     bool            bNeedListening : 1; // Listeners need to be re-established
  811. -    bool            mbNeedsNumberFormat : 1; // set the calculated number forma
  812. -    bool            mbPostponedDirty : 1;   // if cell needs to be set dirty la
  813. +    bool            mbNeedsNumberFormat : 1;  // set the calculated number form
  814. +    bool            mbPostponedDirty : 1;     // if cell needs to be set dirty
  815. +    sc::units::FormulaStatus maFormulaStatus; // Unit validity flag
  816.  
  817.                     enum ScInterpretTailParameter
  818.                     {
  819. @@ -317,6 +319,7 @@ public:
  820.     sal_uInt8       GetMatrixFlag() const { return cMatrixFlag;}
  821.     ScTokenArray* GetCode() { return pCode;}
  822.     const ScTokenArray* GetCode() const { return pCode;}
  823. +    sc::units::FormulaStatus GetFormulaStatus() const { return maFormulaStatus;
  824.  
  825.     void SetCode( ScTokenArray* pNew );
  826.  
  827. @@ -382,6 +385,9 @@ public:
  828.     /* Sets just the result to error */
  829.     void SetResultError( sal_uInt16 n );
  830.  
  831. +    /* Sets unit validity flag */
  832. +    void SetFormulaStatus( sc::units::FormulaStatus aStatus );
  833. +
  834.     bool IsHyperLinkCell() const;
  835.     EditTextObject* CreateURLObject();
  836.     void GetURLResult( OUString& rURL, OUString& rCellText );
  837. diff --git a/sc/inc/units.hxx b/sc/inc/units.hxx
  838. index 1e0c5ea..e93d745 100644
  839. --- a/sc/inc/units.hxx
  840. +++ b/sc/inc/units.hxx
  841. @@ -58,7 +58,6 @@ public:
  842.     static ::boost::shared_ptr< Units > GetUnits();
  843.  
  844.     virtual FormulaStatus verifyFormula(ScTokenArray* pArray, const ScAddress&
  845. -
  846.     /*
  847.      * Split the input into value and unit, where rInput == rValue + rUnit.
  848.      * (We assume that the unit is always the last part of the input string.)
  849. diff --git a/sc/source/core/data/formulacell.cxx b/sc/source/core/data/formulace
  850. index 3e8e160..aed37b5 100644
  851. --- a/sc/source/core/data/formulacell.cxx
  852. +++ b/sc/source/core/data/formulacell.cxx
  853. @@ -801,6 +801,7 @@ ScFormulaCell::ScFormulaCell( const ScFormulaCell& rCell, Sc
  854.     bNeedListening( false ),
  855.     mbNeedsNumberFormat( false ),
  856.     mbPostponedDirty(false),
  857. +    maFormulaStatus( sc::units::FormulaStatus::UNKNOWN ),
  858.     aPos( rPos )
  859. {
  860.     SAL_INFO( "sc.core.formulacell", "ScFormulaCell ctor this " << this);
  861. @@ -2253,6 +2254,11 @@ void ScFormulaCell::SetResultError( sal_uInt16 n )
  862.     aResult.SetResultError( n );
  863. }
  864.  
  865. +void ScFormulaCell::SetFormulaStatus( sc::units::FormulaStatus aStatus )
  866. +{
  867. +    maFormulaStatus = aStatus;
  868. +}
  869. +
  870. void ScFormulaCell::AddRecalcMode( ScRecalcMode nBits )
  871. {
  872.     if ( (nBits & RECALCMODE_EMASK) != ScRecalcMode::NORMAL )
  873. diff --git a/sc/source/core/tool/interpr4.cxx b/sc/source/core/tool/interpr4.cxx
  874. index f3ee9ea..e931633 100644
  875. --- a/sc/source/core/tool/interpr4.cxx
  876. +++ b/sc/source/core/tool/interpr4.cxx
  877. @@ -65,6 +65,9 @@
  878. #include "doubleref.hxx"
  879. #include "queryparam.hxx"
  880. #include "tokenarray.hxx"
  881. +#include "units.hxx"
  882. +#include "scmod.hxx"
  883. +#include "viewfunc.hxx"
  884.  
  885. #include <math.h>
  886. #include <float.h>
  887. @@ -4509,6 +4512,26 @@ StackVar ScInterpreter::Interpret()
  888.     if (!xResult)
  889.         xResult = new FormulaErrorToken( errUnknownStackVariable);
  890.  
  891. +    if ( SC_MOD()->GetFormulaOptions().GetUnitValidat() )
  892. +    {
  893. +        using namespace sc::units;
  894. +
  895. +        boost::shared_ptr< Units > pUnits = Units::GetUnits();
  896. +        ScDocument* pDoc = pDok;
  897. +
  898. +        FormulaStatus aStatus = pUnits->verifyFormula( &rArr, aPos, pDoc );
  899. +        OUString aUnit = pUnits->getUnitsForRange(ScRangeList(ScRange(aPos, aPo
  900. +        pMyFormulaCell->SetFormulaStatus( aStatus );
  901. +        if ( aStatus == FormulaStatus::VALID || aStatus == FormulaStatus::UNKNO
  902. +        {
  903. +            SAL_INFO( "sc.units", "verification successful" );
  904. +        }
  905. +        else
  906. +        {
  907. +            SAL_INFO( "sc.units", "verification failed" );
  908. +        }
  909. +    }
  910. +
  911.     // release tokens in expression stack
  912.     FormulaToken** p = pStack;
  913.     while( maxsp-- )
  914. diff --git a/sc/source/core/units/unitsimpl.cxx b/sc/source/core/units/unitsimpl
  915. index 0c89201..f2101c2 100644
  916. --- a/sc/source/core/units/unitsimpl.cxx
  917. +++ b/sc/source/core/units/unitsimpl.cxx
  918. @@ -526,11 +526,11 @@ HeaderUnitDescriptor UnitsImpl::findHeaderUnitForCell(cons
  919.     return { false, UtUnit(), boost::optional< ScAddress >(), OUString(""), -1
  920. }
  921.  
  922. -FormulaStatus UnitsImpl::verifyFormula(ScTokenArray* pArray, const ScAddress& r
  923. +FormulaStatus UnitsImpl::verifyFormula(ScTokenArray* pArray, const ScAddress& r
  924. +{
  925. #if DEBUG_FORMULA_COMPILER
  926.     pArray->Dump();
  927. #endif
  928. -
  929.     stack< RAUSItem > aStack;
  930.  
  931.     for (FormulaToken* pToken = pArray->FirstRPN(); pToken != 0; pToken = pArra
  932. diff --git a/sc/source/core/units/unitsimpl.hxx b/sc/source/core/units/unitsimpl
  933. index f3e2cb8..5bdee2a 100644
  934. --- a/sc/source/core/units/unitsimpl.hxx
  935. +++ b/sc/source/core/units/unitsimpl.hxx
  936. @@ -137,6 +137,7 @@ private:
  937.     HeaderUnitDescriptor extractUnitFromHeaderString(const OUString& rHeader);
  938.  
  939.     static OUString extractUnitStringFromFormat(const OUString& rFormatString);
  940. +
  941.     static OUString extractUnitStringForCell(const ScAddress& rAddress, ScDocum
  942.  
  943.     /**
  944.  
  945. commit fc2a471d90521e1a9500b27088bbd122002049b0
  946. Author: Benjamin Ni <benjaminniri@hotmail.com>
  947. Date:   Fri Jul 3 04:40:29 2015 +0100
  948.  
  949.    Added checkbox and config option to toggle unit verification
  950.    
  951.    Change-Id: Ie218821d05466b77ed42a26365b04a6798dec067
  952.  
  953. diff --git a/officecfg/registry/schema/org/openoffice/Office/Calc.xcs b/officecf
  954. index bb74d74..d25ef1c 100644
  955. --- a/officecfg/registry/schema/org/openoffice/Office/Calc.xcs
  956. +++ b/officecfg/registry/schema/org/openoffice/Office/Calc.xcs
  957. @@ -1424,6 +1424,13 @@
  958.           </info>
  959.           <value>false</value>
  960.         </prop>
  961. +        <prop oor:name="UnitValidat" oor:type="xs:boolean" oor:nillable="false"
  962. +          <!-- UIHints: Tools - Options  Spreadsheet  Formula -->
  963. +          <info>
  964. +            <desc>Whether to check for unit consistency upon entering formulae.
  965. +          </info>
  966. +          <value>false</value>
  967. +        </prop>
  968.         <prop oor:name="SeparatorArg" oor:type="xs:string" oor:nillable="false"
  969.           <!-- UIHints: Tools - Options  Spreadsheet  Formula -->
  970.           <info>
  971. diff --git a/sc/inc/formulaopt.hxx b/sc/inc/formulaopt.hxx
  972. index 5b71b2a..b3ad9f6 100644
  973. --- a/sc/inc/formulaopt.hxx
  974. +++ b/sc/inc/formulaopt.hxx
  975. @@ -23,6 +23,7 @@ class SC_DLLPUBLIC ScFormulaOptions
  976. {
  977. private:
  978.     bool bUseEnglishFuncName;     // use English function name even if the loca
  979. +    bool bUnitValidat;
  980.     formula::FormulaGrammar::Grammar eFormulaGrammar;  // formula grammar used
  981.     ScCalcConfig aCalcConfig;
  982.  
  983. @@ -50,6 +51,9 @@ public:
  984.     void SetUseEnglishFuncName( bool bVal ) { bUseEnglishFuncName = bVal; }
  985.     bool GetUseEnglishFuncName() const { return bUseEnglishFuncName; }
  986.  
  987. +    void SetUnitValidat( bool bVal ) { bUnitValidat = bVal; }
  988. +    bool GetUnitValidat() const { return bUnitValidat; }
  989. +
  990.     void SetFormulaSepArg(const OUString& rSep) { aFormulaSepArg = rSep; }
  991.     OUString GetFormulaSepArg() const { return aFormulaSepArg; }
  992.  
  993. diff --git a/sc/source/core/tool/formulaopt.cxx b/sc/source/core/tool/formulaopt
  994. index 1e0a5f5..8e7e54f 100644
  995. --- a/sc/source/core/tool/formulaopt.cxx
  996. +++ b/sc/source/core/tool/formulaopt.cxx
  997. @@ -34,8 +34,9 @@ ScFormulaOptions::ScFormulaOptions()
  998.  
  999. ScFormulaOptions::ScFormulaOptions( const ScFormulaOptions& rCpy ) :
  1000.     bUseEnglishFuncName ( rCpy.bUseEnglishFuncName ),
  1001. +    bUnitValidat        ( rCpy.bUnitValidat ),
  1002.     eFormulaGrammar     ( rCpy.eFormulaGrammar ),
  1003. -    aCalcConfig(rCpy.aCalcConfig),
  1004. +    aCalcConfig         ( rCpy.aCalcConfig ),
  1005.     aFormulaSepArg      ( rCpy.aFormulaSepArg ),
  1006.     aFormulaSepArrayRow ( rCpy.aFormulaSepArrayRow ),
  1007.     aFormulaSepArrayCol ( rCpy.aFormulaSepArrayCol ),
  1008. @@ -51,6 +52,7 @@ ScFormulaOptions::~ScFormulaOptions()
  1009. void ScFormulaOptions::SetDefaults()
  1010. {
  1011.     bUseEnglishFuncName = false;
  1012. +    bUnitValidat = false;
  1013.     eFormulaGrammar     = ::formula::FormulaGrammar::GRAM_NATIVE;
  1014.     meOOXMLRecalc = RECALC_ASK;
  1015.     meODFRecalc = RECALC_ASK;
  1016. @@ -127,8 +129,9 @@ const LocaleDataWrapper& ScFormulaOptions::GetLocaleDataWrap
  1017. ScFormulaOptions& ScFormulaOptions::operator=( const ScFormulaOptions& rCpy )
  1018. {
  1019.     bUseEnglishFuncName = rCpy.bUseEnglishFuncName;
  1020. +    bUnitValidat        = rCpy.bUnitValidat;
  1021.     eFormulaGrammar     = rCpy.eFormulaGrammar;
  1022. -    aCalcConfig = rCpy.aCalcConfig;
  1023. +    aCalcConfig         = rCpy.aCalcConfig;
  1024.     aFormulaSepArg      = rCpy.aFormulaSepArg;
  1025.     aFormulaSepArrayRow = rCpy.aFormulaSepArrayRow;
  1026.     aFormulaSepArrayCol = rCpy.aFormulaSepArrayCol;
  1027. @@ -140,8 +143,9 @@ ScFormulaOptions& ScFormulaOptions::operator=( const ScFormu
  1028. bool ScFormulaOptions::operator==( const ScFormulaOptions& rOpt ) const
  1029. {
  1030.     return bUseEnglishFuncName == rOpt.bUseEnglishFuncName
  1031. +        && bUnitValidat        == rOpt.bUnitValidat
  1032.         && eFormulaGrammar     == rOpt.eFormulaGrammar
  1033. -        && aCalcConfig == rOpt.aCalcConfig
  1034. +        && aCalcConfig         == rOpt.aCalcConfig
  1035.         && aFormulaSepArg      == rOpt.aFormulaSepArg
  1036.         && aFormulaSepArrayRow == rOpt.aFormulaSepArrayRow
  1037.         && aFormulaSepArrayCol == rOpt.aFormulaSepArrayCol
  1038. @@ -185,22 +189,23 @@ SfxPoolItem* ScTpFormulaItem::Clone( SfxItemPool * ) const
  1039.  
  1040. #define CFGPATH_FORMULA           "Office.Calc/Formula"
  1041.  
  1042. -#define SCFORMULAOPT_GRAMMAR              0
  1043. -#define SCFORMULAOPT_ENGLISH_FUNCNAME     1
  1044. -#define SCFORMULAOPT_SEP_ARG              2
  1045. -#define SCFORMULAOPT_SEP_ARRAY_ROW        3
  1046. -#define SCFORMULAOPT_SEP_ARRAY_COL        4
  1047. -#define SCFORMULAOPT_STRING_REF_SYNTAX    5
  1048. -#define SCFORMULAOPT_STRING_CONVERSION    6
  1049. -#define SCFORMULAOPT_EMPTY_OUSTRING_AS_ZERO 7
  1050. -#define SCFORMULAOPT_OOXML_RECALC         8
  1051. -#define SCFORMULAOPT_ODF_RECALC           9
  1052. -#define SCFORMULAOPT_OPENCL_AUTOSELECT   10
  1053. -#define SCFORMULAOPT_OPENCL_DEVICE       11
  1054. -#define SCFORMULAOPT_OPENCL_SUBSET_ONLY  12
  1055. -#define SCFORMULAOPT_OPENCL_MIN_SIZE     13
  1056. -#define SCFORMULAOPT_OPENCL_SUBSET_OPS   14
  1057. -#define SCFORMULAOPT_COUNT               15
  1058. +#define SCFORMULAOPT_GRAMMAR                0
  1059. +#define SCFORMULAOPT_ENGLISH_FUNCNAME       1
  1060. +#define SCFORMULAOPT_UNIT_VALIDAT           2
  1061. +#define SCFORMULAOPT_SEP_ARG                3
  1062. +#define SCFORMULAOPT_SEP_ARRAY_ROW          4
  1063. +#define SCFORMULAOPT_SEP_ARRAY_COL          5
  1064. +#define SCFORMULAOPT_STRING_REF_SYNTAX      6
  1065. +#define SCFORMULAOPT_STRING_CONVERSION      7
  1066. +#define SCFORMULAOPT_EMPTY_OUSTRING_AS_ZERO 8
  1067. +#define SCFORMULAOPT_OOXML_RECALC           9
  1068. +#define SCFORMULAOPT_ODF_RECALC            10
  1069. +#define SCFORMULAOPT_OPENCL_AUTOSELECT     11
  1070. +#define SCFORMULAOPT_OPENCL_DEVICE         12
  1071. +#define SCFORMULAOPT_OPENCL_SUBSET_ONLY    13
  1072. +#define SCFORMULAOPT_OPENCL_MIN_SIZE       14
  1073. +#define SCFORMULAOPT_OPENCL_SUBSET_OPS     15
  1074. +#define SCFORMULAOPT_COUNT                 16
  1075.  
  1076. Sequence<OUString> ScFormulaCfg::GetPropertyNames()
  1077. {
  1078. @@ -208,6 +213,7 @@ Sequence<OUString> ScFormulaCfg::GetPropertyNames()
  1079.     {
  1080.         "Syntax/Grammar",                // SCFORMULAOPT_GRAMMAR
  1081.         "Syntax/EnglishFunctionName",    // SCFORMULAOPT_ENGLISH_FUNCNAME
  1082. +        "Syntax/UnitValidat",            // SCFORMULAOPT_UNIT_VALIDAT
  1083.         "Syntax/SeparatorArg",           // SCFORMULAOPT_SEP_ARG
  1084.         "Syntax/SeparatorArrayRow",      // SCFORMULAOPT_SEP_ARRAY_ROW
  1085.         "Syntax/SeparatorArrayCol",      // SCFORMULAOPT_SEP_ARRAY_COL
  1086. @@ -236,6 +242,7 @@ ScFormulaCfg::PropsToIds ScFormulaCfg::GetPropNamesToId()
  1087.     static sal_uInt16 aVals[] = {
  1088.         SCFORMULAOPT_GRAMMAR,
  1089.         SCFORMULAOPT_ENGLISH_FUNCNAME,
  1090. +        SCFORMULAOPT_UNIT_VALIDAT,
  1091.         SCFORMULAOPT_SEP_ARG,
  1092.         SCFORMULAOPT_SEP_ARRAY_ROW,
  1093.         SCFORMULAOPT_SEP_ARRAY_COL,
  1094. @@ -319,6 +326,13 @@ void ScFormulaCfg::UpdateFromProperties( const Sequence<OUS
  1095.                         SetUseEnglishFuncName(bEnglish);
  1096.                 }
  1097.                 break;
  1098. +                case SCFORMULAOPT_UNIT_VALIDAT:
  1099. +                {
  1100. +                    bool bValidat = false;
  1101. +                    if (pValues[nProp] >>= bValidat)
  1102. +                        SetUnitValidat(bValidat);
  1103. +                }
  1104. +                break;
  1105.                 case SCFORMULAOPT_SEP_ARG:
  1106.                 {
  1107.                     OUString aSep;
  1108. @@ -531,6 +545,12 @@ void ScFormulaCfg::ImplCommit()
  1109.                 pValues[nProp] <<= b;
  1110.             }
  1111.             break;
  1112. +            case SCFORMULAOPT_UNIT_VALIDAT:
  1113. +            {
  1114. +                bool b = GetUnitValidat();
  1115. +                pValues[nProp] <<= b;
  1116. +            }
  1117. +            break;
  1118.             case SCFORMULAOPT_SEP_ARG:
  1119.                 pValues[nProp] <<= GetFormulaSepArg();
  1120.             break;
  1121. diff --git a/sc/source/ui/inc/tpformula.hxx b/sc/source/ui/inc/tpformula.hxx
  1122. index 7397d06..e94f20d 100644
  1123. --- a/sc/source/ui/inc/tpformula.hxx
  1124. +++ b/sc/source/ui/inc/tpformula.hxx
  1125. @@ -58,6 +58,7 @@ private:
  1126. private:
  1127.     VclPtr<ListBox>     mpLbFormulaSyntax;
  1128.     VclPtr<CheckBox>    mpCbEnglishFuncName;
  1129. +    VclPtr<CheckBox>    mpCbUnitValidat;
  1130.  
  1131.     VclPtr<RadioButton> mpBtnCustomCalcDefault;
  1132.     VclPtr<RadioButton> mpBtnCustomCalcCustom;
  1133. diff --git a/sc/source/ui/optdlg/tpformula.cxx b/sc/source/ui/optdlg/tpformula.c
  1134. index 3e7feb1..949a155 100644
  1135. --- a/sc/source/ui/optdlg/tpformula.cxx
  1136. +++ b/sc/source/ui/optdlg/tpformula.cxx
  1137. @@ -44,6 +44,7 @@ ScTpFormulaOptions::ScTpFormulaOptions(vcl::Window* pParent, c
  1138. {
  1139.     get(mpLbFormulaSyntax, "formulasyntax");
  1140.     get(mpCbEnglishFuncName, "englishfuncname");
  1141. +    get(mpCbUnitValidat, "unitvalidat");
  1142.     get(mpBtnCustomCalcDefault, "calcdefault");
  1143.     get(mpBtnCustomCalcCustom, "calccustom");
  1144.     get(mpBtnCustomCalcDetails, "details");
  1145. @@ -88,6 +89,7 @@ void ScTpFormulaOptions::dispose()
  1146. {
  1147.     mpLbFormulaSyntax.clear();
  1148.     mpCbEnglishFuncName.clear();
  1149. +    mpCbUnitValidat.clear();
  1150.     mpBtnCustomCalcDefault.clear();
  1151.     mpBtnCustomCalcCustom.clear();
  1152.     mpBtnCustomCalcDetails.clear();
  1153. @@ -247,6 +249,7 @@ bool ScTpFormulaOptions::FillItemSet(SfxItemSet* rCoreSet)
  1154.     bool bRet = false;
  1155.     ScFormulaOptions aOpt;
  1156.     bool bEnglishFuncName = mpCbEnglishFuncName->IsChecked();
  1157. +    bool bUnitValidat     = mpCbUnitValidat->IsChecked();
  1158.     sal_Int16 aSyntaxPos      = mpLbFormulaSyntax->GetSelectEntryPos();
  1159.     OUString aSep             = mpEdSepFuncArg->GetText();
  1160.     OUString aSepArrayCol     = mpEdSepArrayCol->GetText();
  1161. @@ -262,6 +265,7 @@ bool ScTpFormulaOptions::FillItemSet(SfxItemSet* rCoreSet)
  1162.  
  1163.     if ( mpLbFormulaSyntax->GetSavedValue() != aSyntaxPos
  1164.          || mpCbEnglishFuncName->GetSavedValue() != (bEnglishFuncName ? 1 : 0)
  1165. +         || mpCbUnitValidat->GetSavedValue() != (bUnitValidat ? 1 : 0)
  1166.          || static_cast<OUString>(mpEdSepFuncArg->GetSavedValue()) != aSep
  1167.          || static_cast<OUString>(mpEdSepArrayCol->GetSavedValue()) != aSepArra
  1168.          || static_cast<OUString>(mpEdSepArrayRow->GetSavedValue()) != aSepArra
  1169. @@ -289,6 +293,7 @@ bool ScTpFormulaOptions::FillItemSet(SfxItemSet* rCoreSet)
  1170.  
  1171.         aOpt.SetFormulaSyntax(eGram);
  1172.         aOpt.SetUseEnglishFuncName(bEnglishFuncName);
  1173. +        aOpt.SetUnitValidat(bUnitValidat);
  1174.         aOpt.SetFormulaSepArg(aSep);
  1175.         aOpt.SetFormulaSepArrayCol(aSepArrayCol);
  1176.         aOpt.SetFormulaSepArrayRow(aSepArrayRow);
  1177. @@ -342,6 +347,10 @@ void ScTpFormulaOptions::Reset(const SfxItemSet* rCoreSet)
  1178.     mpCbEnglishFuncName->Check( aOpt.GetUseEnglishFuncName() );
  1179.     mpCbEnglishFuncName->SaveValue();
  1180.  
  1181. +    // unit validation
  1182. +    mpCbUnitValidat->Check( aOpt.GetUnitValidat() );
  1183. +    mpCbUnitValidat->SaveValue();
  1184. +
  1185.     // Separators
  1186.     OUString aSep = aOpt.GetFormulaSepArg();
  1187.     OUString aSepArrayRow = aOpt.GetFormulaSepArrayRow();
  1188. diff --git a/sc/source/ui/view/viewfunc.cxx b/sc/source/ui/view/viewfunc.cxx
  1189. index a22aff0..7220246 100644
  1190. --- a/sc/source/ui/view/viewfunc.cxx
  1191. +++ b/sc/source/ui/view/viewfunc.cxx
  1192. @@ -469,25 +469,28 @@ void ScViewFunc::EnterData( SCCOL nCol, SCROW nRow, SCTAB
  1193.             }
  1194.  
  1195. #ifdef ENABLE_CALC_UNITVERIFICATION
  1196. -            boost::shared_ptr< Units > pUnits = Units::GetUnits();
  1197. -            FormulaStatus aStatus = pUnits->verifyFormula( pArr, aPos, pDoc );
  1198. -            if ( aStatus == FormulaStatus::VALID || aStatus == FormulaStatus::U
  1199. +            if ( SC_MOD()->GetFormulaOptions().GetUnitValidat() )
  1200.             {
  1201. -                SAL_INFO( "sc.units", "verification successful" );
  1202. -
  1203. -                // If we have fixed a previously erronous cell we need to make
  1204. -                // the associate warning infobar. It's simplest to simply call
  1205. -                // with the hypothetical ID, and RemoveInfoBar deals with the r
  1206. -                // (The cell address is used as it's infobar id, see NotifyUnit
  1207. -                // for further details.)
  1208. -                SfxViewFrame* pViewFrame = GetViewData().GetViewShell()->GetFra
  1209. -                OUString sAddress = aPos.Format( SCA_BITS, pDoc );
  1210. -                pViewFrame->RemoveInfoBar( sAddress );
  1211. -            }
  1212. -            else
  1213. -            {
  1214. -                SAL_INFO( "sc.units", "verification failed" );
  1215. -                NotifyUnitErrorInFormula( aPos, pDoc, aStatus );
  1216. +                boost::shared_ptr< Units > pUnits = Units::GetUnits();
  1217. +                FormulaStatus aStatus = pUnits->verifyFormula( pArr, aPos, pDoc
  1218. +                if ( aStatus == FormulaStatus::VALID || aStatus == FormulaStatu
  1219. +                {
  1220. +                    SAL_INFO( "sc.units", "verification successful" );
  1221. +
  1222. +                    // If we have fixed a previously erronous cell we need to m
  1223. +                    // the associate warning infobar. It's simplest to simply c
  1224. +                    // with the hypothetical ID, and RemoveInfoBar deals with t
  1225. +                    // (The cell address is used as it's infobar id, see Notify
  1226. +                    // for further details.)
  1227. +                    SfxViewFrame* pViewFrame = GetViewData().GetViewShell()->Ge
  1228. +                    OUString sAddress = aPos.Format( SCA_BITS, pDoc );
  1229. +                    pViewFrame->RemoveInfoBar( sAddress );
  1230. +                }
  1231. +                else
  1232. +                {
  1233. +                    SAL_INFO( "sc.units", "verification failed" );
  1234. +                    NotifyUnitErrorInFormula( aPos, pDoc, aStatus );
  1235. +                }
  1236.             }
  1237. #endif
  1238.         } while ( bAgain );
  1239. @@ -583,17 +586,21 @@ void ScViewFunc::EnterData( SCCOL nCol, SCROW nRow, SCTAB
  1240.             }
  1241.  
  1242. #ifdef ENABLE_CALC_UNITVERIFICATION
  1243. -            boost::shared_ptr< Units > pUnits = Units::GetUnits();
  1244. +            if ( SC_MOD()->GetFormulaOptions().GetUnitValidat() )
  1245. +            {
  1246. +                boost::shared_ptr< Units > pUnits = Units::GetUnits();
  1247.  
  1248. -            OUString sHeaderUnit, sCellUnit;
  1249. -            ScAddress aHeaderAddress;
  1250. +                OUString sHeaderUnit, sCellUnit;
  1251. +                ScAddress aHeaderAddress;
  1252.  
  1253. -            if ( pUnits->isCellConversionRecommended( aAddress, pDoc, sHeaderUn
  1254. -                NotifyUnitConversionRecommended( aAddress, pDoc, sHeaderUnit, a
  1255. -            } else {
  1256. -                SfxViewFrame* pViewFrame = GetViewData().GetViewShell()->GetFra
  1257. -                OUString sAddress = aAddress.Format( SCA_BITS, pDoc );
  1258. -                pViewFrame->RemoveInfoBar( sAddress );
  1259. +                if ( pUnits->isCellConversionRecommended( aAddress, pDoc, sHead
  1260. +                    NotifyUnitConversionRecommended( aAddress, pDoc, sHeaderUni
  1261. +                else
  1262. +                {
  1263. +                    SfxViewFrame* pViewFrame = GetViewData().GetViewShell()->Ge
  1264. +                    OUString sAddress = aAddress.Format( SCA_BITS, pDoc );
  1265. +                    pViewFrame->RemoveInfoBar( sAddress );
  1266. +                }
  1267. +            if ( SC_MOD()->GetFormulaOptions().GetUnitValidat() )
  1268. +            {
  1269. +                boost::shared_ptr< Units > pUnits = Units::GetUnits();
  1270.  
  1271. -            OUString sHeaderUnit, sCellUnit;
  1272. -            ScAddress aHeaderAddress;
  1273. +                OUString sHeaderUnit, sCellUnit;
  1274. +                ScAddress aHeaderAddress;
  1275.  
  1276. -            if ( pUnits->isCellConversionRecommended( aAddress, pDoc, sHeaderUn
  1277. -                NotifyUnitConversionRecommended( aAddress, pDoc, sHeaderUnit, a
  1278. -            } else {
  1279. -                SfxViewFrame* pViewFrame = GetViewData().GetViewShell()->GetFra
  1280. -                OUString sAddress = aAddress.Format( SCA_BITS, pDoc );
  1281. -                pViewFrame->RemoveInfoBar( sAddress );
  1282. +                if ( pUnits->isCellConversionRecommended( aAddress, pDoc, sHead
  1283. +                    NotifyUnitConversionRecommended( aAddress, pDoc, sHeaderUni
  1284. +                else
  1285. +                {
  1286. +                    SfxViewFrame* pViewFrame = GetViewData().GetViewShell()->Ge
  1287. +                    OUString sAddress = aAddress.Format( SCA_BITS, pDoc );
  1288. +                    pViewFrame->RemoveInfoBar( sAddress );
  1289. +                }
  1290.             }
  1291. #endif
  1292.         }
  1293. diff --git a/sc/uiconfig/scalc/ui/optformula.ui b/sc/uiconfig/scalc/ui/optformul
  1294. index 4e66f81..2b63101 100644
  1295. --- a/sc/uiconfig/scalc/ui/optformula.ui
  1296. +++ b/sc/uiconfig/scalc/ui/optformula.ui
  1297. @@ -32,6 +32,23 @@
  1298.                 <property name="can_focus">False</property>
  1299.                 <property name="row_spacing">6</property>
  1300.                 <child>
  1301. +                  <object class="GtkCheckButton" id="unitvalidat">
  1302. +                    <property name="label" translatable="yes">Enable unit valid
  1303. +                    <property name="visible">True</property>
  1304. +                    <property name="can_focus">True</property>
  1305. +                    <property name="receives_default">False</property>
  1306. +                    <property name="use_underline">False</property>
  1307. +                    <property name="xalign">0</property>
  1308. +                    <property name="draw_indicator">True</property>
  1309. +                  </object>
  1310. +                  <packing>
  1311. +                    <property name="left_attach">0</property>
  1312. +                    <property name="top_attach">2</property>
  1313. +                    <property name="width">1</property>
  1314. +                    <property name="height">1</property>
  1315. +                  </packing>
  1316. +                </child>
  1317. +                <child>
  1318.                   <object class="GtkCheckButton" id="englishfuncname">
  1319.                     <property name="label" translatable="yes">Use English funct
  1320.                     <property name="visible">True</property>
  1321.  
  1322. commit c565edd82b3bf77a9e2333610b495a2916e4ab16
  1323. Author: Benjamin Ni <benjaminniri@hotmail.com>
  1324. Date:   Fri Jul 3 16:45:52 2015 +0100
  1325.  
  1326.    tdf#92455 - inconsistent unit handling
  1327.    
  1328.    Change-Id: Ifbb85a32ef9d84199d17cedd28fa0f9e66eabf66
  1329.  
  1330. diff --git a/sc/source/core/units/unitsimpl.cxx b/sc/source/core/units/unitsimpl
  1331. index c2e39f9..0c89201 100644
  1332. --- a/sc/source/core/units/unitsimpl.cxx
  1333. +++ b/sc/source/core/units/unitsimpl.cxx
  1334. @@ -789,8 +789,9 @@ bool UnitsImpl::convertCellUnitsForColumnRange(const ScRange
  1335.                 }
  1336. +            if ( SC_MOD()->GetFormulaOptions().GetUnitValidat() )
  1337. +            {
  1338. +                boost::shared_ptr< Units > pUnits = Units::GetUnits();
  1339.  
  1340. -            OUString sHeaderUnit, sCellUnit;
  1341. -            ScAddress aHeaderAddress;
  1342. +                OUString sHeaderUnit, sCellUnit;
  1343. +                ScAddress aHeaderAddress;
  1344.  
  1345. -            if ( pUnits->isCellConversionRecommended( aAddress, pDoc, sHeaderUn
  1346. -                NotifyUnitConversionRecommended( aAddress, pDoc, sHeaderUnit, a
  1347. -            } else {
  1348. -                SfxViewFrame* pViewFrame = GetViewData().GetViewShell()->GetFra
  1349. -                OUString sAddress = aAddress.Format( SCA_BITS, pDoc );
  1350. -                pViewFrame->RemoveInfoBar( sAddress );
  1351. +                if ( pUnits->isCellConversionRecommended( aAddress, pDoc, sHead
  1352. +                    NotifyUnitConversionRecommended( aAddress, pDoc, sHeaderUni
  1353. +                else
  1354. +                {
  1355. +                    SfxViewFrame* pViewFrame = GetViewData().GetViewShell()->Ge
  1356. +                    OUString sAddress = aAddress.Format( SCA_BITS, pDoc );
  1357. +                    pViewFrame->RemoveInfoBar( sAddress );
  1358. +                }
  1359.             }
  1360. #endif
  1361.         }
  1362. diff --git a/sc/uiconfig/scalc/ui/optformula.ui b/sc/uiconfig/scalc/ui/optformul
  1363. index 4e66f81..2b63101 100644
  1364. --- a/sc/uiconfig/scalc/ui/optformula.ui
  1365. +++ b/sc/uiconfig/scalc/ui/optformula.ui
  1366. @@ -32,6 +32,23 @@
  1367.                 <property name="can_focus">False</property>
  1368.                 <property name="row_spacing">6</property>
  1369.                 <child>
  1370. +                  <object class="GtkCheckButton" id="unitvalidat">
  1371. +                    <property name="label" translatable="yes">Enable unit valid
  1372. +                    <property name="visible">True</property>
  1373. +                    <property name="can_focus">True</property>
  1374. +                    <property name="receives_default">False</property>
  1375. +                    <property name="use_underline">False</property>
  1376. +                    <property name="xalign">0</property>
  1377. +                    <property name="draw_indicator">True</property>
  1378. +                  </object>
  1379. +                  <packing>
  1380. +                    <property name="left_attach">0</property>
  1381. +                    <property name="top_attach">2</property>
  1382.                 <property name="row_spacing">6</property>
  1383.                 <child>
  1384. +                  <object class="GtkCheckButton" id="unitvalidat">
  1385. +                    <property name="label" translatable="yes">Enable unit valid
  1386. +                    <property name="visible">True</property>
  1387. +                    <property name="can_focus">True</property>
  1388. +                    <property name="receives_default">False</property>
  1389. +                    <property name="use_underline">False</property>
  1390. +                    <property name="xalign">0</property>
  1391. +                    <property name="draw_indicator">True</property>
  1392. +                  </object>
  1393. +                  <packing>
  1394. +                    <property name="left_attach">0</property>
  1395. +                    <property name="top_attach">2</property>
  1396. +                    <property name="width">1</property>
  1397. +                    <property name="height">1</property>
  1398. +                  </packing>
  1399. +                </child>
  1400. +                <child>
  1401.                   <object class="GtkCheckButton" id="englishfuncname">
  1402.                     <property name="label" translatable="yes">Use English funct
  1403.                     <property name="visible">True</property>
  1404.  
  1405. :
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!