16
17
* You should have received a copy of the GNU Lesser General Public
17
18
* License along with FFmpeg; if not, write to the Free Software
18
19
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
24
* Id RoQ Video Decoder by Dr. Tim Ferguson
25
* For more information about the Id RoQ format, visit:
26
* http://www.csse.monash.edu.au/~timf/
24
* Id RoQ Video common functions based on work by Dr. Tim Ferguson
35
27
#include "avcodec.h"
39
unsigned char y0, y1, y2, y3, u, v;
46
static int uiclip[1024], *uiclp; /* clipping table */
47
#define avg2(a,b) uiclp[(((int)(a)+(int)(b)+1)>>1)]
48
#define avg4(a,b,c,d) uiclp[(((int)(a)+(int)(b)+(int)(c)+(int)(d)+2)>>2)]
50
typedef struct RoqContext {
52
AVCodecContext *avctx;
56
AVFrame *current_frame;
62
roq_qcell qcells[256];
69
#define RoQ_INFO 0x1001
70
#define RoQ_QUAD_CODEBOOK 0x1002
71
#define RoQ_QUAD_VQ 0x1011
72
#define RoQ_SOUND_MONO 0x1020
73
#define RoQ_SOUND_STEREO 0x1021
75
#define RoQ_ID_MOT 0x00
76
#define RoQ_ID_FCC 0x01
77
#define RoQ_ID_SLD 0x02
78
#define RoQ_ID_CCC 0x03
80
#define get_byte(in_buffer) *(in_buffer++)
81
#define get_word(in_buffer) ((unsigned short)(in_buffer += 2, \
82
(in_buffer[-1] << 8 | in_buffer[-2])))
83
#define get_long(in_buffer) ((unsigned long)(in_buffer += 4, \
84
(in_buffer[-1] << 24 | in_buffer[-2] << 16 | in_buffer[-3] << 8 | in_buffer[-4])))
87
static void apply_vector_2x2(RoqContext *ri, int x, int y, roq_cell *cell)
91
yptr = ri->current_frame->data[0] + (y * ri->y_stride) + x;
94
yptr += (ri->y_stride - 2);
97
ri->current_frame->data[1][(y/2) * (ri->c_stride) + x/2] = cell->u;
98
ri->current_frame->data[2][(y/2) * (ri->c_stride) + x/2] = cell->v;
101
static void apply_vector_4x4(RoqContext *ri, int x, int y, roq_cell *cell)
103
unsigned long row_inc, c_row_inc;
104
register unsigned char y0, y1, u, v;
105
unsigned char *yptr, *uptr, *vptr;
107
yptr = ri->current_frame->data[0] + (y * ri->y_stride) + x;
108
uptr = ri->current_frame->data[1] + (y/2) * (ri->c_stride) + x/2;
109
vptr = ri->current_frame->data[2] + (y/2) * (ri->c_stride) + x/2;
111
row_inc = ri->y_stride - 4;
112
c_row_inc = (ri->c_stride) - 2;
113
*yptr++ = y0 = cell->y0; *uptr++ = u = cell->u; *vptr++ = v = cell->v;
115
*yptr++ = y1 = cell->y1; *uptr++ = u; *vptr++ = v;
125
yptr += row_inc; uptr += c_row_inc; vptr += c_row_inc;
127
*yptr++ = y0 = cell->y2; *uptr++ = u; *vptr++ = v;
129
*yptr++ = y1 = cell->y3; *uptr++ = u; *vptr++ = v;
140
static void apply_motion_4x4(RoqContext *ri, int x, int y, unsigned char mv,
141
signed char mean_x, signed char mean_y)
144
unsigned char *pa, *pb;
146
mx = x + 8 - (mv >> 4) - mean_x;
147
my = y + 8 - (mv & 0xf) - mean_y;
149
/* check MV against frame boundaries */
150
if ((mx < 0) || (mx > ri->avctx->width - 4) ||
151
(my < 0) || (my > ri->avctx->height - 4)) {
152
av_log(ri->avctx, AV_LOG_ERROR, "motion vector out of bounds: MV = (%d, %d), boundaries = (0, 0, %d, %d)\n",
153
mx, my, ri->avctx->width, ri->avctx->height);
157
pa = ri->current_frame->data[0] + (y * ri->y_stride) + x;
158
pb = ri->last_frame->data[0] + (my * ri->y_stride) + mx;
159
for(i = 0; i < 4; i++) {
169
pa = ri->current_frame->data[1] + (y * ri->y_stride)/4 + x/2;
170
pb = ri->last_frame->data[1] + (my/2) * (ri->y_stride/2) + (mx + 1)/2;
172
for(i = 0; i < 2; i++) {
173
switch(((my & 0x01) << 1) | (mx & 0x01)) {
183
pa[0] = avg2(pb[0], pb[1]);
184
pa[1] = avg2(pb[1], pb[2]);
185
pa[hw] = avg2(pb[hw], pb[hw+1]);
186
pa[hw+1] = avg2(pb[hw+1], pb[hw+2]);
190
pa[0] = avg2(pb[0], pb[hw]);
191
pa[1] = avg2(pb[1], pb[hw+1]);
192
pa[hw] = avg2(pb[hw], pb[hw*2]);
193
pa[hw+1] = avg2(pb[hw+1], pb[(hw*2)+1]);
197
pa[0] = avg4(pb[0], pb[1], pb[hw], pb[hw+1]);
198
pa[1] = avg4(pb[1], pb[2], pb[hw+1], pb[hw+2]);
199
pa[hw] = avg4(pb[hw], pb[hw+1], pb[hw*2], pb[(hw*2)+1]);
200
pa[hw+1] = avg4(pb[hw+1], pb[hw+2], pb[(hw*2)+1], pb[(hw*2)+1]);
204
pa = ri->current_frame->data[2] + (y * ri->y_stride)/4 + x/2;
205
pb = ri->last_frame->data[2] + (my/2) * (ri->y_stride/2) + (mx + 1)/2;
209
static void apply_motion_8x8(RoqContext *ri, int x, int y,
210
unsigned char mv, signed char mean_x, signed char mean_y)
212
int mx, my, i, j, hw;
213
unsigned char *pa, *pb;
215
mx = x + 8 - (mv >> 4) - mean_x;
216
my = y + 8 - (mv & 0xf) - mean_y;
218
/* check MV against frame boundaries */
219
if ((mx < 0) || (mx > ri->avctx->width - 8) ||
220
(my < 0) || (my > ri->avctx->height - 8)) {
221
av_log(ri->avctx, AV_LOG_ERROR, "motion vector out of bounds: MV = (%d, %d), boundaries = (0, 0, %d, %d)\n",
222
mx, my, ri->avctx->width, ri->avctx->height);
226
pa = ri->current_frame->data[0] + (y * ri->y_stride) + x;
227
pb = ri->last_frame->data[0] + (my * ri->y_stride) + mx;
228
for(i = 0; i < 8; i++) {
242
pa = ri->current_frame->data[1] + (y * ri->y_stride)/4 + x/2;
243
pb = ri->last_frame->data[1] + (my/2) * (ri->y_stride/2) + (mx + 1)/2;
244
for(j = 0; j < 2; j++) {
245
for(i = 0; i < 4; i++) {
246
switch(((my & 0x01) << 1) | (mx & 0x01)) {
256
pa[0] = avg2(pb[0], pb[1]);
257
pa[1] = avg2(pb[1], pb[2]);
258
pa[2] = avg2(pb[2], pb[3]);
259
pa[3] = avg2(pb[3], pb[4]);
263
pa[0] = avg2(pb[0], pb[hw]);
264
pa[1] = avg2(pb[1], pb[hw+1]);
265
pa[2] = avg2(pb[2], pb[hw+2]);
266
pa[3] = avg2(pb[3], pb[hw+3]);
270
pa[0] = avg4(pb[0], pb[1], pb[hw], pb[hw+1]);
271
pa[1] = avg4(pb[1], pb[2], pb[hw+1], pb[hw+2]);
272
pa[2] = avg4(pb[2], pb[3], pb[hw+2], pb[hw+3]);
273
pa[3] = avg4(pb[3], pb[4], pb[hw+3], pb[hw+4]);
280
pa = ri->current_frame->data[2] + (y * ri->y_stride)/4 + x/2;
281
pb = ri->last_frame->data[2] + (my/2) * (ri->y_stride/2) + (mx + 1)/2;
285
static void roqvideo_decode_frame(RoqContext *ri)
287
unsigned int chunk_id = 0, chunk_arg = 0;
288
unsigned long chunk_size = 0;
289
int i, j, k, nv1, nv2, vqflg = 0, vqflg_pos = -1;
290
int vqid, bpos, xpos, ypos, xp, yp, x, y;
291
int frame_stats[2][4] = {{0},{0}};
293
unsigned char *buf = ri->buf;
294
unsigned char *buf_end = ri->buf + ri->size;
296
while (buf < buf_end) {
297
chunk_id = get_word(buf);
298
chunk_size = get_long(buf);
299
chunk_arg = get_word(buf);
301
if(chunk_id == RoQ_QUAD_VQ)
303
if(chunk_id == RoQ_QUAD_CODEBOOK) {
304
if((nv1 = chunk_arg >> 8) == 0)
306
if((nv2 = chunk_arg & 0xff) == 0 && nv1 * 6 < chunk_size)
308
for(i = 0; i < nv1; i++) {
309
ri->cells[i].y0 = get_byte(buf);
310
ri->cells[i].y1 = get_byte(buf);
311
ri->cells[i].y2 = get_byte(buf);
312
ri->cells[i].y3 = get_byte(buf);
313
ri->cells[i].u = get_byte(buf);
314
ri->cells[i].v = get_byte(buf);
316
for(i = 0; i < nv2; i++)
317
for(j = 0; j < 4; j++)
318
ri->qcells[i].idx[j] = get_byte(buf);
322
bpos = xpos = ypos = 0;
323
while(bpos < chunk_size) {
324
for (yp = ypos; yp < ypos + 16; yp += 8)
325
for (xp = xpos; xp < xpos + 16; xp += 8) {
327
vqflg = buf[bpos++]; vqflg |= (buf[bpos++] << 8);
330
vqid = (vqflg >> (vqflg_pos * 2)) & 0x3;
331
frame_stats[0][vqid]++;
336
apply_motion_8x8(ri, xp, yp, 0, 8, 8);
339
apply_motion_8x8(ri, xp, yp, buf[bpos++], chunk_arg >> 8,
343
qcell = ri->qcells + buf[bpos++];
344
apply_vector_4x4(ri, xp, yp, ri->cells + qcell->idx[0]);
345
apply_vector_4x4(ri, xp+4, yp, ri->cells + qcell->idx[1]);
346
apply_vector_4x4(ri, xp, yp+4, ri->cells + qcell->idx[2]);
347
apply_vector_4x4(ri, xp+4, yp+4, ri->cells + qcell->idx[3]);
350
for (k = 0; k < 4; k++) {
357
vqflg |= (buf[bpos++] << 8);
360
vqid = (vqflg >> (vqflg_pos * 2)) & 0x3;
361
frame_stats[1][vqid]++;
365
apply_motion_4x4(ri, x, y, 0, 8, 8);
368
apply_motion_4x4(ri, x, y, buf[bpos++],
369
chunk_arg >> 8, chunk_arg & 0xff);
372
qcell = ri->qcells + buf[bpos++];
373
apply_vector_2x2(ri, x, y, ri->cells + qcell->idx[0]);
374
apply_vector_2x2(ri, x+2, y, ri->cells + qcell->idx[1]);
375
apply_vector_2x2(ri, x, y+2, ri->cells + qcell->idx[2]);
376
apply_vector_2x2(ri, x+2, y+2, ri->cells + qcell->idx[3]);
379
apply_vector_2x2(ri, x, y, ri->cells + buf[bpos]);
380
apply_vector_2x2(ri, x+2, y, ri->cells + buf[bpos+1]);
381
apply_vector_2x2(ri, x, y+2, ri->cells + buf[bpos+2]);
382
apply_vector_2x2(ri, x+2, y+2, ri->cells + buf[bpos+3]);
389
av_log(ri->avctx, AV_LOG_ERROR, "Unknown vq code: %d\n", vqid);
394
if (xpos >= ri->avctx->width) {
395
xpos -= ri->avctx->width;
398
if(ypos >= ri->avctx->height)
404
static int roq_decode_init(AVCodecContext *avctx)
406
RoqContext *s = avctx->priv_data;
411
s->last_frame = &s->frames[0];
412
s->current_frame = &s->frames[1];
413
avctx->pix_fmt = PIX_FMT_YUV420P;
414
avctx->has_b_frames = 0;
415
dsputil_init(&s->dsp, avctx);
418
for(i = -512; i < 512; i++)
419
uiclp[i] = (i < 0 ? 0 : (i > 255 ? 255 : i));
424
static int roq_decode_frame(AVCodecContext *avctx,
425
void *data, int *data_size,
426
uint8_t *buf, int buf_size)
428
RoqContext *s = avctx->priv_data;
430
if (avctx->get_buffer(avctx, s->current_frame)) {
431
av_log(avctx, AV_LOG_ERROR, " RoQ: get_buffer() failed\n");
434
s->y_stride = s->current_frame->linesize[0];
435
s->c_stride = s->current_frame->linesize[1];
439
roqvideo_decode_frame(s);
441
/* release the last frame if it is allocated */
445
avctx->release_buffer(avctx, s->last_frame);
447
*data_size = sizeof(AVFrame);
448
*(AVFrame*)data = *s->current_frame;
451
FFSWAP(AVFrame *, s->current_frame, s->last_frame);
456
static int roq_decode_end(AVCodecContext *avctx)
458
RoqContext *s = avctx->priv_data;
460
/* release the last frame */
461
if (s->last_frame->data[0])
462
avctx->release_buffer(avctx, s->last_frame);
467
AVCodec roq_decoder = {
30
static inline void block_copy(unsigned char *out, unsigned char *in,
31
int outstride, int instride, int sz)
41
void ff_apply_vector_2x2(RoqContext *ri, int x, int y, roq_cell *cell)
46
stride = ri->current_frame->linesize[0];
49
bptr = ri->current_frame->data[0] + boffs;
50
bptr[0 ] = cell->y[0];
51
bptr[1 ] = cell->y[1];
52
bptr[stride ] = cell->y[2];
53
bptr[stride+1] = cell->y[3];
55
stride = ri->current_frame->linesize[1];
58
bptr = ri->current_frame->data[1] + boffs;
62
bptr[stride+1] = cell->u;
64
bptr = ri->current_frame->data[2] + boffs;
68
bptr[stride+1] = cell->v;
71
void ff_apply_vector_4x4(RoqContext *ri, int x, int y, roq_cell *cell)
76
stride = ri->current_frame->linesize[0];
79
bptr = ri->current_frame->data[0] + boffs;
80
bptr[ 0] = bptr[ 1] = bptr[stride ] = bptr[stride +1] = cell->y[0];
81
bptr[ 2] = bptr[ 3] = bptr[stride +2] = bptr[stride +3] = cell->y[1];
82
bptr[stride*2 ] = bptr[stride*2+1] = bptr[stride*3 ] = bptr[stride*3+1] = cell->y[2];
83
bptr[stride*2+2] = bptr[stride*2+3] = bptr[stride*3+2] = bptr[stride*3+3] = cell->y[3];
85
stride = ri->current_frame->linesize[1];
88
bptr = ri->current_frame->data[1] + boffs;
89
bptr[ 0] = bptr[ 1] = bptr[stride ] = bptr[stride +1] =
90
bptr[ 2] = bptr[ 3] = bptr[stride +2] = bptr[stride +3] =
91
bptr[stride*2 ] = bptr[stride*2+1] = bptr[stride*3 ] = bptr[stride*3+1] =
92
bptr[stride*2+2] = bptr[stride*2+3] = bptr[stride*3+2] = bptr[stride*3+3] = cell->u;
94
bptr = ri->current_frame->data[2] + boffs;
95
bptr[ 0] = bptr[ 1] = bptr[stride ] = bptr[stride +1] =
96
bptr[ 2] = bptr[ 3] = bptr[stride +2] = bptr[stride +3] =
97
bptr[stride*2 ] = bptr[stride*2+1] = bptr[stride*3 ] = bptr[stride*3+1] =
98
bptr[stride*2+2] = bptr[stride*2+3] = bptr[stride*3+2] = bptr[stride*3+3] = cell->v;
102
static inline void apply_motion_generic(RoqContext *ri, int x, int y, int deltax,
110
/* check MV against frame boundaries */
111
if ((mx < 0) || (mx > ri->width - sz) ||
112
(my < 0) || (my > ri->height - sz)) {
113
av_log(ri->avctx, AV_LOG_ERROR, "motion vector out of bounds: MV = (%d, %d), boundaries = (0, 0, %d, %d)\n",
114
mx, my, ri->width, ri->height);
118
for(cp = 0; cp < 3; cp++) {
119
int outstride = ri->current_frame->linesize[cp];
120
int instride = ri->last_frame ->linesize[cp];
121
block_copy(ri->current_frame->data[cp] + y*outstride + x,
122
ri->last_frame->data[cp] + my*instride + mx,
123
outstride, instride, sz);
128
void ff_apply_motion_4x4(RoqContext *ri, int x, int y,
129
int deltax, int deltay)
131
apply_motion_generic(ri, x, y, deltax, deltay, 4);
134
void ff_apply_motion_8x8(RoqContext *ri, int x, int y,
135
int deltax, int deltay)
137
apply_motion_generic(ri, x, y, deltax, deltay, 8);