?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
bump product version to 4.1.6.2
[LibreOffice.git] / ucb / source / core / ucbstore.cxx
blob319a9457a48b5730263c8894b110613730bb7d71
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 * This file incorporates work covered by the following license notice:
10 *
11 * Licensed to the Apache Software Foundation (ASF) under one or more
12 * contributor license agreements. See the NOTICE file distributed
13 * with this work for additional information regarding copyright
14 * ownership. The ASF licenses this file to you under the Apache
15 * License, Version 2.0 (the "License"); you may not use this file
16 * except in compliance with the License. You may obtain a copy of
17 * the License at http://www.apache.org/licenses/LICENSE-2.0 .
18 */
19
20
21 /**************************************************************************
22 TODO
23 **************************************************************************
24
25 *************************************************************************/
26
27 #include <list>
28 #include <boost/unordered_map.hpp>
29 #include <osl/diagnose.h>
30 #include <rtl/ustrbuf.hxx>
31 #include <cppuhelper/interfacecontainer.hxx>
32 #include <com/sun/star/beans/PropertyAttribute.hpp>
33 #include <com/sun/star/beans/PropertySetInfoChange.hpp>
34 #include <com/sun/star/configuration/theDefaultProvider.hpp>
35 #include <com/sun/star/container/XHierarchicalNameAccess.hpp>
36 #include <com/sun/star/container/XNameContainer.hpp>
37 #include <com/sun/star/container/XNameReplace.hpp>
38 #include <com/sun/star/util/XChangesBatch.hpp>
39 #include <comphelper/processfactory.hxx>
40 #include "ucbstore.hxx"
41
42 using namespace com::sun::star::beans;
43 using namespace com::sun::star::configuration;
44 using namespace com::sun::star::container;
45 using namespace com::sun::star::lang;
46 using namespace com::sun::star::ucb;
47 using namespace com::sun::star::uno;
48 using namespace com::sun::star::util;
49 using namespace cppu;
50
51
52 //=========================================================================
53 OUString makeHierarchalNameSegment( const OUString & rIn )
54 {
55 OUStringBuffer aBuffer;
56 aBuffer.appendAscii( "['" );
57
58 sal_Int32 nCount = rIn.getLength();
59 for ( sal_Int32 n = 0; n < nCount; ++n )
60 {
61 const sal_Unicode c = rIn.getStr()[ n ];
62 switch ( c )
63 {
64 case '&':
65 aBuffer.appendAscii( "&amp;" );
66 break;
67
68 case '"':
69 aBuffer.appendAscii( "&quot;" );
70 break;
71
72 case '\'':
73 aBuffer.appendAscii( "&apos;" );
74 break;
75
76 case '<':
77 aBuffer.appendAscii( "&lt;" );
78 break;
79
80 case '>':
81 aBuffer.appendAscii( "&gt;" );
82 break;
83
84 default:
85 aBuffer.append( c );
86 break;
87 }
88 }
89
90 aBuffer.appendAscii( "']" );
91 return OUString( aBuffer.makeStringAndClear() );
92 }
93
94 //=========================================================================
95
96 #define STORE_CONTENTPROPERTIES_KEY "/org.openoffice.ucb.Store/ContentProperties"
97
98 // describe path of cfg entry
99 #define CFGPROPERTY_NODEPATH "nodepath"
100 // true->async. update; false->sync. update
101 #define CFGPROPERTY_LAZYWRITE "lazywrite"
102
103 //=========================================================================
104
105 struct equalString_Impl
106 {
107 bool operator()( const OUString& s1, const OUString& s2 ) const
108 {
109 return !!( s1 == s2 );
110 }
111 };
112
113 struct hashString_Impl
114 {
115 size_t operator()( const OUString & rName ) const
116 {
117 return rName.hashCode();
118 }
119 };
120
121 //=========================================================================
122 //
123 // PropertySetMap_Impl.
124 //
125 //=========================================================================
126
127 typedef boost::unordered_map
128 <
129 OUString,
130 PersistentPropertySet*,
131 hashString_Impl,
132 equalString_Impl
133 >
134 PropertySetMap_Impl;
135
136 //=========================================================================
137 //
138 // class PropertySetInfo_Impl
139 //
140 //=========================================================================
141
142 class PropertySetInfo_Impl :
143 public OWeakObject, public XTypeProvider, public XPropertySetInfo
144 {
145 Reference< XMultiServiceFactory > m_xSMgr;
146 Sequence< Property >* m_pProps;
147 PersistentPropertySet* m_pOwner;
148
149 public:
150 PropertySetInfo_Impl( const Reference< XMultiServiceFactory >& rxSMgr,
151 PersistentPropertySet* pOwner );
152 virtual ~PropertySetInfo_Impl();
153
154 // XInterface
155 XINTERFACE_DECL()
156
157 // XTypeProvider
158 XTYPEPROVIDER_DECL()
159
160 // XPropertySetInfo
161 virtual Sequence< Property > SAL_CALL getProperties()
162 throw( RuntimeException );
163 virtual Property SAL_CALL getPropertyByName( const OUString& aName )
164 throw( UnknownPropertyException, RuntimeException );
165 virtual sal_Bool SAL_CALL hasPropertyByName( const OUString& Name )
166 throw( RuntimeException );
167
168 // Non-interface methods.
169 void reset() { delete m_pProps; m_pProps = 0; }
170 };
171
172 //=========================================================================
173 //
174 // UcbStore_Impl.
175 //
176 //=========================================================================
177
178 struct UcbStore_Impl
179 {
180 osl::Mutex m_aMutex;
181 Sequence< Any > m_aInitArgs;
182 Reference< XPropertySetRegistry > m_xTheRegistry;
183 };
184
185 //=========================================================================
186 //=========================================================================
187 //=========================================================================
188 //
189 // UcbStore Implementation.
190 //
191 //=========================================================================
192 //=========================================================================
193 //=========================================================================
194
195 UcbStore::UcbStore( const Reference< XMultiServiceFactory >& rXSMgr )
196 : m_xSMgr( rXSMgr ),
197 m_pImpl( new UcbStore_Impl() )
198 {
199 }
200
201 //=========================================================================
202 // virtual
203 UcbStore::~UcbStore()
204 {
205 delete m_pImpl;
206 }
207
208 //=========================================================================
209 //
210 // XInterface methods.
211 //
212 //=========================================================================
213
214 XINTERFACE_IMPL_4( UcbStore,
215 XTypeProvider,
216 XServiceInfo,
217 XPropertySetRegistryFactory,
218 XInitialization );
219
220 //=========================================================================
221 //
222 // XTypeProvider methods.
223 //
224 //=========================================================================
225
226 XTYPEPROVIDER_IMPL_4( UcbStore,
227 XTypeProvider,
228 XServiceInfo,
229 XPropertySetRegistryFactory,
230 XInitialization );
231
232 //=========================================================================
233 //
234 // XServiceInfo methods.
235 //
236 //=========================================================================
237
238 XSERVICEINFO_IMPL_1( UcbStore,
239 OUString( "com.sun.star.comp.ucb.UcbStore" ),
240 OUString( STORE_SERVICE_NAME ) );
241
242 //=========================================================================
243 //
244 // Service factory implementation.
245 //
246 //=========================================================================
247
248 ONE_INSTANCE_SERVICE_FACTORY_IMPL( UcbStore );
249
250 //=========================================================================
251 //
252 // XPropertySetRegistryFactory methods.
253 //
254 //=========================================================================
255
256 // virtual
257 Reference< XPropertySetRegistry > SAL_CALL
258 UcbStore::createPropertySetRegistry( const OUString& )
259 throw( RuntimeException )
260 {
261 // The URL parameter is ignored by this interface implementation. It always
262 // uses the configuration server as storage medium.
263
264 if ( !m_pImpl->m_xTheRegistry.is() )
265 {
266 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
267 if ( !m_pImpl->m_xTheRegistry.is() )
268 m_pImpl->m_xTheRegistry = new PropertySetRegistry( m_xSMgr, getInitArgs() );
269 }
270
271 return m_pImpl->m_xTheRegistry;
272 }
273
274 //=========================================================================
275 //
276 // XInitialization methods.
277 //
278 //=========================================================================
279
280 // virtual
281 void SAL_CALL UcbStore::initialize( const Sequence< Any >& aArguments )
282 throw( Exception, RuntimeException )
283 {
284 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
285 m_pImpl->m_aInitArgs = aArguments;
286 }
287
288 //=========================================================================
289 const Sequence< Any >& UcbStore::getInitArgs() const
290 {
291 return m_pImpl->m_aInitArgs;
292 }
293
294 //=========================================================================
295 //
296 // PropertySetRegistry_Impl.
297 //
298 //=========================================================================
299
300 struct PropertySetRegistry_Impl
301 {
302 const Sequence< Any > m_aInitArgs;
303 PropertySetMap_Impl m_aPropSets;
304 Reference< XMultiServiceFactory > m_xConfigProvider;
305 Reference< XInterface > m_xRootReadAccess;
306 Reference< XInterface > m_xRootWriteAccess;
307 osl::Mutex m_aMutex;
308 sal_Bool m_bTriedToGetRootReadAccess; // #82494#
309 sal_Bool m_bTriedToGetRootWriteAccess; // #82494#
310
311 PropertySetRegistry_Impl( const Sequence< Any > &rInitArgs )
312 : m_aInitArgs( rInitArgs ),
313 m_bTriedToGetRootReadAccess( sal_False ),
314 m_bTriedToGetRootWriteAccess( sal_False )
315 {
316 }
317 };
318
319 //=========================================================================
320 //=========================================================================
321 //=========================================================================
322 //
323 // PropertySetRegistry Implementation.
324 //
325 //=========================================================================
326 //=========================================================================
327 //=========================================================================
328
329 PropertySetRegistry::PropertySetRegistry(
330 const Reference< XMultiServiceFactory >& rXSMgr,
331 const Sequence< Any > &rInitArgs )
332 : m_xSMgr( rXSMgr ),
333 m_pImpl( new PropertySetRegistry_Impl( rInitArgs ) )
334 {
335 }
336
337 //=========================================================================
338 // virtual
339 PropertySetRegistry::~PropertySetRegistry()
340 {
341 delete m_pImpl;
342 }
343
344 //=========================================================================
345 //
346 // XInterface methods.
347 //
348 //=========================================================================
349
350 XINTERFACE_IMPL_5( PropertySetRegistry,
351 XTypeProvider,
352 XServiceInfo,
353 XPropertySetRegistry,
354 XElementAccess, /* base of XNameAccess */
355 XNameAccess );
356
357 //=========================================================================
358 //
359 // XTypeProvider methods.
360 //
361 //=========================================================================
362
363 XTYPEPROVIDER_IMPL_4( PropertySetRegistry,
364 XTypeProvider,
365 XServiceInfo,
366 XPropertySetRegistry,
367 XNameAccess );
368
369 //=========================================================================
370 //
371 // XServiceInfo methods.
372 //
373 //=========================================================================
374
375 XSERVICEINFO_NOFACTORY_IMPL_1( PropertySetRegistry,
376 OUString( "com.sun.star.comp.ucb.PropertySetRegistry" ),
377 OUString( PROPSET_REG_SERVICE_NAME ) );
378
379 //=========================================================================
380 //
381 // XPropertySetRegistry methods.
382 //
383 //=========================================================================
384
385 // virtual
386 Reference< XPersistentPropertySet > SAL_CALL
387 PropertySetRegistry::openPropertySet( const OUString& key, sal_Bool create )
388 throw( RuntimeException )
389 {
390 if ( !key.isEmpty() )
391 {
392 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
393
394 PropertySetMap_Impl& rSets = m_pImpl->m_aPropSets;
395
396 PropertySetMap_Impl::const_iterator it = rSets.find( key );
397 if ( it != rSets.end() )
398 {
399 // Already instanciated.
400 return Reference< XPersistentPropertySet >( (*it).second );
401 }
402 else
403 {
404 // Create new instance.
405 Reference< XNameAccess > xRootNameAccess(
406 getRootConfigReadAccess(), UNO_QUERY );
407 if ( xRootNameAccess.is() )
408 {
409 // Propertyset in registry?
410 if ( xRootNameAccess->hasByName( key ) )
411 {
412 // Yep!
413 return Reference< XPersistentPropertySet >(
414 new PersistentPropertySet(
415 m_xSMgr, *this, key ) );
416 }
417 else if ( create )
418 {
419 // No. Create entry for propertyset.
420
421 Reference< XSingleServiceFactory > xFac(
422 getConfigWriteAccess( OUString() ), UNO_QUERY );
423 Reference< XChangesBatch > xBatch( xFac, UNO_QUERY );
424 Reference< XNameContainer > xContainer( xFac, UNO_QUERY );
425
426 OSL_ENSURE( xFac.is(),
427 "PropertySetRegistry::openPropertySet - "
428 "No factory!" );
429
430 OSL_ENSURE( xBatch.is(),
431 "PropertySetRegistry::openPropertySet - "
432 "No batch!" );
433
434 OSL_ENSURE( xContainer.is(),
435 "PropertySetRegistry::openPropertySet - "
436 "No conteiner!" );
437
438 if ( xFac.is() && xBatch.is() && xContainer.is() )
439 {
440 try
441 {
442 // Create new "Properties" config item.
443 Reference< XNameReplace > xNameReplace(
444 xFac->createInstance(), UNO_QUERY );
445
446 if ( xNameReplace.is() )
447 {
448 // Fill new item...
449
450 // // Set Values
451 // xNameReplace->replaceByName(
452 // OUString("Values"),
453 // makeAny( ... ) );
454
455 // Insert new item.
456 xContainer->insertByName(
457 key, makeAny( xNameReplace ) );
458 // Commit changes.
459 xBatch->commitChanges();
460
461 return Reference< XPersistentPropertySet >(
462 new PersistentPropertySet(
463 m_xSMgr, *this, key ) );
464 }
465 }
466 catch (const IllegalArgumentException&)
467 {
468 // insertByName
469
470 OSL_FAIL( "PropertySetRegistry::openPropertySet - "
471 "caught IllegalArgumentException!" );
472 }
473 catch (const ElementExistException&)
474 {
475 // insertByName
476
477 OSL_FAIL( "PropertySetRegistry::openPropertySet - "
478 "caught ElementExistException!" );
479 }
480 catch (const WrappedTargetException&)
481 {
482 // insertByName, commitChanges
483
484 OSL_FAIL( "PropertySetRegistry::openPropertySet - "
485 "caught WrappedTargetException!" );
486 }
487 catch (const RuntimeException&)
488 {
489 OSL_FAIL( "PropertySetRegistry::openPropertySet - "
490 "caught RuntimeException!" );
491 }
492 catch (const Exception&)
493 {
494 // createInstance
495
496 OSL_FAIL( "PropertySetRegistry::openPropertySet - "
497 "caught Exception!" );
498 }
499 }
500 }
501 else
502 {
503 // No entry. Fail, but no error.
504 return Reference< XPersistentPropertySet >();
505 }
506 }
507
508 OSL_TRACE( "PropertySetRegistry::openPropertySet no root access" );
509 }
510 }
511
512 return Reference< XPersistentPropertySet >();
513 }
514
515 //=========================================================================
516 // virtual
517 void SAL_CALL PropertySetRegistry::removePropertySet( const OUString& key )
518 throw( RuntimeException )
519 {
520 if ( key.isEmpty() )
521 return;
522
523 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
524
525 Reference< XNameAccess > xRootNameAccess(
526 getRootConfigReadAccess(), UNO_QUERY );
527 if ( xRootNameAccess.is() )
528 {
529 // Propertyset in registry?
530 if ( !xRootNameAccess->hasByName( key ) )
531 return;
532 Reference< XChangesBatch > xBatch(
533 getConfigWriteAccess( OUString() ), UNO_QUERY );
534 Reference< XNameContainer > xContainer( xBatch, UNO_QUERY );
535
536 if ( xBatch.is() && xContainer.is() )
537 {
538 try
539 {
540 // Remove item.
541 xContainer->removeByName( key );
542 // Commit changes.
543 xBatch->commitChanges();
544
545 // Success.
546 return;
547 }
548 catch (const NoSuchElementException&)
549 {
550 // removeByName
551
552 OSL_FAIL( "PropertySetRegistry::removePropertySet - "
553 "caught NoSuchElementException!" );
554 return;
555 }
556 catch (const WrappedTargetException&)
557 {
558 // commitChanges
559
560 OSL_FAIL( "PropertySetRegistry::removePropertySet - "
561 "caught WrappedTargetException!" );
562 return;
563 }
564 }
565
566 return;
567 }
568
569 OSL_TRACE( "PropertySetRegistry::removePropertySet - no root access" );
570 }
571
572 //=========================================================================
573 //
574 // XElementAccess methods.
575 //
576 //=========================================================================
577
578 // virtual
579 com::sun::star::uno::Type SAL_CALL PropertySetRegistry::getElementType()
580 throw( RuntimeException )
581 {
582 return getCppuType( ( Reference< XPersistentPropertySet > * ) 0 );
583 }
584
585 //=========================================================================
586 // virtual
587 sal_Bool SAL_CALL PropertySetRegistry::hasElements()
588 throw( RuntimeException )
589 {
590 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
591
592 Reference< XElementAccess > xElemAccess(
593 getRootConfigReadAccess(), UNO_QUERY );
594 if ( xElemAccess.is() )
595 return xElemAccess->hasElements();
596
597 return sal_False;
598 }
599
600 //=========================================================================
601 //
602 // XNameAccess methods.
603 //
604 //=========================================================================
605
606 // virtual
607 Any SAL_CALL PropertySetRegistry::getByName( const OUString& aName )
608 throw( NoSuchElementException, WrappedTargetException, RuntimeException )
609 {
610 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
611
612 Reference< XNameAccess > xNameAccess(
613 getRootConfigReadAccess(), UNO_QUERY );
614 if ( xNameAccess.is() )
615 {
616
617 try
618 {
619 return xNameAccess->getByName( aName );
620 }
621 catch (const NoSuchElementException&)
622 {
623 // getByName
624 }
625 catch (const WrappedTargetException&)
626 {
627 // getByName
628 }
629 }
630
631 return Any();
632 }
633
634 //=========================================================================
635 // virtual
636 Sequence< OUString > SAL_CALL PropertySetRegistry::getElementNames()
637 throw( RuntimeException )
638 {
639 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
640
641 Reference< XNameAccess > xNameAccess(
642 getRootConfigReadAccess(), UNO_QUERY );
643 if ( xNameAccess.is() )
644 {
645 return xNameAccess->getElementNames();
646 }
647 return Sequence< OUString >( 0 );
648 }
649
650 //=========================================================================
651 // virtual
652 sal_Bool SAL_CALL PropertySetRegistry::hasByName( const OUString& aName )
653 throw( RuntimeException )
654 {
655 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
656
657 Reference< XNameAccess > xNameAccess(
658 getRootConfigReadAccess(), UNO_QUERY );
659 if ( xNameAccess.is() )
660 {
661 return xNameAccess->hasByName( aName );
662 }
663
664 return sal_False;
665 }
666
667 //=========================================================================
668 void PropertySetRegistry::add( PersistentPropertySet* pSet )
669 {
670 OUString key( pSet->getKey() );
671
672 if ( !key.isEmpty() )
673 {
674 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
675 m_pImpl->m_aPropSets[ key ] = pSet;
676 }
677 }
678
679 //=========================================================================
680 void PropertySetRegistry::remove( PersistentPropertySet* pSet )
681 {
682 OUString key( pSet->getKey() );
683
684 if ( !key.isEmpty() )
685 {
686 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
687
688 PropertySetMap_Impl& rSets = m_pImpl->m_aPropSets;
689
690 PropertySetMap_Impl::iterator it = rSets.find( key );
691 if ( it != rSets.end() )
692 {
693 // Found.
694 rSets.erase( it );
695 }
696 }
697 }
698
699 //=========================================================================
700 void PropertySetRegistry::renamePropertySet( const OUString& rOldKey,
701 const OUString& rNewKey )
702 {
703 if ( rOldKey == rNewKey )
704 return;
705
706 Reference< XNameAccess > xRootNameAccess(
707 getConfigWriteAccess( OUString() ), UNO_QUERY );
708 if ( xRootNameAccess.is() )
709 {
710 // Old key present?
711 if ( xRootNameAccess->hasByName( rOldKey ) )
712 {
713 // New key not present?
714 if ( xRootNameAccess->hasByName( rNewKey ) )
715 {
716 OSL_FAIL( "PropertySetRegistry::renamePropertySet - "
717 "New key exists!" );
718 return;
719 }
720 Reference< XSingleServiceFactory > xFac(
721 xRootNameAccess, UNO_QUERY );
722 Reference< XChangesBatch > xBatch( xFac, UNO_QUERY );
723 Reference< XNameContainer > xContainer( xFac, UNO_QUERY );
724
725 OSL_ENSURE( xFac.is(),
726 "PropertySetRegistry::renamePropertySet - "
727 "No factory!" );
728
729 OSL_ENSURE( xBatch.is(),
730 "PropertySetRegistry::renamePropertySet - "
731 "No batch!" );
732
733 OSL_ENSURE( xContainer.is(),
734 "PropertySetRegistry::renamePropertySet - "
735 "No container!" );
736
737 if ( xFac.is() && xBatch.is() && xContainer.is() )
738 {
739 //////////////////////////////////////////////////////
740 // Create new "Properties" config item.
741 //////////////////////////////////////////////////////
742
743 try
744 {
745 Reference< XNameReplace > xNameReplace(
746 xFac->createInstance(), UNO_QUERY );
747
748 if ( xNameReplace.is() )
749 {
750 // Insert new item.
751 xContainer->insertByName(
752 rNewKey, makeAny( xNameReplace ) );
753 // Commit changes.
754 xBatch->commitChanges();
755 }
756 }
757 catch (const IllegalArgumentException&)
758 {
759 // insertByName
760
761 OSL_FAIL( "PropertySetRegistry::renamePropertySet - "
762 "caught IllegalArgumentException!" );
763 return;
764 }
765 catch (const ElementExistException&)
766 {
767 // insertByName
768
769 OSL_FAIL( "PropertySetRegistry::renamePropertySet - "
770 "caught ElementExistException!" );
771 return;
772 }
773 catch (const WrappedTargetException&)
774 {
775 // insertByName, commitChanges
776
777 OSL_FAIL( "PropertySetRegistry::renamePropertySet - "
778 "caught WrappedTargetException!" );
779 return;
780 }
781 catch (const RuntimeException&)
782 {
783 OSL_FAIL( "PropertySetRegistry::renamePropertySet - "
784 "caught RuntimeException!" );
785 return;
786 }
787 catch (const Exception&)
788 {
789 // createInstance
790
791 OSL_FAIL( "PropertySetRegistry::renamePropertySet - "
792 "caught Exception!" );
793 return;
794 }
795
796 //////////////////////////////////////////////////////
797 // Copy data...
798 //////////////////////////////////////////////////////
799
800 Reference< XHierarchicalNameAccess > xRootHierNameAccess(
801 xRootNameAccess, UNO_QUERY );
802 if ( !xRootHierNameAccess.is() )
803 {
804 OSL_FAIL( "PropertySetRegistry::renamePropertySet - "
805 "No hierarchical name access!" );
806 return;
807 }
808
809 try
810 {
811 OUString aOldValuesKey
812 = makeHierarchalNameSegment( rOldKey );
813 aOldValuesKey += "/Values";
814
815 Reference< XNameAccess > xOldNameAccess;
816 xRootHierNameAccess->getByHierarchicalName(
817 aOldValuesKey )
818 >>= xOldNameAccess;
819 if ( !xOldNameAccess.is() )
820 {
821 OSL_FAIL( "PersistentPropertySet::renamePropertySet - "
822 "No old name access!" );
823 return;
824 }
825
826 // Obtain property names.
827 Sequence< OUString > aElems
828 = xOldNameAccess->getElementNames();
829 sal_Int32 nCount = aElems.getLength();
830 if ( nCount )
831 {
832 OUString aNewValuesKey
833 = makeHierarchalNameSegment( rNewKey );
834 aNewValuesKey += "/Values";
835
836 Reference< XSingleServiceFactory > xNewFac;
837 xRootHierNameAccess->getByHierarchicalName(
838 aNewValuesKey )
839 >>= xNewFac;
840 if ( !xNewFac.is() )
841 {
842 OSL_FAIL( "PersistentPropertySet::renamePropertySet - "
843 "No new factory!" );
844 return;
845 }
846
847 Reference< XNameContainer > xNewContainer(
848 xNewFac, UNO_QUERY );
849 if ( !xNewContainer.is() )
850 {
851 OSL_FAIL( "PersistentPropertySet::renamePropertySet - "
852 "No new container!" );
853 return;
854 }
855
856 aOldValuesKey += "/";
857
858 OUString aHandleKey("/Handle");
859 OUString aValueKey("/Value");
860 OUString aStateKey("/State");
861 OUString aAttrKey("/Attributes");
862
863 for ( sal_Int32 n = 0; n < nCount; ++n )
864 {
865 const OUString& rPropName = aElems[ n ];
866
867 // Create new item.
868 Reference< XNameReplace > xNewPropNameReplace(
869 xNewFac->createInstance(), UNO_QUERY );
870
871 if ( !xNewPropNameReplace.is() )
872 {
873 OSL_FAIL( "PersistentPropertySet::renamePropertySet - "
874 "No new prop name replace!" );
875 return;
876 }
877
878 // Fill new item...
879
880 // Set Values
881 OUString aKey = aOldValuesKey;
882 aKey += makeHierarchalNameSegment( rPropName );
883
884 // ... handle
885 OUString aNewKey1 = aKey;
886 aNewKey1 += aHandleKey;
887 Any aAny =
888 xRootHierNameAccess->getByHierarchicalName(
889 aNewKey1 );
890 xNewPropNameReplace->replaceByName(
891 OUString("Handle"),
892 aAny );
893
894 // ... value
895 aNewKey1 = aKey;
896 aNewKey1 += aValueKey;
897 aAny =
898 xRootHierNameAccess->getByHierarchicalName(
899 aNewKey1 );
900 xNewPropNameReplace->replaceByName(
901 OUString("Value"),
902 aAny );
903
904 // ... state
905 aNewKey1 = aKey;
906 aNewKey1 += aStateKey;
907 aAny =
908 xRootHierNameAccess->getByHierarchicalName(
909 aNewKey1 );
910 xNewPropNameReplace->replaceByName(
911 OUString("State"),
912 aAny );
913
914 // ... attributes
915 aNewKey1 = aKey;
916 aNewKey1 += aAttrKey;
917 aAny =
918 xRootHierNameAccess->getByHierarchicalName(
919 aNewKey1 );
920 xNewPropNameReplace->replaceByName(
921 OUString("Attributes"),
922 aAny );
923
924 // Insert new item.
925 xNewContainer->insertByName(
926 rPropName, makeAny( xNewPropNameReplace ) );
927
928 // Commit changes.
929 xBatch->commitChanges();
930 }
931 }
932 }
933 catch (const IllegalArgumentException&)
934 {
935 // insertByName, replaceByName
936
937 OSL_FAIL( "PropertySetRegistry::renamePropertySet - "
938 "caught IllegalArgumentException!" );
939 return;
940 }
941 catch (const ElementExistException&)
942 {
943 // insertByName
944
945 OSL_FAIL( "PropertySetRegistry::renamePropertySet - "
946 "caught ElementExistException!" );
947 return;
948 }
949 catch (const WrappedTargetException&)
950 {
951 // insertByName, replaceByName, commitChanges
952
953 OSL_FAIL( "PropertySetRegistry::renamePropertySet - "
954 "caught WrappedTargetException!" );
955 return;
956 }
957 catch (const NoSuchElementException&)
958 {
959 // getByHierarchicalName, replaceByName
960
961 OSL_FAIL( "PropertySetRegistry::renamePropertySet - "
962 "caught NoSuchElementException!" );
963 return;
964 }
965 catch (const RuntimeException&)
966 {
967 OSL_FAIL( "PropertySetRegistry::renamePropertySet - "
968 "caught RuntimeException!" );
969 return;
970 }
971 catch (const Exception&)
972 {
973 // createInstance
974
975 OSL_FAIL( "PropertySetRegistry::renamePropertySet - "
976 "caught Exception!" );
977 return;
978 }
979
980 //////////////////////////////////////////////////////
981 // Remove old entry...
982 //////////////////////////////////////////////////////
983
984 try
985 {
986 // Remove item.
987 xContainer->removeByName( rOldKey );
988 // Commit changes.
989 xBatch->commitChanges();
990
991 // Success.
992 return;
993 }
994 catch (const NoSuchElementException&)
995 {
996 // removeByName
997
998 OSL_FAIL( "PropertySetRegistry::renamePropertySet - "
999 "caught NoSuchElementException!" );
1000 return;
1001 }
1002 catch (const WrappedTargetException&)
1003 {
1004 // commitChanges
1005
1006 OSL_FAIL( "PropertySetRegistry::renamePropertySet - "
1007 "caught WrappedTargetException!" );
1008 return;
1009 }
1010 }
1011 }
1012 }
1013
1014 OSL_FAIL( "PropertySetRegistry::renamePropertySet - Error!" );
1015 }
1016
1017 //=========================================================================
1018 Reference< XMultiServiceFactory > PropertySetRegistry::getConfigProvider()
1019 {
1020 if ( !m_pImpl->m_xConfigProvider.is() )
1021 {
1022 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
1023 if ( !m_pImpl->m_xConfigProvider.is() )
1024 {
1025 const Sequence< Any >& rInitArgs = m_pImpl->m_aInitArgs;
1026
1027 if ( rInitArgs.getLength() > 0 )
1028 {
1029 // Extract config provider from service init args.
1030 rInitArgs[ 0 ] >>= m_pImpl->m_xConfigProvider;
1031
1032 OSL_ENSURE( m_pImpl->m_xConfigProvider.is(),
1033 "PropertySetRegistry::getConfigProvider - "
1034 "No config provider!" );
1035 }
1036 else
1037 {
1038 try
1039 {
1040 m_pImpl->m_xConfigProvider
1041 = theDefaultProvider::get(
1042 comphelper::getComponentContext( m_xSMgr ) );
1043 }
1044 catch (const Exception&)
1045 {
1046 OSL_TRACE( "PropertySetRegistry::getConfigProvider - "
1047 "caught exception!" );
1048 }
1049 }
1050 }
1051 }
1052
1053 return m_pImpl->m_xConfigProvider;
1054 }
1055
1056 //=========================================================================
1057 Reference< XInterface > PropertySetRegistry::getRootConfigReadAccess()
1058 {
1059 try
1060 {
1061 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
1062
1063 if ( !m_pImpl->m_xRootReadAccess.is() )
1064 {
1065 if ( m_pImpl->m_bTriedToGetRootReadAccess ) // #82494#
1066 {
1067 OSL_FAIL( "PropertySetRegistry::getRootConfigReadAccess - "
1068 "Unable to read any config data! -> #82494#" );
1069 return Reference< XInterface >();
1070 }
1071
1072 getConfigProvider();
1073
1074 if ( m_pImpl->m_xConfigProvider.is() )
1075 {
1076 Sequence< Any > aArguments( 1 );
1077 PropertyValue aProperty;
1078 aProperty.Name
1079 = OUString( CFGPROPERTY_NODEPATH );
1080 aProperty.Value
1081 <<= OUString( STORE_CONTENTPROPERTIES_KEY );
1082 aArguments[ 0 ] <<= aProperty;
1083
1084 m_pImpl->m_bTriedToGetRootReadAccess = sal_True;
1085
1086 m_pImpl->m_xRootReadAccess =
1087 m_pImpl->m_xConfigProvider->createInstanceWithArguments(
1088 OUString( "com.sun.star.configuration.ConfigurationAccess" ),
1089 aArguments );
1090
1091 if ( m_pImpl->m_xRootReadAccess.is() )
1092 return m_pImpl->m_xRootReadAccess;
1093 }
1094 }
1095 else
1096 return m_pImpl->m_xRootReadAccess;
1097 }
1098 catch (const RuntimeException&)
1099 {
1100 throw;
1101 }
1102 catch (const Exception&)
1103 {
1104 // createInstance, createInstanceWithArguments
1105
1106 OSL_FAIL( "PropertySetRegistry::getRootConfigReadAccess - caught Exception!" );
1107 return Reference< XInterface >();
1108 }
1109
1110 OSL_TRACE( "PropertySetRegistry::getRootConfigReadAccess - Error!" );
1111 return Reference< XInterface >();
1112 }
1113
1114 //=========================================================================
1115 Reference< XInterface > PropertySetRegistry::getConfigWriteAccess(
1116 const OUString& rPath )
1117 {
1118 try
1119 {
1120 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
1121
1122 if ( !m_pImpl->m_xRootWriteAccess.is() )
1123 {
1124 if ( m_pImpl->m_bTriedToGetRootWriteAccess ) // #82494#
1125 {
1126 OSL_FAIL( "PropertySetRegistry::getConfigWriteAccess - "
1127 "Unable to write any config data! -> #82494#" );
1128 return Reference< XInterface >();
1129 }
1130
1131 getConfigProvider();
1132
1133 if ( m_pImpl->m_xConfigProvider.is() )
1134 {
1135 Sequence< Any > aArguments( 2 );
1136 PropertyValue aProperty;
1137
1138 aProperty.Name = OUString( CFGPROPERTY_NODEPATH );
1139 aProperty.Value <<= OUString( STORE_CONTENTPROPERTIES_KEY );
1140 aArguments[ 0 ] <<= aProperty;
1141
1142 aProperty.Name = OUString( CFGPROPERTY_LAZYWRITE );
1143 aProperty.Value <<= sal_True;
1144 aArguments[ 1 ] <<= aProperty;
1145
1146 m_pImpl->m_bTriedToGetRootWriteAccess = sal_True;
1147
1148 m_pImpl->m_xRootWriteAccess =
1149 m_pImpl->m_xConfigProvider->createInstanceWithArguments(
1150 OUString( "com.sun.star.configuration.ConfigurationUpdateAccess" ),
1151 aArguments );
1152
1153 OSL_ENSURE( m_pImpl->m_xRootWriteAccess.is(),
1154 "PropertySetRegistry::getConfigWriteAccess - "
1155 "No config update access!" );
1156 }
1157 }
1158
1159 if ( m_pImpl->m_xRootWriteAccess.is() )
1160 {
1161 if ( !rPath.isEmpty() )
1162 {
1163 Reference< XHierarchicalNameAccess > xNA(
1164 m_pImpl->m_xRootWriteAccess, UNO_QUERY );
1165 if ( xNA.is() )
1166 {
1167 Reference< XInterface > xInterface;
1168 xNA->getByHierarchicalName( rPath ) >>= xInterface;
1169
1170 if ( xInterface.is() )
1171 return xInterface;
1172 }
1173 }
1174 else
1175 return m_pImpl->m_xRootWriteAccess;
1176 }
1177 }
1178 catch (const RuntimeException&)
1179 {
1180 throw;
1181 }
1182 catch (const NoSuchElementException&)
1183 {
1184 // getByHierarchicalName
1185
1186 OSL_FAIL( "PropertySetRegistry::getConfigWriteAccess - "
1187 "caught NoSuchElementException!" );
1188 return Reference< XInterface >();
1189 }
1190 catch (const Exception&)
1191 {
1192 // createInstance, createInstanceWithArguments
1193
1194 OSL_FAIL( "PropertySetRegistry::getConfigWriteAccess - "
1195 "caught Exception!" );
1196 return Reference< XInterface >();
1197 }
1198
1199 OSL_FAIL( "PropertySetRegistry::getConfigWriteAccess - Error!" );
1200 return Reference< XInterface >();
1201 }
1202
1203 //=========================================================================
1204 //
1205 // PropertyListeners_Impl.
1206 //
1207 //=========================================================================
1208
1209 typedef OMultiTypeInterfaceContainerHelperVar
1210 <
1211 OUString,
1212 hashString_Impl,
1213 equalString_Impl
1214 > PropertyListeners_Impl;
1215
1216 //=========================================================================
1217 //
1218 // PersistentPropertySet_Impl.
1219 //
1220 //=========================================================================
1221
1222 struct PersistentPropertySet_Impl
1223 {
1224 PropertySetRegistry* m_pCreator;
1225 PropertySetInfo_Impl* m_pInfo;
1226 OUString m_aKey;
1227 OUString m_aFullKey;
1228 osl::Mutex m_aMutex;
1229 OInterfaceContainerHelper* m_pDisposeEventListeners;
1230 OInterfaceContainerHelper* m_pPropSetChangeListeners;
1231 PropertyListeners_Impl* m_pPropertyChangeListeners;
1232
1233 PersistentPropertySet_Impl( PropertySetRegistry& rCreator,
1234 const OUString& rKey )
1235 : m_pCreator( &rCreator ), m_pInfo( NULL ), m_aKey( rKey ),
1236 m_pDisposeEventListeners( NULL ), m_pPropSetChangeListeners( NULL ),
1237 m_pPropertyChangeListeners( NULL )
1238 {
1239 m_pCreator->acquire();
1240 }
1241
1242 ~PersistentPropertySet_Impl()
1243 {
1244 m_pCreator->release();
1245
1246 if ( m_pInfo )
1247 m_pInfo->release();
1248
1249 delete m_pDisposeEventListeners;
1250 delete m_pPropSetChangeListeners;
1251 delete m_pPropertyChangeListeners;
1252 }
1253 };
1254
1255 //=========================================================================
1256 //=========================================================================
1257 //=========================================================================
1258 //
1259 // PersistentPropertySet Implementation.
1260 //
1261 //=========================================================================
1262 //=========================================================================
1263 //=========================================================================
1264
1265 PersistentPropertySet::PersistentPropertySet(
1266 const Reference< XMultiServiceFactory >& rXSMgr,
1267 PropertySetRegistry& rCreator,
1268 const OUString& rKey )
1269 : m_xSMgr( rXSMgr ),
1270 m_pImpl( new PersistentPropertySet_Impl( rCreator, rKey ) )
1271 {
1272 // register at creator.
1273 rCreator.add( this );
1274 }
1275
1276 //=========================================================================
1277 // virtual
1278 PersistentPropertySet::~PersistentPropertySet()
1279 {
1280 // deregister at creator.
1281 m_pImpl->m_pCreator->remove( this );
1282
1283 delete m_pImpl;
1284 }
1285
1286 //=========================================================================
1287 //
1288 // XInterface methods.
1289 //
1290 //=========================================================================
1291
1292 XINTERFACE_IMPL_9( PersistentPropertySet,
1293 XTypeProvider,
1294 XServiceInfo,
1295 XComponent,
1296 XPropertySet, /* base of XPersistentPropertySet */
1297 XNamed,
1298 XPersistentPropertySet,
1299 XPropertyContainer,
1300 XPropertySetInfoChangeNotifier,
1301 XPropertyAccess );
1302
1303 //=========================================================================
1304 //
1305 // XTypeProvider methods.
1306 //
1307 //=========================================================================
1308
1309 XTYPEPROVIDER_IMPL_8( PersistentPropertySet,
1310 XTypeProvider,
1311 XServiceInfo,
1312 XComponent,
1313 XPersistentPropertySet,
1314 XNamed,
1315 XPropertyContainer,
1316 XPropertySetInfoChangeNotifier,
1317 XPropertyAccess );
1318
1319 //=========================================================================
1320 //
1321 // XServiceInfo methods.
1322 //
1323 //=========================================================================
1324
1325 XSERVICEINFO_NOFACTORY_IMPL_1( PersistentPropertySet,
1326 OUString( "com.sun.star.comp.ucb.PersistentPropertySet" ),
1327 OUString( PERS_PROPSET_SERVICE_NAME ) );
1328
1329 //=========================================================================
1330 //
1331 // XComponent methods.
1332 //
1333 //=========================================================================
1334
1335 // virtual
1336 void SAL_CALL PersistentPropertySet::dispose()
1337 throw( RuntimeException )
1338 {
1339 if ( m_pImpl->m_pDisposeEventListeners &&
1340 m_pImpl->m_pDisposeEventListeners->getLength() )
1341 {
1342 EventObject aEvt;
1343 aEvt.Source = static_cast< XComponent * >( this );
1344 m_pImpl->m_pDisposeEventListeners->disposeAndClear( aEvt );
1345 }
1346
1347 if ( m_pImpl->m_pPropSetChangeListeners &&
1348 m_pImpl->m_pPropSetChangeListeners->getLength() )
1349 {
1350 EventObject aEvt;
1351 aEvt.Source = static_cast< XPropertySetInfoChangeNotifier * >( this );
1352 m_pImpl->m_pPropSetChangeListeners->disposeAndClear( aEvt );
1353 }
1354
1355 if ( m_pImpl->m_pPropertyChangeListeners )
1356 {
1357 EventObject aEvt;
1358 aEvt.Source = static_cast< XPropertySet * >( this );
1359 m_pImpl->m_pPropertyChangeListeners->disposeAndClear( aEvt );
1360 }
1361 }
1362
1363 //=========================================================================
1364 // virtual
1365 void SAL_CALL PersistentPropertySet::addEventListener(
1366 const Reference< XEventListener >& Listener )
1367 throw( RuntimeException )
1368 {
1369 if ( !m_pImpl->m_pDisposeEventListeners )
1370 m_pImpl->m_pDisposeEventListeners =
1371 new OInterfaceContainerHelper( m_pImpl->m_aMutex );
1372
1373 m_pImpl->m_pDisposeEventListeners->addInterface( Listener );
1374 }
1375
1376 //=========================================================================
1377 // virtual
1378 void SAL_CALL PersistentPropertySet::removeEventListener(
1379 const Reference< XEventListener >& Listener )
1380 throw( RuntimeException )
1381 {
1382 if ( m_pImpl->m_pDisposeEventListeners )
1383 m_pImpl->m_pDisposeEventListeners->removeInterface( Listener );
1384
1385 // Note: Don't want to delete empty container here -> performance.
1386 }
1387
1388 //=========================================================================
1389 //
1390 // XPropertySet methods.
1391 //
1392 //=========================================================================
1393
1394 // virtual
1395 Reference< XPropertySetInfo > SAL_CALL
1396 PersistentPropertySet::getPropertySetInfo()
1397 throw( RuntimeException )
1398 {
1399 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
1400
1401 PropertySetInfo_Impl*& rpInfo = m_pImpl->m_pInfo;
1402 if ( !rpInfo )
1403 {
1404 rpInfo = new PropertySetInfo_Impl( m_xSMgr, this );
1405 rpInfo->acquire();
1406 }
1407 return Reference< XPropertySetInfo >( rpInfo );
1408 }
1409
1410 //=========================================================================
1411 // virtual
1412 void SAL_CALL PersistentPropertySet::setPropertyValue(
1413 const OUString& aPropertyName, const Any& aValue )
1414 throw( UnknownPropertyException,
1415 PropertyVetoException,
1416 IllegalArgumentException,
1417 WrappedTargetException,
1418 RuntimeException )
1419 {
1420 if ( aPropertyName.isEmpty() )
1421 throw UnknownPropertyException();
1422
1423 osl::ClearableGuard< osl::Mutex > aCGuard( m_pImpl->m_aMutex );
1424
1425 Reference< XHierarchicalNameAccess > xRootHierNameAccess(
1426 m_pImpl->m_pCreator->getRootConfigReadAccess(), UNO_QUERY );
1427 if ( xRootHierNameAccess.is() )
1428 {
1429 OUString aFullPropName( getFullKey() );
1430 aFullPropName += "/";
1431 aFullPropName += makeHierarchalNameSegment( aPropertyName );
1432
1433 // Does property exist?
1434 if ( xRootHierNameAccess->hasByHierarchicalName( aFullPropName ) )
1435 {
1436 Reference< XNameReplace > xNameReplace(
1437 m_pImpl->m_pCreator->getConfigWriteAccess(
1438 aFullPropName ), UNO_QUERY );
1439 Reference< XChangesBatch > xBatch(
1440 m_pImpl->m_pCreator->getConfigWriteAccess(
1441 OUString() ), UNO_QUERY );
1442
1443 if ( xNameReplace.is() && xBatch.is() )
1444 {
1445 try
1446 {
1447 // Obtain old value
1448 OUString aValueName = aFullPropName;
1449 aValueName += "/Value";
1450 Any aOldValue
1451 = xRootHierNameAccess->getByHierarchicalName(
1452 aValueName );
1453 // Check value type.
1454 if ( aOldValue.getValueType() != aValue.getValueType() )
1455 {
1456 aCGuard.clear();
1457 throw IllegalArgumentException();
1458 }
1459
1460 // Write value
1461 xNameReplace->replaceByName(
1462 OUString("Value"),
1463 aValue );
1464
1465 // Write state ( Now it is a directly set value )
1466 xNameReplace->replaceByName(
1467 OUString("State"),
1468 makeAny(
1469 sal_Int32(
1470 PropertyState_DIRECT_VALUE ) ) );
1471
1472 // Commit changes.
1473 xBatch->commitChanges();
1474
1475 PropertyChangeEvent aEvt;
1476 if ( m_pImpl->m_pPropertyChangeListeners )
1477 {
1478 // Obtain handle
1479 aValueName = aFullPropName;
1480 aValueName += "/Handle";
1481 sal_Int32 nHandle = -1;
1482 xRootHierNameAccess->getByHierarchicalName( aValueName )
1483 >>= nHandle;
1484
1485 aEvt.Source = (OWeakObject*)this;
1486 aEvt.PropertyName = aPropertyName;
1487 aEvt.PropertyHandle = nHandle;
1488 aEvt.Further = sal_False;
1489 aEvt.OldValue = aOldValue;
1490 aEvt.NewValue = aValue;
1491
1492 // Callback follows!
1493 aCGuard.clear();
1494
1495 notifyPropertyChangeEvent( aEvt );
1496 }
1497 return;
1498 }
1499 catch (const IllegalArgumentException&)
1500 {
1501 // replaceByName
1502 }
1503 catch (const NoSuchElementException&)
1504 {
1505 // getByHierarchicalName, replaceByName
1506 }
1507 catch (const WrappedTargetException&)
1508 {
1509 // replaceByName, commitChanges
1510 }
1511 }
1512 }
1513 }
1514
1515 throw UnknownPropertyException();
1516 }
1517
1518 //=========================================================================
1519 // virtual
1520 Any SAL_CALL PersistentPropertySet::getPropertyValue(
1521 const OUString& PropertyName )
1522 throw( UnknownPropertyException,
1523 WrappedTargetException,
1524 RuntimeException )
1525 {
1526 if ( PropertyName.isEmpty() )
1527 throw UnknownPropertyException();
1528
1529 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
1530
1531 Reference< XHierarchicalNameAccess > xNameAccess(
1532 m_pImpl->m_pCreator->getRootConfigReadAccess(), UNO_QUERY );
1533 if ( xNameAccess.is() )
1534 {
1535 OUString aFullPropName( getFullKey() );
1536 aFullPropName += "/";
1537 aFullPropName += makeHierarchalNameSegment( PropertyName );
1538 aFullPropName += "/Value";
1539 try
1540 {
1541 return xNameAccess->getByHierarchicalName( aFullPropName );
1542 }
1543 catch (const NoSuchElementException&)
1544 {
1545 throw UnknownPropertyException();
1546 }
1547 }
1548
1549 throw UnknownPropertyException();
1550 }
1551
1552 //=========================================================================
1553 // virtual
1554 void SAL_CALL PersistentPropertySet::addPropertyChangeListener(
1555 const OUString& aPropertyName,
1556 const Reference< XPropertyChangeListener >& xListener )
1557 throw( UnknownPropertyException,
1558 WrappedTargetException,
1559 RuntimeException )
1560 {
1561 // load();
1562
1563 if ( !m_pImpl->m_pPropertyChangeListeners )
1564 m_pImpl->m_pPropertyChangeListeners =
1565 new PropertyListeners_Impl( m_pImpl->m_aMutex );
1566
1567 m_pImpl->m_pPropertyChangeListeners->addInterface(
1568 aPropertyName, xListener );
1569 }
1570
1571 //=========================================================================
1572 // virtual
1573 void SAL_CALL PersistentPropertySet::removePropertyChangeListener(
1574 const OUString& aPropertyName,
1575 const Reference< XPropertyChangeListener >& aListener )
1576 throw( UnknownPropertyException,
1577 WrappedTargetException,
1578 RuntimeException )
1579 {
1580 // load();
1581
1582 if ( m_pImpl->m_pPropertyChangeListeners )
1583 m_pImpl->m_pPropertyChangeListeners->removeInterface(
1584 aPropertyName, aListener );
1585
1586 // Note: Don't want to delete empty container here -> performance.
1587 }
1588
1589 //=========================================================================
1590 // virtual
1591 void SAL_CALL PersistentPropertySet::addVetoableChangeListener(
1592 const OUString&,
1593 const Reference< XVetoableChangeListener >& )
1594 throw( UnknownPropertyException,
1595 WrappedTargetException,
1596 RuntimeException )
1597 {
1598 // load();
1599 // OSL_FAIL( // "PersistentPropertySet::addVetoableChangeListener - N.Y.I." );
1600 }
1601
1602 //=========================================================================
1603 // virtual
1604 void SAL_CALL PersistentPropertySet::removeVetoableChangeListener(
1605 const OUString&,
1606 const Reference< XVetoableChangeListener >& )
1607 throw( UnknownPropertyException,
1608 WrappedTargetException,
1609 RuntimeException )
1610 {
1611 // load();
1612 // OSL_FAIL( // "PersistentPropertySet::removeVetoableChangeListener - N.Y.I." );
1613 }
1614
1615 //=========================================================================
1616 //
1617 // XPersistentPropertySet methods.
1618 //
1619 //=========================================================================
1620
1621 // virtual
1622 Reference< XPropertySetRegistry > SAL_CALL PersistentPropertySet::getRegistry()
1623 throw( RuntimeException )
1624 {
1625 return Reference< XPropertySetRegistry >( m_pImpl->m_pCreator );
1626 }
1627
1628 //=========================================================================
1629 // virtual
1630 OUString SAL_CALL PersistentPropertySet::getKey()
1631 throw( RuntimeException )
1632 {
1633 return m_pImpl->m_aKey;
1634 }
1635
1636 //=========================================================================
1637 //
1638 // XNamed methods.
1639 //
1640 //=========================================================================
1641
1642 // virtual
1643 OUString SAL_CALL PersistentPropertySet::getName()
1644 throw( RuntimeException )
1645 {
1646 // same as getKey()
1647 return m_pImpl->m_aKey;
1648 }
1649
1650 //=========================================================================
1651 // virtual
1652 void SAL_CALL PersistentPropertySet::setName( const OUString& aName )
1653 throw( RuntimeException )
1654 {
1655 if ( aName != m_pImpl->m_aKey )
1656 m_pImpl->m_pCreator->renamePropertySet( m_pImpl->m_aKey, aName );
1657 }
1658
1659 //=========================================================================
1660 //
1661 // XPropertyContainer methods.
1662 //
1663 //=========================================================================
1664
1665 // virtual
1666 void SAL_CALL PersistentPropertySet::addProperty(
1667 const OUString& Name, sal_Int16 Attributes, const Any& DefaultValue )
1668 throw( PropertyExistException,
1669 IllegalTypeException,
1670 IllegalArgumentException,
1671 RuntimeException )
1672 {
1673 if ( Name.isEmpty() )
1674 throw IllegalArgumentException();
1675
1676 // @@@ What other types can't be written to config server?
1677
1678 // Check type class ( Not all types can be written to storage )
1679 TypeClass eTypeClass = DefaultValue.getValueTypeClass();
1680 if ( eTypeClass == TypeClass_INTERFACE )
1681 throw IllegalTypeException();
1682
1683 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
1684
1685 // Property already in set?
1686
1687 OUString aFullValuesName;
1688
1689 Reference< XHierarchicalNameAccess > xRootHierNameAccess(
1690 m_pImpl->m_pCreator->getRootConfigReadAccess(), UNO_QUERY );
1691 if ( xRootHierNameAccess.is() )
1692 {
1693 aFullValuesName = getFullKey();
1694 OUString aFullPropName = aFullValuesName;
1695 aFullPropName += "/";
1696 aFullPropName += makeHierarchalNameSegment( Name );
1697
1698 if ( xRootHierNameAccess->hasByHierarchicalName( aFullPropName ) )
1699 {
1700 // Already in set.
1701 throw PropertyExistException();
1702 }
1703 }
1704
1705 // Property is always removable.
1706 Attributes |= PropertyAttribute::REMOVABLE;
1707
1708 // Add property.
1709
1710 Reference< XSingleServiceFactory > xFac(
1711 m_pImpl->m_pCreator->getConfigWriteAccess( aFullValuesName ),
1712 UNO_QUERY );
1713 Reference< XNameContainer > xContainer( xFac, UNO_QUERY );
1714 Reference< XChangesBatch > xBatch(
1715 m_pImpl->m_pCreator->getConfigWriteAccess( OUString() ),
1716 UNO_QUERY );
1717
1718 OSL_ENSURE( xFac.is(),
1719 "PersistentPropertySet::addProperty - No factory!" );
1720
1721 OSL_ENSURE( xBatch.is(),
1722 "PersistentPropertySet::addProperty - No batch!" );
1723
1724 OSL_ENSURE( xContainer.is(),
1725 "PersistentPropertySet::addProperty - No container!" );
1726
1727 if ( xFac.is() && xBatch.is() && xContainer.is() )
1728 {
1729 try
1730 {
1731 // Create new "PropertyValue" config item.
1732 Reference< XNameReplace > xNameReplace(
1733 xFac->createInstance(), UNO_QUERY );
1734
1735 if ( xNameReplace.is() )
1736 {
1737 // Fill new item...
1738
1739 // Set handle
1740 xNameReplace->replaceByName(
1741 OUString("Handle"),
1742 makeAny( sal_Int32( -1 ) ) );
1743
1744 // Set default value
1745 xNameReplace->replaceByName(
1746 OUString("Value"),
1747 DefaultValue );
1748
1749 // Set state ( always "default" )
1750 xNameReplace->replaceByName(
1751 OUString("State"),
1752 makeAny(
1753 sal_Int32(
1754 PropertyState_DEFAULT_VALUE ) ) );
1755
1756 // Set attributes
1757 xNameReplace->replaceByName(
1758 OUString("Attributes"),
1759 makeAny( sal_Int32( Attributes ) ) );
1760
1761 // Insert new item.
1762 xContainer->insertByName( Name, makeAny( xNameReplace ) );
1763
1764 // Commit changes.
1765 xBatch->commitChanges();
1766
1767 // Property set info is invalid.
1768 if ( m_pImpl->m_pInfo )
1769 m_pImpl->m_pInfo->reset();
1770
1771 // Notify propertyset info change listeners.
1772 if ( m_pImpl->m_pPropSetChangeListeners &&
1773 m_pImpl->m_pPropSetChangeListeners->getLength() )
1774 {
1775 PropertySetInfoChangeEvent evt(
1776 static_cast< OWeakObject * >( this ),
1777 Name,
1778 -1,
1779 PropertySetInfoChange::PROPERTY_INSERTED );
1780 notifyPropertySetInfoChange( evt );
1781 }
1782
1783 // Success.
1784 return;
1785 }
1786 }
1787 catch (const IllegalArgumentException&)
1788 {
1789 // insertByName
1790
1791 OSL_FAIL( "PersistentPropertySet::addProperty - "
1792 "caught IllegalArgumentException!" );
1793 return;
1794 }
1795 catch (const ElementExistException&)
1796 {
1797 // insertByName
1798
1799 OSL_FAIL( "PersistentPropertySet::addProperty - "
1800 "caught ElementExistException!" );
1801 return;
1802 }
1803 catch (const WrappedTargetException&)
1804 {
1805 // replaceByName, insertByName, commitChanges
1806
1807 OSL_FAIL( "PersistentPropertySet::addProperty - "
1808 "caught WrappedTargetException!" );
1809 return;
1810 }
1811 catch (const RuntimeException&)
1812 {
1813 throw;
1814 }
1815 catch (const Exception&)
1816 {
1817 // createInstance
1818
1819 OSL_FAIL( "PersistentPropertySet::addProperty - "
1820 "caught Exception!" );
1821 return;
1822 }
1823 }
1824
1825 OSL_FAIL( "PersistentPropertySet::addProperty - Error!" );
1826 }
1827
1828 //=========================================================================
1829 // virtual
1830 void SAL_CALL PersistentPropertySet::removeProperty( const OUString& Name )
1831 throw( UnknownPropertyException,
1832 NotRemoveableException,
1833 RuntimeException )
1834 {
1835 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
1836
1837 OUString aFullValuesName;
1838 OUString aFullPropName;
1839
1840 Reference< XHierarchicalNameAccess > xRootHierNameAccess(
1841 m_pImpl->m_pCreator->getRootConfigReadAccess(), UNO_QUERY );
1842 if ( xRootHierNameAccess.is() )
1843 {
1844 aFullValuesName = getFullKey();
1845 aFullPropName = aFullValuesName;
1846 aFullPropName += "/";
1847 aFullPropName += makeHierarchalNameSegment( Name );
1848
1849 // Property in set?
1850 if ( !xRootHierNameAccess->hasByHierarchicalName( aFullPropName ) )
1851 throw UnknownPropertyException();
1852
1853 // Property removable?
1854 try
1855 {
1856 OUString aFullAttrName = aFullPropName;
1857 aFullAttrName += "/Attributes";
1858
1859 sal_Int32 nAttribs = 0;
1860 if ( xRootHierNameAccess->getByHierarchicalName( aFullAttrName )
1861 >>= nAttribs )
1862 {
1863 if ( !( nAttribs & PropertyAttribute::REMOVABLE ) )
1864 {
1865 // Not removable!
1866 throw NotRemoveableException();
1867 }
1868 }
1869 else
1870 {
1871 OSL_FAIL( "PersistentPropertySet::removeProperty - "
1872 "No attributes!" );
1873 return;
1874 }
1875 }
1876 catch (const NoSuchElementException&)
1877 {
1878 // getByHierarchicalName
1879
1880 OSL_FAIL( "PersistentPropertySet::removeProperty - "
1881 "caught NoSuchElementException!" );
1882 }
1883
1884 // Remove property...
1885
1886 Reference< XNameContainer > xContainer(
1887 m_pImpl->m_pCreator->getConfigWriteAccess( aFullValuesName ),
1888 UNO_QUERY );
1889 Reference< XChangesBatch > xBatch(
1890 m_pImpl->m_pCreator->getConfigWriteAccess( OUString() ),
1891 UNO_QUERY );
1892
1893 OSL_ENSURE( xBatch.is(),
1894 "PersistentPropertySet::removeProperty - No batch!" );
1895
1896 OSL_ENSURE( xContainer.is(),
1897 "PersistentPropertySet::removeProperty - No container!" );
1898
1899 if ( xBatch.is() && xContainer.is() )
1900 {
1901 try
1902 {
1903 sal_Int32 nHandle = -1;
1904
1905 if ( m_pImpl->m_pPropSetChangeListeners &&
1906 m_pImpl->m_pPropSetChangeListeners->getLength() )
1907 {
1908 // Obtain property handle ( needed for propertysetinfo
1909 // change event )...
1910
1911 try
1912 {
1913 OUString aFullHandleName = aFullPropName;
1914 aFullHandleName
1915 += "/Handle";
1916
1917 if ( ! ( xRootHierNameAccess->getByHierarchicalName(
1918 aFullHandleName ) >>= nHandle ) )
1919 nHandle = -1;
1920
1921 }
1922 catch (const NoSuchElementException&)
1923 {
1924 // getByHierarchicalName
1925
1926 OSL_FAIL( "PersistentPropertySet::removeProperty - "
1927 "caught NoSuchElementException!" );
1928 nHandle = -1;
1929 }
1930 }
1931
1932 xContainer->removeByName( Name );
1933 xBatch->commitChanges();
1934
1935 // Property set info is invalid.
1936 if ( m_pImpl->m_pInfo )
1937 m_pImpl->m_pInfo->reset();
1938
1939 // Notify propertyset info change listeners.
1940 if ( m_pImpl->m_pPropSetChangeListeners &&
1941 m_pImpl->m_pPropSetChangeListeners->getLength() )
1942 {
1943 PropertySetInfoChangeEvent evt(
1944 static_cast< OWeakObject * >( this ),
1945 Name,
1946 nHandle,
1947 PropertySetInfoChange::PROPERTY_REMOVED );
1948 notifyPropertySetInfoChange( evt );
1949 }
1950
1951 // Success.
1952 return;
1953 }
1954 catch (const NoSuchElementException&)
1955 {
1956 // removeByName
1957
1958 OSL_FAIL( "PersistentPropertySet::removeProperty - "
1959 "caught NoSuchElementException!" );
1960 return;
1961 }
1962 catch (const WrappedTargetException&)
1963 {
1964 // commitChanges
1965
1966 OSL_FAIL( "PersistentPropertySet::removeProperty - "
1967 "caught WrappedTargetException!" );
1968 return;
1969 }
1970 }
1971 }
1972
1973 OSL_FAIL( "PersistentPropertySet::removeProperty - Error!" );
1974 }
1975
1976 //=========================================================================
1977 //
1978 // XPropertySetInfoChangeNotifier methods.
1979 //
1980 //=========================================================================
1981
1982 // virtual
1983 void SAL_CALL PersistentPropertySet::addPropertySetInfoChangeListener(
1984 const Reference< XPropertySetInfoChangeListener >& Listener )
1985 throw( RuntimeException )
1986 {
1987 if ( !m_pImpl->m_pPropSetChangeListeners )
1988 m_pImpl->m_pPropSetChangeListeners =
1989 new OInterfaceContainerHelper( m_pImpl->m_aMutex );
1990
1991 m_pImpl->m_pPropSetChangeListeners->addInterface( Listener );
1992 }
1993
1994 //=========================================================================
1995 // virtual
1996 void SAL_CALL PersistentPropertySet::removePropertySetInfoChangeListener(
1997 const Reference< XPropertySetInfoChangeListener >& Listener )
1998 throw( RuntimeException )
1999 {
2000 if ( m_pImpl->m_pPropSetChangeListeners )
2001 m_pImpl->m_pPropSetChangeListeners->removeInterface( Listener );
2002 }
2003
2004 //=========================================================================
2005 //
2006 // XPropertyAccess methods.
2007 //
2008 //=========================================================================
2009
2010 // virtual
2011 Sequence< PropertyValue > SAL_CALL PersistentPropertySet::getPropertyValues()
2012 throw( RuntimeException )
2013 {
2014 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
2015
2016 Reference< XHierarchicalNameAccess > xRootHierNameAccess(
2017 m_pImpl->m_pCreator->getRootConfigReadAccess(), UNO_QUERY );
2018 if ( xRootHierNameAccess.is() )
2019 {
2020 try
2021 {
2022 Reference< XNameAccess > xNameAccess;
2023 xRootHierNameAccess->getByHierarchicalName(getFullKey())
2024 >>= xNameAccess;
2025 if ( xNameAccess.is() )
2026 {
2027 // Obtain property names.
2028
2029 Sequence< OUString > aElems = xNameAccess->getElementNames();
2030
2031 sal_Int32 nCount = aElems.getLength();
2032 if ( nCount )
2033 {
2034 Reference< XHierarchicalNameAccess > xHierNameAccess(
2035 xNameAccess, UNO_QUERY );
2036
2037 OSL_ENSURE( xHierNameAccess.is(),
2038 "PersistentPropertySet::getPropertyValues - "
2039 "No hierarchical name access!" );
2040
2041 if ( xHierNameAccess.is() )
2042 {
2043 Sequence< PropertyValue > aValues( nCount );
2044
2045 const OUString aHandleName("/Handle");
2046 const OUString aValueName("/Value");
2047 const OUString aStateName("/State");
2048
2049 for ( sal_Int32 n = 0; n < nCount; ++n )
2050 {
2051 PropertyValue& rValue = aValues[ n ];
2052 OUString rName = aElems[ n ];
2053 OUString aXMLName
2054 = makeHierarchalNameSegment( rName );
2055
2056 // Set property name.
2057
2058 rValue.Name = rName;
2059
2060 try
2061 {
2062 // Obtain and set property handle
2063 OUString aHierName = aXMLName;
2064 aHierName += aHandleName;
2065 Any aKeyValue
2066 = xHierNameAccess->getByHierarchicalName(
2067 aHierName );
2068
2069 if ( !( aKeyValue >>= rValue.Handle ) )
2070 OSL_FAIL( "PersistentPropertySet::getPropertyValues - "
2071 "Error getting property handle!" );
2072 }
2073 catch (const NoSuchElementException&)
2074 {
2075 // getByHierarchicalName
2076
2077 OSL_FAIL( "PersistentPropertySet::getPropertyValues - "
2078 "NoSuchElementException!" );
2079 }
2080
2081 try
2082 {
2083 // Obtain and set property value
2084 OUString aHierName = aXMLName;
2085 aHierName += aValueName;
2086 rValue.Value
2087 = xHierNameAccess->getByHierarchicalName(
2088 aHierName );
2089
2090 // Note: The value may be void if addProperty
2091 // was called with a default value
2092 // of type void.
2093 }
2094 catch (const NoSuchElementException&)
2095 {
2096 // getByHierarchicalName
2097
2098 OSL_FAIL( "PersistentPropertySet::getPropertyValues - "
2099 "NoSuchElementException!" );
2100 }
2101
2102 try
2103 {
2104 // Obtain and set property state
2105 OUString aHierName = aXMLName;
2106 aHierName += aStateName;
2107 Any aKeyValue
2108 = xHierNameAccess->getByHierarchicalName(
2109 aHierName );
2110
2111 sal_Int32 nState = 0;
2112 if ( !( aKeyValue >>= nState ) )
2113 OSL_FAIL( "PersistentPropertySet::getPropertyValues - "
2114 "Error getting property state!" );
2115 else
2116 rValue.State = PropertyState( nState );
2117 }
2118 catch (const NoSuchElementException&)
2119 {
2120 // getByHierarchicalName
2121
2122 OSL_FAIL( "PersistentPropertySet::getPropertyValues - "
2123 "NoSuchElementException!" );
2124 }
2125 }
2126
2127 return aValues;
2128 }
2129 }
2130 }
2131 }
2132 catch (const NoSuchElementException&)
2133 {
2134 // getByHierarchicalName
2135 }
2136 }
2137
2138 return Sequence< PropertyValue >( 0 );
2139 }
2140
2141 //=========================================================================
2142 // virtual
2143 void SAL_CALL PersistentPropertySet::setPropertyValues(
2144 const Sequence< PropertyValue >& aProps )
2145 throw( UnknownPropertyException,
2146 PropertyVetoException,
2147 IllegalArgumentException,
2148 WrappedTargetException,
2149 RuntimeException )
2150 {
2151 sal_Int32 nCount = aProps.getLength();
2152 if ( !nCount )
2153 return;
2154
2155 osl::ClearableGuard< osl::Mutex > aCGuard( m_pImpl->m_aMutex );
2156
2157 Reference< XHierarchicalNameAccess > xRootHierNameAccess(
2158 m_pImpl->m_pCreator->getRootConfigReadAccess(), UNO_QUERY );
2159 if ( xRootHierNameAccess.is() )
2160 {
2161 const PropertyValue* pNewValues = aProps.getConstArray();
2162
2163 typedef std::list< PropertyChangeEvent > Events;
2164 Events aEvents;
2165
2166 OUString aFullPropNamePrefix( getFullKey() );
2167 aFullPropNamePrefix += "/";
2168
2169 // Iterate over given property value sequence.
2170 for ( sal_Int32 n = 0; n < nCount; ++n )
2171 {
2172 const PropertyValue& rNewValue = pNewValues[ n ];
2173 const OUString& rName = rNewValue.Name;
2174
2175 OUString aFullPropName = aFullPropNamePrefix;
2176 aFullPropName += makeHierarchalNameSegment( rName );
2177
2178 // Does property exist?
2179 if ( xRootHierNameAccess->hasByHierarchicalName( aFullPropName ) )
2180 {
2181 Reference< XNameReplace > xNameReplace(
2182 m_pImpl->m_pCreator->getConfigWriteAccess(
2183 aFullPropName ), UNO_QUERY );
2184 Reference< XChangesBatch > xBatch(
2185 m_pImpl->m_pCreator->getConfigWriteAccess(
2186 OUString() ), UNO_QUERY );
2187
2188 if ( xNameReplace.is() && xBatch.is() )
2189 {
2190 try
2191 {
2192 // Write handle
2193 xNameReplace->replaceByName(
2194 OUString("Handle"),
2195 makeAny( rNewValue.Handle ) );
2196
2197 // Save old value
2198 OUString aValueName = aFullPropName;
2199 aValueName += "/Value";
2200 Any aOldValue
2201 = xRootHierNameAccess->getByHierarchicalName(
2202 aValueName );
2203 // Write value
2204 xNameReplace->replaceByName(
2205 OUString("Value"),
2206 rNewValue.Value );
2207
2208 // Write state ( Now it is a directly set value )
2209 xNameReplace->replaceByName(
2210 OUString("State"),
2211 makeAny(
2212 sal_Int32(
2213 PropertyState_DIRECT_VALUE ) ) );
2214
2215 // Commit changes.
2216 xBatch->commitChanges();
2217
2218 if ( m_pImpl->m_pPropertyChangeListeners )
2219 {
2220 PropertyChangeEvent aEvt;
2221 aEvt.Source = (OWeakObject*)this;
2222 aEvt.PropertyName = rNewValue.Name;
2223 aEvt.PropertyHandle = rNewValue.Handle;
2224 aEvt.Further = sal_False;
2225 aEvt.OldValue = aOldValue;
2226 aEvt.NewValue = rNewValue.Value;
2227
2228 aEvents.push_back( aEvt );
2229 }
2230 }
2231 catch (const IllegalArgumentException&)
2232 {
2233 // replaceByName
2234 }
2235 catch (const NoSuchElementException&)
2236 {
2237 // getByHierarchicalName, replaceByName
2238 }
2239 catch (const WrappedTargetException&)
2240 {
2241 // replaceByName, commitChanges
2242 }
2243 }
2244 }
2245 }
2246
2247 // Callback follows!
2248 aCGuard.clear();
2249
2250 if ( m_pImpl->m_pPropertyChangeListeners )
2251 {
2252 // Notify property changes.
2253 Events::const_iterator it = aEvents.begin();
2254 Events::const_iterator end = aEvents.end();
2255
2256 while ( it != end )
2257 {
2258 notifyPropertyChangeEvent( (*it) );
2259 ++it;
2260 }
2261 }
2262
2263 return;
2264 }
2265
2266 OSL_FAIL( "PersistentPropertySet::setPropertyValues - Nothing set!" );
2267 }
2268
2269 //=========================================================================
2270 //
2271 // Non-interface methods
2272 //
2273 //=========================================================================
2274
2275 void PersistentPropertySet::notifyPropertyChangeEvent(
2276 const PropertyChangeEvent& rEvent ) const
2277 {
2278 // Get "normal" listeners for the property.
2279 OInterfaceContainerHelper* pContainer =
2280 m_pImpl->m_pPropertyChangeListeners->getContainer(
2281 rEvent.PropertyName );
2282 if ( pContainer && pContainer->getLength() )
2283 {
2284 OInterfaceIteratorHelper aIter( *pContainer );
2285 while ( aIter.hasMoreElements() )
2286 {
2287 // Propagate event.
2288 Reference< XPropertyChangeListener > xListener(
2289 aIter.next(), UNO_QUERY );
2290 if ( xListener.is() )
2291 xListener->propertyChange( rEvent );
2292 }
2293 }
2294
2295 // Get "normal" listeners for all properties.
2296 OInterfaceContainerHelper* pNoNameContainer =
2297 m_pImpl->m_pPropertyChangeListeners->getContainer( OUString() );
2298 if ( pNoNameContainer && pNoNameContainer->getLength() )
2299 {
2300 OInterfaceIteratorHelper aIter( *pNoNameContainer );
2301 while ( aIter.hasMoreElements() )
2302 {
2303 // Propagate event.
2304 Reference< XPropertyChangeListener > xListener(
2305 aIter.next(), UNO_QUERY );
2306 if ( xListener.is() )
2307 xListener->propertyChange( rEvent );
2308 }
2309 }
2310 }
2311
2312 //=========================================================================
2313 void PersistentPropertySet::notifyPropertySetInfoChange(
2314 const PropertySetInfoChangeEvent& evt ) const
2315 {
2316 if ( !m_pImpl->m_pPropSetChangeListeners )
2317 return;
2318
2319 // Notify event listeners.
2320 OInterfaceIteratorHelper aIter( *( m_pImpl->m_pPropSetChangeListeners ) );
2321 while ( aIter.hasMoreElements() )
2322 {
2323 // Propagate event.
2324 Reference< XPropertySetInfoChangeListener >
2325 xListener( aIter.next(), UNO_QUERY );
2326 if ( xListener.is() )
2327 xListener->propertySetInfoChange( evt );
2328 }
2329 }
2330
2331 //=========================================================================
2332 const OUString& PersistentPropertySet::getFullKey()
2333 {
2334 if ( m_pImpl->m_aFullKey.isEmpty() )
2335 {
2336 osl::Guard< osl::Mutex > aGuard( m_pImpl->m_aMutex );
2337 if ( m_pImpl->m_aFullKey.isEmpty() )
2338 {
2339 m_pImpl->m_aFullKey
2340 = makeHierarchalNameSegment( m_pImpl->m_aKey );
2341 m_pImpl->m_aFullKey
2342 += "/Values";
2343 }
2344 }
2345
2346 return m_pImpl->m_aFullKey;
2347 }
2348
2349 //=========================================================================
2350 PropertySetRegistry& PersistentPropertySet::getPropertySetRegistry()
2351 {
2352 return *m_pImpl->m_pCreator;
2353 }
2354
2355 //=========================================================================
2356 //=========================================================================
2357 //
2358 // PropertySetInfo_Impl Implementation.
2359 //
2360 //=========================================================================
2361 //=========================================================================
2362
2363 PropertySetInfo_Impl::PropertySetInfo_Impl(
2364 const Reference< XMultiServiceFactory >& rxSMgr,
2365 PersistentPropertySet* pOwner )
2366 : m_xSMgr( rxSMgr ),
2367 m_pProps( NULL ),
2368 m_pOwner( pOwner )
2369 {
2370 }
2371
2372 //=========================================================================
2373 // virtual
2374 PropertySetInfo_Impl::~PropertySetInfo_Impl()
2375 {
2376 delete m_pProps;
2377
2378 // !!! Do not delete m_pOwner !!!
2379 }
2380
2381 //=========================================================================
2382 //
2383 // XInterface methods.
2384 //
2385 //=========================================================================
2386
2387 XINTERFACE_IMPL_2( PropertySetInfo_Impl,
2388 XTypeProvider,
2389 XPropertySetInfo );
2390
2391 //=========================================================================
2392 //
2393 // XTypeProvider methods.
2394 //
2395 //=========================================================================
2396
2397 XTYPEPROVIDER_IMPL_2( PropertySetInfo_Impl,
2398 XTypeProvider,
2399 XPropertySetInfo );
2400
2401 //=========================================================================
2402 //
2403 // XPropertySetInfo methods.
2404 //
2405 //=========================================================================
2406
2407 // virtual
2408 Sequence< Property > SAL_CALL PropertySetInfo_Impl::getProperties()
2409 throw( RuntimeException )
2410 {
2411 if ( !m_pProps )
2412 {
2413 Reference< XHierarchicalNameAccess > xRootHierNameAccess(
2414 m_pOwner->getPropertySetRegistry().getRootConfigReadAccess(),
2415 UNO_QUERY );
2416 if ( xRootHierNameAccess.is() )
2417 {
2418 try
2419 {
2420 Reference< XNameAccess > xNameAccess;
2421 xRootHierNameAccess->getByHierarchicalName(
2422 m_pOwner->getFullKey() )
2423 >>= xNameAccess;
2424 if ( xNameAccess.is() )
2425 {
2426 // Obtain property names.
2427
2428 Sequence< OUString > aElems
2429 = xNameAccess->getElementNames();
2430
2431 sal_uInt32 nCount = aElems.getLength();
2432 Sequence< Property >* pPropSeq
2433 = new Sequence< Property >( nCount );
2434
2435 if ( nCount )
2436 {
2437 Reference< XHierarchicalNameAccess > xHierNameAccess(
2438 xNameAccess, UNO_QUERY );
2439
2440 OSL_ENSURE( xHierNameAccess.is(),
2441 "PropertySetInfo_Impl::getProperties - "
2442 "No hierarchical name access!" );
2443
2444 if ( xHierNameAccess.is() )
2445 {
2446 const OUString aHandleName("/Handle");
2447 const OUString aValueName("/Value");
2448 const OUString aAttrName("/Attributes");
2449
2450 Property* pProps = pPropSeq->getArray();
2451
2452 for ( sal_uInt32 n = 0; n < nCount; ++n )
2453 {
2454 Property& rProp = pProps[ n ];
2455 OUString rName = aElems[ n ];
2456 OUString aXMLName
2457 = makeHierarchalNameSegment( rName );
2458
2459 // Set property name.
2460
2461 rProp.Name = rName;
2462
2463 try
2464 {
2465 // Obtain and set property handle
2466 OUString aHierName = aXMLName;
2467 aHierName += aHandleName;
2468 Any aKeyValue
2469 = xHierNameAccess->getByHierarchicalName(
2470 aHierName );
2471
2472 if ( !( aKeyValue >>= rProp.Handle ) )
2473 OSL_FAIL( "PropertySetInfo_Impl::getProperties - "
2474 "Error getting property handle!" );
2475 }
2476 catch (const NoSuchElementException&)
2477 {
2478 // getByHierarchicalName
2479
2480 OSL_FAIL( "PropertySetInfo_Impl::getProperties - "
2481 "NoSuchElementException!" );
2482 }
2483
2484 try
2485 {
2486 // Obtain and set property type
2487 OUString aHierName = aXMLName;
2488 aHierName += aValueName;
2489 Any aKeyValue
2490 = xHierNameAccess->getByHierarchicalName(
2491 aHierName );
2492
2493 // Note: The type may be void if addProperty
2494 // was called with a default value
2495 // of type void.
2496
2497 rProp.Type = aKeyValue.getValueType();
2498 }
2499 catch (const NoSuchElementException&)
2500 {
2501 // getByHierarchicalName
2502
2503 OSL_FAIL( "PropertySetInfo_Impl::getProperties - "
2504 "NoSuchElementException!" );
2505 }
2506
2507 try
2508 {
2509 // Obtain and set property attributes
2510 OUString aHierName = aXMLName;
2511 aHierName += aAttrName;
2512 Any aKeyValue
2513 = xHierNameAccess->getByHierarchicalName(
2514 aHierName );
2515
2516 sal_Int32 nAttribs = 0;
2517 if ( aKeyValue >>= nAttribs )
2518 rProp.Attributes
2519 = sal_Int16( nAttribs );
2520 else
2521 OSL_FAIL( "PropertySetInfo_Impl::getProperties - "
2522 "Error getting property attributes!" );
2523 }
2524 catch (const NoSuchElementException&)
2525 {
2526 // getByHierarchicalName
2527
2528 OSL_FAIL( "PropertySetInfo_Impl::getProperties - "
2529 "NoSuchElementException!" );
2530 }
2531 }
2532 }
2533 }
2534
2535 // Success.
2536 m_pProps = pPropSeq;
2537 return *m_pProps;
2538 }
2539 }
2540 catch (const NoSuchElementException&)
2541 {
2542 // getByHierarchicalName
2543 }
2544 }
2545
2546 OSL_FAIL( "PropertySetInfo_Impl::getProperties - Error!" );
2547 m_pProps = new Sequence< Property >( 0 );
2548 }
2549
2550 return *m_pProps;
2551 }
2552
2553 //=========================================================================
2554 // virtual
2555 Property SAL_CALL PropertySetInfo_Impl::getPropertyByName(
2556 const OUString& aName )
2557 throw( UnknownPropertyException, RuntimeException )
2558 {
2559 Reference< XHierarchicalNameAccess > xRootHierNameAccess(
2560 m_pOwner->getPropertySetRegistry().getRootConfigReadAccess(),
2561 UNO_QUERY );
2562 if ( xRootHierNameAccess.is() )
2563 {
2564 OUString aFullPropName( m_pOwner->getFullKey() );
2565 aFullPropName += "/";
2566 aFullPropName += makeHierarchalNameSegment( aName );
2567
2568 // Does property exist?
2569 if ( !xRootHierNameAccess->hasByHierarchicalName( aFullPropName ) )
2570 throw UnknownPropertyException();
2571
2572 try
2573 {
2574 Property aProp;
2575
2576 // Obtain handle.
2577 OUString aKey = aFullPropName;
2578 aKey += "/Handle";
2579
2580 if ( !( xRootHierNameAccess->getByHierarchicalName( aKey )
2581 >>= aProp.Handle ) )
2582 {
2583 OSL_FAIL( "PropertySetInfo_Impl::getPropertyByName - "
2584 "No handle!" );
2585 return Property();
2586 }
2587
2588 // Obtain Value and extract type.
2589 aKey = aFullPropName;
2590 aKey += "/Value";
2591
2592 Any aValue = xRootHierNameAccess->getByHierarchicalName( aKey );
2593 if ( !aValue.hasValue() )
2594 {
2595 OSL_FAIL( "PropertySetInfo_Impl::getPropertyByName - "
2596 "No Value!" );
2597 return Property();
2598 }
2599
2600 aProp.Type = aValue.getValueType();
2601
2602 // Obtain Attributes.
2603 aKey = aFullPropName;
2604 aKey += "/Attributes";
2605
2606 sal_Int32 nAttribs = 0;
2607 if ( xRootHierNameAccess->getByHierarchicalName( aKey )
2608 >>= nAttribs )
2609 aProp.Attributes = sal_Int16( nAttribs );
2610 else
2611 {
2612 OSL_FAIL( "PropertySetInfo_Impl::getPropertyByName - "
2613 "No attributes!" );
2614 return Property();
2615 }
2616
2617 // set name.
2618 aProp.Name = aName;
2619
2620 // Success.
2621 return aProp;
2622 }
2623 catch (const NoSuchElementException&)
2624 {
2625 // getByHierarchicalName
2626
2627 OSL_FAIL( "PropertySetInfo_Impl::getPropertyByName - "
2628 "caught NoSuchElementException!" );
2629 }
2630
2631 }
2632
2633 OSL_FAIL( "PropertySetInfo_Impl::getPropertyByName - Error!" );
2634 return Property();
2635 }
2636
2637 //=========================================================================
2638 // virtual
2639 sal_Bool SAL_CALL PropertySetInfo_Impl::hasPropertyByName(
2640 const OUString& Name )
2641 throw( RuntimeException )
2642 {
2643 Reference< XHierarchicalNameAccess > xRootHierNameAccess(
2644 m_pOwner->getPropertySetRegistry().getRootConfigReadAccess(),
2645 UNO_QUERY );
2646 if ( xRootHierNameAccess.is() )
2647 {
2648 OUString aFullPropName( m_pOwner->getFullKey() );
2649 aFullPropName += "/";
2650 aFullPropName += makeHierarchalNameSegment( Name );
2651
2652 return xRootHierNameAccess->hasByHierarchicalName( aFullPropName );
2653 }
2654
2655 return sal_False;
2656 }
2657
2658 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
FREE OFFICE SUITE