sc/qa/unit/filters-test.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 <sal/config.h>
  11
  12 #include "helper/scfiltertestbase.hxx"
  13
  14 #include <docsh.hxx>
  15 #include <document.hxx>
  16 #include <testlotus.hxx>
  17
  18 #include <osl/file.hxx>
  19 #include <sfx2/docfilt.hxx>
  20 #include <sfx2/docfile.hxx>
  21 #include <tools/stream.hxx>
  22 #include <tools/urlobj.hxx>
  23 #include <unotools/tempfile.hxx>
  24
  25 using namespace ::com::sun::star;
  26
  27 /* Implementation of Filters test */
  28
  29 class ScFiltersTest
  30     : public ScFilterTestBase
  31 {
  32 public:
  33     ScFiltersTest();
  34
  35     virtual bool load( const OUString &rFilter, const OUString &rURL,
  36         const OUString &rUserData, SfxFilterFlags nFilterFlags,
  37         SotClipboardFormatId nClipboardID, unsigned int nFilterVersion) override;
  38     /**
  39      * Ensure CVEs remain unbroken
  40      */
  41     void testCVEs();
  42
  43     void testContentofz9704();
  44     void testTdf90299();
  45
  46     CPPUNIT_TEST_SUITE(ScFiltersTest);
  47     CPPUNIT_TEST(testCVEs);
  48     CPPUNIT_TEST(testContentofz9704);
  49     CPPUNIT_TEST(testTdf90299);
  50
  51     CPPUNIT_TEST_SUITE_END();
  52
  53 private:
  54     void createFileURL(std::u16string_view aFileBase, std::u16string_view aFileExtension, OUString& rFilePath);
  55 };
  56
  57 void ScFiltersTest::createFileURL(
  58     std::u16string_view aFileBase, std::u16string_view aFileExtension, OUString& rFilePath)
  59 {
  60     // aFileBase may contain multiple segments, so use
  61     // GetNewAbsURL instead of insertName for them:
  62     INetURLObject url(m_directories.getSrcRootURL());
  63     url.setFinalSlash();
  64     url.GetNewAbsURL(u"sc/qa/unit/data"_ustr, &url);
  65     url.insertName(aFileExtension, true);
  66     url.GetNewAbsURL(OUString::Concat(aFileBase) + aFileExtension, &url);
  67     rFilePath = url.GetMainURL(INetURLObject::DecodeMechanism::NONE);
  68 }
  69
  70
  71 bool ScFiltersTest::load(const OUString &rFilter, const OUString &rURL,
  72     const OUString &rUserData, SfxFilterFlags nFilterFlags,
  73     SotClipboardFormatId nClipboardID, unsigned int nFilterVersion)
  74 {
  75     ScDocShellRef xDocShRef = loadDoc(rURL, rFilter, rUserData,
  76         OUString(), nFilterFlags, nClipboardID, nFilterVersion );
  77     bool bLoaded = xDocShRef.is();
  78     //reference counting of ScDocShellRef is very confused.
  79     if (bLoaded)
  80         xDocShRef->DoClose();
  81     return bLoaded;
  82 }
  83
  84 void ScFiltersTest::testCVEs()
  85 {
  86 #ifndef DISABLE_CVE_TESTS
  87     testDir(u"Quattro Pro 6.0"_ustr,
  88         m_directories.getURLFromSrc(u"/sc/qa/unit/data/qpro/"));
  89
  90     //warning, the current "sylk filter" in sc (docsh.cxx) automatically
  91     //chains on failure on trying as csv, rtf, etc. so "success" may
  92     //not indicate that it imported as .slk.
  93     testDir(u"SYLK"_ustr,
  94         m_directories.getURLFromSrc(u"/sc/qa/unit/data/slk/"));
  95 #if defined _WIN32 && defined _ARM64_
  96     // skip for windows arm64 build
  97 #else
  98     testDir(u"MS Excel 97"_ustr,
  99         m_directories.getURLFromSrc(u"/sc/qa/unit/data/xls/"));
 100 #endif
 101
 102     testDir(u"Calc Office Open XML"_ustr,
 103         m_directories.getURLFromSrc(u"/sc/qa/unit/data/xlsx/"), OUString(), XLSX_FORMAT_TYPE);
 104
 105     testDir(u"Calc Office Open XML"_ustr,
 106         m_directories.getURLFromSrc(u"/sc/qa/unit/data/xlsm/"), OUString(), XLSX_FORMAT_TYPE);
 107
 108     testDir(u"dBase"_ustr,
 109         m_directories.getURLFromSrc(u"/sc/qa/unit/data/dbf/"));
 110
 111     testDir(u"Lotus"_ustr,
 112         m_directories.getURLFromSrc(u"/sc/qa/unit/data/wks/"));
 113
 114 #endif
 115 }
 116
 117 void ScFiltersTest::testContentofz9704()
 118 {
 119     OUString aFileName;
 120     createFileURL(u"ofz9704.", u"123", aFileName);
 121     SvFileStream aFileStream(aFileName, StreamMode::READ);
 122     TestImportWKS(aFileStream);
 123 }
 124
 125 void ScFiltersTest::testTdf90299()
 126 {
 127     const OUString aTmpDirectory1URL = utl::CreateTempURL(nullptr, true);
 128     const OUString aTmpDirectory2URL = utl::CreateTempURL(nullptr, true);
 129     const OUString aSavedFileURL = utl::CreateTempURL(&aTmpDirectory1URL);
 130
 131     OUString aReferencedFileURL;
 132     OUString aReferencingFileURL;
 133     createFileURL(u"tdf90299.", u"xls", aReferencingFileURL);
 134
 135     auto eError = osl::File::copy(aReferencingFileURL, aTmpDirectory1URL + "/tdf90299.xls");
 136     CPPUNIT_ASSERT_EQUAL(osl::File::E_None, eError);
 137
 138     aReferencingFileURL = aTmpDirectory1URL + "/tdf90299.xls";
 139     aReferencedFileURL = aTmpDirectory1URL + "/dummy.xls";
 140
 141     ScDocShellRef xShell = loadDoc(aReferencingFileURL, u"MS Excel 97"_ustr, OUString(), OUString(),
 142             XLS_FORMAT_TYPE, SotClipboardFormatId::STARCALC_8);
 143
 144     ScDocument& rDoc = xShell->GetDocument();
 145     CPPUNIT_ASSERT_EQUAL(OUString("='" + aReferencedFileURL + "'#$Sheet1.A1"), rDoc.GetFormula(0, 0, 0));
 146
 147     aReferencingFileURL = aSavedFileURL;
 148
 149     SfxMedium aStoreMedium(aReferencingFileURL, StreamMode::STD_WRITE);
 150
 151     auto pExportFilter = std::make_shared<SfxFilter>(
 152         "MS Excel 97", OUString(), XLS_FORMAT_TYPE, SotClipboardFormatId::NONE, OUString(),
 153         OUString(), OUString(), "private:factory/scalc*");
 154     pExportFilter->SetVersion(SOFFICE_FILEFORMAT_CURRENT);
 155
 156     aStoreMedium.SetFilter(pExportFilter);
 157
 158     xShell->DoSaveAs(aStoreMedium);
 159     xShell->DoClose();
 160
 161     eError = osl::File::copy(aReferencingFileURL, aTmpDirectory2URL + "/tdf90299.xls");
 162     CPPUNIT_ASSERT_EQUAL(osl::File::E_None, eError);
 163
 164     aReferencingFileURL = aTmpDirectory2URL + "/tdf90299.xls";
 165     aReferencedFileURL = aTmpDirectory2URL + "/dummy.xls";
 166
 167     xShell = loadDoc(aReferencingFileURL, u"MS Excel 97"_ustr, OUString(), OUString(),
 168             XLS_FORMAT_TYPE, SotClipboardFormatId::STARCALC_8);
 169     ScDocument& rDoc2 = xShell->GetDocument();
 170     CPPUNIT_ASSERT_EQUAL(OUString("='" + aReferencedFileURL + "'#$Sheet1.A1"), rDoc2.GetFormula(0, 0, 0));
 171
 172     xShell->DoClose();
 173 }
 174
 175 ScFiltersTest::ScFiltersTest()
 176     : ScFilterTestBase()
 177 {
 178 }
 179
 180 CPPUNIT_TEST_SUITE_REGISTRATION(ScFiltersTest);
 181
 182 CPPUNIT_PLUGIN_IMPLEMENT();
 183
 184 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */