1 files changed, 95 insertions, 0 deletions
diff --git a/scripting/workben/mod/_scripting/Function.java b/scripting/workben/mod/_scripting/Function.java
new file mode 100644
index 000000000000..7dc73cbd7140
--- /dev/null
+++ b/scripting/workben/mod/_scripting/Function.java
@@ -0,0 +1,95 @@
+/*************************************************************************
+ *
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * Copyright 2000, 2010 Oracle and/or its affiliates.
+ *
+ * OpenOffice.org - a multi-platform office productivity suite
+ *
+ * This file is part of OpenOffice.org.
+ *
+ * OpenOffice.org is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Lesser General Public License version 3
+ * only, as published by the Free Software Foundation.
+ *
+ * OpenOffice.org is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU Lesser General Public License version 3 for more details
+ * (a copy is included in the LICENSE file that accompanied this code).
+ *
+ * You should have received a copy of the GNU Lesser General Public License
+ * version 3 along with OpenOffice.org.  If not, see
+ * <http://www.openoffice.org/license.html>
+ * for a copy of the LGPLv3 License.
+ *
+ ************************************************************************/
+
+package mod._scripting;
+
+import com.sun.star.uno.XInterface;
+import java.io.PrintWriter;
+import lib.StatusException;
+import lib.TestCase;
+import lib.TestEnvironment;
+import lib.TestParameters;
+import util.utils;
+import java.net.URLEncoder;
+import com.sun.star.lang.XMultiServiceFactory;
+import com.sun.star.uno.UnoRuntime;
+
+import com.sun.star.frame.XModel;
+import com.sun.star.frame.XFrame;
+import com.sun.star.lang.XComponent;
+import com.sun.star.frame.XDesktop;
+
+import util.SOfficeFactory;
+
+import drafts.com.sun.star.script.framework.provider.XFunction;
+import drafts.com.sun.star.script.framework.provider.XFunctionProvider;
+
+public class Function extends TestCase {
+    private String script = "script://returns-Integer";
+    private String doc = "doc_with_beanshell_scripts.sxw";
+
+    public void initialize( TestParameters tParam, PrintWriter log ) {
+    }
+
+    public synchronized TestEnvironment createTestEnvironment(
+        TestParameters tParam, PrintWriter log ) throws StatusException {
+        XInterface oObj = null;
+    XFunctionProvider provider = null;
+
+        log.println("creating test environment");
+        try {
+
+            XMultiServiceFactory xMSF = tParam.getMSF();
+            SOfficeFactory SOF = null;
+            SOF = SOfficeFactory.getFactory( xMSF );
+            String docPath = util.utils.getFullTestURL(doc);
+            XComponent doc = SOF.loadDocument( docPath );
+            XModel model = ( XModel ) UnoRuntime.queryInterface( XModel.class,
+                doc );
+            oObj  =
+                (XInterface)xMSF.createInstanceWithArguments( "drafts.com.sun.star.script.framework.provider.FunctionProvider", new Object[]{ model } );
+            provider = ( XFunctionProvider )UnoRuntime.queryInterface( XFunctionProvider.class, oObj );
+            oObj = provider.getFunction( script );
+
+        } catch (com.sun.star.uno.Exception e) {
+            e.printStackTrace();
+            throw new StatusException("Can't create object environment", e) ;
+        }
+
+        TestEnvironment tEnv = new TestEnvironment(oObj) ;
+        tEnv.addObjRelation("provider", provider);
+        TestDataLoader.setupData(tEnv, "Function");
+
+        return tEnv ;
+    }
+
+    public synchronized void disposeTestEnvironment( TestEnvironment tEnv,
+            TestParameters tParam) {
+    }
+}
+
+