?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Update ooo320-m1
[ooovba.git] / ucbhelper / source / provider / propertyvalueset.cxx
blobdcfe812b6a5c1145cf07238774d86a01846c0990
1 /*************************************************************************
2 *
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * Copyright 2008 by Sun Microsystems, Inc.
6 *
7 * OpenOffice.org - a multi-platform office productivity suite
8 *
9 * $RCSfile: propertyvalueset.cxx,v $
10 * $Revision: 1.10 $
11 *
12 * This file is part of OpenOffice.org.
13 *
14 * OpenOffice.org is free software: you can redistribute it and/or modify
15 * it under the terms of the GNU Lesser General Public License version 3
16 * only, as published by the Free Software Foundation.
17 *
18 * OpenOffice.org is distributed in the hope that it will be useful,
19 * but WITHOUT ANY WARRANTY; without even the implied warranty of
20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 * GNU Lesser General Public License version 3 for more details
22 * (a copy is included in the LICENSE file that accompanied this code).
23 *
24 * You should have received a copy of the GNU Lesser General Public License
25 * version 3 along with OpenOffice.org. If not, see
26 * <http://www.openoffice.org/license.html>
27 * for a copy of the LGPLv3 License.
28 *
29 ************************************************************************/
30
31 // MARKER(update_precomp.py): autogen include statement, do not remove
32 #include "precompiled_ucbhelper.hxx"
33
34 /**************************************************************************
35 TODO
36 **************************************************************************
37
38 *************************************************************************/
39
40 #ifndef __VECTOR__
41 #include <vector>
42 #endif
43 #include <com/sun/star/beans/Property.hpp>
44 #include <com/sun/star/beans/XPropertyAccess.hpp>
45 #include <com/sun/star/beans/XPropertySet.hpp>
46 #include <com/sun/star/beans/XPropertySetInfo.hpp>
47 #include <com/sun/star/script/XTypeConverter.hpp>
48
49 #include "osl/diagnose.h"
50 #include "osl/mutex.hxx"
51 #include <ucbhelper/propertyvalueset.hxx>
52
53 using namespace com::sun::star::beans;
54 using namespace com::sun::star::container;
55 using namespace com::sun::star::io;
56 using namespace com::sun::star::lang;
57 using namespace com::sun::star::script;
58 using namespace com::sun::star::sdbc;
59 using namespace com::sun::star::uno;
60 using namespace com::sun::star::util;
61 using namespace rtl;
62
63 namespace ucbhelper_impl
64 {
65
66 //=========================================================================
67 //
68 // PropertyValue.
69 //
70 //=========================================================================
71
72 const sal_uInt32 NO_VALUE_SET = 0x00000000;
73 const sal_uInt32 STRING_VALUE_SET = 0x00000001;
74 const sal_uInt32 BOOLEAN_VALUE_SET = 0x00000002;
75 const sal_uInt32 BYTE_VALUE_SET = 0x00000004;
76 const sal_uInt32 SHORT_VALUE_SET = 0x00000008;
77 const sal_uInt32 INT_VALUE_SET = 0x00000010;
78 const sal_uInt32 LONG_VALUE_SET = 0x00000020;
79 const sal_uInt32 FLOAT_VALUE_SET = 0x00000040;
80 const sal_uInt32 DOUBLE_VALUE_SET = 0x00000080;
81 const sal_uInt32 BYTES_VALUE_SET = 0x00000100;
82 const sal_uInt32 DATE_VALUE_SET = 0x00000200;
83 const sal_uInt32 TIME_VALUE_SET = 0x00000400;
84 const sal_uInt32 TIMESTAMP_VALUE_SET = 0x00000800;
85 const sal_uInt32 BINARYSTREAM_VALUE_SET = 0x00001000;
86 const sal_uInt32 CHARACTERSTREAM_VALUE_SET = 0x00002000;
87 const sal_uInt32 REF_VALUE_SET = 0x00004000;
88 const sal_uInt32 BLOB_VALUE_SET = 0x00008000;
89 const sal_uInt32 CLOB_VALUE_SET = 0x00010000;
90 const sal_uInt32 ARRAY_VALUE_SET = 0x00020000;
91 const sal_uInt32 OBJECT_VALUE_SET = 0x00040000;
92
93 struct PropertyValue
94 {
95 Property aProperty;
96
97 sal_uInt32 nPropsSet;
98 sal_uInt32 nOrigValue;
99
100 OUString aString; // getString
101 sal_Bool bBoolean; // getBoolean
102 sal_Int8 nByte; // getByte
103 sal_Int16 nShort; // getShort
104 sal_Int32 nInt; // getInt
105 sal_Int64 nLong; // getLong
106 float nFloat; // getFloat
107 double nDouble; // getDouble
108
109 Sequence< sal_Int8 > aBytes; // getBytes
110 Date aDate; // getDate
111 Time aTime; // getTime
112 DateTime aTimestamp; // getTimestamp
113 Reference< XInputStream > xBinaryStream; // getBinaryStream
114 Reference< XInputStream > xCharacterStream; // getCharacterStream
115 Reference< XRef > xRef; // getRef
116 Reference< XBlob > xBlob; // getBlob
117 Reference< XClob > xClob; // getClob
118 Reference< XArray > xArray; // getArray
119 Any aObject; // getObject
120
121 inline PropertyValue()
122 : nPropsSet( NO_VALUE_SET ), nOrigValue( NO_VALUE_SET ),
123 bBoolean(false),
124 nByte(0),
125 nShort(0),
126 nInt(0),
127 nLong(0),
128 nFloat(0.0),
129 nDouble(0.0)
130 {}
131 };
132 } // namespace ucbhelper_impl
133
134 using namespace ucbhelper_impl;
135
136 namespace ucbhelper
137 {
138
139 //=========================================================================
140 //
141 // class PropertyValues.
142 //
143 //=========================================================================
144
145 typedef std::vector< ucbhelper_impl::PropertyValue > PropertyValuesVector;
146
147 class PropertyValues : public PropertyValuesVector {};
148
149 } // namespace ucbhelper
150
151 //=========================================================================
152 //
153 // Welcome to the macro hell...
154 //
155 //=========================================================================
156
157 #define GETVALUE_IMPL_TYPE( _type_, _type_name_, _member_name_, _cppu_type_ ) \
158 \
159 osl::MutexGuard aGuard( m_aMutex ); \
160 \
161 _type_ aValue = _type_(); /* default ctor */ \
162 \
163 m_bWasNull = sal_True; \
164 \
165 if ( ( columnIndex < 1 ) \
166 || ( columnIndex > sal_Int32( m_pValues->size() ) ) ) \
167 { \
168 OSL_ENSURE( sal_False, "PropertyValueSet - index out of range!" ); \
169 } \
170 else \
171 { \
172 ucbhelper_impl::PropertyValue& rValue \
173 = (*m_pValues)[ columnIndex - 1 ]; \
174 \
175 if ( rValue.nOrigValue != NO_VALUE_SET ) \
176 { \
177 if ( rValue.nPropsSet & _type_name_ ) \
178 { \
179 /* Values is present natively... */ \
180 aValue = rValue._member_name_; \
181 m_bWasNull = sal_False; \
182 } \
183 else \
184 { \
185 if ( !(rValue.nPropsSet & OBJECT_VALUE_SET) ) \
186 { \
187 /* Value is not (yet) available as Any. Create it. */ \
188 getObject( columnIndex, Reference< XNameAccess >() ); \
189 } \
190 \
191 if ( rValue.nPropsSet & OBJECT_VALUE_SET ) \
192 { \
193 /* Value is available as Any. */ \
194 \
195 if ( rValue.aObject.hasValue() ) \
196 { \
197 /* Try to convert into native value. */ \
198 if ( rValue.aObject >>= aValue ) \
199 { \
200 rValue._member_name_ = aValue; \
201 rValue.nPropsSet |= _type_name_; \
202 m_bWasNull = sal_False; \
203 } \
204 else \
205 { \
206 /* Last chance. Try type converter service... */ \
207 \
208 Reference< XTypeConverter > xConverter \
209 = getTypeConverter(); \
210 if ( xConverter.is() ) \
211 { \
212 try \
213 { \
214 Any aConvAny = xConverter->convertTo( \
215 rValue.aObject, \
216 _cppu_type_ ); \
217 \
218 if ( aConvAny >>= aValue ) \
219 { \
220 rValue._member_name_ = aValue; \
221 rValue.nPropsSet |= _type_name_; \
222 m_bWasNull = sal_False; \
223 } \
224 } \
225 catch ( IllegalArgumentException ) \
226 { \
227 } \
228 catch ( CannotConvertException ) \
229 { \
230 } \
231 } \
232 } \
233 } \
234 } \
235 } \
236 } \
237 } \
238 return aValue;
239
240 #define GETVALUE_IMPL( _type_, _type_name_, _member_name_ ) \
241 GETVALUE_IMPL_TYPE( _type_, \
242 _type_name_, \
243 _member_name_, \
244 getCppuType( static_cast< const _type_ * >( 0 ) ) )
245
246 #define SETVALUE_IMPL( _property_, _type_name_, _member_name_, _value_ ) \
247 \
248 osl::MutexGuard aGuard( m_aMutex ); \
249 \
250 ucbhelper_impl::PropertyValue aNewValue; \
251 aNewValue.aProperty = _property_; \
252 aNewValue.nPropsSet = _type_name_; \
253 aNewValue.nOrigValue = _type_name_; \
254 aNewValue._member_name_ = _value_; \
255 \
256 m_pValues->push_back( aNewValue );
257
258 namespace ucbhelper {
259
260 //=========================================================================
261 //=========================================================================
262 //
263 // PropertyValueSet Implementation.
264 //
265 //=========================================================================
266 //=========================================================================
267
268 #define PROPERTYVALUESET_INIT() \
269 m_xSMgr( rxSMgr ), \
270 m_pValues( new PropertyValues ), \
271 m_bWasNull( sal_False ), \
272 m_bTriedToGetTypeConverter( sal_False )
273
274 //=========================================================================
275 PropertyValueSet::PropertyValueSet(
276 const Reference< XMultiServiceFactory >& rxSMgr )
277 : PROPERTYVALUESET_INIT()
278 {
279 }
280
281 //=========================================================================
282 PropertyValueSet::PropertyValueSet(
283 const Reference< XMultiServiceFactory >& rxSMgr,
284 const Sequence< com::sun::star::beans::PropertyValue >& rValues )
285 : PROPERTYVALUESET_INIT()
286 {
287 sal_Int32 nCount = rValues.getLength();
288 if ( nCount )
289 {
290 const com::sun::star::beans::PropertyValue* pValues
291 = rValues.getConstArray();
292
293 for ( sal_Int32 n = 0; n < nCount; ++n )
294 {
295 const com::sun::star::beans::PropertyValue& rValue = pValues[ n ];
296 appendObject( Property( rValue.Name,
297 rValue.Handle,
298 rValue.Value.getValueType(),
299 0 ),
300 rValue.Value );
301 }
302 }
303 }
304
305 //=========================================================================
306 // virtual
307 PropertyValueSet::~PropertyValueSet()
308 {
309 delete m_pValues;
310 }
311
312 //=========================================================================
313 //
314 // XInterface methods.
315 //
316 //=========================================================================
317
318 XINTERFACE_IMPL_3( PropertyValueSet,
319 XTypeProvider,
320 XRow,
321 XColumnLocate );
322
323 //=========================================================================
324 //
325 // XTypeProvider methods.
326 //
327 //=========================================================================
328
329 XTYPEPROVIDER_IMPL_3( PropertyValueSet,
330 XTypeProvider,
331 XRow,
332 XColumnLocate );
333
334 //=========================================================================
335 //
336 // XRow methods.
337 //
338 //=========================================================================
339
340 // virtual
341 sal_Bool SAL_CALL PropertyValueSet::wasNull()
342 throw( SQLException, RuntimeException )
343 {
344 // This method can not be implemented correctly!!! Imagine different
345 // threads doing a getXYZ - wasNull calling sequence on the same
346 // implementation object...
347 return m_bWasNull;
348 }
349
350 //=========================================================================
351 // virtual
352 OUString SAL_CALL PropertyValueSet::getString( sal_Int32 columnIndex )
353 throw( SQLException, RuntimeException )
354 {
355 GETVALUE_IMPL( OUString, STRING_VALUE_SET, aString );
356 }
357
358 //=========================================================================
359 // virtual
360 sal_Bool SAL_CALL PropertyValueSet::getBoolean( sal_Int32 columnIndex )
361 throw( SQLException, RuntimeException )
362 {
363 GETVALUE_IMPL_TYPE(
364 sal_Bool, BOOLEAN_VALUE_SET, bBoolean, getCppuBooleanType() );
365 }
366
367 //=========================================================================
368 // virtual
369 sal_Int8 SAL_CALL PropertyValueSet::getByte( sal_Int32 columnIndex )
370 throw( SQLException, RuntimeException )
371 {
372 GETVALUE_IMPL( sal_Int8, BYTE_VALUE_SET, nByte );
373 }
374
375 //=========================================================================
376 // virtual
377 sal_Int16 SAL_CALL PropertyValueSet::getShort( sal_Int32 columnIndex )
378 throw( SQLException, RuntimeException )
379 {
380 GETVALUE_IMPL( sal_Int16, SHORT_VALUE_SET, nShort );
381 }
382
383 //=========================================================================
384 // virtual
385 sal_Int32 SAL_CALL PropertyValueSet::getInt( sal_Int32 columnIndex )
386 throw( SQLException, RuntimeException )
387 {
388 GETVALUE_IMPL( sal_Int32, INT_VALUE_SET, nInt );
389 }
390
391 //=========================================================================
392 // virtual
393 sal_Int64 SAL_CALL PropertyValueSet::getLong( sal_Int32 columnIndex )
394 throw( SQLException, RuntimeException )
395 {
396 GETVALUE_IMPL( sal_Int64, LONG_VALUE_SET, nLong );
397 }
398
399 //=========================================================================
400 // virtual
401 float SAL_CALL PropertyValueSet::getFloat( sal_Int32 columnIndex )
402 throw( SQLException, RuntimeException )
403 {
404 GETVALUE_IMPL( float, FLOAT_VALUE_SET, nFloat );
405 }
406
407 //=========================================================================
408 // virtual
409 double SAL_CALL PropertyValueSet::getDouble( sal_Int32 columnIndex )
410 throw( SQLException, RuntimeException )
411 {
412 GETVALUE_IMPL( double, DOUBLE_VALUE_SET, nDouble );
413 }
414
415 //=========================================================================
416 // virtual
417 Sequence< sal_Int8 > SAL_CALL
418 PropertyValueSet::getBytes( sal_Int32 columnIndex )
419 throw( SQLException, RuntimeException )
420 {
421 GETVALUE_IMPL( Sequence< sal_Int8 >, BYTES_VALUE_SET, aBytes );
422 }
423
424 //=========================================================================
425 // virtual
426 Date SAL_CALL PropertyValueSet::getDate( sal_Int32 columnIndex )
427 throw( SQLException, RuntimeException )
428 {
429 GETVALUE_IMPL( Date, DATE_VALUE_SET, aDate );
430 }
431
432 //=========================================================================
433 // virtual
434 Time SAL_CALL PropertyValueSet::getTime( sal_Int32 columnIndex )
435 throw( SQLException, RuntimeException )
436 {
437 GETVALUE_IMPL( Time, TIME_VALUE_SET, aTime );
438 }
439
440 //=========================================================================
441 // virtual
442 DateTime SAL_CALL PropertyValueSet::getTimestamp( sal_Int32 columnIndex )
443 throw( SQLException, RuntimeException )
444 {
445 GETVALUE_IMPL( DateTime, TIMESTAMP_VALUE_SET, aTimestamp );
446 }
447
448 //=========================================================================
449 // virtual
450 Reference< XInputStream > SAL_CALL
451 PropertyValueSet::getBinaryStream( sal_Int32 columnIndex )
452 throw( SQLException, RuntimeException )
453 {
454 GETVALUE_IMPL(
455 Reference< XInputStream >, BINARYSTREAM_VALUE_SET, xBinaryStream );
456 }
457
458 //=========================================================================
459 // virtual
460 Reference< XInputStream > SAL_CALL
461 PropertyValueSet::getCharacterStream( sal_Int32 columnIndex )
462 throw( SQLException, RuntimeException )
463 {
464 GETVALUE_IMPL(
465 Reference< XInputStream >, CHARACTERSTREAM_VALUE_SET, xCharacterStream );
466 }
467
468 //=========================================================================
469 // virtual
470 Any SAL_CALL PropertyValueSet::getObject(
471 sal_Int32 columnIndex,
472 const Reference< XNameAccess >& )
473 throw( SQLException, RuntimeException )
474 {
475 osl::MutexGuard aGuard( m_aMutex );
476
477 Any aValue;
478
479 m_bWasNull = sal_True;
480
481 if ( ( columnIndex < 1 )
482 || ( columnIndex > sal_Int32( m_pValues->size() ) ) )
483 {
484 OSL_ENSURE( sal_False, "PropertyValueSet - index out of range!" );
485 }
486 else
487 {
488 ucbhelper_impl::PropertyValue& rValue
489 = (*m_pValues)[ columnIndex - 1 ];
490
491 if ( rValue.nPropsSet & OBJECT_VALUE_SET )
492 {
493 // Values is present natively...
494 aValue = rValue.aObject;
495 m_bWasNull = sal_False;
496 }
497 else
498 {
499 // Make Any from original value.
500
501 switch ( rValue.nOrigValue )
502 {
503 case NO_VALUE_SET:
504 break;
505
506 case STRING_VALUE_SET:
507 aValue <<= rValue.aString;
508 break;
509
510 case BOOLEAN_VALUE_SET:
511 aValue <<= rValue.bBoolean;
512 break;
513
514 case BYTE_VALUE_SET:
515 aValue <<= rValue.nByte;
516 break;
517
518 case SHORT_VALUE_SET:
519 aValue <<= rValue.nShort;
520 break;
521
522 case INT_VALUE_SET:
523 aValue <<= rValue.nInt;
524 break;
525
526 case LONG_VALUE_SET:
527 aValue <<= rValue.nLong;
528 break;
529
530 case FLOAT_VALUE_SET:
531 aValue <<= rValue.nFloat;
532 break;
533
534 case DOUBLE_VALUE_SET:
535 aValue <<= rValue.nDouble;
536 break;
537
538 case BYTES_VALUE_SET:
539 aValue <<= rValue.aBytes;
540 break;
541
542 case DATE_VALUE_SET:
543 aValue <<= rValue.aDate;
544 break;
545
546 case TIME_VALUE_SET:
547 aValue <<= rValue.aTime;
548 break;
549
550 case TIMESTAMP_VALUE_SET:
551 aValue <<= rValue.aTimestamp;
552 break;
553
554 case BINARYSTREAM_VALUE_SET:
555 aValue <<= rValue.xBinaryStream;
556 break;
557
558 case CHARACTERSTREAM_VALUE_SET:
559 aValue <<= rValue.xCharacterStream;
560 break;
561
562 case REF_VALUE_SET:
563 aValue <<= rValue.xRef;
564 break;
565
566 case BLOB_VALUE_SET:
567 aValue <<= rValue.xBlob;
568 break;
569
570 case CLOB_VALUE_SET:
571 aValue <<= rValue.xClob;
572 break;
573
574 case ARRAY_VALUE_SET:
575 aValue <<= rValue.xArray;
576 break;
577
578 case OBJECT_VALUE_SET:
579 // Fall-through is intended!
580 default:
581 OSL_ENSURE( sal_False,
582 "PropertyValueSet::getObject - "
583 "Wrong original type" );
584 break;
585 }
586
587 if ( aValue.hasValue() )
588 {
589 rValue.aObject = aValue;
590 rValue.nPropsSet |= OBJECT_VALUE_SET;
591 m_bWasNull = sal_False;
592 }
593 }
594 }
595
596 return aValue;
597 }
598
599 //=========================================================================
600 // virtual
601 Reference< XRef > SAL_CALL PropertyValueSet::getRef( sal_Int32 columnIndex )
602 throw( SQLException, RuntimeException )
603 {
604 GETVALUE_IMPL( Reference< XRef >, REF_VALUE_SET, xRef );
605 }
606
607 //=========================================================================
608 // virtual
609 Reference< XBlob > SAL_CALL PropertyValueSet::getBlob( sal_Int32 columnIndex )
610 throw( SQLException, RuntimeException )
611 {
612 GETVALUE_IMPL( Reference< XBlob >, BLOB_VALUE_SET, xBlob );
613 }
614
615 //=========================================================================
616 // virtual
617 Reference< XClob > SAL_CALL PropertyValueSet::getClob( sal_Int32 columnIndex )
618 throw( SQLException, RuntimeException )
619 {
620 GETVALUE_IMPL( Reference< XClob >, CLOB_VALUE_SET, xClob );
621 }
622
623 //=========================================================================
624 // virtual
625 Reference< XArray > SAL_CALL PropertyValueSet::getArray( sal_Int32 columnIndex )
626 throw( SQLException, RuntimeException )
627 {
628 GETVALUE_IMPL( Reference< XArray >, ARRAY_VALUE_SET, xArray );
629 }
630
631 //=========================================================================
632 //
633 // XColumnLocate methods.
634 //
635 //=========================================================================
636
637 // virtual
638 sal_Int32 SAL_CALL PropertyValueSet::findColumn( const OUString& columnName )
639 throw( SQLException, RuntimeException )
640 {
641 osl::MutexGuard aGuard( m_aMutex );
642
643 if ( columnName.getLength() )
644 {
645 sal_Int32 nCount = m_pValues->size();
646 for ( sal_Int32 n = 0; n < nCount; ++n )
647 {
648 if ( (*m_pValues)[ n ].aProperty.Name.equals( columnName ) )
649 return sal_Int32( n + 1 ); // Index is 1-based.
650 }
651 }
652 return 0;
653 }
654
655 //=========================================================================
656 //
657 // Non-interface methods.
658 //
659 //=========================================================================
660
661 const Reference< XTypeConverter >& PropertyValueSet::getTypeConverter()
662 {
663 osl::MutexGuard aGuard( m_aMutex );
664
665 if ( !m_bTriedToGetTypeConverter && !m_xTypeConverter.is() )
666 {
667 m_bTriedToGetTypeConverter = sal_True;
668 m_xTypeConverter = Reference< XTypeConverter >(
669 m_xSMgr->createInstance(
670 OUString::createFromAscii(
671 "com.sun.star.script.Converter" ) ),
672 UNO_QUERY );
673
674 OSL_ENSURE( m_xTypeConverter.is(),
675 "PropertyValueSet::getTypeConverter() - "
676 "Service 'com.sun.star.script.Converter' n/a!" );
677 }
678 return m_xTypeConverter;
679 }
680
681 //=========================================================================
682 sal_Int32 PropertyValueSet::getLength() const
683 {
684 return m_pValues->size();
685 }
686
687 //=========================================================================
688 void PropertyValueSet::appendString( const Property& rProp,
689 const OUString& rValue )
690 {
691 SETVALUE_IMPL( rProp, STRING_VALUE_SET, aString, rValue );
692 }
693
694 //=========================================================================
695 void PropertyValueSet::appendBoolean( const Property& rProp,
696 sal_Bool bValue )
697 {
698 SETVALUE_IMPL( rProp, BOOLEAN_VALUE_SET, bBoolean, bValue );
699 }
700
701 //=========================================================================
702 void PropertyValueSet::appendByte( const Property& rProp,
703 sal_Int8 nValue )
704 {
705 SETVALUE_IMPL( rProp, BYTE_VALUE_SET, nByte, nValue );
706 }
707
708 //=========================================================================
709 void PropertyValueSet::appendShort( const Property& rProp,
710 sal_Int16 nValue )
711 {
712 SETVALUE_IMPL( rProp, SHORT_VALUE_SET, nShort, nValue );
713 }
714
715 //=========================================================================
716 void PropertyValueSet::appendInt( const Property& rProp,
717 sal_Int32 nValue )
718 {
719 SETVALUE_IMPL( rProp, INT_VALUE_SET, nInt, nValue );
720 }
721
722 //=========================================================================
723 void PropertyValueSet::appendLong( const Property& rProp,
724 sal_Int64 nValue )
725 {
726 SETVALUE_IMPL( rProp, LONG_VALUE_SET, nLong, nValue );
727 }
728
729 //=========================================================================
730 void PropertyValueSet::appendFloat( const Property& rProp,
731 float nValue )
732 {
733 SETVALUE_IMPL( rProp, FLOAT_VALUE_SET, nFloat, nValue );
734 }
735
736 //=========================================================================
737 void PropertyValueSet::appendDouble( const Property& rProp,
738 double nValue )
739 {
740 SETVALUE_IMPL( rProp, DOUBLE_VALUE_SET, nDouble, nValue );
741 }
742
743 //=========================================================================
744 void PropertyValueSet::appendBytes( const Property& rProp,
745 const Sequence< sal_Int8 >& rValue )
746 {
747 SETVALUE_IMPL( rProp, BYTES_VALUE_SET, aBytes, rValue );
748 }
749
750 //=========================================================================
751 void PropertyValueSet::appendDate( const Property& rProp,
752 const Date& rValue )
753 {
754 SETVALUE_IMPL( rProp, DATE_VALUE_SET, aDate, rValue );
755 }
756
757 //=========================================================================
758 void PropertyValueSet::appendTime( const Property& rProp,
759 const Time& rValue )
760 {
761 SETVALUE_IMPL( rProp, TIME_VALUE_SET, aTime, rValue );
762 }
763
764 //=========================================================================
765 void PropertyValueSet::appendTimestamp( const Property& rProp,
766 const DateTime& rValue )
767 {
768 SETVALUE_IMPL( rProp, TIMESTAMP_VALUE_SET, aTimestamp, rValue );
769 }
770
771 //=========================================================================
772 void PropertyValueSet::appendBinaryStream(
773 const Property& rProp,
774 const Reference< XInputStream >& rValue )
775 {
776 SETVALUE_IMPL( rProp, BINARYSTREAM_VALUE_SET, xBinaryStream, rValue );
777 }
778
779 //=========================================================================
780 void PropertyValueSet::appendCharacterStream(
781 const Property& rProp,
782 const Reference< XInputStream >& rValue )
783 {
784 SETVALUE_IMPL( rProp, CHARACTERSTREAM_VALUE_SET, xCharacterStream, rValue );
785 }
786
787 //=========================================================================
788 void PropertyValueSet::appendObject( const Property& rProp,
789 const Any& rValue )
790 {
791 SETVALUE_IMPL( rProp, OBJECT_VALUE_SET, aObject, rValue );
792 }
793
794 //=========================================================================
795 void PropertyValueSet::appendRef( const Property& rProp,
796 const Reference< XRef >& rValue )
797 {
798 SETVALUE_IMPL( rProp, REF_VALUE_SET, xRef, rValue );
799 }
800
801 //=========================================================================
802 void PropertyValueSet::appendBlob( const Property& rProp,
803 const Reference< XBlob >& rValue )
804 {
805 SETVALUE_IMPL( rProp, BLOB_VALUE_SET, xBlob, rValue );
806 }
807
808 //=========================================================================
809 void PropertyValueSet::appendClob( const Property& rProp,
810 const Reference< XClob >& rValue )
811 {
812 SETVALUE_IMPL( rProp, CLOB_VALUE_SET, xClob, rValue );
813 }
814
815 //=========================================================================
816 void PropertyValueSet::appendArray( const Property& rProp,
817 const Reference< XArray >& rValue )
818 {
819 SETVALUE_IMPL( rProp, ARRAY_VALUE_SET, xArray, rValue );
820 }
821
822 //=========================================================================
823 void PropertyValueSet::appendVoid( const Property& rProp )
824 {
825 SETVALUE_IMPL( rProp, NO_VALUE_SET, aObject, Any() );
826 }
827
828 //=========================================================================
829 void PropertyValueSet::appendPropertySet(
830 const Reference< XPropertySet >& rxSet )
831 {
832 if ( rxSet.is() )
833 {
834 Reference< XPropertySetInfo > xInfo = rxSet->getPropertySetInfo();
835 if ( xInfo.is() )
836 {
837 Sequence< Property > aProps = xInfo->getProperties();
838 const Property* pProps = aProps.getConstArray();
839 sal_Int32 nPropsCount = aProps.getLength();
840
841 Reference< XPropertyAccess > xPropertyAccess( rxSet, UNO_QUERY );
842 if ( xPropertyAccess.is() )
843 {
844 // Efficient: Get all prop values with one ( remote) call.
845
846 Sequence< ::com::sun::star::beans::PropertyValue > aPropValues
847 = xPropertyAccess->getPropertyValues();
848
849 const ::com::sun::star::beans::PropertyValue* pPropValues
850 = aPropValues.getConstArray();
851
852 sal_Int32 nValuesCount = aPropValues.getLength();
853 for ( sal_Int32 n = 0; n < nValuesCount; ++n )
854 {
855 const ::com::sun::star::beans::PropertyValue& rPropValue
856 = pPropValues[ n ];
857
858 // Find info for current property value.
859 for ( sal_Int32 m = 0; m < nPropsCount; ++m )
860 {
861 const Property& rProp = pProps[ m ];
862 if ( rProp.Name == rPropValue.Name )
863 {
864 // Found!
865 appendObject( rProp, rPropValue.Value );
866 break;
867 }
868 }
869 }
870 }
871 else
872 {
873 // Get every single prop value with one ( remote) call.
874
875 for ( sal_Int32 n = 0; n < nPropsCount; ++n )
876 {
877 const Property& rProp = pProps[ n ];
878
879 try
880 {
881 Any aValue = rxSet->getPropertyValue( rProp.Name );
882
883 if ( aValue.hasValue() )
884 appendObject( rProp, aValue );
885 }
886 catch ( UnknownPropertyException )
887 {
888 }
889 catch ( WrappedTargetException )
890 {
891 }
892 }
893 }
894 }
895 }
896 }
897
898 //=========================================================================
899 sal_Bool PropertyValueSet::appendPropertySetValue(
900 const Reference< XPropertySet >& rxSet,
901 const Property& rProperty )
902 {
903 if ( rxSet.is() )
904 {
905 try
906 {
907 Any aValue = rxSet->getPropertyValue( rProperty.Name );
908 if ( aValue.hasValue() )
909 {
910 appendObject( rProperty, aValue );
911 return sal_True;
912 }
913 }
914 catch ( UnknownPropertyException )
915 {
916 }
917 catch ( WrappedTargetException )
918 {
919 }
920 }
921
922 // Error.
923 return sal_False;
924 }
925
926 } // namespace ucbhelper
vba interoperability for OOo