annotate ffmpeg/libavutil/intfloat_readwrite.c @ 13:844d341cf643 tip

Back up before ISMIR
author Yading Song <yading.song@eecs.qmul.ac.uk>
date Thu, 31 Oct 2013 13:17:06 +0000
parents f445c3017523
children
rev   line source
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 }