Mercurial > libavutil.hg
comparison intfloat_readwrite.c @ 24:2b3573111ff0 libavutil
AIFF format support by (Patrick Guimond <patg a.t patg d.o.t homeunix d.o.t org)
author | michael |
---|---|
date | Thu, 02 Feb 2006 15:21:19 +0000 |
parents | f70fdc881a24 |
children | 4d0fe18e5ce3 |
comparison
equal
deleted
inserted
replaced
23:f70fdc881a24 | 24:2b3573111ff0 |
---|---|
36 if(v+v > 0xFF000000U) | 36 if(v+v > 0xFF000000U) |
37 return 0.0/0.0; | 37 return 0.0/0.0; |
38 return ldexp(((v&0x7FFFFF) + (1<<23)) * (v>>31|1), (v>>23&0xFF)-150); | 38 return ldexp(((v&0x7FFFFF) + (1<<23)) * (v>>31|1), (v>>23&0xFF)-150); |
39 } | 39 } |
40 | 40 |
41 double av_ext2dbl(const AVExtFloat ext){ | |
42 uint64_t m = 0; | |
43 int e, i; | |
44 | |
45 for (i = 0; i < 8; i++) | |
46 m |= (uint64_t)ext.mantissa[i]<<(56-(i<<3)); | |
47 e = (((int)ext.exponent[0]&0x7f)<<8) | ext.exponent[1]; | |
48 if (e == 0x7fff && m) | |
49 return 0.0/0.0; | |
50 e -= 16383 + 63; /* In IEEE 80 bits, the whole (i.e. 1.xxxx) | |
51 * mantissa bit is written as opposed to the | |
52 * single and double precision formats */ | |
53 if (ext.exponent[0]&0x80) | |
54 return ldexp(-m, e); | |
55 return ldexp(m, e); | |
56 } | |
57 | |
41 int64_t av_dbl2int(double d){ | 58 int64_t av_dbl2int(double d){ |
42 int e; | 59 int e; |
43 if ( !d) return 0; | 60 if ( !d) return 0; |
44 else if(d-d) return 0x7FF0000000000000LL + ((int64_t)(d<0)<<63) + (d!=d); | 61 else if(d-d) return 0x7FF0000000000000LL + ((int64_t)(d<0)<<63) + (d!=d); |
45 d= frexp(d, &e); | 62 d= frexp(d, &e); |
51 if ( !d) return 0; | 68 if ( !d) return 0; |
52 else if(d-d) return 0x7F800000 + ((d<0)<<31) + (d!=d); | 69 else if(d-d) return 0x7F800000 + ((d<0)<<31) + (d!=d); |
53 d= frexp(d, &e); | 70 d= frexp(d, &e); |
54 return (d<0)<<31 | (e+126)<<23 | (int64_t)((fabs(d)-0.5)*(1<<24)); | 71 return (d<0)<<31 | (e+126)<<23 | (int64_t)((fabs(d)-0.5)*(1<<24)); |
55 } | 72 } |
73 | |
74 AVExtFloat av_dbl2ext(double d){ | |
75 struct AVExtFloat ext; | |
76 int e, i; double f; uint64_t m; | |
77 | |
78 f = fabs(frexp(d, &e)); | |
79 if (f >= 0.5 && f < 1) { | |
80 e += 16382; | |
81 ext.exponent[0] = e>>8; | |
82 ext.exponent[1] = e; | |
83 m = (uint64_t)ldexp(f, 64); | |
84 for (i=0; i < 8; i++) | |
85 ext.mantissa[i] = m>>(56-(i<<3)); | |
86 } else if (f == 0.0) { | |
87 memset (&ext, 0, 10); | |
88 } else { | |
89 ext.exponent[0] = 0x7f; ext.exponent[1] = 0xff; | |
90 memset (&ext.mantissa, 0, 8); | |
91 if (f != 1/0.0) | |
92 ext.mantissa[0] = ~0; | |
93 } | |
94 if (d < 0) | |
95 ext.exponent[0] |= 0x80; | |
96 return ext; | |
97 } | |
98 |