dmloader: Remove WINAPI on static functions where not needed.
[wine] / dlls / wined3d / surface_base.c
1 /*
2  * IWineD3DSurface Implementation of management(non-rendering) functions
3  *
4  * Copyright 1998 Lionel Ulmer
5  * Copyright 2000-2001 TransGaming Technologies Inc.
6  * Copyright 2002-2005 Jason Edmeades
7  * Copyright 2002-2003 Raphael Junqueira
8  * Copyright 2004 Christian Costa
9  * Copyright 2005 Oliver Stieber
10  * Copyright 2006-2008 Stefan Dösinger for CodeWeavers
11  * Copyright 2007 Henri Verbeet
12  * Copyright 2006-2007 Roderick Colenbrander
13  *
14  * This library is free software; you can redistribute it and/or
15  * modify it under the terms of the GNU Lesser General Public
16  * License as published by the Free Software Foundation; either
17  * version 2.1 of the License, or (at your option) any later version.
18  *
19  * This library is distributed in the hope that it will be useful,
20  * but WITHOUT ANY WARRANTY; without even the implied warranty of
21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
22  * Lesser General Public License for more details.
23  *
24  * You should have received a copy of the GNU Lesser General Public
25  * License along with this library; if not, write to the Free Software
26  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
27  */
28
29 #include "config.h"
30 #include "wine/port.h"
31 #include "wined3d_private.h"
32
33 #include <assert.h>
34
35 WINE_DEFAULT_DEBUG_CHANNEL(d3d_surface);
36
37 /* See also float_16_to_32() in wined3d_private.h */
38 static inline unsigned short float_32_to_16(const float *in)
39 {
40     int exp = 0;
41     float tmp = fabs(*in);
42     unsigned int mantissa;
43     unsigned short ret;
44
45     /* Deal with special numbers */
46     if(*in == 0.0) return 0x0000;
47     if(isnan(*in)) return 0x7C01;
48     if(isinf(*in)) return (*in < 0.0 ? 0xFC00 : 0x7c00);
49
50     if(tmp < pow(2, 10)) {
51         do
52         {
53             tmp = tmp * 2.0;
54             exp--;
55         }while(tmp < pow(2, 10));
56     } else if(tmp >= pow(2, 11)) {
57         do
58         {
59             tmp /= 2.0;
60             exp++;
61         }while(tmp >= pow(2, 11));
62     }
63
64     mantissa = (unsigned int) tmp;
65     if(tmp - mantissa >= 0.5) mantissa++; /* round to nearest, away from zero */
66
67     exp += 10;  /* Normalize the mantissa */
68     exp += 15;  /* Exponent is encoded with excess 15 */
69
70     if(exp > 30) { /* too big */
71         ret = 0x7c00; /* INF */
72     } else if(exp <= 0) {
73         /* exp == 0: Non-normalized mantissa. Returns 0x0000 (=0.0) for too small numbers */
74         while(exp <= 0) {
75             mantissa = mantissa >> 1;
76             exp++;
77         }
78         ret = mantissa & 0x3ff;
79     } else {
80         ret = (exp << 10) | (mantissa & 0x3ff);
81     }
82
83     ret |= ((*in < 0.0 ? 1 : 0) << 15); /* Add the sign */
84     return ret;
85 }
86
87
88 /* Do NOT define GLINFO_LOCATION in this file. THIS CODE MUST NOT USE IT */
89
90 /* *******************************************
91    IWineD3DSurface IUnknown parts follow
92    ******************************************* */
93 HRESULT WINAPI IWineD3DBaseSurfaceImpl_QueryInterface(IWineD3DSurface *iface, REFIID riid, LPVOID *ppobj)
94 {
95     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *)iface;
96     /* Warn ,but be nice about things */
97     TRACE("(%p)->(%s,%p)\n", This,debugstr_guid(riid),ppobj);
98
99     if (IsEqualGUID(riid, &IID_IUnknown)
100         || IsEqualGUID(riid, &IID_IWineD3DBase)
101         || IsEqualGUID(riid, &IID_IWineD3DResource)
102         || IsEqualGUID(riid, &IID_IWineD3DSurface)) {
103         IUnknown_AddRef((IUnknown*)iface);
104         *ppobj = This;
105         return S_OK;
106         }
107         *ppobj = NULL;
108         return E_NOINTERFACE;
109 }
110
111 ULONG WINAPI IWineD3DBaseSurfaceImpl_AddRef(IWineD3DSurface *iface) {
112     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *)iface;
113     ULONG ref = InterlockedIncrement(&This->resource.ref);
114     TRACE("(%p) : AddRef increasing from %d\n", This,ref - 1);
115     return ref;
116 }
117
118 /* ****************************************************
119    IWineD3DSurface IWineD3DResource parts follow
120    **************************************************** */
121 HRESULT WINAPI IWineD3DBaseSurfaceImpl_GetDevice(IWineD3DSurface *iface, IWineD3DDevice** ppDevice) {
122     return IWineD3DResourceImpl_GetDevice((IWineD3DResource *)iface, ppDevice);
123 }
124
125 HRESULT WINAPI IWineD3DBaseSurfaceImpl_SetPrivateData(IWineD3DSurface *iface, REFGUID refguid, CONST void* pData, DWORD SizeOfData, DWORD Flags) {
126     return IWineD3DResourceImpl_SetPrivateData((IWineD3DResource *)iface, refguid, pData, SizeOfData, Flags);
127 }
128
129 HRESULT WINAPI IWineD3DBaseSurfaceImpl_GetPrivateData(IWineD3DSurface *iface, REFGUID refguid, void* pData, DWORD* pSizeOfData) {
130     return IWineD3DResourceImpl_GetPrivateData((IWineD3DResource *)iface, refguid, pData, pSizeOfData);
131 }
132
133 HRESULT WINAPI IWineD3DBaseSurfaceImpl_FreePrivateData(IWineD3DSurface *iface, REFGUID refguid) {
134     return IWineD3DResourceImpl_FreePrivateData((IWineD3DResource *)iface, refguid);
135 }
136
137 DWORD   WINAPI IWineD3DBaseSurfaceImpl_SetPriority(IWineD3DSurface *iface, DWORD PriorityNew) {
138     return IWineD3DResourceImpl_SetPriority((IWineD3DResource *)iface, PriorityNew);
139 }
140
141 DWORD   WINAPI IWineD3DBaseSurfaceImpl_GetPriority(IWineD3DSurface *iface) {
142     return IWineD3DResourceImpl_GetPriority((IWineD3DResource *)iface);
143 }
144
145 WINED3DRESOURCETYPE WINAPI IWineD3DBaseSurfaceImpl_GetType(IWineD3DSurface *iface) {
146     TRACE("(%p) : calling resourceimpl_GetType\n", iface);
147     return IWineD3DResourceImpl_GetType((IWineD3DResource *)iface);
148 }
149
150 HRESULT WINAPI IWineD3DBaseSurfaceImpl_GetParent(IWineD3DSurface *iface, IUnknown **pParent) {
151     TRACE("(%p) : calling resourceimpl_GetParent\n", iface);
152     return IWineD3DResourceImpl_GetParent((IWineD3DResource *)iface, pParent);
153 }
154
155 /* ******************************************************
156    IWineD3DSurface IWineD3DSurface parts follow
157    ****************************************************** */
158
159 HRESULT WINAPI IWineD3DBaseSurfaceImpl_GetContainer(IWineD3DSurface* iface, REFIID riid, void** ppContainer) {
160     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *)iface;
161     IWineD3DBase *container = 0;
162
163     TRACE("(This %p, riid %s, ppContainer %p)\n", This, debugstr_guid(riid), ppContainer);
164
165     if (!ppContainer) {
166         ERR("Called without a valid ppContainer.\n");
167     }
168
169     /** From MSDN:
170      * If the surface is created using CreateImageSurface/CreateOffscreenPlainSurface, CreateRenderTarget,
171      * or CreateDepthStencilSurface, the surface is considered stand alone. In this case,
172      * GetContainer will return the Direct3D device used to create the surface.
173      */
174     if (This->container) {
175         container = This->container;
176     } else {
177         container = (IWineD3DBase *)This->resource.wineD3DDevice;
178     }
179
180     TRACE("Relaying to QueryInterface\n");
181     return IUnknown_QueryInterface(container, riid, ppContainer);
182 }
183
184 HRESULT WINAPI IWineD3DBaseSurfaceImpl_GetDesc(IWineD3DSurface *iface, WINED3DSURFACE_DESC *pDesc) {
185     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *)iface;
186
187     TRACE("(%p) : copying into %p\n", This, pDesc);
188     if(pDesc->Format != NULL)             *(pDesc->Format) = This->resource.format;
189     if(pDesc->Type != NULL)               *(pDesc->Type)   = This->resource.resourceType;
190     if(pDesc->Usage != NULL)              *(pDesc->Usage)              = This->resource.usage;
191     if(pDesc->Pool != NULL)               *(pDesc->Pool)               = This->resource.pool;
192     if(pDesc->Size != NULL)               *(pDesc->Size)               = This->resource.size;   /* dx8 only */
193     if(pDesc->MultiSampleType != NULL)    *(pDesc->MultiSampleType)    = This->currentDesc.MultiSampleType;
194     if(pDesc->MultiSampleQuality != NULL) *(pDesc->MultiSampleQuality) = This->currentDesc.MultiSampleQuality;
195     if(pDesc->Width != NULL)              *(pDesc->Width)              = This->currentDesc.Width;
196     if(pDesc->Height != NULL)             *(pDesc->Height)             = This->currentDesc.Height;
197     return WINED3D_OK;
198 }
199
200 HRESULT WINAPI IWineD3DBaseSurfaceImpl_GetBltStatus(IWineD3DSurface *iface, DWORD Flags) {
201     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *)iface;
202     TRACE("(%p)->(%x)\n", This, Flags);
203
204     switch (Flags)
205     {
206         case WINEDDGBS_CANBLT:
207         case WINEDDGBS_ISBLTDONE:
208             return WINED3D_OK;
209
210         default:
211             return WINED3DERR_INVALIDCALL;
212     }
213 }
214
215 HRESULT WINAPI IWineD3DBaseSurfaceImpl_GetFlipStatus(IWineD3DSurface *iface, DWORD Flags) {
216     /* XXX: DDERR_INVALIDSURFACETYPE */
217
218     TRACE("(%p)->(%08x)\n",iface,Flags);
219     switch (Flags) {
220         case WINEDDGFS_CANFLIP:
221         case WINEDDGFS_ISFLIPDONE:
222             return WINED3D_OK;
223
224         default:
225             return WINED3DERR_INVALIDCALL;
226     }
227 }
228
229 HRESULT WINAPI IWineD3DBaseSurfaceImpl_IsLost(IWineD3DSurface *iface) {
230     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *) iface;
231     TRACE("(%p)\n", This);
232
233     /* D3D8 and 9 loose full devices, ddraw only surfaces */
234     return This->Flags & SFLAG_LOST ? WINED3DERR_DEVICELOST : WINED3D_OK;
235 }
236
237 HRESULT WINAPI IWineD3DBaseSurfaceImpl_Restore(IWineD3DSurface *iface) {
238     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *) iface;
239     TRACE("(%p)\n", This);
240
241     /* So far we don't lose anything :) */
242     This->Flags &= ~SFLAG_LOST;
243     return WINED3D_OK;
244 }
245
246 HRESULT WINAPI IWineD3DBaseSurfaceImpl_SetPalette(IWineD3DSurface *iface, IWineD3DPalette *Pal) {
247     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *) iface;
248     IWineD3DPaletteImpl *PalImpl = (IWineD3DPaletteImpl *) Pal;
249     TRACE("(%p)->(%p)\n", This, Pal);
250
251     if(This->palette == PalImpl) {
252         TRACE("Nop palette change\n");
253         return WINED3D_OK;
254     }
255
256     if(This->palette != NULL)
257         if(This->resource.usage & WINED3DUSAGE_RENDERTARGET)
258             This->palette->Flags &= ~WINEDDPCAPS_PRIMARYSURFACE;
259
260     This->palette = PalImpl;
261
262     if(PalImpl != NULL) {
263         if(This->resource.usage & WINED3DUSAGE_RENDERTARGET) {
264             (PalImpl)->Flags |= WINEDDPCAPS_PRIMARYSURFACE;
265         }
266
267         return IWineD3DSurface_RealizePalette(iface);
268     }
269     else return WINED3D_OK;
270 }
271
272 HRESULT WINAPI IWineD3DBaseSurfaceImpl_SetColorKey(IWineD3DSurface *iface, DWORD Flags, const WINEDDCOLORKEY *CKey)
273 {
274     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *) iface;
275     TRACE("(%p)->(%08x,%p)\n", This, Flags, CKey);
276
277     if ((Flags & WINEDDCKEY_COLORSPACE) != 0) {
278         FIXME(" colorkey value not supported (%08x) !\n", Flags);
279         return WINED3DERR_INVALIDCALL;
280     }
281
282     /* Dirtify the surface, but only if a key was changed */
283     if(CKey) {
284         switch (Flags & ~WINEDDCKEY_COLORSPACE) {
285             case WINEDDCKEY_DESTBLT:
286                 This->DestBltCKey = *CKey;
287                 This->CKeyFlags |= WINEDDSD_CKDESTBLT;
288                 break;
289
290             case WINEDDCKEY_DESTOVERLAY:
291                 This->DestOverlayCKey = *CKey;
292                 This->CKeyFlags |= WINEDDSD_CKDESTOVERLAY;
293                 break;
294
295             case WINEDDCKEY_SRCOVERLAY:
296                 This->SrcOverlayCKey = *CKey;
297                 This->CKeyFlags |= WINEDDSD_CKSRCOVERLAY;
298                 break;
299
300             case WINEDDCKEY_SRCBLT:
301                 This->SrcBltCKey = *CKey;
302                 This->CKeyFlags |= WINEDDSD_CKSRCBLT;
303                 break;
304         }
305     }
306     else {
307         switch (Flags & ~WINEDDCKEY_COLORSPACE) {
308             case WINEDDCKEY_DESTBLT:
309                 This->CKeyFlags &= ~WINEDDSD_CKDESTBLT;
310                 break;
311
312             case WINEDDCKEY_DESTOVERLAY:
313                 This->CKeyFlags &= ~WINEDDSD_CKDESTOVERLAY;
314                 break;
315
316             case WINEDDCKEY_SRCOVERLAY:
317                 This->CKeyFlags &= ~WINEDDSD_CKSRCOVERLAY;
318                 break;
319
320             case WINEDDCKEY_SRCBLT:
321                 This->CKeyFlags &= ~WINEDDSD_CKSRCBLT;
322                 break;
323         }
324     }
325
326     return WINED3D_OK;
327 }
328
329 HRESULT WINAPI IWineD3DBaseSurfaceImpl_GetPalette(IWineD3DSurface *iface, IWineD3DPalette **Pal) {
330     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *) iface;
331     TRACE("(%p)->(%p)\n", This, Pal);
332
333     *Pal = (IWineD3DPalette *) This->palette;
334     return WINED3D_OK;
335 }
336
337 DWORD WINAPI IWineD3DBaseSurfaceImpl_GetPitch(IWineD3DSurface *iface) {
338     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *) iface;
339     DWORD ret;
340     TRACE("(%p)\n", This);
341
342     /* DXTn formats don't have exact pitches as they are to the new row of blocks,
343     where each block is 4x4 pixels, 8 bytes (dxt1) and 16 bytes (dxt2/3/4/5)
344     ie pitch = (width/4) * bytes per block                                  */
345     if (This->resource.format == WINED3DFMT_DXT1) /* DXT1 is 8 bytes per block */
346         ret = ((This->currentDesc.Width + 3) >> 2) << 3;
347     else if (This->resource.format == WINED3DFMT_DXT2 || This->resource.format == WINED3DFMT_DXT3 ||
348              This->resource.format == WINED3DFMT_DXT4 || This->resource.format == WINED3DFMT_DXT5) /* DXT2/3/4/5 is 16 bytes per block */
349         ret = ((This->currentDesc.Width + 3) >> 2) << 4;
350     else {
351         unsigned char alignment = This->resource.wineD3DDevice->surface_alignment;
352         ret = This->bytesPerPixel * This->currentDesc.Width;  /* Bytes / row */
353         ret = (ret + alignment - 1) & ~(alignment - 1);
354     }
355     TRACE("(%p) Returning %d\n", This, ret);
356     return ret;
357 }
358
359 HRESULT WINAPI IWineD3DBaseSurfaceImpl_SetOverlayPosition(IWineD3DSurface *iface, LONG X, LONG Y) {
360     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *) iface;
361     LONG w, h;
362
363     TRACE("(%p)->(%d,%d) Stub!\n", This, X, Y);
364
365     if(!(This->resource.usage & WINED3DUSAGE_OVERLAY))
366     {
367         TRACE("(%p): Not an overlay surface\n", This);
368         return WINEDDERR_NOTAOVERLAYSURFACE;
369     }
370
371     w = This->overlay_destrect.right - This->overlay_destrect.left;
372     h = This->overlay_destrect.bottom - This->overlay_destrect.top;
373     This->overlay_destrect.left = X;
374     This->overlay_destrect.top = Y;
375     This->overlay_destrect.right = X + w;
376     This->overlay_destrect.bottom = Y + h;
377
378     IWineD3DSurface_DrawOverlay(iface);
379
380     return WINED3D_OK;
381 }
382
383 HRESULT WINAPI IWineD3DBaseSurfaceImpl_GetOverlayPosition(IWineD3DSurface *iface, LONG *X, LONG *Y) {
384     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *) iface;
385     HRESULT hr;
386
387     TRACE("(%p)->(%p,%p)\n", This, X, Y);
388
389     if(!(This->resource.usage & WINED3DUSAGE_OVERLAY))
390     {
391         TRACE("(%p): Not an overlay surface\n", This);
392         return WINEDDERR_NOTAOVERLAYSURFACE;
393     }
394     if(This->overlay_dest == NULL) {
395         *X = 0; *Y = 0;
396         hr = WINEDDERR_OVERLAYNOTVISIBLE;
397     } else {
398         *X = This->overlay_destrect.left;
399         *Y = This->overlay_destrect.top;
400         hr = WINED3D_OK;
401     }
402
403     TRACE("Returning 0x%08x, position %d, %d\n", hr, *X, *Y);
404     return hr;
405 }
406
407 HRESULT WINAPI IWineD3DBaseSurfaceImpl_UpdateOverlayZOrder(IWineD3DSurface *iface, DWORD Flags, IWineD3DSurface *Ref) {
408     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *) iface;
409     IWineD3DSurfaceImpl *RefImpl = (IWineD3DSurfaceImpl *) Ref;
410
411     FIXME("(%p)->(%08x,%p) Stub!\n", This, Flags, RefImpl);
412
413     if(!(This->resource.usage & WINED3DUSAGE_OVERLAY))
414     {
415         TRACE("(%p): Not an overlay surface\n", This);
416         return WINEDDERR_NOTAOVERLAYSURFACE;
417     }
418
419     return WINED3D_OK;
420 }
421
422 HRESULT WINAPI IWineD3DBaseSurfaceImpl_UpdateOverlay(IWineD3DSurface *iface, const RECT *SrcRect,
423         IWineD3DSurface *DstSurface, const RECT *DstRect, DWORD Flags, const WINEDDOVERLAYFX *FX)
424 {
425     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *) iface;
426     IWineD3DSurfaceImpl *Dst = (IWineD3DSurfaceImpl *) DstSurface;
427     TRACE("(%p)->(%p, %p, %p, %08x, %p)\n", This, SrcRect, Dst, DstRect, Flags, FX);
428
429     if(!(This->resource.usage & WINED3DUSAGE_OVERLAY))
430     {
431         WARN("(%p): Not an overlay surface\n", This);
432         return WINEDDERR_NOTAOVERLAYSURFACE;
433     } else if(!DstSurface) {
434         WARN("(%p): Dest surface is NULL\n", This);
435         return WINED3DERR_INVALIDCALL;
436     }
437
438     if(SrcRect) {
439         This->overlay_srcrect = *SrcRect;
440     } else {
441         This->overlay_srcrect.left = 0;
442         This->overlay_srcrect.top = 0;
443         This->overlay_srcrect.right = This->currentDesc.Width;
444         This->overlay_srcrect.bottom = This->currentDesc.Height;
445     }
446
447     if(DstRect) {
448         This->overlay_destrect = *DstRect;
449     } else {
450         This->overlay_destrect.left = 0;
451         This->overlay_destrect.top = 0;
452         This->overlay_destrect.right = Dst ? Dst->currentDesc.Width : 0;
453         This->overlay_destrect.bottom = Dst ? Dst->currentDesc.Height : 0;
454     }
455
456     if(This->overlay_dest && (This->overlay_dest != Dst || Flags & WINEDDOVER_HIDE)) {
457         list_remove(&This->overlay_entry);
458     }
459
460     if(Flags & WINEDDOVER_SHOW) {
461         if(This->overlay_dest != Dst) {
462             This->overlay_dest = Dst;
463             list_add_tail(&Dst->overlays, &This->overlay_entry);
464         }
465     } else if(Flags & WINEDDOVER_HIDE) {
466         /* tests show that the rectangles are erased on hide */
467         This->overlay_srcrect.left   = 0; This->overlay_srcrect.top     = 0;
468         This->overlay_srcrect.right  = 0; This->overlay_srcrect.bottom  = 0;
469         This->overlay_destrect.left  = 0; This->overlay_destrect.top    = 0;
470         This->overlay_destrect.right = 0; This->overlay_destrect.bottom = 0;
471         This->overlay_dest = NULL;
472     }
473
474     IWineD3DSurface_DrawOverlay(iface);
475
476     return WINED3D_OK;
477 }
478
479 HRESULT WINAPI IWineD3DBaseSurfaceImpl_SetClipper(IWineD3DSurface *iface, IWineD3DClipper *clipper)
480 {
481     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *) iface;
482     TRACE("(%p)->(%p)\n", This, clipper);
483
484     This->clipper = clipper;
485     return WINED3D_OK;
486 }
487
488 HRESULT WINAPI IWineD3DBaseSurfaceImpl_GetClipper(IWineD3DSurface *iface, IWineD3DClipper **clipper)
489 {
490     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *) iface;
491     TRACE("(%p)->(%p)\n", This, clipper);
492
493     *clipper = This->clipper;
494     if(*clipper) {
495         IWineD3DClipper_AddRef(*clipper);
496     }
497     return WINED3D_OK;
498 }
499
500 HRESULT WINAPI IWineD3DBaseSurfaceImpl_SetContainer(IWineD3DSurface *iface, IWineD3DBase *container) {
501     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *)iface;
502
503     TRACE("This %p, container %p\n", This, container);
504
505     /* We can't keep a reference to the container, since the container already keeps a reference to us. */
506
507     TRACE("Setting container to %p from %p\n", container, This->container);
508     This->container = container;
509
510     return WINED3D_OK;
511 }
512
513 HRESULT WINAPI IWineD3DBaseSurfaceImpl_SetFormat(IWineD3DSurface *iface, WINED3DFORMAT format) {
514     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *)iface;
515     const StaticPixelFormatDesc *formatEntry = getFormatDescEntry(format, NULL, NULL);
516
517     if (This->resource.format != WINED3DFMT_UNKNOWN) {
518         FIXME("(%p) : The format of the surface must be WINED3DFORMAT_UNKNOWN\n", This);
519         return WINED3DERR_INVALIDCALL;
520     }
521
522     TRACE("(%p) : Setting texture format to (%d,%s)\n", This, format, debug_d3dformat(format));
523     if (format == WINED3DFMT_UNKNOWN) {
524         This->resource.size = 0;
525     } else if (format == WINED3DFMT_DXT1) {
526         /* DXT1 is half byte per pixel */
527         This->resource.size = ((max(This->pow2Width, 4) * formatEntry->bpp) * max(This->pow2Height, 4)) >> 1;
528
529     } else if (format == WINED3DFMT_DXT2 || format == WINED3DFMT_DXT3 ||
530                format == WINED3DFMT_DXT4 || format == WINED3DFMT_DXT5) {
531         This->resource.size = ((max(This->pow2Width, 4) * formatEntry->bpp) * max(This->pow2Height, 4));
532     } else {
533         unsigned char alignment = This->resource.wineD3DDevice->surface_alignment;
534         This->resource.size = ((This->pow2Width * formatEntry->bpp) + alignment - 1) & ~(alignment - 1);
535         This->resource.size *= This->pow2Height;
536     }
537
538     if (format != WINED3DFMT_UNKNOWN) {
539         This->bytesPerPixel = formatEntry->bpp;
540     } else {
541         This->bytesPerPixel = 0;
542     }
543
544     This->Flags |= (WINED3DFMT_D16_LOCKABLE == format) ? SFLAG_LOCKABLE : 0;
545
546     This->resource.format = format;
547
548     TRACE("(%p) : Size %d, bytesPerPixel %d\n", This, This->resource.size, This->bytesPerPixel);
549
550     return WINED3D_OK;
551 }
552
553 HRESULT IWineD3DBaseSurfaceImpl_CreateDIBSection(IWineD3DSurface *iface) {
554     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *)iface;
555     int extraline = 0;
556     SYSTEM_INFO sysInfo;
557     BITMAPINFO* b_info;
558     HDC ddc;
559     DWORD *masks;
560     const StaticPixelFormatDesc *formatEntry = getFormatDescEntry(This->resource.format, NULL, NULL);
561     UINT usage;
562
563     switch (This->bytesPerPixel) {
564         case 2:
565         case 4:
566             /* Allocate extra space to store the RGB bit masks. */
567             b_info = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(BITMAPINFOHEADER) + 3 * sizeof(DWORD));
568             break;
569
570         case 3:
571             b_info = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(BITMAPINFOHEADER));
572             break;
573
574         default:
575             /* Allocate extra space for a palette. */
576             b_info = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
577                                sizeof(BITMAPINFOHEADER)
578                                + sizeof(RGBQUAD)
579                                * (1 << (This->bytesPerPixel * 8)));
580             break;
581     }
582
583     if (!b_info)
584         return E_OUTOFMEMORY;
585
586         /* Some apps access the surface in via DWORDs, and do not take the necessary care at the end of the
587     * surface. So we need at least extra 4 bytes at the end of the surface. Check against the page size,
588     * if the last page used for the surface has at least 4 spare bytes we're safe, otherwise
589     * add an extra line to the dib section
590         */
591     GetSystemInfo(&sysInfo);
592     if( ((This->resource.size + 3) % sysInfo.dwPageSize) < 4) {
593         extraline = 1;
594         TRACE("Adding an extra line to the dib section\n");
595     }
596
597     b_info->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
598     /* TODO: Is there a nicer way to force a specific alignment? (8 byte for ddraw) */
599     b_info->bmiHeader.biWidth = IWineD3DSurface_GetPitch(iface) / This->bytesPerPixel;
600     b_info->bmiHeader.biHeight = -This->currentDesc.Height -extraline;
601     b_info->bmiHeader.biSizeImage = ( This->currentDesc.Height + extraline) * IWineD3DSurface_GetPitch(iface);
602     b_info->bmiHeader.biPlanes = 1;
603     b_info->bmiHeader.biBitCount = This->bytesPerPixel * 8;
604
605     b_info->bmiHeader.biXPelsPerMeter = 0;
606     b_info->bmiHeader.biYPelsPerMeter = 0;
607     b_info->bmiHeader.biClrUsed = 0;
608     b_info->bmiHeader.biClrImportant = 0;
609
610     /* Get the bit masks */
611     masks = (DWORD *)b_info->bmiColors;
612     switch (This->resource.format) {
613         case WINED3DFMT_R8G8B8:
614             usage = DIB_RGB_COLORS;
615             b_info->bmiHeader.biCompression = BI_RGB;
616             break;
617
618         case WINED3DFMT_X1R5G5B5:
619         case WINED3DFMT_A1R5G5B5:
620         case WINED3DFMT_A4R4G4B4:
621         case WINED3DFMT_X4R4G4B4:
622         case WINED3DFMT_R3G3B2:
623         case WINED3DFMT_A8R3G3B2:
624         case WINED3DFMT_A2B10G10R10:
625         case WINED3DFMT_A8B8G8R8:
626         case WINED3DFMT_X8B8G8R8:
627         case WINED3DFMT_A2R10G10B10:
628         case WINED3DFMT_R5G6B5:
629         case WINED3DFMT_A16B16G16R16:
630             usage = 0;
631             b_info->bmiHeader.biCompression = BI_BITFIELDS;
632             masks[0] = formatEntry->redMask;
633             masks[1] = formatEntry->greenMask;
634             masks[2] = formatEntry->blueMask;
635             break;
636
637         default:
638             /* Don't know palette */
639             b_info->bmiHeader.biCompression = BI_RGB;
640             usage = 0;
641             break;
642     }
643
644     ddc = GetDC(0);
645     if (ddc == 0) {
646         HeapFree(GetProcessHeap(), 0, b_info);
647         return HRESULT_FROM_WIN32(GetLastError());
648     }
649
650     TRACE("Creating a DIB section with size %dx%dx%d, size=%d\n", b_info->bmiHeader.biWidth, b_info->bmiHeader.biHeight, b_info->bmiHeader.biBitCount, b_info->bmiHeader.biSizeImage);
651     This->dib.DIBsection = CreateDIBSection(ddc, b_info, usage, &This->dib.bitmap_data, 0 /* Handle */, 0 /* Offset */);
652     ReleaseDC(0, ddc);
653
654     if (!This->dib.DIBsection) {
655         ERR("CreateDIBSection failed!\n");
656         HeapFree(GetProcessHeap(), 0, b_info);
657         return HRESULT_FROM_WIN32(GetLastError());
658     }
659
660     TRACE("DIBSection at : %p\n", This->dib.bitmap_data);
661     /* copy the existing surface to the dib section */
662     if(This->resource.allocatedMemory) {
663         memcpy(This->dib.bitmap_data, This->resource.allocatedMemory,  This->currentDesc.Height * IWineD3DSurface_GetPitch(iface));
664     } else {
665         /* This is to make LockRect read the gl Texture although memory is allocated */
666         This->Flags &= ~SFLAG_INSYSMEM;
667     }
668     This->dib.bitmap_size = b_info->bmiHeader.biSizeImage;
669
670     HeapFree(GetProcessHeap(), 0, b_info);
671
672     /* Now allocate a HDC */
673     This->hDC = CreateCompatibleDC(0);
674     This->dib.holdbitmap = SelectObject(This->hDC, This->dib.DIBsection);
675     TRACE("using wined3d palette %p\n", This->palette);
676     SelectPalette(This->hDC,
677                   This->palette ? This->palette->hpal : 0,
678                   FALSE);
679
680     This->Flags |= SFLAG_DIBSECTION;
681
682     HeapFree(GetProcessHeap(), 0, This->resource.heapMemory);
683     This->resource.heapMemory = NULL;
684
685     return WINED3D_OK;
686 }
687
688 void convert_r32f_r16f(const BYTE *src, BYTE *dst, DWORD pitch_in, DWORD pitch_out, unsigned int w, unsigned int h)
689 {
690     unsigned int x, y;
691     const float *src_f;
692     unsigned short *dst_s;
693
694     TRACE("Converting %dx%d pixels, pitches %d %d\n", w, h, pitch_in, pitch_out);
695     for(y = 0; y < h; y++) {
696         src_f = (const float *)(src + y * pitch_in);
697         dst_s = (unsigned short *) (dst + y * pitch_out);
698         for(x = 0; x < w; x++) {
699             dst_s[x] = float_32_to_16(src_f + x);
700         }
701     }
702 }
703
704 struct d3dfmt_convertor_desc {
705     WINED3DFORMAT from, to;
706     void (*convert)(const BYTE *src, BYTE *dst, DWORD pitch_in, DWORD pitch_out, unsigned int w, unsigned int h);
707 };
708
709 const struct d3dfmt_convertor_desc convertors[] =
710 {
711     {WINED3DFMT_R32F,       WINED3DFMT_R16F,        convert_r32f_r16f},
712 };
713
714 static inline const struct d3dfmt_convertor_desc *find_convertor(WINED3DFORMAT from, WINED3DFORMAT to)
715 {
716     unsigned int i;
717     for(i = 0; i < (sizeof(convertors) / sizeof(convertors[0])); i++) {
718         if(convertors[i].from == from && convertors[i].to == to) {
719             return &convertors[i];
720         }
721     }
722     return NULL;
723 }
724
725 /*****************************************************************************
726  * surface_convert_format
727  *
728  * Creates a duplicate of a surface in a different format. Is used by Blt to
729  * blit between surfaces with different formats
730  *
731  * Parameters
732  *  source: Source surface
733  *  fmt: Requested destination format
734  *
735  *****************************************************************************/
736 IWineD3DSurfaceImpl *surface_convert_format(IWineD3DSurfaceImpl *source, WINED3DFORMAT to_fmt) {
737     IWineD3DSurface *ret = NULL;
738     const struct d3dfmt_convertor_desc *conv;
739     WINED3DLOCKED_RECT lock_src, lock_dst;
740     HRESULT hr;
741
742     conv = find_convertor(source->resource.format, to_fmt);
743     if(!conv) {
744         FIXME("Cannot find a conversion function from format %s to %s\n",
745               debug_d3dformat(source->resource.format), debug_d3dformat(to_fmt));
746         return NULL;
747     }
748
749     IWineD3DDevice_CreateSurface((IWineD3DDevice *) source->resource.wineD3DDevice,
750                                  source->currentDesc.Width,
751                                  source->currentDesc.Height,
752                                  to_fmt,
753                                  TRUE,  /* lockable */
754                                  TRUE,  /* discard  */
755                                  0,     /* level */
756                                  &ret,
757                                  WINED3DRTYPE_SURFACE,
758                                  0,     /* usage */
759                                  WINED3DPOOL_SCRATCH,
760                                  WINED3DMULTISAMPLE_NONE,   /* TODO: Multisampled conversion */
761                                  0,     /* MultiSampleQuality */
762                                  NULL,  /* SharedHandle */
763                                  IWineD3DSurface_GetImplType((IWineD3DSurface *) source),
764                                  NULL); /* parent */
765     if(!ret) {
766         ERR("Failed to create a destination surface for conversion\n");
767         return NULL;
768     }
769
770     memset(&lock_src, 0, sizeof(lock_src));
771     memset(&lock_dst, 0, sizeof(lock_dst));
772
773     hr = IWineD3DSurface_LockRect((IWineD3DSurface *) source, &lock_src, NULL, WINED3DLOCK_READONLY);
774     if(FAILED(hr)) {
775         ERR("Failed to lock the source surface\n");
776         IWineD3DSurface_Release(ret);
777         return NULL;
778     }
779     hr = IWineD3DSurface_LockRect(ret, &lock_dst, NULL, WINED3DLOCK_READONLY);
780     if(FAILED(hr)) {
781         ERR("Failed to lock the dest surface\n");
782         IWineD3DSurface_UnlockRect((IWineD3DSurface *) source);
783         IWineD3DSurface_Release(ret);
784         return NULL;
785     }
786
787     conv->convert(lock_src.pBits, lock_dst.pBits, lock_src.Pitch, lock_dst.Pitch,
788                   source->currentDesc.Width, source->currentDesc.Height);
789
790     IWineD3DSurface_UnlockRect(ret);
791     IWineD3DSurface_UnlockRect((IWineD3DSurface *) source);
792
793     return (IWineD3DSurfaceImpl *) ret;
794 }
795
796 /*****************************************************************************
797  * _Blt_ColorFill
798  *
799  * Helper function that fills a memory area with a specific color
800  *
801  * Params:
802  *  buf: memory address to start filling at
803  *  width, height: Dimensions of the area to fill
804  *  bpp: Bit depth of the surface
805  *  lPitch: pitch of the surface
806  *  color: Color to fill with
807  *
808  *****************************************************************************/
809 static HRESULT
810         _Blt_ColorFill(BYTE *buf,
811                        int width, int height,
812                        int bpp, LONG lPitch,
813                        DWORD color)
814 {
815     int x, y;
816     LPBYTE first;
817
818     /* Do first row */
819
820 #define COLORFILL_ROW(type) \
821     { \
822     type *d = (type *) buf; \
823     for (x = 0; x < width; x++) \
824     d[x] = (type) color; \
825     break; \
826 }
827     switch(bpp)
828     {
829         case 1: COLORFILL_ROW(BYTE)
830                 case 2: COLORFILL_ROW(WORD)
831         case 3:
832         {
833             BYTE *d = buf;
834             for (x = 0; x < width; x++,d+=3)
835             {
836                 d[0] = (color    ) & 0xFF;
837                 d[1] = (color>> 8) & 0xFF;
838                 d[2] = (color>>16) & 0xFF;
839             }
840             break;
841         }
842         case 4: COLORFILL_ROW(DWORD)
843         default:
844             FIXME("Color fill not implemented for bpp %d!\n", bpp*8);
845             return WINED3DERR_NOTAVAILABLE;
846     }
847
848 #undef COLORFILL_ROW
849
850     /* Now copy first row */
851     first = buf;
852     for (y = 1; y < height; y++)
853     {
854         buf += lPitch;
855         memcpy(buf, first, width * bpp);
856     }
857     return WINED3D_OK;
858 }
859
860 /*****************************************************************************
861  * IWineD3DSurface::Blt, SW emulation version
862  *
863  * Performs blits to a surface, eigher from a source of source-less blts
864  * This is the main functionality of DirectDraw
865  *
866  * Params:
867  *  DestRect: Destination rectangle to write to
868  *  SrcSurface: Source surface, can be NULL
869  *  SrcRect: Source rectangle
870  *****************************************************************************/
871 HRESULT WINAPI IWineD3DBaseSurfaceImpl_Blt(IWineD3DSurface *iface, const RECT *DestRect, IWineD3DSurface *SrcSurface,
872         const RECT *SrcRect, DWORD Flags, const WINEDDBLTFX *DDBltFx, WINED3DTEXTUREFILTERTYPE Filter)
873 {
874     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *) iface;
875     IWineD3DSurfaceImpl *Src = (IWineD3DSurfaceImpl *) SrcSurface;
876     RECT        xdst,xsrc;
877     HRESULT     ret = WINED3D_OK;
878     WINED3DLOCKED_RECT  dlock, slock;
879     WINED3DFORMAT       dfmt = WINED3DFMT_UNKNOWN, sfmt = WINED3DFMT_UNKNOWN;
880     int bpp, srcheight, srcwidth, dstheight, dstwidth, width;
881     int x, y;
882     const StaticPixelFormatDesc *sEntry, *dEntry;
883     const BYTE *sbuf;
884     BYTE *dbuf;
885     TRACE("(%p)->(%p,%p,%p,%x,%p)\n", This, DestRect, Src, SrcRect, Flags, DDBltFx);
886
887     if (TRACE_ON(d3d_surface))
888     {
889         if (DestRect) TRACE("\tdestrect :%dx%d-%dx%d\n",
890             DestRect->left, DestRect->top, DestRect->right, DestRect->bottom);
891         if (SrcRect) TRACE("\tsrcrect  :%dx%d-%dx%d\n",
892             SrcRect->left, SrcRect->top, SrcRect->right, SrcRect->bottom);
893 #if 0
894         TRACE("\tflags: ");
895                       DDRAW_dump_DDBLT(Flags);
896                       if (Flags & WINEDDBLT_DDFX)
897               {
898                       TRACE("\tblitfx: ");
899                       DDRAW_dump_DDBLTFX(DDBltFx->dwDDFX);
900     }
901 #endif
902     }
903
904     if ( (This->Flags & SFLAG_LOCKED) || ((Src != NULL) && (Src->Flags & SFLAG_LOCKED)))
905     {
906         WARN(" Surface is busy, returning DDERR_SURFACEBUSY\n");
907         return WINEDDERR_SURFACEBUSY;
908     }
909
910     if(Filter != WINED3DTEXF_NONE && Filter != WINED3DTEXF_POINT) {
911         /* Can happen when d3d9 apps do a StretchRect call which isn't handled in gl */
912         FIXME("Filters not supported in software blit\n");
913     }
914
915     /* First check for the validity of source / destination rectangles. This was
916      * verified using a test application + by MSDN.
917      */
918     if ((Src != NULL) && (SrcRect != NULL) &&
919          ((SrcRect->bottom > Src->currentDesc.Height)||(SrcRect->bottom < 0) ||
920          (SrcRect->top     > Src->currentDesc.Height)||(SrcRect->top    < 0) ||
921          (SrcRect->left    > Src->currentDesc.Width) ||(SrcRect->left   < 0) ||
922          (SrcRect->right   > Src->currentDesc.Width) ||(SrcRect->right  < 0) ||
923          (SrcRect->right   < SrcRect->left)          ||(SrcRect->bottom < SrcRect->top)))
924     {
925         WARN("Application gave us bad source rectangle for Blt.\n");
926         return WINEDDERR_INVALIDRECT;
927     }
928     /* For the Destination rect, it can be out of bounds on the condition that a clipper
929      * is set for the given surface.
930      */
931     if ((/*This->clipper == NULL*/ TRUE) && (DestRect) &&
932          ((DestRect->bottom > This->currentDesc.Height)||(DestRect->bottom < 0) ||
933          (DestRect->top     > This->currentDesc.Height)||(DestRect->top    < 0) ||
934          (DestRect->left    > This->currentDesc.Width) ||(DestRect->left   < 0) ||
935          (DestRect->right   > This->currentDesc.Width) ||(DestRect->right  < 0) ||
936          (DestRect->right   < DestRect->left)          ||(DestRect->bottom < DestRect->top)))
937     {
938         WARN("Application gave us bad destination rectangle for Blt without a clipper set.\n");
939         return WINEDDERR_INVALIDRECT;
940     }
941
942     /* Now handle negative values in the rectangles. Warning: only supported for now
943     in the 'simple' cases (ie not in any stretching / rotation cases).
944
945     First, the case where nothing is to be done.
946     */
947     if ((DestRect && ((DestRect->bottom <= 0) || (DestRect->right <= 0)  ||
948           (DestRect->top    >= (int) This->currentDesc.Height) ||
949           (DestRect->left   >= (int) This->currentDesc.Width))) ||
950           ((Src != NULL) && (SrcRect != NULL) &&
951           ((SrcRect->bottom <= 0) || (SrcRect->right <= 0)     ||
952           (SrcRect->top >= (int) Src->currentDesc.Height) ||
953           (SrcRect->left >= (int) Src->currentDesc.Width))  ))
954     {
955         TRACE("Nothing to be done !\n");
956         return  WINED3D_OK;
957     }
958
959     if (DestRect)
960     {
961         xdst = *DestRect;
962     }
963     else
964     {
965         xdst.top    = 0;
966         xdst.bottom = This->currentDesc.Height;
967         xdst.left   = 0;
968         xdst.right  = This->currentDesc.Width;
969     }
970
971     if (SrcRect)
972     {
973         xsrc = *SrcRect;
974     }
975     else
976     {
977         if (Src)
978         {
979             xsrc.top    = 0;
980             xsrc.bottom = Src->currentDesc.Height;
981             xsrc.left   = 0;
982             xsrc.right  = Src->currentDesc.Width;
983         }
984         else
985         {
986             memset(&xsrc,0,sizeof(xsrc));
987         }
988     }
989
990     /* The easy case : the source-less blits.... */
991     if (Src == NULL && DestRect)
992     {
993         RECT full_rect;
994         RECT temp_rect; /* No idea if intersect rect can be the same as one of the source rect */
995
996         full_rect.left   = 0;
997         full_rect.top    = 0;
998         full_rect.right  = This->currentDesc.Width;
999         full_rect.bottom = This->currentDesc.Height;
1000         IntersectRect(&temp_rect, &full_rect, DestRect);
1001         xdst = temp_rect;
1002     }
1003     else if (DestRect)
1004     {
1005         /* Only handle clipping on the destination rectangle */
1006         int clip_horiz = (DestRect->left < 0) || (DestRect->right  > (int) This->currentDesc.Width );
1007         int clip_vert  = (DestRect->top  < 0) || (DestRect->bottom > (int) This->currentDesc.Height);
1008         if (clip_vert || clip_horiz)
1009         {
1010             /* Now check if this is a special case or not... */
1011             if ((((DestRect->bottom - DestRect->top ) != (xsrc.bottom - xsrc.top )) && clip_vert ) ||
1012                    (((DestRect->right  - DestRect->left) != (xsrc.right  - xsrc.left)) && clip_horiz) ||
1013                    (Flags & WINEDDBLT_DDFX))
1014             {
1015                 WARN("Out of screen rectangle in special case. Not handled right now.\n");
1016                 return  WINED3D_OK;
1017             }
1018
1019             if (clip_horiz)
1020             {
1021                 if (DestRect->left < 0) { xsrc.left -= DestRect->left; xdst.left = 0; }
1022                 if (DestRect->right > This->currentDesc.Width)
1023                 {
1024                     xsrc.right -= (DestRect->right - (int) This->currentDesc.Width);
1025                     xdst.right = (int) This->currentDesc.Width;
1026                 }
1027             }
1028             if (clip_vert)
1029             {
1030                 if (DestRect->top < 0)
1031                 {
1032                     xsrc.top -= DestRect->top;
1033                     xdst.top = 0;
1034                 }
1035                 if (DestRect->bottom > This->currentDesc.Height)
1036                 {
1037                     xsrc.bottom -= (DestRect->bottom - (int) This->currentDesc.Height);
1038                     xdst.bottom = (int) This->currentDesc.Height;
1039                 }
1040             }
1041             /* And check if after clipping something is still to be done... */
1042             if ((xdst.bottom <= 0)   || (xdst.right <= 0)       ||
1043                  (xdst.top   >= (int) This->currentDesc.Height)  ||
1044                  (xdst.left  >= (int) This->currentDesc.Width)   ||
1045                  (xsrc.bottom <= 0)   || (xsrc.right <= 0)       ||
1046                  (xsrc.top >= (int) Src->currentDesc.Height)     ||
1047                  (xsrc.left >= (int) Src->currentDesc.Width))
1048             {
1049                 TRACE("Nothing to be done after clipping !\n");
1050                 return  WINED3D_OK;
1051             }
1052         }
1053     }
1054
1055     if (Src == This)
1056     {
1057         IWineD3DSurface_LockRect(iface, &dlock, NULL, 0);
1058         dfmt = This->resource.format;
1059         slock = dlock;
1060         sfmt = dfmt;
1061         sEntry = getFormatDescEntry(sfmt, NULL, NULL);
1062         dEntry = sEntry;
1063     }
1064     else
1065     {
1066         dfmt = This->resource.format;
1067         dEntry = getFormatDescEntry(dfmt, NULL, NULL);
1068         if (Src)
1069         {
1070             if(This->resource.format != Src->resource.format) {
1071                 Src = surface_convert_format(Src, dfmt);
1072                 if(!Src) {
1073                     /* The conv function writes a FIXME */
1074                     WARN("Cannot convert source surface format to dest format\n");
1075                     goto release;
1076                 }
1077             }
1078             IWineD3DSurface_LockRect((IWineD3DSurface *) Src, &slock, NULL, WINED3DLOCK_READONLY);
1079             sfmt = Src->resource.format;
1080         }
1081         sEntry = getFormatDescEntry(sfmt, NULL, NULL);
1082         if (DestRect)
1083             IWineD3DSurface_LockRect(iface, &dlock, &xdst, 0);
1084         else
1085             IWineD3DSurface_LockRect(iface, &dlock, NULL, 0);
1086     }
1087
1088     if (!DDBltFx || !(DDBltFx->dwDDFX)) Flags &= ~WINEDDBLT_DDFX;
1089
1090     if (sEntry->isFourcc && dEntry->isFourcc)
1091     {
1092         if (!DestRect || Src == This)
1093         {
1094             memcpy(dlock.pBits, slock.pBits, This->resource.size);
1095             goto release;
1096         }
1097     }
1098
1099     bpp = This->bytesPerPixel;
1100     srcheight = xsrc.bottom - xsrc.top;
1101     srcwidth = xsrc.right - xsrc.left;
1102     dstheight = xdst.bottom - xdst.top;
1103     dstwidth = xdst.right - xdst.left;
1104     width = (xdst.right - xdst.left) * bpp;
1105
1106     assert(width <= dlock.Pitch);
1107
1108     if (DestRect && Src != This)
1109         dbuf = (BYTE*)dlock.pBits;
1110     else
1111         dbuf = (BYTE*)dlock.pBits+(xdst.top*dlock.Pitch)+(xdst.left*bpp);
1112
1113     if (Flags & WINEDDBLT_WAIT)
1114     {
1115         Flags &= ~WINEDDBLT_WAIT;
1116     }
1117     if (Flags & WINEDDBLT_ASYNC)
1118     {
1119         static BOOL displayed = FALSE;
1120         if (!displayed)
1121             FIXME("Can't handle WINEDDBLT_ASYNC flag right now.\n");
1122         displayed = TRUE;
1123         Flags &= ~WINEDDBLT_ASYNC;
1124     }
1125     if (Flags & WINEDDBLT_DONOTWAIT)
1126     {
1127         /* WINEDDBLT_DONOTWAIT appeared in DX7 */
1128         static BOOL displayed = FALSE;
1129         if (!displayed)
1130             FIXME("Can't handle WINEDDBLT_DONOTWAIT flag right now.\n");
1131         displayed = TRUE;
1132         Flags &= ~WINEDDBLT_DONOTWAIT;
1133     }
1134
1135     /* First, all the 'source-less' blits */
1136     if (Flags & WINEDDBLT_COLORFILL)
1137     {
1138         ret = _Blt_ColorFill(dbuf, dstwidth, dstheight, bpp,
1139                              dlock.Pitch, DDBltFx->u5.dwFillColor);
1140         Flags &= ~WINEDDBLT_COLORFILL;
1141     }
1142
1143     if (Flags & WINEDDBLT_DEPTHFILL)
1144     {
1145         FIXME("DDBLT_DEPTHFILL needs to be implemented!\n");
1146     }
1147     if (Flags & WINEDDBLT_ROP)
1148     {
1149         /* Catch some degenerate cases here */
1150         switch(DDBltFx->dwROP)
1151         {
1152             case BLACKNESS:
1153                 ret = _Blt_ColorFill(dbuf,dstwidth,dstheight,bpp,dlock.Pitch,0);
1154                 break;
1155                 case 0xAA0029: /* No-op */
1156                     break;
1157             case WHITENESS:
1158                 ret = _Blt_ColorFill(dbuf,dstwidth,dstheight,bpp,dlock.Pitch,~0);
1159                 break;
1160                 case SRCCOPY: /* well, we do that below ? */
1161                     break;
1162             default:
1163                 FIXME("Unsupported raster op: %08x  Pattern: %p\n", DDBltFx->dwROP, DDBltFx->u5.lpDDSPattern);
1164                 goto error;
1165         }
1166         Flags &= ~WINEDDBLT_ROP;
1167     }
1168     if (Flags & WINEDDBLT_DDROPS)
1169     {
1170         FIXME("\tDdraw Raster Ops: %08x  Pattern: %p\n", DDBltFx->dwDDROP, DDBltFx->u5.lpDDSPattern);
1171     }
1172     /* Now the 'with source' blits */
1173     if (Src)
1174     {
1175         const BYTE *sbase;
1176         int sx, xinc, sy, yinc;
1177
1178         if (!dstwidth || !dstheight) /* hmm... stupid program ? */
1179             goto release;
1180         sbase = (BYTE*)slock.pBits+(xsrc.top*slock.Pitch)+xsrc.left*bpp;
1181         xinc = (srcwidth << 16) / dstwidth;
1182         yinc = (srcheight << 16) / dstheight;
1183
1184         if (!Flags)
1185         {
1186             /* No effects, we can cheat here */
1187             if (dstwidth == srcwidth)
1188             {
1189                 if (dstheight == srcheight)
1190                 {
1191                     /* No stretching in either direction. This needs to be as
1192                     * fast as possible */
1193                     sbuf = sbase;
1194
1195                     /* check for overlapping surfaces */
1196                     if (Src != This || xdst.top < xsrc.top ||
1197                         xdst.right <= xsrc.left || xsrc.right <= xdst.left)
1198                     {
1199                         /* no overlap, or dst above src, so copy from top downwards */
1200                         for (y = 0; y < dstheight; y++)
1201                         {
1202                             memcpy(dbuf, sbuf, width);
1203                             sbuf += slock.Pitch;
1204                             dbuf += dlock.Pitch;
1205                         }
1206                     }
1207                     else if (xdst.top > xsrc.top)  /* copy from bottom upwards */
1208                     {
1209                         sbuf += (slock.Pitch*dstheight);
1210                         dbuf += (dlock.Pitch*dstheight);
1211                         for (y = 0; y < dstheight; y++)
1212                         {
1213                             sbuf -= slock.Pitch;
1214                             dbuf -= dlock.Pitch;
1215                             memcpy(dbuf, sbuf, width);
1216                         }
1217                     }
1218                     else /* src and dst overlapping on the same line, use memmove */
1219                     {
1220                         for (y = 0; y < dstheight; y++)
1221                         {
1222                             memmove(dbuf, sbuf, width);
1223                             sbuf += slock.Pitch;
1224                             dbuf += dlock.Pitch;
1225                         }
1226                     }
1227                 } else {
1228                     /* Stretching in Y direction only */
1229                     for (y = sy = 0; y < dstheight; y++, sy += yinc) {
1230                         sbuf = sbase + (sy >> 16) * slock.Pitch;
1231                         memcpy(dbuf, sbuf, width);
1232                         dbuf += dlock.Pitch;
1233                     }
1234                 }
1235             }
1236             else
1237             {
1238                 /* Stretching in X direction */
1239                 int last_sy = -1;
1240                 for (y = sy = 0; y < dstheight; y++, sy += yinc)
1241                 {
1242                     sbuf = sbase + (sy >> 16) * slock.Pitch;
1243
1244                     if ((sy >> 16) == (last_sy >> 16))
1245                     {
1246                         /* this sourcerow is the same as last sourcerow -
1247                         * copy already stretched row
1248                         */
1249                         memcpy(dbuf, dbuf - dlock.Pitch, width);
1250                     }
1251                     else
1252                     {
1253 #define STRETCH_ROW(type) { \
1254                         const type *s = (const type *)sbuf; \
1255                         type *d = (type *)dbuf; \
1256                         for (x = sx = 0; x < dstwidth; x++, sx += xinc) \
1257                         d[x] = s[sx >> 16]; \
1258                         break; }
1259
1260                         switch(bpp)
1261                         {
1262                             case 1: STRETCH_ROW(BYTE)
1263                                     case 2: STRETCH_ROW(WORD)
1264                                             case 4: STRETCH_ROW(DWORD)
1265                             case 3:
1266                             {
1267                                 const BYTE *s;
1268                                 BYTE *d = dbuf;
1269                                 for (x = sx = 0; x < dstwidth; x++, sx+= xinc)
1270                                 {
1271                                     DWORD pixel;
1272
1273                                     s = sbuf+3*(sx>>16);
1274                                     pixel = s[0]|(s[1]<<8)|(s[2]<<16);
1275                                     d[0] = (pixel    )&0xff;
1276                                     d[1] = (pixel>> 8)&0xff;
1277                                     d[2] = (pixel>>16)&0xff;
1278                                     d+=3;
1279                                 }
1280                                 break;
1281                             }
1282                             default:
1283                                 FIXME("Stretched blit not implemented for bpp %d!\n", bpp*8);
1284                                 ret = WINED3DERR_NOTAVAILABLE;
1285                                 goto error;
1286                         }
1287 #undef STRETCH_ROW
1288                     }
1289                     dbuf += dlock.Pitch;
1290                     last_sy = sy;
1291                 }
1292             }
1293         }
1294         else
1295         {
1296             LONG dstyinc = dlock.Pitch, dstxinc = bpp;
1297             DWORD keylow = 0xFFFFFFFF, keyhigh = 0, keymask = 0xFFFFFFFF;
1298             DWORD destkeylow = 0x0, destkeyhigh = 0xFFFFFFFF, destkeymask = 0xFFFFFFFF;
1299             if (Flags & (WINEDDBLT_KEYSRC | WINEDDBLT_KEYDEST | WINEDDBLT_KEYSRCOVERRIDE | WINEDDBLT_KEYDESTOVERRIDE))
1300             {
1301                 /* The color keying flags are checked for correctness in ddraw */
1302                 if (Flags & WINEDDBLT_KEYSRC)
1303                 {
1304                     keylow  = Src->SrcBltCKey.dwColorSpaceLowValue;
1305                     keyhigh = Src->SrcBltCKey.dwColorSpaceHighValue;
1306                 }
1307                 else  if (Flags & WINEDDBLT_KEYSRCOVERRIDE)
1308                 {
1309                     keylow  = DDBltFx->ddckSrcColorkey.dwColorSpaceLowValue;
1310                     keyhigh = DDBltFx->ddckSrcColorkey.dwColorSpaceHighValue;
1311                 }
1312
1313                 if (Flags & WINEDDBLT_KEYDEST)
1314                 {
1315                     /* Destination color keys are taken from the source surface ! */
1316                     destkeylow  = Src->DestBltCKey.dwColorSpaceLowValue;
1317                     destkeyhigh = Src->DestBltCKey.dwColorSpaceHighValue;
1318                 }
1319                 else if (Flags & WINEDDBLT_KEYDESTOVERRIDE)
1320                 {
1321                     destkeylow  = DDBltFx->ddckDestColorkey.dwColorSpaceLowValue;
1322                     destkeyhigh = DDBltFx->ddckDestColorkey.dwColorSpaceHighValue;
1323                 }
1324
1325                 if(bpp == 1)
1326                 {
1327                     keymask = 0xff;
1328                 }
1329                 else
1330                 {
1331                     keymask = sEntry->redMask   |
1332                             sEntry->greenMask |
1333                             sEntry->blueMask;
1334                 }
1335                 Flags &= ~(WINEDDBLT_KEYSRC | WINEDDBLT_KEYDEST | WINEDDBLT_KEYSRCOVERRIDE | WINEDDBLT_KEYDESTOVERRIDE);
1336             }
1337
1338             if (Flags & WINEDDBLT_DDFX)
1339             {
1340                 LPBYTE dTopLeft, dTopRight, dBottomLeft, dBottomRight, tmp;
1341                 LONG tmpxy;
1342                 dTopLeft     = dbuf;
1343                 dTopRight    = dbuf+((dstwidth-1)*bpp);
1344                 dBottomLeft  = dTopLeft+((dstheight-1)*dlock.Pitch);
1345                 dBottomRight = dBottomLeft+((dstwidth-1)*bpp);
1346
1347                 if (DDBltFx->dwDDFX & WINEDDBLTFX_ARITHSTRETCHY)
1348                 {
1349                     /* I don't think we need to do anything about this flag */
1350                     WARN("Flags=DDBLT_DDFX nothing done for WINEDDBLTFX_ARITHSTRETCHY\n");
1351                 }
1352                 if (DDBltFx->dwDDFX & WINEDDBLTFX_MIRRORLEFTRIGHT)
1353                 {
1354                     tmp          = dTopRight;
1355                     dTopRight    = dTopLeft;
1356                     dTopLeft     = tmp;
1357                     tmp          = dBottomRight;
1358                     dBottomRight = dBottomLeft;
1359                     dBottomLeft  = tmp;
1360                     dstxinc = dstxinc *-1;
1361                 }
1362                 if (DDBltFx->dwDDFX & WINEDDBLTFX_MIRRORUPDOWN)
1363                 {
1364                     tmp          = dTopLeft;
1365                     dTopLeft     = dBottomLeft;
1366                     dBottomLeft  = tmp;
1367                     tmp          = dTopRight;
1368                     dTopRight    = dBottomRight;
1369                     dBottomRight = tmp;
1370                     dstyinc = dstyinc *-1;
1371                 }
1372                 if (DDBltFx->dwDDFX & WINEDDBLTFX_NOTEARING)
1373                 {
1374                     /* I don't think we need to do anything about this flag */
1375                     WARN("Flags=DDBLT_DDFX nothing done for WINEDDBLTFX_NOTEARING\n");
1376                 }
1377                 if (DDBltFx->dwDDFX & WINEDDBLTFX_ROTATE180)
1378                 {
1379                     tmp          = dBottomRight;
1380                     dBottomRight = dTopLeft;
1381                     dTopLeft     = tmp;
1382                     tmp          = dBottomLeft;
1383                     dBottomLeft  = dTopRight;
1384                     dTopRight    = tmp;
1385                     dstxinc = dstxinc * -1;
1386                     dstyinc = dstyinc * -1;
1387                 }
1388                 if (DDBltFx->dwDDFX & WINEDDBLTFX_ROTATE270)
1389                 {
1390                     tmp          = dTopLeft;
1391                     dTopLeft     = dBottomLeft;
1392                     dBottomLeft  = dBottomRight;
1393                     dBottomRight = dTopRight;
1394                     dTopRight    = tmp;
1395                     tmpxy   = dstxinc;
1396                     dstxinc = dstyinc;
1397                     dstyinc = tmpxy;
1398                     dstxinc = dstxinc * -1;
1399                 }
1400                 if (DDBltFx->dwDDFX & WINEDDBLTFX_ROTATE90)
1401                 {
1402                     tmp          = dTopLeft;
1403                     dTopLeft     = dTopRight;
1404                     dTopRight    = dBottomRight;
1405                     dBottomRight = dBottomLeft;
1406                     dBottomLeft  = tmp;
1407                     tmpxy   = dstxinc;
1408                     dstxinc = dstyinc;
1409                     dstyinc = tmpxy;
1410                     dstyinc = dstyinc * -1;
1411                 }
1412                 if (DDBltFx->dwDDFX & WINEDDBLTFX_ZBUFFERBASEDEST)
1413                 {
1414                     /* I don't think we need to do anything about this flag */
1415                     WARN("Flags=WINEDDBLT_DDFX nothing done for WINEDDBLTFX_ZBUFFERBASEDEST\n");
1416                 }
1417                 dbuf = dTopLeft;
1418                 Flags &= ~(WINEDDBLT_DDFX);
1419             }
1420
1421 #define COPY_COLORKEY_FX(type) { \
1422             const type *s; \
1423             type *d = (type *)dbuf, *dx, tmp; \
1424             for (y = sy = 0; y < dstheight; y++, sy += yinc) { \
1425             s = (const type*)(sbase + (sy >> 16) * slock.Pitch); \
1426             dx = d; \
1427             for (x = sx = 0; x < dstwidth; x++, sx += xinc) { \
1428             tmp = s[sx >> 16]; \
1429             if (((tmp & keymask) < keylow || (tmp & keymask) > keyhigh) && \
1430             ((dx[0] & destkeymask) >= destkeylow && (dx[0] & destkeymask) <= destkeyhigh)) { \
1431             dx[0] = tmp; \
1432         } \
1433             dx = (type*)(((LPBYTE)dx)+dstxinc); \
1434         } \
1435             d = (type*)(((LPBYTE)d)+dstyinc); \
1436         } \
1437             break; }
1438
1439             switch (bpp) {
1440                 case 1: COPY_COLORKEY_FX(BYTE)
1441                         case 2: COPY_COLORKEY_FX(WORD)
1442                                 case 4: COPY_COLORKEY_FX(DWORD)
1443                 case 3:
1444                 {
1445                     const BYTE *s;
1446                     BYTE *d = dbuf, *dx;
1447                     for (y = sy = 0; y < dstheight; y++, sy += yinc)
1448                     {
1449                         sbuf = sbase + (sy >> 16) * slock.Pitch;
1450                         dx = d;
1451                         for (x = sx = 0; x < dstwidth; x++, sx+= xinc)
1452                         {
1453                             DWORD pixel, dpixel = 0;
1454                             s = sbuf+3*(sx>>16);
1455                             pixel = s[0]|(s[1]<<8)|(s[2]<<16);
1456                             dpixel = dx[0]|(dx[1]<<8)|(dx[2]<<16);
1457                             if (((pixel & keymask) < keylow || (pixel & keymask) > keyhigh) &&
1458                                   ((dpixel & keymask) >= destkeylow || (dpixel & keymask) <= keyhigh))
1459                             {
1460                                 dx[0] = (pixel    )&0xff;
1461                                 dx[1] = (pixel>> 8)&0xff;
1462                                 dx[2] = (pixel>>16)&0xff;
1463                             }
1464                             dx+= dstxinc;
1465                         }
1466                         d += dstyinc;
1467                     }
1468                     break;
1469                 }
1470                 default:
1471                     FIXME("%s color-keyed blit not implemented for bpp %d!\n",
1472                           (Flags & WINEDDBLT_KEYSRC) ? "Source" : "Destination", bpp*8);
1473                     ret = WINED3DERR_NOTAVAILABLE;
1474                     goto error;
1475 #undef COPY_COLORKEY_FX
1476             }
1477         }
1478     }
1479
1480 error:
1481     if (Flags && FIXME_ON(d3d_surface))
1482     {
1483         FIXME("\tUnsupported flags: %08x\n", Flags);
1484     }
1485
1486 release:
1487     IWineD3DSurface_UnlockRect(iface);
1488     if (Src && Src != This) IWineD3DSurface_UnlockRect((IWineD3DSurface *) Src);
1489     /* Release the converted surface if any */
1490     if (Src && SrcSurface != (IWineD3DSurface *) Src) IWineD3DSurface_Release((IWineD3DSurface *) Src);
1491     return ret;
1492 }
1493
1494 /*****************************************************************************
1495  * IWineD3DSurface::BltFast, SW emulation version
1496  *
1497  * This is the software implementation of BltFast, as used by GDI surfaces
1498  * and as a fallback for OpenGL surfaces. This code is taken from the old
1499  * DirectDraw code, and was originally written by TransGaming.
1500  *
1501  * Params:
1502  *  dstx:
1503  *  dsty:
1504  *  Source: Source surface to copy from
1505  *  rsrc: Source rectangle
1506  *  trans: Some Flags
1507  *
1508  * Returns:
1509  *  WINED3D_OK on success
1510  *
1511  *****************************************************************************/
1512 HRESULT WINAPI IWineD3DBaseSurfaceImpl_BltFast(IWineD3DSurface *iface, DWORD dstx, DWORD dsty,
1513         IWineD3DSurface *Source, const RECT *rsrc, DWORD trans)
1514 {
1515     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *) iface;
1516     IWineD3DSurfaceImpl *Src = (IWineD3DSurfaceImpl *) Source;
1517
1518     int                 bpp, w, h, x, y;
1519     WINED3DLOCKED_RECT  dlock,slock;
1520     HRESULT             ret = WINED3D_OK;
1521     RECT                rsrc2;
1522     RECT                lock_src, lock_dst, lock_union;
1523     const BYTE          *sbuf;
1524     BYTE                *dbuf;
1525     const StaticPixelFormatDesc *sEntry, *dEntry;
1526
1527     if (TRACE_ON(d3d_surface))
1528     {
1529         TRACE("(%p)->(%d,%d,%p,%p,%08x)\n", This,dstx,dsty,Src,rsrc,trans);
1530
1531         if (rsrc)
1532         {
1533             TRACE("\tsrcrect: %dx%d-%dx%d\n",rsrc->left,rsrc->top,
1534                   rsrc->right,rsrc->bottom);
1535         }
1536         else
1537         {
1538             TRACE(" srcrect: NULL\n");
1539         }
1540     }
1541
1542     if ((This->Flags & SFLAG_LOCKED) ||
1543             (Src->Flags & SFLAG_LOCKED))
1544     {
1545         WARN(" Surface is busy, returning DDERR_SURFACEBUSY\n");
1546         return WINEDDERR_SURFACEBUSY;
1547     }
1548
1549     if (!rsrc)
1550     {
1551         WARN("rsrc is NULL!\n");
1552         rsrc2.left = 0;
1553         rsrc2.top = 0;
1554         rsrc2.right = Src->currentDesc.Width;
1555         rsrc2.bottom = Src->currentDesc.Height;
1556         rsrc = &rsrc2;
1557     }
1558
1559     /* Check source rect for validity. Copied from normal Blt. Fixes Baldur's Gate.*/
1560     if ((rsrc->bottom > Src->currentDesc.Height) || (rsrc->bottom < 0) ||
1561          (rsrc->top    > Src->currentDesc.Height) || (rsrc->top    < 0) ||
1562          (rsrc->left   > Src->currentDesc.Width)  || (rsrc->left   < 0) ||
1563          (rsrc->right  > Src->currentDesc.Width)  || (rsrc->right  < 0) ||
1564          (rsrc->right  < rsrc->left)              || (rsrc->bottom < rsrc->top))
1565     {
1566         WARN("Application gave us bad source rectangle for BltFast.\n");
1567         return WINEDDERR_INVALIDRECT;
1568     }
1569
1570     h = rsrc->bottom - rsrc->top;
1571     if (h > This->currentDesc.Height-dsty) h = This->currentDesc.Height-dsty;
1572     if (h > Src->currentDesc.Height-rsrc->top) h=Src->currentDesc.Height-rsrc->top;
1573     if (h <= 0) return WINEDDERR_INVALIDRECT;
1574
1575     w = rsrc->right - rsrc->left;
1576     if (w > This->currentDesc.Width-dstx) w = This->currentDesc.Width-dstx;
1577     if (w > Src->currentDesc.Width-rsrc->left) w = Src->currentDesc.Width-rsrc->left;
1578     if (w <= 0) return WINEDDERR_INVALIDRECT;
1579
1580     /* Now compute the locking rectangle... */
1581     lock_src.left = rsrc->left;
1582     lock_src.top = rsrc->top;
1583     lock_src.right = lock_src.left + w;
1584     lock_src.bottom = lock_src.top + h;
1585
1586     lock_dst.left = dstx;
1587     lock_dst.top = dsty;
1588     lock_dst.right = dstx + w;
1589     lock_dst.bottom = dsty + h;
1590
1591     bpp = This->bytesPerPixel;
1592
1593     /* We need to lock the surfaces, or we won't get refreshes when done. */
1594     if (Src == This)
1595     {
1596         int pitch;
1597
1598         UnionRect(&lock_union, &lock_src, &lock_dst);
1599
1600         /* Lock the union of the two rectangles */
1601         ret = IWineD3DSurface_LockRect(iface, &dlock, &lock_union, 0);
1602         if(ret != WINED3D_OK) goto error;
1603
1604         pitch = dlock.Pitch;
1605         slock.Pitch = dlock.Pitch;
1606
1607         /* Since slock was originally copied from this surface's description, we can just reuse it */
1608         assert(This->resource.allocatedMemory != NULL);
1609         sbuf = This->resource.allocatedMemory + lock_src.top * pitch + lock_src.left * bpp;
1610         dbuf = This->resource.allocatedMemory + lock_dst.top * pitch + lock_dst.left * bpp;
1611         sEntry = getFormatDescEntry(Src->resource.format, NULL, NULL);
1612         dEntry = sEntry;
1613     }
1614     else
1615     {
1616         ret = IWineD3DSurface_LockRect(Source, &slock, &lock_src, WINED3DLOCK_READONLY);
1617         if(ret != WINED3D_OK) goto error;
1618         ret = IWineD3DSurface_LockRect(iface, &dlock, &lock_dst, 0);
1619         if(ret != WINED3D_OK) goto error;
1620
1621         sbuf = slock.pBits;
1622         dbuf = dlock.pBits;
1623         TRACE("Dst is at %p, Src is at %p\n", dbuf, sbuf);
1624
1625         sEntry = getFormatDescEntry(Src->resource.format, NULL, NULL);
1626         dEntry = getFormatDescEntry(This->resource.format, NULL, NULL);
1627     }
1628
1629     /* Handle first the FOURCC surfaces... */
1630     if (sEntry->isFourcc && dEntry->isFourcc)
1631     {
1632         TRACE("Fourcc -> Fourcc copy\n");
1633         if (trans)
1634             FIXME("trans arg not supported when a FOURCC surface is involved\n");
1635         if (dstx || dsty)
1636             FIXME("offset for destination surface is not supported\n");
1637         if (Src->resource.format != This->resource.format)
1638         {
1639             FIXME("FOURCC->FOURCC copy only supported for the same type of surface\n");
1640             ret = WINED3DERR_WRONGTEXTUREFORMAT;
1641             goto error;
1642         }
1643         /* FIXME: Watch out that the size is correct for FOURCC surfaces */
1644         memcpy(dbuf, sbuf, This->resource.size);
1645         goto error;
1646     }
1647     if (sEntry->isFourcc && !dEntry->isFourcc)
1648     {
1649         /* TODO: Use the libtxc_dxtn.so shared library to do
1650          * software decompression
1651          */
1652         ERR("DXTC decompression not supported by now\n");
1653         goto error;
1654     }
1655
1656     if (trans & (WINEDDBLTFAST_SRCCOLORKEY | WINEDDBLTFAST_DESTCOLORKEY))
1657     {
1658         DWORD keylow, keyhigh;
1659         TRACE("Color keyed copy\n");
1660         if (trans & WINEDDBLTFAST_SRCCOLORKEY)
1661         {
1662             keylow  = Src->SrcBltCKey.dwColorSpaceLowValue;
1663             keyhigh = Src->SrcBltCKey.dwColorSpaceHighValue;
1664         }
1665         else
1666         {
1667             /* I'm not sure if this is correct */
1668             FIXME("WINEDDBLTFAST_DESTCOLORKEY not fully supported yet.\n");
1669             keylow  = This->DestBltCKey.dwColorSpaceLowValue;
1670             keyhigh = This->DestBltCKey.dwColorSpaceHighValue;
1671         }
1672
1673 #define COPYBOX_COLORKEY(type) { \
1674         const type *s = (const type *)sbuf; \
1675         type *d = (type *)dbuf; \
1676         type tmp; \
1677         for (y = 0; y < h; y++) { \
1678         for (x = 0; x < w; x++) { \
1679         tmp = s[x]; \
1680         if (tmp < keylow || tmp > keyhigh) d[x] = tmp; \
1681     } \
1682         s = (const type *)((const BYTE *)s + slock.Pitch); \
1683         d = (type *)((BYTE *)d + dlock.Pitch); \
1684     } \
1685         break; \
1686     }
1687
1688         switch (bpp) {
1689             case 1: COPYBOX_COLORKEY(BYTE)
1690                     case 2: COPYBOX_COLORKEY(WORD)
1691                             case 4: COPYBOX_COLORKEY(DWORD)
1692             case 3:
1693             {
1694                 const BYTE *s;
1695                 BYTE *d;
1696                 DWORD tmp;
1697                 s = sbuf;
1698                 d = dbuf;
1699                 for (y = 0; y < h; y++)
1700                 {
1701                     for (x = 0; x < w * 3; x += 3)
1702                     {
1703                         tmp = (DWORD)s[x] + ((DWORD)s[x + 1] << 8) + ((DWORD)s[x + 2] << 16);
1704                         if (tmp < keylow || tmp > keyhigh)
1705                         {
1706                             d[x + 0] = s[x + 0];
1707                             d[x + 1] = s[x + 1];
1708                             d[x + 2] = s[x + 2];
1709                         }
1710                     }
1711                     s += slock.Pitch;
1712                     d += dlock.Pitch;
1713                 }
1714                 break;
1715             }
1716             default:
1717                 FIXME("Source color key blitting not supported for bpp %d\n",bpp*8);
1718                 ret = WINED3DERR_NOTAVAILABLE;
1719                 goto error;
1720         }
1721 #undef COPYBOX_COLORKEY
1722         TRACE("Copy Done\n");
1723     }
1724     else
1725     {
1726         int width = w * bpp;
1727         INT sbufpitch, dbufpitch;
1728
1729         TRACE("NO color key copy\n");
1730         /* Handle overlapping surfaces */
1731         if (sbuf < dbuf)
1732         {
1733             sbuf += (h - 1) * slock.Pitch;
1734             dbuf += (h - 1) * dlock.Pitch;
1735             sbufpitch = -slock.Pitch;
1736             dbufpitch = -dlock.Pitch;
1737         }
1738         else
1739         {
1740             sbufpitch = slock.Pitch;
1741             dbufpitch = dlock.Pitch;
1742         }
1743         for (y = 0; y < h; y++)
1744         {
1745             /* This is pretty easy, a line for line memcpy */
1746             memmove(dbuf, sbuf, width);
1747             sbuf += sbufpitch;
1748             dbuf += dbufpitch;
1749         }
1750         TRACE("Copy done\n");
1751     }
1752
1753 error:
1754     if (Src == This)
1755     {
1756         IWineD3DSurface_UnlockRect(iface);
1757     }
1758     else
1759     {
1760         IWineD3DSurface_UnlockRect(iface);
1761         IWineD3DSurface_UnlockRect(Source);
1762     }
1763
1764     return ret;
1765 }
1766
1767 HRESULT WINAPI IWineD3DBaseSurfaceImpl_LockRect(IWineD3DSurface *iface, WINED3DLOCKED_RECT* pLockedRect, CONST RECT* pRect, DWORD Flags)
1768 {
1769     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *)iface;
1770
1771     TRACE("(%p) : rect@%p flags(%08x), output lockedRect@%p, memory@%p\n",
1772           This, pRect, Flags, pLockedRect, This->resource.allocatedMemory);
1773
1774     pLockedRect->Pitch = IWineD3DSurface_GetPitch(iface);
1775
1776     if (NULL == pRect)
1777     {
1778         pLockedRect->pBits = This->resource.allocatedMemory;
1779         This->lockedRect.left   = 0;
1780         This->lockedRect.top    = 0;
1781         This->lockedRect.right  = This->currentDesc.Width;
1782         This->lockedRect.bottom = This->currentDesc.Height;
1783
1784         TRACE("Locked Rect (%p) = l %d, t %d, r %d, b %d\n",
1785               &This->lockedRect, This->lockedRect.left, This->lockedRect.top,
1786               This->lockedRect.right, This->lockedRect.bottom);
1787     }
1788     else
1789     {
1790         TRACE("Lock Rect (%p) = l %d, t %d, r %d, b %d\n",
1791               pRect, pRect->left, pRect->top, pRect->right, pRect->bottom);
1792
1793         /* DXTn textures are based on compressed blocks of 4x4 pixels, each
1794          * 16 bytes large (8 bytes in case of DXT1). Because of that Pitch has
1795          * slightly different meaning compared to regular textures. For DXTn
1796          * textures Pitch is the size of a row of blocks, 4 high and "width"
1797          * long. The x offset is calculated differently as well, since moving 4
1798          * pixels to the right actually moves an entire 4x4 block to right, ie
1799          * 16 bytes (8 in case of DXT1). */
1800         if (This->resource.format == WINED3DFMT_DXT1)
1801         {
1802             pLockedRect->pBits = This->resource.allocatedMemory + (pLockedRect->Pitch * pRect->top / 4) + (pRect->left * 2);
1803         }
1804         else if (This->resource.format == WINED3DFMT_DXT2 || This->resource.format == WINED3DFMT_DXT3 ||
1805                     This->resource.format == WINED3DFMT_DXT4 || This->resource.format == WINED3DFMT_DXT5)
1806         {
1807             pLockedRect->pBits = This->resource.allocatedMemory + (pLockedRect->Pitch * pRect->top / 4) + (pRect->left * 4);
1808         }
1809         else
1810         {
1811             pLockedRect->pBits = This->resource.allocatedMemory +
1812                     (pLockedRect->Pitch * pRect->top) +
1813                     (pRect->left * This->bytesPerPixel);
1814         }
1815         This->lockedRect.left   = pRect->left;
1816         This->lockedRect.top    = pRect->top;
1817         This->lockedRect.right  = pRect->right;
1818         This->lockedRect.bottom = pRect->bottom;
1819     }
1820
1821     /* No dirtifying is needed for this surface implementation */
1822     TRACE("returning memory@%p, pitch(%d)\n", pLockedRect->pBits, pLockedRect->Pitch);
1823
1824     return WINED3D_OK;
1825 }
1826
1827 void WINAPI IWineD3DBaseSurfaceImpl_BindTexture(IWineD3DSurface *iface) {
1828     ERR("Should not be called on base texture\n");
1829     return;
1830 }
1831
1832 /* TODO: think about moving this down to resource? */
1833 const void *WINAPI IWineD3DBaseSurfaceImpl_GetData(IWineD3DSurface *iface)
1834 {
1835     IWineD3DSurfaceImpl *This = (IWineD3DSurfaceImpl *)iface;
1836
1837     /* This should only be called for sysmem textures, it may be a good idea
1838      * to extend this to all pools at some point in the future  */
1839     if (This->resource.pool != WINED3DPOOL_SYSTEMMEM)
1840     {
1841         FIXME("(%p) Attempting to get system memory for a non-system memory texture\n", iface);
1842     }
1843     return This->resource.allocatedMemory;
1844 }