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