/************************************************************** * * Licensed to the Apache Software Foundation (ASF) under one * or more contributor license agreements. See the NOTICE file * distributed with this work for additional information * regarding copyright ownership. The ASF licenses this file * to you under the Apache License, Version 2.0 (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.apache.org/licenses/LICENSE-2.0 * * Unless required by applicable law or agreed to in writing, * software distributed under the License is distributed on an * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY * KIND, either express or implied. See the License for the * specific language governing permissions and limitations * under the License. * *************************************************************/ #include "oox/xls/unitconverter.hxx" #include #include #include #include #include #include #include #include "oox/core/filterbase.hxx" #include "oox/helper/propertyset.hxx" #include "oox/xls/stylesbuffer.hxx" namespace oox { namespace xls { // ============================================================================ using namespace ::com::sun::star::awt; using namespace ::com::sun::star::uno; using namespace ::com::sun::star::util; using ::rtl::OUString; // ============================================================================ namespace { const double MM100_PER_INCH = 2540.0; const double MM100_PER_POINT = MM100_PER_INCH / 72.0; const double MM100_PER_TWIP = MM100_PER_POINT / 20.0; const double MM100_PER_EMU = 1.0 / 360.0; // ---------------------------------------------------------------------------- /** Returns true, if the passed year is a leap year. */ inline sal_Int32 lclIsLeapYear( sal_Int32 nYear ) { return ((nYear % 4) == 0) && (((nYear % 100) != 0) || ((nYear % 400) == 0)); } void lclSkipYearBlock( sal_Int32& ornDays, sal_uInt16& ornYear, sal_Int32 nDaysInBlock, sal_Int32 nYearsPerBlock, sal_Int32 nMaxBlocks ) { sal_Int32 nBlocks = ::std::min< sal_Int32 >( ornDays / nDaysInBlock, nMaxBlocks ); ornYear = static_cast< sal_uInt16 >( ornYear + nYearsPerBlock * nBlocks ); ornDays -= nBlocks * nDaysInBlock; } /** Returns the number of days before the passed date, starting from the null date 0000-Jan-01, using standard leap year conventions. */ sal_Int32 lclGetDays( const Date& rDate ) { // number of days in all full years before passed date including all leap days sal_Int32 nDays = rDate.Year * 365 + ((rDate.Year + 3) / 4) - ((rDate.Year + 99) / 100) + ((rDate.Year + 399) / 400); OSL_ENSURE( (1 <= rDate.Month) && (rDate.Month <= 12), "lclGetDays - invalid month" ); OSL_ENSURE( (1 <= rDate.Day) && (rDate.Day <= 31), "lclGetDays - invalid day" ); // yes, this is weak... if( (1 <= rDate.Month) && (rDate.Month <= 12) ) { // number of days at start of month jan feb mar apr may jun jul aug sep oct nov dec static const sal_Int32 spnCumDays[] = { 0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334 }; // add number of days in full months before passed date nDays += spnCumDays[ rDate.Month - 1 ]; // add number of days from passed date (this adds one day too much) nDays += rDate.Day; /* Remove the one day added too much if there is no leap day before the passed day in the passed year. This means: remove the day, if we are in january or february (leap day not reached if existing), or if the passed year is not a leap year. */ if( (rDate.Month < 3) || !lclIsLeapYear( rDate.Year ) ) --nDays; } return nDays; } } // namespace // ---------------------------------------------------------------------------- UnitConverter::UnitConverter( const WorkbookHelper& rHelper ) : WorkbookHelper( rHelper ), maCoeffs( UNIT_ENUM_SIZE, 1.0 ), mnNullDate( lclGetDays( Date( 30, 12, 1899 ) ) ) { // initialize constant and default coefficients const DeviceInfo& rDeviceInfo = getBaseFilter().getGraphicHelper().getDeviceInfo(); maCoeffs[ UNIT_INCH ] = MM100_PER_INCH; maCoeffs[ UNIT_POINT ] = MM100_PER_POINT; maCoeffs[ UNIT_TWIP ] = MM100_PER_TWIP; maCoeffs[ UNIT_EMU ] = MM100_PER_EMU; maCoeffs[ UNIT_SCREENX ] = (rDeviceInfo.PixelPerMeterX > 0) ? (100000.0 / rDeviceInfo.PixelPerMeterX) : 50.0; maCoeffs[ UNIT_SCREENY ] = (rDeviceInfo.PixelPerMeterY > 0) ? (100000.0 / rDeviceInfo.PixelPerMeterY) : 50.0; maCoeffs[ UNIT_REFDEVX ] = 12.5; // default: 1 px = 0.125 mm maCoeffs[ UNIT_REFDEVY ] = 12.5; // default: 1 px = 0.125 mm maCoeffs[ UNIT_DIGIT ] = 200.0; // default: 1 digit = 2 mm maCoeffs[ UNIT_SPACE ] = 100.0; // default 1 space = 1 mm // error code maps addErrorCode( BIFF_ERR_NULL, CREATE_OUSTRING( "#NULL!" ) ); addErrorCode( BIFF_ERR_DIV0, CREATE_OUSTRING( "#DIV/0!" ) ); addErrorCode( BIFF_ERR_VALUE, CREATE_OUSTRING( "#VALUE!" ) ); addErrorCode( BIFF_ERR_REF, CREATE_OUSTRING( "#REF!" ) ); addErrorCode( BIFF_ERR_NAME, CREATE_OUSTRING( "#NAME?" ) ); addErrorCode( BIFF_ERR_NUM, CREATE_OUSTRING( "#NUM!" ) ); addErrorCode( BIFF_ERR_NA, CREATE_OUSTRING( "#NA" ) ); } void UnitConverter::finalizeImport() { PropertySet aDocProps( getDocument() ); Reference< XDevice > xDevice( aDocProps.getAnyProperty( PROP_ReferenceDevice ), UNO_QUERY ); if( xDevice.is() ) { // get reference device metric first, needed to get character widths below DeviceInfo aInfo = xDevice->getInfo(); maCoeffs[ UNIT_REFDEVX ] = 100000.0 / aInfo.PixelPerMeterX; maCoeffs[ UNIT_REFDEVY ] = 100000.0 / aInfo.PixelPerMeterY; // get character widths from default font if( const Font* pDefFont = getStyles().getDefaultFont().get() ) { // XDevice expects pixels in font descriptor, but font contains twips FontDescriptor aDesc = pDefFont->getFontDescriptor(); aDesc.Height = static_cast< sal_Int16 >( scaleValue( aDesc.Height, UNIT_TWIP, UNIT_REFDEVX ) + 0.5 ); Reference< XFont > xFont = xDevice->getFont( aDesc ); if( xFont.is() ) { // get maximum width of all digits sal_Int32 nDigitWidth = 0; for( sal_Unicode cChar = '0'; cChar <= '9'; ++cChar ) nDigitWidth = ::std::max( nDigitWidth, scaleToMm100( xFont->getCharWidth( cChar ), UNIT_REFDEVX ) ); if( nDigitWidth > 0 ) maCoeffs[ UNIT_DIGIT ] = nDigitWidth; // get width of space character sal_Int32 nSpaceWidth = scaleToMm100( xFont->getCharWidth( ' ' ), UNIT_REFDEVX ); if( nSpaceWidth > 0 ) maCoeffs[ UNIT_SPACE ] = nSpaceWidth; } } } } void UnitConverter::finalizeNullDate( const Date& rNullDate ) { // convert the nulldate to number of days since 0000-Jan-01 mnNullDate = lclGetDays( rNullDate ); } // conversion ----------------------------------------------------------------- double UnitConverter::scaleValue( double fValue, Unit eFromUnit, Unit eToUnit ) const { return (eFromUnit == eToUnit) ? fValue : (fValue * getCoefficient( eFromUnit ) / getCoefficient( eToUnit )); } sal_Int32 UnitConverter::scaleToMm100( double fValue, Unit eUnit ) const { return static_cast< sal_Int32 >( fValue * getCoefficient( eUnit ) + 0.5 ); } double UnitConverter::scaleFromMm100( sal_Int32 nMm100, Unit eUnit ) const { return static_cast< double >( nMm100 ) / getCoefficient( eUnit ); } double UnitConverter::calcSerialFromDateTime( const DateTime& rDateTime ) const { sal_Int32 nDays = lclGetDays( Date( rDateTime.Day, rDateTime.Month, rDateTime.Year ) ) - mnNullDate; OSL_ENSURE( nDays >= 0, "UnitConverter::calcDateTimeSerial - invalid date" ); OSL_ENSURE( (rDateTime.Hours <= 23) && (rDateTime.Minutes <= 59) && (rDateTime.Seconds <= 59), "UnitConverter::calcDateTimeSerial - invalid time" ); return nDays + rDateTime.Hours / 24.0 + rDateTime.Minutes / 1440.0 + rDateTime.Seconds / 86400.0; } DateTime UnitConverter::calcDateTimeFromSerial( double fSerial ) const { DateTime aDateTime( 0, 0, 0, 0, 1, 1, 0 ); double fDays = 0.0; double fTime = modf( fSerial, &fDays ); // calculate date from number of days with O(1) complexity sal_Int32 nDays = getLimitedValue< sal_Int32, double >( fDays + mnNullDate, 0, 3652424 ); // skip year 0, assumed to be a leap year. By starting at year 1, leap years can be handled easily if( nDays >= 366 ) { ++aDateTime.Year; nDays -= 366; } // skip full blocks of 400, 100, 4 years, and remaining full years lclSkipYearBlock( nDays, aDateTime.Year, 400 * 365 + 97, 400, 24 ); lclSkipYearBlock( nDays, aDateTime.Year, 100 * 365 + 24, 100, 3 ); lclSkipYearBlock( nDays, aDateTime.Year, 4 * 365 + 1, 4, 24 ); lclSkipYearBlock( nDays, aDateTime.Year, 365, 1, 3 ); // skip full months of current year static const sal_Int32 spnDaysInMonth[] = { 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 }; if( (nDays >= 59) && !lclIsLeapYear( aDateTime.Year ) ) ++nDays; const sal_Int32* pnDaysInMonth = spnDaysInMonth; while( *pnDaysInMonth >= nDays ) { ++aDateTime.Month; nDays -= *pnDaysInMonth; ++pnDaysInMonth; } aDateTime.Day = static_cast< sal_uInt16 >( nDays + 1 ); // calculate time from fractional part of serial sal_Int32 nTime = getLimitedValue< sal_Int32, double >( fTime * 86400, 0, 86399 ); aDateTime.Seconds = static_cast< sal_uInt16 >( nTime % 60 ); nTime /= 60; aDateTime.Minutes = static_cast< sal_uInt16 >( nTime % 60 ); aDateTime.Hours = static_cast< sal_uInt16 >( nTime / 60 ); return aDateTime; } OUString UnitConverter::calcOoxErrorCode( sal_uInt8 nErrorCode ) const { BiffErrorCodeMap::const_iterator aIt = maBiffErrCodes.find( nErrorCode ); return (aIt == maBiffErrCodes.end()) ? CREATE_OUSTRING( "#N/A" ) : aIt->second; } sal_uInt8 UnitConverter::calcBiffErrorCode( const OUString& rErrorCode ) const { OoxErrorCodeMap::const_iterator aIt = maOoxErrCodes.find( rErrorCode ); return (aIt == maOoxErrCodes.end()) ? BIFF_ERR_NA : aIt->second; } void UnitConverter::addErrorCode( sal_uInt8 nErrorCode, const OUString& rErrorCode ) { maOoxErrCodes[ rErrorCode ] = nErrorCode; maBiffErrCodes[ nErrorCode ] = rErrorCode; } double UnitConverter::getCoefficient( Unit eUnit ) const { OSL_ENSURE( static_cast< size_t >( eUnit ) < UNIT_ENUM_SIZE, "UnitConverter::getCoefficient - invalid unit" ); return maCoeffs[ static_cast< size_t >( eUnit ) ]; } // ============================================================================ } // namespace xls } // namespace oox