forms/source/component/Date.cxx

   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 #include "Date.hxx"
  21 #include "services.hxx"
  22 #include <tools/date.hxx>
  23 #include <connectivity/dbconversion.hxx>
  24 #include <com/sun/star/sdbc/DataType.hpp>
  25 #include <comphelper/processfactory.hxx>
  26
  27 using namespace dbtools;
  28
  29 namespace frm
  30 {
  31
  32
  33 using namespace ::com::sun::star;
  34 using namespace ::com::sun::star::uno;
  35 using namespace ::com::sun::star::sdb;
  36 using namespace ::com::sun::star::sdbc;
  37 using namespace ::com::sun::star::sdbcx;
  38 using namespace ::com::sun::star::beans;
  39 using namespace ::com::sun::star::util;
  40 using namespace ::com::sun::star::container;
  41 using namespace ::com::sun::star::form;
  42 using namespace ::com::sun::star::awt;
  43 using namespace ::com::sun::star::io;
  44 using namespace ::com::sun::star::lang;
  45
  46
  47 ODateControl::ODateControl(const Reference<XComponentContext>& _rxFactory)
  48                :OBoundControl(_rxFactory, VCL_CONTROL_DATEFIELD)
  49 {
  50 }
  51
  52
  53 Sequence<Type> ODateControl::_getTypes()
  54 {
  55     return OBoundControl::_getTypes();
  56 }
  57
  58
  59 StringSequence SAL_CALL ODateControl::getSupportedServiceNames() throw(std::exception)
  60 {
  61     StringSequence aSupported = OBoundControl::getSupportedServiceNames();
  62     aSupported.realloc(aSupported.getLength() + 2);
  63
  64     OUString*pArray = aSupported.getArray();
  65     pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_DATEFIELD;
  66     pArray[aSupported.getLength()-2] = STARDIV_ONE_FORM_CONTROL_DATEFIELD;
  67     return aSupported;
  68 }
  69
  70
  71 Sequence<Type> ODateModel::_getTypes()
  72 {
  73     return OEditBaseModel::_getTypes();
  74 }
  75
  76
  77 ODateModel::ODateModel(const Reference<XComponentContext>& _rxFactory)
  78     : OEditBaseModel(_rxFactory, VCL_CONTROLMODEL_DATEFIELD,
  79         FRM_SUN_CONTROL_DATEFIELD, true, true)
  80     // use the old control name for compytibility reasons
  81     , OLimitedFormats(_rxFactory, FormComponentType::DATEFIELD)
  82     , m_bDateTimeField(false)
  83 {
  84     m_nClassId = FormComponentType::DATEFIELD;
  85     initValueProperty( PROPERTY_DATE, PROPERTY_ID_DATE );
  86
  87     setAggregateSet(m_xAggregateFastSet, getOriginalHandle(PROPERTY_ID_DATEFORMAT));
  88
  89     osl_atomic_increment( &m_refCount );
  90     try
  91     {
  92         if ( m_xAggregateSet.is() )
  93             m_xAggregateSet->setPropertyValue( PROPERTY_DATEMIN, makeAny(util::Date(1, 1, 1800)) );
  94     }
  95     catch( const Exception& )
  96     {
  97         OSL_FAIL( "ODateModel::ODateModel: caught an exception!" );
  98     }
  99     osl_atomic_decrement( &m_refCount );
 100 }
 101
 102
 103 ODateModel::ODateModel( const ODateModel* _pOriginal, const Reference<XComponentContext>& _rxFactory )
 104     : OEditBaseModel(_pOriginal, _rxFactory)
 105     , OLimitedFormats(_rxFactory, FormComponentType::DATEFIELD)
 106     , m_bDateTimeField(false)
 107 {
 108     setAggregateSet( m_xAggregateFastSet, getOriginalHandle( PROPERTY_ID_DATEFORMAT ) );
 109 }
 110
 111
 112 ODateModel::~ODateModel( )
 113 {
 114     setAggregateSet(Reference< XFastPropertySet >(), -1);
 115 }
 116
 117 // XCloneable
 118
 119 IMPLEMENT_DEFAULT_CLONING( ODateModel )
 120
 121 // XServiceInfo
 122
 123 StringSequence SAL_CALL ODateModel::getSupportedServiceNames() throw(std::exception)
 124 {
 125     StringSequence aSupported = OBoundControlModel::getSupportedServiceNames();
 126
 127     sal_Int32 nOldLen = aSupported.getLength();
 128     aSupported.realloc( nOldLen + 9 );
 129     OUString* pStoreTo = aSupported.getArray() + nOldLen;
 130
 131     *pStoreTo++ = BINDABLE_CONTROL_MODEL;
 132     *pStoreTo++ = DATA_AWARE_CONTROL_MODEL;
 133     *pStoreTo++ = VALIDATABLE_CONTROL_MODEL;
 134
 135     *pStoreTo++ = BINDABLE_DATA_AWARE_CONTROL_MODEL;
 136     *pStoreTo++ = VALIDATABLE_BINDABLE_CONTROL_MODEL;
 137
 138     *pStoreTo++ = FRM_SUN_COMPONENT_DATEFIELD;
 139     *pStoreTo++ = FRM_SUN_COMPONENT_DATABASE_DATEFIELD;
 140     *pStoreTo++ = BINDABLE_DATABASE_DATE_FIELD;
 141
 142     *pStoreTo++ = FRM_COMPONENT_DATEFIELD;
 143
 144     return aSupported;
 145 }
 146
 147
 148 OUString SAL_CALL ODateModel::getServiceName() throw ( ::com::sun::star::uno::RuntimeException, std::exception)
 149 {
 150     return OUString(FRM_COMPONENT_DATEFIELD); // old (non-sun) name for compatibility !
 151 }
 152
 153 // XPropertySet
 154
 155 void ODateModel::describeFixedProperties( Sequence< Property >& _rProps ) const
 156 {
 157     BEGIN_DESCRIBE_PROPERTIES( 4, OEditBaseModel )
 158         DECL_PROP3(DEFAULT_DATE,            util::Date,             BOUND, MAYBEDEFAULT, MAYBEVOID);
 159         DECL_PROP1(TABINDEX,                sal_Int16,              BOUND);
 160         DECL_PROP1(FORMATKEY,               sal_Int32,              TRANSIENT);
 161         DECL_IFACE_PROP2(FORMATSSUPPLIER,   XNumberFormatsSupplier, READONLY, TRANSIENT);
 162     END_DESCRIBE_PROPERTIES();
 163 }
 164
 165
 166 void SAL_CALL ODateModel::getFastPropertyValue(Any& _rValue, sal_Int32 _nHandle ) const
 167 {
 168     switch (_nHandle)
 169     {
 170         case PROPERTY_ID_FORMATKEY:
 171             getFormatKeyPropertyValue(_rValue);
 172             break;
 173         case PROPERTY_ID_FORMATSSUPPLIER:
 174             _rValue <<= getFormatsSupplier();
 175             break;
 176         default:
 177             OEditBaseModel::getFastPropertyValue(_rValue, _nHandle);
 178             break;
 179     }
 180 }
 181
 182
 183 sal_Bool SAL_CALL ODateModel::convertFastPropertyValue(Any& _rConvertedValue, Any& _rOldValue,
 184         sal_Int32 _nHandle, const Any& _rValue ) throw(IllegalArgumentException)
 185 {
 186     if (PROPERTY_ID_FORMATKEY == _nHandle)
 187         return convertFormatKeyPropertyValue(_rConvertedValue, _rOldValue, _rValue);
 188     else
 189         return OEditBaseModel::convertFastPropertyValue(_rConvertedValue, _rOldValue, _nHandle, _rValue );
 190 }
 191
 192
 193 void SAL_CALL ODateModel::setFastPropertyValue_NoBroadcast(sal_Int32 _nHandle, const Any& _rValue) throw ( ::com::sun::star::uno::Exception, std::exception)
 194 {
 195     if (PROPERTY_ID_FORMATKEY == _nHandle)
 196         setFormatKeyPropertyValue(_rValue);
 197     else
 198         OEditBaseModel::setFastPropertyValue_NoBroadcast(_nHandle, _rValue);
 199 }
 200
 201 // XLoadListener
 202
 203 void ODateModel::onConnectedDbColumn( const Reference< XInterface >& _rxForm )
 204 {
 205     OBoundControlModel::onConnectedDbColumn( _rxForm );
 206     Reference<XPropertySet> xField = getField();
 207     if (xField.is())
 208     {
 209         m_bDateTimeField = false;
 210         try
 211         {
 212             sal_Int32 nFieldType = 0;
 213             xField->getPropertyValue(PROPERTY_FIELDTYPE) >>= nFieldType;
 214             m_bDateTimeField = (nFieldType == DataType::TIMESTAMP);
 215         }
 216         catch(const Exception&)
 217         {
 218         }
 219     }
 220 }
 221
 222
 223 bool ODateModel::commitControlValueToDbColumn( bool /*_bPostReset*/ )
 224 {
 225     Any aControlValue( m_xAggregateFastSet->getFastPropertyValue( getValuePropertyAggHandle() ) );
 226     if ( !compare( aControlValue, m_aSaveValue ) )
 227     {
 228         if ( !aControlValue.hasValue() )
 229             m_xColumnUpdate->updateNull();
 230         else
 231         {
 232             try
 233             {
 234                 util::Date aDate;
 235                 if ( !( aControlValue >>= aDate ) )
 236                 {
 237                     sal_Int32 nAsInt(0);
 238                     aControlValue >>= nAsInt;
 239                     aDate = DBTypeConversion::toDate(nAsInt);
 240                 }
 241
 242                 if ( !m_bDateTimeField )
 243                     m_xColumnUpdate->updateDate( aDate );
 244                 else
 245                 {
 246                     util::DateTime aDateTime = m_xColumn->getTimestamp();
 247                     aDateTime.Day = aDate.Day;
 248                     aDateTime.Month = aDate.Month;
 249                     aDateTime.Year = aDate.Year;
 250                     m_xColumnUpdate->updateTimestamp( aDateTime );
 251                 }
 252             }
 253             catch(const Exception&)
 254             {
 255                 return false;
 256             }
 257         }
 258         m_aSaveValue = aControlValue;
 259     }
 260     return true;
 261 }
 262
 263
 264 Any ODateModel::translateControlValueToExternalValue( ) const
 265 {
 266     return getControlValue();
 267 }
 268
 269
 270 Any ODateModel::translateExternalValueToControlValue( const Any& _rExternalValue ) const
 271 {
 272     return _rExternalValue;
 273 }
 274
 275
 276 Any ODateModel::translateControlValueToValidatableValue( ) const
 277 {
 278     return getControlValue();
 279 }
 280
 281
 282 Any ODateModel::translateDbColumnToControlValue()
 283 {
 284     util::Date aDate = m_xColumn->getDate();
 285     if (m_xColumn->wasNull())
 286         m_aSaveValue.clear();
 287     else
 288         m_aSaveValue <<= aDate;
 289
 290     return m_aSaveValue;
 291 }
 292
 293
 294 Any ODateModel::getDefaultForReset() const
 295 {
 296     return m_aDefault;
 297 }
 298
 299
 300 void ODateModel::resetNoBroadcast()
 301 {
 302     OEditBaseModel::resetNoBroadcast();
 303     m_aSaveValue.clear();
 304 }
 305
 306
 307 Sequence< Type > ODateModel::getSupportedBindingTypes()
 308 {
 309     return Sequence< Type >( & cppu::UnoType<util::Date>::get(), 1 );
 310 }
 311
 312 }   // namespace frm
 313
 314 extern "C" SAL_DLLPUBLIC_EXPORT ::com::sun::star::uno::XInterface* SAL_CALL
 315 com_sun_star_form_ODateModel_get_implementation(::com::sun::star::uno::XComponentContext* component,
 316         ::com::sun::star::uno::Sequence<css::uno::Any> const &)
 317 {
 318     return cppu::acquire(new frm::ODateModel(component));
 319 }
 320
 321 extern "C" SAL_DLLPUBLIC_EXPORT ::com::sun::star::uno::XInterface* SAL_CALL
 322 com_sun_star_form_ODateControl_get_implementation(::com::sun::star::uno::XComponentContext* component,
 323         ::com::sun::star::uno::Sequence<css::uno::Any> const &)
 324 {
 325     return cppu::acquire(new frm::ODateControl(component));
 326 }
 327
 328 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */