00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00031 #include "avcodec.h"
00032 #include "get_bits.h"
00033 #include "dsputil.h"
00034 #include "aandcttab.h"
00035 #include "mpeg12.h"
00036 #include "mpegvideo.h"
00037
00038 typedef struct TqiContext {
00039 MpegEncContext s;
00040 AVFrame frame;
00041 void *bitstream_buf;
00042 unsigned int bitstream_buf_size;
00043 DECLARE_ALIGNED(16, DCTELEM, block)[6][64];
00044 } TqiContext;
00045
00046 static av_cold int tqi_decode_init(AVCodecContext *avctx)
00047 {
00048 TqiContext *t = avctx->priv_data;
00049 MpegEncContext *s = &t->s;
00050 s->avctx = avctx;
00051 if(avctx->idct_algo==FF_IDCT_AUTO)
00052 avctx->idct_algo=FF_IDCT_EA;
00053 dsputil_init(&s->dsp, avctx);
00054 ff_init_scantable(s->dsp.idct_permutation, &s->intra_scantable, ff_zigzag_direct);
00055 s->qscale = 1;
00056 avctx->time_base = (AVRational){1, 15};
00057 avctx->pix_fmt = PIX_FMT_YUV420P;
00058 ff_mpeg12_init_vlcs();
00059 return 0;
00060 }
00061
00062 static int tqi_decode_mb(MpegEncContext *s, DCTELEM (*block)[64])
00063 {
00064 int n;
00065 s->dsp.clear_blocks(block[0]);
00066 for (n=0; n<6; n++)
00067 if (ff_mpeg1_decode_block_intra(s, block[n], n) < 0)
00068 return -1;
00069
00070 return 0;
00071 }
00072
00073 static inline void tqi_idct_put(TqiContext *t, DCTELEM (*block)[64])
00074 {
00075 MpegEncContext *s = &t->s;
00076 int linesize= t->frame.linesize[0];
00077 uint8_t *dest_y = t->frame.data[0] + (s->mb_y * 16* linesize ) + s->mb_x * 16;
00078 uint8_t *dest_cb = t->frame.data[1] + (s->mb_y * 8 * t->frame.linesize[1]) + s->mb_x * 8;
00079 uint8_t *dest_cr = t->frame.data[2] + (s->mb_y * 8 * t->frame.linesize[2]) + s->mb_x * 8;
00080
00081 s->dsp.idct_put(dest_y , linesize, block[0]);
00082 s->dsp.idct_put(dest_y + 8, linesize, block[1]);
00083 s->dsp.idct_put(dest_y + 8*linesize , linesize, block[2]);
00084 s->dsp.idct_put(dest_y + 8*linesize + 8, linesize, block[3]);
00085 if(!(s->avctx->flags&CODEC_FLAG_GRAY)) {
00086 s->dsp.idct_put(dest_cb, t->frame.linesize[1], block[4]);
00087 s->dsp.idct_put(dest_cr, t->frame.linesize[2], block[5]);
00088 }
00089 }
00090
00091 static void tqi_calculate_qtable(MpegEncContext *s, int quant)
00092 {
00093 const int qscale = (215 - 2*quant)*5;
00094 int i;
00095 if (s->avctx->idct_algo==FF_IDCT_EA) {
00096 s->intra_matrix[0] = (ff_inv_aanscales[0]*ff_mpeg1_default_intra_matrix[0])>>11;
00097 for(i=1; i<64; i++)
00098 s->intra_matrix[i] = (ff_inv_aanscales[i]*ff_mpeg1_default_intra_matrix[i]*qscale + 32)>>14;
00099 }else{
00100 s->intra_matrix[0] = ff_mpeg1_default_intra_matrix[0];
00101 for(i=1; i<64; i++)
00102 s->intra_matrix[i] = (ff_mpeg1_default_intra_matrix[i]*qscale + 32)>>3;
00103 }
00104 }
00105
00106 static int tqi_decode_frame(AVCodecContext *avctx,
00107 void *data, int *data_size,
00108 AVPacket *avpkt)
00109 {
00110 const uint8_t *buf = avpkt->data;
00111 int buf_size = avpkt->size;
00112 const uint8_t *buf_end = buf+buf_size;
00113 TqiContext *t = avctx->priv_data;
00114 MpegEncContext *s = &t->s;
00115
00116 s->width = AV_RL16(&buf[0]);
00117 s->height = AV_RL16(&buf[2]);
00118 tqi_calculate_qtable(s, buf[4]);
00119 buf += 8;
00120
00121 if (t->frame.data[0])
00122 avctx->release_buffer(avctx, &t->frame);
00123
00124 if (s->avctx->width!=s->width || s->avctx->height!=s->height)
00125 avcodec_set_dimensions(s->avctx, s->width, s->height);
00126
00127 if(avctx->get_buffer(avctx, &t->frame) < 0) {
00128 av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
00129 return -1;
00130 }
00131
00132 av_fast_malloc(&t->bitstream_buf, &t->bitstream_buf_size, (buf_end-buf) + FF_INPUT_BUFFER_PADDING_SIZE);
00133 if (!t->bitstream_buf)
00134 return AVERROR(ENOMEM);
00135 s->dsp.bswap_buf(t->bitstream_buf, (const uint32_t*)buf, (buf_end-buf)/4);
00136 init_get_bits(&s->gb, t->bitstream_buf, 8*(buf_end-buf));
00137
00138 s->last_dc[0] = s->last_dc[1] = s->last_dc[2] = 0;
00139 for (s->mb_y=0; s->mb_y<(avctx->height+15)/16; s->mb_y++)
00140 for (s->mb_x=0; s->mb_x<(avctx->width+15)/16; s->mb_x++)
00141 {
00142 if (tqi_decode_mb(s, t->block) < 0)
00143 break;
00144 tqi_idct_put(t, t->block);
00145 }
00146
00147 *data_size = sizeof(AVFrame);
00148 *(AVFrame*)data = t->frame;
00149 return buf_size;
00150 }
00151
00152 static av_cold int tqi_decode_end(AVCodecContext *avctx)
00153 {
00154 TqiContext *t = avctx->priv_data;
00155 if(t->frame.data[0])
00156 avctx->release_buffer(avctx, &t->frame);
00157 av_free(t->bitstream_buf);
00158 return 0;
00159 }
00160
00161 AVCodec eatqi_decoder = {
00162 "eatqi",
00163 AVMEDIA_TYPE_VIDEO,
00164 CODEC_ID_TQI,
00165 sizeof(TqiContext),
00166 tqi_decode_init,
00167 NULL,
00168 tqi_decode_end,
00169 tqi_decode_frame,
00170 CODEC_CAP_DR1,
00171 .long_name = NULL_IF_CONFIG_SMALL("Electronic Arts TQI Video"),
00172 };