yading@11
|
1 /*
|
yading@11
|
2 * portable IEEE float/double read/write functions
|
yading@11
|
3 *
|
yading@11
|
4 * Copyright (c) 2005 Michael Niedermayer <michaelni@gmx.at>
|
yading@11
|
5 *
|
yading@11
|
6 * This file is part of FFmpeg.
|
yading@11
|
7 *
|
yading@11
|
8 * FFmpeg is free software; you can redistribute it and/or
|
yading@11
|
9 * modify it under the terms of the GNU Lesser General Public
|
yading@11
|
10 * License as published by the Free Software Foundation; either
|
yading@11
|
11 * version 2.1 of the License, or (at your option) any later version.
|
yading@11
|
12 *
|
yading@11
|
13 * FFmpeg is distributed in the hope that it will be useful,
|
yading@11
|
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
|
yading@11
|
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
yading@11
|
16 * Lesser General Public License for more details.
|
yading@11
|
17 *
|
yading@11
|
18 * You should have received a copy of the GNU Lesser General Public
|
yading@11
|
19 * License along with FFmpeg; if not, write to the Free Software
|
yading@11
|
20 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
yading@11
|
21 */
|
yading@11
|
22
|
yading@11
|
23 /**
|
yading@11
|
24 * @file
|
yading@11
|
25 * portable IEEE float/double read/write functions
|
yading@11
|
26 */
|
yading@11
|
27
|
yading@11
|
28 #include <stdint.h>
|
yading@11
|
29 #include "common.h"
|
yading@11
|
30 #include "mathematics.h"
|
yading@11
|
31 #include "intfloat_readwrite.h"
|
yading@11
|
32
|
yading@11
|
33 double av_int2dbl(int64_t v){
|
yading@11
|
34 if((uint64_t)v+v > 0xFFEULL<<52)
|
yading@11
|
35 return NAN;
|
yading@11
|
36 return ldexp(((v&((1LL<<52)-1)) + (1LL<<52)) * (v>>63|1), (v>>52&0x7FF)-1075);
|
yading@11
|
37 }
|
yading@11
|
38
|
yading@11
|
39 float av_int2flt(int32_t v){
|
yading@11
|
40 if((uint32_t)v+v > 0xFF000000U)
|
yading@11
|
41 return NAN;
|
yading@11
|
42 return ldexp(((v&0x7FFFFF) + (1<<23)) * (v>>31|1), (v>>23&0xFF)-150);
|
yading@11
|
43 }
|
yading@11
|
44
|
yading@11
|
45 double av_ext2dbl(const AVExtFloat ext){
|
yading@11
|
46 uint64_t m = 0;
|
yading@11
|
47 int e, i;
|
yading@11
|
48
|
yading@11
|
49 for (i = 0; i < 8; i++)
|
yading@11
|
50 m = (m<<8) + ext.mantissa[i];
|
yading@11
|
51 e = (((int)ext.exponent[0]&0x7f)<<8) | ext.exponent[1];
|
yading@11
|
52 if (e == 0x7fff && m)
|
yading@11
|
53 return NAN;
|
yading@11
|
54 e -= 16383 + 63; /* In IEEE 80 bits, the whole (i.e. 1.xxxx)
|
yading@11
|
55 * mantissa bit is written as opposed to the
|
yading@11
|
56 * single and double precision formats. */
|
yading@11
|
57 if (ext.exponent[0]&0x80)
|
yading@11
|
58 m= -m;
|
yading@11
|
59 return ldexp(m, e);
|
yading@11
|
60 }
|
yading@11
|
61
|
yading@11
|
62 int64_t av_dbl2int(double d){
|
yading@11
|
63 int e;
|
yading@11
|
64 if ( !d) return 0;
|
yading@11
|
65 else if(d-d) return 0x7FF0000000000000LL + ((int64_t)(d<0)<<63) + (d!=d);
|
yading@11
|
66 d= frexp(d, &e);
|
yading@11
|
67 return (int64_t)(d<0)<<63 | (e+1022LL)<<52 | (int64_t)((fabs(d)-0.5)*(1LL<<53));
|
yading@11
|
68 }
|
yading@11
|
69
|
yading@11
|
70 int32_t av_flt2int(float d){
|
yading@11
|
71 int e;
|
yading@11
|
72 if ( !d) return 0;
|
yading@11
|
73 else if(d-d) return 0x7F800000 + ((d<0)<<31) + (d!=d);
|
yading@11
|
74 d= frexp(d, &e);
|
yading@11
|
75 return (d<0)<<31 | (e+126)<<23 | (int64_t)((fabs(d)-0.5)*(1<<24));
|
yading@11
|
76 }
|
yading@11
|
77
|
yading@11
|
78 AVExtFloat av_dbl2ext(double d){
|
yading@11
|
79 struct AVExtFloat ext= {{0}};
|
yading@11
|
80 int e, i; double f; uint64_t m;
|
yading@11
|
81
|
yading@11
|
82 f = fabs(frexp(d, &e));
|
yading@11
|
83 if (f >= 0.5 && f < 1) {
|
yading@11
|
84 e += 16382;
|
yading@11
|
85 ext.exponent[0] = e>>8;
|
yading@11
|
86 ext.exponent[1] = e;
|
yading@11
|
87 m = (uint64_t)ldexp(f, 64);
|
yading@11
|
88 for (i=0; i < 8; i++)
|
yading@11
|
89 ext.mantissa[i] = m>>(56-(i<<3));
|
yading@11
|
90 } else if (f != 0.0) {
|
yading@11
|
91 ext.exponent[0] = 0x7f; ext.exponent[1] = 0xff;
|
yading@11
|
92 if (!isinf(f))
|
yading@11
|
93 ext.mantissa[0] = ~0;
|
yading@11
|
94 }
|
yading@11
|
95 if (d < 0)
|
yading@11
|
96 ext.exponent[0] |= 0x80;
|
yading@11
|
97 return ext;
|
yading@11
|
98 }
|