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 <stdio.h>
  29 #include <stdlib.h>
  30 #include <string.h>
  31
  32 #include "avcodec.h"
  33 #include "bytestream.h"
  34 #include "roqvideo.h"
  35
  36 static void roqvideo_decode_frame(RoqContext *ri)
  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, bpos, xpos, ypos, xp, yp, x, y, mx, my;
  42     int frame_stats[2][4] = {{0},{0}};
  43     roq_qcell *qcell;
  44     const unsigned char *buf = ri->buf;
  45     const unsigned char *buf_end = ri->buf + ri->size;
  46
  47     while (buf < buf_end) {
  48         chunk_id = bytestream_get_le16(&buf);
  49         chunk_size = bytestream_get_le32(&buf);
  50         chunk_arg = bytestream_get_le16(&buf);
  51
  52         if(chunk_id == RoQ_QUAD_VQ)
  53             break;
  54         if(chunk_id == RoQ_QUAD_CODEBOOK) {
  55             if((nv1 = chunk_arg >> 8) == 0)
  56                 nv1 = 256;
  57             if((nv2 = chunk_arg & 0xff) == 0 && nv1 * 6 < chunk_size)
  58                 nv2 = 256;
  59             for(i = 0; i < nv1; i++) {
  60                 ri->cb2x2[i].y[0] = *buf++;
  61                 ri->cb2x2[i].y[1] = *buf++;
  62                 ri->cb2x2[i].y[2] = *buf++;
  63                 ri->cb2x2[i].y[3] = *buf++;
  64                 ri->cb2x2[i].u = *buf++;
  65                 ri->cb2x2[i].v = *buf++;
  66             }
  67             for(i = 0; i < nv2; i++)
  68                 for(j = 0; j < 4; j++)
  69                     ri->cb4x4[i].idx[j] = *buf++;
  70         }
  71     }
  72
  73     bpos = xpos = ypos = 0;
  74     if (chunk_size > buf_end - buf) {
  75         av_log(ri->avctx, AV_LOG_ERROR, "Chunk does not fit in input buffer\n");
  76         chunk_size = buf_end - buf;
  77     }
  78     while(bpos < chunk_size) {
  79         for (yp = ypos; yp < ypos + 16; yp += 8)
  80             for (xp = xpos; xp < xpos + 16; xp += 8) {
  81                 if (bpos >= chunk_size) {
  82                     av_log(ri->avctx, AV_LOG_ERROR, "Input buffer too small\n");
  83                     return;
  84                 }
  85                 if (vqflg_pos < 0) {
  86                     vqflg = buf[bpos++]; vqflg |= (buf[bpos++] << 8);
  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                     mx = 8 - (buf[bpos] >> 4) - ((signed char) (chunk_arg >> 8));
  98                     my = 8 - (buf[bpos++] & 0xf) - ((signed char) chunk_arg);
  99                     ff_apply_motion_8x8(ri, xp, yp, mx, my);
 100                     break;
 101                 case RoQ_ID_SLD:
 102                     qcell = ri->cb4x4 + buf[bpos++];
 103                     ff_apply_vector_4x4(ri, xp, yp, ri->cb2x2 + qcell->idx[0]);
 104                     ff_apply_vector_4x4(ri, xp+4, yp, ri->cb2x2 + qcell->idx[1]);
 105                     ff_apply_vector_4x4(ri, xp, yp+4, ri->cb2x2 + qcell->idx[2]);
 106                     ff_apply_vector_4x4(ri, xp+4, yp+4, ri->cb2x2 + qcell->idx[3]);
 107                     break;
 108                 case RoQ_ID_CCC:
 109                     for (k = 0; k < 4; k++) {
 110                         x = xp; y = yp;
 111                         if(k & 0x01) x += 4;
 112                         if(k & 0x02) y += 4;
 113
 114                         if (bpos >= chunk_size) {
 115                             av_log(ri->avctx, AV_LOG_ERROR, "Input buffer too small\n");
 116                             return;
 117                         }
 118                         if (vqflg_pos < 0) {
 119                             vqflg = buf[bpos++];
 120                             vqflg |= (buf[bpos++] << 8);
 121                             vqflg_pos = 7;
 122                         }
 123                         vqid = (vqflg >> (vqflg_pos * 2)) & 0x3;
 124                         frame_stats[1][vqid]++;
 125                         vqflg_pos--;
 126                         switch(vqid) {
 127                         case RoQ_ID_MOT:
 128                             break;
 129                         case RoQ_ID_FCC:
 130                             mx = 8 - (buf[bpos] >> 4) - ((signed char) (chunk_arg >> 8));
 131                             my = 8 - (buf[bpos++] & 0xf) - ((signed char) chunk_arg);
 132                             ff_apply_motion_4x4(ri, x, y, mx, my);
 133                             break;
 134                         case RoQ_ID_SLD:
 135                             qcell = ri->cb4x4 + buf[bpos++];
 136                             ff_apply_vector_2x2(ri, x, y, ri->cb2x2 + qcell->idx[0]);
 137                             ff_apply_vector_2x2(ri, x+2, y, ri->cb2x2 + qcell->idx[1]);
 138                             ff_apply_vector_2x2(ri, x, y+2, ri->cb2x2 + qcell->idx[2]);
 139                             ff_apply_vector_2x2(ri, x+2, y+2, ri->cb2x2 + qcell->idx[3]);
 140                             break;
 141                         case RoQ_ID_CCC:
 142                             ff_apply_vector_2x2(ri, x, y, ri->cb2x2 + buf[bpos]);
 143                             ff_apply_vector_2x2(ri, x+2, y, ri->cb2x2 + buf[bpos+1]);
 144                             ff_apply_vector_2x2(ri, x, y+2, ri->cb2x2 + buf[bpos+2]);
 145                             ff_apply_vector_2x2(ri, x+2, y+2, ri->cb2x2 + buf[bpos+3]);
 146                             bpos += 4;
 147                             break;
 148                         }
 149                     }
 150                     break;
 151                 default:
 152                     av_log(ri->avctx, AV_LOG_ERROR, "Unknown vq code: %d\n", vqid);
 153             }
 154         }
 155
 156         xpos += 16;
 157         if (xpos >= ri->width) {
 158             xpos -= ri->width;
 159             ypos += 16;
 160         }
 161         if(ypos >= ri->height)
 162             break;
 163     }
 164 }
 165
 166
 167 static av_cold int roq_decode_init(AVCodecContext *avctx)
 168 {
 169     RoqContext *s = avctx->priv_data;
 170
 171     s->avctx = avctx;
 172     s->width = avctx->width;
 173     s->height = avctx->height;
 174     avcodec_get_frame_defaults(&s->frames[0]);
 175     avcodec_get_frame_defaults(&s->frames[1]);
 176     s->last_frame    = &s->frames[0];
 177     s->current_frame = &s->frames[1];
 178     avctx->pix_fmt = PIX_FMT_YUV444P;
 179
 180     return 0;
 181 }
 182
 183 static int roq_decode_frame(AVCodecContext *avctx,
 184                             void *data, int *data_size,
 185                             AVPacket *avpkt)
 186 {
 187     const uint8_t *buf = avpkt->data;
 188     int buf_size = avpkt->size;
 189     RoqContext *s = avctx->priv_data;
 190     int copy= !s->current_frame->data[0];
 191
 192     s->current_frame->reference = 3;
 193     if (avctx->reget_buffer(avctx, s->current_frame)) {
 194         av_log(avctx, AV_LOG_ERROR, "  RoQ: get_buffer() failed\n");
 195         return -1;
 196     }
 197
 198     if(copy)
 199         av_picture_copy((AVPicture*)s->current_frame, (AVPicture*)s->last_frame,
 200                         avctx->pix_fmt, avctx->width, avctx->height);
 201
 202     s->buf = buf;
 203     s->size = buf_size;
 204     roqvideo_decode_frame(s);
 205
 206     *data_size = sizeof(AVFrame);
 207     *(AVFrame*)data = *s->current_frame;
 208
 209     /* shuffle frames */
 210     FFSWAP(AVFrame *, s->current_frame, s->last_frame);
 211
 212     return buf_size;
 213 }
 214
 215 static av_cold int roq_decode_end(AVCodecContext *avctx)
 216 {
 217     RoqContext *s = avctx->priv_data;
 218
 219     /* release the last frame */
 220     if (s->last_frame->data[0])
 221         avctx->release_buffer(avctx, s->last_frame);
 222     if (s->current_frame->data[0])
 223         avctx->release_buffer(avctx, s->current_frame);
 224
 225     return 0;
 226 }
 227
 228 AVCodec ff_roq_decoder = {
 229     .name           = "roqvideo",
 230     .type           = AVMEDIA_TYPE_VIDEO,
 231     .id             = CODEC_ID_ROQ,
 232     .priv_data_size = sizeof(RoqContext),
 233     .init           = roq_decode_init,
 234     .close          = roq_decode_end,
 235     .decode         = roq_decode_frame,
 236     .capabilities   = CODEC_CAP_DR1,
 237     .long_name = NULL_IF_CONFIG_SMALL("id RoQ video"),
 238 };