dds: Drop gray-alpha swapping
[ffmpeg.git] / libavcodec / dds.c
1 /*
2  * DirectDraw Surface image decoder
3  * Copyright (C) 2015 Vittorio Giovara <vittorio.giovara@gmail.com>
4  *
5  * This file is part of Libav.
6  *
7  * Libav is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * Libav is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with Libav; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21
22 /**
23  * @file
24  * DDS decoder
25  *
26  * https://msdn.microsoft.com/en-us/library/bb943982%28v=vs.85%29.aspx
27  */
28
29 #include <stdint.h>
30
31 #include "libavutil/imgutils.h"
32
33 #include "avcodec.h"
34 #include "bytestream.h"
35 #include "internal.h"
36 #include "texturedsp.h"
37 #include "thread.h"
38
39 #define DDPF_FOURCC    (1 <<  2)
40 #define DDPF_PALETTE   (1 <<  5)
41 #define DDPF_NORMALMAP (1 << 31)
42
43 enum DDSPostProc {
44     DDS_NONE = 0,
45     DDS_ALPHA_EXP,
46     DDS_NORMAL_MAP,
47     DDS_RAW_YCOCG,
48     DDS_SWIZZLE_A2XY,
49     DDS_SWIZZLE_RBXG,
50     DDS_SWIZZLE_RGXB,
51     DDS_SWIZZLE_RXBG,
52     DDS_SWIZZLE_RXGB,
53     DDS_SWIZZLE_XGBR,
54     DDS_SWIZZLE_XRBG,
55     DDS_SWIZZLE_XGXR,
56 };
57
58 enum DDSDXGIFormat {
59     DXGI_FORMAT_R16G16B16A16_TYPELESS       =  9,
60     DXGI_FORMAT_R16G16B16A16_FLOAT          = 10,
61     DXGI_FORMAT_R16G16B16A16_UNORM          = 11,
62     DXGI_FORMAT_R16G16B16A16_UINT           = 12,
63     DXGI_FORMAT_R16G16B16A16_SNORM          = 13,
64     DXGI_FORMAT_R16G16B16A16_SINT           = 14,
65
66     DXGI_FORMAT_R8G8B8A8_TYPELESS           = 27,
67     DXGI_FORMAT_R8G8B8A8_UNORM              = 28,
68     DXGI_FORMAT_R8G8B8A8_UNORM_SRGB         = 29,
69     DXGI_FORMAT_R8G8B8A8_UINT               = 30,
70     DXGI_FORMAT_R8G8B8A8_SNORM              = 31,
71     DXGI_FORMAT_R8G8B8A8_SINT               = 32,
72
73     DXGI_FORMAT_BC1_TYPELESS                = 70,
74     DXGI_FORMAT_BC1_UNORM                   = 71,
75     DXGI_FORMAT_BC1_UNORM_SRGB              = 72,
76     DXGI_FORMAT_BC2_TYPELESS                = 73,
77     DXGI_FORMAT_BC2_UNORM                   = 74,
78     DXGI_FORMAT_BC2_UNORM_SRGB              = 75,
79     DXGI_FORMAT_BC3_TYPELESS                = 76,
80     DXGI_FORMAT_BC3_UNORM                   = 77,
81     DXGI_FORMAT_BC3_UNORM_SRGB              = 78,
82     DXGI_FORMAT_BC4_TYPELESS                = 79,
83     DXGI_FORMAT_BC4_UNORM                   = 80,
84     DXGI_FORMAT_BC4_SNORM                   = 81,
85     DXGI_FORMAT_BC5_TYPELESS                = 82,
86     DXGI_FORMAT_BC5_UNORM                   = 83,
87     DXGI_FORMAT_BC5_SNORM                   = 84,
88     DXGI_FORMAT_B5G6R5_UNORM                = 85,
89     DXGI_FORMAT_B8G8R8A8_UNORM              = 87,
90     DXGI_FORMAT_B8G8R8X8_UNORM              = 88,
91     DXGI_FORMAT_B8G8R8A8_TYPELESS           = 90,
92     DXGI_FORMAT_B8G8R8A8_UNORM_SRGB         = 91,
93     DXGI_FORMAT_B8G8R8X8_TYPELESS           = 92,
94     DXGI_FORMAT_B8G8R8X8_UNORM_SRGB         = 93,
95 };
96
97 typedef struct DDSContext {
98     TextureDSPContext texdsp;
99     GetByteContext gbc;
100
101     int compressed;
102     int paletted;
103     enum DDSPostProc postproc;
104
105     const uint8_t *tex_data; // Compressed texture
106     int tex_ratio;           // Compression ratio
107     int slice_count;         // Number of slices for threaded operations
108
109     /* Pointer to the selected compress or decompress function. */
110     int (*tex_funct)(uint8_t *dst, ptrdiff_t stride, const uint8_t *block);
111 } DDSContext;
112
113 static int parse_pixel_format(AVCodecContext *avctx)
114 {
115     DDSContext *ctx = avctx->priv_data;
116     GetByteContext *gbc = &ctx->gbc;
117     char buf[32];
118     uint32_t flags, fourcc, gimp_tag;
119     enum DDSDXGIFormat dxgi;
120     int size, bpp, r, g, b, a;
121     int alpha_exponent, ycocg_classic, ycocg_scaled, normal_map, array;
122
123     /* Alternative DDS implementations use reserved1 as custom header. */
124     bytestream2_skip(gbc, 4 * 3);
125     gimp_tag = bytestream2_get_le32(gbc);
126     alpha_exponent = gimp_tag == MKTAG('A', 'E', 'X', 'P');
127     ycocg_classic  = gimp_tag == MKTAG('Y', 'C', 'G', '1');
128     ycocg_scaled   = gimp_tag == MKTAG('Y', 'C', 'G', '2');
129     bytestream2_skip(gbc, 4 * 7);
130
131     /* Now the real DDPF starts. */
132     size = bytestream2_get_le32(gbc);
133     if (size != 32) {
134         av_log(avctx, AV_LOG_ERROR, "Invalid pixel format header %d.\n", size);
135         return AVERROR_INVALIDDATA;
136     }
137     flags = bytestream2_get_le32(gbc);
138     ctx->compressed = flags & DDPF_FOURCC;
139     ctx->paletted   = flags & DDPF_PALETTE;
140     normal_map      = flags & DDPF_NORMALMAP;
141     fourcc = bytestream2_get_le32(gbc);
142
143     if (ctx->compressed && ctx->paletted) {
144         av_log(avctx, AV_LOG_WARNING,
145                "Disabling invalid palette flag for compressed dds.\n");
146         ctx->paletted = 0;
147     }
148
149     bpp = bytestream2_get_le32(gbc); // rgbbitcount
150     r   = bytestream2_get_le32(gbc); // rbitmask
151     g   = bytestream2_get_le32(gbc); // gbitmask
152     b   = bytestream2_get_le32(gbc); // bbitmask
153     a   = bytestream2_get_le32(gbc); // abitmask
154
155     bytestream2_skip(gbc, 4); // caps
156     bytestream2_skip(gbc, 4); // caps2
157     bytestream2_skip(gbc, 4); // caps3
158     bytestream2_skip(gbc, 4); // caps4
159     bytestream2_skip(gbc, 4); // reserved2
160
161     av_get_codec_tag_string(buf, sizeof(buf), fourcc);
162     av_log(avctx, AV_LOG_VERBOSE, "fourcc %s bpp %d "
163            "r 0x%x g 0x%x b 0x%x a 0x%x\n", buf, bpp, r, g, b, a);
164     if (gimp_tag) {
165         av_get_codec_tag_string(buf, sizeof(buf), gimp_tag);
166         av_log(avctx, AV_LOG_VERBOSE, "and GIMP-DDS tag %s\n", buf);
167     }
168
169     if (ctx->compressed)
170         avctx->pix_fmt = AV_PIX_FMT_RGBA;
171
172     if (ctx->compressed) {
173         switch (fourcc) {
174         case MKTAG('D', 'X', 'T', '1'):
175             ctx->tex_ratio = 8;
176             ctx->tex_funct = ctx->texdsp.dxt1a_block;
177             break;
178         case MKTAG('D', 'X', 'T', '2'):
179             ctx->tex_ratio = 16;
180             ctx->tex_funct = ctx->texdsp.dxt2_block;
181             break;
182         case MKTAG('D', 'X', 'T', '3'):
183             ctx->tex_ratio = 16;
184             ctx->tex_funct = ctx->texdsp.dxt3_block;
185             break;
186         case MKTAG('D', 'X', 'T', '4'):
187             ctx->tex_ratio = 16;
188             ctx->tex_funct = ctx->texdsp.dxt4_block;
189             break;
190         case MKTAG('D', 'X', 'T', '5'):
191             ctx->tex_ratio = 16;
192             if (ycocg_scaled)
193                 ctx->tex_funct = ctx->texdsp.dxt5ys_block;
194             else if (ycocg_classic)
195                 ctx->tex_funct = ctx->texdsp.dxt5y_block;
196             else
197                 ctx->tex_funct = ctx->texdsp.dxt5_block;
198             break;
199         case MKTAG('R', 'X', 'G', 'B'):
200             ctx->tex_ratio = 16;
201             ctx->tex_funct = ctx->texdsp.dxt5_block;
202             /* This format may be considered as a normal map,
203              * but it is handled differently in a separate postproc. */
204             ctx->postproc = DDS_SWIZZLE_RXGB;
205             normal_map = 0;
206             break;
207         case MKTAG('A', 'T', 'I', '1'):
208         case MKTAG('B', 'C', '4', 'U'):
209             ctx->tex_ratio = 8;
210             ctx->tex_funct = ctx->texdsp.rgtc1u_block;
211             break;
212         case MKTAG('B', 'C', '4', 'S'):
213             ctx->tex_ratio = 8;
214             ctx->tex_funct = ctx->texdsp.rgtc1s_block;
215             break;
216         case MKTAG('A', 'T', 'I', '2'):
217             /* RGT2 variant with swapped R and G (3Dc)*/
218             ctx->tex_ratio = 16;
219             ctx->tex_funct = ctx->texdsp.dxn3dc_block;
220             break;
221         case MKTAG('B', 'C', '5', 'U'):
222             ctx->tex_ratio = 16;
223             ctx->tex_funct = ctx->texdsp.rgtc2u_block;
224             break;
225         case MKTAG('B', 'C', '5', 'S'):
226             ctx->tex_ratio = 16;
227             ctx->tex_funct = ctx->texdsp.rgtc2s_block;
228             break;
229         case MKTAG('U', 'Y', 'V', 'Y'):
230             ctx->compressed = 0;
231             avctx->pix_fmt = AV_PIX_FMT_UYVY422;
232             break;
233         case MKTAG('Y', 'U', 'Y', '2'):
234             ctx->compressed = 0;
235             avctx->pix_fmt = AV_PIX_FMT_YUYV422;
236             break;
237         case MKTAG('P', '8', ' ', ' '):
238             /* ATI Palette8, same as normal palette */
239             ctx->compressed = 0;
240             ctx->paletted   = 1;
241             avctx->pix_fmt  = AV_PIX_FMT_PAL8;
242             break;
243         case MKTAG('D', 'X', '1', '0'):
244             /* DirectX 10 extra header */
245             dxgi = bytestream2_get_le32(gbc);
246             bytestream2_skip(gbc, 4); // resourceDimension
247             bytestream2_skip(gbc, 4); // miscFlag
248             array = bytestream2_get_le32(gbc);
249             bytestream2_skip(gbc, 4); // miscFlag2
250
251             if (array != 0)
252                 av_log(avctx, AV_LOG_VERBOSE,
253                        "Found array of size %d (ignored).\n", array);
254
255             /* Only BC[1-5] are actually compressed. */
256             ctx->compressed = (dxgi >= 70) && (dxgi <= 84);
257
258             av_log(avctx, AV_LOG_VERBOSE, "DXGI format %d.\n", dxgi);
259             switch (dxgi) {
260             /* RGB types. */
261             case DXGI_FORMAT_R16G16B16A16_TYPELESS:
262             case DXGI_FORMAT_R16G16B16A16_FLOAT:
263             case DXGI_FORMAT_R16G16B16A16_UNORM:
264             case DXGI_FORMAT_R16G16B16A16_UINT:
265             case DXGI_FORMAT_R16G16B16A16_SNORM:
266             case DXGI_FORMAT_R16G16B16A16_SINT:
267                 avctx->pix_fmt = AV_PIX_FMT_BGRA64;
268                 break;
269             case DXGI_FORMAT_R8G8B8A8_UNORM_SRGB:
270                 avctx->colorspace = AVCOL_SPC_RGB;
271             case DXGI_FORMAT_R8G8B8A8_TYPELESS:
272             case DXGI_FORMAT_R8G8B8A8_UNORM:
273             case DXGI_FORMAT_R8G8B8A8_UINT:
274             case DXGI_FORMAT_R8G8B8A8_SNORM:
275             case DXGI_FORMAT_R8G8B8A8_SINT:
276                 avctx->pix_fmt = AV_PIX_FMT_BGRA;
277                 break;
278             case DXGI_FORMAT_B8G8R8A8_UNORM_SRGB:
279                 avctx->colorspace = AVCOL_SPC_RGB;
280             case DXGI_FORMAT_B8G8R8A8_TYPELESS:
281             case DXGI_FORMAT_B8G8R8A8_UNORM:
282                 avctx->pix_fmt = AV_PIX_FMT_RGBA;
283                 break;
284             case DXGI_FORMAT_B8G8R8X8_UNORM_SRGB:
285                 avctx->colorspace = AVCOL_SPC_RGB;
286             case DXGI_FORMAT_B8G8R8X8_TYPELESS:
287             case DXGI_FORMAT_B8G8R8X8_UNORM:
288                 avctx->pix_fmt = AV_PIX_FMT_RGBA; // opaque
289                 break;
290             case DXGI_FORMAT_B5G6R5_UNORM:
291                 avctx->pix_fmt = AV_PIX_FMT_RGB565LE;
292                 break;
293             /* Texture types. */
294             case DXGI_FORMAT_BC1_UNORM_SRGB:
295                 avctx->colorspace = AVCOL_SPC_RGB;
296             case DXGI_FORMAT_BC1_TYPELESS:
297             case DXGI_FORMAT_BC1_UNORM:
298                 ctx->tex_ratio = 8;
299                 ctx->tex_funct = ctx->texdsp.dxt1a_block;
300                 break;
301             case DXGI_FORMAT_BC2_UNORM_SRGB:
302                 avctx->colorspace = AVCOL_SPC_RGB;
303             case DXGI_FORMAT_BC2_TYPELESS:
304             case DXGI_FORMAT_BC2_UNORM:
305                 ctx->tex_ratio = 16;
306                 ctx->tex_funct = ctx->texdsp.dxt3_block;
307                 break;
308             case DXGI_FORMAT_BC3_UNORM_SRGB:
309                 avctx->colorspace = AVCOL_SPC_RGB;
310             case DXGI_FORMAT_BC3_TYPELESS:
311             case DXGI_FORMAT_BC3_UNORM:
312                 ctx->tex_ratio = 16;
313                 ctx->tex_funct = ctx->texdsp.dxt5_block;
314                 break;
315             case DXGI_FORMAT_BC4_TYPELESS:
316             case DXGI_FORMAT_BC4_UNORM:
317                 ctx->tex_ratio = 8;
318                 ctx->tex_funct = ctx->texdsp.rgtc1u_block;
319                 break;
320             case DXGI_FORMAT_BC4_SNORM:
321                 ctx->tex_ratio = 8;
322                 ctx->tex_funct = ctx->texdsp.rgtc1s_block;
323                 break;
324             case DXGI_FORMAT_BC5_TYPELESS:
325             case DXGI_FORMAT_BC5_UNORM:
326                 ctx->tex_ratio = 16;
327                 ctx->tex_funct = ctx->texdsp.rgtc2u_block;
328                 break;
329             case DXGI_FORMAT_BC5_SNORM:
330                 ctx->tex_ratio = 16;
331                 ctx->tex_funct = ctx->texdsp.rgtc2s_block;
332                 break;
333             default:
334                 av_log(avctx, AV_LOG_ERROR,
335                        "Unsupported DXGI format %d.\n", dxgi);
336                 return AVERROR_INVALIDDATA;
337             }
338             break;
339         default:
340             av_log(avctx, AV_LOG_ERROR, "Unsupported %s fourcc.\n", buf);
341             return AVERROR_INVALIDDATA;
342         }
343     } else if (ctx->paletted) {
344         if (bpp == 8) {
345             avctx->pix_fmt = AV_PIX_FMT_PAL8;
346         } else {
347             av_log(avctx, AV_LOG_ERROR, "Unsupported palette bpp %d.\n", bpp);
348             return AVERROR_INVALIDDATA;
349         }
350     } else {
351         /*  8 bpp */
352         if (bpp == 8 && r == 0xff && g == 0 && b == 0 && a == 0)
353             avctx->pix_fmt = AV_PIX_FMT_GRAY8;
354         else if (bpp == 8 && r == 0 && g == 0 && b == 0 && a == 0xff)
355             avctx->pix_fmt = AV_PIX_FMT_GRAY8;
356         /* 16 bpp */
357         else if (bpp == 16 && r == 0xff && g == 0 && b == 0 && a == 0xff00)
358             avctx->pix_fmt = AV_PIX_FMT_YA8;
359         else if (bpp == 16 && r == 0xffff && g == 0 && b == 0 && a == 0)
360             avctx->pix_fmt = AV_PIX_FMT_GRAY16LE;
361         else if (bpp == 16 && r == 0x7c00 && g == 0x3e0 && b == 0x1f && a == 0)
362             avctx->pix_fmt = AV_PIX_FMT_RGB555LE;
363         else if (bpp == 16 && r == 0x7c00 && g == 0x3e0 && b == 0x1f && a == 0x8000)
364             avctx->pix_fmt = AV_PIX_FMT_RGB555LE; // alpha ignored
365         else if (bpp == 16 && r == 0xf800 && g == 0x7e0 && b == 0x1f && a == 0)
366             avctx->pix_fmt = AV_PIX_FMT_RGB565LE;
367         /* 24 bpp */
368         else if (bpp == 24 && r == 0xff0000 && g == 0xff00 && b == 0xff && a == 0)
369             avctx->pix_fmt = AV_PIX_FMT_BGR24;
370         /* 32 bpp */
371         else if (bpp == 32 && r == 0xff0000 && g == 0xff00 && b == 0xff && a == 0)
372             avctx->pix_fmt = AV_PIX_FMT_BGRA; // opaque
373         else if (bpp == 32 && r == 0xff && g == 0xff00 && b == 0xff0000 && a == 0)
374             avctx->pix_fmt = AV_PIX_FMT_RGBA; // opaque
375         else if (bpp == 32 && r == 0xff0000 && g == 0xff00 && b == 0xff && a == 0xff000000)
376             avctx->pix_fmt = AV_PIX_FMT_BGRA;
377         else if (bpp == 32 && r == 0xff && g == 0xff00 && b == 0xff0000 && a == 0xff000000)
378             avctx->pix_fmt = AV_PIX_FMT_RGBA;
379         /* give up */
380         else {
381             av_log(avctx, AV_LOG_ERROR, "Unknown pixel format "
382                    "[bpp %d r 0x%x g 0x%x b 0x%x a 0x%x].\n", bpp, r, g, b, a);
383             return AVERROR_INVALIDDATA;
384         }
385     }
386
387     /* Set any remaining post-proc that should happen before frame is ready. */
388     if (alpha_exponent)
389         ctx->postproc = DDS_ALPHA_EXP;
390     else if (normal_map)
391         ctx->postproc = DDS_NORMAL_MAP;
392     else if (ycocg_classic && !ctx->compressed)
393         ctx->postproc = DDS_RAW_YCOCG;
394
395     /* ATI/NVidia variants sometimes add swizzling in bpp. */
396     switch (bpp) {
397     case MKTAG('A', '2', 'X', 'Y'):
398         ctx->postproc = DDS_SWIZZLE_A2XY;
399         break;
400     case MKTAG('x', 'G', 'B', 'R'):
401         ctx->postproc = DDS_SWIZZLE_XGBR;
402         break;
403     case MKTAG('x', 'R', 'B', 'G'):
404         ctx->postproc = DDS_SWIZZLE_XRBG;
405         break;
406     case MKTAG('R', 'B', 'x', 'G'):
407         ctx->postproc = DDS_SWIZZLE_RBXG;
408         break;
409     case MKTAG('R', 'G', 'x', 'B'):
410         ctx->postproc = DDS_SWIZZLE_RGXB;
411         break;
412     case MKTAG('R', 'x', 'B', 'G'):
413         ctx->postproc = DDS_SWIZZLE_RXBG;
414         break;
415     case MKTAG('x', 'G', 'x', 'R'):
416         ctx->postproc = DDS_SWIZZLE_XGXR;
417         break;
418     case MKTAG('A', '2', 'D', '5'):
419         ctx->postproc = DDS_NORMAL_MAP;
420         break;
421     }
422
423     return 0;
424 }
425
426 static int decompress_texture_thread(AVCodecContext *avctx, void *arg,
427                                      int slice, int thread_nb)
428 {
429     DDSContext *ctx = avctx->priv_data;
430     AVFrame *frame = arg;
431     const uint8_t *d = ctx->tex_data;
432     int w_block = avctx->coded_width / TEXTURE_BLOCK_W;
433     int h_block = avctx->coded_height / TEXTURE_BLOCK_H;
434     int x, y;
435     int start_slice, end_slice;
436     int base_blocks_per_slice = h_block / ctx->slice_count;
437     int remainder_blocks = h_block % ctx->slice_count;
438
439     /* When the frame height (in blocks) doesn't divide evenly between the
440      * number of slices, spread the remaining blocks evenly between the first
441      * operations */
442     start_slice = slice * base_blocks_per_slice;
443     /* Add any extra blocks (one per slice) that have been added before this slice */
444     start_slice += FFMIN(slice, remainder_blocks);
445
446     end_slice = start_slice + base_blocks_per_slice;
447     /* Add an extra block if there are still remainder blocks to be accounted for */
448     if (slice < remainder_blocks)
449         end_slice++;
450
451     for (y = start_slice; y < end_slice; y++) {
452         uint8_t *p = frame->data[0] + y * frame->linesize[0] * TEXTURE_BLOCK_H;
453         int off  = y * w_block;
454         for (x = 0; x < w_block; x++) {
455             ctx->tex_funct(p + x * 16, frame->linesize[0],
456                            d + (off + x) * ctx->tex_ratio);
457         }
458     }
459
460     return 0;
461 }
462
463 static void do_swizzle(AVFrame *frame, int x, int y)
464 {
465     int i;
466     for (i = 0; i < frame->linesize[0] * frame->height; i += 4) {
467         uint8_t *src = frame->data[0] + i;
468         FFSWAP(uint8_t, src[x], src[y]);
469     }
470 }
471
472 static void run_postproc(AVCodecContext *avctx, AVFrame *frame)
473 {
474     DDSContext *ctx = avctx->priv_data;
475     int i, x_off;
476
477     switch (ctx->postproc) {
478     case DDS_ALPHA_EXP:
479         /* Alpha-exponential mode divides each channel by the maximum
480          * R, G or B value, and stores the multiplying factor in the
481          * alpha channel. */
482         av_log(avctx, AV_LOG_DEBUG, "Post-processing alpha exponent.\n");
483
484         for (i = 0; i < frame->linesize[0] * frame->height; i += 4) {
485             uint8_t *src = frame->data[0] + i;
486             int r = src[0];
487             int g = src[1];
488             int b = src[2];
489             int a = src[3];
490
491             src[0] = r * a / 255;
492             src[1] = g * a / 255;
493             src[2] = b * a / 255;
494             src[3] = 255;
495         }
496         break;
497     case DDS_NORMAL_MAP:
498         /* Normal maps work in the XYZ color space and they encode
499          * X in R or in A, depending on the texture type, Y in G and
500          * derive Z with a square root of the distance.
501          *
502          * http://www.realtimecollisiondetection.net/blog/?p=28 */
503         av_log(avctx, AV_LOG_DEBUG, "Post-processing normal map.\n");
504
505         x_off = ctx->tex_ratio == 8 ? 0 : 3;
506         for (i = 0; i < frame->linesize[0] * frame->height; i += 4) {
507             uint8_t *src = frame->data[0] + i;
508             int x = src[x_off];
509             int y = src[1];
510             int z = 127;
511
512             int d = (255 * 255 - x * x - y * y) / 2;
513             if (d > 0)
514                 z = rint(sqrtf(d));
515
516             src[0] = x;
517             src[1] = y;
518             src[2] = z;
519             src[3] = 255;
520         }
521         break;
522     case DDS_RAW_YCOCG:
523         /* Data is Y-Co-Cg-A and not RGBA, but they are represented
524          * with the same masks in the DDPF header. */
525         av_log(avctx, AV_LOG_DEBUG, "Post-processing raw YCoCg.\n");
526
527         for (i = 0; i < frame->linesize[0] * frame->height; i += 4) {
528             uint8_t *src = frame->data[0] + i;
529             int a  = src[0];
530             int cg = src[1] - 128;
531             int co = src[2] - 128;
532             int y  = src[3];
533
534             src[0] = av_clip_uint8(y + co - cg);
535             src[1] = av_clip_uint8(y + cg);
536             src[2] = av_clip_uint8(y - co - cg);
537             src[3] = a;
538         }
539         break;
540     case DDS_SWIZZLE_A2XY:
541         /* Swap R and G, often used to restore a standard RGTC2. */
542         av_log(avctx, AV_LOG_DEBUG, "Post-processing A2XY swizzle.\n");
543         do_swizzle(frame, 0, 1);
544         break;
545     case DDS_SWIZZLE_RBXG:
546         /* Swap G and A, then B and new A (G). */
547         av_log(avctx, AV_LOG_DEBUG, "Post-processing RBXG swizzle.\n");
548         do_swizzle(frame, 1, 3);
549         do_swizzle(frame, 2, 3);
550         break;
551     case DDS_SWIZZLE_RGXB:
552         /* Swap B and A. */
553         av_log(avctx, AV_LOG_DEBUG, "Post-processing RGXB swizzle.\n");
554         do_swizzle(frame, 2, 3);
555         break;
556     case DDS_SWIZZLE_RXBG:
557         /* Swap G and A. */
558         av_log(avctx, AV_LOG_DEBUG, "Post-processing RXBG swizzle.\n");
559         do_swizzle(frame, 1, 3);
560         break;
561     case DDS_SWIZZLE_RXGB:
562         /* Swap R and A (misleading name). */
563         av_log(avctx, AV_LOG_DEBUG, "Post-processing RXGB swizzle.\n");
564         do_swizzle(frame, 0, 3);
565         break;
566     case DDS_SWIZZLE_XGBR:
567         /* Swap B and A, then R and new A (B). */
568         av_log(avctx, AV_LOG_DEBUG, "Post-processing XGBR swizzle.\n");
569         do_swizzle(frame, 2, 3);
570         do_swizzle(frame, 0, 3);
571         break;
572     case DDS_SWIZZLE_XGXR:
573         /* Swap G and A, then R and new A (G), then new R (G) and new G (A).
574          * This variant does not store any B component. */
575         av_log(avctx, AV_LOG_DEBUG, "Post-processing XGXR swizzle.\n");
576         do_swizzle(frame, 1, 3);
577         do_swizzle(frame, 0, 3);
578         do_swizzle(frame, 0, 1);
579         break;
580     case DDS_SWIZZLE_XRBG:
581         /* Swap G and A, then R and new A (G). */
582         av_log(avctx, AV_LOG_DEBUG, "Post-processing XRBG swizzle.\n");
583         do_swizzle(frame, 1, 3);
584         do_swizzle(frame, 0, 3);
585         break;
586     }
587 }
588
589 static int dds_decode(AVCodecContext *avctx, void *data,
590                       int *got_frame, AVPacket *avpkt)
591 {
592     DDSContext *ctx = avctx->priv_data;
593     GetByteContext *gbc = &ctx->gbc;
594     AVFrame *frame = data;
595     int mipmap;
596     int ret;
597
598     ff_texturedsp_init(&ctx->texdsp);
599     bytestream2_init(gbc, avpkt->data, avpkt->size);
600
601     if (bytestream2_get_bytes_left(gbc) < 128) {
602         av_log(avctx, AV_LOG_ERROR, "Frame is too small (%d).\n",
603                bytestream2_get_bytes_left(gbc));
604         return AVERROR_INVALIDDATA;
605     }
606
607     if (bytestream2_get_le32(gbc) != MKTAG('D', 'D', 'S', ' ') ||
608         bytestream2_get_le32(gbc) != 124) { // header size
609         av_log(avctx, AV_LOG_ERROR, "Invalid DDS header.\n");
610         return AVERROR_INVALIDDATA;
611     }
612
613     bytestream2_skip(gbc, 4); // flags
614
615     avctx->height = bytestream2_get_le32(gbc);
616     avctx->width  = bytestream2_get_le32(gbc);
617     ret = av_image_check_size(avctx->width, avctx->height, 0, avctx);
618     if (ret < 0) {
619         av_log(avctx, AV_LOG_ERROR, "Invalid image size %dx%d.\n",
620                avctx->width, avctx->height);
621         return ret;
622     }
623
624     /* Since codec is based on 4x4 blocks, size is aligned to 4. */
625     avctx->coded_width  = FFALIGN(avctx->width,  TEXTURE_BLOCK_W);
626     avctx->coded_height = FFALIGN(avctx->height, TEXTURE_BLOCK_H);
627
628     bytestream2_skip(gbc, 4); // pitch
629     bytestream2_skip(gbc, 4); // depth
630     mipmap = bytestream2_get_le32(gbc);
631     if (mipmap != 0)
632         av_log(avctx, AV_LOG_VERBOSE, "Found %d mipmaps (ignored).\n", mipmap);
633
634     /* Extract pixel format information, considering additional elements
635      * in reserved1 and reserved2. */
636     ret = parse_pixel_format(avctx);
637     if (ret < 0)
638         return ret;
639
640     ret = ff_get_buffer(avctx, frame, 0);
641     if (ret < 0)
642         return ret;
643
644     if (ctx->compressed) {
645         int size = (avctx->coded_height / TEXTURE_BLOCK_H) *
646                    (avctx->coded_width / TEXTURE_BLOCK_W) * ctx->tex_ratio;
647         ctx->slice_count = av_clip(avctx->thread_count, 1,
648                                    avctx->coded_height / TEXTURE_BLOCK_H);
649
650         if (bytestream2_get_bytes_left(gbc) < size) {
651             av_log(avctx, AV_LOG_ERROR,
652                    "Compressed Buffer is too small (%d < %d).\n",
653                    bytestream2_get_bytes_left(gbc), size);
654             return AVERROR_INVALIDDATA;
655         }
656
657         /* Use the decompress function on the texture, one block per thread. */
658         ctx->tex_data = gbc->buffer;
659         avctx->execute2(avctx, decompress_texture_thread, frame, NULL, ctx->slice_count);
660     } else {
661         int linesize = av_image_get_linesize(avctx->pix_fmt, frame->width, 0);
662
663         if (ctx->paletted) {
664             int i;
665             uint32_t *p = (uint32_t*) frame->data[1];
666
667             /* Use the first 1024 bytes as palette, then copy the rest. */
668             for (i = 0; i < 256; i++) {
669                 uint32_t rgba = 0;
670                 rgba |= bytestream2_get_byte(gbc) << 16;
671                 rgba |= bytestream2_get_byte(gbc) << 8;
672                 rgba |= bytestream2_get_byte(gbc) << 0;
673                 rgba |= bytestream2_get_byte(gbc) << 24;
674                 p[i] = rgba;
675             }
676
677             frame->palette_has_changed = 1;
678         }
679
680         if (bytestream2_get_bytes_left(gbc) < frame->height * linesize) {
681             av_log(avctx, AV_LOG_ERROR, "Buffer is too small (%d < %d).\n",
682                    bytestream2_get_bytes_left(gbc), frame->height * linesize);
683             return AVERROR_INVALIDDATA;
684         }
685
686         av_image_copy_plane(frame->data[0], frame->linesize[0],
687                             gbc->buffer, linesize,
688                             linesize, frame->height);
689     }
690
691     /* Run any post processing here if needed. */
692     if (ctx->postproc != DDS_NONE)
693         run_postproc(avctx, frame);
694
695     /* Frame is ready to be output. */
696     frame->pict_type = AV_PICTURE_TYPE_I;
697     frame->key_frame = 1;
698     *got_frame = 1;
699
700     return avpkt->size;
701 }
702
703 AVCodec ff_dds_decoder = {
704     .name           = "dds",
705     .long_name      = NULL_IF_CONFIG_SMALL("DirectDraw Surface image decoder"),
706     .type           = AVMEDIA_TYPE_VIDEO,
707     .id             = AV_CODEC_ID_DDS,
708     .decode         = dds_decode,
709     .priv_data_size = sizeof(DDSContext),
710     .capabilities   = AV_CODEC_CAP_DR1 | AV_CODEC_CAP_SLICE_THREADS,
711     .caps_internal  = FF_CODEC_CAP_INIT_THREADSAFE
712 };