wined3d: Remove a redundant flag in IWineD3DSurfaceImpl_SetMem().
[wine] / dlls / wined3d / palette.c
1 /*              DirectDraw - IDirectPalette base interface
2  *
3  * Copyright 1997-2000 Marcus Meissner
4  * Copyright 2000-2001 TransGaming Technologies Inc.
5  * Copyright 2006 Stefan Dösinger for CodeWeavers
6  *
7  * This library is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * This library is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with this library; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20  */
21 #include "config.h"
22 #include "winerror.h"
23 #include "wine/debug.h"
24
25 #include <string.h>
26
27 #include "wined3d_private.h"
28
29 WINE_DEFAULT_DEBUG_CHANNEL(d3d);
30
31 #define SIZE_BITS (WINEDDPCAPS_1BIT | WINEDDPCAPS_2BIT | WINEDDPCAPS_4BIT | WINEDDPCAPS_8BIT)
32
33 static HRESULT WINAPI IWineD3DPaletteImpl_QueryInterface(IWineD3DPalette *iface, REFIID riid, void **object)
34 {
35     TRACE("iface %p, riid %s, object %p.\n", iface, debugstr_guid(riid), object);
36
37     if (IsEqualGUID(riid, &IID_IWineD3DPalette)
38             || IsEqualGUID(riid, &IID_IWineD3DBase)
39             || IsEqualGUID(riid, &IID_IUnknown))
40     {
41         IUnknown_AddRef(iface);
42         *object = iface;
43         return S_OK;
44     }
45
46     WARN("%s not implemented, returning E_NOINTERFACE.\n", debugstr_guid(riid));
47
48     *object = NULL;
49     return E_NOINTERFACE;
50 }
51
52 static ULONG  WINAPI IWineD3DPaletteImpl_AddRef(IWineD3DPalette *iface) {
53     IWineD3DPaletteImpl *This = (IWineD3DPaletteImpl *)iface;
54     ULONG ref = InterlockedIncrement(&This->ref);
55
56     TRACE("(%p)->() incrementing from %u.\n", This, ref - 1);
57
58     return ref;
59 }
60
61 static ULONG  WINAPI IWineD3DPaletteImpl_Release(IWineD3DPalette *iface) {
62     IWineD3DPaletteImpl *This = (IWineD3DPaletteImpl *)iface;
63     ULONG ref = InterlockedDecrement(&This->ref);
64
65     TRACE("(%p)->() decrementing from %u.\n", This, ref + 1);
66
67     if (!ref) {
68         DeleteObject(This->hpal);
69         HeapFree(GetProcessHeap(), 0, This);
70         return 0;
71     }
72
73     return ref;
74 }
75
76 /* Not called from the vtable */
77 static WORD IWineD3DPaletteImpl_Size(DWORD dwFlags)
78 {
79     switch (dwFlags & SIZE_BITS) {
80         case WINEDDPCAPS_1BIT: return 2;
81         case WINEDDPCAPS_2BIT: return 4;
82         case WINEDDPCAPS_4BIT: return 16;
83         case WINEDDPCAPS_8BIT: return 256;
84         default:
85             FIXME("Unhandled size bits %#x.\n", dwFlags & SIZE_BITS);
86             return 256;
87     }
88 }
89
90 static HRESULT  WINAPI IWineD3DPaletteImpl_GetEntries(IWineD3DPalette *iface, DWORD Flags, DWORD Start, DWORD Count, PALETTEENTRY *PalEnt) {
91     IWineD3DPaletteImpl *This = (IWineD3DPaletteImpl *)iface;
92
93     TRACE("(%p)->(%08x,%d,%d,%p)\n",This,Flags,Start,Count,PalEnt);
94
95     if (Flags) return WINED3DERR_INVALIDCALL; /* unchecked */
96     if (Start + Count > IWineD3DPaletteImpl_Size(This->flags))
97         return WINED3DERR_INVALIDCALL;
98
99     if (This->flags & WINEDDPCAPS_8BITENTRIES)
100     {
101         unsigned int i;
102         LPBYTE entry = (LPBYTE)PalEnt;
103
104         for (i=Start; i < Count+Start; i++)
105             *entry++ = This->palents[i].peRed;
106     }
107     else
108         memcpy(PalEnt, This->palents+Start, Count * sizeof(PALETTEENTRY));
109
110     return WINED3D_OK;
111 }
112
113 static HRESULT  WINAPI IWineD3DPaletteImpl_SetEntries(IWineD3DPalette *iface,
114         DWORD Flags, DWORD Start, DWORD Count, const PALETTEENTRY *PalEnt)
115 {
116     IWineD3DPaletteImpl *This = (IWineD3DPaletteImpl *)iface;
117     IWineD3DResourceImpl *res;
118
119     TRACE("(%p)->(%08x,%d,%d,%p)\n",This,Flags,Start,Count,PalEnt);
120     TRACE("Palette flags: %#x.\n", This->flags);
121
122     if (This->flags & WINEDDPCAPS_8BITENTRIES)
123     {
124         unsigned int i;
125         const BYTE* entry = (const BYTE*)PalEnt;
126
127         for (i=Start; i < Count+Start; i++)
128             This->palents[i].peRed = *entry++;
129     }
130     else {
131         memcpy(This->palents+Start, PalEnt, Count * sizeof(PALETTEENTRY));
132
133         /* When WINEDDCAPS_ALLOW256 isn't set we need to override entry 0 with black and 255 with white */
134         if (!(This->flags & WINEDDPCAPS_ALLOW256))
135         {
136             TRACE("WINEDDPCAPS_ALLOW256 set, overriding palette entry 0 with black and 255 with white\n");
137             This->palents[0].peRed = 0;
138             This->palents[0].peGreen = 0;
139             This->palents[0].peBlue = 0;
140
141             This->palents[255].peRed = 255;
142             This->palents[255].peGreen = 255;
143             This->palents[255].peBlue = 255;
144         }
145
146         if (This->hpal)
147             SetPaletteEntries(This->hpal, Start, Count, This->palents+Start);
148     }
149
150 #if 0
151     /* Now, if we are in 'depth conversion mode', update the screen palette */
152     /* FIXME: we need to update the image or we won't get palette fading. */
153     if (This->ddraw->d->palette_convert)
154             This->ddraw->d->palette_convert(palent,This->screen_palents,start,count);
155 #endif
156
157     /* If the palette is attached to the render target, update all render targets */
158
159     LIST_FOR_EACH_ENTRY(res, &This->device->resources, IWineD3DResourceImpl, resource.resource_list_entry)
160     {
161         if(IWineD3DResource_GetType((IWineD3DResource *) res) == WINED3DRTYPE_SURFACE) {
162             IWineD3DSurfaceImpl *impl = (IWineD3DSurfaceImpl *) res;
163             if(impl->palette == This)
164                 IWineD3DSurface_RealizePalette((IWineD3DSurface *) res);
165         }
166     }
167
168     return WINED3D_OK;
169 }
170
171 static HRESULT  WINAPI IWineD3DPaletteImpl_GetCaps(IWineD3DPalette *iface, DWORD *Caps) {
172     IWineD3DPaletteImpl *This = (IWineD3DPaletteImpl *)iface;
173     TRACE("(%p)->(%p)\n", This, Caps);
174
175     *Caps = This->flags;
176     return WINED3D_OK;
177 }
178
179 static void * WINAPI IWineD3DPaletteImpl_GetParent(IWineD3DPalette *iface)
180 {
181     TRACE("iface %p.\n", iface);
182
183     return ((IWineD3DPaletteImpl *)iface)->parent;
184 }
185
186 static const IWineD3DPaletteVtbl IWineD3DPalette_Vtbl =
187 {
188     /*** IUnknown ***/
189     IWineD3DPaletteImpl_QueryInterface,
190     IWineD3DPaletteImpl_AddRef,
191     IWineD3DPaletteImpl_Release,
192     /*** IWineD3DPalette ***/
193     IWineD3DPaletteImpl_GetParent,
194     IWineD3DPaletteImpl_GetEntries,
195     IWineD3DPaletteImpl_GetCaps,
196     IWineD3DPaletteImpl_SetEntries
197 };
198
199 HRESULT wined3d_palette_init(IWineD3DPaletteImpl *palette, IWineD3DDeviceImpl *device,
200         DWORD flags, const PALETTEENTRY *entries, void *parent)
201 {
202     HRESULT hr;
203
204     palette->lpVtbl = &IWineD3DPalette_Vtbl;
205     palette->ref = 1;
206     palette->parent = parent;
207     palette->device = device;
208     palette->flags = flags;
209
210     palette->palNumEntries = IWineD3DPaletteImpl_Size(flags);
211     palette->hpal = CreatePalette((const LOGPALETTE *)&palette->palVersion);
212     if (!palette->hpal)
213     {
214         WARN("Failed to create palette.\n");
215         return E_FAIL;
216     }
217
218     hr = IWineD3DPalette_SetEntries((IWineD3DPalette *)palette, 0, 0, IWineD3DPaletteImpl_Size(flags), entries);
219     if (FAILED(hr))
220     {
221         WARN("Failed to set palette entries, hr %#x.\n", hr);
222         DeleteObject(palette->hpal);
223         return hr;
224     }
225
226     return WINED3D_OK;
227 }