sw/source/core/fields/flddat.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 <sal/config.h>
  21
  22 #include <o3tl/any.hxx>
  23 #include <o3tl/temporary.hxx>
  24 #include <tools/datetime.hxx>
  25 #include <svl/zforlist.hxx>
  26 #include <com/sun/star/util/DateTime.hpp>
  27 #include <doc.hxx>
  28 #include <fldbas.hxx>
  29 #include <flddat.hxx>
  30 #include <unofldmid.h>
  31
  32 using namespace ::com::sun::star;
  33
  34 SwDateTimeFieldType::SwDateTimeFieldType(SwDoc* pInitDoc)
  35     : SwValueFieldType( pInitDoc, SwFieldIds::DateTime )
  36 {}
  37
  38 std::unique_ptr<SwFieldType> SwDateTimeFieldType::Copy() const
  39 {
  40     return std::make_unique<SwDateTimeFieldType>(GetDoc());
  41 }
  42
  43 SwDateTimeField::SwDateTimeField(SwDateTimeFieldType* pInitType, sal_uInt16 nSub, sal_uLong nFormat, LanguageType nLng)
  44     : SwValueField(pInitType, nFormat, nLng, 0.0),
  45     m_nSubType(nSub),
  46     m_nOffset(0)
  47 {
  48     if (!nFormat)
  49     {
  50         SvNumberFormatter* pFormatter = GetDoc()->GetNumberFormatter();
  51         if (m_nSubType & DATEFLD)
  52             ChangeFormat(pFormatter->GetFormatIndex(NF_DATE_SYSTEM_SHORT, GetLanguage()));
  53         else
  54             ChangeFormat(pFormatter->GetFormatIndex(NF_TIME_HHMMSS, GetLanguage()));
  55     }
  56     if (IsFixed())
  57     {
  58         DateTime aDateTime( DateTime::SYSTEM );
  59         SetDateTime(aDateTime);
  60     }
  61 }
  62
  63 OUString SwDateTimeField::ExpandImpl(SwRootFrame const*const) const
  64 {
  65     double fVal;
  66
  67     if (!(IsFixed()))
  68     {
  69         DateTime aDateTime( DateTime::SYSTEM );
  70         fVal = GetDateTime(*GetDoc(), aDateTime);
  71     }
  72     else
  73         fVal = GetValue();
  74
  75     if (m_nOffset)
  76         fVal += m_nOffset * ( 60 / 86400.0 );
  77
  78     return ExpandValue(fVal, GetFormat(), GetLanguage());
  79 }
  80
  81 std::unique_ptr<SwField> SwDateTimeField::Copy() const
  82 {
  83     std::unique_ptr<SwDateTimeField> pTmp(
  84         new SwDateTimeField(static_cast<SwDateTimeFieldType*>(GetTyp()), m_nSubType,
  85                                             GetFormat(), GetLanguage()) );
  86
  87     pTmp->SetValue(GetValue());
  88     pTmp->SetOffset(m_nOffset);
  89     pTmp->SetAutomaticLanguage(IsAutomaticLanguage());
  90
  91     return std::unique_ptr<SwField>(pTmp.release());
  92 }
  93
  94 sal_uInt16 SwDateTimeField::GetSubType() const
  95 {
  96     return m_nSubType;
  97 }
  98
  99 void SwDateTimeField::SetSubType(sal_uInt16 nType)
 100 {
 101     m_nSubType = nType;
 102 }
 103
 104 void SwDateTimeField::SetPar2(const OUString& rStr)
 105 {
 106     m_nOffset = rStr.toInt32();
 107 }
 108
 109 OUString SwDateTimeField::GetPar2() const
 110 {
 111     if (m_nOffset)
 112         return OUString::number(m_nOffset);
 113     return OUString();
 114 }
 115
 116 void SwDateTimeField::SetDateTime(const DateTime& rDT)
 117 {
 118     SetValue(GetDateTime(*GetDoc(), rDT));
 119 }
 120
 121 double SwDateTimeField::GetDateTime(SwDoc& rDoc, const DateTime& rDT)
 122 {
 123     SvNumberFormatter* pFormatter = rDoc.GetNumberFormatter();
 124     const Date& rNullDate = pFormatter->GetNullDate();
 125
 126     double fResult = rDT - DateTime(rNullDate);
 127
 128     return fResult;
 129 }
 130
 131 double SwDateTimeField::GetValue() const
 132 {
 133     if (IsFixed())
 134         return SwValueField::GetValue();
 135     else
 136         return GetDateTime(*GetDoc(), DateTime( DateTime::SYSTEM ));
 137 }
 138
 139 Date SwDateTimeField::GetDate() const
 140 {
 141     SvNumberFormatter* pFormatter = GetDoc()->GetNumberFormatter();
 142     const Date& rNullDate = pFormatter->GetNullDate();
 143
 144     tools::Long nVal = static_cast<tools::Long>( GetValue() );
 145
 146     Date aDate = rNullDate + nVal;
 147
 148     return aDate;
 149 }
 150
 151 tools::Time SwDateTimeField::GetTime() const
 152 {
 153     double fFract = modf(GetValue(), &o3tl::temporary(double()));
 154     DateTime aDT( DateTime::EMPTY );
 155     aDT.AddTime(fFract);
 156     return static_cast<tools::Time>(aDT);
 157 }
 158
 159 bool SwDateTimeField::QueryValue( uno::Any& rVal, sal_uInt16 nWhichId ) const
 160 {
 161     switch( nWhichId )
 162     {
 163     case FIELD_PROP_BOOL1:
 164         rVal <<= IsFixed();
 165         break;
 166     case FIELD_PROP_BOOL2:
 167         rVal <<= (m_nSubType & DATEFLD) != 0;
 168         break;
 169     case FIELD_PROP_FORMAT:
 170         rVal <<= static_cast<sal_Int32>(GetFormat());
 171         break;
 172     case FIELD_PROP_SUBTYPE:
 173         rVal <<= static_cast<sal_Int32>(m_nOffset);
 174         break;
 175     case FIELD_PROP_DATE_TIME:
 176         {
 177             DateTime aDateTime(GetDate(), GetTime());
 178             rVal <<= aDateTime.GetUNODateTime();
 179         }
 180         break;
 181     default:
 182         return SwField::QueryValue(rVal, nWhichId);
 183     }
 184     return true;
 185 }
 186
 187 bool SwDateTimeField::PutValue( const uno::Any& rVal, sal_uInt16 nWhichId )
 188 {
 189     sal_Int32 nTmp = 0;
 190     switch( nWhichId )
 191     {
 192     case FIELD_PROP_BOOL1:
 193         if(*o3tl::doAccess<bool>(rVal))
 194             m_nSubType |= FIXEDFLD;
 195         else
 196             m_nSubType &= ~FIXEDFLD;
 197         break;
 198     case FIELD_PROP_BOOL2:
 199         m_nSubType &=  ~(DATEFLD|TIMEFLD);
 200         m_nSubType |= *o3tl::doAccess<bool>(rVal) ? DATEFLD : TIMEFLD;
 201         break;
 202     case FIELD_PROP_FORMAT:
 203         rVal >>= nTmp;
 204         ChangeFormat(nTmp);
 205         break;
 206     case FIELD_PROP_SUBTYPE:
 207         rVal >>= nTmp;
 208         m_nOffset = nTmp;
 209         break;
 210     case FIELD_PROP_DATE_TIME:
 211         {
 212             util::DateTime aDateTimeValue;
 213             if(!(rVal >>= aDateTimeValue))
 214                 return false;
 215             DateTime aDateTime( DateTime::EMPTY );
 216             aDateTime.SetNanoSec(aDateTimeValue.NanoSeconds);
 217             aDateTime.SetSec(aDateTimeValue.Seconds);
 218             aDateTime.SetMin(aDateTimeValue.Minutes);
 219             aDateTime.SetHour(aDateTimeValue.Hours);
 220             aDateTime.SetDay(aDateTimeValue.Day);
 221             aDateTime.SetMonth(aDateTimeValue.Month);
 222             aDateTime.SetYear(aDateTimeValue.Year);
 223             SetDateTime(aDateTime);
 224         }
 225         break;
 226         default:
 227             return SwField::PutValue(rVal, nWhichId);
 228     }
 229     return true;
 230 }
 231
 232 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */