git.sesse.net Git - ffmpeg/blob - libavutil/softfloat.h

   1 /*
   2  * Copyright (c) 2006 Michael Niedermayer <michaelni@gmx.at>
   3  *
   4  * This file is part of FFmpeg.
   5  *
   6  * FFmpeg is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * FFmpeg is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with FFmpeg; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  19  */
  20
  21 #ifndef AVUTIL_SOFTFLOAT_H
  22 #define AVUTIL_SOFTFLOAT_H
  23
  24 #include <stdint.h>
  25 #include "common.h"
  26
  27 #include "avassert.h"
  28 #include "softfloat_tables.h"
  29
  30 #define MIN_EXP -149
  31 #define MAX_EXP  126
  32 #define ONE_BITS 29
  33
  34 typedef struct SoftFloat{
  35     int32_t mant;
  36     int32_t  exp;
  37 }SoftFloat;
  38
  39 static const SoftFloat FLOAT_0          = {          0,   MIN_EXP};             ///< 0.0
  40 static const SoftFloat FLOAT_05         = { 0x20000000,   0};                   ///< 0.5
  41 static const SoftFloat FLOAT_1          = { 0x20000000,   1};                   ///< 1.0
  42 static const SoftFloat FLOAT_EPSILON    = { 0x29F16B12, -16};                   ///< A small value
  43 static const SoftFloat FLOAT_1584893192 = { 0x32B771ED,   1};                   ///< 1.584893192 (10^.2)
  44 static const SoftFloat FLOAT_100000     = { 0x30D40000,  17};                   ///< 100000
  45 static const SoftFloat FLOAT_0999999    = { 0x3FFFFBCE,   0};                   ///< 0.999999
  46
  47
  48 /**
  49  * Convert a SoftFloat to a double precision float.
  50  */
  51 static inline av_const double av_sf2double(SoftFloat v) {
  52     v.exp -= ONE_BITS +1;
  53     return ldexp(v.mant, v.exp);
  54 }
  55
  56 static av_const SoftFloat av_normalize_sf(SoftFloat a){
  57     if(a.mant){
  58 #if 1
  59         while((a.mant + 0x1FFFFFFFU)<0x3FFFFFFFU){
  60             a.mant += a.mant;
  61             a.exp  -= 1;
  62         }
  63 #else
  64         int s=ONE_BITS - av_log2(FFABS(a.mant));
  65         a.exp   -= s;
  66         a.mant <<= s;
  67 #endif
  68         if(a.exp < MIN_EXP){
  69             a.exp = MIN_EXP;
  70             a.mant= 0;
  71         }
  72     }else{
  73         a.exp= MIN_EXP;
  74     }
  75     return a;
  76 }
  77
  78 static inline av_const SoftFloat av_normalize1_sf(SoftFloat a){
  79 #if 1
  80     if((int32_t)(a.mant + 0x40000000U) <= 0){
  81         a.exp++;
  82         a.mant>>=1;
  83     }
  84     av_assert2(a.mant < 0x40000000 && a.mant > -0x40000000);
  85     av_assert2(a.exp <= MAX_EXP);
  86     return a;
  87 #elif 1
  88     int t= a.mant + 0x40000000 < 0;
  89     return (SoftFloat){ a.mant>>t, a.exp+t};
  90 #else
  91     int t= (a.mant + 0x3FFFFFFFU)>>31;
  92     return (SoftFloat){a.mant>>t, a.exp+t};
  93 #endif
  94 }
  95
  96 /**
  97  * @return Will not be more denormalized than a*b. So if either input is
  98  *         normalized, then the output will not be worse then the other input.
  99  *         If both are normalized, then the output will be normalized.
 100  */
 101 static inline av_const SoftFloat av_mul_sf(SoftFloat a, SoftFloat b){
 102     a.exp += b.exp;
 103     av_assert2((int32_t)((a.mant * (int64_t)b.mant) >> ONE_BITS) == (a.mant * (int64_t)b.mant) >> ONE_BITS);
 104     a.mant = (a.mant * (int64_t)b.mant) >> ONE_BITS;
 105     a = av_normalize1_sf((SoftFloat){a.mant, a.exp - 1});
 106     if (!a.mant || a.exp < MIN_EXP)
 107         return FLOAT_0;
 108     return a;
 109 }
 110
 111 /**
 112  * b has to be normalized and not zero.
 113  * @return Will not be more denormalized than a.
 114  */
 115 static inline av_const SoftFloat av_div_sf(SoftFloat a, SoftFloat b){
 116     a.exp -= b.exp;
 117     a.mant = ((int64_t)a.mant<<(ONE_BITS+1)) / b.mant;
 118     a = av_normalize1_sf(a);
 119     if (!a.mant || a.exp < MIN_EXP)
 120         return FLOAT_0;
 121     return a;
 122 }
 123
 124 /**
 125  * Compares two SoftFloats.
 126  * @returns < 0 if the first is less
 127  *          > 0 if the first is greater
 128  *            0 if they are equal
 129  */
 130 static inline av_const int av_cmp_sf(SoftFloat a, SoftFloat b){
 131     int t= a.exp - b.exp;
 132     if      (t <-31) return                  -  b.mant      ;
 133     else if (t <  0) return (a.mant >> (-t)) -  b.mant      ;
 134     else if (t < 32) return  a.mant          - (b.mant >> t);
 135     else             return  a.mant                         ;
 136 }
 137
 138 /**
 139  * Compares two SoftFloats.
 140  * @returns 1 if a is greater than b, 0 otherwise
 141  */
 142 static inline av_const int av_gt_sf(SoftFloat a, SoftFloat b)
 143 {
 144     int t= a.exp - b.exp;
 145     if      (t <-31) return 0                >  b.mant      ;
 146     else if (t <  0) return (a.mant >> (-t)) >  b.mant      ;
 147     else if (t < 32) return  a.mant          > (b.mant >> t);
 148     else             return  a.mant          >  0           ;
 149 }
 150
 151 /**
 152  * @returns the sum of 2 SoftFloats.
 153  */
 154 static inline av_const SoftFloat av_add_sf(SoftFloat a, SoftFloat b){
 155     int t= a.exp - b.exp;
 156     if      (t <-31) return b;
 157     else if (t <  0) return av_normalize_sf(av_normalize1_sf((SoftFloat){ b.mant + (a.mant >> (-t)), b.exp}));
 158     else if (t < 32) return av_normalize_sf(av_normalize1_sf((SoftFloat){ a.mant + (b.mant >>   t ), a.exp}));
 159     else             return a;
 160 }
 161
 162 /**
 163  * @returns the difference of 2 SoftFloats.
 164  */
 165 static inline av_const SoftFloat av_sub_sf(SoftFloat a, SoftFloat b){
 166     return av_add_sf(a, (SoftFloat){ -b.mant, b.exp});
 167 }
 168
 169 //FIXME log, exp, pow
 170
 171 /**
 172  * Converts a mantisse and exponent to a SoftFloat
 173  * @returns a SoftFloat with value v * 2^frac_bits
 174  */
 175 static inline av_const SoftFloat av_int2sf(int v, int frac_bits){
 176     int exp_offset = 0;
 177     if(v <= INT_MIN + 1){
 178         exp_offset = 1;
 179         v>>=1;
 180     }
 181     return av_normalize_sf(av_normalize1_sf((SoftFloat){v, ONE_BITS + 1 - frac_bits + exp_offset}));
 182 }
 183
 184 /**
 185  * Converts a SoftFloat to an integer.
 186  * Rounding is to -inf.
 187  */
 188 static inline av_const int av_sf2int(SoftFloat v, int frac_bits){
 189     v.exp += frac_bits - (ONE_BITS + 1);
 190     if(v.exp >= 0) return v.mant <<  v.exp ;
 191     else           return v.mant >>(-v.exp);
 192 }
 193
 194 /**
 195  * Rounding-to-nearest used.
 196  */
 197 static av_always_inline SoftFloat av_sqrt_sf(SoftFloat val)
 198 {
 199     int tabIndex, rem;
 200
 201     if (val.mant == 0)
 202         val.exp = MIN_EXP;
 203     else if (val.mant < 0)
 204         abort();
 205     else
 206     {
 207         tabIndex = (val.mant - 0x20000000) >> 20;
 208
 209         rem = val.mant & 0xFFFFF;
 210         val.mant  = (int)(((int64_t)av_sqrttbl_sf[tabIndex] * (0x100000 - rem) +
 211                            (int64_t)av_sqrttbl_sf[tabIndex + 1] * rem +
 212                            0x80000) >> 20);
 213         val.mant = (int)(((int64_t)av_sqr_exp_multbl_sf[val.exp & 1] * val.mant +
 214                           0x10000000) >> 29);
 215
 216         if (val.mant < 0x40000000)
 217             val.exp -= 2;
 218         else
 219             val.mant >>= 1;
 220
 221         val.exp = (val.exp >> 1) + 1;
 222     }
 223
 224     return val;
 225 }
 226
 227 /**
 228  * Rounding-to-nearest used.
 229  */
 230 static av_unused void av_sincos_sf(int a, int *s, int *c)
 231 {
 232     int idx, sign;
 233     int sv, cv;
 234     int st, ct;
 235
 236     idx = a >> 26;
 237     sign = (idx << 27) >> 31;
 238     cv = av_costbl_1_sf[idx & 0xf];
 239     cv = (cv ^ sign) - sign;
 240
 241     idx -= 8;
 242     sign = (idx << 27) >> 31;
 243     sv = av_costbl_1_sf[idx & 0xf];
 244     sv = (sv ^ sign) - sign;
 245
 246     idx = a >> 21;
 247     ct = av_costbl_2_sf[idx & 0x1f];
 248     st = av_sintbl_2_sf[idx & 0x1f];
 249
 250     idx = (int)(((int64_t)cv * ct - (int64_t)sv * st + 0x20000000) >> 30);
 251
 252     sv = (int)(((int64_t)cv * st + (int64_t)sv * ct + 0x20000000) >> 30);
 253
 254     cv = idx;
 255
 256     idx = a >> 16;
 257     ct = av_costbl_3_sf[idx & 0x1f];
 258     st = av_sintbl_3_sf[idx & 0x1f];
 259
 260     idx = (int)(((int64_t)cv * ct - (int64_t)sv * st + 0x20000000) >> 30);
 261
 262     sv = (int)(((int64_t)cv * st + (int64_t)sv * ct + 0x20000000) >> 30);
 263     cv = idx;
 264
 265     idx = a >> 11;
 266
 267     ct = (int)(((int64_t)av_costbl_4_sf[idx & 0x1f] * (0x800 - (a & 0x7ff)) +
 268                 (int64_t)av_costbl_4_sf[(idx & 0x1f)+1]*(a & 0x7ff) +
 269                 0x400) >> 11);
 270     st = (int)(((int64_t)av_sintbl_4_sf[idx & 0x1f] * (0x800 - (a & 0x7ff)) +
 271                 (int64_t)av_sintbl_4_sf[(idx & 0x1f) + 1] * (a & 0x7ff) +
 272                 0x400) >> 11);
 273
 274     *c = (int)(((int64_t)cv * ct + (int64_t)sv * st + 0x20000000) >> 30);
 275
 276     *s = (int)(((int64_t)cv * st + (int64_t)sv * ct + 0x20000000) >> 30);
 277 }
 278
 279 #endif /* AVUTIL_SOFTFLOAT_H */