strepsirrhini/office-gobmx
9
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions
office-gobmx/test/source/sheet/xnamedranges.cxx
Noel Grandin 008f4273ae loplugin:ostr in test 
Change-Id: Ie261167fc3e1ed9073210e0f8b179455da340c83
Reviewed-on: https://gerrit.libreoffice.org/c/core/+/167620
Reviewed-by: Noel Grandin <noel.grandin@collabora.co.uk>
Tested-by: Jenkins
2024-05-14 11:47:53 +02:00

195 lines
8.1 KiB
C++
Raw Blame History

/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
/*
* This file is part of the LibreOffice project.
*
* This Source Code Form is subject to the terms of the Mozilla Public
* License, v. 2.0. If a copy of the MPL was not distributed with this
* file, You can obtain one at http://mozilla.org/MPL/2.0/.
*/
#include <test/sheet/xnamedranges.hxx>
#include <rtl/ustring.hxx>
#include <com/sun/star/container/XIndexAccess.hpp>
#include <com/sun/star/sheet/Border.hpp>
#include <com/sun/star/sheet/NamedRangeFlag.hpp>
#include <com/sun/star/sheet/XCellRangeAddressable.hpp>
#include <com/sun/star/sheet/XCellRangeReferrer.hpp>
#include <com/sun/star/sheet/XNamedRange.hpp>
#include <com/sun/star/sheet/XNamedRanges.hpp>
#include <com/sun/star/table/CellAddress.hpp>
#include <com/sun/star/table/CellRangeAddress.hpp>
#include <com/sun/star/table/XCell.hpp>
#include <com/sun/star/text/XTextRange.hpp>
#include <com/sun/star/uno/Reference.hxx>
#include <cppunit/TestAssert.h>
#include <iostream>
using namespace css;
using namespace css::uno;
namespace apitest
{
void XNamedRanges::testAddNewByName()
{
uno::Reference<sheet::XNamedRanges> xNamedRanges(init(), UNO_QUERY_THROW);
uno::Reference<container::XNameAccess> xNamedRangesNameAccess(getXNamedRanges(1),
UNO_QUERY_THROW);
table::CellAddress aBaseAddress(0, 0, 0);
sal_Int32 nType = 0;
OUString aName1(u"type_0"_ustr);
xNamedRanges->addNewByName(aName1, u"D1"_ustr, aBaseAddress, nType);
CPPUNIT_ASSERT_MESSAGE("Failed to create Namedrange Type 0 - Normal case",
xNamedRanges->hasByName(aName1));
nType = ::sheet::NamedRangeFlag::COLUMN_HEADER;
OUString aName2(u"type_COLUMN_HEADER"_ustr);
xNamedRanges->addNewByName(aName2, u"D2"_ustr, aBaseAddress, nType);
CPPUNIT_ASSERT_MESSAGE("Failed to create Namedrange Type COLUMN_HEADER",
xNamedRanges->hasByName(aName2));
nType = ::sheet::NamedRangeFlag::FILTER_CRITERIA;
OUString aName3(u"type_FILTER_CRITERIA"_ustr);
xNamedRanges->addNewByName(aName3, u"D3"_ustr, aBaseAddress, nType);
CPPUNIT_ASSERT_MESSAGE("Failed to create Namedrange Type FILTER_CRITERIA",
xNamedRanges->hasByName(aName3));
nType = ::sheet::NamedRangeFlag::PRINT_AREA;
OUString aName4(u"type_PRINT_AREA"_ustr);
xNamedRanges->addNewByName(aName4, u"D4"_ustr, aBaseAddress, nType);
CPPUNIT_ASSERT_MESSAGE("Failed to create Namedrange Type PRINT_AREA",
xNamedRanges->hasByName(aName4));
nType = ::sheet::NamedRangeFlag::ROW_HEADER;
OUString aName5(u"type_ROW_HEADER"_ustr);
xNamedRanges->addNewByName(aName5, u"D5"_ustr, aBaseAddress, nType);
CPPUNIT_ASSERT_MESSAGE("Failed to create Namedrange Type ROW_HEADER",
xNamedRanges->hasByName(aName5));
// tdf#119457 - check for a valid range name
OUString aName6(u"type_INVALID_BAD_STRING.+:"_ustr);
CPPUNIT_ASSERT_THROW(xNamedRanges->addNewByName(aName6, u"D6"_ustr, aBaseAddress, 0),
uno::RuntimeException);
CPPUNIT_ASSERT_MESSAGE("Created Namedrange with invalid name",
!xNamedRanges->hasByName(aName6));
}
void XNamedRanges::testAddNewFromTitles()
{
uno::Reference<sheet::XNamedRanges> xNamedRanges(getXNamedRanges(1), UNO_QUERY_THROW);
uno::Reference<container::XIndexAccess> xNamedRangesIndex(xNamedRanges, UNO_QUERY_THROW);
uno::Reference<container::XNameAccess> xNamedRangesNameAccess(xNamedRanges, UNO_QUERY_THROW);
table::CellRangeAddress aCellRangeAddress(1, 0, 0, 3, 3);
OUString aString;
uno::Reference<table::XCell> xCell;
xNamedRanges->addNewFromTitles(aCellRangeAddress, sheet::Border_TOP);
for (sal_Int32 i = 1; i < 4; i++)
{
// verify namedrange exists
xCell = xSheet->getCellByPosition(i, 0);
uno::Reference<text::XTextRange> xTextRange(xCell, UNO_QUERY_THROW);
aString = xTextRange->getString();
std::cout << "addNewFromTitles: verify " << aString << std::endl;
CPPUNIT_ASSERT_MESSAGE("Non existing NamedRange", xNamedRanges->hasByName(aString));
// verify it points on the right cell
uno::Any aNr = xNamedRangesNameAccess->getByName(aString);
uno::Reference<sheet::XNamedRange> xNamedRange(aNr, UNO_QUERY_THROW);
uno::Reference<sheet::XCellRangeReferrer> xCellRangeRef(xNamedRange, UNO_QUERY_THROW);
uno::Reference<sheet::XCellRangeAddressable> xCellRangeAdr(
xCellRangeRef->getReferredCells(), UNO_QUERY_THROW);
table::CellRangeAddress cellRangeAddress = xCellRangeAdr->getRangeAddress();
CPPUNIT_ASSERT_EQUAL(i, cellRangeAddress.EndColumn);
CPPUNIT_ASSERT_EQUAL(i, cellRangeAddress.StartColumn);
CPPUNIT_ASSERT_EQUAL(sal_Int32(1), cellRangeAddress.StartRow);
CPPUNIT_ASSERT_EQUAL(sal_Int32(3), cellRangeAddress.EndRow);
CPPUNIT_ASSERT_EQUAL(sal_Int16(1), cellRangeAddress.Sheet);
}
xNamedRanges->addNewFromTitles(aCellRangeAddress, sheet::Border_LEFT);
for (sal_Int32 i = 1; i < 4; i++)
{
// verify namedrange exists
xCell = xSheet->getCellByPosition(0, i);
uno::Reference<text::XTextRange> xTextRange(xCell, UNO_QUERY_THROW);
aString = xTextRange->getString();
std::cout << "verify " << aString << std::endl;
CPPUNIT_ASSERT_MESSAGE("Non existing NamedRange", xNamedRanges->hasByName(aString));
// verify it points on the right cell
uno::Any aNr = xNamedRangesNameAccess->getByName(aString);
uno::Reference<sheet::XNamedRange> xNamedRange(aNr, UNO_QUERY_THROW);
uno::Reference<sheet::XCellRangeReferrer> xCellRangeRef(xNamedRange, UNO_QUERY_THROW);
uno::Reference<sheet::XCellRangeAddressable> xCellRangeAdr(
xCellRangeRef->getReferredCells(), UNO_QUERY_THROW);
table::CellRangeAddress cellRangeAddress = xCellRangeAdr->getRangeAddress();
CPPUNIT_ASSERT_EQUAL(i, cellRangeAddress.EndRow);
CPPUNIT_ASSERT_EQUAL(i, cellRangeAddress.StartRow);
CPPUNIT_ASSERT_EQUAL(sal_Int32(1), cellRangeAddress.StartColumn);
CPPUNIT_ASSERT_EQUAL(sal_Int32(3), cellRangeAddress.EndColumn);
CPPUNIT_ASSERT_EQUAL(sal_Int16(1), cellRangeAddress.Sheet);
}
}
void XNamedRanges::testRemoveByName()
{
uno::Reference<sheet::XNamedRanges> xNamedRanges(init(), UNO_QUERY_THROW);
uno::Reference<container::XIndexAccess> xIndex(xNamedRanges, UNO_QUERY_THROW);
bool bHasIt = xNamedRanges->hasByName(maNameToRemove);
CPPUNIT_ASSERT_MESSAGE("NamedRange initial1 does not exist, can't remove it", bHasIt);
if (!bHasIt)
return;
// remove existing
sal_Int32 nInitialCount = xIndex->getCount();
xNamedRanges->removeByName(maNameToRemove);
sal_Int32 nNewCount = xIndex->getCount();
CPPUNIT_ASSERT_EQUAL_MESSAGE("NamedRange initial1 not removed", nNewCount, nInitialCount - 1);
CPPUNIT_ASSERT_MESSAGE("Wrong NamedRange removed, initial1 still present",
!xNamedRanges->hasByName(maNameToRemove));
// try to remove non existing
xNamedRanges->removeByName(
u"dummyNonExistingNamedRange"_ustr); // an exception should be raised here
}
void XNamedRanges::testOutputList()
{
table::CellAddress aCellAddress(0, 2, 0);
uno::Reference<sheet::XNamedRanges> xNamedRanges(init(), UNO_QUERY_THROW);
uno::Reference<container::XIndexAccess> xNamedRangesIndex(init(), UNO_QUERY_THROW);
sal_Int32 nElementsCount = xNamedRangesIndex->getCount();
xNamedRanges->outputList(aCellAddress);
OUString aString;
uno::Reference<table::XCell> xCell;
for (sal_Int32 i = 0; i < nElementsCount; i++)
{
xCell = xSheet->getCellByPosition(2, i);
uno::Reference<text::XTextRange> xTextRange(xCell, UNO_QUERY_THROW);
aString = xTextRange->getString();
std::cout << "verify " << aString << std::endl;
CPPUNIT_ASSERT_MESSAGE("Non existing NamedRange", xNamedRanges->hasByName(aString));
}
}
} // namespace apitest
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
Reference in a new issue View git blame Copy permalink