git.oblomov.eu Git - wine/blob - dlls/d3dx9_36/surface.c

   1 /*
   2  * Copyright (C) 2009-2010 Tony Wasserka
   3  * Copyright (C) 2012 Józef Kucia
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2.1 of the License, or (at your option) any later version.
   9  *
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this library; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  18  *
  19  */
  20
  21 #include "wine/debug.h"
  22 #include "wine/unicode.h"
  23 #include "d3dx9_36_private.h"
  24
  25 #include "initguid.h"
  26 #include "ole2.h"
  27 #include "wincodec.h"
  28
  29 WINE_DEFAULT_DEBUG_CHANNEL(d3dx);
  30
  31
  32 /* Wine-specific WIC GUIDs */
  33 DEFINE_GUID(GUID_WineContainerFormatTga, 0x0c44fda1,0xa5c5,0x4298,0x96,0x85,0x47,0x3f,0xc1,0x7c,0xd3,0x22);
  34
  35 static const struct
  36 {
  37     const GUID *wic_guid;
  38     D3DFORMAT d3dformat;
  39 } wic_pixel_formats[] = {
  40     { &GUID_WICPixelFormat8bppIndexed, D3DFMT_L8 },
  41     { &GUID_WICPixelFormat1bppIndexed, D3DFMT_L8 },
  42     { &GUID_WICPixelFormat4bppIndexed, D3DFMT_L8 },
  43     { &GUID_WICPixelFormat16bppBGR555, D3DFMT_X1R5G5B5 },
  44     { &GUID_WICPixelFormat16bppBGR565, D3DFMT_R5G6B5 },
  45     { &GUID_WICPixelFormat24bppBGR, D3DFMT_R8G8B8 },
  46     { &GUID_WICPixelFormat32bppBGR, D3DFMT_X8R8G8B8 },
  47     { &GUID_WICPixelFormat32bppBGRA, D3DFMT_A8R8G8B8 }
  48 };
  49
  50 static D3DFORMAT wic_guid_to_d3dformat(const GUID *guid)
  51 {
  52     int i;
  53
  54     for (i = 0; i < sizeof(wic_pixel_formats) / sizeof(wic_pixel_formats[0]); i++)
  55     {
  56         if (IsEqualGUID(wic_pixel_formats[i].wic_guid, guid))
  57             return wic_pixel_formats[i].d3dformat;
  58     }
  59
  60     return D3DFMT_UNKNOWN;
  61 }
  62
  63 static const GUID *d3dformat_to_wic_guid(D3DFORMAT format)
  64 {
  65     int i;
  66
  67     for (i = 0; i < sizeof(wic_pixel_formats) / sizeof(wic_pixel_formats[0]); i++)
  68     {
  69         if (wic_pixel_formats[i].d3dformat == format)
  70             return wic_pixel_formats[i].wic_guid;
  71     }
  72
  73     return NULL;
  74 }
  75
  76 /* dds_header.flags */
  77 #define DDS_CAPS 0x1
  78 #define DDS_HEIGHT 0x2
  79 #define DDS_WIDTH 0x2
  80 #define DDS_PITCH 0x8
  81 #define DDS_PIXELFORMAT 0x1000
  82 #define DDS_MIPMAPCOUNT 0x20000
  83 #define DDS_LINEARSIZE 0x80000
  84 #define DDS_DEPTH 0x800000
  85
  86 /* dds_header.caps */
  87 #define DDS_CAPS_COMPLEX 0x8
  88 #define DDS_CAPS_TEXTURE 0x1000
  89 #define DDS_CAPS_MIPMAP 0x400000
  90
  91 /* dds_header.caps2 */
  92 #define DDS_CAPS2_CUBEMAP 0x200
  93 #define DDS_CAPS2_CUBEMAP_POSITIVEX 0x400
  94 #define DDS_CAPS2_CUBEMAP_NEGATIVEX 0x800
  95 #define DDS_CAPS2_CUBEMAP_POSITIVEY 0x1000
  96 #define DDS_CAPS2_CUBEMAP_NEGATIVEY 0x2000
  97 #define DDS_CAPS2_CUBEMAP_POSITIVEZ 0x4000
  98 #define DDS_CAPS2_CUBEMAP_NEGATIVEZ 0x8000
  99 #define DDS_CAPS2_CUBEMAP_ALL_FACES ( DDS_CAPS2_CUBEMAP_POSITIVEX | DDS_CAPS2_CUBEMAP_NEGATIVEX \
 100                                     | DDS_CAPS2_CUBEMAP_POSITIVEY | DDS_CAPS2_CUBEMAP_NEGATIVEY \
 101                                     | DDS_CAPS2_CUBEMAP_POSITIVEZ | DDS_CAPS2_CUBEMAP_NEGATIVEZ )
 102 #define DDS_CAPS2_VOLUME 0x200000
 103
 104 /* dds_pixel_format.flags */
 105 #define DDS_PF_ALPHA 0x1
 106 #define DDS_PF_ALPHA_ONLY 0x2
 107 #define DDS_PF_FOURCC 0x4
 108 #define DDS_PF_RGB 0x40
 109 #define DDS_PF_YUV 0x200
 110 #define DDS_PF_LUMINANCE 0x20000
 111 #define DDS_PF_BUMPDUDV 0x80000
 112
 113 struct dds_pixel_format
 114 {
 115     DWORD size;
 116     DWORD flags;
 117     DWORD fourcc;
 118     DWORD bpp;
 119     DWORD rmask;
 120     DWORD gmask;
 121     DWORD bmask;
 122     DWORD amask;
 123 };
 124
 125 struct dds_header
 126 {
 127     DWORD signature;
 128     DWORD size;
 129     DWORD flags;
 130     DWORD height;
 131     DWORD width;
 132     DWORD pitch_or_linear_size;
 133     DWORD depth;
 134     DWORD miplevels;
 135     DWORD reserved[11];
 136     struct dds_pixel_format pixel_format;
 137     DWORD caps;
 138     DWORD caps2;
 139     DWORD caps3;
 140     DWORD caps4;
 141     DWORD reserved2;
 142 };
 143
 144 static D3DFORMAT dds_fourcc_to_d3dformat(DWORD fourcc)
 145 {
 146     int i;
 147     static const DWORD known_fourcc[] = {
 148         MAKEFOURCC('U','Y','V','Y'),
 149         MAKEFOURCC('Y','U','Y','2'),
 150         MAKEFOURCC('R','G','B','G'),
 151         MAKEFOURCC('G','R','G','B'),
 152         MAKEFOURCC('D','X','T','1'),
 153         MAKEFOURCC('D','X','T','2'),
 154         MAKEFOURCC('D','X','T','3'),
 155         MAKEFOURCC('D','X','T','4'),
 156         MAKEFOURCC('D','X','T','5')
 157     };
 158
 159     for (i = 0; i < sizeof(known_fourcc) / sizeof(known_fourcc[0]); i++)
 160     {
 161         if (known_fourcc[i] == fourcc)
 162             return fourcc;
 163     }
 164
 165     WARN("Unknown FourCC %#x\n", fourcc);
 166     return D3DFMT_UNKNOWN;
 167 }
 168
 169 static const struct {
 170     DWORD bpp;
 171     DWORD rmask;
 172     DWORD gmask;
 173     DWORD bmask;
 174     DWORD amask;
 175     D3DFORMAT format;
 176 } rgb_pixel_formats[] = {
 177     { 8, 0xe0, 0x1c, 0x03, 0, D3DFMT_R3G3B2 },
 178     { 16, 0xf800, 0x07e0, 0x001f, 0x0000, D3DFMT_R5G6B5 },
 179     { 16, 0x7c00, 0x03e0, 0x001f, 0x8000, D3DFMT_A1R5G5B5 },
 180     { 16, 0x7c00, 0x03e0, 0x001f, 0x0000, D3DFMT_X1R5G5B5 },
 181     { 16, 0x0f00, 0x00f0, 0x000f, 0xf000, D3DFMT_A4R4G4B4 },
 182     { 16, 0x0f00, 0x00f0, 0x000f, 0x0000, D3DFMT_X4R4G4B4 },
 183     { 16, 0x00e0, 0x001c, 0x0003, 0xff00, D3DFMT_A8R3G3B2 },
 184     { 24, 0xff0000, 0x00ff00, 0x0000ff, 0x000000, D3DFMT_R8G8B8 },
 185     { 32, 0x00ff0000, 0x0000ff00, 0x000000ff, 0xff000000, D3DFMT_A8R8G8B8 },
 186     { 32, 0x00ff0000, 0x0000ff00, 0x000000ff, 0x00000000, D3DFMT_X8R8G8B8 },
 187     { 32, 0x3ff00000, 0x000ffc00, 0x000003ff, 0xc0000000, D3DFMT_A2B10G10R10 },
 188     { 32, 0x000003ff, 0x000ffc00, 0x3ff00000, 0xc0000000, D3DFMT_A2R10G10B10 },
 189     { 32, 0x0000ffff, 0xffff0000, 0x00000000, 0x00000000, D3DFMT_G16R16 },
 190     { 32, 0x000000ff, 0x0000ff00, 0x00ff0000, 0xff000000, D3DFMT_A8B8G8R8 },
 191     { 32, 0x000000ff, 0x0000ff00, 0x00ff0000, 0x00000000, D3DFMT_X8B8G8R8 },
 192 };
 193
 194 static D3DFORMAT dds_rgb_to_d3dformat(const struct dds_pixel_format *pixel_format)
 195 {
 196     int i;
 197
 198     for (i = 0; i < sizeof(rgb_pixel_formats) / sizeof(rgb_pixel_formats[0]); i++)
 199     {
 200         if (rgb_pixel_formats[i].bpp == pixel_format->bpp
 201             && rgb_pixel_formats[i].rmask == pixel_format->rmask
 202             && rgb_pixel_formats[i].gmask == pixel_format->gmask
 203             && rgb_pixel_formats[i].bmask == pixel_format->bmask)
 204         {
 205             if ((pixel_format->flags & DDS_PF_ALPHA) && rgb_pixel_formats[i].amask == pixel_format->amask)
 206                 return rgb_pixel_formats[i].format;
 207             if (rgb_pixel_formats[i].amask == 0)
 208                 return rgb_pixel_formats[i].format;
 209         }
 210     }
 211
 212     WARN("Unknown RGB pixel format (%#x, %#x, %#x, %#x)\n",
 213         pixel_format->rmask, pixel_format->gmask, pixel_format->bmask, pixel_format->amask);
 214     return D3DFMT_UNKNOWN;
 215 }
 216
 217 static D3DFORMAT dds_luminance_to_d3dformat(const struct dds_pixel_format *pixel_format)
 218 {
 219     if (pixel_format->bpp == 8)
 220     {
 221         if (pixel_format->rmask == 0xff)
 222             return D3DFMT_L8;
 223         if ((pixel_format->flags & DDS_PF_ALPHA) && pixel_format->rmask == 0x0f && pixel_format->amask == 0xf0)
 224             return D3DFMT_A4L4;
 225     }
 226     if (pixel_format->bpp == 16)
 227     {
 228         if (pixel_format->rmask == 0xffff)
 229             return D3DFMT_L16;
 230         if ((pixel_format->flags & DDS_PF_ALPHA) && pixel_format->rmask == 0x00ff && pixel_format->amask == 0xff00)
 231             return D3DFMT_A8L8;
 232     }
 233
 234     WARN("Unknown luminance pixel format (bpp %#x, l %#x, a %#x)\n",
 235         pixel_format->bpp, pixel_format->rmask, pixel_format->amask);
 236     return D3DFMT_UNKNOWN;
 237 }
 238
 239 static D3DFORMAT dds_alpha_to_d3dformat(const struct dds_pixel_format *pixel_format)
 240 {
 241     if (pixel_format->bpp == 8 && pixel_format->amask == 0xff)
 242         return D3DFMT_A8;
 243
 244     WARN("Unknown Alpha pixel format (%#x, %#x)\n", pixel_format->bpp, pixel_format->rmask);
 245     return D3DFMT_UNKNOWN;
 246 }
 247
 248 static D3DFORMAT dds_bump_to_d3dformat(const struct dds_pixel_format *pixel_format)
 249 {
 250     if (pixel_format->bpp == 16 && pixel_format->rmask == 0x00ff && pixel_format->gmask == 0xff00)
 251         return D3DFMT_V8U8;
 252     if (pixel_format->bpp == 32 && pixel_format->rmask == 0x0000ffff && pixel_format->gmask == 0xffff0000)
 253         return D3DFMT_V16U16;
 254
 255     WARN("Unknown bump pixel format (%#x, %#x, %#x, %#x, %#x)\n", pixel_format->bpp,
 256         pixel_format->rmask, pixel_format->gmask, pixel_format->bmask, pixel_format->amask);
 257     return D3DFMT_UNKNOWN;
 258 }
 259
 260 static D3DFORMAT dds_pixel_format_to_d3dformat(const struct dds_pixel_format *pixel_format)
 261 {
 262     if (pixel_format->flags & DDS_PF_FOURCC)
 263         return dds_fourcc_to_d3dformat(pixel_format->fourcc);
 264     if (pixel_format->flags & DDS_PF_RGB)
 265         return dds_rgb_to_d3dformat(pixel_format);
 266     if (pixel_format->flags & DDS_PF_LUMINANCE)
 267         return dds_luminance_to_d3dformat(pixel_format);
 268     if (pixel_format->flags & DDS_PF_ALPHA_ONLY)
 269         return dds_alpha_to_d3dformat(pixel_format);
 270     if (pixel_format->flags & DDS_PF_BUMPDUDV)
 271         return dds_bump_to_d3dformat(pixel_format);
 272
 273     WARN("Unknown pixel format (flags %#x, fourcc %#x, bpp %#x, r %#x, g %#x, b %#x, a %#x)\n",
 274         pixel_format->flags, pixel_format->fourcc, pixel_format->bpp,
 275         pixel_format->rmask, pixel_format->gmask, pixel_format->bmask, pixel_format->amask);
 276     return D3DFMT_UNKNOWN;
 277 }
 278
 279 static HRESULT d3dformat_to_dds_pixel_format(struct dds_pixel_format *pixel_format, D3DFORMAT d3dformat)
 280 {
 281     int i;
 282
 283     memset(pixel_format, 0, sizeof(*pixel_format));
 284
 285     pixel_format->size = sizeof(*pixel_format);
 286
 287     for (i = 0; i < sizeof(rgb_pixel_formats) / sizeof(rgb_pixel_formats[0]); i++)
 288     {
 289         if (rgb_pixel_formats[i].format == d3dformat)
 290         {
 291             pixel_format->flags |= DDS_PF_RGB;
 292             pixel_format->bpp = rgb_pixel_formats[i].bpp;
 293             pixel_format->rmask = rgb_pixel_formats[i].rmask;
 294             pixel_format->gmask = rgb_pixel_formats[i].gmask;
 295             pixel_format->bmask = rgb_pixel_formats[i].bmask;
 296             pixel_format->amask = rgb_pixel_formats[i].amask;
 297             if (pixel_format->amask) pixel_format->flags |= DDS_PF_ALPHA;
 298             return D3D_OK;
 299         }
 300     }
 301
 302     WARN("Unknown pixel format %#x\n", d3dformat);
 303     return E_NOTIMPL;
 304 }
 305
 306 static HRESULT calculate_dds_surface_size(D3DFORMAT format, UINT width, UINT height,
 307     UINT *pitch, UINT *size)
 308 {
 309     const struct pixel_format_desc *format_desc = get_format_info(format);
 310     if (format_desc->type == FORMAT_UNKNOWN)
 311         return E_NOTIMPL;
 312
 313     if (format_desc->block_width != 1 || format_desc->block_height != 1)
 314     {
 315         *pitch = format_desc->block_byte_count
 316             * max(1, (width + format_desc->block_width - 1) / format_desc->block_width);
 317         *size = *pitch
 318             * max(1, (height + format_desc->block_height - 1) / format_desc->block_height);
 319     }
 320     else
 321     {
 322         *pitch = width * format_desc->bytes_per_pixel;
 323         *size = *pitch * height;
 324     }
 325
 326     return D3D_OK;
 327 }
 328
 329 static UINT calculate_dds_file_size(D3DFORMAT format, UINT width, UINT height, UINT depth,
 330     UINT miplevels, UINT faces)
 331 {
 332     UINT i, file_size = 0;
 333
 334     for (i = 0; i < miplevels; i++)
 335     {
 336         UINT pitch, size = 0;
 337         calculate_dds_surface_size(format, width, height, &pitch, &size);
 338         size *= depth;
 339         file_size += size;
 340         width = max(1, width / 2);
 341         height = max(1, height / 2);
 342         depth = max(1, depth / 2);
 343     }
 344
 345     file_size *= faces;
 346     file_size += sizeof(struct dds_header);
 347     return file_size;
 348 }
 349
 350 /************************************************************
 351 * get_image_info_from_dds
 352 *
 353 * Fills a D3DXIMAGE_INFO structure with information
 354 * about a DDS file stored in the memory.
 355 *
 356 * PARAMS
 357 *   buffer  [I] pointer to DDS data
 358 *   length  [I] size of DDS data
 359 *   info    [O] pointer to D3DXIMAGE_INFO structure
 360 *
 361 * RETURNS
 362 *   Success: D3D_OK
 363 *   Failure: D3DXERR_INVALIDDATA
 364 *
 365 */
 366 static HRESULT get_image_info_from_dds(const void *buffer, UINT length, D3DXIMAGE_INFO *info)
 367 {
 368     UINT faces = 1;
 369     UINT expected_length;
 370     const struct dds_header *header = buffer;
 371
 372     if (length < sizeof(*header) || !info)
 373         return D3DXERR_INVALIDDATA;
 374
 375     if (header->pixel_format.size != sizeof(header->pixel_format))
 376         return D3DXERR_INVALIDDATA;
 377
 378     info->Width = header->width;
 379     info->Height = header->height;
 380     info->Depth = 1;
 381     info->MipLevels = (header->flags & DDS_MIPMAPCOUNT) ?  header->miplevels : 1;
 382
 383     info->Format = dds_pixel_format_to_d3dformat(&header->pixel_format);
 384     if (info->Format == D3DFMT_UNKNOWN)
 385         return D3DXERR_INVALIDDATA;
 386
 387     TRACE("Pixel format is %#x\n", info->Format);
 388
 389     if (header->caps2 & DDS_CAPS2_VOLUME)
 390     {
 391         info->Depth = header->depth;
 392         info->ResourceType = D3DRTYPE_VOLUMETEXTURE;
 393     }
 394     else if (header->caps2 & DDS_CAPS2_CUBEMAP)
 395     {
 396         DWORD face;
 397         faces = 0;
 398         for (face = DDS_CAPS2_CUBEMAP_POSITIVEX; face <= DDS_CAPS2_CUBEMAP_NEGATIVEZ; face <<= 1)
 399         {
 400             if (header->caps2 & face)
 401                 faces++;
 402         }
 403         info->ResourceType = D3DRTYPE_CUBETEXTURE;
 404     }
 405     else
 406     {
 407         info->ResourceType = D3DRTYPE_TEXTURE;
 408     }
 409
 410     expected_length = calculate_dds_file_size(info->Format, info->Width, info->Height, info->Depth,
 411         info->MipLevels, faces);
 412     if (length < expected_length)
 413     {
 414         WARN("File is too short %u, expected at least %u bytes\n", length, expected_length);
 415         return D3DXERR_INVALIDDATA;
 416     }
 417
 418     info->ImageFileFormat = D3DXIFF_DDS;
 419     return D3D_OK;
 420 }
 421
 422 static HRESULT load_surface_from_dds(IDirect3DSurface9 *dst_surface, const PALETTEENTRY *dst_palette,
 423     const RECT *dst_rect, const void *src_data, const RECT *src_rect, DWORD filter, D3DCOLOR color_key,
 424     const D3DXIMAGE_INFO *src_info)
 425 {
 426     UINT size;
 427     UINT src_pitch;
 428     const struct dds_header *header = src_data;
 429     const BYTE *pixels = (BYTE *)(header + 1);
 430
 431     if (src_info->ResourceType != D3DRTYPE_TEXTURE)
 432         return D3DXERR_INVALIDDATA;
 433
 434     if (FAILED(calculate_dds_surface_size(src_info->Format, src_info->Width, src_info->Height, &src_pitch, &size)))
 435         return E_NOTIMPL;
 436
 437     return D3DXLoadSurfaceFromMemory(dst_surface, dst_palette, dst_rect, pixels, src_info->Format,
 438         src_pitch, NULL, src_rect, filter, color_key);
 439 }
 440
 441 static HRESULT save_dds_surface_to_memory(ID3DXBuffer **dst_buffer, IDirect3DSurface9 *src_surface, const RECT *src_rect)
 442 {
 443     HRESULT hr;
 444     UINT dst_pitch, surface_size, file_size;
 445     D3DSURFACE_DESC src_desc;
 446     D3DLOCKED_RECT locked_rect;
 447     ID3DXBuffer *buffer;
 448     struct dds_header *header;
 449     BYTE *pixels;
 450     struct volume volume;
 451     const struct pixel_format_desc *pixel_format;
 452
 453     if (src_rect)
 454     {
 455         FIXME("Saving a part of a surface to a DDS file is not implemented yet\n");
 456         return E_NOTIMPL;
 457     }
 458
 459     hr = IDirect3DSurface9_GetDesc(src_surface, &src_desc);
 460     if (FAILED(hr)) return hr;
 461
 462     pixel_format = get_format_info(src_desc.Format);
 463     if (pixel_format->type == FORMAT_UNKNOWN) return E_NOTIMPL;
 464
 465     file_size = calculate_dds_file_size(src_desc.Format, src_desc.Width, src_desc.Height, 1, 1, 1);
 466
 467     hr = calculate_dds_surface_size(src_desc.Format, src_desc.Width, src_desc.Height, &dst_pitch, &surface_size);
 468     if (FAILED(hr)) return hr;
 469
 470     hr = D3DXCreateBuffer(file_size, &buffer);
 471     if (FAILED(hr)) return hr;
 472
 473     header = ID3DXBuffer_GetBufferPointer(buffer);
 474     pixels = (BYTE *)(header + 1);
 475
 476     memset(header, 0, sizeof(*header));
 477     header->signature = MAKEFOURCC('D','D','S',' ');
 478     header->size = sizeof(*header);
 479     header->flags = DDS_CAPS | DDS_HEIGHT | DDS_WIDTH | DDS_PITCH | DDS_PIXELFORMAT | DDS_MIPMAPCOUNT;
 480     header->height = src_desc.Height;
 481     header->width = src_desc.Width;
 482     header->pitch_or_linear_size = dst_pitch;
 483     header->depth = 1;
 484     header->miplevels = 1;
 485     header->caps = DDS_CAPS_TEXTURE;
 486     hr = d3dformat_to_dds_pixel_format(&header->pixel_format, src_desc.Format);
 487     if (FAILED(hr))
 488     {
 489         ID3DXBuffer_Release(buffer);
 490         return hr;
 491     }
 492
 493     hr = IDirect3DSurface9_LockRect(src_surface, &locked_rect, NULL, D3DLOCK_READONLY);
 494     if (FAILED(hr))
 495     {
 496         ID3DXBuffer_Release(buffer);
 497         return hr;
 498     }
 499
 500     volume.width = src_desc.Width;
 501     volume.height = src_desc.Height;
 502     volume.depth = 1;
 503     copy_pixels(locked_rect.pBits, locked_rect.Pitch, 0, pixels, dst_pitch, 0,
 504         &volume, pixel_format);
 505
 506     IDirect3DSurface9_UnlockRect(src_surface);
 507
 508     *dst_buffer = buffer;
 509     return D3D_OK;
 510 }
 511
 512 HRESULT load_volume_from_dds(IDirect3DVolume9 *dst_volume, const PALETTEENTRY *dst_palette,
 513     const D3DBOX *dst_box, const void *src_data, const D3DBOX *src_box, DWORD filter, D3DCOLOR color_key,
 514     const D3DXIMAGE_INFO *src_info)
 515 {
 516     UINT row_pitch, slice_pitch;
 517     const struct dds_header *header = src_data;
 518     const BYTE *pixels = (BYTE *)(header + 1);
 519
 520     if (src_info->ResourceType != D3DRTYPE_VOLUMETEXTURE)
 521         return D3DXERR_INVALIDDATA;
 522
 523     if (FAILED(calculate_dds_surface_size(src_info->Format, src_info->Width, src_info->Height, &row_pitch, &slice_pitch)))
 524         return E_NOTIMPL;
 525
 526     return D3DXLoadVolumeFromMemory(dst_volume, dst_palette, dst_box, pixels, src_info->Format,
 527         row_pitch, slice_pitch, NULL, src_box, filter, color_key);
 528 }
 529
 530 HRESULT load_texture_from_dds(IDirect3DTexture9 *texture, const void *src_data, const PALETTEENTRY *palette,
 531     DWORD filter, D3DCOLOR color_key, const D3DXIMAGE_INFO *src_info)
 532
 533 {
 534     HRESULT hr;
 535     RECT src_rect;
 536     UINT src_pitch;
 537     UINT mip_level;
 538     UINT mip_levels;
 539     UINT mip_level_size;
 540     UINT width, height;
 541     IDirect3DSurface9 *surface;
 542     const struct dds_header *header = src_data;
 543     const BYTE *pixels = (BYTE *)(header + 1);
 544
 545     /* Loading a cube texture as a simple texture is also supported (only first face texture is taken) */
 546     if ((src_info->ResourceType != D3DRTYPE_TEXTURE) && (src_info->ResourceType != D3DRTYPE_CUBETEXTURE))
 547         return D3DXERR_INVALIDDATA;
 548
 549     width = src_info->Width;
 550     height = src_info->Height;
 551     mip_levels = min(src_info->MipLevels, IDirect3DTexture9_GetLevelCount(texture));
 552     for (mip_level = 0; mip_level < mip_levels; mip_level++)
 553     {
 554         hr = calculate_dds_surface_size(src_info->Format, width, height, &src_pitch, &mip_level_size);
 555         if (FAILED(hr)) return hr;
 556
 557         SetRect(&src_rect, 0, 0, width, height);
 558
 559         IDirect3DTexture9_GetSurfaceLevel(texture, mip_level, &surface);
 560         hr = D3DXLoadSurfaceFromMemory(surface, palette, NULL, pixels, src_info->Format, src_pitch,
 561             NULL, &src_rect, filter, color_key);
 562         IDirect3DSurface9_Release(surface);
 563         if (FAILED(hr)) return hr;
 564
 565         pixels += mip_level_size;
 566         width = max(1, width / 2);
 567         height = max(1, height / 2);
 568     }
 569
 570     return D3D_OK;
 571 }
 572
 573 HRESULT load_cube_texture_from_dds(IDirect3DCubeTexture9 *cube_texture, const void *src_data,
 574     const PALETTEENTRY *palette, DWORD filter, DWORD color_key, const D3DXIMAGE_INFO *src_info)
 575 {
 576     HRESULT hr;
 577     int face;
 578     int mip_level;
 579     UINT size;
 580     RECT src_rect;
 581     UINT src_pitch;
 582     UINT mip_levels;
 583     UINT mip_level_size;
 584     IDirect3DSurface9 *surface;
 585     const struct dds_header *header = src_data;
 586     const BYTE *pixels = (BYTE *)(header + 1);
 587
 588     if (src_info->ResourceType != D3DRTYPE_CUBETEXTURE)
 589         return D3DXERR_INVALIDDATA;
 590
 591     if ((header->caps2 & DDS_CAPS2_CUBEMAP_ALL_FACES) != DDS_CAPS2_CUBEMAP_ALL_FACES)
 592     {
 593         WARN("Only full cubemaps are supported\n");
 594         return D3DXERR_INVALIDDATA;
 595     }
 596
 597     mip_levels = min(src_info->MipLevels, IDirect3DCubeTexture9_GetLevelCount(cube_texture));
 598     for (face = D3DCUBEMAP_FACE_POSITIVE_X; face <= D3DCUBEMAP_FACE_NEGATIVE_Z; face++)
 599     {
 600         size = src_info->Width;
 601         for (mip_level = 0; mip_level < src_info->MipLevels; mip_level++)
 602         {
 603             hr = calculate_dds_surface_size(src_info->Format, size, size, &src_pitch, &mip_level_size);
 604             if (FAILED(hr)) return hr;
 605
 606             /* if texture has fewer mip levels than DDS file, skip excessive mip levels */
 607             if (mip_level < mip_levels)
 608             {
 609                 SetRect(&src_rect, 0, 0, size, size);
 610
 611                 IDirect3DCubeTexture9_GetCubeMapSurface(cube_texture, face, mip_level, &surface);
 612                 hr = D3DXLoadSurfaceFromMemory(surface, palette, NULL, pixels, src_info->Format, src_pitch,
 613                     NULL, &src_rect, filter, color_key);
 614                 IDirect3DSurface9_Release(surface);
 615                 if (FAILED(hr)) return hr;
 616             }
 617
 618             pixels += mip_level_size;
 619             size = max(1, size / 2);
 620         }
 621     }
 622
 623     return D3D_OK;
 624 }
 625
 626 HRESULT load_volume_texture_from_dds(IDirect3DVolumeTexture9 *volume_texture, const void *src_data,
 627     const PALETTEENTRY *palette, DWORD filter, DWORD color_key, const D3DXIMAGE_INFO *src_info)
 628 {
 629     HRESULT hr;
 630     UINT mip_level;
 631     UINT mip_levels;
 632     UINT src_slice_pitch;
 633     UINT src_row_pitch;
 634     D3DBOX src_box;
 635     UINT width, height, depth;
 636     IDirect3DVolume9 *volume;
 637     const struct dds_header *header = src_data;
 638     const BYTE *pixels = (BYTE *)(header + 1);
 639
 640     if (src_info->ResourceType != D3DRTYPE_VOLUMETEXTURE)
 641         return D3DXERR_INVALIDDATA;
 642
 643     width = src_info->Width;
 644     height = src_info->Height;
 645     depth = src_info->Depth;
 646     mip_levels = min(src_info->MipLevels, IDirect3DVolumeTexture9_GetLevelCount(volume_texture));
 647
 648     for (mip_level = 0; mip_level < mip_levels; mip_level++)
 649     {
 650         hr = calculate_dds_surface_size(src_info->Format, width, height, &src_row_pitch, &src_slice_pitch);
 651         if (FAILED(hr)) return hr;
 652
 653         hr = IDirect3DVolumeTexture9_GetVolumeLevel(volume_texture, mip_level, &volume);
 654         if (FAILED(hr)) return hr;
 655
 656         src_box.Left = 0;
 657         src_box.Top = 0;
 658         src_box.Right = width;
 659         src_box.Bottom = height;
 660         src_box.Front = 0;
 661         src_box.Back = depth;
 662
 663         hr = D3DXLoadVolumeFromMemory(volume, palette, NULL, pixels, src_info->Format,
 664             src_row_pitch, src_slice_pitch, NULL, &src_box, filter, color_key);
 665
 666         IDirect3DVolume9_Release(volume);
 667         if (FAILED(hr)) return hr;
 668
 669         pixels += depth * src_slice_pitch;
 670         width = max(1, width / 2);
 671         height = max(1, height / 2);
 672         depth = max(1, depth / 2);
 673     }
 674
 675     return D3D_OK;
 676 }
 677
 678 /************************************************************
 679  * D3DXGetImageInfoFromFileInMemory
 680  *
 681  * Fills a D3DXIMAGE_INFO structure with info about an image
 682  *
 683  * PARAMS
 684  *   data     [I] pointer to the image file data
 685  *   datasize [I] size of the passed data
 686  *   info     [O] pointer to the destination structure
 687  *
 688  * RETURNS
 689  *   Success: D3D_OK, if info is not NULL and data and datasize make up a valid image file or
 690  *                    if info is NULL and data and datasize are not NULL
 691  *   Failure: D3DXERR_INVALIDDATA, if data is no valid image file and datasize and info are not NULL
 692  *            D3DERR_INVALIDCALL, if data is NULL or
 693  *                                if datasize is 0
 694  *
 695  * NOTES
 696  *   datasize may be bigger than the actual file size
 697  *
 698  */
 699 HRESULT WINAPI D3DXGetImageInfoFromFileInMemory(LPCVOID data, UINT datasize, D3DXIMAGE_INFO *info)
 700 {
 701     IWICImagingFactory *factory;
 702     IWICBitmapDecoder *decoder = NULL;
 703     IWICStream *stream;
 704     HRESULT hr;
 705     HRESULT initresult;
 706
 707     TRACE("(%p, %d, %p)\n", data, datasize, info);
 708
 709     if (!data || !datasize)
 710         return D3DERR_INVALIDCALL;
 711
 712     if (!info)
 713         return D3D_OK;
 714
 715     if ((datasize >= 4) && !strncmp(data, "DDS ", 4)) {
 716         TRACE("File type is DDS\n");
 717         return get_image_info_from_dds(data, datasize, info);
 718     }
 719
 720     initresult = CoInitializeEx(NULL, COINIT_APARTMENTTHREADED);
 721
 722     hr = CoCreateInstance(&CLSID_WICImagingFactory, NULL, CLSCTX_INPROC_SERVER, &IID_IWICImagingFactory, (void**)&factory);
 723
 724     if (SUCCEEDED(hr)) {
 725         IWICImagingFactory_CreateStream(factory, &stream);
 726         IWICStream_InitializeFromMemory(stream, (BYTE*)data, datasize);
 727         hr = IWICImagingFactory_CreateDecoderFromStream(factory, (IStream*)stream, NULL, 0, &decoder);
 728         IWICStream_Release(stream);
 729         IWICImagingFactory_Release(factory);
 730     }
 731
 732     if (FAILED(hr)) {
 733         if ((datasize >= 2) && (!strncmp(data, "P3", 2) || !strncmp(data, "P6", 2)))
 734             FIXME("File type PPM is not supported yet\n");
 735         else if ((datasize >= 2) && !strncmp(data, "BM", 2))
 736             FIXME("File type DIB is not supported yet\n");
 737         else if ((datasize >= 10) && !strncmp(data, "#?RADIANCE", 10))
 738             FIXME("File type HDR is not supported yet\n");
 739         else if ((datasize >= 2) && (!strncmp(data, "PF", 2) || !strncmp(data, "Pf", 2)))
 740             FIXME("File type PFM is not supported yet\n");
 741     }
 742
 743     if (SUCCEEDED(hr)) {
 744         GUID container_format;
 745         UINT frame_count;
 746
 747         hr = IWICBitmapDecoder_GetContainerFormat(decoder, &container_format);
 748         if (SUCCEEDED(hr)) {
 749             if (IsEqualGUID(&container_format, &GUID_ContainerFormatBmp)) {
 750                 TRACE("File type is BMP\n");
 751                 info->ImageFileFormat = D3DXIFF_BMP;
 752             } else if (IsEqualGUID(&container_format, &GUID_ContainerFormatPng)) {
 753                 TRACE("File type is PNG\n");
 754                 info->ImageFileFormat = D3DXIFF_PNG;
 755             } else if(IsEqualGUID(&container_format, &GUID_ContainerFormatJpeg)) {
 756                 TRACE("File type is JPG\n");
 757                 info->ImageFileFormat = D3DXIFF_JPG;
 758             } else if(IsEqualGUID(&container_format, &GUID_WineContainerFormatTga)) {
 759                 TRACE("File type is TGA\n");
 760                 info->ImageFileFormat = D3DXIFF_TGA;
 761             } else {
 762                 WARN("Unsupported image file format %s\n", debugstr_guid(&container_format));
 763                 hr = D3DXERR_INVALIDDATA;
 764             }
 765         }
 766
 767         if (SUCCEEDED(hr))
 768             hr = IWICBitmapDecoder_GetFrameCount(decoder, &frame_count);
 769         if (SUCCEEDED(hr) && !frame_count)
 770             hr = D3DXERR_INVALIDDATA;
 771
 772         if (SUCCEEDED(hr)) {
 773             IWICBitmapFrameDecode *frame = NULL;
 774
 775             hr = IWICBitmapDecoder_GetFrame(decoder, 0, &frame);
 776
 777             if (SUCCEEDED(hr))
 778                 hr = IWICBitmapFrameDecode_GetSize(frame, &info->Width, &info->Height);
 779
 780             if (SUCCEEDED(hr)) {
 781                 WICPixelFormatGUID pixel_format;
 782
 783                 hr = IWICBitmapFrameDecode_GetPixelFormat(frame, &pixel_format);
 784                 if (SUCCEEDED(hr)) {
 785                     info->Format = wic_guid_to_d3dformat(&pixel_format);
 786                     if (info->Format == D3DFMT_UNKNOWN) {
 787                         WARN("Unsupported pixel format %s\n", debugstr_guid(&pixel_format));
 788                         hr = D3DXERR_INVALIDDATA;
 789                     }
 790                 }
 791             }
 792
 793             if (frame)
 794                  IWICBitmapFrameDecode_Release(frame);
 795
 796             info->Depth = 1;
 797             info->MipLevels = 1;
 798             info->ResourceType = D3DRTYPE_TEXTURE;
 799         }
 800     }
 801
 802     if (decoder)
 803         IWICBitmapDecoder_Release(decoder);
 804
 805     if (SUCCEEDED(initresult))
 806         CoUninitialize();
 807
 808     if (FAILED(hr)) {
 809         TRACE("Invalid or unsupported image file\n");
 810         return D3DXERR_INVALIDDATA;
 811     }
 812
 813     return D3D_OK;
 814 }
 815
 816 /************************************************************
 817  * D3DXGetImageInfoFromFile
 818  *
 819  * RETURNS
 820  *   Success: D3D_OK, if we successfully load a valid image file or
 821  *                    if we successfully load a file which is no valid image and info is NULL
 822  *   Failure: D3DXERR_INVALIDDATA, if we fail to load file or
 823  *                                 if file is not a valid image file and info is not NULL
 824  *            D3DERR_INVALIDCALL, if file is NULL
 825  *
 826  */
 827 HRESULT WINAPI D3DXGetImageInfoFromFileA(LPCSTR file, D3DXIMAGE_INFO *info)
 828 {
 829     LPWSTR widename;
 830     HRESULT hr;
 831     int strlength;
 832
 833     TRACE("(%s, %p): relay\n", debugstr_a(file), info);
 834
 835     if( !file ) return D3DERR_INVALIDCALL;
 836
 837     strlength = MultiByteToWideChar(CP_ACP, 0, file, -1, NULL, 0);
 838     widename = HeapAlloc(GetProcessHeap(), 0, strlength * sizeof(*widename));
 839     MultiByteToWideChar(CP_ACP, 0, file, -1, widename, strlength);
 840
 841     hr = D3DXGetImageInfoFromFileW(widename, info);
 842     HeapFree(GetProcessHeap(), 0, widename);
 843
 844     return hr;
 845 }
 846
 847 HRESULT WINAPI D3DXGetImageInfoFromFileW(LPCWSTR file, D3DXIMAGE_INFO *info)
 848 {
 849     HRESULT hr;
 850     DWORD size;
 851     LPVOID buffer;
 852
 853     TRACE("(%s, %p): relay\n", debugstr_w(file), info);
 854
 855     if( !file ) return D3DERR_INVALIDCALL;
 856
 857     hr = map_view_of_file(file, &buffer, &size);
 858     if(FAILED(hr)) return D3DXERR_INVALIDDATA;
 859
 860     hr = D3DXGetImageInfoFromFileInMemory(buffer, size, info);
 861     UnmapViewOfFile(buffer);
 862
 863     return hr;
 864 }
 865
 866 /************************************************************
 867  * D3DXGetImageInfoFromResource
 868  *
 869  * RETURNS
 870  *   Success: D3D_OK, if resource is a valid image file
 871  *   Failure: D3DXERR_INVALIDDATA, if resource is no valid image file or NULL or
 872  *                                 if we fail to load resource
 873  *
 874  */
 875 HRESULT WINAPI D3DXGetImageInfoFromResourceA(HMODULE module, LPCSTR resource, D3DXIMAGE_INFO *info)
 876 {
 877     HRSRC resinfo;
 878
 879     TRACE("(%p, %s, %p)\n", module, debugstr_a(resource), info);
 880
 881     resinfo = FindResourceA(module, resource, (LPCSTR)RT_RCDATA);
 882     if(resinfo) {
 883         LPVOID buffer;
 884         HRESULT hr;
 885         DWORD size;
 886
 887         hr = load_resource_into_memory(module, resinfo, &buffer, &size);
 888         if(FAILED(hr)) return D3DXERR_INVALIDDATA;
 889         return D3DXGetImageInfoFromFileInMemory(buffer, size, info);
 890     }
 891
 892     resinfo = FindResourceA(module, resource, (LPCSTR)RT_BITMAP);
 893     if(resinfo) {
 894         FIXME("Implement loading bitmaps from resource type RT_BITMAP\n");
 895         return E_NOTIMPL;
 896     }
 897     return D3DXERR_INVALIDDATA;
 898 }
 899
 900 HRESULT WINAPI D3DXGetImageInfoFromResourceW(HMODULE module, LPCWSTR resource, D3DXIMAGE_INFO *info)
 901 {
 902     HRSRC resinfo;
 903
 904     TRACE("(%p, %s, %p)\n", module, debugstr_w(resource), info);
 905
 906     resinfo = FindResourceW(module, resource, (LPCWSTR)RT_RCDATA);
 907     if(resinfo) {
 908         LPVOID buffer;
 909         HRESULT hr;
 910         DWORD size;
 911
 912         hr = load_resource_into_memory(module, resinfo, &buffer, &size);
 913         if(FAILED(hr)) return D3DXERR_INVALIDDATA;
 914         return D3DXGetImageInfoFromFileInMemory(buffer, size, info);
 915     }
 916
 917     resinfo = FindResourceW(module, resource, (LPCWSTR)RT_BITMAP);
 918     if(resinfo) {
 919         FIXME("Implement loading bitmaps from resource type RT_BITMAP\n");
 920         return E_NOTIMPL;
 921     }
 922     return D3DXERR_INVALIDDATA;
 923 }
 924
 925 /************************************************************
 926  * D3DXLoadSurfaceFromFileInMemory
 927  *
 928  * Loads data from a given buffer into a surface and fills a given
 929  * D3DXIMAGE_INFO structure with info about the source data.
 930  *
 931  * PARAMS
 932  *   pDestSurface [I] pointer to the surface
 933  *   pDestPalette [I] palette to use
 934  *   pDestRect    [I] to be filled area of the surface
 935  *   pSrcData     [I] pointer to the source data
 936  *   SrcDataSize  [I] size of the source data in bytes
 937  *   pSrcRect     [I] area of the source data to load
 938  *   dwFilter     [I] filter to apply on stretching
 939  *   Colorkey     [I] colorkey
 940  *   pSrcInfo     [O] pointer to a D3DXIMAGE_INFO structure
 941  *
 942  * RETURNS
 943  *   Success: D3D_OK
 944  *   Failure: D3DERR_INVALIDCALL, if pDestSurface or pSrcData or SrcDataSize are NULL
 945  *            D3DXERR_INVALIDDATA, if pSrcData is no valid image file
 946  *
 947  */
 948 HRESULT WINAPI D3DXLoadSurfaceFromFileInMemory(IDirect3DSurface9 *pDestSurface,
 949         const PALETTEENTRY *pDestPalette, const RECT *pDestRect, const void *pSrcData, UINT SrcDataSize,
 950         const RECT *pSrcRect, DWORD dwFilter, D3DCOLOR Colorkey, D3DXIMAGE_INFO *pSrcInfo)
 951 {
 952     D3DXIMAGE_INFO imginfo;
 953     HRESULT hr;
 954
 955     IWICImagingFactory *factory;
 956     IWICBitmapDecoder *decoder;
 957     IWICBitmapFrameDecode *bitmapframe;
 958     IWICStream *stream;
 959
 960     const struct pixel_format_desc *formatdesc;
 961     WICRect wicrect;
 962     RECT rect;
 963
 964     TRACE("dst_surface %p, dst_palette %p, dst_rect %s, src_data %p, src_data_size %u, "
 965             "src_rect %s, filter %#x, color_key 0x%08x, src_info %p.\n",
 966             pDestSurface, pDestPalette, wine_dbgstr_rect(pDestRect), pSrcData, SrcDataSize,
 967             wine_dbgstr_rect(pSrcRect), dwFilter, Colorkey, pSrcInfo);
 968
 969     if (!pDestSurface || !pSrcData || !SrcDataSize)
 970         return D3DERR_INVALIDCALL;
 971
 972     hr = D3DXGetImageInfoFromFileInMemory(pSrcData, SrcDataSize, &imginfo);
 973
 974     if (FAILED(hr))
 975         return hr;
 976
 977     if (pSrcRect)
 978     {
 979         wicrect.X = pSrcRect->left;
 980         wicrect.Y = pSrcRect->top;
 981         wicrect.Width = pSrcRect->right - pSrcRect->left;
 982         wicrect.Height = pSrcRect->bottom - pSrcRect->top;
 983     }
 984     else
 985     {
 986         wicrect.X = 0;
 987         wicrect.Y = 0;
 988         wicrect.Width = imginfo.Width;
 989         wicrect.Height = imginfo.Height;
 990     }
 991
 992     SetRect(&rect, 0, 0, wicrect.Width, wicrect.Height);
 993
 994     if (imginfo.ImageFileFormat == D3DXIFF_DDS)
 995     {
 996         hr = load_surface_from_dds(pDestSurface, pDestPalette, pDestRect, pSrcData, &rect,
 997             dwFilter, Colorkey, &imginfo);
 998         if (SUCCEEDED(hr) && pSrcInfo)
 999             *pSrcInfo = imginfo;
1000         return hr;
1001     }
1002
1003     CoInitializeEx(NULL, COINIT_APARTMENTTHREADED);
1004
1005     if (FAILED(CoCreateInstance(&CLSID_WICImagingFactory, NULL, CLSCTX_INPROC_SERVER, &IID_IWICImagingFactory, (void**)&factory)))
1006         goto cleanup_err;
1007
1008     if (FAILED(IWICImagingFactory_CreateStream(factory, &stream)))
1009     {
1010         IWICImagingFactory_Release(factory);
1011         goto cleanup_err;
1012     }
1013
1014     IWICStream_InitializeFromMemory(stream, (BYTE*)pSrcData, SrcDataSize);
1015
1016     hr = IWICImagingFactory_CreateDecoderFromStream(factory, (IStream*)stream, NULL, 0, &decoder);
1017
1018     IWICStream_Release(stream);
1019     IWICImagingFactory_Release(factory);
1020
1021     if (FAILED(hr))
1022         goto cleanup_err;
1023
1024     hr = IWICBitmapDecoder_GetFrame(decoder, 0, &bitmapframe);
1025
1026     if (FAILED(hr))
1027         goto cleanup_bmp;
1028
1029     formatdesc = get_format_info(imginfo.Format);
1030
1031     if (formatdesc->type == FORMAT_UNKNOWN)
1032     {
1033         FIXME("Unsupported pixel format\n");
1034         hr = D3DXERR_INVALIDDATA;
1035     }
1036     else
1037     {
1038         BYTE *buffer;
1039         DWORD pitch;
1040
1041         pitch = formatdesc->bytes_per_pixel * wicrect.Width;
1042         buffer = HeapAlloc(GetProcessHeap(), 0, pitch * wicrect.Height);
1043
1044         hr = IWICBitmapFrameDecode_CopyPixels(bitmapframe, &wicrect, pitch,
1045                                               pitch * wicrect.Height, buffer);
1046
1047         if (SUCCEEDED(hr))
1048         {
1049             hr = D3DXLoadSurfaceFromMemory(pDestSurface, pDestPalette, pDestRect,
1050                                            buffer, imginfo.Format, pitch,
1051                                            NULL, &rect, dwFilter, Colorkey);
1052         }
1053
1054         HeapFree(GetProcessHeap(), 0, buffer);
1055     }
1056
1057     IWICBitmapFrameDecode_Release(bitmapframe);
1058
1059 cleanup_bmp:
1060     IWICBitmapDecoder_Release(decoder);
1061
1062 cleanup_err:
1063     CoUninitialize();
1064
1065     if (FAILED(hr))
1066         return D3DXERR_INVALIDDATA;
1067
1068     if (pSrcInfo)
1069         *pSrcInfo = imginfo;
1070
1071     return D3D_OK;
1072 }
1073
1074 HRESULT WINAPI D3DXLoadSurfaceFromFileA(IDirect3DSurface9 *dst_surface,
1075         const PALETTEENTRY *dst_palette, const RECT *dst_rect, const char *src_file,
1076         const RECT *src_rect, DWORD filter, D3DCOLOR color_key, D3DXIMAGE_INFO *src_info)
1077 {
1078     LPWSTR pWidename;
1079     HRESULT hr;
1080     int strlength;
1081
1082     TRACE("dst_surface %p, dst_palette %p, dst_rect %s, src_file %s, "
1083             "src_rect %s, filter %#x, color_key 0x%08x, src_info %p.\n",
1084             dst_surface, dst_palette, wine_dbgstr_rect(dst_rect), debugstr_a(src_file),
1085             wine_dbgstr_rect(src_rect), filter, color_key, src_info);
1086
1087     if (!src_file || !dst_surface)
1088         return D3DERR_INVALIDCALL;
1089
1090     strlength = MultiByteToWideChar(CP_ACP, 0, src_file, -1, NULL, 0);
1091     pWidename = HeapAlloc(GetProcessHeap(), 0, strlength * sizeof(*pWidename));
1092     MultiByteToWideChar(CP_ACP, 0, src_file, -1, pWidename, strlength);
1093
1094     hr = D3DXLoadSurfaceFromFileW(dst_surface, dst_palette, dst_rect,
1095             pWidename, src_rect, filter, color_key, src_info);
1096     HeapFree(GetProcessHeap(), 0, pWidename);
1097
1098     return hr;
1099 }
1100
1101 HRESULT WINAPI D3DXLoadSurfaceFromFileW(IDirect3DSurface9 *dst_surface,
1102         const PALETTEENTRY *dst_palette, const RECT *dst_rect, const WCHAR *src_file,
1103         const RECT *src_rect, DWORD filter, D3DCOLOR color_key, D3DXIMAGE_INFO *src_info)
1104 {
1105     UINT data_size;
1106     void *data;
1107     HRESULT hr;
1108
1109     TRACE("dst_surface %p, dst_palette %p, dst_rect %s, src_file %s, "
1110             "src_rect %s, filter %#x, color_key 0x%08x, src_info %p.\n",
1111             dst_surface, dst_palette, wine_dbgstr_rect(dst_rect), debugstr_w(src_file),
1112             wine_dbgstr_rect(src_rect), filter, color_key, src_info);
1113
1114     if (!src_file || !dst_surface)
1115         return D3DERR_INVALIDCALL;
1116
1117     if (FAILED(map_view_of_file(src_file, &data, &data_size)))
1118         return D3DXERR_INVALIDDATA;
1119
1120     hr = D3DXLoadSurfaceFromFileInMemory(dst_surface, dst_palette, dst_rect,
1121             data, data_size, src_rect, filter, color_key, src_info);
1122     UnmapViewOfFile(data);
1123
1124     return hr;
1125 }
1126
1127 HRESULT WINAPI D3DXLoadSurfaceFromResourceA(IDirect3DSurface9 *dst_surface,
1128         const PALETTEENTRY *dst_palette, const RECT *dst_rect, HMODULE src_module, const char *resource,
1129         const RECT *src_rect, DWORD filter, D3DCOLOR color_key, D3DXIMAGE_INFO *src_info)
1130 {
1131     HRSRC hResInfo;
1132
1133     TRACE("dst_surface %p, dst_palette %p, dst_rect %s, src_module %p, resource %s, "
1134             "src_rect %s, filter %#x, color_key 0x%08x, src_info %p.\n",
1135             dst_surface, dst_palette, wine_dbgstr_rect(dst_rect), src_module, debugstr_a(resource),
1136             wine_dbgstr_rect(src_rect), filter, color_key, src_info);
1137
1138     if (!dst_surface)
1139         return D3DERR_INVALIDCALL;
1140
1141     if ((hResInfo = FindResourceA(src_module, resource, (const char *)RT_RCDATA)))
1142     {
1143         UINT data_size;
1144         void *data;
1145
1146         if (FAILED(load_resource_into_memory(src_module, hResInfo, &data, &data_size)))
1147             return D3DXERR_INVALIDDATA;
1148
1149         return D3DXLoadSurfaceFromFileInMemory(dst_surface, dst_palette, dst_rect,
1150                 data, data_size, src_rect, filter, color_key, src_info);
1151     }
1152
1153     if ((hResInfo = FindResourceA(src_module, resource, (const char *)RT_BITMAP)))
1154     {
1155         FIXME("Implement loading bitmaps from resource type RT_BITMAP.\n");
1156         return E_NOTIMPL;
1157     }
1158
1159     return D3DXERR_INVALIDDATA;
1160 }
1161
1162 HRESULT WINAPI D3DXLoadSurfaceFromResourceW(IDirect3DSurface9 *dst_surface,
1163         const PALETTEENTRY *dst_palette, const RECT *dst_rect, HMODULE src_module, const WCHAR *resource,
1164         const RECT *src_rect, DWORD filter, D3DCOLOR color_key, D3DXIMAGE_INFO *src_info)
1165 {
1166     HRSRC hResInfo;
1167
1168     TRACE("dst_surface %p, dst_palette %p, dst_rect %s, src_module %p, resource %s, "
1169             "src_rect %s, filter %#x, color_key 0x%08x, src_info %p.\n",
1170             dst_surface, dst_palette, wine_dbgstr_rect(dst_rect), src_module, debugstr_w(resource),
1171             wine_dbgstr_rect(src_rect), filter, color_key, src_info);
1172
1173     if (!dst_surface)
1174         return D3DERR_INVALIDCALL;
1175
1176     if ((hResInfo = FindResourceW(src_module, resource, (const WCHAR *)RT_RCDATA)))
1177     {
1178         UINT data_size;
1179         void *data;
1180
1181         if (FAILED(load_resource_into_memory(src_module, hResInfo, &data, &data_size)))
1182             return D3DXERR_INVALIDDATA;
1183
1184         return D3DXLoadSurfaceFromFileInMemory(dst_surface, dst_palette, dst_rect,
1185                 data, data_size, src_rect, filter, color_key, src_info);
1186     }
1187
1188     if ((hResInfo = FindResourceW(src_module, resource, (const WCHAR *)RT_BITMAP)))
1189     {
1190         FIXME("Implement loading bitmaps from resource type RT_BITMAP.\n");
1191         return E_NOTIMPL;
1192     }
1193
1194     return D3DXERR_INVALIDDATA;
1195 }
1196
1197
1198 /************************************************************
1199  * helper functions for D3DXLoadSurfaceFromMemory
1200  */
1201 struct argb_conversion_info
1202 {
1203     const struct pixel_format_desc *srcformat;
1204     const struct pixel_format_desc *destformat;
1205     DWORD srcshift[4], destshift[4];
1206     DWORD srcmask[4], destmask[4];
1207     BOOL process_channel[4];
1208     DWORD channelmask;
1209 };
1210
1211 static void init_argb_conversion_info(const struct pixel_format_desc *srcformat, const struct pixel_format_desc *destformat, struct argb_conversion_info *info)
1212 {
1213     UINT i;
1214     ZeroMemory(info->process_channel, 4 * sizeof(BOOL));
1215     info->channelmask = 0;
1216
1217     info->srcformat  =  srcformat;
1218     info->destformat = destformat;
1219
1220     for(i = 0;i < 4;i++) {
1221         /* srcshift is used to extract the _relevant_ components */
1222         info->srcshift[i]  =  srcformat->shift[i] + max( srcformat->bits[i] - destformat->bits[i], 0);
1223
1224         /* destshift is used to move the components to the correct position */
1225         info->destshift[i] = destformat->shift[i] + max(destformat->bits[i] -  srcformat->bits[i], 0);
1226
1227         info->srcmask[i]  = ((1 <<  srcformat->bits[i]) - 1) <<  srcformat->shift[i];
1228         info->destmask[i] = ((1 << destformat->bits[i]) - 1) << destformat->shift[i];
1229
1230         /* channelmask specifies bits which aren't used in the source format but in the destination one */
1231         if(destformat->bits[i]) {
1232             if(srcformat->bits[i]) info->process_channel[i] = TRUE;
1233             else info->channelmask |= info->destmask[i];
1234         }
1235     }
1236 }
1237
1238 static DWORD dword_from_bytes(CONST BYTE *src, UINT bytes_per_pixel)
1239 {
1240     DWORD ret = 0;
1241     static BOOL fixme_once;
1242
1243     if(bytes_per_pixel > sizeof(DWORD)) {
1244         if(!fixme_once++) FIXME("Unsupported image: %u bytes per pixel\n", bytes_per_pixel);
1245         bytes_per_pixel = sizeof(DWORD);
1246     }
1247
1248     memcpy(&ret, src, bytes_per_pixel);
1249     return ret;
1250 }
1251
1252 static void dword_to_bytes(BYTE *dst, DWORD dword, UINT bytes_per_pixel)
1253 {
1254     static BOOL fixme_once;
1255
1256     if(bytes_per_pixel > sizeof(DWORD)) {
1257         if(!fixme_once++) FIXME("Unsupported image: %u bytes per pixel\n", bytes_per_pixel);
1258         ZeroMemory(dst, bytes_per_pixel);
1259         bytes_per_pixel = sizeof(DWORD);
1260     }
1261
1262     memcpy(dst, &dword, bytes_per_pixel);
1263 }
1264
1265 /************************************************************
1266  * get_relevant_argb_components
1267  *
1268  * Extracts the relevant components from the source color and
1269  * drops the less significant bits if they aren't used by the destination format.
1270  */
1271 static void get_relevant_argb_components(CONST struct argb_conversion_info *info, CONST DWORD col, DWORD *out)
1272 {
1273     UINT i = 0;
1274     for(;i < 4;i++)
1275         if(info->process_channel[i])
1276             out[i] = (col & info->srcmask[i]) >> info->srcshift[i];
1277 }
1278
1279 /************************************************************
1280  * make_argb_color
1281  *
1282  * Recombines the output of get_relevant_argb_components and converts
1283  * it to the destination format.
1284  */
1285 static DWORD make_argb_color(CONST struct argb_conversion_info *info, CONST DWORD *in)
1286 {
1287     UINT i;
1288     DWORD val = 0;
1289
1290     for(i = 0;i < 4;i++) {
1291         if(info->process_channel[i]) {
1292             /* necessary to make sure that e.g. an X4R4G4B4 white maps to an R8G8B8 white instead of 0xf0f0f0 */
1293             signed int shift;
1294             for(shift = info->destshift[i]; shift > info->destformat->shift[i]; shift -= info->srcformat->bits[i]) val |= in[i] << shift;
1295             val |= (in[i] >> (info->destformat->shift[i] - shift)) << info->destformat->shift[i];
1296         }
1297     }
1298     val |= info->channelmask;   /* new channels are set to their maximal value */
1299     return val;
1300 }
1301
1302 static void format_to_vec4(const struct pixel_format_desc *format, const DWORD *src, struct vec4 *dst)
1303 {
1304     DWORD mask;
1305
1306     if (format->bits[1])
1307     {
1308         mask = (1 << format->bits[1]) - 1;
1309         dst->x = (float)((*src >> format->shift[1]) & mask) / mask;
1310     }
1311     else
1312         dst->x = 1.0f;
1313
1314     if (format->bits[2])
1315     {
1316         mask = (1 << format->bits[2]) - 1;
1317         dst->y = (float)((*src >> format->shift[2]) & mask) / mask;
1318     }
1319     else
1320         dst->y = 1.0f;
1321
1322     if (format->bits[3])
1323     {
1324         mask = (1 << format->bits[3]) - 1;
1325         dst->z = (float)((*src >> format->shift[3]) & mask) / mask;
1326     }
1327     else
1328         dst->z = 1.0f;
1329
1330     if (format->bits[0])
1331     {
1332         mask = (1 << format->bits[0]) - 1;
1333         dst->w = (float)((*src >> format->shift[0]) & mask) / mask;
1334     }
1335     else
1336         dst->w = 1.0f;
1337 }
1338
1339 static void format_from_vec4(const struct pixel_format_desc *format, const struct vec4 *src, DWORD *dst)
1340 {
1341     *dst = 0;
1342
1343     if (format->bits[1])
1344         *dst |= (DWORD)(src->x * ((1 << format->bits[1]) - 1) + 0.5f) << format->shift[1];
1345     if (format->bits[2])
1346         *dst |= (DWORD)(src->y * ((1 << format->bits[2]) - 1) + 0.5f) << format->shift[2];
1347     if (format->bits[3])
1348         *dst |= (DWORD)(src->z * ((1 << format->bits[3]) - 1) + 0.5f) << format->shift[3];
1349     if (format->bits[0])
1350         *dst |= (DWORD)(src->w * ((1 << format->bits[0]) - 1) + 0.5f) << format->shift[0];
1351 }
1352
1353 /************************************************************
1354  * copy_pixels
1355  *
1356  * Copies the source buffer to the destination buffer.
1357  * Works for any pixel format.
1358  * The source and the destination must be block-aligned.
1359  */
1360 void copy_pixels(const BYTE *src, UINT src_row_pitch, UINT src_slice_pitch,
1361         BYTE *dst, UINT dst_row_pitch, UINT dst_slice_pitch, const struct volume *size,
1362         const struct pixel_format_desc *format)
1363 {
1364     UINT row, slice;
1365     BYTE *dst_addr;
1366     const BYTE *src_addr;
1367     UINT row_block_count = (size->width + format->block_width - 1) / format->block_width;
1368     UINT row_count = (size->height + format->block_height - 1) / format->block_height;
1369
1370     for (slice = 0; slice < size->depth; slice++)
1371     {
1372         src_addr = src + slice * src_slice_pitch;
1373         dst_addr = dst + slice * dst_slice_pitch;
1374
1375         for (row = 0; row < row_count; row++)
1376         {
1377             memcpy(dst_addr, src_addr, row_block_count * format->block_byte_count);
1378             src_addr += src_row_pitch;
1379             dst_addr += dst_row_pitch;
1380         }
1381     }
1382 }
1383
1384 /************************************************************
1385  * convert_argb_pixels
1386  *
1387  * Copies the source buffer to the destination buffer, performing
1388  * any necessary format conversion and color keying.
1389  * Pixels outsize the source rect are blacked out.
1390  * Works only for ARGB formats with 1 - 4 bytes per pixel.
1391  */
1392 void convert_argb_pixels(const BYTE *src, UINT src_row_pitch, UINT src_slice_pitch, const struct volume *src_size,
1393         const struct pixel_format_desc *src_format, BYTE *dst, UINT dst_row_pitch, UINT dst_slice_pitch,
1394         const struct volume *dst_size, const struct pixel_format_desc *dst_format, D3DCOLOR color_key)
1395 {
1396     struct argb_conversion_info conv_info, ck_conv_info;
1397     const struct pixel_format_desc *ck_format = NULL;
1398     DWORD channels[4], pixel;
1399     UINT min_width, min_height, min_depth;
1400     UINT x, y, z;
1401
1402     ZeroMemory(channels, sizeof(channels));
1403     init_argb_conversion_info(src_format, dst_format, &conv_info);
1404
1405     min_width = min(src_size->width, dst_size->width);
1406     min_height = min(src_size->height, dst_size->height);
1407     min_depth = min(src_size->depth, dst_size->depth);
1408
1409     if (color_key)
1410     {
1411         /* Color keys are always represented in D3DFMT_A8R8G8B8 format. */
1412         ck_format = get_format_info(D3DFMT_A8R8G8B8);
1413         init_argb_conversion_info(src_format, ck_format, &ck_conv_info);
1414     }
1415
1416     for (z = 0; z < min_depth; z++) {
1417         const BYTE *src_slice_ptr = src + z * src_slice_pitch;
1418         BYTE *dst_slice_ptr = dst + z * dst_slice_pitch;
1419
1420         for (y = 0; y < min_height; y++) {
1421             const BYTE *src_ptr = src_slice_ptr + y * src_row_pitch;
1422             BYTE *dst_ptr = dst_slice_ptr + y * dst_row_pitch;
1423             DWORD val;
1424
1425             for (x = 0; x < min_width; x++) {
1426                 /* extract source color components */
1427                 pixel = dword_from_bytes(src_ptr, src_format->bytes_per_pixel);
1428
1429                 if (!src_format->to_rgba && !dst_format->from_rgba)
1430                 {
1431                     get_relevant_argb_components(&conv_info, pixel, channels);
1432                     val = make_argb_color(&conv_info, channels);
1433
1434                     if (color_key)
1435                     {
1436                         get_relevant_argb_components(&ck_conv_info, pixel, channels);
1437                         pixel = make_argb_color(&ck_conv_info, channels);
1438                         if (pixel == color_key)
1439                             val &= ~conv_info.destmask[0];
1440                     }
1441                 }
1442                 else
1443                 {
1444                     struct vec4 color, tmp;
1445
1446                     format_to_vec4(src_format, &pixel, &color);
1447                     if (src_format->to_rgba)
1448                         src_format->to_rgba(&color, &tmp);
1449                     else
1450                         tmp = color;
1451
1452                     if (ck_format)
1453                     {
1454                         format_from_vec4(ck_format, &tmp, &pixel);
1455                         if (pixel == color_key)
1456                             tmp.w = 0.0f;
1457                     }
1458
1459                     if (dst_format->from_rgba)
1460                         dst_format->from_rgba(&tmp, &color);
1461                     else
1462                         color = tmp;
1463
1464                     format_from_vec4(dst_format, &color, &val);
1465                 }
1466
1467                 dword_to_bytes(dst_ptr, val, dst_format->bytes_per_pixel);
1468                 src_ptr  +=  src_format->bytes_per_pixel;
1469                 dst_ptr += dst_format->bytes_per_pixel;
1470             }
1471
1472             if (src_size->width < dst_size->width) /* black out remaining pixels */
1473                 memset(dst_ptr, 0, dst_format->bytes_per_pixel * (dst_size->width - src_size->width));
1474         }
1475
1476         if (src_size->height < dst_size->height) /* black out remaining pixels */
1477             memset(dst + src_size->height * dst_row_pitch, 0, dst_row_pitch * (dst_size->height - src_size->height));
1478     }
1479     if (src_size->depth < dst_size->depth) /* black out remaining pixels */
1480         memset(dst + src_size->depth * dst_slice_pitch, 0, dst_slice_pitch * (dst_size->depth - src_size->depth));
1481 }
1482
1483 /************************************************************
1484  * point_filter_argb_pixels
1485  *
1486  * Copies the source buffer to the destination buffer, performing
1487  * any necessary format conversion, color keying and stretching
1488  * using a point filter.
1489  * Works only for ARGB formats with 1 - 4 bytes per pixel.
1490  */
1491 void point_filter_argb_pixels(const BYTE *src, UINT src_row_pitch, UINT src_slice_pitch, const struct volume *src_size,
1492         const struct pixel_format_desc *src_format, BYTE *dst, UINT dst_row_pitch, UINT dst_slice_pitch,
1493         const struct volume *dst_size, const struct pixel_format_desc *dst_format, D3DCOLOR color_key)
1494 {
1495     struct argb_conversion_info conv_info, ck_conv_info;
1496     const struct pixel_format_desc *ck_format = NULL;
1497     DWORD channels[4], pixel;
1498     UINT x, y, z;
1499
1500     ZeroMemory(channels, sizeof(channels));
1501     init_argb_conversion_info(src_format, dst_format, &conv_info);
1502
1503     if (color_key)
1504     {
1505         /* Color keys are always represented in D3DFMT_A8R8G8B8 format. */
1506         ck_format = get_format_info(D3DFMT_A8R8G8B8);
1507         init_argb_conversion_info(src_format, ck_format, &ck_conv_info);
1508     }
1509
1510     for (z = 0; z < dst_size->depth; z++)
1511     {
1512         BYTE *dst_slice_ptr = dst + z * dst_slice_pitch;
1513         const BYTE *src_slice_ptr = src + src_slice_pitch * (z * src_size->depth / dst_size->depth);
1514
1515         for (y = 0; y < dst_size->height; y++)
1516         {
1517             BYTE *dst_ptr = dst_slice_ptr + y * dst_row_pitch;
1518             const BYTE *src_row_ptr = src_slice_ptr + src_row_pitch * (y * src_size->height / dst_size->height);
1519
1520             for (x = 0; x < dst_size->width; x++)
1521             {
1522                 const BYTE *src_ptr = src_row_ptr + (x * src_size->width / dst_size->width) * src_format->bytes_per_pixel;
1523                 DWORD val;
1524
1525                 /* extract source color components */
1526                 pixel = dword_from_bytes(src_ptr, src_format->bytes_per_pixel);
1527
1528                 if (!src_format->to_rgba && !dst_format->from_rgba)
1529                 {
1530                     get_relevant_argb_components(&conv_info, pixel, channels);
1531                     val = make_argb_color(&conv_info, channels);
1532
1533                     if (color_key)
1534                     {
1535                         get_relevant_argb_components(&ck_conv_info, pixel, channels);
1536                         pixel = make_argb_color(&ck_conv_info, channels);
1537                         if (pixel == color_key)
1538                             val &= ~conv_info.destmask[0];
1539                     }
1540                 }
1541                 else
1542                 {
1543                     struct vec4 color, tmp;
1544
1545                     format_to_vec4(src_format, &pixel, &color);
1546                     if (src_format->to_rgba)
1547                         src_format->to_rgba(&color, &tmp);
1548                     else
1549                         tmp = color;
1550
1551                     if (ck_format)
1552                     {
1553                         format_from_vec4(ck_format, &tmp, &pixel);
1554                         if (pixel == color_key)
1555                             tmp.w = 0.0f;
1556                     }
1557
1558                     if (dst_format->from_rgba)
1559                         dst_format->from_rgba(&tmp, &color);
1560                     else
1561                         color = tmp;
1562
1563                     format_from_vec4(dst_format, &color, &val);
1564                 }
1565
1566                 dword_to_bytes(dst_ptr, val, dst_format->bytes_per_pixel);
1567                 dst_ptr += dst_format->bytes_per_pixel;
1568             }
1569         }
1570     }
1571 }
1572
1573 /************************************************************
1574  * D3DXLoadSurfaceFromMemory
1575  *
1576  * Loads data from a given memory chunk into a surface,
1577  * applying any of the specified filters.
1578  *
1579  * PARAMS
1580  *   pDestSurface [I] pointer to the surface
1581  *   pDestPalette [I] palette to use
1582  *   pDestRect    [I] to be filled area of the surface
1583  *   pSrcMemory   [I] pointer to the source data
1584  *   SrcFormat    [I] format of the source pixel data
1585  *   SrcPitch     [I] number of bytes in a row
1586  *   pSrcPalette  [I] palette used in the source image
1587  *   pSrcRect     [I] area of the source data to load
1588  *   dwFilter     [I] filter to apply on stretching
1589  *   Colorkey     [I] colorkey
1590  *
1591  * RETURNS
1592  *   Success: D3D_OK, if we successfully load the pixel data into our surface or
1593  *                    if pSrcMemory is NULL but the other parameters are valid
1594  *   Failure: D3DERR_INVALIDCALL, if pDestSurface, SrcPitch or pSrcRect are NULL or
1595  *                                if SrcFormat is an invalid format (other than D3DFMT_UNKNOWN) or
1596  *                                if DestRect is invalid
1597  *            D3DXERR_INVALIDDATA, if we fail to lock pDestSurface
1598  *            E_FAIL, if SrcFormat is D3DFMT_UNKNOWN or the dimensions of pSrcRect are invalid
1599  *
1600  * NOTES
1601  *   pSrcRect specifies the dimensions of the source data;
1602  *   negative values for pSrcRect are allowed as we're only looking at the width and height anyway.
1603  *
1604  */
1605 HRESULT WINAPI D3DXLoadSurfaceFromMemory(IDirect3DSurface9 *dst_surface,
1606         const PALETTEENTRY *dst_palette, const RECT *dst_rect, const void *src_memory,
1607         D3DFORMAT src_format, UINT src_pitch, const PALETTEENTRY *src_palette, const RECT *src_rect,
1608         DWORD filter, D3DCOLOR color_key)
1609 {
1610     const struct pixel_format_desc *srcformatdesc, *destformatdesc;
1611     D3DSURFACE_DESC surfdesc;
1612     D3DLOCKED_RECT lockrect;
1613     struct volume src_size, dst_size;
1614
1615     TRACE("(%p, %p, %s, %p, %#x, %u, %p, %s %#x, 0x%08x)\n",
1616             dst_surface, dst_palette, wine_dbgstr_rect(dst_rect), src_memory, src_format,
1617             src_pitch, src_palette, wine_dbgstr_rect(src_rect), filter, color_key);
1618
1619     if (!dst_surface || !src_memory || !src_rect)
1620     {
1621         WARN("Invalid argument specified.\n");
1622         return D3DERR_INVALIDCALL;
1623     }
1624     if (src_format == D3DFMT_UNKNOWN
1625             || src_rect->left >= src_rect->right
1626             || src_rect->top >= src_rect->bottom)
1627     {
1628         WARN("Invalid src_format or src_rect.\n");
1629         return E_FAIL;
1630     }
1631
1632     if (filter == D3DX_DEFAULT)
1633         filter = D3DX_FILTER_TRIANGLE | D3DX_FILTER_DITHER;
1634
1635     IDirect3DSurface9_GetDesc(dst_surface, &surfdesc);
1636
1637     src_size.width = src_rect->right - src_rect->left;
1638     src_size.height = src_rect->bottom - src_rect->top;
1639     src_size.depth = 1;
1640     if (!dst_rect)
1641     {
1642         dst_size.width = surfdesc.Width;
1643         dst_size.height = surfdesc.Height;
1644     }
1645     else
1646     {
1647         if (dst_rect->left > dst_rect->right || dst_rect->right > surfdesc.Width
1648                 || dst_rect->top > dst_rect->bottom || dst_rect->bottom > surfdesc.Height
1649                 || dst_rect->left < 0 || dst_rect->top < 0)
1650         {
1651             WARN("Invalid dst_rect specified.\n");
1652             return D3DERR_INVALIDCALL;
1653         }
1654         dst_size.width = dst_rect->right - dst_rect->left;
1655         dst_size.height = dst_rect->bottom - dst_rect->top;
1656         if (!dst_size.width || !dst_size.height)
1657             return D3D_OK;
1658     }
1659     dst_size.depth = 1;
1660
1661     srcformatdesc = get_format_info(src_format);
1662     destformatdesc = get_format_info(surfdesc.Format);
1663     if (srcformatdesc->type == FORMAT_UNKNOWN || destformatdesc->type == FORMAT_UNKNOWN)
1664     {
1665         FIXME("Unsupported pixel format conversion %#x -> %#x\n", src_format, surfdesc.Format);
1666         return E_NOTIMPL;
1667     }
1668
1669     if (src_format == surfdesc.Format
1670             && dst_size.width == src_size.width
1671             && dst_size.height == src_size.height
1672             && color_key == 0) /* Simple copy. */
1673     {
1674         if (src_rect->left & (srcformatdesc->block_width - 1)
1675                 || src_rect->top & (srcformatdesc->block_height - 1)
1676                 || (src_rect->right & (srcformatdesc->block_width - 1)
1677                     && src_size.width != surfdesc.Width)
1678                 || (src_rect->bottom & (srcformatdesc->block_height - 1)
1679                     && src_size.height != surfdesc.Height))
1680         {
1681             WARN("Source rect %s is misaligned.\n", wine_dbgstr_rect(src_rect));
1682             return D3DXERR_INVALIDDATA;
1683         }
1684
1685         if (FAILED(IDirect3DSurface9_LockRect(dst_surface, &lockrect, dst_rect, 0)))
1686             return D3DXERR_INVALIDDATA;
1687
1688         copy_pixels(src_memory, src_pitch, 0, lockrect.pBits, lockrect.Pitch, 0,
1689                 &src_size, srcformatdesc);
1690
1691         IDirect3DSurface9_UnlockRect(dst_surface);
1692     }
1693     else /* Stretching or format conversion. */
1694     {
1695         if (srcformatdesc->type != FORMAT_ARGB || destformatdesc->type != FORMAT_ARGB)
1696         {
1697             FIXME("Format conversion missing %#x -> %#x\n", src_format, surfdesc.Format);
1698             return E_NOTIMPL;
1699         }
1700
1701         if (FAILED(IDirect3DSurface9_LockRect(dst_surface, &lockrect, dst_rect, 0)))
1702             return D3DXERR_INVALIDDATA;
1703
1704         if ((filter & 0xf) == D3DX_FILTER_NONE)
1705         {
1706             convert_argb_pixels(src_memory, src_pitch, 0, &src_size, srcformatdesc,
1707                     lockrect.pBits, lockrect.Pitch, 0, &dst_size, destformatdesc, color_key);
1708         }
1709         else /* if ((filter & 0xf) == D3DX_FILTER_POINT) */
1710         {
1711             if ((filter & 0xf) != D3DX_FILTER_POINT)
1712                 FIXME("Unhandled filter %#x.\n", filter);
1713
1714             /* Always apply a point filter until D3DX_FILTER_LINEAR,
1715              * D3DX_FILTER_TRIANGLE and D3DX_FILTER_BOX are implemented. */
1716             point_filter_argb_pixels(src_memory, src_pitch, 0, &src_size, srcformatdesc,
1717                     lockrect.pBits, lockrect.Pitch, 0, &dst_size, destformatdesc, color_key);
1718         }
1719
1720         IDirect3DSurface9_UnlockRect(dst_surface);
1721     }
1722
1723     return D3D_OK;
1724 }
1725
1726 /************************************************************
1727  * D3DXLoadSurfaceFromSurface
1728  *
1729  * Copies the contents from one surface to another, performing any required
1730  * format conversion, resizing or filtering.
1731  *
1732  * PARAMS
1733  *   pDestSurface [I] pointer to the destination surface
1734  *   pDestPalette [I] palette to use
1735  *   pDestRect    [I] to be filled area of the surface
1736  *   pSrcSurface  [I] pointer to the source surface
1737  *   pSrcPalette  [I] palette used for the source surface
1738  *   pSrcRect     [I] area of the source data to load
1739  *   dwFilter     [I] filter to apply on resizing
1740  *   Colorkey     [I] any ARGB value or 0 to disable color-keying
1741  *
1742  * RETURNS
1743  *   Success: D3D_OK
1744  *   Failure: D3DERR_INVALIDCALL, if pDestSurface or pSrcSurface are NULL
1745  *            D3DXERR_INVALIDDATA, if one of the surfaces is not lockable
1746  *
1747  */
1748 HRESULT WINAPI D3DXLoadSurfaceFromSurface(IDirect3DSurface9 *dst_surface,
1749         const PALETTEENTRY *dst_palette, const RECT *dst_rect, IDirect3DSurface9 *src_surface,
1750         const PALETTEENTRY *src_palette, const RECT *src_rect, DWORD filter, D3DCOLOR color_key)
1751 {
1752     RECT rect;
1753     D3DLOCKED_RECT lock;
1754     D3DSURFACE_DESC SrcDesc;
1755     HRESULT hr;
1756
1757     TRACE("dst_surface %p, dst_palette %p, dst_rect %s, src_surface %p, "
1758             "src_palette %p, src_rect %s, filter %#x, color_key 0x%08x.\n",
1759             dst_surface, dst_palette, wine_dbgstr_rect(dst_rect), src_surface,
1760             src_palette, wine_dbgstr_rect(src_rect), filter, color_key);
1761
1762     if (!dst_surface || !src_surface)
1763         return D3DERR_INVALIDCALL;
1764
1765     IDirect3DSurface9_GetDesc(src_surface, &SrcDesc);
1766
1767     if (!src_rect)
1768         SetRect(&rect, 0, 0, SrcDesc.Width, SrcDesc.Height);
1769     else
1770         rect = *src_rect;
1771
1772     if (FAILED(IDirect3DSurface9_LockRect(src_surface, &lock, NULL, D3DLOCK_READONLY)))
1773         return D3DXERR_INVALIDDATA;
1774
1775     hr = D3DXLoadSurfaceFromMemory(dst_surface, dst_palette, dst_rect,
1776             lock.pBits, SrcDesc.Format, lock.Pitch, src_palette, &rect, filter, color_key);
1777
1778     IDirect3DSurface9_UnlockRect(src_surface);
1779
1780     return hr;
1781 }
1782
1783
1784 HRESULT WINAPI D3DXSaveSurfaceToFileA(const char *dst_filename, D3DXIMAGE_FILEFORMAT file_format,
1785         IDirect3DSurface9 *src_surface, const PALETTEENTRY *src_palette, const RECT *src_rect)
1786 {
1787     int len;
1788     WCHAR *filename;
1789     HRESULT hr;
1790     ID3DXBuffer *buffer;
1791
1792     TRACE("(%s, %#x, %p, %p, %s): relay\n",
1793             wine_dbgstr_a(dst_filename), file_format, src_surface, src_palette, wine_dbgstr_rect(src_rect));
1794
1795     if (!dst_filename) return D3DERR_INVALIDCALL;
1796
1797     len = MultiByteToWideChar(CP_ACP, 0, dst_filename, -1, NULL, 0);
1798     filename = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
1799     if (!filename) return E_OUTOFMEMORY;
1800     MultiByteToWideChar(CP_ACP, 0, dst_filename, -1, filename, len);
1801
1802     hr = D3DXSaveSurfaceToFileInMemory(&buffer, file_format, src_surface, src_palette, src_rect);
1803     if (SUCCEEDED(hr))
1804     {
1805         hr = write_buffer_to_file(filename, buffer);
1806         ID3DXBuffer_Release(buffer);
1807     }
1808
1809     HeapFree(GetProcessHeap(), 0, filename);
1810     return hr;
1811 }
1812
1813 HRESULT WINAPI D3DXSaveSurfaceToFileW(const WCHAR *dst_filename, D3DXIMAGE_FILEFORMAT file_format,
1814         IDirect3DSurface9 *src_surface, const PALETTEENTRY *src_palette, const RECT *src_rect)
1815 {
1816     HRESULT hr;
1817     ID3DXBuffer *buffer;
1818
1819     TRACE("(%s, %#x, %p, %p, %s): relay\n",
1820         wine_dbgstr_w(dst_filename), file_format, src_surface, src_palette, wine_dbgstr_rect(src_rect));
1821
1822     if (!dst_filename) return D3DERR_INVALIDCALL;
1823
1824     hr = D3DXSaveSurfaceToFileInMemory(&buffer, file_format, src_surface, src_palette, src_rect);
1825     if (SUCCEEDED(hr))
1826     {
1827         hr = write_buffer_to_file(dst_filename, buffer);
1828         ID3DXBuffer_Release(buffer);
1829     }
1830
1831     return hr;
1832 }
1833
1834 HRESULT WINAPI D3DXSaveSurfaceToFileInMemory(ID3DXBuffer **dst_buffer, D3DXIMAGE_FILEFORMAT file_format,
1835         IDirect3DSurface9 *src_surface, const PALETTEENTRY *src_palette, const RECT *src_rect)
1836 {
1837     IWICBitmapEncoder *encoder = NULL;
1838     IWICBitmapFrameEncode *frame = NULL;
1839     IPropertyBag2 *encoder_options = NULL;
1840     IStream *stream = NULL;
1841     HRESULT hr;
1842     HRESULT initresult;
1843     const CLSID *encoder_clsid;
1844     const GUID *pixel_format_guid;
1845     WICPixelFormatGUID wic_pixel_format;
1846     D3DFORMAT d3d_pixel_format;
1847     D3DSURFACE_DESC src_surface_desc;
1848     D3DLOCKED_RECT locked_rect;
1849     int width, height;
1850     STATSTG stream_stats;
1851     HGLOBAL stream_hglobal;
1852     ID3DXBuffer *buffer;
1853     DWORD size;
1854
1855     TRACE("(%p, %#x, %p, %p, %s)\n",
1856         dst_buffer, file_format, src_surface, src_palette, wine_dbgstr_rect(src_rect));
1857
1858     if (!dst_buffer || !src_surface) return D3DERR_INVALIDCALL;
1859
1860     if (src_palette)
1861     {
1862         FIXME("Saving surfaces with palettized pixel formats not implemented yet\n");
1863         return D3DERR_INVALIDCALL;
1864     }
1865
1866     switch (file_format)
1867     {
1868         case D3DXIFF_BMP:
1869             encoder_clsid = &CLSID_WICBmpEncoder;
1870             break;
1871         case D3DXIFF_PNG:
1872             encoder_clsid = &CLSID_WICPngEncoder;
1873             break;
1874         case D3DXIFF_JPG:
1875             encoder_clsid = &CLSID_WICJpegEncoder;
1876             break;
1877         case D3DXIFF_DDS:
1878             return save_dds_surface_to_memory(dst_buffer, src_surface, src_rect);
1879         case D3DXIFF_DIB:
1880         case D3DXIFF_HDR:
1881         case D3DXIFF_PFM:
1882         case D3DXIFF_TGA:
1883         case D3DXIFF_PPM:
1884             FIXME("File format %#x is not supported yet\n", file_format);
1885             return E_NOTIMPL;
1886         default:
1887             return D3DERR_INVALIDCALL;
1888     }
1889
1890     IDirect3DSurface9_GetDesc(src_surface, &src_surface_desc);
1891     if (src_rect)
1892     {
1893         if (src_rect->left == src_rect->right || src_rect->top == src_rect->bottom)
1894         {
1895             WARN("Invalid rectangle with 0 area\n");
1896             return D3DXCreateBuffer(64, dst_buffer);
1897         }
1898         if (src_rect->left < 0 || src_rect->top < 0)
1899             return D3DERR_INVALIDCALL;
1900         if (src_rect->left > src_rect->right || src_rect->top > src_rect->bottom)
1901             return D3DERR_INVALIDCALL;
1902         if (src_rect->right > src_surface_desc.Width || src_rect->bottom > src_surface_desc.Height)
1903             return D3DERR_INVALIDCALL;
1904
1905         width = src_rect->right - src_rect->left;
1906         height = src_rect->bottom - src_rect->top;
1907     }
1908     else
1909     {
1910         width = src_surface_desc.Width;
1911         height = src_surface_desc.Height;
1912     }
1913
1914     initresult = CoInitializeEx(NULL, COINIT_APARTMENTTHREADED);
1915
1916     hr = CoCreateInstance(encoder_clsid, NULL, CLSCTX_INPROC_SERVER,
1917         &IID_IWICBitmapEncoder, (void **)&encoder);
1918     if (FAILED(hr)) goto cleanup_err;
1919
1920     hr = CreateStreamOnHGlobal(NULL, TRUE, &stream);
1921     if (FAILED(hr)) goto cleanup_err;
1922
1923     hr = IWICBitmapEncoder_Initialize(encoder, stream, WICBitmapEncoderNoCache);
1924     if (FAILED(hr)) goto cleanup_err;
1925
1926     hr = IWICBitmapEncoder_CreateNewFrame(encoder, &frame, &encoder_options);
1927     if (FAILED(hr)) goto cleanup_err;
1928
1929     hr = IWICBitmapFrameEncode_Initialize(frame, encoder_options);
1930     if (FAILED(hr)) goto cleanup_err;
1931
1932     hr = IWICBitmapFrameEncode_SetSize(frame, width, height);
1933     if (FAILED(hr)) goto cleanup_err;
1934
1935     pixel_format_guid = d3dformat_to_wic_guid(src_surface_desc.Format);
1936     if (!pixel_format_guid)
1937     {
1938         FIXME("Pixel format %#x is not supported yet\n", src_surface_desc.Format);
1939         hr = E_NOTIMPL;
1940         goto cleanup;
1941     }
1942
1943     memcpy(&wic_pixel_format, pixel_format_guid, sizeof(GUID));
1944     hr = IWICBitmapFrameEncode_SetPixelFormat(frame, &wic_pixel_format);
1945     d3d_pixel_format = wic_guid_to_d3dformat(&wic_pixel_format);
1946     if (SUCCEEDED(hr) && d3d_pixel_format != D3DFMT_UNKNOWN)
1947     {
1948         TRACE("Using pixel format %s %#x\n", debugstr_guid(&wic_pixel_format), d3d_pixel_format);
1949
1950         if (src_surface_desc.Format == d3d_pixel_format) /* Simple copy */
1951         {
1952             hr = IDirect3DSurface9_LockRect(src_surface, &locked_rect, src_rect, D3DLOCK_READONLY);
1953             if (SUCCEEDED(hr))
1954             {
1955                 IWICBitmapFrameEncode_WritePixels(frame, height,
1956                     locked_rect.Pitch, height * locked_rect.Pitch, locked_rect.pBits);
1957                 IDirect3DSurface9_UnlockRect(src_surface);
1958             }
1959         }
1960         else /* Pixel format conversion */
1961         {
1962             const struct pixel_format_desc *src_format_desc, *dst_format_desc;
1963             struct volume size;
1964             DWORD dst_pitch;
1965             void *dst_data;
1966
1967             src_format_desc = get_format_info(src_surface_desc.Format);
1968             dst_format_desc = get_format_info(d3d_pixel_format);
1969             if (src_format_desc->type != FORMAT_ARGB || dst_format_desc->type != FORMAT_ARGB)
1970             {
1971                 FIXME("Unsupported pixel format conversion %#x -> %#x\n",
1972                     src_surface_desc.Format, d3d_pixel_format);
1973                 hr = E_NOTIMPL;
1974                 goto cleanup;
1975             }
1976
1977             size.width = width;
1978             size.height = height;
1979             size.depth = 1;
1980             dst_pitch = width * dst_format_desc->bytes_per_pixel;
1981             dst_data = HeapAlloc(GetProcessHeap(), 0, dst_pitch * height);
1982             if (!dst_data)
1983             {
1984                 hr = E_OUTOFMEMORY;
1985                 goto cleanup;
1986             }
1987
1988             hr = IDirect3DSurface9_LockRect(src_surface, &locked_rect, src_rect, D3DLOCK_READONLY);
1989             if (SUCCEEDED(hr))
1990             {
1991                 convert_argb_pixels(locked_rect.pBits, locked_rect.Pitch, 0, &size, src_format_desc,
1992                     dst_data, dst_pitch, 0, &size, dst_format_desc, 0);
1993                 IDirect3DSurface9_UnlockRect(src_surface);
1994             }
1995
1996             IWICBitmapFrameEncode_WritePixels(frame, height, dst_pitch, dst_pitch * height, dst_data);
1997             HeapFree(GetProcessHeap(), 0, dst_data);
1998         }
1999
2000         hr = IWICBitmapFrameEncode_Commit(frame);
2001         if (SUCCEEDED(hr)) hr = IWICBitmapEncoder_Commit(encoder);
2002     }
2003     else WARN("Unsupported pixel format %#x\n", src_surface_desc.Format);
2004
2005     /* copy data from stream to ID3DXBuffer */
2006     hr = IStream_Stat(stream, &stream_stats, STATFLAG_NONAME);
2007     if (FAILED(hr)) goto cleanup_err;
2008
2009     if (stream_stats.cbSize.u.HighPart != 0)
2010     {
2011         hr = D3DXERR_INVALIDDATA;
2012         goto cleanup;
2013     }
2014     size = stream_stats.cbSize.u.LowPart;
2015
2016     hr = D3DXCreateBuffer(size, &buffer);
2017     if (FAILED(hr)) goto cleanup;
2018
2019     hr = GetHGlobalFromStream(stream, &stream_hglobal);
2020     if (SUCCEEDED(hr))
2021     {
2022         void *buffer_pointer = ID3DXBuffer_GetBufferPointer(buffer);
2023         void *stream_data = GlobalLock(stream_hglobal);
2024         memcpy(buffer_pointer, stream_data, size);
2025         GlobalUnlock(stream_hglobal);
2026         *dst_buffer = buffer;
2027     }
2028     else ID3DXBuffer_Release(buffer);
2029
2030 cleanup_err:
2031     if (FAILED(hr) && hr != E_OUTOFMEMORY)
2032         hr = D3DERR_INVALIDCALL;
2033
2034 cleanup:
2035     if (stream) IStream_Release(stream);
2036
2037     if (frame) IWICBitmapFrameEncode_Release(frame);
2038     if (encoder_options) IPropertyBag2_Release(encoder_options);
2039
2040     if (encoder) IWICBitmapEncoder_Release(encoder);
2041
2042     if (SUCCEEDED(initresult)) CoUninitialize();
2043
2044     return hr;
2045 }