Imported Upstream version 6.1
[platform/upstream/ffmpeg.git] / 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 "bytestream.h"
25 #include "avcodec.h"
26 #include "codec_internal.h"
27 #include "decode.h"
28 #include "texturedsp.h"
29
30 #define TXD_DXT1 0x31545844
31 #define TXD_DXT3 0x33545844
32
33 static int txd_decode_frame(AVCodecContext *avctx, AVFrame *p,
34                             int *got_frame, AVPacket *avpkt)
35 {
36     GetByteContext gb;
37     TextureDSPContext dxtc;
38     unsigned int version, w, h, d3d_format, depth, stride, flags;
39     unsigned int y, v;
40     uint8_t *ptr;
41     uint32_t *pal;
42     int i, j;
43     int ret;
44
45     if (avpkt->size < 88)
46         return AVERROR_INVALIDDATA;
47
48     ff_texturedsp_init(&dxtc);
49
50     bytestream2_init(&gb, avpkt->data, avpkt->size);
51     version         = bytestream2_get_le32(&gb);
52     bytestream2_skip(&gb, 72);
53     d3d_format      = bytestream2_get_le32(&gb);
54     w               = bytestream2_get_le16(&gb);
55     h               = bytestream2_get_le16(&gb);
56     depth           = bytestream2_get_byte(&gb);
57     bytestream2_skip(&gb, 2);
58     flags           = bytestream2_get_byte(&gb);
59
60     if (version < 8 || version > 9) {
61         avpriv_report_missing_feature(avctx, "Texture data version %u", version);
62         return AVERROR_PATCHWELCOME;
63     }
64
65     if (depth == 8) {
66         avctx->pix_fmt = AV_PIX_FMT_PAL8;
67         if (bytestream2_get_bytes_left(&gb) < w * h + 4 * 256)
68             return AVERROR_INVALIDDATA;
69     } else if (depth == 16) {
70         avctx->pix_fmt = AV_PIX_FMT_RGBA;
71         switch (d3d_format) {
72         case 0:
73             if (!(flags & 1))
74                 goto unsupported;
75         case TXD_DXT1:
76             if (bytestream2_get_bytes_left(&gb) < AV_CEIL_RSHIFT(w, 2) * AV_CEIL_RSHIFT(h, 2) * 8 + 4)
77                 return AVERROR_INVALIDDATA;
78             break;
79         case TXD_DXT3:
80             if (bytestream2_get_bytes_left(&gb) < AV_CEIL_RSHIFT(w, 2) * AV_CEIL_RSHIFT(h, 2) * 16 + 4)
81                 return AVERROR_INVALIDDATA;
82         }
83     } else if (depth == 32) {
84         avctx->pix_fmt = AV_PIX_FMT_RGBA;
85         if (bytestream2_get_bytes_left(&gb) < h * w * 4)
86             return AVERROR_INVALIDDATA;
87     } else {
88         avpriv_report_missing_feature(avctx, "Color depth of %u", depth);
89         return AVERROR_PATCHWELCOME;
90     }
91
92     if ((ret = ff_set_dimensions(avctx, w, h)) < 0)
93         return ret;
94
95     avctx->coded_width  = FFALIGN(w, 4);
96     avctx->coded_height = FFALIGN(h, 4);
97
98     if ((ret = ff_get_buffer(avctx, p, 0)) < 0)
99         return ret;
100
101     p->pict_type = AV_PICTURE_TYPE_I;
102
103     ptr    = p->data[0];
104     stride = p->linesize[0];
105
106     if (depth == 8) {
107         pal = (uint32_t *) p->data[1];
108         for (y = 0; y < 256; y++) {
109             v = bytestream2_get_be32(&gb);
110             pal[y] = (v >> 8) + (v << 24);
111         }
112         bytestream2_skip(&gb, 4);
113         for (y=0; y<h; y++) {
114             bytestream2_get_buffer(&gb, ptr, w);
115             ptr += stride;
116         }
117     } else if (depth == 16) {
118         bytestream2_skip(&gb, 4);
119         switch (d3d_format) {
120         case 0:
121         case TXD_DXT1:
122             for (j = 0; j < avctx->height; j += 4) {
123                 for (i = 0; i < avctx->width; i += 4) {
124                     uint8_t *p = ptr + i * 4 + j * stride;
125                     int step = dxtc.dxt1_block(p, stride, gb.buffer);
126                     bytestream2_skip(&gb, step);
127                 }
128             }
129             break;
130         case TXD_DXT3:
131             for (j = 0; j < avctx->height; j += 4) {
132                 for (i = 0; i < avctx->width; i += 4) {
133                     uint8_t *p = ptr + i * 4 + j * stride;
134                     int step = dxtc.dxt3_block(p, stride, gb.buffer);
135                     bytestream2_skip(&gb, step);
136                 }
137             }
138             break;
139         default:
140             goto unsupported;
141         }
142     } else if (depth == 32) {
143         switch (d3d_format) {
144         case 0x15:
145         case 0x16:
146             for (y=0; y<h; y++) {
147                 bytestream2_get_buffer(&gb, ptr, w * 4);
148                 ptr += stride;
149             }
150             break;
151         default:
152             goto unsupported;
153         }
154     }
155
156     *got_frame = 1;
157
158     return avpkt->size;
159
160 unsupported:
161     avpriv_report_missing_feature(avctx, "d3d format (%08x)", d3d_format);
162     return AVERROR_PATCHWELCOME;
163 }
164
165 const FFCodec ff_txd_decoder = {
166     .p.name         = "txd",
167     CODEC_LONG_NAME("Renderware TXD (TeXture Dictionary) image"),
168     .p.type         = AVMEDIA_TYPE_VIDEO,
169     .p.id           = AV_CODEC_ID_TXD,
170     .p.capabilities = AV_CODEC_CAP_DR1,
171     FF_CODEC_DECODE_CB(txd_decode_frame),
172 };