git.oblomov.eu Git - wine/blob - dlls/ddraw/dpalette/main.c

   1 /*              DirectDraw - IDirectPalette base interface
   2  *
   3  * Copyright 1997-2000 Marcus Meissner
   4  * Copyright 2000-2001 TransGaming Technologies Inc.
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  */
  20
  21 #include "config.h"
  22 #include "winerror.h"
  23 #include "wine/debug.h"
  24
  25 #include <assert.h>
  26 #include <string.h>
  27
  28 #define CONST_VTABLE
  29
  30 #include "ddraw_private.h"
  31 #include "dpalette/main.h"
  32 #include "ddraw/main.h"
  33
  34 WINE_DEFAULT_DEBUG_CHANNEL(ddraw);
  35
  36 #define SIZE_BITS (DDPCAPS_1BIT | DDPCAPS_2BIT | DDPCAPS_4BIT | DDPCAPS_8BIT)
  37
  38 /* For unsigned x. 0 is not a power of 2. */
  39 #define IS_POW_2(x) (((x) & ((x) - 1)) == 0)
  40
  41 static const IDirectDrawPaletteVtbl DDRAW_Main_Palette_VTable;
  42
  43 /******************************************************************************
  44  *                      IDirectDrawPalette
  45  */
  46 HRESULT Main_DirectDrawPalette_Construct(IDirectDrawPaletteImpl* This,
  47                                          IDirectDrawImpl* pDD, DWORD dwFlags)
  48 {
  49     if (!IS_POW_2(dwFlags & SIZE_BITS)) return DDERR_INVALIDPARAMS;
  50
  51     if (dwFlags & DDPCAPS_8BITENTRIES)
  52         WARN("creating palette with 8 bit entries\n");
  53
  54     This->palNumEntries = Main_DirectDrawPalette_Size(dwFlags);
  55     This->ref = 1;
  56
  57     This->local.lpGbl = &This->global;
  58     This->local.lpDD_lcl = &pDD->local;
  59     This->global.lpDD_lcl = &pDD->local;
  60     This->global.dwProcessId = GetCurrentProcessId();
  61     This->global.dwFlags = dwFlags;
  62
  63     This->final_release = Main_DirectDrawPalette_final_release;
  64     ICOM_INIT_INTERFACE(This, IDirectDrawPalette, DDRAW_Main_Palette_VTable);
  65
  66     /* we could defer hpal creation until we need it,
  67      * but does anyone have a case where it would be useful? */
  68     This->hpal = CreatePalette((const LOGPALETTE*)&(This->palVersion));
  69
  70     Main_DirectDraw_AddPalette(pDD, This);
  71
  72     return DD_OK;
  73 }
  74
  75 HRESULT
  76 Main_DirectDrawPalette_Create(IDirectDrawImpl* pDD, DWORD dwFlags,
  77                               LPDIRECTDRAWPALETTE* ppPalette,
  78                               LPUNKNOWN pUnkOuter)
  79 {
  80     IDirectDrawPaletteImpl* This;
  81     HRESULT hr;
  82
  83     if (pUnkOuter != NULL)
  84         return CLASS_E_NOAGGREGATION; /* unchecked */
  85
  86     This = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*This));
  87     if (This == NULL) return E_OUTOFMEMORY;
  88
  89     hr = Main_DirectDrawPalette_Construct(This, pDD, dwFlags);
  90     if (FAILED(hr))
  91         HeapFree(GetProcessHeap(), 0, This);
  92     else
  93         *ppPalette = ICOM_INTERFACE(This, IDirectDrawPalette);
  94
  95     return hr;
  96 }
  97
  98 DWORD Main_DirectDrawPalette_Size(DWORD dwFlags)
  99 {
 100     switch (dwFlags & SIZE_BITS)
 101     {
 102     case DDPCAPS_1BIT: return 2;
 103     case DDPCAPS_2BIT: return 4;
 104     case DDPCAPS_4BIT: return 16;
 105     case DDPCAPS_8BIT: return 256;
 106     default: assert(0); return 256;
 107     }
 108 }
 109
 110 HRESULT WINAPI
 111 Main_DirectDrawPalette_GetEntries(LPDIRECTDRAWPALETTE iface, DWORD dwFlags,
 112                                   DWORD dwStart, DWORD dwCount,
 113                                   LPPALETTEENTRY palent)
 114 {
 115     IDirectDrawPaletteImpl *This = (IDirectDrawPaletteImpl *)iface;
 116
 117     TRACE("(%p)->GetEntries(%08lx,%ld,%ld,%p)\n",This,dwFlags,dwStart,dwCount,
 118           palent);
 119
 120     if (dwFlags != 0) return DDERR_INVALIDPARAMS; /* unchecked */
 121     if (dwStart + dwCount > Main_DirectDrawPalette_Size(This->global.dwFlags))
 122         return DDERR_INVALIDPARAMS;
 123
 124     if (This->global.dwFlags & DDPCAPS_8BITENTRIES)
 125     {
 126         unsigned int i;
 127         LPBYTE entry = (LPBYTE)palent;
 128
 129         for (i=dwStart; i < dwCount+dwStart; i++)
 130             *entry++ = This->palents[i].peRed;
 131     }
 132     else
 133         memcpy(palent, This->palents+dwStart, dwCount * sizeof(PALETTEENTRY));
 134
 135     return DD_OK;
 136 }
 137
 138 HRESULT WINAPI
 139 Main_DirectDrawPalette_SetEntries(LPDIRECTDRAWPALETTE iface, DWORD dwFlags,
 140                                   DWORD dwStart, DWORD dwCount,
 141                                   LPPALETTEENTRY palent)
 142 {
 143     IDirectDrawPaletteImpl *This = (IDirectDrawPaletteImpl *)iface;
 144
 145     TRACE("(%p)->SetEntries(%08lx,%ld,%ld,%p)\n",This,dwFlags,dwStart,dwCount,
 146           palent);
 147
 148     if (This->global.dwFlags & DDPCAPS_8BITENTRIES)
 149     {
 150         unsigned int i;
 151         const BYTE* entry = (const BYTE*)palent;
 152
 153         for (i=dwStart; i < dwCount+dwStart; i++)
 154             This->palents[i].peRed = *entry++;
 155     }
 156     else {
 157         memcpy(This->palents+dwStart, palent, dwCount * sizeof(PALETTEENTRY));
 158
 159         if (This->hpal)
 160             SetPaletteEntries(This->hpal, dwStart, dwCount, This->palents+dwStart);
 161
 162         if (This->global.dwFlags & DDPCAPS_PRIMARYSURFACE) {
 163             /* update physical palette */
 164             LPDIRECTDRAWSURFACE7 psurf = NULL;
 165             IDirectDraw7_GetGDISurface(ICOM_INTERFACE(This->ddraw_owner,IDirectDraw7), &psurf);
 166             if (psurf) {
 167                 IDirectDrawSurfaceImpl *surf = ICOM_OBJECT(IDirectDrawSurfaceImpl,
 168                                                            IDirectDrawSurface7, psurf);
 169                 surf->update_palette(surf, This, dwStart, dwCount, palent);
 170                 IDirectDrawSurface7_Release(psurf);
 171             }
 172             else ERR("can't find GDI surface!!\n");
 173         }
 174     }
 175
 176 #if 0
 177     /* Now, if we are in 'depth conversion mode', update the screen palette */
 178     /* FIXME: we need to update the image or we won't get palette fading. */
 179     if (This->ddraw->d->palette_convert != NULL)
 180         This->ddraw->d->palette_convert(palent,This->screen_palents,start,count);
 181 #endif
 182
 183     return DD_OK;
 184 }
 185
 186 void Main_DirectDrawPalette_final_release(IDirectDrawPaletteImpl* This)
 187 {
 188     Main_DirectDraw_RemovePalette(This->ddraw_owner, This);
 189
 190     if (This->hpal) DeleteObject(This->hpal);
 191 }
 192
 193 static void Main_DirectDrawPalette_Destroy(IDirectDrawPaletteImpl* This)
 194 {
 195     This->final_release(This);
 196
 197     if (This->private != This+1)
 198         HeapFree(GetProcessHeap(), 0, This->private);
 199
 200     HeapFree(GetProcessHeap(),0,This);
 201 }
 202
 203 void Main_DirectDrawPalette_ForceDestroy(IDirectDrawPaletteImpl* This)
 204 {
 205     WARN("deleting palette %p with refcnt %lu\n", This, This->ref);
 206     Main_DirectDrawPalette_Destroy(This);
 207 }
 208
 209 ULONG WINAPI
 210 Main_DirectDrawPalette_Release(LPDIRECTDRAWPALETTE iface)
 211 {
 212     IDirectDrawPaletteImpl *This = (IDirectDrawPaletteImpl *)iface;
 213     ULONG ref = InterlockedDecrement(&This->ref);
 214
 215     TRACE("(%p)->() decrementing from %lu.\n", This, ref + 1);
 216
 217     if (!ref)
 218     {
 219         Main_DirectDrawPalette_Destroy(This);
 220         return 0;
 221     }
 222
 223     return ref;
 224 }
 225
 226 ULONG WINAPI Main_DirectDrawPalette_AddRef(LPDIRECTDRAWPALETTE iface) {
 227     IDirectDrawPaletteImpl *This = (IDirectDrawPaletteImpl *)iface;
 228     ULONG ref = InterlockedIncrement(&This->ref);
 229
 230     TRACE("(%p)->() incrementing from %lu.\n", This, ref - 1);
 231
 232     return ref;
 233 }
 234
 235 HRESULT WINAPI
 236 Main_DirectDrawPalette_Initialize(LPDIRECTDRAWPALETTE iface,
 237                                   LPDIRECTDRAW ddraw, DWORD dwFlags,
 238                                   LPPALETTEENTRY palent)
 239 {
 240     IDirectDrawPaletteImpl *This = (IDirectDrawPaletteImpl *)iface;
 241     TRACE("(%p)->(%p,%ld,%p)\n", This, ddraw, dwFlags, palent);
 242     return DDERR_ALREADYINITIALIZED;
 243 }
 244
 245 HRESULT WINAPI
 246 Main_DirectDrawPalette_GetCaps(LPDIRECTDRAWPALETTE iface, LPDWORD lpdwCaps)
 247 {
 248    IDirectDrawPaletteImpl *This = (IDirectDrawPaletteImpl *)iface;
 249    TRACE("(%p)->(%p)\n",This,lpdwCaps);
 250
 251    *lpdwCaps = This->global.dwFlags;
 252
 253    return DD_OK;
 254 }
 255
 256 HRESULT WINAPI
 257 Main_DirectDrawPalette_QueryInterface(LPDIRECTDRAWPALETTE iface,
 258                                       REFIID refiid, LPVOID *obj)
 259 {
 260     IDirectDrawPaletteImpl *This = (IDirectDrawPaletteImpl *)iface;
 261     TRACE("(%p)->(%s,%p)\n",This,debugstr_guid(refiid),obj);
 262
 263     if (IsEqualGUID(refiid, &IID_IUnknown)
 264         || IsEqualGUID(refiid, &IID_IDirectDrawPalette))
 265     {
 266         *obj = iface;
 267         IDirectDrawPalette_AddRef(iface);
 268         return S_OK;
 269     }
 270     else
 271     {
 272         return E_NOINTERFACE;
 273     }
 274 }
 275
 276 static const IDirectDrawPaletteVtbl DDRAW_Main_Palette_VTable =
 277 {
 278     Main_DirectDrawPalette_QueryInterface,
 279     Main_DirectDrawPalette_AddRef,
 280     Main_DirectDrawPalette_Release,
 281     Main_DirectDrawPalette_GetCaps,
 282     Main_DirectDrawPalette_GetEntries,
 283     Main_DirectDrawPalette_Initialize,
 284     Main_DirectDrawPalette_SetEntries
 285 };