gdiplus: Implement GdipGetRegionScans.
[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         unsigned int i;
124         const BYTE* entry = (const BYTE*)PalEnt;
125
126         for (i=Start; i < Count+Start; i++)
127             This->palents[i].peRed = *entry++;
128     }
129     else {
130         memcpy(This->palents+Start, PalEnt, Count * sizeof(PALETTEENTRY));
131
132         /* When WINEDDCAPS_ALLOW256 isn't set we need to override entry 0 with black and 255 with white */
133         if(!(This->Flags & WINEDDPCAPS_ALLOW256))
134         {
135             TRACE("WINEDDPCAPS_ALLOW256 set, overriding palette entry 0 with black and 255 with white\n");
136             This->palents[0].peRed = 0;
137             This->palents[0].peGreen = 0;
138             This->palents[0].peBlue = 0;
139
140             This->palents[255].peRed = 255;
141             This->palents[255].peGreen = 255;
142             This->palents[255].peBlue = 255;
143         }
144
145         if (This->hpal)
146             SetPaletteEntries(This->hpal, Start, Count, This->palents+Start);
147     }
148
149 #if 0
150     /* Now, if we are in 'depth conversion mode', update the screen palette */
151     /* FIXME: we need to update the image or we won't get palette fading. */
152     if (This->ddraw->d->palette_convert)
153             This->ddraw->d->palette_convert(palent,This->screen_palents,start,count);
154 #endif
155
156     /* If the palette is attached to the render target, update all render targets */
157
158     LIST_FOR_EACH_ENTRY(res, &This->device->resources, IWineD3DResourceImpl, resource.resource_list_entry)
159     {
160         if(IWineD3DResource_GetType((IWineD3DResource *) res) == WINED3DRTYPE_SURFACE) {
161             IWineD3DSurfaceImpl *impl = (IWineD3DSurfaceImpl *) res;
162             if(impl->palette == This)
163                 IWineD3DSurface_RealizePalette((IWineD3DSurface *) res);
164         }
165     }
166
167     return WINED3D_OK;
168 }
169
170 static HRESULT  WINAPI IWineD3DPaletteImpl_GetCaps(IWineD3DPalette *iface, DWORD *Caps) {
171     IWineD3DPaletteImpl *This = (IWineD3DPaletteImpl *)iface;
172     TRACE("(%p)->(%p)\n", This, Caps);
173
174     *Caps = This->Flags;
175     return WINED3D_OK;
176 }
177
178 static void * WINAPI IWineD3DPaletteImpl_GetParent(IWineD3DPalette *iface)
179 {
180     TRACE("iface %p.\n", iface);
181
182     return ((IWineD3DPaletteImpl *)iface)->parent;
183 }
184
185 static const IWineD3DPaletteVtbl IWineD3DPalette_Vtbl =
186 {
187     /*** IUnknown ***/
188     IWineD3DPaletteImpl_QueryInterface,
189     IWineD3DPaletteImpl_AddRef,
190     IWineD3DPaletteImpl_Release,
191     /*** IWineD3DPalette ***/
192     IWineD3DPaletteImpl_GetParent,
193     IWineD3DPaletteImpl_GetEntries,
194     IWineD3DPaletteImpl_GetCaps,
195     IWineD3DPaletteImpl_SetEntries
196 };
197
198 HRESULT wined3d_palette_init(IWineD3DPaletteImpl *palette, IWineD3DDeviceImpl *device,
199         DWORD flags, const PALETTEENTRY *entries, void *parent)
200 {
201     HRESULT hr;
202
203     palette->lpVtbl = &IWineD3DPalette_Vtbl;
204     palette->ref = 1;
205     palette->parent = parent;
206     palette->device = device;
207     palette->Flags = flags;
208
209     palette->palNumEntries = IWineD3DPaletteImpl_Size(flags);
210     palette->hpal = CreatePalette((const LOGPALETTE *)&palette->palVersion);
211     if (!palette->hpal)
212     {
213         WARN("Failed to create palette.\n");
214         return E_FAIL;
215     }
216
217     hr = IWineD3DPalette_SetEntries((IWineD3DPalette *)palette, 0, 0, IWineD3DPaletteImpl_Size(flags), entries);
218     if (FAILED(hr))
219     {
220         WARN("Failed to set palette entries, hr %#x.\n", hr);
221         DeleteObject(palette->hpal);
222         return hr;
223     }
224
225     return WINED3D_OK;
226 }