ffmpeg/libavcodec/txd.c

   1 /*
   2  * Renderware TeXture Dictionary (.txd) image decoder
   3  * Copyright (c) 2007 Ivo van Poorten
   4  *
   5  * See also: http://wiki.multimedia.cx/index.php?title=TXD
   6  *
   7  * This file is part of FFmpeg.
   8  *
   9  * FFmpeg is free software; you can redistribute it and/or
  10  * modify it under the terms of the GNU Lesser General Public
  11  * License as published by the Free Software Foundation; either
  12  * version 2.1 of the License, or (at your option) any later version.
  13  *
  14  * FFmpeg is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  17  * Lesser General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU Lesser General Public
  20  * License along with FFmpeg; if not, write to the Free Software
  21  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  22  */
  23
  24 #include "libavutil/intreadwrite.h"
  25 #include "libavutil/imgutils.h"
  26 #include "bytestream.h"
  27 #include "avcodec.h"
  28 #include "s3tc.h"
  29
  30 typedef struct TXDContext {
  31     AVFrame picture;
  32 } TXDContext;
  33
  34 static av_cold int txd_init(AVCodecContext *avctx) {
  35     TXDContext *s = avctx->priv_data;
  36
  37     avcodec_get_frame_defaults(&s->picture);
  38     avctx->coded_frame = &s->picture;
  39
  40     return 0;
  41 }
  42
  43 static int txd_decode_frame(AVCodecContext *avctx, void *data, int *data_size,
  44                             AVPacket *avpkt) {
  45     const uint8_t *buf = avpkt->data;
  46     const uint8_t *buf_end = avpkt->data + avpkt->size;
  47     TXDContext * const s = avctx->priv_data;
  48     AVFrame *picture = data;
  49     AVFrame * const p = &s->picture;
  50     unsigned int version, w, h, d3d_format, depth, stride, mipmap_count, flags;
  51     unsigned int y, v;
  52     uint8_t *ptr;
  53     const uint8_t *cur = buf;
  54     const uint32_t *palette = (const uint32_t *)(cur + 88);
  55     uint32_t *pal;
  56
  57     if (buf_end - cur < 92)
  58         return AVERROR_INVALIDDATA;
  59     version         = AV_RL32(cur);
  60     d3d_format      = AV_RL32(cur+76);
  61     w               = AV_RL16(cur+80);
  62     h               = AV_RL16(cur+82);
  63     depth           = AV_RL8 (cur+84);
  64     mipmap_count    = AV_RL8 (cur+85);
  65     flags           = AV_RL8 (cur+87);
  66     cur            += 92;
  67
  68     if (version < 8 || version > 9) {
  69         av_log(avctx, AV_LOG_ERROR, "texture data version %i is unsupported\n",
  70                                                                     version);
  71         return -1;
  72     }
  73
  74     if (depth == 8) {
  75         avctx->pix_fmt = PIX_FMT_PAL8;
  76         if (buf_end - cur < 1024)
  77             return AVERROR_INVALIDDATA;
  78         cur += 1024;
  79     } else if (depth == 16 || depth == 32)
  80         avctx->pix_fmt = PIX_FMT_RGB32;
  81     else {
  82         av_log(avctx, AV_LOG_ERROR, "depth of %i is unsupported\n", depth);
  83         return -1;
  84     }
  85
  86     if (p->data[0])
  87         avctx->release_buffer(avctx, p);
  88
  89     if (av_image_check_size(w, h, 0, avctx))
  90         return -1;
  91     if (w != avctx->width || h != avctx->height)
  92         avcodec_set_dimensions(avctx, w, h);
  93     if (avctx->get_buffer(avctx, p) < 0) {
  94         av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
  95         return -1;
  96     }
  97
  98     p->pict_type = AV_PICTURE_TYPE_I;
  99
 100     ptr    = p->data[0];
 101     stride = p->linesize[0];
 102
 103     if (depth == 8) {
 104         pal = (uint32_t *) p->data[1];
 105         for (y=0; y<256; y++) {
 106             v = AV_RB32(palette+y);
 107             pal[y] = (v>>8) + (v<<24);
 108         }
 109         if (buf_end - cur < w * h)
 110             return AVERROR_INVALIDDATA;
 111         for (y=0; y<h; y++) {
 112             memcpy(ptr, cur, w);
 113             ptr += stride;
 114             cur += w;
 115         }
 116     } else if (depth == 16) {
 117         switch (d3d_format) {
 118         case 0:
 119             if (!(flags & 1))
 120                 goto unsupported;
 121         case FF_S3TC_DXT1:
 122             if (buf_end - cur < (w/4) * (h/4) * 8)
 123                 return AVERROR_INVALIDDATA;
 124             ff_decode_dxt1(cur, ptr, w, h, stride);
 125             break;
 126         case FF_S3TC_DXT3:
 127             if (buf_end - cur < (w/4) * (h/4) * 16)
 128                 return AVERROR_INVALIDDATA;
 129             ff_decode_dxt3(cur, ptr, w, h, stride);
 130             break;
 131         default:
 132             goto unsupported;
 133         }
 134     } else if (depth == 32) {
 135         switch (d3d_format) {
 136         case 0x15:
 137         case 0x16:
 138             if (buf_end - cur < h * w * 4)
 139                 return AVERROR_INVALIDDATA;
 140             for (y=0; y<h; y++) {
 141                 memcpy(ptr, cur, w*4);
 142                 ptr += stride;
 143                 cur += w*4;
 144             }
 145             break;
 146         default:
 147             goto unsupported;
 148         }
 149     }
 150
 151     for (; mipmap_count > 1 && buf_end - cur >= 4; mipmap_count--) {
 152         uint32_t length = bytestream_get_le32(&cur);
 153         if (buf_end - cur < length)
 154             break;
 155         cur += length;
 156     }
 157
 158     *picture   = s->picture;
 159     *data_size = sizeof(AVPicture);
 160
 161     return cur - buf;
 162
 163 unsupported:
 164     av_log(avctx, AV_LOG_ERROR, "unsupported d3d format (%08x)\n", d3d_format);
 165     return -1;
 166 }
 167
 168 static av_cold int txd_end(AVCodecContext *avctx) {
 169     TXDContext *s = avctx->priv_data;
 170
 171     if (s->picture.data[0])
 172         avctx->release_buffer(avctx, &s->picture);
 173
 174     return 0;
 175 }
 176
 177 AVCodec ff_txd_decoder = {
 178     .name           = "txd",
 179     .type           = AVMEDIA_TYPE_VIDEO,
 180     .id             = CODEC_ID_TXD,
 181     .priv_data_size = sizeof(TXDContext),
 182     .init           = txd_init,
 183     .close          = txd_end,
 184     .decode         = txd_decode_frame,
 185     .capabilities   = CODEC_CAP_DR1,
 186     .long_name = NULL_IF_CONFIG_SMALL("Renderware TXD (TeXture Dictionary) image"),
 187 };