]> git.sesse.net Git - ffmpeg/blob - libavcodec/xwddec.c
Merge commit '678e455f1dc09265464b13d936d9fda62bc2bf43'
[ffmpeg] / libavcodec / xwddec.c
1 /*
2  * XWD image format
3  *
4  * Copyright (c) 2012 Paul B Mahol
5  *
6  * This file is part of FFmpeg.
7  *
8  * FFmpeg is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * FFmpeg is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with FFmpeg; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21  */
22
23 #include <inttypes.h>
24
25 #include "libavutil/imgutils.h"
26 #include "avcodec.h"
27 #include "bytestream.h"
28 #include "internal.h"
29 #include "xwd.h"
30
31 static int xwd_decode_frame(AVCodecContext *avctx, void *data,
32                             int *got_frame, AVPacket *avpkt)
33 {
34     AVFrame *p = data;
35     const uint8_t *buf = avpkt->data;
36     int i, ret, buf_size = avpkt->size;
37     uint32_t version, header_size, vclass, ncolors;
38     uint32_t xoffset, be, bpp, lsize, rsize;
39     uint32_t pixformat, pixdepth, bunit, bitorder, bpad;
40     uint32_t rgb[3];
41     uint8_t *ptr;
42     GetByteContext gb;
43
44     if (buf_size < XWD_HEADER_SIZE)
45         return AVERROR_INVALIDDATA;
46
47     bytestream2_init(&gb, buf, buf_size);
48     header_size = bytestream2_get_be32u(&gb);
49
50     version = bytestream2_get_be32u(&gb);
51     if (version != XWD_VERSION) {
52         av_log(avctx, AV_LOG_ERROR, "unsupported version\n");
53         return AVERROR_INVALIDDATA;
54     }
55
56     if (buf_size < header_size || header_size < XWD_HEADER_SIZE) {
57         av_log(avctx, AV_LOG_ERROR, "invalid header size\n");
58         return AVERROR_INVALIDDATA;
59     }
60
61     pixformat     = bytestream2_get_be32u(&gb);
62     pixdepth      = bytestream2_get_be32u(&gb);
63     avctx->width  = bytestream2_get_be32u(&gb);
64     avctx->height = bytestream2_get_be32u(&gb);
65     xoffset       = bytestream2_get_be32u(&gb);
66     be            = bytestream2_get_be32u(&gb);
67     bunit         = bytestream2_get_be32u(&gb);
68     bitorder      = bytestream2_get_be32u(&gb);
69     bpad          = bytestream2_get_be32u(&gb);
70     bpp           = bytestream2_get_be32u(&gb);
71     lsize         = bytestream2_get_be32u(&gb);
72     vclass        = bytestream2_get_be32u(&gb);
73     rgb[0]        = bytestream2_get_be32u(&gb);
74     rgb[1]        = bytestream2_get_be32u(&gb);
75     rgb[2]        = bytestream2_get_be32u(&gb);
76     bytestream2_skipu(&gb, 8);
77     ncolors       = bytestream2_get_be32u(&gb);
78     bytestream2_skipu(&gb, header_size - (XWD_HEADER_SIZE - 20));
79
80     av_log(avctx, AV_LOG_DEBUG,
81            "pixformat %"PRIu32", pixdepth %"PRIu32", bunit %"PRIu32", bitorder %"PRIu32", bpad %"PRIu32"\n",
82            pixformat, pixdepth, bunit, bitorder, bpad);
83     av_log(avctx, AV_LOG_DEBUG,
84            "vclass %"PRIu32", ncolors %"PRIu32", bpp %"PRIu32", be %"PRIu32", lsize %"PRIu32", xoffset %"PRIu32"\n",
85            vclass, ncolors, bpp, be, lsize, xoffset);
86     av_log(avctx, AV_LOG_DEBUG, "red %0x, green %0x, blue %0x\n", rgb[0], rgb[1], rgb[2]);
87
88     if (pixformat > XWD_Z_PIXMAP) {
89         av_log(avctx, AV_LOG_ERROR, "invalid pixmap format\n");
90         return AVERROR_INVALIDDATA;
91     }
92
93     if (pixdepth == 0 || pixdepth > 32) {
94         av_log(avctx, AV_LOG_ERROR, "invalid pixmap depth\n");
95         return AVERROR_INVALIDDATA;
96     }
97
98     if (xoffset) {
99         avpriv_request_sample(avctx, "xoffset %"PRIu32"", xoffset);
100         return AVERROR_PATCHWELCOME;
101     }
102
103     if (be > 1) {
104         av_log(avctx, AV_LOG_ERROR, "invalid byte order\n");
105         return AVERROR_INVALIDDATA;
106     }
107
108     if (bitorder > 1) {
109         av_log(avctx, AV_LOG_ERROR, "invalid bitmap bit order\n");
110         return AVERROR_INVALIDDATA;
111     }
112
113     if (bunit != 8 && bunit != 16 && bunit != 32) {
114         av_log(avctx, AV_LOG_ERROR, "invalid bitmap unit\n");
115         return AVERROR_INVALIDDATA;
116     }
117
118     if (bpad != 8 && bpad != 16 && bpad != 32) {
119         av_log(avctx, AV_LOG_ERROR, "invalid bitmap scan-line pad\n");
120         return AVERROR_INVALIDDATA;
121     }
122
123     if (bpp == 0 || bpp > 32) {
124         av_log(avctx, AV_LOG_ERROR, "invalid bits per pixel\n");
125         return AVERROR_INVALIDDATA;
126     }
127
128     if (ncolors > 256) {
129         av_log(avctx, AV_LOG_ERROR, "invalid number of entries in colormap\n");
130         return AVERROR_INVALIDDATA;
131     }
132
133     if ((ret = av_image_check_size(avctx->width, avctx->height, 0, NULL)) < 0)
134         return ret;
135
136     rsize = FFALIGN(avctx->width * bpp, bpad) / 8;
137     if (lsize < rsize) {
138         av_log(avctx, AV_LOG_ERROR, "invalid bytes per scan-line\n");
139         return AVERROR_INVALIDDATA;
140     }
141
142     if (bytestream2_get_bytes_left(&gb) < ncolors * XWD_CMAP_SIZE + avctx->height * lsize) {
143         av_log(avctx, AV_LOG_ERROR, "input buffer too small\n");
144         return AVERROR_INVALIDDATA;
145     }
146
147     if (pixformat != XWD_Z_PIXMAP) {
148         avpriv_report_missing_feature(avctx, "Pixmap format %"PRIu32, pixformat);
149         return AVERROR_PATCHWELCOME;
150     }
151
152     avctx->pix_fmt = AV_PIX_FMT_NONE;
153     switch (vclass) {
154     case XWD_STATIC_GRAY:
155     case XWD_GRAY_SCALE:
156         if (bpp != 1 && bpp != 8)
157             return AVERROR_INVALIDDATA;
158         if (pixdepth == 1) {
159             avctx->pix_fmt = AV_PIX_FMT_MONOWHITE;
160         } else if (pixdepth == 8) {
161             avctx->pix_fmt = AV_PIX_FMT_GRAY8;
162         }
163         break;
164     case XWD_STATIC_COLOR:
165     case XWD_PSEUDO_COLOR:
166         if (bpp == 8)
167             avctx->pix_fmt = AV_PIX_FMT_PAL8;
168         break;
169     case XWD_TRUE_COLOR:
170     case XWD_DIRECT_COLOR:
171         if (bpp != 16 && bpp != 24 && bpp != 32)
172             return AVERROR_INVALIDDATA;
173         if (bpp == 16 && pixdepth == 15) {
174             if (rgb[0] == 0x7C00 && rgb[1] == 0x3E0 && rgb[2] == 0x1F)
175                 avctx->pix_fmt = be ? AV_PIX_FMT_RGB555BE : AV_PIX_FMT_RGB555LE;
176             else if (rgb[0] == 0x1F && rgb[1] == 0x3E0 && rgb[2] == 0x7C00)
177                 avctx->pix_fmt = be ? AV_PIX_FMT_BGR555BE : AV_PIX_FMT_BGR555LE;
178         } else if (bpp == 16 && pixdepth == 16) {
179             if (rgb[0] == 0xF800 && rgb[1] == 0x7E0 && rgb[2] == 0x1F)
180                 avctx->pix_fmt = be ? AV_PIX_FMT_RGB565BE : AV_PIX_FMT_RGB565LE;
181             else if (rgb[0] == 0x1F && rgb[1] == 0x7E0 && rgb[2] == 0xF800)
182                 avctx->pix_fmt = be ? AV_PIX_FMT_BGR565BE : AV_PIX_FMT_BGR565LE;
183         } else if (bpp == 24) {
184             if (rgb[0] == 0xFF0000 && rgb[1] == 0xFF00 && rgb[2] == 0xFF)
185                 avctx->pix_fmt = be ? AV_PIX_FMT_RGB24 : AV_PIX_FMT_BGR24;
186             else if (rgb[0] == 0xFF && rgb[1] == 0xFF00 && rgb[2] == 0xFF0000)
187                 avctx->pix_fmt = be ? AV_PIX_FMT_BGR24 : AV_PIX_FMT_RGB24;
188         } else if (bpp == 32) {
189             if (rgb[0] == 0xFF0000 && rgb[1] == 0xFF00 && rgb[2] == 0xFF)
190                 avctx->pix_fmt = be ? AV_PIX_FMT_ARGB : AV_PIX_FMT_BGRA;
191             else if (rgb[0] == 0xFF && rgb[1] == 0xFF00 && rgb[2] == 0xFF0000)
192                 avctx->pix_fmt = be ? AV_PIX_FMT_ABGR : AV_PIX_FMT_RGBA;
193         }
194         bytestream2_skipu(&gb, ncolors * XWD_CMAP_SIZE);
195         break;
196     default:
197         av_log(avctx, AV_LOG_ERROR, "invalid visual class\n");
198         return AVERROR_INVALIDDATA;
199     }
200
201     if (avctx->pix_fmt == AV_PIX_FMT_NONE) {
202         avpriv_request_sample(avctx,
203                               "Unknown file: bpp %"PRIu32", pixdepth %"PRIu32", vclass %"PRIu32"",
204                               bpp, pixdepth, vclass);
205         return AVERROR_PATCHWELCOME;
206     }
207
208     if ((ret = ff_get_buffer(avctx, p, 0)) < 0)
209         return ret;
210
211     p->key_frame = 1;
212     p->pict_type = AV_PICTURE_TYPE_I;
213
214     if (avctx->pix_fmt == AV_PIX_FMT_PAL8) {
215         uint32_t *dst = (uint32_t *)p->data[1];
216         uint8_t red, green, blue;
217
218         for (i = 0; i < ncolors; i++) {
219
220             bytestream2_skipu(&gb, 4); // skip colormap entry number
221             red    = bytestream2_get_byteu(&gb);
222             bytestream2_skipu(&gb, 1);
223             green  = bytestream2_get_byteu(&gb);
224             bytestream2_skipu(&gb, 1);
225             blue   = bytestream2_get_byteu(&gb);
226             bytestream2_skipu(&gb, 3); // skip bitmask flag and padding
227
228             dst[i] = red << 16 | green << 8 | blue;
229         }
230     }
231
232     ptr = p->data[0];
233     for (i = 0; i < avctx->height; i++) {
234         bytestream2_get_bufferu(&gb, ptr, rsize);
235         bytestream2_skipu(&gb, lsize - rsize);
236         ptr += p->linesize[0];
237     }
238
239     *got_frame       = 1;
240
241     return buf_size;
242 }
243
244 AVCodec ff_xwd_decoder = {
245     .name           = "xwd",
246     .long_name      = NULL_IF_CONFIG_SMALL("XWD (X Window Dump) image"),
247     .type           = AVMEDIA_TYPE_VIDEO,
248     .id             = AV_CODEC_ID_XWD,
249     .decode         = xwd_decode_frame,
250     .capabilities   = CODEC_CAP_DR1,
251 };