Fix ectest to not check a case which isn't guaranteed to work, and which we don't...
[opus.git] / libcelt / entdec.c
1 #ifdef HAVE_CONFIG_H
2 #include "config.h"
3 #endif
4
5 #include <stddef.h>
6 #include "entdec.h"
7 #include "os_support.h"
8 #include "arch.h"
9
10
11 void ec_byte_readinit(ec_byte_buffer *_b,unsigned char *_buf,long _bytes){
12   _b->buf=_b->ptr=_buf;
13   _b->storage=_bytes;
14 }
15
16 int ec_byte_look1(ec_byte_buffer *_b){
17   ptrdiff_t endbyte;
18   endbyte=_b->ptr-_b->buf;
19   if(endbyte>=_b->storage)return -1;
20   else return _b->ptr[0];
21 }
22
23 int ec_byte_look4(ec_byte_buffer *_b,ec_uint32 *_val){
24   ptrdiff_t endbyte;
25   endbyte=_b->ptr-_b->buf;
26   if(endbyte+4>_b->storage){
27     if(endbyte<_b->storage){
28       *_val=_b->ptr[0];
29       endbyte++;
30       if(endbyte<_b->storage){
31         *_val|=(ec_uint32)_b->ptr[1]<<8;
32         endbyte++;
33         if(endbyte<_b->storage)*_val|=(ec_uint32)_b->ptr[2]<<16;
34       }
35     }
36     return -1;
37   }
38   else{
39     *_val=_b->ptr[0];
40     *_val|=(ec_uint32)_b->ptr[1]<<8;
41     *_val|=(ec_uint32)_b->ptr[2]<<16;
42     *_val|=(ec_uint32)_b->ptr[3]<<24;
43   }
44   return 0;
45 }
46
47 void ec_byte_adv1(ec_byte_buffer *_b){
48   _b->ptr++;
49 }
50
51 void ec_byte_adv4(ec_byte_buffer *_b){
52   _b->ptr+=4;
53 }
54
55 int ec_byte_read1(ec_byte_buffer *_b){
56   ptrdiff_t endbyte;
57   endbyte=_b->ptr-_b->buf;
58   if(endbyte>=_b->storage)return -1;
59   else return *(_b->ptr++);
60 }
61
62 int ec_byte_read4(ec_byte_buffer *_b,ec_uint32 *_val){
63   unsigned char *end;
64   end=_b->buf+_b->storage;
65   if(_b->ptr+4>end){
66     if(_b->ptr<end){
67       *_val=*(_b->ptr++);
68       if(_b->ptr<end){
69         *_val|=(ec_uint32)*(_b->ptr++)<<8;
70         if(_b->ptr<end)*_val|=(ec_uint32)*(_b->ptr++)<<16;
71       }
72     }
73     return -1;
74   }
75   else{
76     *_val=(*_b->ptr++);
77     *_val|=(ec_uint32)*(_b->ptr++)<<8;
78     *_val|=(ec_uint32)*(_b->ptr++)<<16;
79     *_val|=(ec_uint32)*(_b->ptr++)<<24;
80   }
81   return 0;
82 }
83
84
85
86 ec_uint32 ec_dec_bits(ec_dec *_this,int _ftb){
87   ec_uint32 t;
88   unsigned  s;
89   unsigned  ft;
90   t=0;
91   while(_ftb>EC_UNIT_BITS){
92     s=ec_decode_bin(_this,EC_UNIT_BITS);
93     ec_dec_update(_this,s,s+1,EC_UNIT_MASK+1);
94     t=t<<EC_UNIT_BITS|s;
95     _ftb-=EC_UNIT_BITS;
96   }
97   ft=1U<<_ftb;
98   s=ec_decode_bin(_this,_ftb);
99   ec_dec_update(_this,s,s+1,ft);
100   t=t<<_ftb|s;
101   return t;
102 }
103
104 ec_uint32 ec_dec_uint(ec_dec *_this,ec_uint32 _ft){
105   ec_uint32 t;
106   unsigned  ft;
107   unsigned  s;
108   int       ftb;
109   t=0;
110   /*In order to optimize EC_ILOG(), it is undefined for the value 0.*/
111   celt_assert(_ft>1);
112   _ft--;
113   ftb=EC_ILOG(_ft);
114   if(ftb>EC_UNIT_BITS){
115     ftb-=EC_UNIT_BITS;
116     ft=(unsigned)(_ft>>ftb)+1;
117     s=ec_decode(_this,ft);
118     ec_dec_update(_this,s,s+1,ft);
119     t=t<<EC_UNIT_BITS|s;
120     t = t<<ftb|ec_dec_bits(_this,ftb);
121     if (t>_ft)
122     {
123        celt_notify("uint decode error");
124        t = _ft;
125     }
126     return t;
127   } else {
128     _ft++;
129     s=ec_decode(_this,(unsigned)_ft);
130     ec_dec_update(_this,s,s+1,(unsigned)_ft);
131     t=t<<ftb|s;
132     return t;
133   }
134 }