Adding upstream version 1:7.0.4.upstream/1%7.0.4upstream

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

1 files changed, 158 insertions, 0 deletions

diff --git a/qadevOOo/tests/java/mod/_sc/ScCellFieldObj.java b/qadevOOo/tests/java/mod/_sc/ScCellFieldObj.java
new file mode 100644
index 000000000..019449121
--- /dev/null
+++ b/qadevOOo/tests/java/mod/_sc/ScCellFieldObj.java
@@ -0,0 +1,158 @@
+/*
+ * 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/.
+ *
+ * This file incorporates work covered by the following license notice:
+ *
+ *   Licensed to the Apache Software Foundation (ASF) under one or more
+ *   contributor license agreements. See the NOTICE file distributed
+ *   with this work for additional information regarding copyright
+ *   ownership. The ASF licenses this file to you under the Apache
+ *   License, Version 2.0 (the "License"); you may not use this file
+ *   except in compliance with the License. You may obtain a copy of
+ *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
+ */
+package mod._sc;
+
+import java.io.PrintWriter;
+
+import lib.TestCase;
+import lib.TestEnvironment;
+import lib.TestParameters;
+import util.SOfficeFactory;
+
+import com.sun.star.container.XIndexAccess;
+import com.sun.star.lang.XComponent;
+import com.sun.star.lang.XMultiServiceFactory;
+import com.sun.star.sheet.XSpreadsheet;
+import com.sun.star.sheet.XSpreadsheetDocument;
+import com.sun.star.sheet.XSpreadsheets;
+import com.sun.star.table.XCell;
+import com.sun.star.text.XText;
+import com.sun.star.text.XTextContent;
+import com.sun.star.uno.AnyConverter;
+import com.sun.star.uno.Type;
+import com.sun.star.uno.UnoRuntime;
+import com.sun.star.uno.XInterface;
+
+/**
+* Test for object that represents a text field (implements
+* <code>com.sun.star.text.TextField</code>) which inserted in a cell of
+* the spreadsheet. <p>
+* Object implements the following interfaces :
+* <ul>
+*  <li> <code>com::sun::star::lang::XComponent</code></li>
+*  <li> <code>com::sun::star::beans::XPropertySet</code></li>
+*  <li> <code>com::sun::star::text::XTextField</code></li>
+*  <li> <code>com::sun::star::text::XTextContent</code></li>
+*  <li> <code>com::sun::star::text::TextContent</code></li>
+* </ul>
+* @see com.sun.star.text.TextField
+* @see com.sun.star.lang.XComponent
+* @see com.sun.star.beans.XPropertySet
+* @see com.sun.star.text.XTextField
+* @see com.sun.star.text.XTextContent
+* @see com.sun.star.text.TextContent
+* @see ifc.lang._XComponent
+* @see ifc.beans._XPropertySet
+* @see ifc.text._XTextField
+* @see ifc.text._XTextContent
+* @see ifc.text._TextContent
+*/
+public class ScCellFieldObj extends TestCase {
+    private XSpreadsheetDocument xSheetDoc = null;
+
+    /**
+    * Creates Spreadsheet document.
+    */
+    @Override
+    protected void initialize( TestParameters tParam, PrintWriter log ) throws Exception {
+        SOfficeFactory SOF = SOfficeFactory.getFactory( tParam.getMSF() );
+        log.println( "creating a Spreadsheet document" );
+        xSheetDoc = SOF.createCalcDoc(null);
+    }
+
+    /**
+    * Disposes Spreadsheet document.
+    */
+    @Override
+    protected void cleanup( TestParameters tParam, PrintWriter log ) {
+        log.println( "    disposing xSheetDoc " );
+        XComponent oComp = UnoRuntime.queryInterface (XComponent.class, xSheetDoc);
+        util.DesktopTools.closeDoc(oComp);
+    }
+
+    /**
+    * Creating a TestEnvironment for the interfaces to be tested.
+    * Creates an instance of the service
+    * <code>com.sun.star.text.TextField.URL</code>, inserts it to the content
+    * of the cell in the spreadsheet, retrieves a text content
+    * <code>com.sun.star.text.XTextContent</code> from the cell.<p>
+    * Object relations created :
+    * <ul>
+    *  <li> <code>'TRO'</code> for
+    *      {@link ifc.text._TextContent} </li>
+    *  <li> <code>'CONTENT'</code> for
+    *      {@link ifc.text._XTextContent} (type of
+    *      <code>com.sun.star.text.XTextContent</code> that was queried from
+    *      the newly created service <code>com.sun.star.text.TextField.URL</code>)</li>
+    *  <li> <code>'TEXT'</code> for
+    *      {@link ifc.text._XTextContent} (the text of the cell)</li>
+    * </ul>
+    */
+    @Override
+    protected TestEnvironment createTestEnvironment(
+        TestParameters Param, PrintWriter log) throws Exception {
+
+        XInterface oObj = null;
+        XText oText = null;
+        XTextContent oContent = null;
+        XInterface aField = null;
+
+        // we want to create an instance of ScCellFieldObj.
+        // to do this we must get an MultiServiceFactory.
+
+        XMultiServiceFactory _oMSF = UnoRuntime.queryInterface(XMultiServiceFactory.class, xSheetDoc);
+
+        // Now create the instance of com.sun.star.text.TextField.
+        // This object has type ScCellFieldObj.
+
+        oObj = (XInterface)
+            _oMSF.createInstance("com.sun.star.text.TextField.URL");
+
+        aField = (XInterface)
+            _oMSF.createInstance("com.sun.star.text.TextField.URL");
+        oContent = UnoRuntime.queryInterface(XTextContent.class, aField);
+
+        XSpreadsheets oSheets = xSheetDoc.getSheets() ;
+        XIndexAccess oIndexSheets = UnoRuntime.queryInterface(XIndexAccess.class, oSheets);
+        XSpreadsheet oSheet = (XSpreadsheet) AnyConverter.toObject(
+                new Type(XSpreadsheet.class),oIndexSheets.getByIndex(0));
+
+        XCell oCell = oSheet.getCellByPosition(2,3);
+        oText = UnoRuntime.queryInterface(XText.class, oCell);
+
+        XTextContent oTextContent = UnoRuntime.queryInterface(XTextContent.class, oObj);
+
+        oText.insertTextContent(
+            oText.createTextCursor(), oTextContent, true);
+
+        oCell = oSheet.getCellByPosition(1,4);
+        oText = UnoRuntime.queryInterface(XText.class, oCell);
+
+        TestEnvironment tEnv = new TestEnvironment(oObj) ;
+
+        log.println ("Object created.") ;
+        tEnv.addObjRelation("TRO", Boolean.TRUE);
+
+        tEnv.addObjRelation("CONTENT",oContent);
+        tEnv.addObjRelation("TEXT",oText);
+
+        return tEnv;
+    }
+
+}    // finish class ScCellFieldObj
+