00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00034 #include <string.h>
00035
00036 #include "libavutil/avassert.h"
00037 #include "avcodec.h"
00038 #include "rangecoder.h"
00039 #include "bytestream.h"
00040
00041 void ff_init_range_encoder(RangeCoder *c, uint8_t *buf, int buf_size)
00042 {
00043 c->bytestream_start =
00044 c->bytestream = buf;
00045 c->bytestream_end = buf + buf_size;
00046 c->low = 0;
00047 c->range = 0xFF00;
00048 c->outstanding_count = 0;
00049 c->outstanding_byte = -1;
00050 }
00051
00052 void ff_init_range_decoder(RangeCoder *c, const uint8_t *buf, int buf_size)
00053 {
00054
00055 ff_init_range_encoder(c, (uint8_t *)buf, buf_size);
00056
00057 c->low = bytestream_get_be16((const uint8_t **)&c->bytestream);
00058 }
00059
00060 void ff_build_rac_states(RangeCoder *c, int factor, int max_p)
00061 {
00062 const int64_t one = 1LL << 32;
00063 int64_t p;
00064 int last_p8, p8, i;
00065
00066 memset(c->zero_state, 0, sizeof(c->zero_state));
00067 memset(c->one_state, 0, sizeof(c->one_state));
00068
00069 last_p8 = 0;
00070 p = one / 2;
00071 for (i = 0; i < 128; i++) {
00072 p8 = (256 * p + one / 2) >> 32;
00073 if (p8 <= last_p8)
00074 p8 = last_p8 + 1;
00075 if (last_p8 && last_p8 < 256 && p8 <= max_p)
00076 c->one_state[last_p8] = p8;
00077
00078 p += ((one - p) * factor + one / 2) >> 32;
00079 last_p8 = p8;
00080 }
00081
00082 for (i = 256 - max_p; i <= max_p; i++) {
00083 if (c->one_state[i])
00084 continue;
00085
00086 p = (i * one + 128) >> 8;
00087 p += ((one - p) * factor + one / 2) >> 32;
00088 p8 = (256 * p + one / 2) >> 32;
00089 if (p8 <= i)
00090 p8 = i + 1;
00091 if (p8 > max_p)
00092 p8 = max_p;
00093 c->one_state[i] = p8;
00094 }
00095
00096 for (i = 1; i < 255; i++)
00097 c->zero_state[i] = 256 - c->one_state[256 - i];
00098 }
00099
00100
00101 int ff_rac_terminate(RangeCoder *c)
00102 {
00103 c->range = 0xFF;
00104 c->low += 0xFF;
00105 renorm_encoder(c);
00106 c->range = 0xFF;
00107 renorm_encoder(c);
00108
00109 av_assert1(c->low == 0);
00110 av_assert1(c->range >= 0x100);
00111
00112 return c->bytestream - c->bytestream_start;
00113 }
00114
00115 #ifdef TEST
00116 #define SIZE 10240
00117
00118 #include "libavutil/lfg.h"
00119 #include "libavutil/log.h"
00120
00121 int main(void)
00122 {
00123 RangeCoder c;
00124 uint8_t b[9 * SIZE];
00125 uint8_t r[9 * SIZE];
00126 int i;
00127 uint8_t state[10];
00128 AVLFG prng;
00129
00130 av_lfg_init(&prng, 1);
00131
00132 ff_init_range_encoder(&c, b, SIZE);
00133 ff_build_rac_states(&c, 0.05 * (1LL << 32), 128 + 64 + 32 + 16);
00134
00135 memset(state, 128, sizeof(state));
00136
00137 for (i = 0; i < SIZE; i++)
00138 r[i] = av_lfg_get(&prng) % 7;
00139
00140 for (i = 0; i < SIZE; i++)
00141 put_rac(&c, state, r[i] & 1);
00142
00143 ff_rac_terminate(&c);
00144
00145 ff_init_range_decoder(&c, b, SIZE);
00146
00147 memset(state, 128, sizeof(state));
00148
00149 for (i = 0; i < SIZE; i++)
00150 if ((r[i] & 1) != get_rac(&c, state)) {
00151 av_log(NULL, AV_LOG_ERROR, "rac failure at %d\n", i);
00152 return 1;
00153 }
00154
00155 return 0;
00156 }
00157 #endif