name apitest suites consistently while we still can

- writer test apitest suites are now called like the UNO implementation they
  are testing
- also mark them final for good measure
- move tests to module test and try to match its conventions
  * BaseIndex
  * TextDocumentIndex
  * TextDocumentSettings
  * TextPrinterSettings
  * TextSettings
  * XDocumentIndex
- also remove anonymous namespace in header, as that is a bad idea
- also remove now obsolete ApiBaseTest
- also remove dead code in TextPrinterSettings
- remove writer xtextcontent test as it duplicates the impl in module test

Change-Id: I71aa5f3755d5c90726f4ff4394117fa2391495d7
Reviewed-on: https://gerrit.libreoffice.org/69374
Tested-by: Jenkins
Reviewed-by: Björn Michaelsen <bjoern.michaelsen@libreoffice.org>

7 files changed, 496 insertions, 0 deletions

diff --git a/test/Library_subsequenttest.mk b/test/Library_subsequenttest.mk
index a1ea3349978f..7fca94314977 100644
--- a/test/Library_subsequenttest.mk
+++ b/test/Library_subsequenttest.mk
@@ -169,11 +169,17 @@ $(eval $(call gb_Library_add_exception_objects,subsequenttest,\
 	test/source/table/xtablechartssupplier \
 	test/source/table/xtablecolumns \
 	test/source/table/xtablerows \
+	test/source/text/baseindex \
 	test/source/text/xsimpletext \
 	test/source/text/xtext \
 	test/source/text/xtextcontent \
 	test/source/text/xtextfield \
 	test/source/text/xtextrange \
+    test/source/text/xdocumentindex \
+    test/source/text/textdocumentsettings \
+    test/source/text/textprintersettings \
+    test/source/text/textsettings \
+    test/source/text/textdocumentindex \
 	test/source/util/xindent \
 	test/source/util/xmergeable \
 	test/source/util/xrefreshable \
diff --git a/test/source/text/baseindex.cxx b/test/source/text/baseindex.cxx
new file mode 100644
index 000000000000..f65028b49977
--- /dev/null
+++ b/test/source/text/baseindex.cxx
@@ -0,0 +1,153 @@
+/* -*- 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 <cppunit/extensions/HelperMacros.h>
+
+#include <com/sun/star/beans/XPropertySet.hpp>
+#include <com/sun/star/graphic/XGraphic.hpp>
+#include <com/sun/star/text/XTextColumns.hpp>
+#include <com/sun/star/text/XTextSection.hpp>
+
+#include <vcl/BitmapTools.hxx>
+#include <vcl/graph.hxx>
+#include <vcl/pngwrite.hxx>
+#include <unotools/tempfile.hxx>
+#include <tools/stream.hxx>
+
+#include <test/unoapi_property_testers.hxx>
+#include <test/text/baseindex.hxx>
+#include <test/testdllapi.hxx>
+
+namespace
+{
+BitmapEx createExampleBitmap()
+{
+    vcl::bitmap::RawBitmap aRawBitmap(Size(4, 4), 24);
+    aRawBitmap.SetPixel(0, 0, COL_LIGHTBLUE);
+    aRawBitmap.SetPixel(0, 1, COL_LIGHTGREEN);
+    aRawBitmap.SetPixel(1, 0, COL_LIGHTRED);
+    aRawBitmap.SetPixel(1, 1, COL_LIGHTMAGENTA);
+    return vcl::bitmap::CreateFromData(std::move(aRawBitmap));
+}
+
+void writerFileWithBitmap(OUString const& rURL)
+{
+    BitmapEx aBitmapEx = createExampleBitmap();
+    SvFileStream aFileStream(rURL, StreamMode::READ | StreamMode::WRITE);
+    vcl::PNGWriter aWriter(aBitmapEx);
+    aWriter.Write(aFileStream);
+    aFileStream.Seek(STREAM_SEEK_TO_BEGIN);
+    aFileStream.Close();
+}
+}
+
+namespace apitest
+{
+BaseIndex::~BaseIndex() {}
+
+void BaseIndex::testBaseIndexProperties()
+{
+    css::uno::Reference<css::beans::XPropertySet> xBaseIndex(init(), css::uno::UNO_QUERY_THROW);
+    testStringProperty(xBaseIndex, "Title", "Value");
+    testBooleanProperty(xBaseIndex, "IsProtected");
+
+    testStringProperty(xBaseIndex, "ParaStyleHeading", "Value");
+    testStringProperty(xBaseIndex, "ParaStyleLevel1", "Value");
+    testStringOptionalProperty(xBaseIndex, "ParaStyleLevel2");
+    testStringOptionalProperty(xBaseIndex, "ParaStyleLevel3");
+    testStringOptionalProperty(xBaseIndex, "ParaStyleLevel4");
+    testStringOptionalProperty(xBaseIndex, "ParaStyleLevel5");
+    testStringOptionalProperty(xBaseIndex, "ParaStyleLevel6");
+    testStringOptionalProperty(xBaseIndex, "ParaStyleLevel7");
+    testStringOptionalProperty(xBaseIndex, "ParaStyleLevel8");
+    testStringOptionalProperty(xBaseIndex, "ParaStyleLevel9");
+    testStringOptionalProperty(xBaseIndex, "ParaStyleLevel10");
+    testStringOptionalProperty(xBaseIndex, "ParaStyleSeparator");
+
+    //      [property] XTextColumns TextColumns;
+    {
+        OUString name = "TextColumns";
+
+        css::uno::Reference<css::text::XTextColumns> xGetTextColumns;
+        CPPUNIT_ASSERT(xBaseIndex->getPropertyValue(name) >>= xGetTextColumns);
+
+        xGetTextColumns->setColumnCount(xGetTextColumns->getColumnCount() + 1);
+        xBaseIndex->setPropertyValue(name, css::uno::makeAny(xGetTextColumns));
+
+        css::uno::Reference<css::text::XTextColumns> xSetTextColumns;
+        CPPUNIT_ASSERT(xBaseIndex->getPropertyValue(name) >>= xSetTextColumns);
+
+        //CPPUNIT_ASSERT_EQUAL(xGetTextColumns->getColumnCount(), xSetTextColumns->getColumnCount());
+    }
+
+    //      [property] com::sun::star::graphic::XGraphic BackGraphic;
+    //      [property] string BackGraphicURL;
+    {
+        OUString name = "BackGraphicURL";
+        bool bOK = false;
+        try
+        {
+            xBaseIndex->getPropertyValue(name);
+        }
+        catch (css::uno::RuntimeException const& /*ex*/)
+        {
+            bOK = true;
+        }
+        // BackGraphicURL is "set-only" attribute
+        CPPUNIT_ASSERT_MESSAGE("Expected RuntimeException wasn't thrown", bOK);
+
+        utl::TempFile aTempFile;
+        aTempFile.EnableKillingFile();
+        writerFileWithBitmap(aTempFile.GetURL());
+
+        css::uno::Reference<css::graphic::XGraphic> xGraphic;
+        CPPUNIT_ASSERT(xBaseIndex->getPropertyValue("BackGraphic") >>= xGraphic);
+        CPPUNIT_ASSERT(!xGraphic.is());
+
+        xBaseIndex->setPropertyValue(name, css::uno::makeAny(aTempFile.GetURL()));
+
+        CPPUNIT_ASSERT(xBaseIndex->getPropertyValue("BackGraphic") >>= xGraphic);
+        CPPUNIT_ASSERT(xGraphic.is());
+    }
+
+    testStringProperty(xBaseIndex, "BackGraphicFilter", "Value");
+
+    //      [property] com::sun::star::style::GraphicLocation BackGraphicLocation;
+
+    testColorProperty(xBaseIndex, "BackColor");
+    testBooleanProperty(xBaseIndex, "BackTransparent");
+
+    //      [optional, property] com::sun::star::container::XIndexReplace LevelFormat;
+
+    testBooleanOptionalProperty(xBaseIndex, "CreateFromChapter");
+
+    //      [property] com::sun::star::text::XTextSection ContentSection;
+    {
+        OUString name = "ContentSection";
+
+        css::uno::Reference<css::text::XTextSection> xGetTextSection;
+        CPPUNIT_ASSERT_MESSAGE(name.toUtf8().getStr(),
+                               xBaseIndex->getPropertyValue(name) >>= xGetTextSection);
+        CPPUNIT_ASSERT_EQUAL_MESSAGE(name.toUtf8().getStr(), OUString(""),
+                                     xGetTextSection->getAnchor()->getString());
+    }
+
+    //      [property] com::sun::star::text::XTextSection HeaderSection;
+    {
+        OUString name = "HeaderSection";
+
+        css::uno::Reference<css::text::XTextSection> xGetTextSection;
+        if (xBaseIndex->getPropertyValue(name).hasValue())
+            CPPUNIT_ASSERT_MESSAGE(name.toUtf8().getStr(),
+                                   xBaseIndex->getPropertyValue(name) >>= xGetTextSection);
+    }
+}
+}
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/test/source/text/textdocumentindex.cxx b/test/source/text/textdocumentindex.cxx
new file mode 100644
index 000000000000..63873e2b4742
--- /dev/null
+++ b/test/source/text/textdocumentindex.cxx
@@ -0,0 +1,36 @@
+/* -*- 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 <com/sun/star/beans/XPropertySet.hpp>
+
+#include <test/unoapi_property_testers.hxx>
+#include <test/text/textdocumentindex.hxx>
+
+namespace apitest
+{
+TextDocumentIndex::~TextDocumentIndex() {}
+
+void TextDocumentIndex::testDocumentIndexProperties()
+{
+    css::uno::Reference<css::beans::XPropertySet> xDocumnetIndex(init(), css::uno::UNO_QUERY_THROW);
+
+    testBooleanProperty(xDocumnetIndex, "UseAlphabeticalSeparators");
+    testBooleanProperty(xDocumnetIndex, "UseKeyAsEntry");
+    testBooleanProperty(xDocumnetIndex, "UseCombinedEntries");
+    testBooleanProperty(xDocumnetIndex, "IsCaseSensitive");
+    testBooleanProperty(xDocumnetIndex, "UsePP");
+    testBooleanProperty(xDocumnetIndex, "UseDash");
+    testBooleanProperty(xDocumnetIndex, "UseUpperCase");
+    testStringOptionalProperty(xDocumnetIndex, "MainEntryCharacterStyleName");
+    //      [readonly, property] sequence <com::sun::star::text::XDocumentIndexMark> DocumentIndexMarks;
+    //      [property] com::sun::star::lang::Locale  Locale;
+    testStringProperty(xDocumnetIndex, "SortAlgorithm", "Value");
+}
+}
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/test/source/text/textdocumentsettings.cxx b/test/source/text/textdocumentsettings.cxx
new file mode 100644
index 000000000000..9ef0518b05ca
--- /dev/null
+++ b/test/source/text/textdocumentsettings.cxx
@@ -0,0 +1,42 @@
+/* -*- 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/text/textdocumentsettings.hxx>
+#include <test/unoapi_property_testers.hxx>
+
+#include <com/sun/star/beans/XPropertySet.hpp>
+#include <com/sun/star/uno/Reference.hxx>
+
+using namespace css::uno;
+
+namespace apitest
+{
+TextDocumentSettings::~TextDocumentSettings() {}
+
+void TextDocumentSettings::testDocumentSettingsProperties()
+{
+    css::uno::Reference<css::beans::XPropertySet> xDocumentSettings(init(),
+                                                                    css::uno::UNO_QUERY_THROW);
+
+    testBooleanOptionalProperty(xDocumentSettings, "ChartAutoUpdate");
+    testBooleanOptionalProperty(xDocumentSettings, "AddParaTableSpacing");
+    testBooleanOptionalProperty(xDocumentSettings, "AddParaTableSpacingAtStart");
+    testBooleanOptionalProperty(xDocumentSettings, "AlignTabStopPosition");
+    testBooleanOptionalProperty(xDocumentSettings, "SaveGlobalDocumentLinks");
+    testBooleanOptionalProperty(xDocumentSettings, "IsLabelDocument");
+    testBooleanOptionalProperty(xDocumentSettings, "UseFormerLineSpacing");
+    testBooleanOptionalProperty(xDocumentSettings, "AddParaSpacingToTableCells");
+    testBooleanOptionalProperty(xDocumentSettings, "UseFormerObjectPositioning");
+    testBooleanOptionalProperty(xDocumentSettings, "ConsiderTextWrapOnObjPos");
+    testBooleanOptionalProperty(xDocumentSettings, "MathBaselineAlignment");
+}
+
+} // end namespace apitest
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/test/source/text/textprintersettings.cxx b/test/source/text/textprintersettings.cxx
new file mode 100644
index 000000000000..b28c652413e5
--- /dev/null
+++ b/test/source/text/textprintersettings.cxx
@@ -0,0 +1,39 @@
+/* -*- 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 <com/sun/star/beans/XPropertySet.hpp>
+
+#include <test/unoapi_property_testers.hxx>
+#include <test/text/textprintersettings.hxx>
+
+namespace apitest
+{
+TextPrinterSettings::~TextPrinterSettings() {}
+void TextPrinterSettings::testPrinterSettingsProperties()
+{
+    css::uno::Reference<css::beans::XPropertySet> xPrinterSettings(init(),
+                                                                   css::uno::UNO_QUERY_THROW);
+
+    testBooleanProperty(xPrinterSettings, "PrintGraphics");
+    testBooleanProperty(xPrinterSettings, "PrintTables");
+    testBooleanProperty(xPrinterSettings, "PrintDrawings");
+    testBooleanProperty(xPrinterSettings, "PrintLeftPages");
+    testBooleanProperty(xPrinterSettings, "PrintRightPages");
+    testBooleanProperty(xPrinterSettings, "PrintControls");
+    testBooleanProperty(xPrinterSettings, "PrintReversed");
+    testBooleanProperty(xPrinterSettings, "PrintControls");
+    testStringProperty(xPrinterSettings, "PrintFaxName", "FaxName");
+    testBooleanProperty(xPrinterSettings, "PrintProspect");
+    testBooleanProperty(xPrinterSettings, "PrintPageBackground");
+    testBooleanProperty(xPrinterSettings, "PrintBlackFonts");
+    testBooleanOptionalProperty(xPrinterSettings, "PrintEmptyPages");
+}
+} // end namespace apitest
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/test/source/text/textsettings.cxx b/test/source/text/textsettings.cxx
new file mode 100644
index 000000000000..8371ed54c38d
--- /dev/null
+++ b/test/source/text/textsettings.cxx
@@ -0,0 +1,153 @@
+/* -*- 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 <cppunit/extensions/HelperMacros.h>
+
+#include <com/sun/star/beans/PropertyAttribute.hpp>
+#include <com/sun/star/beans/XPropertySet.hpp>
+#include <com/sun/star/i18n/XForbiddenCharacters.hpp>
+
+#include <test/unoapi_property_testers.hxx>
+#include <test/text/textsettings.hxx>
+
+namespace
+{
+bool extstsProperty(css::uno::Reference<css::beans::XPropertySet> const& rxPropertySet,
+                    OUString const& rPropertyName)
+{
+    css::uno::Reference<css::beans::XPropertySetInfo> xPropertySetInfo(
+        rxPropertySet->getPropertySetInfo());
+    return xPropertySetInfo->hasPropertyByName(rPropertyName);
+}
+
+bool isPropertyReadOnly(css::uno::Reference<css::beans::XPropertySet> const& rxPropertySet,
+                        OUString const& rPropertyName)
+{
+    css::uno::Reference<css::beans::XPropertySetInfo> xPropertySetInfo(
+        rxPropertySet->getPropertySetInfo());
+    css::uno::Sequence<css::beans::Property> xProperties = xPropertySetInfo->getProperties();
+
+    for (auto const& rProperty : xProperties)
+    {
+        if (rProperty.Name == rPropertyName)
+            return (rProperty.Attributes & com::sun::star::beans::PropertyAttribute::READONLY) != 0;
+    }
+
+    return false;
+}
+// [property] string PrinterName;
+void testPrinterName(css::uno::Reference<css::beans::XPropertySet> const& rxSettings)
+{
+    const OUString rPropertyName("PrinterName");
+
+    if (!extstsProperty(rxSettings, rPropertyName))
+        return; // Property is sometimes not set - bug? it is not defined as optional
+
+    OUString aPrinterName_Get;
+
+    CPPUNIT_ASSERT_MESSAGE("Unable to get PropertyValue",
+                           rxSettings->getPropertyValue(rPropertyName) >>= aPrinterName_Get);
+
+    OUString aPrinterName_Set;
+    css::uno::Any aNewValue;
+    aNewValue <<= aPrinterName_Get;
+    rxSettings->setPropertyValue(rPropertyName, aNewValue);
+
+    CPPUNIT_ASSERT_MESSAGE("Unable to get PropertyValue",
+                           rxSettings->getPropertyValue(rPropertyName) >>= aPrinterName_Set);
+    CPPUNIT_ASSERT_EQUAL_MESSAGE("Unable to set PropertyValue", aPrinterName_Get, aPrinterName_Set);
+}
+
+// [optional, property] short PrinterIndependentLayout;
+void testPrinterIndependentLayout(css::uno::Reference<css::beans::XPropertySet> const& rxSettings)
+{
+    const OUString rPropertyName("PrinterIndependentLayout");
+
+    if (!extstsProperty(rxSettings, rPropertyName))
+        return; // Property is optional
+
+    sal_Int16 aValue_Get;
+
+    CPPUNIT_ASSERT_MESSAGE("Unable to get PropertyValue",
+                           rxSettings->getPropertyValue(rPropertyName) >>= aValue_Get);
+
+    sal_Int16 aValue_New;
+    aValue_New = (aValue_Get == 1 ? 3 : 1);
+    rxSettings->setPropertyValue(rPropertyName, css::uno::Any(aValue_New));
+
+    sal_Int16 aValue_Set;
+
+    CPPUNIT_ASSERT_MESSAGE("Unable to get PropertyValue",
+                           rxSettings->getPropertyValue(rPropertyName) >>= aValue_Set);
+    CPPUNIT_ASSERT_EQUAL_MESSAGE("Unable to set PropertyValue", aValue_New, aValue_Set);
+}
+
+// [optional, property] com::sun::star::i18n::XForbiddenCharacters ForbiddenCharacters;
+void testForbiddenCharacters(css::uno::Reference<css::beans::XPropertySet> const& rxSettings)
+{
+    const OUString rPropertyName("ForbiddenCharacters");
+
+    if (!extstsProperty(rxSettings, rPropertyName))
+        return; // Property is optional
+
+    CPPUNIT_ASSERT_MESSAGE("Property is read-only but shouldn't be",
+                           !isPropertyReadOnly(rxSettings, rPropertyName));
+
+    css::uno::Reference<css::i18n::XForbiddenCharacters> aValue_Get;
+
+    CPPUNIT_ASSERT_MESSAGE("Unable to get PropertyValue",
+                           rxSettings->getPropertyValue(rPropertyName) >>= aValue_Get);
+    CPPUNIT_ASSERT_MESSAGE("Empty reference to XForbiddenCharacters", aValue_Get.is());
+}
+}
+
+namespace apitest
+{
+TextSettings::~TextSettings() {}
+void TextSettings::testSettingsProperties()
+{
+    css::uno::Reference<css::beans::XPropertySet> xSettings(init(), css::uno::UNO_QUERY_THROW);
+
+    testForbiddenCharacters(xSettings);
+    //testShortOptionalProperty(xSettings, "LinkUpdateMode");
+    testPrinterName(xSettings);
+    // [property] sequence< byte > PrinterSetup;
+    testBooleanOptionalProperty(xSettings, "IsKernAsianPunctuation");
+    //testShortOptionalProperty(xSettings, "CharacterCompressionType");
+    testBooleanOptionalProperty(xSettings, "ApplyUserData");
+    testBooleanOptionalProperty(xSettings, "SaveVersionOnClose");
+    testBooleanOptionalProperty(xSettings, "UpdateFromTemplate");
+    testBooleanOptionalProperty(xSettings, "FieldAutoUpdate");
+    testStringOptionalProperty(xSettings, "CurrentDatabaseDataSource");
+    testStringOptionalProperty(xSettings, "CurrentDatabaseCommand");
+    testLongOptionalProperty(xSettings, "CurrentDatabaseCommandType");
+    testLongOptionalProperty(xSettings, "DefaultTabStop");
+    testBooleanOptionalProperty(xSettings, "IsPrintBooklet");
+    testBooleanOptionalProperty(xSettings, "IsPrintBookletFront");
+    testBooleanOptionalProperty(xSettings, "IsPrintBookletBack");
+    testLongOptionalProperty(xSettings, "PrintQuality");
+    testStringOptionalProperty(xSettings, "ColorTableURL");
+    testStringOptionalProperty(xSettings, "DashTableURL");
+    testStringOptionalProperty(xSettings, "LineEndTableURL");
+    testStringOptionalProperty(xSettings, "HatchTableURL");
+    testStringOptionalProperty(xSettings, "GradientTableURL");
+    testStringOptionalProperty(xSettings, "BitmapTableURL");
+    testBooleanOptionalProperty(xSettings, "AutoCalculate");
+    testPrinterIndependentLayout(xSettings);
+    testBooleanOptionalProperty(xSettings, "AddExternalLeading");
+    testBooleanOptionalProperty(xSettings, "EmbedFonts");
+    testBooleanOptionalProperty(xSettings, "EmbedSystemFonts");
+    testBooleanOptionalProperty(xSettings, "EmbedOnlyUsedFonts");
+    testBooleanOptionalProperty(xSettings, "EmbedLatinScriptFonts");
+    testBooleanOptionalProperty(xSettings, "EmbedAsianScriptFonts");
+    testBooleanOptionalProperty(xSettings, "EmbedComplexScriptFonts");
+}
+} // end namespace apitest
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/test/source/text/xdocumentindex.cxx b/test/source/text/xdocumentindex.cxx
new file mode 100644
index 000000000000..0cae3a2986c6
--- /dev/null
+++ b/test/source/text/xdocumentindex.cxx
@@ -0,0 +1,67 @@
+/* -*- 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 <cppunit/extensions/HelperMacros.h>
+
+#include <com/sun/star/text/XTextDocument.hpp>
+#include <com/sun/star/text/XTextContent.hpp>
+#include <com/sun/star/text/XText.hpp>
+#include <com/sun/star/text/XDocumentIndex.hpp>
+#include <com/sun/star/lang/XMultiServiceFactory.hpp>
+
+#include <test/unoapi_property_testers.hxx>
+#include <test/text/xdocumentindex.hxx>
+
+namespace apitest
+{
+XDocumentIndex::~XDocumentIndex() {}
+/**
+ * Gets the document from relation and insert a new index mark.
+ * Then it stores the text content of document index before
+ * update and after.<p>
+ *
+ * Has <b> OK </b> status if index content is changed and
+ * new index contains index mark inserted. <p>
+ */
+void XDocumentIndex::testUpdate()
+{
+    css::uno::Reference<css::text::XDocumentIndex> xDocumentIndex(init(),
+                                                                  css::uno::UNO_QUERY_THROW);
+
+    bool bOK = true;
+    try
+    {
+        auto xText = getTextDocument()->getText();
+        auto xTextRange = xText->getEnd();
+        xTextRange->setString("IndexMark");
+        css::uno::Reference<css::lang::XMultiServiceFactory> xFactory(getTextDocument(),
+                                                                      css::uno::UNO_QUERY_THROW);
+        css::uno::Reference<css::text::XTextContent> xTextContentMark(
+            xFactory->createInstance("com.sun.star.text.DocumentIndexMark"),
+            css::uno::UNO_QUERY_THROW);
+        xText->insertTextContent(xTextRange, xTextContentMark, true);
+    }
+    catch (css::uno::Exception /*exception*/)
+    {
+        bOK = false;
+    }
+
+    CPPUNIT_ASSERT_MESSAGE("Couldn't create the document index mark", bOK);
+
+    OUString sContentBefore = xDocumentIndex->getAnchor()->getString();
+    xDocumentIndex->update();
+    OUString sContentAfter = xDocumentIndex->getAnchor()->getString();
+
+    CPPUNIT_ASSERT_MESSAGE("Before and after shouldn't be equal", sContentBefore != sContentAfter);
+    CPPUNIT_ASSERT_MESSAGE("Content after should contain string 'IndexMark'",
+                           sContentAfter.indexOf("IndexMark") >= 0);
+}
+}
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */