| /************************************************************** |
| * |
| * 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. |
| * |
| *************************************************************/ |
| |
| // MARKER(update_precomp.py): autogen include statement, do not remove |
| #include "precompiled_basegfx.hxx" |
| |
| #include <stringconversiontools.hxx> |
| #include <rtl/math.hxx> |
| |
| namespace basegfx |
| { |
| namespace internal |
| { |
| void lcl_skipSpaces(sal_Int32& io_rPos, |
| const ::rtl::OUString& rStr, |
| const sal_Int32 nLen) |
| { |
| while( io_rPos < nLen && |
| sal_Unicode(' ') == rStr[io_rPos] ) |
| { |
| ++io_rPos; |
| } |
| } |
| |
| void lcl_skipSpacesAndCommas(sal_Int32& io_rPos, |
| const ::rtl::OUString& rStr, |
| const sal_Int32 nLen) |
| { |
| while(io_rPos < nLen |
| && (sal_Unicode(' ') == rStr[io_rPos] || sal_Unicode(',') == rStr[io_rPos])) |
| { |
| ++io_rPos; |
| } |
| } |
| |
| bool lcl_getDoubleChar(double& o_fRetval, |
| sal_Int32& io_rPos, |
| const ::rtl::OUString& rStr) |
| { |
| sal_Unicode aChar( rStr[io_rPos] ); |
| ::rtl::OUStringBuffer sNumberString; |
| |
| if(sal_Unicode('+') == aChar || sal_Unicode('-') == aChar) |
| { |
| sNumberString.append(rStr[io_rPos]); |
| aChar = rStr[++io_rPos]; |
| } |
| |
| while((sal_Unicode('0') <= aChar && sal_Unicode('9') >= aChar) |
| || sal_Unicode('.') == aChar) |
| { |
| sNumberString.append(rStr[io_rPos]); |
| aChar = rStr[++io_rPos]; |
| } |
| |
| if(sal_Unicode('e') == aChar || sal_Unicode('E') == aChar) |
| { |
| sNumberString.append(rStr[io_rPos]); |
| aChar = rStr[++io_rPos]; |
| |
| if(sal_Unicode('+') == aChar || sal_Unicode('-') == aChar) |
| { |
| sNumberString.append(rStr[io_rPos]); |
| aChar = rStr[++io_rPos]; |
| } |
| |
| while(sal_Unicode('0') <= aChar && sal_Unicode('9') >= aChar) |
| { |
| sNumberString.append(rStr[io_rPos]); |
| aChar = rStr[++io_rPos]; |
| } |
| } |
| |
| if(sNumberString.getLength()) |
| { |
| rtl_math_ConversionStatus eStatus; |
| o_fRetval = ::rtl::math::stringToDouble( sNumberString.makeStringAndClear(), |
| (sal_Unicode)('.'), |
| (sal_Unicode)(','), |
| &eStatus, |
| NULL ); |
| return ( eStatus == rtl_math_ConversionStatus_Ok ); |
| } |
| |
| return false; |
| } |
| |
| bool lcl_importDoubleAndSpaces( double& o_fRetval, |
| sal_Int32& io_rPos, |
| const ::rtl::OUString& rStr, |
| const sal_Int32 nLen ) |
| { |
| if( !lcl_getDoubleChar(o_fRetval, io_rPos, rStr) ) |
| return false; |
| |
| lcl_skipSpacesAndCommas(io_rPos, rStr, nLen); |
| |
| return true; |
| } |
| |
| bool lcl_importNumberAndSpaces(sal_Int32& o_nRetval, |
| sal_Int32& io_rPos, |
| const ::rtl::OUString& rStr, |
| const sal_Int32 nLen) |
| { |
| sal_Unicode aChar( rStr[io_rPos] ); |
| ::rtl::OUStringBuffer sNumberString; |
| |
| if(sal_Unicode('+') == aChar || sal_Unicode('-') == aChar) |
| { |
| sNumberString.append(rStr[io_rPos]); |
| aChar = rStr[++io_rPos]; |
| } |
| |
| while(sal_Unicode('0') <= aChar && sal_Unicode('9') >= aChar) |
| { |
| sNumberString.append(rStr[io_rPos]); |
| aChar = rStr[++io_rPos]; |
| } |
| |
| if(sNumberString.getLength()) |
| { |
| o_nRetval = sNumberString.makeStringAndClear().toInt32(); |
| lcl_skipSpacesAndCommas(io_rPos, rStr, nLen); |
| |
| return true; |
| } |
| |
| return false; |
| } |
| |
| void lcl_skipNumber(sal_Int32& io_rPos, |
| const ::rtl::OUString& rStr, |
| const sal_Int32 nLen) |
| { |
| bool bSignAllowed(true); |
| |
| while(io_rPos < nLen && lcl_isOnNumberChar(rStr, io_rPos, bSignAllowed)) |
| { |
| bSignAllowed = false; |
| ++io_rPos; |
| } |
| } |
| |
| void lcl_skipDouble(sal_Int32& io_rPos, |
| const ::rtl::OUString& rStr) |
| { |
| sal_Unicode aChar( rStr[io_rPos] ); |
| |
| if(sal_Unicode('+') == aChar || sal_Unicode('-') == aChar) |
| aChar = rStr[++io_rPos]; |
| |
| while((sal_Unicode('0') <= aChar && sal_Unicode('9') >= aChar) |
| || sal_Unicode('.') == aChar) |
| { |
| aChar = rStr[++io_rPos]; |
| } |
| |
| if(sal_Unicode('e') == aChar || sal_Unicode('E') == aChar) |
| { |
| aChar = rStr[++io_rPos]; |
| |
| if(sal_Unicode('+') == aChar || sal_Unicode('-') == aChar) |
| aChar = rStr[++io_rPos]; |
| |
| while(sal_Unicode('0') <= aChar && sal_Unicode('9') >= aChar) |
| { |
| aChar = rStr[++io_rPos]; |
| } |
| } |
| } |
| |
| void lcl_putNumberCharWithSpace( ::rtl::OUStringBuffer& rStr, |
| double fValue, |
| double fOldValue, |
| bool bUseRelativeCoordinates ) |
| { |
| if( bUseRelativeCoordinates ) |
| fValue -= fOldValue; |
| |
| const sal_Int32 aLen( rStr.getLength() ); |
| if(aLen) |
| { |
| if( lcl_isOnNumberChar(rStr.charAt(aLen - 1), false) && |
| fValue >= 0.0 ) |
| { |
| rStr.append( sal_Unicode(' ') ); |
| } |
| } |
| |
| lcl_putNumberChar(rStr, fValue); |
| } |
| } // namespace internal |
| } |
| |
| // eof |