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->format == D3DFMT_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_simple_data(locked_rect.pBits, locked_rect.Pitch, 0, &volume, pixel_format,
 504         pixels, dst_pitch, 0, &volume, pixel_format, 0);
 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->format == D3DFMT_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_simple_data
1355  *
1356  * Copies the source buffer to the destination buffer, performing
1357  * any necessary format conversion and color keying.
1358  * Pixels outsize the source rect are blacked out.
1359  * Works only for ARGB formats with 1 - 4 bytes per pixel.
1360  */
1361 void copy_simple_data(const BYTE *src, UINT src_row_pitch, UINT src_slice_pitch, struct volume *src_size,
1362         const struct pixel_format_desc *src_format, BYTE *dst, UINT dst_row_pitch, UINT dst_slice_pitch,
1363         struct volume *dst_size, const struct pixel_format_desc *dst_format, D3DCOLOR color_key)
1364 {
1365     struct argb_conversion_info conv_info, ck_conv_info;
1366     const struct pixel_format_desc *ck_format = NULL;
1367     DWORD channels[4], pixel;
1368     UINT min_width, min_height, min_depth;
1369     UINT x, y, z;
1370
1371     ZeroMemory(channels, sizeof(channels));
1372     init_argb_conversion_info(src_format, dst_format, &conv_info);
1373
1374     min_width = min(src_size->width, dst_size->width);
1375     min_height = min(src_size->height, dst_size->height);
1376     min_depth = min(src_size->depth, dst_size->depth);
1377
1378     if (color_key)
1379     {
1380         /* Color keys are always represented in D3DFMT_A8R8G8B8 format. */
1381         ck_format = get_format_info(D3DFMT_A8R8G8B8);
1382         init_argb_conversion_info(src_format, ck_format, &ck_conv_info);
1383     }
1384
1385     for (z = 0; z < min_depth; z++) {
1386         const BYTE *src_slice_ptr = src + z * src_slice_pitch;
1387         BYTE *dst_slice_ptr = dst + z * dst_slice_pitch;
1388
1389         for (y = 0; y < min_height; y++) {
1390             const BYTE *src_ptr = src_slice_ptr + y * src_row_pitch;
1391             BYTE *dst_ptr = dst_slice_ptr + y * dst_row_pitch;
1392             DWORD val;
1393
1394             for (x = 0; x < min_width; x++) {
1395                 /* extract source color components */
1396                 pixel = dword_from_bytes(src_ptr, src_format->bytes_per_pixel);
1397
1398                 if (!src_format->to_rgba && !dst_format->from_rgba)
1399                 {
1400                     get_relevant_argb_components(&conv_info, pixel, channels);
1401                     val = make_argb_color(&conv_info, channels);
1402
1403                     if (color_key)
1404                     {
1405                         get_relevant_argb_components(&ck_conv_info, pixel, channels);
1406                         pixel = make_argb_color(&ck_conv_info, channels);
1407                         if (pixel == color_key)
1408                             val &= ~conv_info.destmask[0];
1409                     }
1410                 }
1411                 else
1412                 {
1413                     struct vec4 color, tmp;
1414
1415                     format_to_vec4(src_format, &pixel, &color);
1416                     if (src_format->to_rgba)
1417                         src_format->to_rgba(&color, &tmp);
1418                     else
1419                         tmp = color;
1420
1421                     if (ck_format)
1422                     {
1423                         format_from_vec4(ck_format, &tmp, &pixel);
1424                         if (pixel == color_key)
1425                             tmp.w = 0.0f;
1426                     }
1427
1428                     if (dst_format->from_rgba)
1429                         dst_format->from_rgba(&tmp, &color);
1430                     else
1431                         color = tmp;
1432
1433                     format_from_vec4(dst_format, &color, &val);
1434                 }
1435
1436                 dword_to_bytes(dst_ptr, val, dst_format->bytes_per_pixel);
1437                 src_ptr  +=  src_format->bytes_per_pixel;
1438                 dst_ptr += dst_format->bytes_per_pixel;
1439             }
1440
1441             if (src_size->width < dst_size->width) /* black out remaining pixels */
1442                 memset(dst_ptr, 0, dst_format->bytes_per_pixel * (dst_size->width - src_size->width));
1443         }
1444
1445         if (src_size->height < dst_size->height) /* black out remaining pixels */
1446             memset(dst + src_size->height * dst_row_pitch, 0, dst_row_pitch * (dst_size->height - src_size->height));
1447     }
1448     if (src_size->depth < dst_size->depth) /* black out remaining pixels */
1449         memset(dst + src_size->depth * dst_slice_pitch, 0, dst_slice_pitch * (dst_size->depth - src_size->depth));
1450 }
1451
1452 /************************************************************
1453  * point_filter_simple_data
1454  *
1455  * Copies the source buffer to the destination buffer, performing
1456  * any necessary format conversion, color keying and stretching
1457  * using a point filter.
1458  * Works only for ARGB formats with 1 - 4 bytes per pixel.
1459  */
1460 void point_filter_simple_data(const BYTE *src, UINT src_row_pitch, UINT src_slice_pitch, struct volume *src_size,
1461         const struct pixel_format_desc *src_format, BYTE *dst, UINT dst_row_pitch, UINT dst_slice_pitch,
1462         struct volume *dst_size, const struct pixel_format_desc *dst_format, D3DCOLOR color_key)
1463 {
1464     struct argb_conversion_info conv_info, ck_conv_info;
1465     const struct pixel_format_desc *ck_format = NULL;
1466     DWORD channels[4], pixel;
1467     UINT x, y, z;
1468
1469     ZeroMemory(channels, sizeof(channels));
1470     init_argb_conversion_info(src_format, dst_format, &conv_info);
1471
1472     if (color_key)
1473     {
1474         /* Color keys are always represented in D3DFMT_A8R8G8B8 format. */
1475         ck_format = get_format_info(D3DFMT_A8R8G8B8);
1476         init_argb_conversion_info(src_format, ck_format, &ck_conv_info);
1477     }
1478
1479     for (z = 0; z < dst_size->depth; z++)
1480     {
1481         BYTE *dst_slice_ptr = dst + z * dst_slice_pitch;
1482         const BYTE *src_slice_ptr = src + src_slice_pitch * (z * src_size->depth / dst_size->depth);
1483
1484         for (y = 0; y < dst_size->height; y++)
1485         {
1486             BYTE *dst_ptr = dst_slice_ptr + y * dst_row_pitch;
1487             const BYTE *src_row_ptr = src_slice_ptr + src_row_pitch * (y * src_size->height / dst_size->height);
1488
1489             for (x = 0; x < dst_size->width; x++)
1490             {
1491                 const BYTE *src_ptr = src_row_ptr + (x * src_size->width / dst_size->width) * src_format->bytes_per_pixel;
1492                 DWORD val;
1493
1494                 /* extract source color components */
1495                 pixel = dword_from_bytes(src_ptr, src_format->bytes_per_pixel);
1496
1497                 if (!src_format->to_rgba && !dst_format->from_rgba)
1498                 {
1499                     get_relevant_argb_components(&conv_info, pixel, channels);
1500                     val = make_argb_color(&conv_info, channels);
1501
1502                     if (color_key)
1503                     {
1504                         get_relevant_argb_components(&ck_conv_info, pixel, channels);
1505                         pixel = make_argb_color(&ck_conv_info, channels);
1506                         if (pixel == color_key)
1507                             val &= ~conv_info.destmask[0];
1508                     }
1509                 }
1510                 else
1511                 {
1512                     struct vec4 color, tmp;
1513
1514                     format_to_vec4(src_format, &pixel, &color);
1515                     if (src_format->to_rgba)
1516                         src_format->to_rgba(&color, &tmp);
1517                     else
1518                         tmp = color;
1519
1520                     if (ck_format)
1521                     {
1522                         format_from_vec4(ck_format, &tmp, &pixel);
1523                         if (pixel == color_key)
1524                             tmp.w = 0.0f;
1525                     }
1526
1527                     if (dst_format->from_rgba)
1528                         dst_format->from_rgba(&tmp, &color);
1529                     else
1530                         color = tmp;
1531
1532                     format_from_vec4(dst_format, &color, &val);
1533                 }
1534
1535                 dword_to_bytes(dst_ptr, val, dst_format->bytes_per_pixel);
1536                 dst_ptr += dst_format->bytes_per_pixel;
1537             }
1538         }
1539     }
1540 }
1541
1542 /************************************************************
1543  * D3DXLoadSurfaceFromMemory
1544  *
1545  * Loads data from a given memory chunk into a surface,
1546  * applying any of the specified filters.
1547  *
1548  * PARAMS
1549  *   pDestSurface [I] pointer to the surface
1550  *   pDestPalette [I] palette to use
1551  *   pDestRect    [I] to be filled area of the surface
1552  *   pSrcMemory   [I] pointer to the source data
1553  *   SrcFormat    [I] format of the source pixel data
1554  *   SrcPitch     [I] number of bytes in a row
1555  *   pSrcPalette  [I] palette used in the source image
1556  *   pSrcRect     [I] area of the source data to load
1557  *   dwFilter     [I] filter to apply on stretching
1558  *   Colorkey     [I] colorkey
1559  *
1560  * RETURNS
1561  *   Success: D3D_OK, if we successfully load the pixel data into our surface or
1562  *                    if pSrcMemory is NULL but the other parameters are valid
1563  *   Failure: D3DERR_INVALIDCALL, if pDestSurface, SrcPitch or pSrcRect are NULL or
1564  *                                if SrcFormat is an invalid format (other than D3DFMT_UNKNOWN) or
1565  *                                if DestRect is invalid
1566  *            D3DXERR_INVALIDDATA, if we fail to lock pDestSurface
1567  *            E_FAIL, if SrcFormat is D3DFMT_UNKNOWN or the dimensions of pSrcRect are invalid
1568  *
1569  * NOTES
1570  *   pSrcRect specifies the dimensions of the source data;
1571  *   negative values for pSrcRect are allowed as we're only looking at the width and height anyway.
1572  *
1573  */
1574 HRESULT WINAPI D3DXLoadSurfaceFromMemory(IDirect3DSurface9 *dst_surface,
1575         const PALETTEENTRY *dst_palette, const RECT *dst_rect, const void *src_memory,
1576         D3DFORMAT src_format, UINT src_pitch, const PALETTEENTRY *src_palette, const RECT *src_rect,
1577         DWORD filter, D3DCOLOR color_key)
1578 {
1579     const struct pixel_format_desc *srcformatdesc, *destformatdesc;
1580     D3DSURFACE_DESC surfdesc;
1581     D3DLOCKED_RECT lockrect;
1582     struct volume src_size, dst_size;
1583     HRESULT hr;
1584
1585     TRACE("(%p, %p, %s, %p, %#x, %u, %p, %s %#x, 0x%08x)\n",
1586             dst_surface, dst_palette, wine_dbgstr_rect(dst_rect), src_memory, src_format,
1587             src_pitch, src_palette, wine_dbgstr_rect(src_rect), filter, color_key);
1588
1589     if (!dst_surface || !src_memory || !src_rect)
1590     {
1591         WARN("Invalid argument specified.\n");
1592         return D3DERR_INVALIDCALL;
1593     }
1594     if (src_format == D3DFMT_UNKNOWN
1595             || src_rect->left >= src_rect->right
1596             || src_rect->top >= src_rect->bottom)
1597     {
1598         WARN("Invalid src_format or src_rect.\n");
1599         return E_FAIL;
1600     }
1601
1602     if (filter == D3DX_DEFAULT)
1603         filter = D3DX_FILTER_TRIANGLE | D3DX_FILTER_DITHER;
1604
1605     IDirect3DSurface9_GetDesc(dst_surface, &surfdesc);
1606
1607     src_size.width = src_rect->right - src_rect->left;
1608     src_size.height = src_rect->bottom - src_rect->top;
1609     src_size.depth = 1;
1610     if (!dst_rect)
1611     {
1612         dst_size.width = surfdesc.Width;
1613         dst_size.height = surfdesc.Height;
1614     }
1615     else
1616     {
1617         if (dst_rect->left > dst_rect->right || dst_rect->right > surfdesc.Width
1618                 || dst_rect->top > dst_rect->bottom || dst_rect->bottom > surfdesc.Height
1619                 || dst_rect->left < 0 || dst_rect->top < 0)
1620         {
1621             WARN("Invalid dst_rect specified.\n");
1622             return D3DERR_INVALIDCALL;
1623         }
1624         dst_size.width = dst_rect->right - dst_rect->left;
1625         dst_size.height = dst_rect->bottom - dst_rect->top;
1626         if (!dst_size.width || !dst_size.height)
1627             return D3D_OK;
1628     }
1629     dst_size.depth = 1;
1630
1631     srcformatdesc = get_format_info(src_format);
1632     destformatdesc = get_format_info(surfdesc.Format);
1633     if (srcformatdesc->type == FORMAT_UNKNOWN || destformatdesc->type == FORMAT_UNKNOWN)
1634     {
1635         FIXME("Unsupported pixel format conversion %#x -> %#x\n", src_format, surfdesc.Format);
1636         return E_NOTIMPL;
1637     }
1638
1639     if (src_format == surfdesc.Format
1640             && dst_size.width == src_size.width
1641             && dst_size.height == src_size.height) /* Simple copy. */
1642     {
1643         UINT row_block_count = ((src_size.width + srcformatdesc->block_width - 1) / srcformatdesc->block_width);
1644         UINT row_count = (src_size.height + srcformatdesc->block_height - 1) / srcformatdesc->block_height;
1645         const BYTE *src_addr;
1646         BYTE *dst_addr;
1647         UINT row;
1648
1649         if (src_rect->left & (srcformatdesc->block_width - 1)
1650                 || src_rect->top & (srcformatdesc->block_height - 1)
1651                 || (src_rect->right & (srcformatdesc->block_width - 1)
1652                     && src_size.width != surfdesc.Width)
1653                 || (src_rect->bottom & (srcformatdesc->block_height - 1)
1654                     && src_size.height != surfdesc.Height))
1655         {
1656             WARN("Source rect %s is misaligned.\n", wine_dbgstr_rect(src_rect));
1657             return D3DXERR_INVALIDDATA;
1658         }
1659
1660         if (FAILED(hr = IDirect3DSurface9_LockRect(dst_surface, &lockrect, dst_rect, 0)))
1661             return D3DXERR_INVALIDDATA;
1662
1663         src_addr = src_memory;
1664         src_addr += (src_rect->top / srcformatdesc->block_height) * src_pitch;
1665         src_addr += (src_rect->left / srcformatdesc->block_width) * srcformatdesc->block_byte_count;
1666         dst_addr = lockrect.pBits;
1667
1668         for (row = 0; row < row_count; ++row)
1669         {
1670             memcpy(dst_addr, src_addr, row_block_count * srcformatdesc->block_byte_count);
1671             src_addr += src_pitch;
1672             dst_addr += lockrect.Pitch;
1673         }
1674
1675         IDirect3DSurface9_UnlockRect(dst_surface);
1676     }
1677     else /* Stretching or format conversion. */
1678     {
1679         if (srcformatdesc->bytes_per_pixel > 4 || destformatdesc->bytes_per_pixel > 4
1680                 || srcformatdesc->block_height != 1 || srcformatdesc->block_width != 1
1681                 || destformatdesc->block_height != 1 || destformatdesc->block_width != 1)
1682         {
1683             FIXME("Format conversion missing %#x -> %#x\n", src_format, surfdesc.Format);
1684             return E_NOTIMPL;
1685         }
1686
1687         if (FAILED(hr = IDirect3DSurface9_LockRect(dst_surface, &lockrect, dst_rect, 0)))
1688             return D3DXERR_INVALIDDATA;
1689
1690         if ((filter & 0xf) == D3DX_FILTER_NONE)
1691         {
1692             copy_simple_data(src_memory, src_pitch, 0, &src_size, srcformatdesc,
1693                     lockrect.pBits, lockrect.Pitch, 0, &dst_size, destformatdesc, color_key);
1694         }
1695         else /* if ((filter & 0xf) == D3DX_FILTER_POINT) */
1696         {
1697             if ((filter & 0xf) != D3DX_FILTER_POINT)
1698                 FIXME("Unhandled filter %#x.\n", filter);
1699
1700             /* Always apply a point filter until D3DX_FILTER_LINEAR,
1701              * D3DX_FILTER_TRIANGLE and D3DX_FILTER_BOX are implemented. */
1702             point_filter_simple_data(src_memory, src_pitch, 0, &src_size, srcformatdesc,
1703                     lockrect.pBits, lockrect.Pitch, 0, &dst_size, destformatdesc, color_key);
1704         }
1705
1706         IDirect3DSurface9_UnlockRect(dst_surface);
1707     }
1708
1709     return D3D_OK;
1710 }
1711
1712 /************************************************************
1713  * D3DXLoadSurfaceFromSurface
1714  *
1715  * Copies the contents from one surface to another, performing any required
1716  * format conversion, resizing or filtering.
1717  *
1718  * PARAMS
1719  *   pDestSurface [I] pointer to the destination surface
1720  *   pDestPalette [I] palette to use
1721  *   pDestRect    [I] to be filled area of the surface
1722  *   pSrcSurface  [I] pointer to the source surface
1723  *   pSrcPalette  [I] palette used for the source surface
1724  *   pSrcRect     [I] area of the source data to load
1725  *   dwFilter     [I] filter to apply on resizing
1726  *   Colorkey     [I] any ARGB value or 0 to disable color-keying
1727  *
1728  * RETURNS
1729  *   Success: D3D_OK
1730  *   Failure: D3DERR_INVALIDCALL, if pDestSurface or pSrcSurface are NULL
1731  *            D3DXERR_INVALIDDATA, if one of the surfaces is not lockable
1732  *
1733  */
1734 HRESULT WINAPI D3DXLoadSurfaceFromSurface(IDirect3DSurface9 *dst_surface,
1735         const PALETTEENTRY *dst_palette, const RECT *dst_rect, IDirect3DSurface9 *src_surface,
1736         const PALETTEENTRY *src_palette, const RECT *src_rect, DWORD filter, D3DCOLOR color_key)
1737 {
1738     RECT rect;
1739     D3DLOCKED_RECT lock;
1740     D3DSURFACE_DESC SrcDesc;
1741     HRESULT hr;
1742
1743     TRACE("dst_surface %p, dst_palette %p, dst_rect %s, src_surface %p, "
1744             "src_palette %p, src_rect %s, filter %#x, color_key 0x%08x.\n",
1745             dst_surface, dst_palette, wine_dbgstr_rect(dst_rect), src_surface,
1746             src_palette, wine_dbgstr_rect(src_rect), filter, color_key);
1747
1748     if (!dst_surface || !src_surface)
1749         return D3DERR_INVALIDCALL;
1750
1751     IDirect3DSurface9_GetDesc(src_surface, &SrcDesc);
1752
1753     if (!src_rect)
1754         SetRect(&rect, 0, 0, SrcDesc.Width, SrcDesc.Height);
1755     else
1756         rect = *src_rect;
1757
1758     if (FAILED(IDirect3DSurface9_LockRect(src_surface, &lock, NULL, D3DLOCK_READONLY)))
1759         return D3DXERR_INVALIDDATA;
1760
1761     hr = D3DXLoadSurfaceFromMemory(dst_surface, dst_palette, dst_rect,
1762             lock.pBits, SrcDesc.Format, lock.Pitch, src_palette, &rect, filter, color_key);
1763
1764     IDirect3DSurface9_UnlockRect(src_surface);
1765
1766     return hr;
1767 }
1768
1769
1770 HRESULT WINAPI D3DXSaveSurfaceToFileA(const char *dst_filename, D3DXIMAGE_FILEFORMAT file_format,
1771         IDirect3DSurface9 *src_surface, const PALETTEENTRY *src_palette, const RECT *src_rect)
1772 {
1773     int len;
1774     WCHAR *filename;
1775     HRESULT hr;
1776     ID3DXBuffer *buffer;
1777
1778     TRACE("(%s, %#x, %p, %p, %s): relay\n",
1779             wine_dbgstr_a(dst_filename), file_format, src_surface, src_palette, wine_dbgstr_rect(src_rect));
1780
1781     if (!dst_filename) return D3DERR_INVALIDCALL;
1782
1783     len = MultiByteToWideChar(CP_ACP, 0, dst_filename, -1, NULL, 0);
1784     filename = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
1785     if (!filename) return E_OUTOFMEMORY;
1786     MultiByteToWideChar(CP_ACP, 0, dst_filename, -1, filename, len);
1787
1788     hr = D3DXSaveSurfaceToFileInMemory(&buffer, file_format, src_surface, src_palette, src_rect);
1789     if (SUCCEEDED(hr))
1790     {
1791         hr = write_buffer_to_file(filename, buffer);
1792         ID3DXBuffer_Release(buffer);
1793     }
1794
1795     HeapFree(GetProcessHeap(), 0, filename);
1796     return hr;
1797 }
1798
1799 HRESULT WINAPI D3DXSaveSurfaceToFileW(const WCHAR *dst_filename, D3DXIMAGE_FILEFORMAT file_format,
1800         IDirect3DSurface9 *src_surface, const PALETTEENTRY *src_palette, const RECT *src_rect)
1801 {
1802     HRESULT hr;
1803     ID3DXBuffer *buffer;
1804
1805     TRACE("(%s, %#x, %p, %p, %s): relay\n",
1806         wine_dbgstr_w(dst_filename), file_format, src_surface, src_palette, wine_dbgstr_rect(src_rect));
1807
1808     if (!dst_filename) return D3DERR_INVALIDCALL;
1809
1810     hr = D3DXSaveSurfaceToFileInMemory(&buffer, file_format, src_surface, src_palette, src_rect);
1811     if (SUCCEEDED(hr))
1812     {
1813         hr = write_buffer_to_file(dst_filename, buffer);
1814         ID3DXBuffer_Release(buffer);
1815     }
1816
1817     return hr;
1818 }
1819
1820 HRESULT WINAPI D3DXSaveSurfaceToFileInMemory(ID3DXBuffer **dst_buffer, D3DXIMAGE_FILEFORMAT file_format,
1821         IDirect3DSurface9 *src_surface, const PALETTEENTRY *src_palette, const RECT *src_rect)
1822 {
1823     IWICBitmapEncoder *encoder = NULL;
1824     IWICBitmapFrameEncode *frame = NULL;
1825     IPropertyBag2 *encoder_options = NULL;
1826     IStream *stream = NULL;
1827     HRESULT hr;
1828     HRESULT initresult;
1829     const CLSID *encoder_clsid;
1830     const GUID *pixel_format_guid;
1831     WICPixelFormatGUID wic_pixel_format;
1832     D3DFORMAT d3d_pixel_format;
1833     D3DSURFACE_DESC src_surface_desc;
1834     D3DLOCKED_RECT locked_rect;
1835     int width, height;
1836     STATSTG stream_stats;
1837     HGLOBAL stream_hglobal;
1838     ID3DXBuffer *buffer;
1839     DWORD size;
1840
1841     TRACE("(%p, %#x, %p, %p, %s)\n",
1842         dst_buffer, file_format, src_surface, src_palette, wine_dbgstr_rect(src_rect));
1843
1844     if (!dst_buffer || !src_surface) return D3DERR_INVALIDCALL;
1845
1846     if (src_palette)
1847     {
1848         FIXME("Saving surfaces with palettized pixel formats not implemented yet\n");
1849         return D3DERR_INVALIDCALL;
1850     }
1851
1852     switch (file_format)
1853     {
1854         case D3DXIFF_BMP:
1855             encoder_clsid = &CLSID_WICBmpEncoder;
1856             break;
1857         case D3DXIFF_PNG:
1858             encoder_clsid = &CLSID_WICPngEncoder;
1859             break;
1860         case D3DXIFF_JPG:
1861             encoder_clsid = &CLSID_WICJpegEncoder;
1862             break;
1863         case D3DXIFF_DDS:
1864             return save_dds_surface_to_memory(dst_buffer, src_surface, src_rect);
1865         case D3DXIFF_DIB:
1866         case D3DXIFF_HDR:
1867         case D3DXIFF_PFM:
1868         case D3DXIFF_TGA:
1869         case D3DXIFF_PPM:
1870             FIXME("File format %#x is not supported yet\n", file_format);
1871             return E_NOTIMPL;
1872         default:
1873             return D3DERR_INVALIDCALL;
1874     }
1875
1876     IDirect3DSurface9_GetDesc(src_surface, &src_surface_desc);
1877     if (src_rect)
1878     {
1879         if (src_rect->left == src_rect->right || src_rect->top == src_rect->bottom)
1880         {
1881             WARN("Invalid rectangle with 0 area\n");
1882             return D3DXCreateBuffer(64, dst_buffer);
1883         }
1884         if (src_rect->left < 0 || src_rect->top < 0)
1885             return D3DERR_INVALIDCALL;
1886         if (src_rect->left > src_rect->right || src_rect->top > src_rect->bottom)
1887             return D3DERR_INVALIDCALL;
1888         if (src_rect->right > src_surface_desc.Width || src_rect->bottom > src_surface_desc.Height)
1889             return D3DERR_INVALIDCALL;
1890
1891         width = src_rect->right - src_rect->left;
1892         height = src_rect->bottom - src_rect->top;
1893     }
1894     else
1895     {
1896         width = src_surface_desc.Width;
1897         height = src_surface_desc.Height;
1898     }
1899
1900     initresult = CoInitializeEx(NULL, COINIT_APARTMENTTHREADED);
1901
1902     hr = CoCreateInstance(encoder_clsid, NULL, CLSCTX_INPROC_SERVER,
1903         &IID_IWICBitmapEncoder, (void **)&encoder);
1904     if (FAILED(hr)) goto cleanup_err;
1905
1906     hr = CreateStreamOnHGlobal(NULL, TRUE, &stream);
1907     if (FAILED(hr)) goto cleanup_err;
1908
1909     hr = IWICBitmapEncoder_Initialize(encoder, stream, WICBitmapEncoderNoCache);
1910     if (FAILED(hr)) goto cleanup_err;
1911
1912     hr = IWICBitmapEncoder_CreateNewFrame(encoder, &frame, &encoder_options);
1913     if (FAILED(hr)) goto cleanup_err;
1914
1915     hr = IWICBitmapFrameEncode_Initialize(frame, encoder_options);
1916     if (FAILED(hr)) goto cleanup_err;
1917
1918     hr = IWICBitmapFrameEncode_SetSize(frame, width, height);
1919     if (FAILED(hr)) goto cleanup_err;
1920
1921     pixel_format_guid = d3dformat_to_wic_guid(src_surface_desc.Format);
1922     if (!pixel_format_guid)
1923     {
1924         FIXME("Pixel format %#x is not supported yet\n", src_surface_desc.Format);
1925         hr = E_NOTIMPL;
1926         goto cleanup;
1927     }
1928
1929     memcpy(&wic_pixel_format, pixel_format_guid, sizeof(GUID));
1930     hr = IWICBitmapFrameEncode_SetPixelFormat(frame, &wic_pixel_format);
1931     d3d_pixel_format = wic_guid_to_d3dformat(&wic_pixel_format);
1932     if (SUCCEEDED(hr) && d3d_pixel_format != D3DFMT_UNKNOWN)
1933     {
1934         TRACE("Using pixel format %s %#x\n", debugstr_guid(&wic_pixel_format), d3d_pixel_format);
1935
1936         if (src_surface_desc.Format == d3d_pixel_format) /* Simple copy */
1937         {
1938             hr = IDirect3DSurface9_LockRect(src_surface, &locked_rect, src_rect, D3DLOCK_READONLY);
1939             if (SUCCEEDED(hr))
1940             {
1941                 IWICBitmapFrameEncode_WritePixels(frame, height,
1942                     locked_rect.Pitch, height * locked_rect.Pitch, locked_rect.pBits);
1943                 IDirect3DSurface9_UnlockRect(src_surface);
1944             }
1945         }
1946         else /* Pixel format conversion */
1947         {
1948             const struct pixel_format_desc *src_format_desc, *dst_format_desc;
1949             struct volume size;
1950             DWORD dst_pitch;
1951             void *dst_data;
1952
1953             src_format_desc = get_format_info(src_surface_desc.Format);
1954             dst_format_desc = get_format_info(d3d_pixel_format);
1955             if (src_format_desc->format == D3DFMT_UNKNOWN || dst_format_desc->format == D3DFMT_UNKNOWN)
1956             {
1957                 FIXME("Unsupported pixel format conversion %#x -> %#x\n",
1958                     src_surface_desc.Format, d3d_pixel_format);
1959                 hr = E_NOTIMPL;
1960                 goto cleanup;
1961             }
1962
1963             if (src_format_desc->bytes_per_pixel > 4
1964                 || dst_format_desc->bytes_per_pixel > 4
1965                 || src_format_desc->block_height != 1 || src_format_desc->block_width != 1
1966                 || dst_format_desc->block_height != 1 || dst_format_desc->block_width != 1)
1967             {
1968                 FIXME("Format conversion missing %#x -> %#x\n",
1969                         src_surface_desc.Format, d3d_pixel_format);
1970                 hr = E_NOTIMPL;
1971                 goto cleanup;
1972             }
1973
1974             size.width = width;
1975             size.height = height;
1976             size.depth = 1;
1977             dst_pitch = width * dst_format_desc->bytes_per_pixel;
1978             dst_data = HeapAlloc(GetProcessHeap(), 0, dst_pitch * height);
1979             if (!dst_data)
1980             {
1981                 hr = E_OUTOFMEMORY;
1982                 goto cleanup;
1983             }
1984
1985             hr = IDirect3DSurface9_LockRect(src_surface, &locked_rect, src_rect, D3DLOCK_READONLY);
1986             if (SUCCEEDED(hr))
1987             {
1988                 copy_simple_data(locked_rect.pBits, locked_rect.Pitch, 0, &size, src_format_desc,
1989                     dst_data, dst_pitch, 0, &size, dst_format_desc, 0);
1990                 IDirect3DSurface9_UnlockRect(src_surface);
1991             }
1992
1993             IWICBitmapFrameEncode_WritePixels(frame, height, dst_pitch, dst_pitch * height, dst_data);
1994             HeapFree(GetProcessHeap(), 0, dst_data);
1995         }
1996
1997         hr = IWICBitmapFrameEncode_Commit(frame);
1998         if (SUCCEEDED(hr)) hr = IWICBitmapEncoder_Commit(encoder);
1999     }
2000     else WARN("Unsupported pixel format %#x\n", src_surface_desc.Format);
2001
2002     /* copy data from stream to ID3DXBuffer */
2003     hr = IStream_Stat(stream, &stream_stats, STATFLAG_NONAME);
2004     if (FAILED(hr)) goto cleanup_err;
2005
2006     if (stream_stats.cbSize.u.HighPart != 0)
2007     {
2008         hr = D3DXERR_INVALIDDATA;
2009         goto cleanup;
2010     }
2011     size = stream_stats.cbSize.u.LowPart;
2012
2013     hr = D3DXCreateBuffer(size, &buffer);
2014     if (FAILED(hr)) goto cleanup;
2015
2016     hr = GetHGlobalFromStream(stream, &stream_hglobal);
2017     if (SUCCEEDED(hr))
2018     {
2019         void *buffer_pointer = ID3DXBuffer_GetBufferPointer(buffer);
2020         void *stream_data = GlobalLock(stream_hglobal);
2021         memcpy(buffer_pointer, stream_data, size);
2022         GlobalUnlock(stream_hglobal);
2023         *dst_buffer = buffer;
2024     }
2025     else ID3DXBuffer_Release(buffer);
2026
2027 cleanup_err:
2028     if (FAILED(hr) && hr != E_OUTOFMEMORY)
2029         hr = D3DERR_INVALIDCALL;
2030
2031 cleanup:
2032     if (stream) IStream_Release(stream);
2033
2034     if (frame) IWICBitmapFrameEncode_Release(frame);
2035     if (encoder_options) IPropertyBag2_Release(encoder_options);
2036
2037     if (encoder) IWICBitmapEncoder_Release(encoder);
2038
2039     if (SUCCEEDED(initresult)) CoUninitialize();
2040
2041     return hr;
2042 }