| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289 | 
							- /*
 
-  * Copyright (c) 2006 Michael Niedermayer <michaelni@gmx.at>
 
-  *
 
-  * This file is part of FFmpeg.
 
-  *
 
-  * FFmpeg is free software; you can redistribute it and/or
 
-  * modify it under the terms of the GNU Lesser General Public
 
-  * License as published by the Free Software Foundation; either
 
-  * version 2.1 of the License, or (at your option) any later version.
 
-  *
 
-  * FFmpeg is distributed in the hope that it will be useful,
 
-  * but WITHOUT ANY WARRANTY; without even the implied warranty of
 
-  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 
-  * Lesser General Public License for more details.
 
-  *
 
-  * You should have received a copy of the GNU Lesser General Public
 
-  * License along with FFmpeg; if not, write to the Free Software
 
-  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 
-  */
 
- #ifndef AVUTIL_SOFTFLOAT_H
 
- #define AVUTIL_SOFTFLOAT_H
 
- #include <stdint.h>
 
- #include "common.h"
 
- #include "avassert.h"
 
- #include "softfloat_tables.h"
 
- #define MIN_EXP -149
 
- #define MAX_EXP  126
 
- #define ONE_BITS 29
 
- typedef struct SoftFloat{
 
-     int32_t mant;
 
-     int32_t  exp;
 
- }SoftFloat;
 
- static const SoftFloat FLOAT_0          = {          0,   MIN_EXP};             ///< 0.0
 
- static const SoftFloat FLOAT_05         = { 0x20000000,   0};                   ///< 0.5
 
- static const SoftFloat FLOAT_1          = { 0x20000000,   1};                   ///< 1.0
 
- static const SoftFloat FLOAT_EPSILON    = { 0x29F16B12, -16};                   ///< A small value
 
- static const SoftFloat FLOAT_1584893192 = { 0x32B771ED,   1};                   ///< 1.584893192 (10^.2)
 
- static const SoftFloat FLOAT_100000     = { 0x30D40000,  17};                   ///< 100000
 
- static const SoftFloat FLOAT_0999999    = { 0x3FFFFBCE,   0};                   ///< 0.999999
 
- static const SoftFloat FLOAT_MIN        = { 0x20000000,   MIN_EXP};
 
- /**
 
-  * Convert a SoftFloat to a double precision float.
 
-  */
 
- static inline av_const double av_sf2double(SoftFloat v) {
 
-     v.exp -= ONE_BITS +1;
 
-     return ldexp(v.mant, v.exp);
 
- }
 
- static av_const SoftFloat av_normalize_sf(SoftFloat a){
 
-     if(a.mant){
 
- #if 1
 
-         while((a.mant + 0x1FFFFFFFU)<0x3FFFFFFFU){
 
-             a.mant += a.mant;
 
-             a.exp  -= 1;
 
-         }
 
- #else
 
-         int s=ONE_BITS - av_log2(FFABS(a.mant));
 
-         a.exp   -= s;
 
-         a.mant <<= s;
 
- #endif
 
-         if(a.exp < MIN_EXP){
 
-             a.exp = MIN_EXP;
 
-             a.mant= 0;
 
-         }
 
-     }else{
 
-         a.exp= MIN_EXP;
 
-     }
 
-     return a;
 
- }
 
- static inline av_const SoftFloat av_normalize1_sf(SoftFloat a){
 
- #if 1
 
-     if((int32_t)(a.mant + 0x40000000U) <= 0){
 
-         a.exp++;
 
-         a.mant>>=1;
 
-     }
 
-     av_assert2(a.mant < 0x40000000 && a.mant > -0x40000000);
 
-     av_assert2(a.exp <= MAX_EXP);
 
-     return a;
 
- #elif 1
 
-     int t= a.mant + 0x40000000 < 0;
 
-     return (SoftFloat){ a.mant>>t, a.exp+t};
 
- #else
 
-     int t= (a.mant + 0x3FFFFFFFU)>>31;
 
-     return (SoftFloat){a.mant>>t, a.exp+t};
 
- #endif
 
- }
 
- /**
 
-  * @return Will not be more denormalized than a*b. So if either input is
 
-  *         normalized, then the output will not be worse then the other input.
 
-  *         If both are normalized, then the output will be normalized.
 
-  */
 
- static inline av_const SoftFloat av_mul_sf(SoftFloat a, SoftFloat b){
 
-     a.exp += b.exp;
 
-     av_assert2((int32_t)((a.mant * (int64_t)b.mant) >> ONE_BITS) == (a.mant * (int64_t)b.mant) >> ONE_BITS);
 
-     a.mant = (a.mant * (int64_t)b.mant) >> ONE_BITS;
 
-     a = av_normalize1_sf((SoftFloat){a.mant, a.exp - 1});
 
-     if (!a.mant || a.exp < MIN_EXP)
 
-         return FLOAT_0;
 
-     return a;
 
- }
 
- /**
 
-  * b has to be normalized and not zero.
 
-  * @return Will not be more denormalized than a.
 
-  */
 
- static inline av_const SoftFloat av_div_sf(SoftFloat a, SoftFloat b){
 
-     int64_t temp = (int64_t)a.mant * (1<<(ONE_BITS+1));
 
-     temp /= b.mant;
 
-     a.exp -= b.exp;
 
-     a.mant = temp;
 
-     while (a.mant != temp) {
 
-         temp /= 2;
 
-         a.exp--;
 
-         a.mant = temp;
 
-     }
 
-     a = av_normalize1_sf(a);
 
-     if (!a.mant || a.exp < MIN_EXP)
 
-         return FLOAT_0;
 
-     return a;
 
- }
 
- /**
 
-  * Compares two SoftFloats.
 
-  * @returns < 0 if the first is less
 
-  *          > 0 if the first is greater
 
-  *            0 if they are equal
 
-  */
 
- static inline av_const int av_cmp_sf(SoftFloat a, SoftFloat b){
 
-     int t= a.exp - b.exp;
 
-     if      (t <-31) return                  -  b.mant      ;
 
-     else if (t <  0) return (a.mant >> (-t)) -  b.mant      ;
 
-     else if (t < 32) return  a.mant          - (b.mant >> t);
 
-     else             return  a.mant                         ;
 
- }
 
- /**
 
-  * Compares two SoftFloats.
 
-  * @returns 1 if a is greater than b, 0 otherwise
 
-  */
 
- static inline av_const int av_gt_sf(SoftFloat a, SoftFloat b)
 
- {
 
-     int t= a.exp - b.exp;
 
-     if      (t <-31) return 0                >  b.mant      ;
 
-     else if (t <  0) return (a.mant >> (-t)) >  b.mant      ;
 
-     else if (t < 32) return  a.mant          > (b.mant >> t);
 
-     else             return  a.mant          >  0           ;
 
- }
 
- /**
 
-  * @returns the sum of 2 SoftFloats.
 
-  */
 
- static inline av_const SoftFloat av_add_sf(SoftFloat a, SoftFloat b){
 
-     int t= a.exp - b.exp;
 
-     if      (t <-31) return b;
 
-     else if (t <  0) return av_normalize_sf(av_normalize1_sf((SoftFloat){ b.mant + (a.mant >> (-t)), b.exp}));
 
-     else if (t < 32) return av_normalize_sf(av_normalize1_sf((SoftFloat){ a.mant + (b.mant >>   t ), a.exp}));
 
-     else             return a;
 
- }
 
- /**
 
-  * @returns the difference of 2 SoftFloats.
 
-  */
 
- static inline av_const SoftFloat av_sub_sf(SoftFloat a, SoftFloat b){
 
-     return av_add_sf(a, (SoftFloat){ -b.mant, b.exp});
 
- }
 
- //FIXME log, exp, pow
 
- /**
 
-  * Converts a mantisse and exponent to a SoftFloat.
 
-  * This converts a fixed point value v with frac_bits fractional bits to a
 
-  * SoftFloat.
 
-  * @returns a SoftFloat with value v * 2^-frac_bits
 
-  */
 
- static inline av_const SoftFloat av_int2sf(int v, int frac_bits){
 
-     int exp_offset = 0;
 
-     if(v <= INT_MIN + 1){
 
-         exp_offset = 1;
 
-         v>>=1;
 
-     }
 
-     return av_normalize_sf(av_normalize1_sf((SoftFloat){v, ONE_BITS + 1 - frac_bits + exp_offset}));
 
- }
 
- /**
 
-  * Converts a SoftFloat to an integer.
 
-  * Rounding is to -inf.
 
-  */
 
- static inline av_const int av_sf2int(SoftFloat v, int frac_bits){
 
-     v.exp += frac_bits - (ONE_BITS + 1);
 
-     if(v.exp >= 0) return v.mant <<  v.exp ;
 
-     else           return v.mant >>(-v.exp);
 
- }
 
- /**
 
-  * Rounding-to-nearest used.
 
-  */
 
- static av_always_inline SoftFloat av_sqrt_sf(SoftFloat val)
 
- {
 
-     int tabIndex, rem;
 
-     if (val.mant == 0)
 
-         val.exp = MIN_EXP;
 
-     else if (val.mant < 0)
 
-         abort();
 
-     else
 
-     {
 
-         tabIndex = (val.mant - 0x20000000) >> 20;
 
-         rem = val.mant & 0xFFFFF;
 
-         val.mant  = (int)(((int64_t)av_sqrttbl_sf[tabIndex] * (0x100000 - rem) +
 
-                            (int64_t)av_sqrttbl_sf[tabIndex + 1] * rem +
 
-                            0x80000) >> 20);
 
-         val.mant = (int)(((int64_t)av_sqr_exp_multbl_sf[val.exp & 1] * val.mant +
 
-                           0x10000000) >> 29);
 
-         if (val.mant < 0x40000000)
 
-             val.exp -= 2;
 
-         else
 
-             val.mant >>= 1;
 
-         val.exp = (val.exp >> 1) + 1;
 
-     }
 
-     return val;
 
- }
 
- /**
 
-  * Rounding-to-nearest used.
 
-  */
 
- static av_unused void av_sincos_sf(int a, int *s, int *c)
 
- {
 
-     int idx, sign;
 
-     int sv, cv;
 
-     int st, ct;
 
-     idx = a >> 26;
 
-     sign = (int32_t)((unsigned)idx << 27) >> 31;
 
-     cv = av_costbl_1_sf[idx & 0xf];
 
-     cv = (cv ^ sign) - sign;
 
-     idx -= 8;
 
-     sign = (int32_t)((unsigned)idx << 27) >> 31;
 
-     sv = av_costbl_1_sf[idx & 0xf];
 
-     sv = (sv ^ sign) - sign;
 
-     idx = a >> 21;
 
-     ct = av_costbl_2_sf[idx & 0x1f];
 
-     st = av_sintbl_2_sf[idx & 0x1f];
 
-     idx = (int)(((int64_t)cv * ct - (int64_t)sv * st + 0x20000000) >> 30);
 
-     sv = (int)(((int64_t)cv * st + (int64_t)sv * ct + 0x20000000) >> 30);
 
-     cv = idx;
 
-     idx = a >> 16;
 
-     ct = av_costbl_3_sf[idx & 0x1f];
 
-     st = av_sintbl_3_sf[idx & 0x1f];
 
-     idx = (int)(((int64_t)cv * ct - (int64_t)sv * st + 0x20000000) >> 30);
 
-     sv = (int)(((int64_t)cv * st + (int64_t)sv * ct + 0x20000000) >> 30);
 
-     cv = idx;
 
-     idx = a >> 11;
 
-     ct = (int)(((int64_t)av_costbl_4_sf[idx & 0x1f] * (0x800 - (a & 0x7ff)) +
 
-                 (int64_t)av_costbl_4_sf[(idx & 0x1f)+1]*(a & 0x7ff) +
 
-                 0x400) >> 11);
 
-     st = (int)(((int64_t)av_sintbl_4_sf[idx & 0x1f] * (0x800 - (a & 0x7ff)) +
 
-                 (int64_t)av_sintbl_4_sf[(idx & 0x1f) + 1] * (a & 0x7ff) +
 
-                 0x400) >> 11);
 
-     *c = (int)(((int64_t)cv * ct + (int64_t)sv * st + 0x20000000) >> 30);
 
-     *s = (int)(((int64_t)cv * st + (int64_t)sv * ct + 0x20000000) >> 30);
 
- }
 
- #endif /* AVUTIL_SOFTFLOAT_H */
 
 
  |