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
23static 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
128static 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