fix24.cpp

Go to the documentation of this file.
00001 // $Id: fix24.cpp 1282 2006-06-09 09:46:49Z alex $
00002 /* @@tag:xara-cn@@ DO NOT MODIFY THIS LINE
00003 ================================XARAHEADERSTART===========================
00004  
00005                Xara LX, a vector drawing and manipulation program.
00006                     Copyright (C) 1993-2006 Xara Group Ltd.
00007        Copyright on certain contributions may be held in joint with their
00008               respective authors. See AUTHORS file for details.
00009 
00010 LICENSE TO USE AND MODIFY SOFTWARE
00011 ----------------------------------
00012 
00013 This file is part of Xara LX.
00014 
00015 Xara LX is free software; you can redistribute it and/or modify it
00016 under the terms of the GNU General Public License version 2 as published
00017 by the Free Software Foundation.
00018 
00019 Xara LX and its component source files are distributed in the hope
00020 that it will be useful, but WITHOUT ANY WARRANTY; without even the
00021 implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
00022 See the GNU General Public License for more details.
00023 
00024 You should have received a copy of the GNU General Public License along
00025 with Xara LX (see the file GPL in the root directory of the
00026 distribution); if not, write to the Free Software Foundation, Inc., 51
00027 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
00028 
00029 
00030 ADDITIONAL RIGHTS
00031 -----------------
00032 
00033 Conditional upon your continuing compliance with the GNU General Public
00034 License described above, Xara Group Ltd grants to you certain additional
00035 rights. 
00036 
00037 The additional rights are to use, modify, and distribute the software
00038 together with the wxWidgets library, the wxXtra library, and the "CDraw"
00039 library and any other such library that any version of Xara LX relased
00040 by Xara Group Ltd requires in order to compile and execute, including
00041 the static linking of that library to XaraLX. In the case of the
00042 "CDraw" library, you may satisfy obligation under the GNU General Public
00043 License to provide source code by providing a binary copy of the library
00044 concerned and a copy of the license accompanying it.
00045 
00046 Nothing in this section restricts any of the rights you have under
00047 the GNU General Public License.
00048 
00049 
00050 SCOPE OF LICENSE
00051 ----------------
00052 
00053 This license applies to this program (XaraLX) and its constituent source
00054 files only, and does not necessarily apply to other Xara products which may
00055 in part share the same code base, and are subject to their own licensing
00056 terms.
00057 
00058 This license does not apply to files in the wxXtra directory, which
00059 are built into a separate library, and are subject to the wxWindows
00060 license contained within that directory in the file "WXXTRA-LICENSE".
00061 
00062 This license does not apply to the binary libraries (if any) within
00063 the "libs" directory, which are subject to a separate license contained
00064 within that directory in the file "LIBS-LICENSE".
00065 
00066 
00067 ARRANGEMENTS FOR CONTRIBUTION OF MODIFICATIONS
00068 ----------------------------------------------
00069 
00070 Subject to the terms of the GNU Public License (see above), you are
00071 free to do whatever you like with your modifications. However, you may
00072 (at your option) wish contribute them to Xara's source tree. You can
00073 find details of how to do this at:
00074   http://www.xaraxtreme.org/developers/
00075 
00076 Prior to contributing your modifications, you will need to complete our
00077 contributor agreement. This can be found at:
00078   http://www.xaraxtreme.org/developers/contribute/
00079 
00080 Please note that Xara will not accept modifications which modify any of
00081 the text between the start and end of this header (marked
00082 XARAHEADERSTART and XARAHEADEREND).
00083 
00084 
00085 MARKS
00086 -----
00087 
00088 Xara, Xara LX, Xara X, Xara X/Xtreme, Xara Xtreme, the Xtreme and Xara
00089 designs are registered or unregistered trademarks, design-marks, and/or
00090 service marks of Xara Group Ltd. All rights in these marks are reserved.
00091 
00092 
00093       Xara Group Ltd, Gaddesden Place, Hemel Hempstead, HP2 6EX, UK.
00094                         http://www.xara.com/
00095 
00096 =================================XARAHEADEREND============================
00097  */
00098 
00099 
00100 /*
00101 */ 
00102 
00103 // Stardate 070494.10:25. Captain's Log - supplementary
00104 // ====================================================
00105 //
00106 //      Pirated fixed16 code to base fixed24 upon
00107 //      This was from revision 1.24 of fixed16.cpp
00108 //                                                Jason
00109 
00110 
00111 
00112 #include "camtypes.h"
00113 //#include "fixed24.h" - in camtypes.h [AUTOMATICALLY REMOVED]
00114 //#include "fix24.h" - in camtypes.h [AUTOMATICALLY REMOVED]
00115 
00116 
00117 
00118 /********************************************************************************************
00119 
00120 >   FIXED24 Fixed24Mul(FIXED24 arg1, FIXED24 arg2)
00121 
00122     Author:     Gavin_Theobald (Xara Group Ltd) <camelotdev@xara.com>
00123     Created:    15/6/2005
00124     Inputs:     two fixed24s
00125     Outputs:    None
00126     Returns:    FIXED24 result (arg1 * arg2)
00127     Scope:      Only to be used in the FIXED24 class.
00128     Purpose:    signed multiplication
00129     Errors:     None (no overflow checks). Rounds
00130 
00131 ********************************************************************************************/
00132 
00133 fixed24 Fixed24Mul( fixed24 a, fixed24 b )
00134 {
00135     fixed24             result;
00136     result.all = INT32((Int32x32To64(a.all,b.all)+0x800000)>>24) ;
00137     return result;
00138 }
00139 
00140 /********************************************************************************************
00141 
00142 >   FIXED24 Fixed24Div(FIXED24 arg1, FIXED24 arg2)
00143 
00144     Author:     Gavin_Theobald (Xara Group Ltd) <camelotdev@xara.com>
00145     Created:    15/6/2005
00146     Inputs:     two fixed24s
00147     Outputs:    None
00148     Returns:    FIXED24 result (arg1 / arg2)
00149     Scope:      Only to be used in the FIXED24 class.
00150     Purpose:    signed division
00151     Errors:     None (no overflow checks). No rounding either (should it?)
00152             Overflow will cause a DIV0 exception, as will divide by zero
00153 
00154 Note that this is not very efficient as it forces a multiply that
00155 could instead be performed by a shift. The alternative is to use
00156 int64s but this would then compile as a 64bit/64bit division which
00157 is worse.
00158 
00159 Why isn't there a Int64div32to32 function?
00160 
00161 ********************************************************************************************/
00162 
00163 fixed24 Fixed24Div(fixed24 a,fixed24 b)
00164 {
00165     fixed24 result ;
00166     result.all = MulDiv(a.all,1<<24,b.all) ;
00167     return result ;
00168 }
00169 
00170 /********************************************************************************************
00171 
00172 >   double Fixed24ToDouble( FIXED24 arg )
00173 
00174     Author:     Gavin_Theobald (Xara Group Ltd) <camelotdev@xara.com>
00175     Created:    15/6/2005
00176     Inputs:     FIXED24 argument
00177     Outputs:    None
00178     Returns:    double-precision value
00179     Scope:      Only to be used in the FIXED24 class.
00180     Purpose:    General type conversion
00181     Errors:     None
00182 
00183 This code relies on the compiler efficiently replacing the division by a multiplication
00184 of the reciprical.
00185 
00186 ********************************************************************************************/
00187 
00188 double Fixed24ToDouble( fixed24 a )
00189 {
00190     return (double)a.all/(1<<24) ;
00191 }
00192 
00193 /********************************************************************************************
00194 
00195 >   fixed24 DoubleToFixed24( double arg )
00196 
00197     Author:     Gavin_Theobald (Xara Group Ltd) <camelotdev@xara.com>
00198     Created:    15/6/2005
00199     Inputs:     double-precision argument
00200     Outputs:    None
00201     Returns:    FIXED24 value
00202     Purpose:    General type conversion
00203     Errors:     None (overflow will cause exception)
00204 
00205 ********************************************************************************************/
00206 
00207 fixed24 DoubleToFixed24( double arg )
00208 {
00209     fixed24 result ;
00210 #if 0 //defined(_M_IX86)
00211     //
00212     // This avoids the slow fix operation. Add a large number so that
00213     // the double always has the same exponent and the mantissa becomes,
00214     // in affect, a fixed point value with the value we want in the
00215     // bottom 32 bits.
00216     //
00217     // Note that we are relying on the compiler to convert this to
00218     // efficient code.
00219     //
00220     // TODO: Test!
00221     //
00222     static const double fFix = (XLONG)3<<(DBL_MANT_DIG-24-2);
00223     double F = arg+fFix;
00224     result.all = (INT32&)F ;
00225 #else
00226     result.all = INT32(arg*(1<<24)) ;
00227 #endif
00228     return result ;
00229 }

Generated on Sat Nov 10 03:45:20 2007 for Camelot by  doxygen 1.4.4