1 /*
2 * Copyright (c) 2003 The FFmpeg Project
3 *
4 * This file is part of FFmpeg.
5 *
6 * FFmpeg is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
10 *
11 * FFmpeg is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
15 *
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with FFmpeg; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
19 */
20
21 /**
22 * @file
23 * id RoQ Video Decoder by Dr. Tim Ferguson
24 * For more information about the id RoQ format, visit:
25 * http://www.csse.monash.edu.au/~timf/
26 */
27
28 #include "libavutil/avassert.h"
29 #include "avcodec.h"
30 #include "bytestream.h"
31 #include "internal.h"
32 #include "roqvideo.h"
33
roqvideo_decode_frame(RoqContext * ri)34 static void roqvideo_decode_frame(RoqContext *ri)
35 {
36 unsigned int chunk_id = 0, chunk_arg = 0;
37 unsigned long chunk_size = 0;
38 int i, j, k, nv1, nv2, vqflg = 0, vqflg_pos = -1;
39 int vqid, xpos, ypos, xp, yp, x, y, mx, my;
40 int frame_stats[2][4] = {{0},{0}};
41 roq_qcell *qcell;
42 int64_t chunk_start;
43
44 while (bytestream2_get_bytes_left(&ri->gb) >= 8) {
45 chunk_id = bytestream2_get_le16(&ri->gb);
46 chunk_size = bytestream2_get_le32(&ri->gb);
47 chunk_arg = bytestream2_get_le16(&ri->gb);
48
49 if(chunk_id == RoQ_QUAD_VQ)
50 break;
51 if(chunk_id == RoQ_QUAD_CODEBOOK) {
52 if((nv1 = chunk_arg >> 8) == 0)
53 nv1 = 256;
54 if((nv2 = chunk_arg & 0xff) == 0 && nv1 * 6 < chunk_size)
55 nv2 = 256;
56 for(i = 0; i < nv1; i++) {
57 ri->cb2x2[i].y[0] = bytestream2_get_byte(&ri->gb);
58 ri->cb2x2[i].y[1] = bytestream2_get_byte(&ri->gb);
59 ri->cb2x2[i].y[2] = bytestream2_get_byte(&ri->gb);
60 ri->cb2x2[i].y[3] = bytestream2_get_byte(&ri->gb);
61 ri->cb2x2[i].u = bytestream2_get_byte(&ri->gb);
62 ri->cb2x2[i].v = bytestream2_get_byte(&ri->gb);
63 }
64 for(i = 0; i < nv2; i++)
65 for(j = 0; j < 4; j++)
66 ri->cb4x4[i].idx[j] = bytestream2_get_byte(&ri->gb);
67 }
68 }
69
70 chunk_start = bytestream2_tell(&ri->gb);
71 xpos = ypos = 0;
72
73 if (chunk_size > bytestream2_get_bytes_left(&ri->gb)) {
74 av_log(ri->avctx, AV_LOG_ERROR, "Chunk does not fit in input buffer\n");
75 chunk_size = bytestream2_get_bytes_left(&ri->gb);
76 }
77
78 while (bytestream2_tell(&ri->gb) < chunk_start + chunk_size) {
79 for (yp = ypos; yp < ypos + 16; yp += 8)
80 for (xp = xpos; xp < xpos + 16; xp += 8) {
81 if (bytestream2_tell(&ri->gb) >= chunk_start + chunk_size) {
82 av_log(ri->avctx, AV_LOG_VERBOSE, "Chunk is too short\n");
83 return;
84 }
85 if (vqflg_pos < 0) {
86 vqflg = bytestream2_get_le16(&ri->gb);
87 vqflg_pos = 7;
88 }
89 vqid = (vqflg >> (vqflg_pos * 2)) & 0x3;
90 frame_stats[0][vqid]++;
91 vqflg_pos--;
92
93 switch(vqid) {
94 case RoQ_ID_MOT:
95 break;
96 case RoQ_ID_FCC: {
97 int byte = bytestream2_get_byte(&ri->gb);
98 mx = 8 - (byte >> 4) - ((signed char) (chunk_arg >> 8));
99 my = 8 - (byte & 0xf) - ((signed char) chunk_arg);
100 ff_apply_motion_8x8(ri, xp, yp, mx, my);
101 break;
102 }
103 case RoQ_ID_SLD:
104 qcell = ri->cb4x4 + bytestream2_get_byte(&ri->gb);
105 ff_apply_vector_4x4(ri, xp, yp, ri->cb2x2 + qcell->idx[0]);
106 ff_apply_vector_4x4(ri, xp + 4, yp, ri->cb2x2 + qcell->idx[1]);
107 ff_apply_vector_4x4(ri, xp, yp + 4, ri->cb2x2 + qcell->idx[2]);
108 ff_apply_vector_4x4(ri, xp + 4, yp + 4, ri->cb2x2 + qcell->idx[3]);
109 break;
110 case RoQ_ID_CCC:
111 for (k = 0; k < 4; k++) {
112 x = xp; y = yp;
113 if(k & 0x01) x += 4;
114 if(k & 0x02) y += 4;
115
116 if (bytestream2_tell(&ri->gb) >= chunk_start + chunk_size) {
117 av_log(ri->avctx, AV_LOG_VERBOSE, "Chunk is too short\n");
118 return;
119 }
120 if (vqflg_pos < 0) {
121 vqflg = bytestream2_get_le16(&ri->gb);
122 vqflg_pos = 7;
123 }
124 vqid = (vqflg >> (vqflg_pos * 2)) & 0x3;
125 frame_stats[1][vqid]++;
126 vqflg_pos--;
127 switch(vqid) {
128 case RoQ_ID_MOT:
129 break;
130 case RoQ_ID_FCC: {
131 int byte = bytestream2_get_byte(&ri->gb);
132 mx = 8 - (byte >> 4) - ((signed char) (chunk_arg >> 8));
133 my = 8 - (byte & 0xf) - ((signed char) chunk_arg);
134 ff_apply_motion_4x4(ri, x, y, mx, my);
135 break;
136 }
137 case RoQ_ID_SLD:
138 qcell = ri->cb4x4 + bytestream2_get_byte(&ri->gb);
139 ff_apply_vector_2x2(ri, x, y, ri->cb2x2 + qcell->idx[0]);
140 ff_apply_vector_2x2(ri, x + 2, y, ri->cb2x2 + qcell->idx[1]);
141 ff_apply_vector_2x2(ri, x, y + 2, ri->cb2x2 + qcell->idx[2]);
142 ff_apply_vector_2x2(ri, x + 2, y + 2, ri->cb2x2 + qcell->idx[3]);
143 break;
144 case RoQ_ID_CCC:
145 ff_apply_vector_2x2(ri, x, y, ri->cb2x2 + bytestream2_get_byte(&ri->gb));
146 ff_apply_vector_2x2(ri, x + 2, y, ri->cb2x2 + bytestream2_get_byte(&ri->gb));
147 ff_apply_vector_2x2(ri, x, y + 2, ri->cb2x2 + bytestream2_get_byte(&ri->gb));
148 ff_apply_vector_2x2(ri, x + 2, y + 2, ri->cb2x2 + bytestream2_get_byte(&ri->gb));
149 break;
150 }
151 }
152 break;
153 default:
154 av_assert2(0);
155 }
156 }
157
158 xpos += 16;
159 if (xpos >= ri->width) {
160 xpos -= ri->width;
161 ypos += 16;
162 }
163 if(ypos >= ri->height)
164 break;
165 }
166 }
167
168
roq_decode_init(AVCodecContext * avctx)169 static av_cold int roq_decode_init(AVCodecContext *avctx)
170 {
171 RoqContext *s = avctx->priv_data;
172
173 s->avctx = avctx;
174
175 if (avctx->width % 16 || avctx->height % 16) {
176 av_log(avctx, AV_LOG_ERROR,
177 "Dimensions must be a multiple of 16\n");
178 return AVERROR_PATCHWELCOME;
179 }
180
181 s->width = avctx->width;
182 s->height = avctx->height;
183
184 s->last_frame = av_frame_alloc();
185 s->current_frame = av_frame_alloc();
186 if (!s->current_frame || !s->last_frame) {
187 av_frame_free(&s->current_frame);
188 av_frame_free(&s->last_frame);
189 return AVERROR(ENOMEM);
190 }
191
192 avctx->pix_fmt = AV_PIX_FMT_YUVJ444P;
193 avctx->color_range = AVCOL_RANGE_JPEG;
194
195 return 0;
196 }
197
roq_decode_frame(AVCodecContext * avctx,void * data,int * got_frame,AVPacket * avpkt)198 static int roq_decode_frame(AVCodecContext *avctx,
199 void *data, int *got_frame,
200 AVPacket *avpkt)
201 {
202 const uint8_t *buf = avpkt->data;
203 int buf_size = avpkt->size;
204 RoqContext *s = avctx->priv_data;
205 int copy= !s->current_frame->data[0];
206 int ret;
207
208 if ((ret = ff_reget_buffer(avctx, s->current_frame)) < 0)
209 return ret;
210
211 if(copy)
212 av_picture_copy((AVPicture*)s->current_frame, (AVPicture*)s->last_frame,
213 avctx->pix_fmt, avctx->width, avctx->height);
214
215 bytestream2_init(&s->gb, buf, buf_size);
216 roqvideo_decode_frame(s);
217
218 if ((ret = av_frame_ref(data, s->current_frame)) < 0)
219 return ret;
220 *got_frame = 1;
221
222 /* shuffle frames */
223 FFSWAP(AVFrame *, s->current_frame, s->last_frame);
224
225 return buf_size;
226 }
227
roq_decode_end(AVCodecContext * avctx)228 static av_cold int roq_decode_end(AVCodecContext *avctx)
229 {
230 RoqContext *s = avctx->priv_data;
231
232 av_frame_free(&s->current_frame);
233 av_frame_free(&s->last_frame);
234
235 return 0;
236 }
237
238 AVCodec ff_roq_decoder = {
239 .name = "roqvideo",
240 .long_name = NULL_IF_CONFIG_SMALL("id RoQ video"),
241 .type = AVMEDIA_TYPE_VIDEO,
242 .id = AV_CODEC_ID_ROQ,
243 .priv_data_size = sizeof(RoqContext),
244 .init = roq_decode_init,
245 .close = roq_decode_end,
246 .decode = roq_decode_frame,
247 .capabilities = CODEC_CAP_DR1,
248 };
249