Merge commit 'ade402804a0e811cd00862c90559121a793054a6'
[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 "libavutil/intreadwrite.h"
25 #include "libavutil/imgutils.h"
26 #include "bytestream.h"
27 #include "avcodec.h"
28 #include "internal.h"
29 #include "s3tc.h"
30
31 typedef struct TXDContext {
32     AVFrame picture;
33 } TXDContext;
34
35 static av_cold int txd_init(AVCodecContext *avctx) {
36     TXDContext *s = avctx->priv_data;
37
38     avcodec_get_frame_defaults(&s->picture);
39     avctx->coded_frame = &s->picture;
40
41     return 0;
42 }
43
44 static int txd_decode_frame(AVCodecContext *avctx, void *data, int *got_frame,
45                             AVPacket *avpkt) {
46     TXDContext * const s = avctx->priv_data;
47     GetByteContext gb;
48     AVFrame *picture = data;
49     AVFrame * const p = &s->picture;
50     unsigned int version, w, h, d3d_format, depth, stride, flags;
51     unsigned int y, v;
52     uint8_t *ptr;
53     uint32_t *pal;
54     int ret;
55
56     bytestream2_init(&gb, avpkt->data, avpkt->size);
57     version         = bytestream2_get_le32(&gb);
58     bytestream2_skip(&gb, 72);
59     d3d_format      = bytestream2_get_le32(&gb);
60     w               = bytestream2_get_le16(&gb);
61     h               = bytestream2_get_le16(&gb);
62     depth           = bytestream2_get_byte(&gb);
63     bytestream2_skip(&gb, 2);
64     flags           = bytestream2_get_byte(&gb);
65
66     if (version < 8 || version > 9) {
67         av_log(avctx, AV_LOG_ERROR, "texture data version %i is unsupported\n",
68                                                                     version);
69         return AVERROR_PATCHWELCOME;
70     }
71
72     if (depth == 8) {
73         avctx->pix_fmt = AV_PIX_FMT_PAL8;
74     } else if (depth == 16 || depth == 32) {
75         avctx->pix_fmt = AV_PIX_FMT_RGB32;
76     } else {
77         av_log(avctx, AV_LOG_ERROR, "depth of %i is unsupported\n", depth);
78         return AVERROR_PATCHWELCOME;
79     }
80
81     if (p->data[0])
82         avctx->release_buffer(avctx, p);
83
84     if ((ret = av_image_check_size(w, h, 0, avctx)) < 0)
85         return ret;
86     if (w != avctx->width || h != avctx->height)
87         avcodec_set_dimensions(avctx, w, h);
88     if ((ret = ff_get_buffer(avctx, p)) < 0) {
89         av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
90         return ret;
91     }
92
93     p->pict_type = AV_PICTURE_TYPE_I;
94
95     ptr    = p->data[0];
96     stride = p->linesize[0];
97
98     if (depth == 8) {
99         pal = (uint32_t *) p->data[1];
100         for (y = 0; y < 256; y++) {
101             v = bytestream2_get_be32(&gb);
102             pal[y] = (v >> 8) + (v << 24);
103         }
104         if (bytestream2_get_bytes_left(&gb) < w * h)
105             return AVERROR_INVALIDDATA;
106         bytestream2_skip(&gb, 4);
107         for (y=0; y<h; y++) {
108             bytestream2_get_buffer(&gb, ptr, w);
109             ptr += stride;
110         }
111     } else if (depth == 16) {
112         bytestream2_skip(&gb, 4);
113         switch (d3d_format) {
114         case 0:
115             if (!(flags & 1))
116                 goto unsupported;
117         case FF_S3TC_DXT1:
118             if (bytestream2_get_bytes_left(&gb) < (w/4) * (h/4) * 8)
119                 return AVERROR_INVALIDDATA;
120             ff_decode_dxt1(&gb, ptr, w, h, stride);
121             break;
122         case FF_S3TC_DXT3:
123             if (bytestream2_get_bytes_left(&gb) < (w/4) * (h/4) * 16)
124                 return AVERROR_INVALIDDATA;
125             ff_decode_dxt3(&gb, ptr, w, h, stride);
126             break;
127         default:
128             goto unsupported;
129         }
130     } else if (depth == 32) {
131         switch (d3d_format) {
132         case 0x15:
133         case 0x16:
134             if (bytestream2_get_bytes_left(&gb) < h * w * 4)
135                 return AVERROR_INVALIDDATA;
136             for (y=0; y<h; y++) {
137                 bytestream2_get_buffer(&gb, ptr, w * 4);
138                 ptr += stride;
139             }
140             break;
141         default:
142             goto unsupported;
143         }
144     }
145
146     *picture   = s->picture;
147     *got_frame = 1;
148
149     return avpkt->size;
150
151 unsupported:
152     av_log(avctx, AV_LOG_ERROR, "unsupported d3d format (%08x)\n", d3d_format);
153     return AVERROR_PATCHWELCOME;
154 }
155
156 static av_cold int txd_end(AVCodecContext *avctx) {
157     TXDContext *s = avctx->priv_data;
158
159     if (s->picture.data[0])
160         avctx->release_buffer(avctx, &s->picture);
161
162     return 0;
163 }
164
165 AVCodec ff_txd_decoder = {
166     .name           = "txd",
167     .type           = AVMEDIA_TYPE_VIDEO,
168     .id             = AV_CODEC_ID_TXD,
169     .priv_data_size = sizeof(TXDContext),
170     .init           = txd_init,
171     .close          = txd_end,
172     .decode         = txd_decode_frame,
173     .capabilities   = CODEC_CAP_DR1,
174     .long_name      = NULL_IF_CONFIG_SMALL("Renderware TXD (TeXture Dictionary) image"),
175 };