More C89 fixes, making sure to include config.h from all source files.
[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
8
9
10 void ec_byte_readinit(ec_byte_buffer *_b,unsigned char *_buf,long _bytes){
11   _b->buf=_b->ptr=_buf;
12   _b->storage=_bytes;
13 }
14
15 int ec_byte_look1(ec_byte_buffer *_b){
16   ptrdiff_t endbyte;
17   endbyte=_b->ptr-_b->buf;
18   if(endbyte>=_b->storage)return -1;
19   else return _b->ptr[0];
20 }
21
22 int ec_byte_look4(ec_byte_buffer *_b,ec_uint32 *_val){
23   ptrdiff_t endbyte;
24   endbyte=_b->ptr-_b->buf;
25   if(endbyte+4>_b->storage){
26     if(endbyte<_b->storage){
27       *_val=_b->ptr[0];
28       endbyte++;
29       if(endbyte<_b->storage){
30         *_val|=(ec_uint32)_b->ptr[1]<<8;
31         endbyte++;
32         if(endbyte<_b->storage)*_val|=(ec_uint32)_b->ptr[2]<<16;
33       }
34     }
35     return -1;
36   }
37   else{
38     *_val=_b->ptr[0];
39     *_val|=(ec_uint32)_b->ptr[1]<<8;
40     *_val|=(ec_uint32)_b->ptr[2]<<16;
41     *_val|=(ec_uint32)_b->ptr[3]<<24;
42   }
43   return 0;
44 }
45
46 void ec_byte_adv1(ec_byte_buffer *_b){
47   _b->ptr++;
48 }
49
50 void ec_byte_adv4(ec_byte_buffer *_b){
51   _b->ptr+=4;
52 }
53
54 int ec_byte_read1(ec_byte_buffer *_b){
55   ptrdiff_t endbyte;
56   endbyte=_b->ptr-_b->buf;
57   if(endbyte>=_b->storage)return -1;
58   else return *(_b->ptr++);
59 }
60
61 int ec_byte_read4(ec_byte_buffer *_b,ec_uint32 *_val){
62   unsigned char *end;
63   end=_b->buf+_b->storage;
64   if(_b->ptr+4>end){
65     if(_b->ptr<end){
66       *_val=*(_b->ptr++);
67       if(_b->ptr<end){
68         *_val|=(ec_uint32)*(_b->ptr++)<<8;
69         if(_b->ptr<end)*_val|=(ec_uint32)*(_b->ptr++)<<16;
70       }
71     }
72     return -1;
73   }
74   else{
75     *_val=(*_b->ptr++);
76     *_val|=(ec_uint32)*(_b->ptr++)<<8;
77     *_val|=(ec_uint32)*(_b->ptr++)<<16;
78     *_val|=(ec_uint32)*(_b->ptr++)<<24;
79   }
80   return 0;
81 }
82
83
84
85 ec_uint32 ec_dec_bits(ec_dec *_this,int _ftb){
86   ec_uint32 t;
87   unsigned  s;
88   unsigned  ft;
89   t=0;
90   while(_ftb>EC_UNIT_BITS){
91     s=ec_decode(_this,EC_UNIT_MASK+1);
92     ec_dec_update(_this,s,s+1,EC_UNIT_MASK+1);
93     t=t<<EC_UNIT_BITS|s;
94     _ftb-=EC_UNIT_BITS;
95   }
96   ft=1U<<_ftb;
97   s=ec_decode(_this,ft);
98   ec_dec_update(_this,s,s+1,ft);
99   t=t<<_ftb|s;
100   return t;
101 }
102
103 ec_uint64 ec_dec_bits64(ec_dec *_this,int _ftb){
104   ec_uint32 t;
105   if(_ftb>32){
106     t=ec_dec_bits(_this,_ftb-32);
107     _ftb=32;
108   }
109   else t=0;
110   return (ec_uint64)t<<32|ec_dec_bits(_this,_ftb);
111 }
112
113 ec_uint32 ec_dec_uint(ec_dec *_this,ec_uint32 _ft){
114   ec_uint32 mask;
115   ec_uint32 t;
116   unsigned  ft;
117   unsigned  s;
118   int       ftb;
119   t=0;
120   _ft--;
121   ftb=EC_ILOG(_ft);
122   while(ftb>EC_UNIT_BITS){
123     ftb-=EC_UNIT_BITS;
124     ft=(unsigned)(_ft>>ftb)+1;
125     s=ec_decode(_this,ft);
126     ec_dec_update(_this,s,s+1,ft);
127     t=t<<EC_UNIT_BITS|s;
128     if(s<ft-1)return t<<ftb|ec_dec_bits(_this,ftb);
129     mask=((ec_uint32)1<<ftb)-1;
130     _ft=_ft&mask;
131   }
132   _ft++;
133   s=ec_decode(_this,(unsigned)_ft);
134   ec_dec_update(_this,s,s+1,(unsigned)_ft);
135   t=t<<ftb|s;
136   return t;
137 }
138
139 ec_uint64 ec_dec_uint64(ec_dec *_this,ec_uint64 _ft){
140   ec_uint64 mask;
141   ec_uint64 t;
142   unsigned  ft;
143   unsigned  s;
144   int       ftb;
145   t=0;
146   _ft--;
147   ftb=EC_ILOG64(_ft);
148   while(ftb>EC_UNIT_BITS){
149     ftb-=EC_UNIT_BITS;
150     ft=(unsigned)(_ft>>ftb)+1;
151     s=ec_decode(_this,ft);
152     ec_dec_update(_this,s,s+1,ft);
153     t=t<<EC_UNIT_BITS|s;
154     if(s<ft-1)return t<<ftb|ec_dec_bits64(_this,ftb);
155     mask=((ec_uint64)1<<ftb)-1;
156     _ft=_ft&mask;
157   }
158   _ft++;
159   s=ec_decode(_this,(unsigned)_ft);
160   ec_dec_update(_this,s,s+1,(unsigned)_ft);
161   t=t<<ftb|s;
162   return t;
163 }