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