2 * This file is part of the LibreOffice project.
4 * This Source Code Form is subject to the terms of the Mozilla Public
5 * License, v. 2.0. If a copy of the MPL was not distributed with this
6 * file, You can obtain one at http://mozilla.org/MPL/2.0/.
8 * This file incorporates work covered by the following license notice:
10 * Licensed to the Apache Software Foundation (ASF) under one or more
11 * contributor license agreements. See the NOTICE file distributed
12 * with this work for additional information regarding copyright
13 * ownership. The ASF licenses this file to you under the Apache
14 * License, Version 2.0 (the "License"); you may not use this file
15 * except in compliance with the License. You may obtain a copy of
16 * the License at http://www.apache.org/licenses/LICENSE-2.0 .
19 import com
.sun
.star
.beans
.NamedValue
;
20 import com
.sun
.star
.beans
.PropertyValue
;
21 import com
.sun
.star
.container
.XIndexAccess
;
22 import java
.io
.PrintWriter
;
24 import lib
.StatusException
;
26 import lib
.TestEnvironment
;
27 import lib
.TestParameters
;
29 import util
.FormTools
;
30 import util
.WriterTools
;
32 import com
.sun
.star
.beans
.XPropertySet
;
33 import com
.sun
.star
.drawing
.XControlShape
;
34 import com
.sun
.star
.form
.XBoundComponent
;
35 import com
.sun
.star
.form
.XForm
;
36 import com
.sun
.star
.form
.XLoadable
;
37 import com
.sun
.star
.lang
.XMultiServiceFactory
;
38 import com
.sun
.star
.lang
.XComponent
;
39 import com
.sun
.star
.sdbc
.XConnection
;
40 import com
.sun
.star
.sdbc
.XResultSetUpdate
;
41 import com
.sun
.star
.sdb
.XDocumentDataSource
;
42 import com
.sun
.star
.text
.XTextDocument
;
43 import com
.sun
.star
.uno
.AnyConverter
;
44 import com
.sun
.star
.uno
.Type
;
45 import com
.sun
.star
.uno
.UnoRuntime
;
46 import com
.sun
.star
.uno
.XInterface
;
47 import com
.sun
.star
.util
.XCloseable
;
48 import java
.util
.ArrayList
;
54 * Test for object which is represented by service
55 * <code>com.sun.star.form.component.DateField</code>. <p>
56 * Object implements the following interfaces :
58 * <li> <code>com::sun::star::io::XPersistObject</code></li>
59 * <li> <code>com::sun::star::awt::UnoControlDateFieldModel</code></li>
60 * <li> <code>com::sun::star::form::XReset</code></li>
61 * <li> <code>com::sun::star::form::XBoundComponent</code></li>
62 * <li> <code>com::sun::star::form::FormComponent</code></li>
63 * <li> <code>com::sun::star::form::component::DateField</code></li>
64 * <li> <code>com::sun::star::beans::XFastPropertySet</code></li>
65 * <li> <code>com::sun::star::beans::XMultiPropertySet</code></li>
66 * <li> <code>com::sun::star::form::XUpdateBroadcaster</code></li>
67 * <li> <code>com::sun::star::form::DataAwareControlModel</code></li>
68 * <li> <code>com::sun::star::beans::XPropertyState</code></li>
69 * <li> <code>com::sun::star::form::FormControlModel</code></li>
70 * <li> <code>com::sun::star::container::XNamed</code></li>
71 * <li> <code>com::sun::star::lang::XComponent</code></li>
72 * <li> <code>com::sun::star::lang::XEventListener</code></li>
73 * <li> <code>com::sun::star::beans::XPropertyAccess</code></li>
74 * <li> <code>com::sun::star::beans::XPropertyContainer</code></li>
75 * <li> <code>com::sun::star::beans::XPropertySet</code></li>
76 * <li> <code>com::sun::star::form::XLoadListener</code></li>
77 * <li> <code>com::sun::star::container::XChild</code></li>
79 * The following files used by this test :
81 * <li><b> TestDB </b> (directory) : directory with test database </li>
82 * <li><b> TestDB/TestDB.dbf </b> : table file. See
83 * {@link util.DBTools DBTools} class for more information.</li>
85 * This object test <b> is NOT </b> designed to be run in several
86 * threads concurently.
87 * @see com.sun.star.io.XPersistObject
88 * @see com.sun.star.awt.UnoControlDateFieldModel
89 * @see com.sun.star.form.XReset
90 * @see com.sun.star.form.XBoundComponent
91 * @see com.sun.star.form.FormComponent
92 * @see com.sun.star.form.component.DateField
93 * @see com.sun.star.beans.XFastPropertySet
94 * @see com.sun.star.beans.XMultiPropertySet
95 * @see com.sun.star.form.XUpdateBroadcaster
96 * @see com.sun.star.form.DataAwareControlModel
97 * @see com.sun.star.beans.XPropertyState
98 * @see com.sun.star.form
99 * @see com.sun.star.container.XNamed
100 * @see com.sun.star.lang.XComponent
101 * @see com.sun.star.lang.XEventListener
102 * @see com.sun.star.beans.XPropertyAccess
103 * @see com.sun.star.beans.XPropertyContainer
104 * @see com.sun.star.beans.XPropertySet
105 * @see com.sun.star.form.XLoadListener
106 * @see com.sun.star.container.XChild
107 * @see ifc.io._XPersistObject
108 * @see ifc.awt._UnoControlDateFieldModel
109 * @see ifc.form._XReset
110 * @see ifc.form._XBoundComponent
111 * @see ifc.form._FormComponent
112 * @see ifc.form.component._DateField
113 * @see ifc.beans._XFastPropertySet
114 * @see ifc.beans._XMultiPropertySet
115 * @see ifc.form._XUpdateBroadcaster
116 * @see ifc.form._DataAwareControlModel
117 * @see ifc.beans._XPropertyState
118 * @see ifc.form._FormControlModel
119 * @see ifc.container._XNamed
120 * @see ifc.lang._XComponent
121 * @see ifc.lang._XEventListener
122 * @see ifc.beans._XPropertySet
123 * @see ifc.form._XLoadListener
124 * @see ifc.container._XChild
126 public class GenericModelTest
extends TestCase
{
127 private XTextDocument m_xTextDoc
;
128 private Object m_dbSrc
= null;
130 * This is the name of the Data Base which the test uses: "APITestDatabase"
132 private final static String m_dbSourceName
= "APITestDatabase";
133 private final static String m_TestDB
= "TestDB";
134 private DBTools m_dbTools
= null;
136 private boolean m_ConnectionColsed
= false;
139 * describes the kind of the shape which should be created.
140 * Example: m_kindOfshape=DateFiled
142 protected String m_kindOfControl
= null;
145 * If your object needs some special property values you can specify them with this
146 * <CODE>ArrayList</CODE>. You have to add a <CODE>NamedValue</CODE> to this list.
148 * NamedValue myProp = new NamedValue();
149 * myProp.Name = "Test";
150 * myProp.Value = "My special Value";
151 * m_propertiesToSet.add(myProp);
153 protected ArrayList
<NamedValue
> m_propertiesToSet
= new ArrayList
<NamedValue
>();
156 * This variable contains the name of the property which should be changed while
157 * interface <CODE>com::sun::star::form::XUpdateBroadcaster</CODE> is tested. The
158 * interface test needs the <CODE>ObjectRelation</CODE>
159 * "XUpdateBroadcaster.Checker" which is a <CODE>ifc.form._XUpdateBroadcaster.UpdateChecker</CODE>.
160 * @see ifc.form._XUpdateBroadcaster.UpdateChecker
161 * @see ifc.form._XUpdateBroadcaster
163 protected String m_ChangePropertyName
= null;
165 * This variable contains the value the property should be set while
166 * interface <CODE>com::sun::star::form::XUpdateBroadcaster</CODE> is tested.
167 * The interface test needs the <CODE>ObjectRelation</CODE>
168 * "XUpdateBroadcaster.Checker" which is a <CODE>ifc.form._XUpdateBroadcaster.UpdateChecker</CODE>.
169 * Normally the <CODE>Checker</CODE> uses <CODE>util.ValueChanger</CODE> to change
170 * the value of the property. If the current of this property is NULL the
171 * <CODE>ValueChanger</CODE> is unable to change the value. In this case the value
172 * of this variable was used.
174 protected Object m_ChangePropertyValue
= null;
177 * This variable contains the implementation name of the object.
179 protected String m_ObjectName
= null;
182 * For local implementations of <CODE>Checker</CODE> this variable contains the
183 * <CODE>FormLoader</CODE>
185 protected XLoadable m_XFormLoader
= null;
187 * For local implementations of <CODE>Checker</CODE> this variable contains the
188 * <CODE>XPropertySet</CODE>
190 protected XPropertySet m_XPS
= null;
192 * For local implementations of <CODE>Checker</CODE> this variable contains the
193 * <CODE>Control</CODE>
195 protected XInterface m_XCtrl
= null;
197 * The interface test of <CODE>ifc.form._DataWareControlModel</CODE> expects an
198 * object relation <CODE>'LC'</CODE>. This is a <CODE>XControlModel</CODE> of a shape.
199 * This variable contains the kind of shape to create for the interface test,
201 * @see ifc.form._DataAwareControlModel
203 protected String m_LCShape_Type
= null;
206 * If this variable is true some more debug info was logged. It was set by the parameter variable
207 * <code>debug_is_active</code>
209 private boolean debug
= false;
212 * Creates Writer document where controls are placed.
213 * @param tParam the test paremter
214 * @param log the log writer
217 protected void initialize(TestParameters tParam
, PrintWriter log
) {
218 log
.println("creating a textdocument");
219 m_xTextDoc
= WriterTools
.createTextDoc((tParam
.getMSF()));
220 m_ConnectionColsed
= false;
221 debug
= tParam
.getBool(util
.PropertyName
.DEBUG_IS_ACTIVE
);
222 m_propertiesToSet
.clear();
226 * close the connection
227 * close the data source
229 * revoke the data source
230 * @param tParam the test parameter
231 * @param log the log writer
234 protected void cleanup(TestParameters tParam
, PrintWriter log
) {
235 log
.println("closing connection...");
237 // some interface tests call cleanup to reset the environment. If such
238 // a test is the last one cleanup was called twice. The second call
239 // causes then nasty exceptions...
240 if (m_ConnectionColsed
) return;
243 XIndexAccess forms
= UnoRuntime
.queryInterface( XIndexAccess
.class,
244 FormTools
.getForms( WriterTools
.getDrawPage( m_xTextDoc
) ) );
245 XForm myForm
= (XForm
) AnyConverter
.toObject(new Type(XForm
.class),
246 forms
.getByIndex(0));
250 log
.println("ERROR: could not get 'Standard' from drawpage!");
252 log
.println("the draw page contains following elements:");
253 String
[] elements
= FormTools
.getForms(WriterTools
.getDrawPage(m_xTextDoc
)).getElementNames();
254 for (int i
= 0; i
< elements
.length
; i
++){
255 log
.println("Element[" + i
+ "] :" + elements
[i
]);
260 XPropertySet xSetProp
= UnoRuntime
.queryInterface( XPropertySet
.class, myForm
);
261 XConnection connection
= UnoRuntime
.queryInterface( XConnection
.class, xSetProp
.getPropertyValue( "ActiveConnection" ) );
262 if ( connection
== null )
265 log
.println("ERROR: could not get property 'ActiveConnection' from the XForm");
271 } catch (Exception e
) {
272 log
.println("ERROR: Can't close the connection: " + e
.toString());
273 e
.printStackTrace( log
);
276 log
.println("closing data source...");
278 XCloseable closer
= UnoRuntime
.queryInterface(
279 XCloseable
.class, m_dbSrc
);
280 if ( closer
== null )
282 XDocumentDataSource dataSource
= UnoRuntime
.queryInterface(
283 XDocumentDataSource
.class, m_dbSrc
);
284 if ( dataSource
!= null )
285 closer
= UnoRuntime
.queryInterface(
286 XCloseable
.class, dataSource
.getDatabaseDocument() );
288 if (debug
&& closer
==null){
289 log
.println("ERROR: couldn't get 'XCloseable' from DataSource");
292 } catch (com
.sun
.star
.util
.CloseVetoException e
) {
293 log
.println("ERROR: couldn't close data source: " + e
.toString());
294 } catch (com
.sun
.star
.lang
.DisposedException e
) {
295 log
.println("ERROR: couldn't close data source: " + e
.toString());
296 } catch (Exception e
) {
297 log
.println("ERROR: couldn't close data source: " + e
.toString());
300 log
.println("disposing data source...");
302 XComponent dataSourceComp
= UnoRuntime
.queryInterface(
303 XComponent
.class, m_dbSrc
);
304 dataSourceComp
.dispose();
306 catch (Exception e
) {
307 log
.println("couldn't dispose the data source");
310 log
.println("closing document...");
313 XCloseable closer
= UnoRuntime
.queryInterface(
314 XCloseable
.class, m_xTextDoc
);
316 } catch (com
.sun
.star
.util
.CloseVetoException e
) {
317 log
.println("ERROR: couldn't close document: " + e
.toString());
318 } catch (com
.sun
.star
.lang
.DisposedException e
) {
319 log
.println("ERROR: couldn't close document: " + e
.toString());
320 } catch (Exception e
) {
321 log
.println("ERROR: couldn't close document: " + e
.toString());
324 log
.println("revoking data source...");
326 m_dbTools
.revokeDB(m_dbSourceName
);
327 } catch (com
.sun
.star
.container
.NoSuchElementException e
){
328 } catch (com
.sun
.star
.uno
.Exception e
) {
329 log
.println("ERROR: Error while object test cleaning up: " + e
.toString());
332 m_ConnectionColsed
= true;
336 * Creating a Testenvironment for the interfaces to be tested.
337 * First <code>TestDB</code> database is registered.
338 * Creates DateField in the Form, then binds it to TestDB
339 * database and returns Field's control. <p>
340 * Object relations created :
342 * <li> <code>'OBJNAME'</code> for
343 * {@link ifc.io._XPersistObject} : name of service which is
344 * represented by this object. </li>
345 * <li> <code>'LC'</code> for {@link ifc.form._DataAwareControlModel}.
346 * Specifies the value for LabelControl property. It is
347 * <code>FixedText</code> component added to the document.</li>
348 * <li> <code>'FL'</code> for
349 * {@link ifc.form._DataAwareControlModel} interface.
350 * Specifies XLoadable implementation which connects form to
351 * the data source.</li>
352 * <li> <code>'XUpdateBroadcaster.Checker'</code> : <code>
353 * _XUpdateBroadcaster.UpdateChecker</code> interface implementation
354 * which can update, commit data and check if the data was successfully
356 * <li> <code>'DataAwareControlModel.NewFieldName'</code> : for
357 * <code>com.sun.star.form.DataAwareControlModel</code> service
358 * which contains new name of the field ('_DATE') to bind control to.
360 * <li> <code>'XFastPropertySet.ExcludeProps'</code> : for
361 * <code>com.sun.star.beans.XFastPropertySet</code> interface
362 * the property FormatKey can have only restricted set of values.
365 * @see ifc.form._XUpdateBroadcaster
366 * @param Param the test parameter
367 * @param log the log writer
368 * @return a test environment
371 protected synchronized TestEnvironment
createTestEnvironment(TestParameters Param
,
373 XInterface oObj
= null;
374 XControlShape aShape
= null;
375 XMultiServiceFactory xMSF
= Param
.getMSF();
378 log
.println("adding contol shape '" + m_kindOfControl
+ "'");
379 aShape
= FormTools
.createControlShape(m_xTextDoc
, 3000,
382 } catch (Exception e
){
383 e
.printStackTrace(log
);
384 throw new StatusException("Couldn't create following control shape (m_kindOfControl): '" +
385 m_kindOfControl
+ "': ", e
);
389 WriterTools
.getDrawPage(m_xTextDoc
).add(aShape
);
390 oObj
= aShape
.getControl();
392 log
.println("Implementation name: " + util
.utils
.getImplName(oObj
));
395 String sourceTestDB
= utils
.getFullURL(utils
.getFullTestDocName("TestDB/testDB.dbf"));
396 String destTestDB
= utils
.getOfficeTemp(xMSF
);
397 destTestDB
= utils
.getFullURL(destTestDB
+ "testDB.dbf");
399 log
.println("copy '"+sourceTestDB
+ "' -> '" + destTestDB
+ "'");
400 utils
.copyFile(xMSF
, sourceTestDB
, destTestDB
);
402 m_dbTools
= new DBTools( xMSF
);
403 String tmpDir
= utils
.getOfficeTemp((xMSF
));
405 DBTools
.DataSourceInfo srcInf
= m_dbTools
.newDataSourceInfo();
406 srcInf
.URL
= "sdbc:dbase:" + DBTools
.dirToUrl(tmpDir
);
407 log
.println("data source: " + srcInf
.URL
);
409 m_dbSrc
= srcInf
.getDataSourceService();
410 m_dbTools
.reRegisterDB(m_dbSourceName
, m_dbSrc
);
412 m_XFormLoader
= FormTools
.bindForm(m_xTextDoc
, m_dbSourceName
,
414 } catch (com
.sun
.star
.uno
.Exception e
) {
415 log
.println("!!! Can't access TestDB !!!");
416 e
.printStackTrace(log
);
417 throw new StatusException("Can't access TestDB", e
);
420 log
.println("creating a new environment for object");
422 TestEnvironment tEnv
= new TestEnvironment(oObj
);
424 tEnv
.addObjRelation("OBJNAME", m_ObjectName
);
426 log
.println("adding shape '" + m_LCShape_Type
+"' for DataAwareControlModel test");
427 aShape
= FormTools
.createControlShape(m_xTextDoc
, 6000, 4500, 15000,
428 10000, m_LCShape_Type
);
429 WriterTools
.getDrawPage(m_xTextDoc
).add(aShape
);
431 m_XPS
= UnoRuntime
.queryInterface(
432 XPropertySet
.class, oObj
);
435 NamedValue prop
= null;
437 for (i
= 0; i
< m_propertiesToSet
.size(); i
++){
438 prop
= m_propertiesToSet
.get(i
);
440 log
.println("setting property: '"+prop
.Name
+"' to value '"+prop
.Value
.toString()+"'");
442 m_XPS
.setPropertyValue(prop
.Name
, prop
.Value
);
444 } catch (com
.sun
.star
.lang
.WrappedTargetException e
) {
445 e
.printStackTrace(log
);
446 throw new StatusException("Couldn't set property '" + prop
.Name
+ "': ", e
);
447 } catch (com
.sun
.star
.lang
.IllegalArgumentException e
) {
448 e
.printStackTrace(log
);
449 throw new StatusException("Couldn't set property '" + prop
.Name
+ "': ", e
);
450 } catch (com
.sun
.star
.beans
.PropertyVetoException e
) {
451 e
.printStackTrace(log
);
452 throw new StatusException("Couldn't set property '" + prop
.Name
+ "': ", e
);
453 } catch (com
.sun
.star
.beans
.UnknownPropertyException e
) {
454 e
.printStackTrace(log
);
455 throw new StatusException("Couldn't set property '" + prop
.Name
+ "': ", e
);
456 } catch (java
.lang
.ClassCastException e
) {
457 e
.printStackTrace(log
);
458 throw new StatusException("Couldn't get property on index '" + i
+ "': ", e
);
461 // added LabelControl for 'DataAwareControlModel'
462 tEnv
.addObjRelation("LC", aShape
.getControl());
464 // added FormLoader for 'DataAwareControlModel'
465 tEnv
.addObjRelation("FL", m_XFormLoader
);
467 // adding relation for XUpdateBroadcaster
470 tEnv
.addObjRelation("XUpdateBroadcaster.Checker",
471 new Checker(m_XFormLoader
, m_XPS
, m_XCtrl
, m_ChangePropertyName
, m_ChangePropertyValue
));
473 // adding relation for DataAwareControlModel service
474 tEnv
.addObjRelation("DataAwareControlModel.NewFieldName",
477 //adding ObjRelation for XPersistObject
478 tEnv
.addObjRelation("PSEUDOPERSISTENT", Boolean
.TRUE
);
480 // adding relation for XFastPropertySet
481 java
.util
.HashSet
<String
> exclude
= new java
.util
.HashSet
<String
>();
482 exclude
.add("FormatKey");
483 tEnv
.addObjRelation("XFastPropertySet.ExcludeProps", exclude
);
485 PropertyValue propVal
= new PropertyValue();
486 propVal
.Name
= "HelpText";
487 propVal
.Value
= "Text since XPropertyAccess";
488 tEnv
.addObjRelation("XPropertyAccess.propertyToChange", propVal
);
489 tEnv
.addObjRelation("XPropertyContainer.propertyNotRemovable", "HelpText");
493 } // finish method getTestEnvironment
496 private static class Checker
implements ifc
.form
._XUpdateBroadcaster
.UpdateChecker
{
497 private Object lastValue
= null;
498 private XLoadable formLoaderF
= null;
499 private XPropertySet ps
= null;
500 private XInterface ctrl
= null;
501 private String ChangePropertyName
= null;
502 Object ChangePropertyValue
= null;
504 public Checker(XLoadable xl
, XPropertySet ps
, XInterface ctrl
, String ChangePropertyName
, Object ChangePropertyValue
) {
508 this.ChangePropertyName
=ChangePropertyName
;
509 this.ChangePropertyValue
=ChangePropertyValue
;
512 public void update() throws com
.sun
.star
.uno
.Exception
{
513 if (!formLoaderF
.isLoaded()) {
517 lastValue
= util
.ValueChanger
.changePValue(ps
.getPropertyValue(ChangePropertyName
));
519 if (lastValue
== null){
521 if (ChangePropertyValue
!= null){
523 lastValue
= ChangePropertyValue
;
527 String msg
= "The initial value of the property '" + ChangePropertyName
+ "' is NULL\n";
528 msg
+= "The member variable 'm_ChangePropertyValue' is NULL\n";
529 msg
+= "Could not change Property.";
531 throw new StatusException(Status
.failed(msg
));
534 ps
.setPropertyValue(ChangePropertyName
, lastValue
);
537 public void commit() throws com
.sun
.star
.sdbc
.SQLException
{
538 XBoundComponent bound
= UnoRuntime
.queryInterface(
539 XBoundComponent
.class, ctrl
);
540 XResultSetUpdate update
= UnoRuntime
.queryInterface(
541 XResultSetUpdate
.class,
548 public boolean wasCommited() throws com
.sun
.star
.uno
.Exception
{
549 formLoaderF
.reload();
551 Object newValue
= ps
.getPropertyValue(ChangePropertyName
);
553 return (newValue
!= null) && (util
.ValueComparer
.equalValue(lastValue
, newValue
));
556 } // finish class GenericModelTest