XMLBigInteger.cpp
上传用户:huihehuasu
上传日期:2007-01-10
资源大小:6948k
文件大小:10k
源码类别:

xml/soap/webservice

开发平台:

C/C++

  1. /*
  2.  * The Apache Software License, Version 1.1
  3.  *
  4.  * Copyright (c) 2001 The Apache Software Foundation.  All rights
  5.  * reserved.
  6.  *
  7.  * Redistribution and use in source and binary forms, with or without
  8.  * modification, are permitted provided that the following conditions
  9.  * are met:
  10.  *
  11.  * 1. Redistributions of source code must retain the above copyright
  12.  *    notice, this list of conditions and the following disclaimer.
  13.  *
  14.  * 2. Redistributions in binary form must reproduce the above copyright
  15.  *    notice, this list of conditions and the following disclaimer in
  16.  *    the documentation and/or other materials provided with the
  17.  *    distribution.
  18.  *
  19.  * 3. The end-user documentation included with the redistribution,
  20.  *    if any, must include the following acknowledgment:
  21.  *       "This product includes software developed by the
  22.  *        Apache Software Foundation (http://www.apache.org/)."
  23.  *    Alternately, this acknowledgment may appear in the software itself,
  24.  *    if and wherever such third-party acknowledgments normally appear.
  25.  *
  26.  * 4. The names "Xerces" and "Apache Software Foundation" must
  27.  *    not be used to endorse or promote products derived from this
  28.  *    software without prior written permission. For written
  29.  *    permission, please contact apache@apache.org.
  30.  *
  31.  * 5. Products derived from this software may not be called "Apache",
  32.  *    nor may "Apache" appear in their name, without prior written
  33.  *    permission of the Apache Software Foundation.
  34.  *
  35.  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED
  36.  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  37.  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
  38.  * DISCLAIMED.  IN NO EVENT SHALL THE APACHE SOFTWARE FOUNDATION OR
  39.  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  40.  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
  41.  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
  42.  * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
  43.  * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
  44.  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
  45.  * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  46.  * SUCH DAMAGE.
  47.  * ====================================================================
  48.  *
  49.  * This software consists of voluntary contributions made by many
  50.  * individuals on behalf of the Apache Software Foundation, and was
  51.  * originally based on software copyright (c) 2001, International
  52.  * Business Machines, Inc., http://www.ibm.com .  For more information
  53.  * on the Apache Software Foundation, please see
  54.  * <http://www.apache.org/>.
  55.  */
  56. /*
  57.  * $Log: XMLBigInteger.cpp,v $
  58.  * Revision 1.7  2001/08/23 11:54:26  tng
  59.  * Add newline at the end and various typo fixes.
  60.  *
  61.  * Revision 1.6  2001/07/24 13:58:11  peiyongz
  62.  * XMLDouble and related supporting methods from XMLBigInteger/XMLBigDecimal
  63.  *
  64.  * Revision 1.5  2001/05/31 17:50:26  knoaman
  65.  * small modification to XMLBigInteger::toString.
  66.  *
  67.  * Revision 1.4  2001/05/18 20:17:57  tng
  68.  * Schema: More exception messages in XMLBigDecimal/XMLBigInteger/DecimalDatatypeValidator.  By Pei Yong Zhang.
  69.  *
  70.  * Revision 1.3  2001/05/18 13:23:01  tng
  71.  * Schema: Exception messages in DatatypeValidator.  By Pei Yong Zhang.
  72.  *
  73.  * Revision 1.2  2001/05/11 13:26:31  tng
  74.  * Copyright update.
  75.  *
  76.  * Revision 1.1  2001/05/10 20:51:23  tng
  77.  * Schema: Add DecimalDatatypeValidator and XMLBigDecimal, XMLBigInteger.  By Pei Yong Zhang.
  78.  *
  79.  */
  80. // ---------------------------------------------------------------------------
  81. //  Includes
  82. // ---------------------------------------------------------------------------
  83. #include <util/XMLBigInteger.hpp>
  84. #include <util/XMLString.hpp>
  85. #include <util/NumberFormatException.hpp>
  86. #include <util/PlatformUtils.hpp>
  87. #include <util/TransService.hpp>
  88. #include <util/XMLUniDefs.hpp>
  89. #include <util/Janitor.hpp>
  90. /***
  91.    *
  92.    *  Leading and trailing whitespaces are allowed, and trimmed
  93.    *
  94.    *  Only one and either of (+,-) after the leading whitespace, before
  95.    *  any other characters are allowed, and trimmed
  96.    *
  97.    *  Leading zero, after leading whitespace, (+|-), before any other
  98.    *  characters are allowed, and trimmed
  99.    *
  100.    *  '.' NOT allowed
  101.    *  return status: void
  102.    *  ret_buf: w/o leading and/or trailing whitespace
  103.    *           w/o '+' and '-'
  104.    *           w/o leading zero
  105.    *
  106.    *  see XMLString::parseInt();
  107.    *      XMLString::textToBin();
  108.    *
  109.    *  "    +000203456"            "203456"
  110.    *  "    -000203456"            "203456"
  111.    *
  112. ***/
  113. void XMLBigInteger::parseBigInteger(const XMLCh* const toConvert
  114.                                   , XMLCh* const retBuffer
  115.                                   , int&   signValue)
  116. {
  117.     // If no string, then its a failure
  118.     if ((!toConvert) || (!*toConvert))
  119.         ThrowXML(NumberFormatException, XMLExcepts::XMLNUM_emptyString);
  120.     //
  121.     // Note: in Java's BigInteger, it seems any leading and/or trailing
  122.     // whitespaces are not allowed. If this is the case, we may
  123.     // need to skip the trimming below.
  124.     //
  125.     // Scan past any whitespace. If we hit the end, then return failure
  126.     const XMLCh* startPtr = toConvert;
  127.     while (XMLPlatformUtils::fgTransService->isSpace(*startPtr))
  128.         startPtr++;
  129.     if (!*startPtr)
  130.         ThrowXML(NumberFormatException, XMLExcepts::XMLNUM_WSString);
  131.     // Start at the end and work back through any whitespace
  132.     const XMLCh* endPtr = toConvert + XMLString::stringLen(toConvert);
  133.     while (XMLPlatformUtils::fgTransService->isSpace(*(endPtr - 1)))
  134.         endPtr--;
  135.     //
  136.     //  Work through what remains and convert each char to a digit.
  137.     //  anything other than '
  138.     //
  139.     XMLCh* retPtr = retBuffer;
  140.     signValue = 1;
  141.     //
  142.     // '+' or '-' is allowed only at the first position
  143.     //
  144.     if (*startPtr == chDash)
  145.     {
  146.         signValue = -1;
  147.         startPtr++;
  148.     }
  149.     else if (*startPtr == chPlus)
  150.     {
  151.         // skip the '+'
  152.         startPtr++;
  153.     }
  154.     // Scan past any leading zero.
  155.     while (*startPtr == chDigit_0)
  156.         startPtr++;
  157.     if (!*startPtr)
  158.     {
  159.         signValue = 0;
  160.         // containning zero, only zero, nothing but zero
  161.         // it is a zero, indeed
  162.         return;
  163.     }
  164.     while (startPtr < endPtr)
  165.     {
  166.         // If not valid decimal digit, then an error
  167.         if ((*startPtr < chDigit_0) || (*startPtr > chDigit_9))
  168.             ThrowXML(NumberFormatException, XMLExcepts::XMLNUM_Inv_chars);
  169.         // copy over
  170.         *retPtr = *startPtr;
  171.         retPtr++;
  172.         startPtr++;
  173.     }
  174.     *retPtr = 0;   //terminated
  175.     return;
  176. }
  177. /**
  178.  * Translates a string containing an optional minus sign followed by a
  179.  * sequence of one or more digits into a BigInteger.
  180.  * Any extraneous characters (including whitespace),
  181.  * inclusive, will result in a NumberFormatException.
  182.  */
  183. XMLBigInteger::XMLBigInteger(const XMLCh* const strValue)
  184. {
  185.     if (!strValue)
  186.         ThrowXML(NumberFormatException, XMLExcepts::XMLNUM_emptyString);
  187.     XMLCh* ret_value = new XMLCh[XMLString::stringLen(strValue)+1];
  188.     ArrayJanitor<XMLCh> janName(ret_value);
  189.     parseBigInteger(strValue, ret_value, fSign);
  190.     if (fSign == 0)
  191.         fMagnitude = XMLString::replicate(XMLUni::fgZeroLenString);
  192.     else
  193.         fMagnitude = XMLString::replicate(ret_value);
  194. }
  195. XMLBigInteger::~XMLBigInteger()
  196. {
  197.     delete[] fMagnitude;
  198. }
  199. XMLBigInteger::XMLBigInteger(const XMLBigInteger& toCopy)
  200. {
  201.     setSign(toCopy.getSign());
  202.     fMagnitude = XMLString::replicate(toCopy.fMagnitude);
  203. }
  204. /**
  205.  * Returns -1, 0 or 1 as lValue is less than, equal to, or greater
  206.  * than rValue.
  207. */
  208. int  XMLBigInteger::compareValues(const XMLBigInteger* const lValue
  209.                                 , const XMLBigInteger* const rValue)
  210. {
  211.     if ((!lValue) || (!rValue) )
  212.         ThrowXML(NumberFormatException, XMLExcepts::XMLNUM_null_ptr);
  213.     int lSign = lValue->getSign();
  214.     int rSign = rValue->getSign();
  215.     //
  216.     // different sign
  217.     //
  218.     if (lSign != rSign)
  219.         return(lSign > rSign ? 1 : -1);
  220.     //
  221.     // same sign
  222.     //
  223.     if (lSign == 0)    // optimization
  224.         return 0;
  225.     int lStrLen = XMLString::stringLen(lValue->fMagnitude);
  226.     int rStrLen = XMLString::stringLen(rValue->fMagnitude);
  227.     //
  228.     // different length
  229.     //
  230.     if (lStrLen > rStrLen)
  231.         return ( lSign > 0 ? 1 : -1 );
  232.     else if (lStrLen < rStrLen)
  233.         return ( lSign > 0 ? -1 : 1 );
  234.     //
  235.     // same length
  236.     // XMLString::compareString() return > 0, 0 and <0
  237.     // we need to convert it to 1, 0, and -1
  238.     //
  239.     int retVal = XMLString::compareString(lValue->fMagnitude, rValue->fMagnitude);
  240.     if ( retVal > 0 )
  241.     {
  242.         return ( lSign > 0 ? 1 : -1 );
  243.     }
  244.     else if ( retVal < 0 )
  245.     {
  246.         return ( lSign > 0 ? -1 : 1 );
  247.     }
  248.     else
  249.         return 0;
  250. }
  251. /**
  252.  * Shift the fMagnitude to the left
  253.  */
  254. void XMLBigInteger::multiply(const unsigned int byteToShift)
  255. {
  256.     if (byteToShift <= 0)
  257.         return;
  258.     int strLen = XMLString::stringLen(fMagnitude);
  259.     XMLCh* tmp = new XMLCh[strLen+byteToShift+1];
  260.     XMLString::moveChars(tmp, fMagnitude, strLen);
  261.     unsigned int i = 0;
  262.     for ( ; i < byteToShift; i++)
  263.         tmp[strLen+i] = chDigit_0;
  264.     tmp[strLen+i] = chNull;
  265.     delete[] fMagnitude;
  266.     fMagnitude = tmp;
  267. }
  268. /**
  269.  * Shift the fMagnitude to the right
  270.  * by doing this, we lose precision.
  271.  */
  272. void XMLBigInteger::divide(const unsigned int byteToShift)
  273. {
  274.     if (byteToShift <= 0)
  275.         return;
  276.     int strLen = XMLString::stringLen(fMagnitude);
  277.     XMLCh* tmp = new XMLCh[strLen-byteToShift+1];
  278.     XMLString::moveChars(tmp, fMagnitude, strLen-byteToShift);
  279.     tmp[strLen-byteToShift] = chNull;
  280.     delete[] fMagnitude;
  281.     fMagnitude = tmp;
  282. }
  283. //
  284. // The caller needs to de-allocate the memory allocated by this function
  285. // return buffer ALWAYS has a leading sign
  286. //
  287. XMLCh*  XMLBigInteger::toString() const
  288. {
  289.     if ( fSign == 0 )
  290.     {
  291.         XMLCh* retBuf = new XMLCh[3];
  292.         retBuf[0] = chPlus;
  293.         retBuf[1] = chDigit_0;
  294.         retBuf[2] = chNull;
  295.         return retBuf;
  296.     }
  297.     // Add the leading sign here
  298.     int strLen = XMLString::stringLen(fMagnitude);
  299.     XMLCh* retBuf = new XMLCh[strLen+2];
  300.     retBuf[0] = (fSign == 1) ? chPlus : chDash;
  301.     XMLString::moveChars(&(retBuf[1]), &(fMagnitude[0]), strLen);
  302.     retBuf[strLen+1] = chNull;
  303.     return retBuf;
  304. }
  305. //
  306. //
  307. //
  308. int XMLBigInteger::intValue() const
  309. {
  310.     unsigned int retVal;
  311.     XMLString::textToBin(fMagnitude, retVal);
  312.     return retVal * getSign();
  313. }