git.sesse.net Git - ffmpeg/blob - libavcodec/roqvideodec.c

   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 "libavutil/imgutils.h"
  30
  31 #include "avcodec.h"
  32 #include "bytestream.h"
  33 #include "internal.h"
  34 #include "roqvideo.h"
  35
  36 static void roqvideo_decode_frame(RoqContext *ri, GetByteContext *gb)
  37 {
  38     unsigned int chunk_id = 0, chunk_arg = 0;
  39     unsigned long chunk_size = 0;
  40     int i, j, k, nv1, nv2, vqflg = 0, vqflg_pos = -1;
  41     int vqid, xpos, ypos, xp, yp, x, y, mx, my;
  42     roq_qcell *qcell;
  43     int64_t chunk_start;
  44
  45     while (bytestream2_get_bytes_left(gb) >= 8) {
  46         chunk_id   = bytestream2_get_le16(gb);
  47         chunk_size = bytestream2_get_le32(gb);
  48         chunk_arg  = bytestream2_get_le16(gb);
  49
  50         if(chunk_id == RoQ_QUAD_VQ)
  51             break;
  52         if(chunk_id == RoQ_QUAD_CODEBOOK) {
  53             if((nv1 = chunk_arg >> 8) == 0)
  54                 nv1 = 256;
  55             if((nv2 = chunk_arg & 0xff) == 0 && nv1 * 6 < chunk_size)
  56                 nv2 = 256;
  57             for(i = 0; i < nv1; i++) {
  58                 ri->cb2x2[i].y[0] = bytestream2_get_byte(gb);
  59                 ri->cb2x2[i].y[1] = bytestream2_get_byte(gb);
  60                 ri->cb2x2[i].y[2] = bytestream2_get_byte(gb);
  61                 ri->cb2x2[i].y[3] = bytestream2_get_byte(gb);
  62                 ri->cb2x2[i].u    = bytestream2_get_byte(gb);
  63                 ri->cb2x2[i].v    = bytestream2_get_byte(gb);
  64             }
  65             for(i = 0; i < nv2; i++)
  66                 for(j = 0; j < 4; j++)
  67                     ri->cb4x4[i].idx[j] = bytestream2_get_byte(gb);
  68         }
  69     }
  70
  71     chunk_start = bytestream2_tell(gb);
  72     xpos = ypos = 0;
  73
  74     if (chunk_size > bytestream2_get_bytes_left(gb)) {
  75         av_log(ri->avctx, AV_LOG_ERROR, "Chunk does not fit in input buffer\n");
  76         chunk_size = bytestream2_get_bytes_left(gb);
  77     }
  78
  79     while (bytestream2_tell(gb) < chunk_start + chunk_size) {
  80         for (yp = ypos; yp < ypos + 16; yp += 8)
  81             for (xp = xpos; xp < xpos + 16; xp += 8) {
  82                 if (bytestream2_tell(gb) >= chunk_start + chunk_size) {
  83                     av_log(ri->avctx, AV_LOG_VERBOSE, "Chunk is too short\n");
  84                     return;
  85                 }
  86                 if (vqflg_pos < 0) {
  87                     vqflg = bytestream2_get_le16(gb);
  88                     vqflg_pos = 7;
  89                 }
  90                 vqid = (vqflg >> (vqflg_pos * 2)) & 0x3;
  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(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(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(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(gb);
 122                             vqflg_pos = 7;
 123                         }
 124                         vqid = (vqflg >> (vqflg_pos * 2)) & 0x3;
 125                         vqflg_pos--;
 126                         switch(vqid) {
 127                         case RoQ_ID_MOT:
 128                             break;
 129                         case RoQ_ID_FCC: {
 130                             int byte = bytestream2_get_byte(gb);
 131                             mx = 8 - (byte >> 4) - ((signed char) (chunk_arg >> 8));
 132                             my = 8 - (byte & 0xf) - ((signed char) chunk_arg);
 133                             ff_apply_motion_4x4(ri, x, y, mx, my);
 134                             break;
 135                         }
 136                         case RoQ_ID_SLD:
 137                             qcell = ri->cb4x4 + bytestream2_get_byte(gb);
 138                             ff_apply_vector_2x2(ri, x,     y,     ri->cb2x2 + qcell->idx[0]);
 139                             ff_apply_vector_2x2(ri, x + 2, y,     ri->cb2x2 + qcell->idx[1]);
 140                             ff_apply_vector_2x2(ri, x,     y + 2, ri->cb2x2 + qcell->idx[2]);
 141                             ff_apply_vector_2x2(ri, x + 2, y + 2, ri->cb2x2 + qcell->idx[3]);
 142                             break;
 143                         case RoQ_ID_CCC:
 144                             ff_apply_vector_2x2(ri, x,     y,     ri->cb2x2 + bytestream2_get_byte(gb));
 145                             ff_apply_vector_2x2(ri, x + 2, y,     ri->cb2x2 + bytestream2_get_byte(gb));
 146                             ff_apply_vector_2x2(ri, x,     y + 2, ri->cb2x2 + bytestream2_get_byte(gb));
 147                             ff_apply_vector_2x2(ri, x + 2, y + 2, ri->cb2x2 + bytestream2_get_byte(gb));
 148                             break;
 149                         }
 150                     }
 151                     break;
 152                 default:
 153                     av_assert2(0);
 154             }
 155         }
 156
 157         xpos += 16;
 158         if (xpos >= ri->width) {
 159             xpos -= ri->width;
 160             ypos += 16;
 161         }
 162         if(ypos >= ri->height)
 163             break;
 164     }
 165 }
 166
 167
 168 static av_cold int roq_decode_init(AVCodecContext *avctx)
 169 {
 170     RoqContext *s = avctx->priv_data;
 171
 172     s->avctx = avctx;
 173
 174     if (avctx->width % 16 || avctx->height % 16) {
 175         avpriv_request_sample(avctx, "Dimensions not being a multiple of 16");
 176         return AVERROR_PATCHWELCOME;
 177     }
 178
 179     s->width = avctx->width;
 180     s->height = avctx->height;
 181
 182     s->last_frame    = av_frame_alloc();
 183     s->current_frame = av_frame_alloc();
 184     if (!s->current_frame || !s->last_frame)
 185         return AVERROR(ENOMEM);
 186
 187     avctx->pix_fmt = AV_PIX_FMT_YUVJ444P;
 188     avctx->color_range = AVCOL_RANGE_JPEG;
 189
 190     return 0;
 191 }
 192
 193 static int roq_decode_frame(AVCodecContext *avctx,
 194                             void *data, int *got_frame,
 195                             AVPacket *avpkt)
 196 {
 197     const uint8_t *buf = avpkt->data;
 198     int buf_size = avpkt->size;
 199     RoqContext *s = avctx->priv_data;
 200     int copy = !s->current_frame->data[0] && s->last_frame->data[0];
 201     GetByteContext gb;
 202     int ret;
 203
 204     if ((ret = ff_reget_buffer(avctx, s->current_frame, 0)) < 0)
 205         return ret;
 206
 207     if (copy) {
 208         ret = av_frame_copy(s->current_frame, s->last_frame);
 209         if (ret < 0)
 210             return ret;
 211     }
 212
 213     bytestream2_init(&gb, buf, buf_size);
 214     roqvideo_decode_frame(s, &gb);
 215
 216     if ((ret = av_frame_ref(data, s->current_frame)) < 0)
 217         return ret;
 218     *got_frame      = 1;
 219
 220     /* shuffle frames */
 221     FFSWAP(AVFrame *, s->current_frame, s->last_frame);
 222
 223     return buf_size;
 224 }
 225
 226 static av_cold int roq_decode_end(AVCodecContext *avctx)
 227 {
 228     RoqContext *s = avctx->priv_data;
 229
 230     av_frame_free(&s->current_frame);
 231     av_frame_free(&s->last_frame);
 232
 233     return 0;
 234 }
 235
 236 AVCodec ff_roq_decoder = {
 237     .name           = "roqvideo",
 238     .long_name      = NULL_IF_CONFIG_SMALL("id RoQ video"),
 239     .type           = AVMEDIA_TYPE_VIDEO,
 240     .id             = AV_CODEC_ID_ROQ,
 241     .priv_data_size = sizeof(RoqContext),
 242     .init           = roq_decode_init,
 243     .close          = roq_decode_end,
 244     .decode         = roq_decode_frame,
 245     .capabilities   = AV_CODEC_CAP_DR1,
 246     .caps_internal  = FF_CODEC_CAP_INIT_CLEANUP,
 247 };