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