added propertyset helper

7 files changed, 936 insertions, 4 deletions

diff --git a/unotools/inc/unotools/propertysethelper.hxx b/unotools/inc/unotools/propertysethelper.hxx
new file mode 100644
index 000000000000..ac162f17207b
--- /dev/null
+++ b/unotools/inc/unotools/propertysethelper.hxx
@@ -0,0 +1,136 @@
+/*************************************************************************
+ *
+ *  $RCSfile: propertysethelper.hxx,v $
+ *
+ *  $Revision: 1.1 $
+ *
+ *  last change: $Author: cl $ $Date: 2001-03-04 21:47:01 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+#ifndef _UTL_PROPERTYSETHELPER_HXX_
+#define _UTL_PROPERTYSETHELPER_HXX_
+
+#ifndef _COM_SUN_STAR_BEANS_XPROPERTYSET_HPP_
+#include <com/sun/star/beans/XPropertySet.hpp>
+#endif
+#ifndef _COM_SUN_STAR_BEANS_XPROPERTYSTATE_HPP_
+#include <com/sun/star/beans/XPropertyState.hpp>
+#endif
+#ifndef _COM_SUN_STAR_BEANS_XMULTIPROPERTYSET_HPP_
+#include <com/sun/star/beans/XMultiPropertySet.hpp>
+#endif
+
+//=========================================================================
+//= property helper classes
+//=========================================================================
+
+//... namespace utl .......................................................
+namespace utl
+{
+//.........................................................................
+
+class PropertySetInfo;
+struct PropertyMapEntry;
+class PropertySetHelperImpl;
+
+class PropertySetHelper : public ::com::sun::star::beans::XPropertySet,
+                          public ::com::sun::star::beans::XPropertyState,
+                          public ::com::sun::star::beans::XMultiPropertySet
+{
+private:
+    PropertySetHelperImpl* mp;
+
+protected:
+    virtual void _setPropertyValues( const utl::PropertyMapEntry** ppEntries, const ::com::sun::star::uno::Any* pValues ) throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::beans::PropertyVetoException, ::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::lang::WrappedTargetException ) = 0;
+    virtual void _getPropertyValues( const utl::PropertyMapEntry** ppEntries, ::com::sun::star::uno::Any* pValue ) throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::lang::WrappedTargetException ) = 0;
+
+    virtual void _getPropertyStates( const utl::PropertyMapEntry** ppEntries, ::com::sun::star::beans::PropertyState* pStates ) throw(::com::sun::star::beans::UnknownPropertyException );
+    virtual void _setPropertyToDefault( const utl::PropertyMapEntry* pEntry )  throw(::com::sun::star::beans::UnknownPropertyException );
+    virtual ::com::sun::star::uno::Any _getPropertyDefault( const utl::PropertyMapEntry* pEntry ) throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::lang::WrappedTargetException );
+
+public:
+    PropertySetHelper( utl::PropertySetInfo* pInfo ) throw();
+    virtual ~PropertySetHelper() throw();
+
+    // XPropertySet
+    virtual ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySetInfo > SAL_CALL getPropertySetInfo(  ) throw(::com::sun::star::uno::RuntimeException);
+    virtual void SAL_CALL setPropertyValue( const ::rtl::OUString& aPropertyName, const ::com::sun::star::uno::Any& aValue ) throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::beans::PropertyVetoException, ::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException);
+    virtual ::com::sun::star::uno::Any SAL_CALL getPropertyValue( const ::rtl::OUString& PropertyName ) throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException);
+    virtual void SAL_CALL addPropertyChangeListener( const ::rtl::OUString& aPropertyName, const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertyChangeListener >& xListener ) throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException);
+    virtual void SAL_CALL removePropertyChangeListener( const ::rtl::OUString& aPropertyName, const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertyChangeListener >& aListener ) throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException);
+    virtual void SAL_CALL addVetoableChangeListener( const ::rtl::OUString& PropertyName, const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XVetoableChangeListener >& aListener ) throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException);
+    virtual void SAL_CALL removeVetoableChangeListener( const ::rtl::OUString& PropertyName, const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XVetoableChangeListener >& aListener ) throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException);
+
+    // XMultiPropertySet
+//  virtual ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySetInfo > SAL_CALL getPropertySetInfo(  ) throw(::com::sun::star::uno::RuntimeException);
+    virtual void SAL_CALL setPropertyValues( const ::com::sun::star::uno::Sequence< ::rtl::OUString >& aPropertyNames, const ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Any >& aValues ) throw(::com::sun::star::beans::PropertyVetoException, ::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException);
+    virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Any > SAL_CALL getPropertyValues( const ::com::sun::star::uno::Sequence< ::rtl::OUString >& aPropertyNames ) throw(::com::sun::star::uno::RuntimeException);
+    virtual void SAL_CALL addPropertiesChangeListener( const ::com::sun::star::uno::Sequence< ::rtl::OUString >& aPropertyNames, const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertiesChangeListener >& xListener ) throw(::com::sun::star::uno::RuntimeException);
+    virtual void SAL_CALL removePropertiesChangeListener( const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertiesChangeListener >& xListener ) throw(::com::sun::star::uno::RuntimeException);
+    virtual void SAL_CALL firePropertiesChangeEvent( const ::com::sun::star::uno::Sequence< ::rtl::OUString >& aPropertyNames, const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertiesChangeListener >& xListener ) throw(::com::sun::star::uno::RuntimeException);
+
+    // XPropertyState
+    virtual ::com::sun::star::beans::PropertyState SAL_CALL getPropertyState( const ::rtl::OUString& PropertyName ) throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::uno::RuntimeException);
+    virtual ::com::sun::star::uno::Sequence< ::com::sun::star::beans::PropertyState > SAL_CALL getPropertyStates( const ::com::sun::star::uno::Sequence< ::rtl::OUString >& aPropertyName ) throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::uno::RuntimeException);
+    virtual void SAL_CALL setPropertyToDefault( const ::rtl::OUString& PropertyName ) throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::uno::RuntimeException);
+    virtual ::com::sun::star::uno::Any SAL_CALL getPropertyDefault( const ::rtl::OUString& aPropertyName ) throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException);
+};
+
+//.........................................................................
+}
+//... namespace utl .......................................................
+
+#endif // _UTL_PROPERTYSETHELPER_HXX_
+
diff --git a/unotools/inc/unotools/propertysetinfo.hxx b/unotools/inc/unotools/propertysetinfo.hxx
new file mode 100644
index 000000000000..9e684359ed61
--- /dev/null
+++ b/unotools/inc/unotools/propertysetinfo.hxx
@@ -0,0 +1,130 @@
+/*************************************************************************
+ *
+ *  $RCSfile: propertysetinfo.hxx,v $
+ *
+ *  $Revision: 1.1 $
+ *
+ *  last change: $Author: cl $ $Date: 2001-03-04 21:47:01 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+#ifndef _UTL_PROPERTSETINFO_HXX_
+#define _UTL_PROPERTSETINFO_HXX_
+
+#include <com/sun/star/uno/Type.h>
+#include <com/sun/star/beans/XPropertySetInfo.hpp>
+#include <cppuhelper/implbase1.hxx>
+
+#ifndef _COMPHELPER_STLTYPES_HXX_
+#include <comphelper/stl_types.hxx>
+#endif
+
+//=========================================================================
+//= property helper classes
+//=========================================================================
+
+//... namespace utl .......................................................
+namespace utl
+{
+//.........................................................................
+
+struct PropertyMapEntry
+{
+    const sal_Char* mpName;
+    sal_uInt16 mnNameLen;
+    sal_uInt16 mnWhich;
+    const com::sun::star::uno::Type* mpType;
+    sal_Int16 mnFlags;
+    sal_uInt8 mnMemberId;
+};
+
+DECLARE_STL_USTRINGACCESS_MAP( PropertyMapEntry*, PropertyMap );
+
+class PropertyMapImpl;
+
+/** this class implements a XPropertySetInfo that is initialized with arrays of PropertyMapEntry.
+    It is used by the class PropertySetHelper.
+*/
+class PropertySetInfo : public ::cppu::WeakImplHelper1< ::com::sun::star::beans::XPropertySetInfo >
+{
+private:
+    PropertyMapImpl* mpMap;
+public:
+    PropertySetInfo() throw();
+    virtual ~PropertySetInfo() throw();
+
+    /** returns a stl map with all PropertyMapEntry pointer.<p>
+        The key is the property name.
+    */
+    const PropertyMap* getPropertyMap() const throw();
+
+    /** adds an array of PropertyMapEntry to this instance.<p>
+        The end is marked with a PropertyMapEntry where mpName equals NULL
+    */
+    void add( PropertyMapEntry* pMap ) throw();
+
+    /** removes an already added PropertyMapEntry which string in mpName equals to aName */
+    void remove( const rtl::OUString& aName ) throw();
+
+    virtual ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property > SAL_CALL getProperties() throw(::com::sun::star::uno::RuntimeException);
+    virtual ::com::sun::star::beans::Property SAL_CALL getPropertyByName( const ::rtl::OUString& aName ) throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::uno::RuntimeException);
+    virtual sal_Bool SAL_CALL hasPropertyByName( const ::rtl::OUString& Name ) throw(::com::sun::star::uno::RuntimeException);
+};
+
+//.........................................................................
+}
+//... namespace utl .......................................................
+
+#endif // _UTL_PROPERTSETINFO_HXX_
+
diff --git a/unotools/prj/build.lst b/unotools/prj/build.lst
index 50f73253430b..4cd226528e19 100644
--- a/unotools/prj/build.lst
+++ b/unotools/prj/build.lst
@@ -6,4 +6,5 @@ ut	unotools\source\config					nmake	-	all	ut_config NULL
 ut	unotools\source\ucbhelper				nmake	-	all	ut_ucbhelper NULL
 ut	unotools\source\processfactory			nmake	-	all	ut_procfact NULL
 ut	unotools\source\i18n					nmake	-	all	ut_i18n NULL
-ut	unotools\util							nmake	-	all	ut_util ut_config ut_i18n ut_misc ut_procfact ut_streaming ut_ucbhelper NULL
+ut	unotools\source\property				nmake	-	all	ut_property NULL
+ut	unotools\util							nmake	-	all	ut_util ut_config ut_i18n ut_misc ut_procfact ut_streaming ut_ucbhelper ut_property NULL
diff --git a/unotools/source/property/makefile.mk b/unotools/source/property/makefile.mk
new file mode 100644
index 000000000000..40ed653d9f02
--- /dev/null
+++ b/unotools/source/property/makefile.mk
@@ -0,0 +1,96 @@
+#*************************************************************************
+#
+#   $RCSfile: makefile.mk,v $
+#
+#   $Revision: 1.5 $
+#
+#   last change: $Author: cl $ $Date: 2001-03-04 21:47:46 $
+#
+#   The Contents of this file are made available subject to the terms of
+#   either of the following licenses
+#
+#          - GNU Lesser General Public License Version 2.1
+#          - Sun Industry Standards Source License Version 1.1
+#
+#   Sun Microsystems Inc., October, 2000
+#
+#   GNU Lesser General Public License Version 2.1
+#   =============================================
+#   Copyright 2000 by Sun Microsystems, Inc.
+#   901 San Antonio Road, Palo Alto, CA 94303, USA
+#
+#   This library is free software; you can redistribute it and/or
+#   modify it under the terms of the GNU Lesser General Public
+#   License version 2.1, as published by the Free Software Foundation.
+#
+#   This library is distributed in the hope that it will be useful,
+#   but WITHOUT ANY WARRANTY; without even the implied warranty of
+#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+#   Lesser General Public License for more details.
+#
+#   You should have received a copy of the GNU Lesser General Public
+#   License along with this library; if not, write to the Free Software
+#   Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+#   MA  02111-1307  USA
+#
+#
+#   Sun Industry Standards Source License Version 1.1
+#   =================================================
+#   The contents of this file are subject to the Sun Industry Standards
+#   Source License Version 1.1 (the "License"); You may not use this file
+#   except in compliance with the License. You may obtain a copy of the
+#   License at http://www.openoffice.org/license.html.
+#
+#   Software provided under this License is provided on an "AS IS" basis,
+#   WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+#   WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+#   MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+#   See the License for the specific provisions governing your rights and
+#   obligations concerning the Software.
+#
+#   The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+#
+#   Copyright: 2000 by Sun Microsystems, Inc.
+#
+#   All Rights Reserved.
+#
+#   Contributor(s): _______________________________________
+#
+#
+#
+#*************************************************************************
+
+PRJ=..$/..
+PRJINC=..$/..$/inc
+PRJNAME=unotools
+TARGET=property
+
+ENABLE_EXCEPTIONS=TRUE
+
+# --- Settings common for the whole project -----
+
+#UNOTYPES=
+#.INCLUDE : $(PRJINC)$/unotools$/unotools.mk
+
+# --- Settings ----------------------------------
+
+.INCLUDE : settings.mk
+
+# --- Types -------------------------------------
+
+UNOUCRDEP=$(SOLARBINDIR)$/applicat.rdb
+UNOUCRRDB=$(SOLARBINDIR)$/applicat.rdb
+
+UNOUCROUT=$(OUT)$/inc
+
+# --- Types -------------------------------------
+
+# --- Files -------------------------------------
+
+SLOFILES=	$(SLO)$/propertysetinfo.obj \
+            $(SLO)$/propertysethelper.obj
+
+# --- Targets ----------------------------------
+
+.INCLUDE : target.mk
+
diff --git a/unotools/source/property/propertysethelper.cxx b/unotools/source/property/propertysethelper.cxx
new file mode 100644
index 000000000000..b8fb3d320ef7
--- /dev/null
+++ b/unotools/source/property/propertysethelper.cxx
@@ -0,0 +1,335 @@
+/*************************************************************************
+ *
+ *  $RCSfile: propertysethelper.cxx,v $
+ *
+ *  $Revision: 1.1 $
+ *
+ *  last change: $Author: cl $ $Date: 2001-03-04 21:47:46 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+#ifndef _TOOLS_DEBUG_HXX
+#include <tools/debug.hxx>
+#endif
+
+#include "unotools/propertysetinfo.hxx"
+#include "unotools/propertysethelper.hxx"
+
+///////////////////////////////////////////////////////////////////////
+
+using namespace ::utl;
+using namespace ::rtl;
+using namespace ::com::sun::star;
+using namespace ::com::sun::star::uno;
+using namespace ::com::sun::star::beans;
+using namespace ::com::sun::star::lang;
+
+namespace utl
+{
+class PropertySetHelperImpl
+{
+public:
+    PropertyMapEntry* find( const OUString& aName ) const throw();
+
+    PropertySetInfo* mpInfo;
+};
+}
+
+PropertyMapEntry* PropertySetHelperImpl::find( const OUString& aName ) const throw()
+{
+    PropertyMap::const_iterator aIter = mpInfo->getPropertyMap()->find( aName );
+
+    if( mpInfo->getPropertyMap()->end() != aIter )
+    {
+        return (*aIter).second;
+    }
+    else
+    {
+        return NULL;
+    }
+}
+
+///////////////////////////////////////////////////////////////////////
+
+PropertySetHelper::PropertySetHelper( utl::PropertySetInfo* pInfo ) throw()
+{
+    mp = new PropertySetHelperImpl;
+    mp->mpInfo = pInfo;
+    pInfo->acquire();
+}
+
+PropertySetHelper::~PropertySetHelper() throw()
+{
+    mp->mpInfo->release();
+    delete mp;
+}
+
+// XPropertySet
+Reference< XPropertySetInfo > SAL_CALL PropertySetHelper::getPropertySetInfo(  ) throw(RuntimeException)
+{
+    return mp->mpInfo;
+}
+
+void SAL_CALL PropertySetHelper::setPropertyValue( const ::rtl::OUString& aPropertyName, const Any& aValue ) throw(UnknownPropertyException, PropertyVetoException, IllegalArgumentException, WrappedTargetException, RuntimeException)
+{
+    PropertyMapEntry* aEntries[2];
+    aEntries[0] = mp->find( aPropertyName );
+
+    if( NULL == aEntries[0] )
+        throw UnknownPropertyException();
+
+    aEntries[1] = NULL;
+
+    _setPropertyValues( (const PropertyMapEntry**)aEntries, &aValue );
+}
+
+Any SAL_CALL PropertySetHelper::getPropertyValue( const ::rtl::OUString& PropertyName ) throw(UnknownPropertyException, WrappedTargetException, RuntimeException)
+{
+    PropertyMapEntry* aEntries[2];
+    aEntries[0] = mp->find( PropertyName );
+
+    if( NULL == aEntries[0] )
+        throw UnknownPropertyException();
+
+    aEntries[1] = NULL;
+
+    Any aAny;
+    _getPropertyValues( (const PropertyMapEntry**)aEntries, &aAny );
+
+    return aAny;
+}
+
+void SAL_CALL PropertySetHelper::addPropertyChangeListener( const ::rtl::OUString& aPropertyName, const Reference< XPropertyChangeListener >& xListener ) throw(UnknownPropertyException, WrappedTargetException, RuntimeException)
+{
+    // todo
+}
+
+void SAL_CALL PropertySetHelper::removePropertyChangeListener( const ::rtl::OUString& aPropertyName, const Reference< XPropertyChangeListener >& aListener ) throw(UnknownPropertyException, WrappedTargetException, RuntimeException)
+{
+    // todo
+}
+
+void SAL_CALL PropertySetHelper::addVetoableChangeListener( const ::rtl::OUString& PropertyName, const Reference< XVetoableChangeListener >& aListener ) throw(UnknownPropertyException, WrappedTargetException, RuntimeException)
+{
+    // todo
+}
+
+void SAL_CALL PropertySetHelper::removeVetoableChangeListener( const ::rtl::OUString& PropertyName, const Reference< XVetoableChangeListener >& aListener ) throw(UnknownPropertyException, WrappedTargetException, RuntimeException)
+{
+    // todo
+}
+
+// XMultiPropertySet
+void SAL_CALL PropertySetHelper::setPropertyValues( const Sequence< ::rtl::OUString >& aPropertyNames, const Sequence< Any >& aValues ) throw(PropertyVetoException, IllegalArgumentException, WrappedTargetException, RuntimeException)
+{
+    const sal_Int32 nCount = aPropertyNames.getLength();
+
+    if( nCount != aValues.getLength() )
+        throw IllegalArgumentException();
+
+    if( nCount )
+    {
+        PropertyMapEntry** pEntries = new PropertyMapEntry*[nCount+1];
+        const OUString* pNames = aPropertyNames.getConstArray();
+
+        sal_Bool bUnknown = sal_False;
+        sal_Int32 n;
+        for( n = 0; !bUnknown && ( n < nCount ); n++, pNames++ )
+        {
+            pEntries[n] = mp->find( *pNames );
+            bUnknown = NULL == pEntries[n];
+        }
+
+        if( !bUnknown )
+            _setPropertyValues( (const PropertyMapEntry**)pEntries, aValues.getConstArray() );
+
+        delete pEntries;
+
+        if( bUnknown )
+            throw UnknownPropertyException();
+    }
+}
+
+Sequence< Any > SAL_CALL PropertySetHelper::getPropertyValues( const Sequence< ::rtl::OUString >& aPropertyNames ) throw(RuntimeException)
+{
+    const sal_Int32 nCount = aPropertyNames.getLength();
+
+    Sequence< Any > aValues;
+    if( nCount )
+    {
+        PropertyMapEntry** pEntries = new PropertyMapEntry*[nCount+1];
+        const OUString* pNames = aPropertyNames.getConstArray();
+
+        sal_Bool bUnknown = sal_False;
+        sal_Int32 n;
+        for( n = 0; !bUnknown && ( n < nCount ); n++, pNames++ )
+        {
+            pEntries[n] = mp->find( *pNames );
+            bUnknown = NULL == pEntries[n];
+        }
+
+        if( !bUnknown )
+            _getPropertyValues( (const PropertyMapEntry**)pEntries, aValues.getArray() );
+
+        delete pEntries;
+
+        if( bUnknown )
+            throw UnknownPropertyException();
+    }
+
+    return aValues;
+}
+
+void SAL_CALL PropertySetHelper::addPropertiesChangeListener( const Sequence< ::rtl::OUString >& aPropertyNames, const Reference< XPropertiesChangeListener >& xListener ) throw(RuntimeException)
+{
+    // todo
+}
+
+void SAL_CALL PropertySetHelper::removePropertiesChangeListener( const Reference< XPropertiesChangeListener >& xListener ) throw(RuntimeException)
+{
+    // todo
+}
+
+void SAL_CALL PropertySetHelper::firePropertiesChangeEvent( const Sequence< ::rtl::OUString >& aPropertyNames, const Reference< XPropertiesChangeListener >& xListener ) throw(RuntimeException)
+{
+    // todo
+}
+
+// XPropertyState
+PropertyState SAL_CALL PropertySetHelper::getPropertyState( const ::rtl::OUString& PropertyName ) throw(UnknownPropertyException, RuntimeException)
+{
+    PropertyMapEntry* aEntries[2];
+
+    aEntries[0] = mp->find( PropertyName );
+    if( aEntries[0] == NULL )
+        throw UnknownPropertyException();
+
+    aEntries[1] = NULL;
+
+    PropertyState aState;
+    _getPropertyStates( (const PropertyMapEntry**)aEntries, &aState );
+
+    return aState;
+}
+
+Sequence< PropertyState > SAL_CALL PropertySetHelper::getPropertyStates( const Sequence< ::rtl::OUString >& aPropertyName ) throw(UnknownPropertyException, RuntimeException)
+{
+    const sal_Int32 nCount = aPropertyName.getLength();
+
+    Sequence< PropertyState > aStates( nCount );
+
+    if( nCount )
+    {
+        const OUString* pNames = aPropertyName.getConstArray();
+
+        sal_Bool bUnknown = sal_False;
+
+        PropertyMapEntry** pEntries = new PropertyMapEntry*[nCount+1];
+
+        sal_Int32 n;
+        for( n = 0; !bUnknown && (n < nCount); n++, pNames++ )
+        {
+            pEntries[n] = mp->find( *pNames );
+            bUnknown = NULL == pEntries[n];
+        }
+
+        pEntries[nCount] = NULL;
+
+        if( !bUnknown )
+            _getPropertyStates( (const PropertyMapEntry**)pEntries, aStates.getArray() );
+
+        delete pEntries;
+
+        if( bUnknown )
+            throw UnknownPropertyException();
+    }
+
+    return aStates;
+}
+
+void SAL_CALL PropertySetHelper::setPropertyToDefault( const ::rtl::OUString& PropertyName ) throw(UnknownPropertyException, RuntimeException)
+{
+    PropertyMapEntry *pEntry  = mp->find( PropertyName );
+    if( NULL == pEntry )
+        throw UnknownPropertyException();
+
+    _setPropertyToDefault( pEntry );
+}
+
+Any SAL_CALL PropertySetHelper::getPropertyDefault( const ::rtl::OUString& aPropertyName ) throw(UnknownPropertyException, WrappedTargetException, RuntimeException)
+{
+    PropertyMapEntry* pEntry = mp->find( aPropertyName );
+    if( NULL == pEntry )
+        throw UnknownPropertyException();
+
+    return _getPropertyDefault( pEntry );
+}
+
+void PropertySetHelper::_getPropertyStates( const utl::PropertyMapEntry** ppEntries, PropertyState* pStates ) throw(UnknownPropertyException )
+{
+    DBG_ERROR( "you have to implement this yourself!" );
+}
+
+void PropertySetHelper::_setPropertyToDefault( const utl::PropertyMapEntry* pEntry )  throw(UnknownPropertyException )
+{
+    DBG_ERROR( "you have to implement this yourself!" );
+}
+
+Any PropertySetHelper::_getPropertyDefault( const utl::PropertyMapEntry* pEntry ) throw(UnknownPropertyException, WrappedTargetException )
+{
+    DBG_ERROR( "you have to implement this yourself!" );
+
+    Any aAny;
+    return aAny;
+}
diff --git a/unotools/source/property/propertysetinfo.cxx b/unotools/source/property/propertysetinfo.cxx
new file mode 100644
index 000000000000..3300907888a4
--- /dev/null
+++ b/unotools/source/property/propertysetinfo.cxx
@@ -0,0 +1,233 @@
+/*************************************************************************
+ *
+ *  $RCSfile: propertysetinfo.cxx,v $
+ *
+ *  $Revision: 1.1 $
+ *
+ *  last change: $Author: cl $ $Date: 2001-03-04 21:47:46 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+#ifndef _TOOLS_DEBUG_HXX
+#include <tools/debug.hxx>
+#endif
+
+#include "unotools/propertysetinfo.hxx"
+
+using namespace ::utl;
+using namespace ::rtl;
+using namespace ::com::sun::star;
+using namespace ::com::sun::star::uno;
+using namespace ::com::sun::star::beans;
+using namespace ::com::sun::star::lang;
+
+namespace utl
+{
+class PropertyMapImpl
+{
+public:
+    PropertyMapImpl() throw();
+    virtual ~PropertyMapImpl() throw();
+
+    void add( PropertyMapEntry* pMap ) throw();
+    void remove( const OUString& aName ) throw();
+
+    Sequence< Property > getProperties() throw();
+
+    const PropertyMap* getPropertyMap() const throw();
+
+    Property getPropertyByName( const OUString& aName ) throw( UnknownPropertyException );
+    sal_Bool hasPropertyByName( const OUString& aName ) throw();
+
+private:
+    PropertyMap maPropertyMap;
+    Sequence< Property > maProperties;
+};
+}
+
+PropertyMapImpl::PropertyMapImpl() throw()
+{
+}
+
+PropertyMapImpl::~PropertyMapImpl() throw()
+{
+}
+
+void PropertyMapImpl::add( PropertyMapEntry* pMap ) throw()
+{
+    while( pMap->mpName )
+    {
+        OUString aName( pMap->mpName, pMap->mnNameLen, RTL_TEXTENCODING_ASCII_US );
+
+#ifndef PRODUCT
+        PropertyMap::iterator aIter = maPropertyMap.find( aName );
+        if( aIter != maPropertyMap.end() )
+        {
+            DBG_ERROR( "Warning: PropertyMapEntry added twice, possible error!" );
+        }
+#endif
+        if( NULL == pMap->mpType )
+        {
+            DBG_ERROR( "No type in PropertyMapEntry!" );
+            pMap->mpType = &::getCppuType((const sal_Int32*)0);
+        }
+
+        maPropertyMap[aName] = pMap;
+
+        if( maProperties.getLength() )
+            maProperties.realloc( 0 );
+
+        pMap = &pMap[1];
+    }
+}
+
+void PropertyMapImpl::remove( const OUString& aName ) throw()
+{
+    maPropertyMap.erase( aName );
+
+    if( maProperties.getLength() )
+        maProperties.realloc( 0 );
+}
+
+Sequence< Property > PropertyMapImpl::getProperties() throw()
+{
+    // maybe we have to generate the properties after
+    // a change in the property map or at first call
+    // to getProperties
+    if( maProperties.getLength() != (sal_Int32)maPropertyMap.size() )
+    {
+        maProperties = Sequence< Property >( maPropertyMap.size() );
+        Property* pProperties = maProperties.getArray();
+
+        PropertyMap::iterator aIter = maPropertyMap.begin();
+        const PropertyMap::iterator aEnd = maPropertyMap.end();
+        while( aIter != aEnd )
+        {
+            PropertyMapEntry* pEntry = (*aIter).second;
+
+            pProperties->Name = OUString( pEntry->mpName, pEntry->mnNameLen, RTL_TEXTENCODING_ASCII_US );
+            pProperties->Handle = pEntry->mnWhich;
+            pProperties->Type = *pEntry->mpType;
+            pProperties->Attributes = pEntry->mnFlags;
+
+            aIter++;
+        }
+    }
+
+    return maProperties;
+}
+
+const PropertyMap* PropertyMapImpl::getPropertyMap() const throw()
+{
+    return &maPropertyMap;
+}
+
+Property PropertyMapImpl::getPropertyByName( const OUString& aName ) throw( UnknownPropertyException )
+{
+    PropertyMap::iterator aIter = maPropertyMap.find( aName );
+
+    if( maPropertyMap.end() == aIter )
+        throw UnknownPropertyException();
+
+    PropertyMapEntry* pEntry = (*aIter).second;
+
+    return Property( aName, pEntry->mnWhich, *pEntry->mpType, pEntry->mnFlags );
+}
+
+sal_Bool PropertyMapImpl::hasPropertyByName( const OUString& aName ) throw()
+{
+    return maPropertyMap.find( aName ) != maPropertyMap.end();
+}
+
+///////////////////////////////////////////////////////////////////////
+
+PropertySetInfo::PropertySetInfo() throw()
+{
+    mpMap = new PropertyMapImpl();
+}
+
+PropertySetInfo::~PropertySetInfo() throw()
+{
+    delete mpMap;
+}
+
+void PropertySetInfo::add( PropertyMapEntry* pMap ) throw()
+{
+    mpMap->add( pMap );
+}
+
+void PropertySetInfo::remove( const rtl::OUString& aName ) throw()
+{
+    mpMap->remove( aName );
+}
+
+Sequence< ::com::sun::star::beans::Property > SAL_CALL PropertySetInfo::getProperties() throw(::com::sun::star::uno::RuntimeException)
+{
+    return mpMap->getProperties();
+}
+
+Property SAL_CALL PropertySetInfo::getPropertyByName( const ::rtl::OUString& aName ) throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::uno::RuntimeException)
+{
+    return mpMap->getPropertyByName( aName );
+}
+
+sal_Bool SAL_CALL PropertySetInfo::hasPropertyByName( const ::rtl::OUString& Name ) throw(::com::sun::star::uno::RuntimeException)
+{
+    return mpMap->hasPropertyByName( Name );
+}
+
+const PropertyMap* PropertySetInfo::getPropertyMap() const throw()
+{
+    return mpMap->getPropertyMap();
+}
diff --git a/unotools/util/makefile.mk b/unotools/util/makefile.mk
index f5eabe7236ab..7cf8c3f2d093 100644
--- a/unotools/util/makefile.mk
+++ b/unotools/util/makefile.mk
@@ -2,9 +2,9 @@
 #
 #   $RCSfile: makefile.mk,v $
 #
-#   $Revision: 1.8 $
+#   $Revision: 1.9 $
 #
-#   last change: $Author: hr $ $Date: 2000-11-07 10:12:30 $
+#   last change: $Author: cl $ $Date: 2001-03-04 21:44:58 $
 #
 #   The Contents of this file are made available subject to the terms of
 #   either of the following licenses
@@ -83,7 +83,8 @@ LIB1FILES=\
         $(SLB)$/streaming.lib \
         $(SLB)$/config.lib \
         $(SLB)$/ucbhelp.lib \
-        $(SLB)$/procfact.lib
+        $(SLB)$/procfact.lib \
+        $(SLB)$/property.lib
 
 SHL1TARGET=$(TARGET)$(UPD)$(DLLPOSTFIX)