src/gdcmopenjpeg/libopenjpeg/fix.c

   1 /*
   2  * Copyright (c) 2001-2002, David Janssens
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS `AS IS'
  15  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
  18  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  19  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  20  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  21  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  22  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  23  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  24  * POSSIBILITY OF SUCH DAMAGE.
  25  */
  26
  27 #include "fix.h"
  28 #include <math.h>   /*Add Antonin : multbug1*/
  29
  30 #ifdef WIN32
  31 #define int64 __int64
  32 #else
  33 #define int64 long long
  34 #endif
  35
  36 /*
  37  * Multiply two fixed-precision rational numbers.
  38  */
  39
  40 /*int fix_mul(int a, int b)
  41 {
  42   return (int) ((int64) a * (int64) b >> 13);
  43 }*/
  44
  45
  46 /*Mod Antonin : multbug1*/
  47 /*
  48 int fix_mul(int a, int b)
  49 {
  50   double tmp= (double) ((int64) a * (int64) b);
  51   int64 v = (int64) ((fabs(tmp/8192.0)>=floor(fabs(tmp/8192.0))+0.5)?fabs(tmp/8192.0)+1.0:fabs(tmp/8192.0));
  52   v = (tmp<0)?-v:v;
  53   return (int) v;
  54 }
  55 */
  56 /*doM*/
  57
  58 int fix_mul(int a, int b)   /* Luke Lee optimized : 11/16/2004*/
  59 {
  60     int64 temp = (int64) a * (int64) b >> 12;
  61     return (int) ((temp >> 1) + (temp & 1)) ;
  62 }
  63