roqvideodec.c 8.49 KB
Newer Older
1
/*
2
 * Copyright (C) 2003 The FFmpeg project
3
 *
4
 * This file is part of Libav.
5
 *
6
 * Libav is free software; you can redistribute it and/or
7 8 9 10
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
11
 * Libav is distributed in the hope that it will be useful,
12 13 14 15 16
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
17
 * License along with Libav; if not, write to the Free Software
18 19 20 21
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 */

/**
22
 * @file
23 24
 * id RoQ Video Decoder by Dr. Tim Ferguson
 * For more information about the id RoQ format, visit:
25 26 27 28 29 30 31
 *   http://www.csse.monash.edu.au/~timf/
 */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

32 33
#include "libavutil/imgutils.h"

34 35
#include "avcodec.h"
#include "bytestream.h"
36
#include "internal.h"
37 38 39 40 41 42 43
#include "roqvideo.h"

static void roqvideo_decode_frame(RoqContext *ri)
{
    unsigned int chunk_id = 0, chunk_arg = 0;
    unsigned long chunk_size = 0;
    int i, j, k, nv1, nv2, vqflg = 0, vqflg_pos = -1;
44
    int vqid, xpos, ypos, xp, yp, x, y, mx, my;
45 46
    int frame_stats[2][4] = {{0},{0}};
    roq_qcell *qcell;
47
    int64_t chunk_start;
48

49
    while (bytestream2_get_bytes_left(&ri->gb) >= 8) {
Ronald S. Bultje's avatar
Ronald S. Bultje committed
50
        chunk_id   = bytestream2_get_le16(&ri->gb);
51
        chunk_size = bytestream2_get_le32(&ri->gb);
Ronald S. Bultje's avatar
Ronald S. Bultje committed
52
        chunk_arg  = bytestream2_get_le16(&ri->gb);
53 54 55 56 57 58 59 60 61

        if(chunk_id == RoQ_QUAD_VQ)
            break;
        if(chunk_id == RoQ_QUAD_CODEBOOK) {
            if((nv1 = chunk_arg >> 8) == 0)
                nv1 = 256;
            if((nv2 = chunk_arg & 0xff) == 0 && nv1 * 6 < chunk_size)
                nv2 = 256;
            for(i = 0; i < nv1; i++) {
62 63 64 65
                ri->cb2x2[i].y[0] = bytestream2_get_byte(&ri->gb);
                ri->cb2x2[i].y[1] = bytestream2_get_byte(&ri->gb);
                ri->cb2x2[i].y[2] = bytestream2_get_byte(&ri->gb);
                ri->cb2x2[i].y[3] = bytestream2_get_byte(&ri->gb);
Ronald S. Bultje's avatar
Ronald S. Bultje committed
66 67
                ri->cb2x2[i].u    = bytestream2_get_byte(&ri->gb);
                ri->cb2x2[i].v    = bytestream2_get_byte(&ri->gb);
68 69 70
            }
            for(i = 0; i < nv2; i++)
                for(j = 0; j < 4; j++)
71
                    ri->cb4x4[i].idx[j] = bytestream2_get_byte(&ri->gb);
72 73 74
        }
    }

75 76 77
    chunk_start = bytestream2_tell(&ri->gb);
    xpos = ypos = 0;
    while (bytestream2_tell(&ri->gb) < chunk_start + chunk_size) {
78 79 80
        for (yp = ypos; yp < ypos + 16; yp += 8)
            for (xp = xpos; xp < xpos + 16; xp += 8) {
                if (vqflg_pos < 0) {
81
                    vqflg = bytestream2_get_le16(&ri->gb);
82 83 84 85 86 87 88 89 90
                    vqflg_pos = 7;
                }
                vqid = (vqflg >> (vqflg_pos * 2)) & 0x3;
                frame_stats[0][vqid]++;
                vqflg_pos--;

                switch(vqid) {
                case RoQ_ID_MOT:
                    break;
91 92 93 94
                case RoQ_ID_FCC: {
                    int byte = bytestream2_get_byte(&ri->gb);
                    mx = 8 - (byte >> 4) - ((signed char) (chunk_arg >> 8));
                    my = 8 - (byte & 0xf) - ((signed char) chunk_arg);
95 96
                    ff_apply_motion_8x8(ri, xp, yp, mx, my);
                    break;
97
                }
98
                case RoQ_ID_SLD:
99
                    qcell = ri->cb4x4 + bytestream2_get_byte(&ri->gb);
Ronald S. Bultje's avatar
Ronald S. Bultje committed
100 101 102 103
                    ff_apply_vector_4x4(ri, xp,     yp,     ri->cb2x2 + qcell->idx[0]);
                    ff_apply_vector_4x4(ri, xp + 4, yp,     ri->cb2x2 + qcell->idx[1]);
                    ff_apply_vector_4x4(ri, xp,     yp + 4, ri->cb2x2 + qcell->idx[2]);
                    ff_apply_vector_4x4(ri, xp + 4, yp + 4, ri->cb2x2 + qcell->idx[3]);
104 105 106 107 108 109 110 111
                    break;
                case RoQ_ID_CCC:
                    for (k = 0; k < 4; k++) {
                        x = xp; y = yp;
                        if(k & 0x01) x += 4;
                        if(k & 0x02) y += 4;

                        if (vqflg_pos < 0) {
112
                            vqflg = bytestream2_get_le16(&ri->gb);
113 114 115 116 117 118 119 120
                            vqflg_pos = 7;
                        }
                        vqid = (vqflg >> (vqflg_pos * 2)) & 0x3;
                        frame_stats[1][vqid]++;
                        vqflg_pos--;
                        switch(vqid) {
                        case RoQ_ID_MOT:
                            break;
121 122 123 124
                        case RoQ_ID_FCC: {
                            int byte = bytestream2_get_byte(&ri->gb);
                            mx = 8 - (byte >> 4) - ((signed char) (chunk_arg >> 8));
                            my = 8 - (byte & 0xf) - ((signed char) chunk_arg);
125 126
                            ff_apply_motion_4x4(ri, x, y, mx, my);
                            break;
127
                        }
128
                        case RoQ_ID_SLD:
129
                            qcell = ri->cb4x4 + bytestream2_get_byte(&ri->gb);
Ronald S. Bultje's avatar
Ronald S. Bultje committed
130 131 132 133
                            ff_apply_vector_2x2(ri, x,     y,     ri->cb2x2 + qcell->idx[0]);
                            ff_apply_vector_2x2(ri, x + 2, y,     ri->cb2x2 + qcell->idx[1]);
                            ff_apply_vector_2x2(ri, x,     y + 2, ri->cb2x2 + qcell->idx[2]);
                            ff_apply_vector_2x2(ri, x + 2, y + 2, ri->cb2x2 + qcell->idx[3]);
134 135
                            break;
                        case RoQ_ID_CCC:
Ronald S. Bultje's avatar
Ronald S. Bultje committed
136 137 138 139
                            ff_apply_vector_2x2(ri, x,     y,     ri->cb2x2 + bytestream2_get_byte(&ri->gb));
                            ff_apply_vector_2x2(ri, x + 2, y,     ri->cb2x2 + bytestream2_get_byte(&ri->gb));
                            ff_apply_vector_2x2(ri, x,     y + 2, ri->cb2x2 + bytestream2_get_byte(&ri->gb));
                            ff_apply_vector_2x2(ri, x + 2, y + 2, ri->cb2x2 + bytestream2_get_byte(&ri->gb));
140 141 142 143 144 145 146 147 148 149
                            break;
                        }
                    }
                    break;
                default:
                    av_log(ri->avctx, AV_LOG_ERROR, "Unknown vq code: %d\n", vqid);
            }
        }

        xpos += 16;
150 151
        if (xpos >= ri->width) {
            xpos -= ri->width;
152 153
            ypos += 16;
        }
154
        if(ypos >= ri->height)
155 156 157 158 159
            break;
    }
}


160
static av_cold int roq_decode_init(AVCodecContext *avctx)
161 162 163 164
{
    RoqContext *s = avctx->priv_data;

    s->avctx = avctx;
165 166 167 168 169 170 171

    if (avctx->width % 16 || avctx->height % 16) {
        av_log(avctx, AV_LOG_ERROR,
               "Dimensions must be a multiple of 16\n");
        return AVERROR_PATCHWELCOME;
    }

172 173
    s->width = avctx->width;
    s->height = avctx->height;
174 175 176 177 178 179 180 181 182

    s->last_frame    = av_frame_alloc();
    s->current_frame = av_frame_alloc();
    if (!s->current_frame || !s->last_frame) {
        av_frame_free(&s->current_frame);
        av_frame_free(&s->last_frame);
        return AVERROR(ENOMEM);
    }

183
    avctx->pix_fmt = AV_PIX_FMT_YUV444P;
184 185 186 187 188

    return 0;
}

static int roq_decode_frame(AVCodecContext *avctx,
189
                            void *data, int *got_frame,
190
                            AVPacket *avpkt)
191
{
192 193
    const uint8_t *buf = avpkt->data;
    int buf_size = avpkt->size;
194
    RoqContext *s = avctx->priv_data;
195
    int copy = !s->current_frame->data[0] && s->last_frame->data[0];
196
    int ret;
197

198
    if ((ret = ff_reget_buffer(avctx, s->current_frame)) < 0) {
199
        av_log(avctx, AV_LOG_ERROR, "  RoQ: get_buffer() failed\n");
200
        return ret;
201 202
    }

203 204 205 206 207
    if (copy) {
        ret = av_frame_copy(s->current_frame, s->last_frame);
        if (ret < 0)
            return ret;
    }
208

209
    bytestream2_init(&s->gb, buf, buf_size);
210 211
    roqvideo_decode_frame(s);

212 213
    if ((ret = av_frame_ref(data, s->current_frame)) < 0)
        return ret;
214
    *got_frame      = 1;
215 216 217 218 219 220 221

    /* shuffle frames */
    FFSWAP(AVFrame *, s->current_frame, s->last_frame);

    return buf_size;
}

222
static av_cold int roq_decode_end(AVCodecContext *avctx)
223 224 225
{
    RoqContext *s = avctx->priv_data;

226 227
    av_frame_free(&s->current_frame);
    av_frame_free(&s->last_frame);
228 229 230 231

    return 0;
}

232
AVCodec ff_roq_decoder = {
233
    .name           = "roqvideo",
234
    .long_name      = NULL_IF_CONFIG_SMALL("id RoQ video"),
235
    .type           = AVMEDIA_TYPE_VIDEO,
236
    .id             = AV_CODEC_ID_ROQ,
237 238 239 240
    .priv_data_size = sizeof(RoqContext),
    .init           = roq_decode_init,
    .close          = roq_decode_end,
    .decode         = roq_decode_frame,
241
    .capabilities   = AV_CODEC_CAP_DR1,
242
};