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

   1 /*        DirectDraw Base Functions
   2  *
   3  * Copyright 1997-1999 Marcus Meissner
   4  * Copyright 1998 Lionel Ulmer
   5  * Copyright 2000-2001 TransGaming Technologies Inc.
   6  * Copyright 2006 Stefan Dösinger
   7  * Copyright 2008 Denver Gingerich
   8  *
   9  * This file contains the (internal) driver registration functions,
  10  * driver enumeration APIs and DirectDraw creation functions.
  11  *
  12  * This library is free software; you can redistribute it and/or
  13  * modify it under the terms of the GNU Lesser General Public
  14  * License as published by the Free Software Foundation; either
  15  * version 2.1 of the License, or (at your option) any later version.
  16  *
  17  * This library is distributed in the hope that it will be useful,
  18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  20  * Lesser General Public License for more details.
  21  *
  22  * You should have received a copy of the GNU Lesser General Public
  23  * License along with this library; if not, write to the Free Software
  24  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  25  */
  26
  27 #include "config.h"
  28 #include "wine/port.h"
  29
  30 #define DDRAW_INIT_GUID
  31 #include "ddraw_private.h"
  32 #include "rpcproxy.h"
  33
  34 #include "wine/exception.h"
  35 #include "winreg.h"
  36
  37 WINE_DEFAULT_DEBUG_CHANNEL(ddraw);
  38
  39 /* The configured default surface */
  40 enum wined3d_surface_type DefaultSurfaceType = WINED3D_SURFACE_TYPE_OPENGL;
  41
  42 static struct list global_ddraw_list = LIST_INIT(global_ddraw_list);
  43
  44 static HINSTANCE instance;
  45
  46 /* value of ForceRefreshRate */
  47 DWORD force_refresh_rate = 0;
  48
  49 /* Structure for converting DirectDrawEnumerateA to DirectDrawEnumerateExA */
  50 struct callback_info
  51 {
  52     LPDDENUMCALLBACKA callback;
  53     void *context;
  54 };
  55
  56 /* Enumeration callback for converting DirectDrawEnumerateA to DirectDrawEnumerateExA */
  57 static HRESULT CALLBACK enum_callback(GUID *guid, char *description, char *driver_name,
  58                                       void *context, HMONITOR monitor)
  59 {
  60     const struct callback_info *info = context;
  61
  62     return info->callback(guid, description, driver_name, info->context);
  63 }
  64
  65 /* Handle table functions */
  66 BOOL ddraw_handle_table_init(struct ddraw_handle_table *t, UINT initial_size)
  67 {
  68     t->entries = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, initial_size * sizeof(*t->entries));
  69     if (!t->entries)
  70     {
  71         ERR("Failed to allocate handle table memory.\n");
  72         return FALSE;
  73     }
  74     t->free_entries = NULL;
  75     t->table_size = initial_size;
  76     t->entry_count = 0;
  77
  78     return TRUE;
  79 }
  80
  81 void ddraw_handle_table_destroy(struct ddraw_handle_table *t)
  82 {
  83     HeapFree(GetProcessHeap(), 0, t->entries);
  84     memset(t, 0, sizeof(*t));
  85 }
  86
  87 DWORD ddraw_allocate_handle(struct ddraw_handle_table *t, void *object, enum ddraw_handle_type type)
  88 {
  89     struct ddraw_handle_entry *entry;
  90
  91     if (t->free_entries)
  92     {
  93         DWORD idx = t->free_entries - t->entries;
  94         /* Use a free handle */
  95         entry = t->free_entries;
  96         if (entry->type != DDRAW_HANDLE_FREE)
  97         {
  98             ERR("Handle %#x (%p) is in the free list, but has type %#x.\n", idx, entry->object, entry->type);
  99             return DDRAW_INVALID_HANDLE;
 100         }
 101         t->free_entries = entry->object;
 102         entry->object = object;
 103         entry->type = type;
 104
 105         return idx;
 106     }
 107
 108     if (!(t->entry_count < t->table_size))
 109     {
 110         /* Grow the table */
 111         UINT new_size = t->table_size + (t->table_size >> 1);
 112         struct ddraw_handle_entry *new_entries = HeapReAlloc(GetProcessHeap(),
 113                 0, t->entries, new_size * sizeof(*t->entries));
 114         if (!new_entries)
 115         {
 116             ERR("Failed to grow the handle table.\n");
 117             return DDRAW_INVALID_HANDLE;
 118         }
 119         t->entries = new_entries;
 120         t->table_size = new_size;
 121     }
 122
 123     entry = &t->entries[t->entry_count];
 124     entry->object = object;
 125     entry->type = type;
 126
 127     return t->entry_count++;
 128 }
 129
 130 void *ddraw_free_handle(struct ddraw_handle_table *t, DWORD handle, enum ddraw_handle_type type)
 131 {
 132     struct ddraw_handle_entry *entry;
 133     void *object;
 134
 135     if (handle == DDRAW_INVALID_HANDLE || handle >= t->entry_count)
 136     {
 137         WARN("Invalid handle %#x passed.\n", handle);
 138         return NULL;
 139     }
 140
 141     entry = &t->entries[handle];
 142     if (entry->type != type)
 143     {
 144         WARN("Handle %#x (%p) is not of type %#x.\n", handle, entry->object, type);
 145         return NULL;
 146     }
 147
 148     object = entry->object;
 149     entry->object = t->free_entries;
 150     entry->type = DDRAW_HANDLE_FREE;
 151     t->free_entries = entry;
 152
 153     return object;
 154 }
 155
 156 void *ddraw_get_object(struct ddraw_handle_table *t, DWORD handle, enum ddraw_handle_type type)
 157 {
 158     struct ddraw_handle_entry *entry;
 159
 160     if (handle == DDRAW_INVALID_HANDLE || handle >= t->entry_count)
 161     {
 162         WARN("Invalid handle %#x passed.\n", handle);
 163         return NULL;
 164     }
 165
 166     entry = &t->entries[handle];
 167     if (entry->type != type)
 168     {
 169         WARN("Handle %#x (%p) is not of type %#x.\n", handle, entry->object, type);
 170         return NULL;
 171     }
 172
 173     return entry->object;
 174 }
 175
 176 /***********************************************************************
 177  *
 178  * Helper function for DirectDrawCreate and friends
 179  * Creates a new DDraw interface with the given REFIID
 180  *
 181  * Interfaces that can be created:
 182  *  IDirectDraw, IDirectDraw2, IDirectDraw4, IDirectDraw7
 183  *  IDirect3D, IDirect3D2, IDirect3D3, IDirect3D7. (Does Windows return
 184  *  IDirect3D interfaces?)
 185  *
 186  * Arguments:
 187  *  guid: ID of the requested driver, NULL for the default driver.
 188  *        The GUID can be queried with DirectDrawEnumerate(Ex)A/W
 189  *  DD: Used to return the pointer to the created object
 190  *  UnkOuter: For aggregation, which is unsupported. Must be NULL
 191  *  iid: requested version ID.
 192  *
 193  * Returns:
 194  *  DD_OK if the Interface was created successfully
 195  *  CLASS_E_NOAGGREGATION if UnkOuter is not NULL
 196  *  E_OUTOFMEMORY if some allocation failed
 197  *
 198  ***********************************************************************/
 199 static HRESULT
 200 DDRAW_Create(const GUID *guid,
 201              void **DD,
 202              IUnknown *UnkOuter,
 203              REFIID iid)
 204 {
 205     enum wined3d_device_type device_type;
 206     struct ddraw *ddraw;
 207     HRESULT hr;
 208
 209     TRACE("driver_guid %s, ddraw %p, outer_unknown %p, interface_iid %s.\n",
 210             debugstr_guid(guid), DD, UnkOuter, debugstr_guid(iid));
 211
 212     *DD = NULL;
 213
 214     /* We don't care about this guids. Well, there's no special guid anyway
 215      * OK, we could
 216      */
 217     if (guid == (GUID *) DDCREATE_EMULATIONONLY)
 218     {
 219         /* Use the reference device id. This doesn't actually change anything,
 220          * WineD3D always uses OpenGL for D3D rendering. One could make it request
 221          * indirect rendering
 222          */
 223         device_type = WINED3D_DEVICE_TYPE_REF;
 224     }
 225     else if(guid == (GUID *) DDCREATE_HARDWAREONLY)
 226     {
 227         device_type = WINED3D_DEVICE_TYPE_HAL;
 228     }
 229     else
 230     {
 231         device_type = 0;
 232     }
 233
 234     /* DDraw doesn't support aggregation, according to msdn */
 235     if (UnkOuter != NULL)
 236         return CLASS_E_NOAGGREGATION;
 237
 238     /* DirectDraw creation comes here */
 239     ddraw = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*ddraw));
 240     if (!ddraw)
 241     {
 242         ERR("Out of memory when creating DirectDraw\n");
 243         return E_OUTOFMEMORY;
 244     }
 245
 246     hr = ddraw_init(ddraw, device_type);
 247     if (FAILED(hr))
 248     {
 249         WARN("Failed to initialize ddraw object, hr %#x.\n", hr);
 250         HeapFree(GetProcessHeap(), 0, ddraw);
 251         return hr;
 252     }
 253
 254     hr = IDirectDraw7_QueryInterface(&ddraw->IDirectDraw7_iface, iid, DD);
 255     IDirectDraw7_Release(&ddraw->IDirectDraw7_iface);
 256     if (SUCCEEDED(hr))
 257         list_add_head(&global_ddraw_list, &ddraw->ddraw_list_entry);
 258     else
 259         WARN("Failed to query interface %s from ddraw object %p.\n", debugstr_guid(iid), ddraw);
 260
 261     return hr;
 262 }
 263
 264 /***********************************************************************
 265  * DirectDrawCreate (DDRAW.@)
 266  *
 267  * Creates legacy DirectDraw Interfaces. Can't create IDirectDraw7
 268  * interfaces in theory
 269  *
 270  * Arguments, return values: See DDRAW_Create
 271  *
 272  ***********************************************************************/
 273 HRESULT WINAPI DECLSPEC_HOTPATCH DirectDrawCreate(GUID *driver_guid, IDirectDraw **ddraw, IUnknown *outer)
 274 {
 275     HRESULT hr;
 276
 277     TRACE("driver_guid %s, ddraw %p, outer %p.\n",
 278             debugstr_guid(driver_guid), ddraw, outer);
 279
 280     wined3d_mutex_lock();
 281     hr = DDRAW_Create(driver_guid, (void **)ddraw, outer, &IID_IDirectDraw);
 282     wined3d_mutex_unlock();
 283
 284     if (SUCCEEDED(hr))
 285     {
 286         if (FAILED(hr = IDirectDraw_Initialize(*ddraw, driver_guid)))
 287             IDirectDraw_Release(*ddraw);
 288     }
 289
 290     return hr;
 291 }
 292
 293 /***********************************************************************
 294  * DirectDrawCreateEx (DDRAW.@)
 295  *
 296  * Only creates new IDirectDraw7 interfaces, supposed to fail if legacy
 297  * interfaces are requested.
 298  *
 299  * Arguments, return values: See DDRAW_Create
 300  *
 301  ***********************************************************************/
 302 HRESULT WINAPI DECLSPEC_HOTPATCH
 303 DirectDrawCreateEx(GUID *guid,
 304                    LPVOID *dd,
 305                    REFIID iid,
 306                    IUnknown *UnkOuter)
 307 {
 308     HRESULT hr;
 309
 310     TRACE("driver_guid %s, ddraw %p, interface_iid %s, outer_unknown %p.\n",
 311             debugstr_guid(guid), dd, debugstr_guid(iid), UnkOuter);
 312
 313     if (!IsEqualGUID(iid, &IID_IDirectDraw7))
 314         return DDERR_INVALIDPARAMS;
 315
 316     wined3d_mutex_lock();
 317     hr = DDRAW_Create(guid, dd, UnkOuter, iid);
 318     wined3d_mutex_unlock();
 319
 320     if (SUCCEEDED(hr))
 321     {
 322         IDirectDraw7 *ddraw7 = *(IDirectDraw7 **)dd;
 323         hr = IDirectDraw7_Initialize(ddraw7, guid);
 324         if (FAILED(hr))
 325             IDirectDraw7_Release(ddraw7);
 326     }
 327
 328     return hr;
 329 }
 330
 331 /***********************************************************************
 332  * DirectDrawEnumerateA (DDRAW.@)
 333  *
 334  * Enumerates legacy ddraw drivers, ascii version. We only have one
 335  * driver, which relays to WineD3D. If we were sufficiently cool,
 336  * we could offer various interfaces, which use a different default surface
 337  * implementation, but I think it's better to offer this choice in
 338  * winecfg, because some apps use the default driver, so we would need
 339  * a winecfg option anyway, and there shouldn't be 2 ways to set one setting
 340  *
 341  * Arguments:
 342  *  Callback: Callback function from the app
 343  *  Context: Argument to the call back.
 344  *
 345  * Returns:
 346  *  DD_OK on success
 347  *  E_INVALIDARG if the Callback caused a page fault
 348  *
 349  *
 350  ***********************************************************************/
 351 HRESULT WINAPI DirectDrawEnumerateA(LPDDENUMCALLBACKA callback, void *context)
 352 {
 353     struct callback_info info;
 354
 355     TRACE("callback %p, context %p.\n", callback, context);
 356
 357     info.callback = callback;
 358     info.context = context;
 359     return DirectDrawEnumerateExA(enum_callback, &info, 0x0);
 360 }
 361
 362 /***********************************************************************
 363  * DirectDrawEnumerateExA (DDRAW.@)
 364  *
 365  * Enumerates DirectDraw7 drivers, ascii version. See
 366  * the comments above DirectDrawEnumerateA for more details.
 367  *
 368  * The Flag member is not supported right now.
 369  *
 370  ***********************************************************************/
 371 HRESULT WINAPI DirectDrawEnumerateExA(LPDDENUMCALLBACKEXA callback, void *context, DWORD flags)
 372 {
 373     struct wined3d *wined3d;
 374
 375     TRACE("callback %p, context %p, flags %#x.\n", callback, context, flags);
 376
 377     if (flags & ~(DDENUM_ATTACHEDSECONDARYDEVICES |
 378                   DDENUM_DETACHEDSECONDARYDEVICES |
 379                   DDENUM_NONDISPLAYDEVICES))
 380         return DDERR_INVALIDPARAMS;
 381
 382     if (flags)
 383         FIXME("flags 0x%08x not handled\n", flags);
 384
 385     TRACE("Enumerating ddraw interfaces\n");
 386     if (!(wined3d = wined3d_create(7, WINED3D_LEGACY_DEPTH_BIAS)))
 387     {
 388         if (!(wined3d = wined3d_create(7, WINED3D_LEGACY_DEPTH_BIAS | WINED3D_NO3D)))
 389         {
 390             WARN("Failed to create a wined3d object.\n");
 391             return E_FAIL;
 392         }
 393
 394         WARN("Created a wined3d object without 3D support.\n");
 395     }
 396
 397     __TRY
 398     {
 399         /* QuickTime expects the description "DirectDraw HAL" */
 400         static CHAR driver_desc[] = "DirectDraw HAL",
 401         driver_name[] = "display";
 402         struct wined3d_adapter_identifier adapter_id;
 403         HRESULT hr = S_OK;
 404         UINT adapter = 0;
 405         BOOL cont_enum;
 406
 407         /* The Battle.net System Checker expects both a NULL device and a GUID-based device */
 408         TRACE("Default interface: DirectDraw HAL\n");
 409         cont_enum = callback(NULL, driver_desc, driver_name, context, 0);
 410         for (adapter = 0; SUCCEEDED(hr) && cont_enum; adapter++)
 411         {
 412             char DriverName[512] = "";
 413
 414             /* The Battle.net System Checker expects the GetAdapterIdentifier DeviceName to match the
 415              * Driver Name, so obtain the DeviceName and GUID from D3D. */
 416             memset(&adapter_id, 0x0, sizeof(adapter_id));
 417             adapter_id.device_name = DriverName;
 418             adapter_id.device_name_size = sizeof(DriverName);
 419             wined3d_mutex_lock();
 420             hr = wined3d_get_adapter_identifier(wined3d, adapter, 0x0, &adapter_id);
 421             wined3d_mutex_unlock();
 422             if (SUCCEEDED(hr))
 423             {
 424                 TRACE("Interface %d: %s\n", adapter, wine_dbgstr_guid(&adapter_id.device_identifier));
 425                 cont_enum = callback(&adapter_id.device_identifier, driver_desc,
 426                                      adapter_id.device_name, context, 0);
 427             }
 428         }
 429     }
 430     __EXCEPT_PAGE_FAULT
 431     {
 432         wined3d_decref(wined3d);
 433         return DDERR_INVALIDPARAMS;
 434     }
 435     __ENDTRY;
 436
 437     wined3d_decref(wined3d);
 438     TRACE("End of enumeration\n");
 439     return DD_OK;
 440 }
 441
 442 /***********************************************************************
 443  * DirectDrawEnumerateW (DDRAW.@)
 444  *
 445  * Enumerates legacy drivers, unicode version.
 446  * This function is not implemented on Windows.
 447  *
 448  ***********************************************************************/
 449 HRESULT WINAPI DirectDrawEnumerateW(LPDDENUMCALLBACKW callback, void *context)
 450 {
 451     TRACE("callback %p, context %p.\n", callback, context);
 452
 453     if (!callback)
 454         return DDERR_INVALIDPARAMS;
 455     else
 456         return DDERR_UNSUPPORTED;
 457 }
 458
 459 /***********************************************************************
 460  * DirectDrawEnumerateExW (DDRAW.@)
 461  *
 462  * Enumerates DirectDraw7 drivers, unicode version.
 463  * This function is not implemented on Windows.
 464  *
 465  ***********************************************************************/
 466 HRESULT WINAPI DirectDrawEnumerateExW(LPDDENUMCALLBACKEXW callback, void *context, DWORD flags)
 467 {
 468     TRACE("callback %p, context %p, flags %#x.\n", callback, context, flags);
 469
 470     return DDERR_UNSUPPORTED;
 471 }
 472
 473 /***********************************************************************
 474  * Classfactory implementation.
 475  ***********************************************************************/
 476
 477 /***********************************************************************
 478  * CF_CreateDirectDraw
 479  *
 480  * DDraw creation function for the class factory
 481  *
 482  * Params:
 483  *  UnkOuter: Set to NULL
 484  *  iid: ID of the wanted interface
 485  *  obj: Address to pass the interface pointer back
 486  *
 487  * Returns
 488  *  DD_OK / DDERR*, see DDRAW_Create
 489  *
 490  ***********************************************************************/
 491 static HRESULT
 492 CF_CreateDirectDraw(IUnknown* UnkOuter, REFIID iid,
 493                     void **obj)
 494 {
 495     HRESULT hr;
 496
 497     TRACE("outer_unknown %p, riid %s, object %p.\n", UnkOuter, debugstr_guid(iid), obj);
 498
 499     wined3d_mutex_lock();
 500     hr = DDRAW_Create(NULL, obj, UnkOuter, iid);
 501     wined3d_mutex_unlock();
 502
 503     return hr;
 504 }
 505
 506 /***********************************************************************
 507  * CF_CreateDirectDraw
 508  *
 509  * Clipper creation function for the class factory
 510  *
 511  * Params:
 512  *  UnkOuter: Set to NULL
 513  *  iid: ID of the wanted interface
 514  *  obj: Address to pass the interface pointer back
 515  *
 516  * Returns
 517  *  DD_OK / DDERR*, see DDRAW_Create
 518  *
 519  ***********************************************************************/
 520 static HRESULT
 521 CF_CreateDirectDrawClipper(IUnknown* UnkOuter, REFIID riid,
 522                               void **obj)
 523 {
 524     HRESULT hr;
 525     IDirectDrawClipper *Clip;
 526
 527     TRACE("outer_unknown %p, riid %s, object %p.\n", UnkOuter, debugstr_guid(riid), obj);
 528
 529     wined3d_mutex_lock();
 530     hr = DirectDrawCreateClipper(0, &Clip, UnkOuter);
 531     if (hr != DD_OK)
 532     {
 533         wined3d_mutex_unlock();
 534         return hr;
 535     }
 536
 537     hr = IDirectDrawClipper_QueryInterface(Clip, riid, obj);
 538     IDirectDrawClipper_Release(Clip);
 539
 540     wined3d_mutex_unlock();
 541
 542     return hr;
 543 }
 544
 545 static const struct object_creation_info object_creation[] =
 546 {
 547     { &CLSID_DirectDraw,        CF_CreateDirectDraw },
 548     { &CLSID_DirectDraw7,       CF_CreateDirectDraw },
 549     { &CLSID_DirectDrawClipper, CF_CreateDirectDrawClipper }
 550 };
 551
 552 struct ddraw_class_factory
 553 {
 554     IClassFactory IClassFactory_iface;
 555
 556     LONG ref;
 557     HRESULT (*pfnCreateInstance)(IUnknown *pUnkOuter, REFIID iid, LPVOID *ppObj);
 558 };
 559
 560 static inline struct ddraw_class_factory *impl_from_IClassFactory(IClassFactory *iface)
 561 {
 562     return CONTAINING_RECORD(iface, struct ddraw_class_factory, IClassFactory_iface);
 563 }
 564
 565 /*******************************************************************************
 566  * IDirectDrawClassFactory::QueryInterface
 567  *
 568  * QueryInterface for the class factory
 569  *
 570  * PARAMS
 571  *    riid   Reference to identifier of queried interface
 572  *    ppv    Address to return the interface pointer at
 573  *
 574  * RETURNS
 575  *    Success: S_OK
 576  *    Failure: E_NOINTERFACE
 577  *
 578  *******************************************************************************/
 579 static HRESULT WINAPI ddraw_class_factory_QueryInterface(IClassFactory *iface, REFIID riid, void **out)
 580 {
 581     TRACE("iface %p, riid %s, out %p.\n", iface, debugstr_guid(riid), out);
 582
 583     if (IsEqualGUID(riid, &IID_IUnknown)
 584         || IsEqualGUID(riid, &IID_IClassFactory))
 585     {
 586         IClassFactory_AddRef(iface);
 587         *out = iface;
 588         return S_OK;
 589     }
 590
 591     WARN("%s not implemented, returning E_NOINTERFACE.\n", debugstr_guid(riid));
 592
 593     return E_NOINTERFACE;
 594 }
 595
 596 /*******************************************************************************
 597  * IDirectDrawClassFactory::AddRef
 598  *
 599  * AddRef for the class factory
 600  *
 601  * RETURNS
 602  *  The new refcount
 603  *
 604  *******************************************************************************/
 605 static ULONG WINAPI ddraw_class_factory_AddRef(IClassFactory *iface)
 606 {
 607     struct ddraw_class_factory *factory = impl_from_IClassFactory(iface);
 608     ULONG ref = InterlockedIncrement(&factory->ref);
 609
 610     TRACE("%p increasing refcount to %u.\n", factory, ref);
 611
 612     return ref;
 613 }
 614
 615 /*******************************************************************************
 616  * IDirectDrawClassFactory::Release
 617  *
 618  * Release for the class factory. If the refcount falls to 0, the object
 619  * is destroyed
 620  *
 621  * RETURNS
 622  *  The new refcount
 623  *
 624  *******************************************************************************/
 625 static ULONG WINAPI ddraw_class_factory_Release(IClassFactory *iface)
 626 {
 627     struct ddraw_class_factory *factory = impl_from_IClassFactory(iface);
 628     ULONG ref = InterlockedDecrement(&factory->ref);
 629
 630     TRACE("%p decreasing refcount to %u.\n", factory, ref);
 631
 632     if (!ref)
 633         HeapFree(GetProcessHeap(), 0, factory);
 634
 635     return ref;
 636 }
 637
 638
 639 /*******************************************************************************
 640  * IDirectDrawClassFactory::CreateInstance
 641  *
 642  * What is this? Seems to create DirectDraw objects...
 643  *
 644  * Params
 645  *  The usual things???
 646  *
 647  * RETURNS
 648  *  ???
 649  *
 650  *******************************************************************************/
 651 static HRESULT WINAPI ddraw_class_factory_CreateInstance(IClassFactory *iface,
 652         IUnknown *outer_unknown, REFIID riid, void **out)
 653 {
 654     struct ddraw_class_factory *factory = impl_from_IClassFactory(iface);
 655
 656     TRACE("iface %p, outer_unknown %p, riid %s, out %p.\n",
 657             iface, outer_unknown, debugstr_guid(riid), out);
 658
 659     return factory->pfnCreateInstance(outer_unknown, riid, out);
 660 }
 661
 662 /*******************************************************************************
 663  * IDirectDrawClassFactory::LockServer
 664  *
 665  * What is this?
 666  *
 667  * Params
 668  *  ???
 669  *
 670  * RETURNS
 671  *  S_OK, because it's a stub
 672  *
 673  *******************************************************************************/
 674 static HRESULT WINAPI ddraw_class_factory_LockServer(IClassFactory *iface, BOOL dolock)
 675 {
 676     FIXME("iface %p, dolock %#x stub!\n", iface, dolock);
 677
 678     return S_OK;
 679 }
 680
 681 /*******************************************************************************
 682  * The class factory VTable
 683  *******************************************************************************/
 684 static const IClassFactoryVtbl IClassFactory_Vtbl =
 685 {
 686     ddraw_class_factory_QueryInterface,
 687     ddraw_class_factory_AddRef,
 688     ddraw_class_factory_Release,
 689     ddraw_class_factory_CreateInstance,
 690     ddraw_class_factory_LockServer
 691 };
 692
 693 /*******************************************************************************
 694  * DllGetClassObject [DDRAW.@]
 695  * Retrieves class object from a DLL object
 696  *
 697  * NOTES
 698  *    Docs say returns STDAPI
 699  *
 700  * PARAMS
 701  *    rclsid [I] CLSID for the class object
 702  *    riid   [I] Reference to identifier of interface for class object
 703  *    ppv    [O] Address of variable to receive interface pointer for riid
 704  *
 705  * RETURNS
 706  *    Success: S_OK
 707  *    Failure: CLASS_E_CLASSNOTAVAILABLE, E_OUTOFMEMORY, E_INVALIDARG,
 708  *             E_UNEXPECTED
 709  */
 710 HRESULT WINAPI DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID *ppv)
 711 {
 712     struct ddraw_class_factory *factory;
 713     unsigned int i;
 714
 715     TRACE("rclsid %s, riid %s, object %p.\n",
 716             debugstr_guid(rclsid), debugstr_guid(riid), ppv);
 717
 718     if (!IsEqualGUID(&IID_IClassFactory, riid)
 719             && !IsEqualGUID(&IID_IUnknown, riid))
 720         return E_NOINTERFACE;
 721
 722     for (i=0; i < sizeof(object_creation)/sizeof(object_creation[0]); i++)
 723     {
 724         if (IsEqualGUID(object_creation[i].clsid, rclsid))
 725             break;
 726     }
 727
 728     if (i == sizeof(object_creation)/sizeof(object_creation[0]))
 729     {
 730         FIXME("%s: no class found.\n", debugstr_guid(rclsid));
 731         return CLASS_E_CLASSNOTAVAILABLE;
 732     }
 733
 734     factory = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*factory));
 735     if (factory == NULL) return E_OUTOFMEMORY;
 736
 737     factory->IClassFactory_iface.lpVtbl = &IClassFactory_Vtbl;
 738     factory->ref = 1;
 739
 740     factory->pfnCreateInstance = object_creation[i].pfnCreateInstance;
 741
 742     *ppv = factory;
 743     return S_OK;
 744 }
 745
 746
 747 /*******************************************************************************
 748  * DllCanUnloadNow [DDRAW.@]  Determines whether the DLL is in use.
 749  *
 750  * RETURNS
 751  *    Success: S_OK
 752  *    Failure: S_FALSE
 753  */
 754 HRESULT WINAPI DllCanUnloadNow(void)
 755 {
 756     TRACE("\n");
 757
 758     return S_FALSE;
 759 }
 760
 761
 762 /***********************************************************************
 763  *              DllRegisterServer (DDRAW.@)
 764  */
 765 HRESULT WINAPI DllRegisterServer(void)
 766 {
 767     return __wine_register_resources( instance );
 768 }
 769
 770 /***********************************************************************
 771  *              DllUnregisterServer (DDRAW.@)
 772  */
 773 HRESULT WINAPI DllUnregisterServer(void)
 774 {
 775     return __wine_unregister_resources( instance );
 776 }
 777
 778 /*******************************************************************************
 779  * DestroyCallback
 780  *
 781  * Callback function for the EnumSurfaces call in DllMain.
 782  * Dumps some surface info and releases the surface
 783  *
 784  * Params:
 785  *  surf: The enumerated surface
 786  *  desc: it's description
 787  *  context: Pointer to the ddraw impl
 788  *
 789  * Returns:
 790  *  DDENUMRET_OK;
 791  *******************************************************************************/
 792 static HRESULT WINAPI
 793 DestroyCallback(IDirectDrawSurface7 *surf,
 794                 DDSURFACEDESC2 *desc,
 795                 void *context)
 796 {
 797     struct ddraw_surface *Impl = impl_from_IDirectDrawSurface7(surf);
 798     ULONG ref7, ref4, ref3, ref2, ref1, gamma_count, iface_count;
 799
 800     ref7 = IDirectDrawSurface7_Release(surf);  /* For the EnumSurfaces */
 801     ref4 = Impl->ref4;
 802     ref3 = Impl->ref3;
 803     ref2 = Impl->ref2;
 804     ref1 = Impl->ref1;
 805     gamma_count = Impl->gamma_count;
 806
 807     WARN("Surface %p has an reference counts of 7: %u 4: %u 3: %u 2: %u 1: %u gamma: %u\n",
 808             Impl, ref7, ref4, ref3, ref2, ref1, gamma_count);
 809
 810     /* Skip surfaces which are attached somewhere or which are
 811      * part of a complex compound. They will get released when destroying
 812      * the root
 813      */
 814     if( (!Impl->is_complex_root) || (Impl->first_attached != Impl) )
 815         return DDENUMRET_OK;
 816
 817     /* Destroy the surface */
 818     iface_count = ddraw_surface_release_iface(Impl);
 819     while (iface_count) iface_count = ddraw_surface_release_iface(Impl);
 820
 821     return DDENUMRET_OK;
 822 }
 823
 824 /***********************************************************************
 825  * get_config_key
 826  *
 827  * Reads a config key from the registry. Taken from WineD3D
 828  *
 829  ***********************************************************************/
 830 static inline DWORD get_config_key(HKEY defkey, HKEY appkey, const char* name, char* buffer, DWORD size)
 831 {
 832     if (0 != appkey && !RegQueryValueExA( appkey, name, 0, NULL, (LPBYTE) buffer, &size )) return 0;
 833     if (0 != defkey && !RegQueryValueExA( defkey, name, 0, NULL, (LPBYTE) buffer, &size )) return 0;
 834     return ERROR_FILE_NOT_FOUND;
 835 }
 836
 837 /***********************************************************************
 838  * DllMain (DDRAW.0)
 839  *
 840  * Could be used to register DirectDraw drivers, if we have more than
 841  * one. Also used to destroy any objects left at unload if the
 842  * app didn't release them properly(Gothic 2, Diablo 2, Moto racer, ...)
 843  *
 844  ***********************************************************************/
 845 BOOL WINAPI
 846 DllMain(HINSTANCE hInstDLL,
 847         DWORD Reason,
 848         LPVOID lpv)
 849 {
 850     TRACE("(%p,%x,%p)\n", hInstDLL, Reason, lpv);
 851     if (Reason == DLL_PROCESS_ATTACH)
 852     {
 853         static HMODULE ddraw_self;
 854         char buffer[MAX_PATH+10];
 855         DWORD size = sizeof(buffer);
 856         HKEY hkey = 0;
 857         HKEY appkey = 0;
 858         WNDCLASSA wc;
 859         DWORD len;
 860
 861         /* Register the window class. This is used to create a hidden window
 862          * for D3D rendering, if the application didn't pass one. It can also
 863          * be used for creating a device window from SetCooperativeLevel(). */
 864         wc.style = CS_HREDRAW | CS_VREDRAW;
 865         wc.lpfnWndProc = DefWindowProcA;
 866         wc.cbClsExtra = 0;
 867         wc.cbWndExtra = 0;
 868         wc.hInstance = hInstDLL;
 869         wc.hIcon = 0;
 870         wc.hCursor = 0;
 871         wc.hbrBackground = GetStockObject(BLACK_BRUSH);
 872         wc.lpszMenuName = NULL;
 873         wc.lpszClassName = DDRAW_WINDOW_CLASS_NAME;
 874         if (!RegisterClassA(&wc))
 875         {
 876             ERR("Failed to register ddraw window class, last error %#x.\n", GetLastError());
 877             return FALSE;
 878         }
 879
 880        /* @@ Wine registry key: HKCU\Software\Wine\Direct3D */
 881        if ( RegOpenKeyA( HKEY_CURRENT_USER, "Software\\Wine\\Direct3D", &hkey ) ) hkey = 0;
 882
 883        len = GetModuleFileNameA( 0, buffer, MAX_PATH );
 884        if (len && len < MAX_PATH)
 885        {
 886             HKEY tmpkey;
 887             /* @@ Wine registry key: HKCU\Software\Wine\AppDefaults\app.exe\Direct3D */
 888             if (!RegOpenKeyA( HKEY_CURRENT_USER, "Software\\Wine\\AppDefaults", &tmpkey ))
 889             {
 890                 char *p, *appname = buffer;
 891                 if ((p = strrchr( appname, '/' ))) appname = p + 1;
 892                 if ((p = strrchr( appname, '\\' ))) appname = p + 1;
 893                 strcat( appname, "\\Direct3D" );
 894                 TRACE("appname = [%s]\n", appname);
 895                 if (RegOpenKeyA( tmpkey, appname, &appkey )) appkey = 0;
 896                 RegCloseKey( tmpkey );
 897             }
 898        }
 899
 900        if ( 0 != hkey || 0 != appkey )
 901        {
 902             if ( !get_config_key( hkey, appkey, "DirectDrawRenderer", buffer, size) )
 903             {
 904                 if (!strcmp(buffer,"gdi"))
 905                 {
 906                     TRACE("Defaulting to GDI surfaces\n");
 907                     DefaultSurfaceType = WINED3D_SURFACE_TYPE_GDI;
 908                 }
 909                 else if (!strcmp(buffer,"opengl"))
 910                 {
 911                     TRACE("Defaulting to opengl surfaces\n");
 912                     DefaultSurfaceType = WINED3D_SURFACE_TYPE_OPENGL;
 913                 }
 914                 else
 915                 {
 916                     ERR("Unknown default surface type. Supported are:\n gdi, opengl\n");
 917                 }
 918             }
 919         }
 920
 921         /* On Windows one can force the refresh rate that DirectDraw uses by
 922          * setting an override value in dxdiag.  This is documented in KB315614
 923          * (main article), KB230002, and KB217348.  By comparing registry dumps
 924          * before and after setting the override, we see that the override value
 925          * is stored in HKLM\Software\Microsoft\DirectDraw\ForceRefreshRate as a
 926          * DWORD that represents the refresh rate to force.  We use this
 927          * registry entry to modify the behavior of SetDisplayMode so that Wine
 928          * users can override the refresh rate in a Windows-compatible way.
 929          *
 930          * dxdiag will not accept a refresh rate lower than 40 or higher than
 931          * 120 so this value should be within that range.  It is, of course,
 932          * possible for a user to set the registry entry value directly so that
 933          * assumption might not hold.
 934          *
 935          * There is no current mechanism for setting this value through the Wine
 936          * GUI.  It would be most appropriate to set this value through a dxdiag
 937          * clone, but it may be sufficient to use winecfg.
 938          *
 939          * TODO: Create a mechanism for setting this value through the Wine GUI.
 940          */
 941         if ( !RegOpenKeyA( HKEY_LOCAL_MACHINE, "Software\\Microsoft\\DirectDraw", &hkey ) )
 942         {
 943             DWORD type, data;
 944             size = sizeof(data);
 945             if (!RegQueryValueExA( hkey, "ForceRefreshRate", NULL, &type, (LPBYTE)&data, &size ) && type == REG_DWORD)
 946             {
 947                 TRACE("ForceRefreshRate set; overriding refresh rate to %d Hz\n", data);
 948                 force_refresh_rate = data;
 949             }
 950             RegCloseKey( hkey );
 951         }
 952
 953         /* Prevent the ddraw module from being unloaded. When switching to
 954          * exclusive mode, we replace the window proc of the ddraw window. If
 955          * an application would unload ddraw from the WM_DESTROY handler for
 956          * that window, it would return to unmapped memory and die. Apparently
 957          * this is supposed to work on Windows. We should probably use
 958          * GET_MODULE_HANDLE_EX_FLAG_PIN for this, but that's not currently
 959          * implemented. */
 960         if (!GetModuleHandleExW(GET_MODULE_HANDLE_EX_FLAG_FROM_ADDRESS, (const WCHAR *)&ddraw_self, &ddraw_self))
 961             ERR("Failed to get own module handle.\n");
 962
 963         instance = hInstDLL;
 964         DisableThreadLibraryCalls(hInstDLL);
 965     }
 966     else if (Reason == DLL_PROCESS_DETACH)
 967     {
 968         if(!list_empty(&global_ddraw_list))
 969         {
 970             struct list *entry, *entry2;
 971             WARN("There are still existing DirectDraw interfaces. Wine bug or buggy application?\n");
 972
 973             /* We remove elements from this loop */
 974             LIST_FOR_EACH_SAFE(entry, entry2, &global_ddraw_list)
 975             {
 976                 struct ddraw *ddraw = LIST_ENTRY(entry, struct ddraw, ddraw_list_entry);
 977                 HRESULT hr;
 978                 DDSURFACEDESC2 desc;
 979                 int i;
 980
 981                 WARN("DDraw %p has a refcount of %d\n", ddraw, ddraw->ref7 + ddraw->ref4 + ddraw->ref3 + ddraw->ref2 + ddraw->ref1);
 982
 983                 /* Add references to each interface to avoid freeing them unexpectedly */
 984                 IDirectDraw_AddRef(&ddraw->IDirectDraw_iface);
 985                 IDirectDraw2_AddRef(&ddraw->IDirectDraw2_iface);
 986                 IDirectDraw4_AddRef(&ddraw->IDirectDraw4_iface);
 987                 IDirectDraw7_AddRef(&ddraw->IDirectDraw7_iface);
 988
 989                 /* Does a D3D device exist? Destroy it
 990                     * TODO: Destroy all Vertex buffers, Lights, Materials
 991                     * and execute buffers too
 992                     */
 993                 if(ddraw->d3ddevice)
 994                 {
 995                     WARN("DDraw %p has d3ddevice %p attached\n", ddraw, ddraw->d3ddevice);
 996                     while(IDirect3DDevice7_Release(&ddraw->d3ddevice->IDirect3DDevice7_iface));
 997                 }
 998
 999                 /* Destroy the swapchain after any 3D device. The 3D device
1000                  * cleanup code needs a swapchain. Specifically, it tries to
1001                  * set the current render target to the front buffer. */
1002                 if (ddraw->wined3d_swapchain)
1003                     ddraw_destroy_swapchain(ddraw);
1004
1005                 /* Try to release the objects
1006                     * Do an EnumSurfaces to find any hanging surfaces
1007                     */
1008                 memset(&desc, 0, sizeof(desc));
1009                 desc.dwSize = sizeof(desc);
1010                 for(i = 0; i <= 1; i++)
1011                 {
1012                     hr = IDirectDraw7_EnumSurfaces(&ddraw->IDirectDraw7_iface, DDENUMSURFACES_ALL,
1013                             &desc, ddraw, DestroyCallback);
1014                     if(hr != D3D_OK)
1015                         ERR("(%p) EnumSurfaces failed, prepare for trouble\n", ddraw);
1016                 }
1017
1018                 if (!list_empty(&ddraw->surface_list))
1019                     ERR("DDraw %p still has surfaces attached.\n", ddraw);
1020
1021                 /* Release all hanging references to destroy the objects. This
1022                     * restores the screen mode too
1023                     */
1024                 while(IDirectDraw_Release(&ddraw->IDirectDraw_iface));
1025                 while(IDirectDraw2_Release(&ddraw->IDirectDraw2_iface));
1026                 while(IDirectDraw4_Release(&ddraw->IDirectDraw4_iface));
1027                 while(IDirectDraw7_Release(&ddraw->IDirectDraw7_iface));
1028             }
1029         }
1030
1031         /* Unregister the window class. */
1032         UnregisterClassA(DDRAW_WINDOW_CLASS_NAME, hInstDLL);
1033     }
1034
1035     return TRUE;
1036 }