Files
libreoffice/forms/source/component/File.cxx
2000-10-19 10:52:20 +00:00

330 lines
12 KiB
C++

/*************************************************************************
*
* $RCSfile: File.cxx,v $
*
* $Revision: 1.2 $
*
* last change: $Author: fs $ $Date: 2000-10-19 11:52:16 $
*
* 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 _FORMS_FILE_HXX_
#include "File.hxx"
#endif
#include <com/sun/star/form/FormComponentType.hpp>
#ifndef _FRM_PROPERTY_HRC_
#include "property.hrc"
#endif
#ifndef _FRM_SERVICES_HXX_
#include "services.hxx"
#endif
#ifndef _TOOLS_DEBUG_HXX
#include <tools/debug.hxx>
#endif
#ifndef _COMPHELPER_CONTAINER_HXX_
#include <comphelper/container.hxx>
#endif
//.........................................................................
namespace frm
{
//.........................................................................
//------------------------------------------------------------------
InterfaceRef SAL_CALL OFileControlModel_CreateInstance(const staruno::Reference<starlang::XMultiServiceFactory>& _rxFactory)
{
return *(new OFileControlModel(_rxFactory));
}
//------------------------------------------------------------------------------
staruno::Sequence<staruno::Type> OFileControlModel::_getTypes()
{
static staruno::Sequence<staruno::Type> aTypes;
if (!aTypes.getLength())
{
// my base class
staruno::Sequence<staruno::Type> aBaseClassTypes = OControlModel::_getTypes();
staruno::Sequence<staruno::Type> aOwnTypes(1);
staruno::Type* pOwnTypes = aOwnTypes.getArray();
pOwnTypes[0] = getCppuType((staruno::Reference<starform::XReset>*)NULL);
aTypes = concatSequences(aBaseClassTypes, aOwnTypes);
}
return aTypes;
}
// starlang::XServiceInfo
//------------------------------------------------------------------------------
StringSequence OFileControlModel::getSupportedServiceNames() throw(staruno::RuntimeException)
{
StringSequence aSupported = OControlModel::getSupportedServiceNames();
aSupported.realloc(aSupported.getLength() + 1);
::rtl::OUString*pArray = aSupported.getArray();
pArray[aSupported.getLength()-1] = FRM_SUN_COMPONENT_FILECONTROL;
return aSupported;
}
//------------------------------------------------------------------
OFileControlModel::OFileControlModel(const staruno::Reference<starlang::XMultiServiceFactory>& _rxFactory)
:OControlModel(_rxFactory, VCL_CONTROLMODEL_FILECONTROL)
,m_aResetListeners(m_aMutex)
{
m_nClassId = starform::FormComponentType::FILECONTROL;
}
//------------------------------------------------------------------
OFileControlModel::~OFileControlModel()
{
if (!OComponentHelper::rBHelper.bDisposed)
{
acquire();
dispose();
}
}
//------------------------------------------------------------------------------
staruno::Any SAL_CALL OFileControlModel::queryAggregation(const staruno::Type& _rType) throw (staruno::RuntimeException)
{
staruno::Any aReturn;
aReturn = OControlModel::queryAggregation(_rType);
if (!aReturn.hasValue())
aReturn = ::cppu::queryInterface(_rType
,static_cast<starform::XReset*>(this)
);
return aReturn;
}
// OComponentHelper
//-----------------------------------------------------------------------------
void OFileControlModel::disposing()
{
OControlModel::disposing();
starlang::EventObject aEvt(static_cast<staruno::XWeak*>(this));
m_aResetListeners.disposeAndClear(aEvt);
}
//------------------------------------------------------------------------------
void OFileControlModel::getFastPropertyValue(staruno::Any& rValue, sal_Int32 nHandle) const
{
switch (nHandle)
{
case PROPERTY_ID_DEFAULT_TEXT : rValue <<= m_sDefaultValue; break;
default:
OControlModel::getFastPropertyValue(rValue, nHandle);
}
}
//------------------------------------------------------------------------------
void OFileControlModel::setFastPropertyValue_NoBroadcast(sal_Int32 nHandle, const staruno::Any& rValue)
{
switch (nHandle)
{
case PROPERTY_ID_DEFAULT_TEXT :
DBG_ASSERT(rValue.getValueType().getTypeClass() == staruno::TypeClass_STRING, "OFileControlModel::setFastPropertyValue_NoBroadcast : invalid type !" );
rValue >>= m_sDefaultValue;
break;
default:
OControlModel::setFastPropertyValue_NoBroadcast(nHandle, rValue);
}
}
//------------------------------------------------------------------------------
sal_Bool OFileControlModel::convertFastPropertyValue(staruno::Any& rConvertedValue, staruno::Any& rOldValue, sal_Int32 nHandle, const staruno::Any& rValue)
throw( starlang::IllegalArgumentException )
{
switch (nHandle)
{
case PROPERTY_ID_DEFAULT_TEXT :
return tryPropertyValue(rConvertedValue, rOldValue, rValue, m_sDefaultValue);
default:
return OControlModel::convertFastPropertyValue(rConvertedValue, rOldValue, nHandle, rValue);
}
}
//------------------------------------------------------------------------------
staruno::Reference<starbeans::XPropertySetInfo> SAL_CALL OFileControlModel::getPropertySetInfo() throw( staruno::RuntimeException )
{
staruno::Reference<starbeans::XPropertySetInfo> xInfo( createPropertySetInfo( getInfoHelper() ) );
return xInfo;
}
//------------------------------------------------------------------------------
void OFileControlModel::fillProperties(
staruno::Sequence< starbeans::Property >& _rProps,
staruno::Sequence< starbeans::Property >& _rAggregateProps ) const
{
FRM_BEGIN_PROP_HELPER(6)
DECL_PROP2(CLASSID, sal_Int16, READONLY, TRANSIENT);
DECL_PROP1(DEFAULT_TEXT, ::rtl::OUString, BOUND);
DECL_PROP1(NAME, ::rtl::OUString, BOUND);
DECL_PROP1(TAG, ::rtl::OUString, BOUND);
DECL_PROP1(TABINDEX, sal_Int16, BOUND);
DECL_PROP1(HELPTEXT, ::rtl::OUString, BOUND);
// in den agregierten Properties muss ich noch PROPERTY_ID_TEXT auf transient setzen ...
// ModifyPropertyAttributes(_rAggregateProps, PROPERTY_TEXT, starbeans::PropertyAttribute::TRANSIENT, 0);
FRM_END_PROP_HELPER();
}
//------------------------------------------------------------------------------
::cppu::IPropertyArrayHelper& OFileControlModel::getInfoHelper()
{
return *const_cast<OFileControlModel*>(this)->getArrayHelper();
}
//------------------------------------------------------------------------------
::rtl::OUString SAL_CALL OFileControlModel::getServiceName()
{
return FRM_COMPONENT_FILECONTROL; // old (non-sun) name for compatibility !
}
//------------------------------------------------------------------------------
void OFileControlModel::write(const staruno::Reference<stario::XObjectOutputStream>& _rxOutStream)
{
OControlModel::write(_rxOutStream);
::osl::MutexGuard aGuard(m_aMutex);
// Version
_rxOutStream->writeShort(0x0002);
// Default-Wert
_rxOutStream << m_sDefaultValue;
_rxOutStream << m_aHelpText;
}
//------------------------------------------------------------------------------
void OFileControlModel::read(const staruno::Reference<stario::XObjectInputStream>& _rxInStream)
{
OControlModel::read(_rxInStream);
::osl::MutexGuard aGuard(m_aMutex);
// Version
sal_uInt16 nVersion = _rxInStream->readShort();
// Default-Wert
switch (nVersion)
{
case 1:
_rxInStream >> m_sDefaultValue; break;
case 2:
_rxInStream >> m_sDefaultValue;
_rxInStream >> m_aHelpText;
break;
default:
DBG_ERROR("OFileControlModel::read : unknown version !");
m_sDefaultValue = ::rtl::OUString();
}
// Nach dem Lesen die Defaultwerte anzeigen
// _reset();
}
//-----------------------------------------------------------------------------
void SAL_CALL OFileControlModel::reset()
{
::cppu::OInterfaceIteratorHelper aIter(m_aResetListeners);
starlang::EventObject aEvt(static_cast<staruno::XWeak*>(this));
sal_Bool bContinue = sal_True;
while (aIter.hasMoreElements() && bContinue)
bContinue =((starform::XResetListener*)aIter.next())->approveReset(aEvt);
if (bContinue)
{
{
// Wenn Models threadSave
::osl::MutexGuard aGuard(m_aMutex);
_reset();
}
NOTIFY_LISTENERS(m_aResetListeners, starform::XResetListener, resetted, aEvt);
}
}
//-----------------------------------------------------------------------------
void OFileControlModel::addResetListener(const staruno::Reference<starform::XResetListener>& _rxListener)
{
m_aResetListeners.addInterface(_rxListener);
}
//-----------------------------------------------------------------------------
void OFileControlModel::removeResetListener(const staruno::Reference<starform::XResetListener>& _rxListener)
{
m_aResetListeners.removeInterface(_rxListener);
}
//------------------------------------------------------------------------------
void OFileControlModel::_reset()
{
{ // release our mutex once (it's acquired in the calling method !), as setting aggregate properties
// may cause any uno controls belonging to us to lock the solar mutex, which is potentially dangerous with
// our own mutex locked
// FS - 72451 - 31.01.00
MutexRelease aRelease(m_aMutex);
m_xAggregateSet->setPropertyValue(PROPERTY_TEXT, staruno::makeAny(m_sDefaultValue));
}
}
//.........................................................................
} // namespace frm
//.........................................................................