cannam@154: /* Copyright (c) 2001-2011 Timothy B. Terriberry
cannam@154: */
cannam@154: /*
cannam@154:    Redistribution and use in source and binary forms, with or without
cannam@154:    modification, are permitted provided that the following conditions
cannam@154:    are met:
cannam@154: 
cannam@154:    - Redistributions of source code must retain the above copyright
cannam@154:    notice, this list of conditions and the following disclaimer.
cannam@154: 
cannam@154:    - Redistributions in binary form must reproduce the above copyright
cannam@154:    notice, this list of conditions and the following disclaimer in the
cannam@154:    documentation and/or other materials provided with the distribution.
cannam@154: 
cannam@154:    THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
cannam@154:    ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
cannam@154:    LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
cannam@154:    A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
cannam@154:    OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
cannam@154:    EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
cannam@154:    PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
cannam@154:    PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
cannam@154:    LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
cannam@154:    NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
cannam@154:    SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
cannam@154: */
cannam@154: 
cannam@154: #ifdef HAVE_CONFIG_H
cannam@154: #include "config.h"
cannam@154: #endif
cannam@154: 
cannam@154: #include "entcode.h"
cannam@154: #include "arch.h"
cannam@154: 
cannam@154: #if !defined(EC_CLZ)
cannam@154: /*This is a fallback for systems where we don't know how to access
cannam@154:    a BSR or CLZ instruction (see ecintrin.h).
cannam@154:   If you are optimizing Opus on a new platform and it has a native CLZ or
cannam@154:    BZR (e.g. cell, MIPS, x86, etc) then making it available to Opus will be
cannam@154:    an easy performance win.*/
cannam@154: int ec_ilog(opus_uint32 _v){
cannam@154:   /*On a Pentium M, this branchless version tested as the fastest on
cannam@154:      1,000,000,000 random 32-bit integers, edging out a similar version with
cannam@154:      branches, and a 256-entry LUT version.*/
cannam@154:   int ret;
cannam@154:   int m;
cannam@154:   ret=!!_v;
cannam@154:   m=!!(_v&0xFFFF0000)<<4;
cannam@154:   _v>>=m;
cannam@154:   ret|=m;
cannam@154:   m=!!(_v&0xFF00)<<3;
cannam@154:   _v>>=m;
cannam@154:   ret|=m;
cannam@154:   m=!!(_v&0xF0)<<2;
cannam@154:   _v>>=m;
cannam@154:   ret|=m;
cannam@154:   m=!!(_v&0xC)<<1;
cannam@154:   _v>>=m;
cannam@154:   ret|=m;
cannam@154:   ret+=!!(_v&0x2);
cannam@154:   return ret;
cannam@154: }
cannam@154: #endif
cannam@154: 
cannam@154: #if 1
cannam@154: /* This is a faster version of ec_tell_frac() that takes advantage
cannam@154:    of the low (1/8 bit) resolution to use just a linear function
cannam@154:    followed by a lookup to determine the exact transition thresholds. */
cannam@154: opus_uint32 ec_tell_frac(ec_ctx *_this){
cannam@154:   static const unsigned correction[8] =
cannam@154:     {35733, 38967, 42495, 46340,
cannam@154:      50535, 55109, 60097, 65535};
cannam@154:   opus_uint32 nbits;
cannam@154:   opus_uint32 r;
cannam@154:   int         l;
cannam@154:   unsigned    b;
cannam@154:   nbits=_this->nbits_total<<BITRES;
cannam@154:   l=EC_ILOG(_this->rng);
cannam@154:   r=_this->rng>>(l-16);
cannam@154:   b = (r>>12)-8;
cannam@154:   b += r>correction[b];
cannam@154:   l = (l<<3)+b;
cannam@154:   return nbits-l;
cannam@154: }
cannam@154: #else
cannam@154: opus_uint32 ec_tell_frac(ec_ctx *_this){
cannam@154:   opus_uint32 nbits;
cannam@154:   opus_uint32 r;
cannam@154:   int         l;
cannam@154:   int         i;
cannam@154:   /*To handle the non-integral number of bits still left in the encoder/decoder
cannam@154:      state, we compute the worst-case number of bits of val that must be
cannam@154:      encoded to ensure that the value is inside the range for any possible
cannam@154:      subsequent bits.
cannam@154:     The computation here is independent of val itself (the decoder does not
cannam@154:      even track that value), even though the real number of bits used after
cannam@154:      ec_enc_done() may be 1 smaller if rng is a power of two and the
cannam@154:      corresponding trailing bits of val are all zeros.
cannam@154:     If we did try to track that special case, then coding a value with a
cannam@154:      probability of 1/(1<<n) might sometimes appear to use more than n bits.
cannam@154:     This may help explain the surprising result that a newly initialized
cannam@154:      encoder or decoder claims to have used 1 bit.*/
cannam@154:   nbits=_this->nbits_total<<BITRES;
cannam@154:   l=EC_ILOG(_this->rng);
cannam@154:   r=_this->rng>>(l-16);
cannam@154:   for(i=BITRES;i-->0;){
cannam@154:     int b;
cannam@154:     r=r*r>>15;
cannam@154:     b=(int)(r>>16);
cannam@154:     l=l<<1|b;
cannam@154:     r>>=b;
cannam@154:   }
cannam@154:   return nbits-l;
cannam@154: }
cannam@154: #endif
cannam@154: 
cannam@154: #ifdef USE_SMALL_DIV_TABLE
cannam@154: /* Result of 2^32/(2*i+1), except for i=0. */
cannam@154: const opus_uint32 SMALL_DIV_TABLE[129] = {
cannam@154:    0xFFFFFFFF, 0x55555555, 0x33333333, 0x24924924,
cannam@154:    0x1C71C71C, 0x1745D174, 0x13B13B13, 0x11111111,
cannam@154:    0x0F0F0F0F, 0x0D79435E, 0x0C30C30C, 0x0B21642C,
cannam@154:    0x0A3D70A3, 0x097B425E, 0x08D3DCB0, 0x08421084,
cannam@154:    0x07C1F07C, 0x07507507, 0x06EB3E45, 0x06906906,
cannam@154:    0x063E7063, 0x05F417D0, 0x05B05B05, 0x0572620A,
cannam@154:    0x05397829, 0x05050505, 0x04D4873E, 0x04A7904A,
cannam@154:    0x047DC11F, 0x0456C797, 0x04325C53, 0x04104104,
cannam@154:    0x03F03F03, 0x03D22635, 0x03B5CC0E, 0x039B0AD1,
cannam@154:    0x0381C0E0, 0x0369D036, 0x03531DEC, 0x033D91D2,
cannam@154:    0x0329161F, 0x03159721, 0x03030303, 0x02F14990,
cannam@154:    0x02E05C0B, 0x02D02D02, 0x02C0B02C, 0x02B1DA46,
cannam@154:    0x02A3A0FD, 0x0295FAD4, 0x0288DF0C, 0x027C4597,
cannam@154:    0x02702702, 0x02647C69, 0x02593F69, 0x024E6A17,
cannam@154:    0x0243F6F0, 0x0239E0D5, 0x02302302, 0x0226B902,
cannam@154:    0x021D9EAD, 0x0214D021, 0x020C49BA, 0x02040810,
cannam@154:    0x01FC07F0, 0x01F44659, 0x01ECC07B, 0x01E573AC,
cannam@154:    0x01DE5D6E, 0x01D77B65, 0x01D0CB58, 0x01CA4B30,
cannam@154:    0x01C3F8F0, 0x01BDD2B8, 0x01B7D6C3, 0x01B20364,
cannam@154:    0x01AC5701, 0x01A6D01A, 0x01A16D3F, 0x019C2D14,
cannam@154:    0x01970E4F, 0x01920FB4, 0x018D3018, 0x01886E5F,
cannam@154:    0x0183C977, 0x017F405F, 0x017AD220, 0x01767DCE,
cannam@154:    0x01724287, 0x016E1F76, 0x016A13CD, 0x01661EC6,
cannam@154:    0x01623FA7, 0x015E75BB, 0x015AC056, 0x01571ED3,
cannam@154:    0x01539094, 0x01501501, 0x014CAB88, 0x0149539E,
cannam@154:    0x01460CBC, 0x0142D662, 0x013FB013, 0x013C995A,
cannam@154:    0x013991C2, 0x013698DF, 0x0133AE45, 0x0130D190,
cannam@154:    0x012E025C, 0x012B404A, 0x01288B01, 0x0125E227,
cannam@154:    0x01234567, 0x0120B470, 0x011E2EF3, 0x011BB4A4,
cannam@154:    0x01194538, 0x0116E068, 0x011485F0, 0x0112358E,
cannam@154:    0x010FEF01, 0x010DB20A, 0x010B7E6E, 0x010953F3,
cannam@154:    0x01073260, 0x0105197F, 0x0103091B, 0x01010101
cannam@154: };
cannam@154: #endif