1 /*
2 * FFV1 decoder template
3 *
4 * Copyright (c) 2003-2016 Michael Niedermayer <michaelni@gmx.at>
5 *
6 * This file is part of FFmpeg.
7 *
8 * FFmpeg is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
12 *
13 * FFmpeg is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
17 *
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with FFmpeg; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21 */
22
RENAME(decode_line)23 static av_always_inline int RENAME(decode_line)(FFV1Context *s, int w,
24 TYPE *sample[2],
25 int plane_index, int bits)
26 {
27 PlaneContext *const p = &s->plane[plane_index];
28 RangeCoder *const c = &s->c;
29 int x;
30 int run_count = 0;
31 int run_mode = 0;
32 int run_index = s->run_index;
33
34 if (is_input_end(s))
35 return AVERROR_INVALIDDATA;
36
37 if (s->slice_coding_mode == 1) {
38 int i;
39 for (x = 0; x < w; x++) {
40 int v = 0;
41 for (i=0; i<bits; i++) {
42 uint8_t state = 128;
43 v += v + get_rac(c, &state);
44 }
45 sample[1][x] = v;
46 }
47 return 0;
48 }
49
50 for (x = 0; x < w; x++) {
51 int diff, context, sign;
52
53 if (!(x & 1023)) {
54 if (is_input_end(s))
55 return AVERROR_INVALIDDATA;
56 }
57
58 context = RENAME(get_context)(p, sample[1] + x, sample[0] + x, sample[1] + x);
59 if (context < 0) {
60 context = -context;
61 sign = 1;
62 } else
63 sign = 0;
64
65 av_assert2(context < p->context_count);
66
67 if (s->ac != AC_GOLOMB_RICE) {
68 diff = get_symbol_inline(c, p->state[context], 1);
69 } else {
70 if (context == 0 && run_mode == 0)
71 run_mode = 1;
72
73 if (run_mode) {
74 if (run_count == 0 && run_mode == 1) {
75 if (get_bits1(&s->gb)) {
76 run_count = 1 << ff_log2_run[run_index];
77 if (x + run_count <= w)
78 run_index++;
79 } else {
80 if (ff_log2_run[run_index])
81 run_count = get_bits(&s->gb, ff_log2_run[run_index]);
82 else
83 run_count = 0;
84 if (run_index)
85 run_index--;
86 run_mode = 2;
87 }
88 }
89 if (sample[1][x - 1] == sample[0][x - 1]) {
90 while (run_count > 1 && w-x > 1) {
91 sample[1][x] = sample[0][x];
92 x++;
93 run_count--;
94 }
95 } else {
96 while (run_count > 1 && w-x > 1) {
97 sample[1][x] = RENAME(predict)(sample[1] + x, sample[0] + x);
98 x++;
99 run_count--;
100 }
101 }
102 run_count--;
103 if (run_count < 0) {
104 run_mode = 0;
105 run_count = 0;
106 diff = get_vlc_symbol(&s->gb, &p->vlc_state[context],
107 bits);
108 if (diff >= 0)
109 diff++;
110 } else
111 diff = 0;
112 } else
113 diff = get_vlc_symbol(&s->gb, &p->vlc_state[context], bits);
114
115 ff_dlog(s->avctx, "count:%d index:%d, mode:%d, x:%d pos:%d\n",
116 run_count, run_index, run_mode, x, get_bits_count(&s->gb));
117 }
118
119 if (sign)
120 diff = -(unsigned)diff;
121
122 sample[1][x] = av_mod_uintp2(RENAME(predict)(sample[1] + x, sample[0] + x) + (SUINT)diff, bits);
123 }
124 s->run_index = run_index;
125 return 0;
126 }
127
RENAME(decode_rgb_frame)128 static int RENAME(decode_rgb_frame)(FFV1Context *s, uint8_t *src[4], int w, int h, int stride[4])
129 {
130 int x, y, p;
131 TYPE *sample[4][2];
132 int lbd = s->avctx->bits_per_raw_sample <= 8;
133 int bits = s->avctx->bits_per_raw_sample > 0 ? s->avctx->bits_per_raw_sample : 8;
134 int offset = 1 << bits;
135 int transparency = s->transparency;
136
137 for (x = 0; x < 4; x++) {
138 sample[x][0] = RENAME(s->sample_buffer) + x * 2 * (w + 6) + 3;
139 sample[x][1] = RENAME(s->sample_buffer) + (x * 2 + 1) * (w + 6) + 3;
140 }
141
142 s->run_index = 0;
143
144 memset(RENAME(s->sample_buffer), 0, 8 * (w + 6) * sizeof(*RENAME(s->sample_buffer)));
145
146 for (y = 0; y < h; y++) {
147 for (p = 0; p < 3 + transparency; p++) {
148 int ret;
149 TYPE *temp = sample[p][0]; // FIXME: try a normal buffer
150
151 sample[p][0] = sample[p][1];
152 sample[p][1] = temp;
153
154 sample[p][1][-1]= sample[p][0][0 ];
155 sample[p][0][ w]= sample[p][0][w-1];
156 if (lbd && s->slice_coding_mode == 0)
157 ret = RENAME(decode_line)(s, w, sample[p], (p + 1)/2, 9);
158 else
159 ret = RENAME(decode_line)(s, w, sample[p], (p + 1)/2, bits + (s->slice_coding_mode != 1));
160 if (ret < 0)
161 return ret;
162 }
163 for (x = 0; x < w; x++) {
164 int g = sample[0][1][x];
165 int b = sample[1][1][x];
166 int r = sample[2][1][x];
167 int a = sample[3][1][x];
168
169 if (s->slice_coding_mode != 1) {
170 b -= offset;
171 r -= offset;
172 g -= (b * s->slice_rct_by_coef + r * s->slice_rct_ry_coef) >> 2;
173 b += g;
174 r += g;
175 }
176
177 if (lbd)
178 *((uint32_t*)(src[0] + x*4 + stride[0]*y)) = b + ((unsigned)g<<8) + ((unsigned)r<<16) + ((unsigned)a<<24);
179 else if (sizeof(TYPE) == 4 || transparency) {
180 *((uint16_t*)(src[0] + x*2 + stride[0]*y)) = g;
181 *((uint16_t*)(src[1] + x*2 + stride[1]*y)) = b;
182 *((uint16_t*)(src[2] + x*2 + stride[2]*y)) = r;
183 if (transparency)
184 *((uint16_t*)(src[3] + x*2 + stride[3]*y)) = a;
185 } else {
186 *((uint16_t*)(src[0] + x*2 + stride[0]*y)) = b;
187 *((uint16_t*)(src[1] + x*2 + stride[1]*y)) = g;
188 *((uint16_t*)(src[2] + x*2 + stride[2]*y)) = r;
189 }
190 }
191 }
192 return 0;
193 }
194