sc/qa/extras/scnamedrangeobj.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 <test/unoapi_test.hxx>
  11 #include <test/sheet/xnamedrange.hxx>
  12 #include <test/container/xnamed.hxx>
  13 #include <test/sheet/xcellrangereferrer.hxx>
  14
  15 #include <com/sun/star/beans/XPropertySet.hpp>
  16 #include <com/sun/star/sheet/XSpreadsheetDocument.hpp>
  17 #include <com/sun/star/sheet/XSpreadsheet.hpp>
  18 #include <com/sun/star/sheet/XNamedRanges.hpp>
  19
  20 using namespace css;
  21 using namespace css::uno;
  22
  23 namespace sc_apitest {
  24
  25 #define NUMBER_OF_TESTS 9
  26
  27 class ScNamedRangeObj : public UnoApiTest, apitest::XNamedRange, apitest::XNamed, apitest::XCellRangeReferrer
  28 {
  29 public:
  30     ScNamedRangeObj();
  31
  32     virtual void setUp();
  33     virtual void tearDown();
  34
  35     virtual uno::Reference< uno::XInterface > init();
  36     virtual uno::Reference< sheet::XNamedRange > getNamedRange(const OUString& rRangeName);
  37
  38     CPPUNIT_TEST_SUITE(ScNamedRangeObj);
  39     CPPUNIT_TEST(testGetContent);
  40     CPPUNIT_TEST(testSetContent);
  41     CPPUNIT_TEST(testGetType);
  42     CPPUNIT_TEST(testSetType);
  43     CPPUNIT_TEST(testGetReferencePosition);
  44     CPPUNIT_TEST(testSetReferencePosition);
  45     CPPUNIT_TEST(testSetName);
  46     CPPUNIT_TEST(testGetName);
  47     CPPUNIT_TEST(testGetReferredCells);
  48     CPPUNIT_TEST_SUITE_END();
  49 private:
  50     uno::Reference< sheet::XNamedRanges > init_impl();
  51
  52     static sal_Int32 nTest;
  53     static uno::Reference< lang::XComponent > mxComponent;
  54 };
  55
  56 sal_Int32 ScNamedRangeObj::nTest = 0;
  57 uno::Reference< lang::XComponent > ScNamedRangeObj::mxComponent;
  58
  59 ScNamedRangeObj::ScNamedRangeObj():
  60         UnoApiTest("/sc/qa/extras/testdocuments"),
  61         apitest::XNamed(OUString("NamedRange")),
  62         apitest::XCellRangeReferrer(table::CellRangeAddress(0,1,7,1,7))
  63 {
  64 }
  65
  66 uno::Reference< sheet::XNamedRanges > ScNamedRangeObj::init_impl()
  67 {
  68     OUString aFileURL;
  69     createFileURL(OUString("ScNamedRangeObj.ods"), aFileURL);
  70     if(!mxComponent.is())
  71         mxComponent = loadFromDesktop(aFileURL, "com.sun.star.sheet.SpreadsheetDocument");
  72     CPPUNIT_ASSERT(mxComponent.is());
  73
  74     uno::Reference< beans::XPropertySet > xPropSet (mxComponent, UNO_QUERY_THROW);
  75     OUString aNamedRangesPropertyString("NamedRanges");
  76     uno::Reference< sheet::XNamedRanges > xNamedRanges(xPropSet->getPropertyValue(aNamedRangesPropertyString), UNO_QUERY_THROW);
  77     CPPUNIT_ASSERT(xNamedRanges.is());
  78
  79     return xNamedRanges;
  80 }
  81
  82 uno::Reference< sheet::XNamedRange> ScNamedRangeObj::getNamedRange(const OUString& rRangeName)
  83 {
  84     uno::Reference< container::XNameAccess > xNamedAccess(init_impl(), UNO_QUERY_THROW);
  85     uno::Reference< sheet::XNamedRange > xNamedRange(xNamedAccess->getByName(rRangeName), UNO_QUERY_THROW);
  86     CPPUNIT_ASSERT(xNamedRange.is());
  87
  88     return xNamedRange;
  89 }
  90
  91 uno::Reference< uno::XInterface > ScNamedRangeObj::init()
  92 {
  93     return getNamedRange(OUString("NamedRange"));
  94 }
  95
  96 void ScNamedRangeObj::setUp()
  97 {
  98     nTest++;
  99     UnoApiTest::setUp();
 100 }
 101
 102 void ScNamedRangeObj::tearDown()
 103 {
 104     if (nTest == NUMBER_OF_TESTS)
 105         closeDocument(mxComponent);
 106
 107     UnoApiTest::tearDown();
 108 }
 109
 110 CPPUNIT_TEST_SUITE_REGISTRATION(ScNamedRangeObj);
 111
 112 CPPUNIT_PLUGIN_IMPLEMENT();
 113
 114 }
 115
 116 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */