dlls/d2d1/factory.c

   1 /*
   2  * Copyright 2014 Henri Verbeet for CodeWeavers
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  17  */
  18
  19 #define D2D1_INIT_GUID
  20 #include "d2d1_private.h"
  21
  22 #include "xmllite.h"
  23 #include "wine/list.h"
  24
  25 WINE_DECLARE_DEBUG_CHANNEL(winediag);
  26 WINE_DEFAULT_DEBUG_CHANNEL(d2d);
  27
  28 struct d2d_settings d2d_settings =
  29 {
  30     ~0u,    /* No ID2D1Factory version limit by default. */
  31 };
  32
  33 static void d2d_effect_registration_cleanup(struct d2d_effect_registration *reg)
  34 {
  35     d2d_effect_properties_cleanup(&reg->properties);
  36     free(reg);
  37 }
  38
  39 static inline struct d2d_factory *impl_from_ID2D1Factory3(ID2D1Factory3 *iface)
  40 {
  41     return CONTAINING_RECORD(iface, struct d2d_factory, ID2D1Factory3_iface);
  42 }
  43
  44 static inline struct d2d_factory *impl_from_ID2D1Multithread(ID2D1Multithread *iface)
  45 {
  46     return CONTAINING_RECORD(iface, struct d2d_factory, ID2D1Multithread_iface);
  47 }
  48
  49 static BOOL WINAPI d2d_factory_builtins_initonce(INIT_ONCE *once, void *param, void **context)
  50 {
  51     d2d_effects_init_builtins(param);
  52
  53     return TRUE;
  54 }
  55
  56 static void d2d_factory_init_builtin_effects(struct d2d_factory *factory)
  57 {
  58     InitOnceExecuteOnce(&factory->init_builtins, d2d_factory_builtins_initonce, factory, NULL);
  59 }
  60
  61 void d2d_factory_register_effect(struct d2d_factory *factory, struct d2d_effect_registration *effect)
  62 {
  63     list_add_tail(&factory->effects, &effect->entry);
  64 }
  65
  66 struct d2d_effect_registration * d2d_factory_get_registered_effect(ID2D1Factory *iface,
  67         const GUID *id)
  68 {
  69     struct d2d_factory *factory = unsafe_impl_from_ID2D1Factory(iface);
  70     struct d2d_effect_registration *reg;
  71
  72     d2d_factory_init_builtin_effects(factory);
  73
  74     LIST_FOR_EACH_ENTRY(reg, &factory->effects, struct d2d_effect_registration, entry)
  75     {
  76         if (IsEqualGUID(id, &reg->id)) return reg;
  77     }
  78
  79     return NULL;
  80 }
  81
  82 static HRESULT d2d_factory_reload_sysmetrics(struct d2d_factory *factory)
  83 {
  84     HDC hdc;
  85
  86     if (!(hdc = GetDC(NULL)))
  87     {
  88         factory->dpi_x = factory->dpi_y = 96.0f;
  89         return E_FAIL;
  90     }
  91
  92     factory->dpi_x = GetDeviceCaps(hdc, LOGPIXELSX);
  93     factory->dpi_y = GetDeviceCaps(hdc, LOGPIXELSY);
  94
  95     ReleaseDC(NULL, hdc);
  96
  97     return S_OK;
  98 }
  99
 100 static HRESULT STDMETHODCALLTYPE d2d_factory_QueryInterface(ID2D1Factory3 *iface, REFIID iid, void **out)
 101 {
 102     struct d2d_factory *factory = impl_from_ID2D1Factory3(iface);
 103
 104     TRACE("iface %p, iid %s, out %p.\n", iface, debugstr_guid(iid), out);
 105
 106     if ((IsEqualGUID(iid, &IID_ID2D1Factory3) && d2d_settings.max_version_factory >= 3)
 107             || (IsEqualGUID(iid, &IID_ID2D1Factory2) && d2d_settings.max_version_factory >= 2)
 108             || (IsEqualGUID(iid, &IID_ID2D1Factory1) && d2d_settings.max_version_factory >= 1)
 109             || IsEqualGUID(iid, &IID_ID2D1Factory)
 110             || IsEqualGUID(iid, &IID_IUnknown))
 111     {
 112         ID2D1Factory3_AddRef(iface);
 113         *out = iface;
 114         return S_OK;
 115     }
 116     else if (IsEqualGUID(iid, &IID_ID2D1Multithread))
 117     {
 118         ID2D1Factory3_AddRef(iface);
 119         *out = &factory->ID2D1Multithread_iface;
 120         return S_OK;
 121     }
 122
 123     WARN("%s not implemented, returning E_NOINTERFACE.\n", debugstr_guid(iid));
 124
 125     *out = NULL;
 126     return E_NOINTERFACE;
 127 }
 128
 129 static ULONG STDMETHODCALLTYPE d2d_factory_AddRef(ID2D1Factory3 *iface)
 130 {
 131     struct d2d_factory *factory = impl_from_ID2D1Factory3(iface);
 132     ULONG refcount = InterlockedIncrement(&factory->refcount);
 133
 134     TRACE("%p increasing refcount to %lu.\n", iface, refcount);
 135
 136     return refcount;
 137 }
 138
 139 static ULONG STDMETHODCALLTYPE d2d_factory_Release(ID2D1Factory3 *iface)
 140 {
 141     struct d2d_factory *factory = impl_from_ID2D1Factory3(iface);
 142     ULONG refcount = InterlockedDecrement(&factory->refcount);
 143     struct d2d_effect_registration *reg, *reg2;
 144
 145     TRACE("%p decreasing refcount to %lu.\n", iface, refcount);
 146
 147     if (!refcount)
 148     {
 149         if (factory->device)
 150             ID3D10Device1_Release(factory->device);
 151         LIST_FOR_EACH_ENTRY_SAFE(reg, reg2, &factory->effects, struct d2d_effect_registration, entry)
 152         {
 153             d2d_effect_registration_cleanup(reg);
 154         }
 155         DeleteCriticalSection(&factory->cs);
 156         free(factory);
 157     }
 158
 159     return refcount;
 160 }
 161
 162 static HRESULT STDMETHODCALLTYPE d2d_factory_ReloadSystemMetrics(ID2D1Factory3 *iface)
 163 {
 164     struct d2d_factory *factory = impl_from_ID2D1Factory3(iface);
 165
 166     TRACE("iface %p.\n", iface);
 167
 168     return d2d_factory_reload_sysmetrics(factory);
 169 }
 170
 171 static void STDMETHODCALLTYPE d2d_factory_GetDesktopDpi(ID2D1Factory3 *iface, float *dpi_x, float *dpi_y)
 172 {
 173     struct d2d_factory *factory = impl_from_ID2D1Factory3(iface);
 174
 175     TRACE("iface %p, dpi_x %p, dpi_y %p.\n", iface, dpi_x, dpi_y);
 176
 177     *dpi_x = factory->dpi_x;
 178     *dpi_y = factory->dpi_y;
 179 }
 180
 181 static HRESULT STDMETHODCALLTYPE d2d_factory_CreateRectangleGeometry(ID2D1Factory3 *iface,
 182         const D2D1_RECT_F *rect, ID2D1RectangleGeometry **geometry)
 183 {
 184     struct d2d_geometry *object;
 185     HRESULT hr;
 186
 187     TRACE("iface %p, rect %s, geometry %p.\n", iface, debug_d2d_rect_f(rect), geometry);
 188
 189     if (!(object = calloc(1, sizeof(*object))))
 190         return E_OUTOFMEMORY;
 191
 192     if (FAILED(hr = d2d_rectangle_geometry_init(object, (ID2D1Factory *)iface, rect)))
 193     {
 194         WARN("Failed to initialise rectangle geometry, hr %#lx.\n", hr);
 195         free(object);
 196         return hr;
 197     }
 198
 199     TRACE("Created rectangle geometry %p.\n", object);
 200     *geometry = (ID2D1RectangleGeometry *)&object->ID2D1Geometry_iface;
 201
 202     return S_OK;
 203 }
 204
 205 static HRESULT STDMETHODCALLTYPE d2d_factory_CreateRoundedRectangleGeometry(ID2D1Factory3 *iface,
 206         const D2D1_ROUNDED_RECT *rounded_rect, ID2D1RoundedRectangleGeometry **geometry)
 207 {
 208     struct d2d_geometry *object;
 209     HRESULT hr;
 210
 211     TRACE("iface %p, rounded_rect %s, geometry %p.\n", iface, debug_d2d_rounded_rect(rounded_rect), geometry);
 212
 213     if (!(object = calloc(1, sizeof(*object))))
 214         return E_OUTOFMEMORY;
 215
 216     if (FAILED(hr = d2d_rounded_rectangle_geometry_init(object, (ID2D1Factory *)iface, rounded_rect)))
 217     {
 218         WARN("Failed to initialise rounded rectangle geometry, hr %#lx.\n", hr);
 219         free(object);
 220         return hr;
 221     }
 222
 223     TRACE("Created rounded rectangle geometry %p.\n", object);
 224     *geometry = (ID2D1RoundedRectangleGeometry *)&object->ID2D1Geometry_iface;
 225
 226     return S_OK;
 227 }
 228
 229 static HRESULT STDMETHODCALLTYPE d2d_factory_CreateEllipseGeometry(ID2D1Factory3 *iface,
 230         const D2D1_ELLIPSE *ellipse, ID2D1EllipseGeometry **geometry)
 231 {
 232     struct d2d_geometry *object;
 233     HRESULT hr;
 234
 235     TRACE("iface %p, ellipse %s, geometry %p.\n", iface, debug_d2d_ellipse(ellipse), geometry);
 236
 237     if (!(object = calloc(1, sizeof(*object))))
 238         return E_OUTOFMEMORY;
 239
 240     if (FAILED(hr = d2d_ellipse_geometry_init(object, (ID2D1Factory *)iface, ellipse)))
 241     {
 242         WARN("Failed to initialise ellipse geometry, hr %#lx.\n", hr);
 243         free(object);
 244         return hr;
 245     }
 246
 247     TRACE("Created ellipse geometry %p.\n", object);
 248     *geometry = (ID2D1EllipseGeometry *)&object->ID2D1Geometry_iface;
 249
 250     return S_OK;
 251 }
 252
 253 static HRESULT STDMETHODCALLTYPE d2d_factory_CreateGeometryGroup(ID2D1Factory3 *iface,
 254         D2D1_FILL_MODE fill_mode, ID2D1Geometry **geometries, UINT32 geometry_count, ID2D1GeometryGroup **group)
 255 {
 256     struct d2d_geometry *object;
 257     HRESULT hr;
 258
 259     TRACE("iface %p, fill_mode %#x, geometries %p, geometry_count %u, group %p.\n",
 260             iface, fill_mode, geometries, geometry_count, group);
 261
 262     if (!(object = calloc(1, sizeof(*object))))
 263         return E_OUTOFMEMORY;
 264
 265     if (FAILED(hr = d2d_geometry_group_init(object, (ID2D1Factory *)iface, fill_mode, geometries, geometry_count)))
 266     {
 267         WARN("Failed to initialise geometry group, hr %#lx.\n", hr);
 268         free(object);
 269         return hr;
 270     }
 271
 272     TRACE("Created geometry group %p.\n", object);
 273     *group = (ID2D1GeometryGroup *)&object->ID2D1Geometry_iface;
 274
 275     return S_OK;
 276 }
 277
 278 static HRESULT STDMETHODCALLTYPE d2d_factory_CreateTransformedGeometry(ID2D1Factory3 *iface,
 279         ID2D1Geometry *src_geometry, const D2D1_MATRIX_3X2_F *transform,
 280         ID2D1TransformedGeometry **transformed_geometry)
 281 {
 282     struct d2d_geometry *object;
 283
 284     TRACE("iface %p, src_geometry %p, transform %p, transformed_geometry %p.\n",
 285             iface, src_geometry, transform, transformed_geometry);
 286
 287     if (!(object = calloc(1, sizeof(*object))))
 288         return E_OUTOFMEMORY;
 289
 290     d2d_transformed_geometry_init(object, (ID2D1Factory *)iface, src_geometry, transform);
 291
 292     TRACE("Created transformed geometry %p.\n", object);
 293     *transformed_geometry = (ID2D1TransformedGeometry *)&object->ID2D1Geometry_iface;
 294
 295     return S_OK;
 296 }
 297
 298 static HRESULT STDMETHODCALLTYPE d2d_factory_CreatePathGeometry(ID2D1Factory3 *iface, ID2D1PathGeometry **geometry)
 299 {
 300     struct d2d_geometry *object;
 301
 302     TRACE("iface %p, geometry %p.\n", iface, geometry);
 303
 304     if (!(object = calloc(1, sizeof(*object))))
 305         return E_OUTOFMEMORY;
 306
 307     d2d_path_geometry_init(object, (ID2D1Factory *)iface);
 308
 309     TRACE("Created path geometry %p.\n", object);
 310     *geometry = (ID2D1PathGeometry *)&object->ID2D1Geometry_iface;
 311
 312     return S_OK;
 313 }
 314
 315 static HRESULT STDMETHODCALLTYPE d2d_factory_CreateStrokeStyle(ID2D1Factory3 *iface,
 316         const D2D1_STROKE_STYLE_PROPERTIES *desc, const float *dashes, UINT32 dash_count,
 317         ID2D1StrokeStyle **stroke_style)
 318 {
 319     struct d2d_stroke_style *object;
 320     D2D1_STROKE_STYLE_PROPERTIES1 desc1;
 321     HRESULT hr;
 322
 323     TRACE("iface %p, desc %p, dashes %p, dash_count %u, stroke_style %p.\n",
 324             iface, desc, dashes, dash_count, stroke_style);
 325
 326     if (!(object = calloc(1, sizeof(*object))))
 327         return E_OUTOFMEMORY;
 328
 329     desc1.startCap = desc->startCap;
 330     desc1.endCap = desc->endCap;
 331     desc1.dashCap = desc->dashCap;
 332     desc1.lineJoin = desc->lineJoin;
 333     desc1.miterLimit = desc->miterLimit;
 334     desc1.dashStyle = desc->dashStyle;
 335     desc1.dashOffset = desc->dashOffset;
 336     desc1.transformType = D2D1_STROKE_TRANSFORM_TYPE_NORMAL;
 337
 338     if (FAILED(hr = d2d_stroke_style_init(object, (ID2D1Factory *)iface, &desc1, dashes, dash_count)))
 339     {
 340         WARN("Failed to initialise stroke style, hr %#lx.\n", hr);
 341         free(object);
 342         return hr;
 343     }
 344
 345     TRACE("Created stroke style %p.\n", object);
 346     *stroke_style = (ID2D1StrokeStyle *)&object->ID2D1StrokeStyle1_iface;
 347
 348     return S_OK;
 349 }
 350
 351 static HRESULT STDMETHODCALLTYPE d2d_factory_CreateDrawingStateBlock(ID2D1Factory3 *iface,
 352         const D2D1_DRAWING_STATE_DESCRIPTION *desc, IDWriteRenderingParams *text_rendering_params,
 353         ID2D1DrawingStateBlock **state_block)
 354 {
 355     D2D1_DRAWING_STATE_DESCRIPTION1 state_desc;
 356     struct d2d_state_block *object;
 357
 358     TRACE("iface %p, desc %p, text_rendering_params %p, state_block %p.\n",
 359             iface, desc, text_rendering_params, state_block);
 360
 361     if (!(object = calloc(1, sizeof(*object))))
 362         return E_OUTOFMEMORY;
 363
 364     if (desc)
 365     {
 366         memcpy(&state_desc, desc, sizeof(*desc));
 367         state_desc.primitiveBlend = D2D1_PRIMITIVE_BLEND_SOURCE_OVER;
 368         state_desc.unitMode = D2D1_UNIT_MODE_DIPS;
 369     }
 370
 371     d2d_state_block_init(object, (ID2D1Factory *)iface, desc ? &state_desc : NULL, text_rendering_params);
 372
 373     TRACE("Created state block %p.\n", object);
 374     *state_block = (ID2D1DrawingStateBlock *)&object->ID2D1DrawingStateBlock1_iface;
 375
 376     return S_OK;
 377 }
 378
 379 static HRESULT d2d_factory_get_device(struct d2d_factory *factory, ID3D10Device1 **device)
 380 {
 381     HRESULT hr = S_OK;
 382
 383     if (!factory->device && FAILED(hr = D3D10CreateDevice1(NULL, D3D10_DRIVER_TYPE_HARDWARE, NULL, D3D10_CREATE_DEVICE_BGRA_SUPPORT,
 384             D3D10_FEATURE_LEVEL_10_0, D3D10_1_SDK_VERSION, &factory->device)))
 385         WARN("Failed to create device, hr %#lx.\n", hr);
 386
 387     *device = factory->device;
 388     return hr;
 389 }
 390
 391 static HRESULT STDMETHODCALLTYPE d2d_factory_CreateWicBitmapRenderTarget(ID2D1Factory3 *iface,
 392         IWICBitmap *target, const D2D1_RENDER_TARGET_PROPERTIES *desc, ID2D1RenderTarget **render_target)
 393 {
 394     struct d2d_factory *factory = impl_from_ID2D1Factory3(iface);
 395     struct d2d_wic_render_target *object;
 396     ID3D10Device1 *device;
 397     HRESULT hr;
 398
 399     TRACE("iface %p, target %p, desc %p, render_target %p.\n", iface, target, desc, render_target);
 400
 401     if (!(object = calloc(1, sizeof(*object))))
 402         return E_OUTOFMEMORY;
 403
 404     if (FAILED(hr = d2d_factory_get_device(factory, &device)))
 405     {
 406         free(object);
 407         return hr;
 408     }
 409
 410     if (FAILED(hr = d2d_wic_render_target_init(object, (ID2D1Factory1 *)iface, device, target, desc)))
 411     {
 412         WARN("Failed to initialise render target, hr %#lx.\n", hr);
 413         free(object);
 414         return hr;
 415     }
 416
 417     TRACE("Created render target %p.\n", object);
 418     *render_target = object->dxgi_target;
 419
 420     return S_OK;
 421 }
 422
 423 static HRESULT STDMETHODCALLTYPE d2d_factory_CreateHwndRenderTarget(ID2D1Factory3 *iface,
 424         const D2D1_RENDER_TARGET_PROPERTIES *desc, const D2D1_HWND_RENDER_TARGET_PROPERTIES *hwnd_rt_desc,
 425         ID2D1HwndRenderTarget **render_target)
 426 {
 427     struct d2d_factory *factory = impl_from_ID2D1Factory3(iface);
 428     struct d2d_hwnd_render_target *object;
 429     ID3D10Device1 *device;
 430     HRESULT hr;
 431
 432     TRACE("iface %p, desc %p, hwnd_rt_desc %p, render_target %p.\n", iface, desc, hwnd_rt_desc, render_target);
 433
 434     if (FAILED(hr = d2d_factory_get_device(factory, &device)))
 435         return hr;
 436
 437     if (!(object = calloc(1, sizeof(*object))))
 438         return E_OUTOFMEMORY;
 439
 440     if (FAILED(hr = d2d_hwnd_render_target_init(object, (ID2D1Factory1 *)iface, device, desc, hwnd_rt_desc)))
 441     {
 442         WARN("Failed to initialise render target, hr %#lx.\n", hr);
 443         free(object);
 444         return hr;
 445     }
 446
 447     TRACE("Created render target %p.\n", object);
 448     *render_target = &object->ID2D1HwndRenderTarget_iface;
 449
 450     return S_OK;
 451 }
 452
 453 static HRESULT STDMETHODCALLTYPE d2d_factory_CreateDxgiSurfaceRenderTarget(ID2D1Factory3 *iface,
 454         IDXGISurface *surface, const D2D1_RENDER_TARGET_PROPERTIES *desc, ID2D1RenderTarget **render_target)
 455 {
 456     IDXGIDevice *dxgi_device;
 457     ID2D1Device *device;
 458     HRESULT hr;
 459
 460     TRACE("iface %p, surface %p, desc %p, render_target %p.\n", iface, surface, desc, render_target);
 461
 462     if (FAILED(hr = IDXGISurface_GetDevice(surface, &IID_IDXGIDevice, (void **)&dxgi_device)))
 463     {
 464         WARN("Failed to get DXGI device, hr %#lx.\n", hr);
 465         return hr;
 466     }
 467
 468     hr = ID2D1Factory1_CreateDevice((ID2D1Factory1 *)iface, dxgi_device, &device);
 469     IDXGIDevice_Release(dxgi_device);
 470     if (FAILED(hr))
 471     {
 472         WARN("Failed to create D2D device, hr %#lx.\n", hr);
 473         return hr;
 474     }
 475
 476     hr = d2d_d3d_create_render_target(unsafe_impl_from_ID2D1Device((ID2D1Device1 *)device), surface,
 477             NULL, NULL, desc, (void **)render_target);
 478     ID2D1Device_Release(device);
 479     return hr;
 480 }
 481
 482 static HRESULT STDMETHODCALLTYPE d2d_factory_CreateDCRenderTarget(ID2D1Factory3 *iface,
 483         const D2D1_RENDER_TARGET_PROPERTIES *desc, ID2D1DCRenderTarget **render_target)
 484 {
 485     struct d2d_factory *factory = impl_from_ID2D1Factory3(iface);
 486     struct d2d_dc_render_target *object;
 487     ID3D10Device1 *device;
 488     HRESULT hr;
 489
 490     TRACE("iface %p, desc %p, render_target %p.\n", iface, desc, render_target);
 491
 492     if (FAILED(hr = d2d_factory_get_device(factory, &device)))
 493         return hr;
 494
 495     if (!(object = calloc(1, sizeof(*object))))
 496         return E_OUTOFMEMORY;
 497
 498     if (FAILED(hr = d2d_dc_render_target_init(object, (ID2D1Factory1 *)iface, device, desc)))
 499     {
 500         WARN("Failed to initialise render target, hr %#lx.\n", hr);
 501         free(object);
 502         return hr;
 503     }
 504
 505     TRACE("Created render target %p.\n", object);
 506     *render_target = &object->ID2D1DCRenderTarget_iface;
 507
 508     return S_OK;
 509 }
 510
 511 static HRESULT d2d_factory_create_device(ID2D1Factory3 *iface, IDXGIDevice *dxgi_device,
 512         ID2D1Device1 **device) {
 513     struct d2d_device *object;
 514
 515     if (!(object = calloc(1, sizeof(*object))))
 516         return E_OUTOFMEMORY;
 517
 518     d2d_device_init(object, (ID2D1Factory1 *)iface, dxgi_device);
 519
 520     TRACE("Create device %p.\n", object);
 521     *device = &object->ID2D1Device1_iface;
 522
 523     return S_OK;
 524 }
 525
 526 static HRESULT STDMETHODCALLTYPE d2d_factory_CreateDevice(ID2D1Factory3 *iface,
 527         IDXGIDevice *dxgi_device, ID2D1Device **device)
 528 {
 529     TRACE("iface %p, dxgi_device %p, device %p.\n", iface, dxgi_device, device);
 530
 531     return d2d_factory_create_device(iface, dxgi_device, (ID2D1Device1 **)device);
 532 }
 533
 534 static HRESULT STDMETHODCALLTYPE d2d_factory_CreateStrokeStyle1(ID2D1Factory3 *iface,
 535         const D2D1_STROKE_STYLE_PROPERTIES1 *desc, const float *dashes, UINT32 dash_count,
 536         ID2D1StrokeStyle1 **stroke_style)
 537 {
 538     struct d2d_stroke_style *object;
 539     HRESULT hr;
 540
 541     TRACE("iface %p, desc %p, dashes %p, dash_count %u, stroke_style %p.\n",
 542             iface, desc, dashes, dash_count, stroke_style);
 543
 544     if (!(object = calloc(1, sizeof(*object))))
 545         return E_OUTOFMEMORY;
 546
 547     if (FAILED(hr = d2d_stroke_style_init(object, (ID2D1Factory *)iface,
 548             desc, dashes, dash_count)))
 549     {
 550         WARN("Failed to initialise stroke style, hr %#lx.\n", hr);
 551         free(object);
 552         return hr;
 553     }
 554
 555     TRACE("Created stroke style %p.\n", object);
 556     *stroke_style = &object->ID2D1StrokeStyle1_iface;
 557
 558     return S_OK;
 559 }
 560
 561 static HRESULT STDMETHODCALLTYPE d2d_factory_CreatePathGeometry1(ID2D1Factory3 *iface, ID2D1PathGeometry1 **geometry)
 562 {
 563     struct d2d_geometry *object;
 564
 565     TRACE("iface %p, geometry %p.\n", iface, geometry);
 566
 567     if (!(object = calloc(1, sizeof(*object))))
 568         return E_OUTOFMEMORY;
 569
 570     d2d_path_geometry_init(object, (ID2D1Factory *)iface);
 571
 572     TRACE("Created path geometry %p.\n", object);
 573     *geometry = (ID2D1PathGeometry1 *)&object->ID2D1Geometry_iface;
 574
 575     return S_OK;
 576 }
 577
 578 static HRESULT STDMETHODCALLTYPE d2d_factory_CreateDrawingStateBlock1(ID2D1Factory3 *iface,
 579         const D2D1_DRAWING_STATE_DESCRIPTION1 *desc, IDWriteRenderingParams *text_rendering_params,
 580         ID2D1DrawingStateBlock1 **state_block)
 581 {
 582     struct d2d_state_block *object;
 583
 584     TRACE("iface %p, desc %p, text_rendering_params %p, state_block %p.\n",
 585             iface, desc, text_rendering_params, state_block);
 586
 587     if (!(object = calloc(1, sizeof(*object))))
 588         return E_OUTOFMEMORY;
 589
 590     d2d_state_block_init(object, (ID2D1Factory *)iface, desc, text_rendering_params);
 591
 592     TRACE("Created state block %p.\n", object);
 593     *state_block = &object->ID2D1DrawingStateBlock1_iface;
 594
 595     return S_OK;
 596 }
 597
 598 static HRESULT STDMETHODCALLTYPE d2d_factory_CreateGdiMetafile(ID2D1Factory3 *iface,
 599         IStream *stream, ID2D1GdiMetafile **metafile)
 600 {
 601     FIXME("iface %p, stream %p, metafile %p stub!\n", iface, stream, metafile);
 602
 603     return E_NOTIMPL;
 604 }
 605
 606 static HRESULT parse_effect_get_next_xml_node(IXmlReader *reader, XmlNodeType expected_type,
 607         const WCHAR *expected_name, unsigned int *depth)
 608 {
 609     const WCHAR *node_name;
 610     XmlNodeType node_type;
 611     HRESULT hr;
 612
 613     assert(expected_type != XmlNodeType_Whitespace);
 614
 615     while ((hr = IXmlReader_Read(reader, &node_type)) == S_OK)
 616     {
 617         if (node_type == XmlNodeType_Whitespace)
 618             continue;
 619
 620         if (expected_type != XmlNodeType_None && node_type != expected_type)
 621             return HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
 622
 623         if (expected_name)
 624         {
 625             if (FAILED(hr = IXmlReader_GetLocalName(reader, &node_name, NULL)))
 626                 return hr;
 627
 628             if (wcscmp(node_name, expected_name))
 629                 return HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
 630         }
 631
 632         if (depth)
 633             IXmlReader_GetDepth(reader, depth);
 634         return S_OK;
 635     }
 636
 637     return hr;
 638 }
 639
 640 static HRESULT parse_effect_skip_element(IXmlReader *reader, unsigned int element_depth)
 641 {
 642     XmlNodeType node_type;
 643     unsigned int depth;
 644     HRESULT hr;
 645
 646     if (IXmlReader_IsEmptyElement(reader)) return S_OK;
 647
 648     while ((hr = IXmlReader_Read(reader, &node_type)) == S_OK)
 649     {
 650         IXmlReader_GetDepth(reader, &depth);
 651         if (node_type == XmlNodeType_EndElement && depth == element_depth + 1)
 652         {
 653             return S_OK;
 654         }
 655     }
 656
 657     return hr;
 658 }
 659
 660 static HRESULT parse_effect_get_attribute(IXmlReader *reader, const WCHAR *name, WCHAR **ret)
 661 {
 662     const WCHAR *value;
 663
 664     *ret = NULL;
 665
 666     if (IXmlReader_MoveToAttributeByName(reader, name, NULL) != S_OK)
 667         return E_INVALIDARG;
 668     if (IXmlReader_GetValue(reader, &value, NULL) != S_OK)
 669         return E_INVALIDARG;
 670     if (!(*ret = wcsdup(value)))
 671         return E_OUTOFMEMORY;
 672
 673     return S_OK;
 674 }
 675
 676 static HRESULT parse_effect_get_property_type(IXmlReader *reader, D2D1_PROPERTY_TYPE *type)
 677 {
 678     static const WCHAR *types[] =
 679     {
 680         L"",             /* D2D1_PROPERTY_TYPE_UNKNOWN */
 681         L"string",       /* D2D1_PROPERTY_TYPE_STRING */
 682         L"bool",         /* D2D1_PROPERTY_TYPE_BOOL */
 683         L"uint32",       /* D2D1_PROPERTY_TYPE_UINT32 */
 684         L"int32",        /* D2D1_PROPERTY_TYPE_INT32 */
 685         L"float",        /* D2D1_PROPERTY_TYPE_FLOAT */
 686         L"vector2",      /* D2D1_PROPERTY_TYPE_VECTOR2 */
 687         L"vector3",      /* D2D1_PROPERTY_TYPE_VECTOR3 */
 688         L"vector4",      /* D2D1_PROPERTY_TYPE_VECTOR4 */
 689         L"blob",         /* D2D1_PROPERTY_TYPE_BLOB */
 690         L"iunknown",     /* D2D1_PROPERTY_TYPE_IUNKNOWN */
 691         L"enum",         /* D2D1_PROPERTY_TYPE_ENUM */
 692         L"array",        /* D2D1_PROPERTY_TYPE_ARRAY */
 693         L"clsid",        /* D2D1_PROPERTY_TYPE_CLSID */
 694         L"matrix3x2",    /* D2D1_PROPERTY_TYPE_MATRIX_3X2 */
 695         L"matrix4x3",    /* D2D1_PROPERTY_TYPE_MATRIX_4X3 */
 696         L"matrix4x4",    /* D2D1_PROPERTY_TYPE_MATRIX_4X4 */
 697         L"matrix5x4",    /* D2D1_PROPERTY_TYPE_MATRIX_5X4 */
 698         L"colorcontext", /* D2D1_PROPERTY_TYPE_COLOR_CONTEXT */
 699     };
 700     unsigned int i;
 701     WCHAR *value;
 702     HRESULT hr;
 703
 704     if (FAILED(hr = parse_effect_get_attribute(reader, L"type", &value))) return hr;
 705
 706     *type = D2D1_PROPERTY_TYPE_UNKNOWN;
 707
 708     for (i = 0; i < ARRAY_SIZE(types); ++i)
 709     {
 710         if (!wcscmp(value, types[i]))
 711         {
 712             *type = i;
 713             break;
 714         }
 715     }
 716
 717     free(value);
 718
 719     return *type == D2D1_PROPERTY_TYPE_UNKNOWN ? E_INVALIDARG : S_OK;
 720 }
 721
 722 static struct d2d_effect_property * parse_effect_get_property(const struct d2d_effect_registration *effect,
 723         const WCHAR *name)
 724 {
 725     unsigned int i;
 726
 727     for (i = 0; i < effect->properties.count; ++i)
 728     {
 729         if (!wcscmp(name, effect->properties.properties[i].name))
 730             return &effect->properties.properties[i];
 731     }
 732
 733     return NULL;
 734 }
 735
 736 static UINT32 parse_effect_get_property_index(struct d2d_effect_properties *props,
 737         const WCHAR *name)
 738 {
 739     if (!wcscmp(name, L"DisplayName")) return D2D1_PROPERTY_DISPLAYNAME;
 740     if (!wcscmp(name, L"Author")) return D2D1_PROPERTY_AUTHOR;
 741     if (!wcscmp(name, L"Category")) return D2D1_PROPERTY_CATEGORY;
 742     if (!wcscmp(name, L"Description")) return D2D1_PROPERTY_DESCRIPTION;
 743     return props->custom_count;
 744 }
 745
 746 static HRESULT parse_effect_property(IXmlReader *reader, struct d2d_effect_registration *effect)
 747 {
 748     WCHAR *name = NULL, *value = NULL;
 749     D2D1_PROPERTY_TYPE type;
 750     unsigned int depth;
 751     UINT32 index;
 752     HRESULT hr;
 753
 754     if (FAILED(hr = parse_effect_get_attribute(reader, L"name", &name)))
 755         return hr;
 756
 757     if (FAILED(hr = parse_effect_get_property_type(reader, &type)))
 758     {
 759         free(name);
 760         return hr;
 761     }
 762
 763     /* Check for duplicates. */
 764     if (parse_effect_get_property(effect, name))
 765         hr = E_INVALIDARG;
 766
 767     parse_effect_get_attribute(reader, L"value", &value);
 768
 769     if (SUCCEEDED(hr))
 770     {
 771         /* FIXME: sub properties are ignored */
 772         IXmlReader_MoveToElement(reader);
 773         IXmlReader_GetDepth(reader, &depth);
 774         hr = parse_effect_skip_element(reader, depth);
 775     }
 776
 777     if (SUCCEEDED(hr))
 778     {
 779         index = parse_effect_get_property_index(&effect->properties, name);
 780         hr = d2d_effect_properties_add(&effect->properties, name, index, type, value);
 781     }
 782
 783     free(value);
 784     free(name);
 785
 786     return hr;
 787 }
 788
 789 static HRESULT parse_effect_inputs(IXmlReader *reader, struct d2d_effect_registration *effect)
 790 {
 791     struct d2d_effect_property *inputs, *min_inputs, *max_inputs;
 792     struct d2d_effect_properties *subproperties;
 793     UINT32 min_inputs_value, max_inputs_value;
 794     unsigned int depth, input_count = 0;
 795     XmlNodeType node_type;
 796     WCHAR *name, *value;
 797     WCHAR buffW[16];
 798     HRESULT hr;
 799
 800     if (FAILED(hr = d2d_effect_properties_add(&effect->properties, L"Inputs",
 801             D2D1_PROPERTY_INPUTS, D2D1_PROPERTY_TYPE_ARRAY, NULL)))
 802         return hr;
 803
 804     if (!(inputs = d2d_effect_properties_get_property_by_name(&effect->properties, L"Inputs")))
 805         return E_FAIL;
 806     if (!(inputs->subproperties = calloc(1, sizeof(*inputs->subproperties))))
 807         return E_OUTOFMEMORY;
 808     subproperties = inputs->subproperties;
 809
 810     d2d_effect_subproperties_add(subproperties, L"IsReadOnly", D2D1_SUBPROPERTY_ISREADONLY,
 811             D2D1_PROPERTY_TYPE_BOOL, L"true");
 812     d2d_effect_subproperties_add(subproperties, L"DisplayName", D2D1_SUBPROPERTY_DISPLAYNAME,
 813             D2D1_PROPERTY_TYPE_STRING, L"Inputs");
 814
 815     if (SUCCEEDED(parse_effect_get_attribute(reader, L"minimum", &value)))
 816     {
 817         hr = d2d_effect_properties_add(&effect->properties, L"MinInputs", D2D1_PROPERTY_MIN_INPUTS,
 818                 D2D1_PROPERTY_TYPE_UINT32, value);
 819         free(value);
 820         if (FAILED(hr)) return hr;
 821     }
 822     if (SUCCEEDED(parse_effect_get_attribute(reader, L"maximum", &value)))
 823     {
 824         hr = d2d_effect_properties_add(&effect->properties, L"MaxInputs", D2D1_PROPERTY_MAX_INPUTS,
 825                 D2D1_PROPERTY_TYPE_UINT32, value);
 826         free(value);
 827         if (FAILED(hr)) return hr;
 828     }
 829
 830     min_inputs = d2d_effect_properties_get_property_by_name(&effect->properties, L"MinInputs");
 831     max_inputs = d2d_effect_properties_get_property_by_name(&effect->properties, L"MaxInputs");
 832
 833     if (!IXmlReader_IsEmptyElement(reader))
 834     {
 835         while (parse_effect_get_next_xml_node(reader, XmlNodeType_None, L"Input", &depth) == S_OK)
 836         {
 837             if (FAILED(hr = IXmlReader_GetNodeType(reader, &node_type))) return hr;
 838             if (node_type == XmlNodeType_EndElement) continue;
 839             if (node_type != XmlNodeType_Element) return HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
 840
 841             if (FAILED(hr = parse_effect_get_attribute(reader, L"name", &name))) return hr;
 842
 843             swprintf(buffW, ARRAY_SIZE(buffW), L"%lu", input_count);
 844             d2d_effect_subproperties_add(subproperties, buffW, input_count, D2D1_PROPERTY_TYPE_STRING, name);
 845             input_count++;
 846
 847             free(name);
 848         }
 849         *(UINT32 *)(effect->properties.data.ptr + inputs->data.offset) = input_count;
 850
 851         if (FAILED(hr = IXmlReader_GetNodeType(reader, &node_type))) return hr;
 852         if (node_type != XmlNodeType_EndElement) return HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
 853     }
 854
 855     if (min_inputs)
 856         d2d_effect_property_get_uint32_value(&effect->properties, min_inputs, &min_inputs_value);
 857     if (max_inputs)
 858         d2d_effect_property_get_uint32_value(&effect->properties, max_inputs, &max_inputs_value);
 859
 860     /* Validate the range */
 861     if (min_inputs && max_inputs)
 862     {
 863         if (min_inputs_value > max_inputs_value)
 864         {
 865             WARN("Invalid input count range %u - %u.\n", min_inputs_value, max_inputs_value);
 866             return E_INVALIDARG;
 867         }
 868     }
 869
 870     /* Validate actual input count with specified range. */
 871     if (min_inputs && min_inputs_value > input_count)
 872     {
 873         WARN("Too few inputs were declared, expected at least %u.\n", min_inputs_value);
 874         return E_INVALIDARG;
 875     }
 876
 877     if (max_inputs && max_inputs_value < input_count)
 878     {
 879         WARN("Too many inputs were declared, expected at most %u.\n", max_inputs_value);
 880         return E_INVALIDARG;
 881     }
 882
 883     /* Apply default value to a missing property. If both properties are missing, add them. */
 884     if (min_inputs != max_inputs)
 885     {
 886         swprintf(buffW, ARRAY_SIZE(buffW), L"%lu", min_inputs ? min_inputs_value : max_inputs_value);
 887         if (min_inputs)
 888             hr = d2d_effect_properties_add(&effect->properties, L"MaxInputs", D2D1_PROPERTY_MAX_INPUTS, D2D1_PROPERTY_TYPE_UINT32, buffW);
 889         else
 890             hr = d2d_effect_properties_add(&effect->properties, L"MinInputs", D2D1_PROPERTY_MIN_INPUTS, D2D1_PROPERTY_TYPE_UINT32, buffW);
 891     }
 892     else if (!min_inputs)
 893     {
 894         swprintf(buffW, ARRAY_SIZE(buffW), L"%lu", input_count);
 895         hr = d2d_effect_properties_add(&effect->properties, L"MinInputs", D2D1_PROPERTY_MIN_INPUTS, D2D1_PROPERTY_TYPE_UINT32, buffW);
 896         if (SUCCEEDED(hr))
 897             hr = d2d_effect_properties_add(&effect->properties, L"MaxInputs", D2D1_PROPERTY_MAX_INPUTS, D2D1_PROPERTY_TYPE_UINT32, buffW);
 898     }
 899
 900     return hr;
 901 }
 902
 903 static HRESULT parse_effect_xml(IXmlReader *reader, struct d2d_effect_registration *effect)
 904 {
 905     const WCHAR *node_name;
 906     XmlNodeType node_type;
 907     unsigned int depth;
 908     HRESULT hr;
 909
 910     /* Xml declaration node is mandatory. */
 911     if ((hr = parse_effect_get_next_xml_node(reader, XmlNodeType_XmlDeclaration, L"xml", NULL)) != S_OK)
 912         return hr;
 913
 914     /* Top level "Effect" element. */
 915     if ((hr = parse_effect_get_next_xml_node(reader, XmlNodeType_Element, L"Effect", NULL)) != S_OK)
 916         return hr;
 917
 918     /* Loop inside effect node */
 919     while ((hr = parse_effect_get_next_xml_node(reader, XmlNodeType_None, NULL, &depth)) == S_OK)
 920     {
 921         if (FAILED(hr = IXmlReader_GetNodeType(reader, &node_type))) return hr;
 922         if (node_type != XmlNodeType_Element && node_type != XmlNodeType_EndElement) continue;
 923         if (FAILED(hr = IXmlReader_GetLocalName(reader, &node_name, NULL))) return hr;
 924         if (node_type == XmlNodeType_EndElement) break;
 925
 926         if (!wcscmp(node_name, L"Property"))
 927             hr = parse_effect_property(reader, effect);
 928         else if (!wcscmp(node_name, L"Inputs"))
 929             hr = parse_effect_inputs(reader, effect);
 930         else
 931         {
 932             WARN("Unexpected element %s.\n", debugstr_w(node_name));
 933             hr = parse_effect_skip_element(reader, depth);
 934         }
 935
 936         if (FAILED(hr))
 937             return hr;
 938     }
 939
 940     return hr;
 941 }
 942
 943 static HRESULT d2d_factory_register_effect_from_stream(struct d2d_factory *factory,
 944         REFCLSID effect_id, IStream *property_xml, const D2D1_PROPERTY_BINDING *bindings,
 945         UINT32 binding_count, PD2D1_EFFECT_FACTORY effect_factory, BOOL builtin)
 946 {
 947     struct d2d_effect_registration *effect;
 948     IXmlReader *reader;
 949     unsigned int i;
 950     HRESULT hr;
 951
 952     LIST_FOR_EACH_ENTRY_REV(effect, &factory->effects, struct d2d_effect_registration, entry)
 953     {
 954         if (IsEqualGUID(effect_id, &effect->id))
 955         {
 956             if (effect->builtin) return E_INVALIDARG;
 957             ++effect->registration_count;
 958             return S_OK;
 959         }
 960     }
 961
 962     if (FAILED(hr = CreateXmlReader(&IID_IXmlReader, (void **)&reader, NULL)))
 963         return hr;
 964
 965     if (FAILED(hr = IXmlReader_SetInput(reader, (IUnknown *)property_xml)))
 966     {
 967         IXmlReader_Release(reader);
 968         return hr;
 969     }
 970
 971     if (!(effect = calloc(1, sizeof(*effect))))
 972     {
 973         IXmlReader_Release(reader);
 974         return E_OUTOFMEMORY;
 975     }
 976     effect->builtin = builtin;
 977
 978     hr = parse_effect_xml(reader, effect);
 979     IXmlReader_Release(reader);
 980     if (FAILED(hr))
 981     {
 982         WARN("Failed to parse effect xml, hr %#lx.\n", hr);
 983         d2d_effect_registration_cleanup(effect);
 984         return hr;
 985     }
 986
 987     /* Check required properties. */
 988     if (!parse_effect_get_property(effect, L"DisplayName")
 989             || !parse_effect_get_property(effect, L"Author")
 990             || !parse_effect_get_property(effect, L"Category")
 991             || !parse_effect_get_property(effect, L"Description")
 992             || !parse_effect_get_property(effect, L"Inputs"))
 993     {
 994         WARN("Missing required properties.\n");
 995         d2d_effect_registration_cleanup(effect);
 996         return E_INVALIDARG;
 997     }
 998
 999     /* Bind getter and setter. */
1000     for (i = 0; i < binding_count; ++i)
1001     {
1002         struct d2d_effect_property *property;
1003
1004         if (!(property = parse_effect_get_property(effect, bindings[i].propertyName)))
1005         {
1006             WARN("Failed to bind to missing property.\n");
1007             d2d_effect_registration_cleanup(effect);
1008             return D2DERR_INVALID_PROPERTY;
1009         }
1010
1011         property->get_function = bindings[i].getFunction;
1012         property->set_function = bindings[i].setFunction;
1013     }
1014
1015     effect->registration_count = 1;
1016     effect->id = *effect_id;
1017     effect->factory = effect_factory;
1018     d2d_factory_register_effect(factory, effect);
1019
1020     return S_OK;
1021 }
1022
1023 static HRESULT STDMETHODCALLTYPE d2d_factory_RegisterEffectFromStream(ID2D1Factory3 *iface,
1024         REFCLSID effect_id, IStream *property_xml, const D2D1_PROPERTY_BINDING *bindings,
1025         UINT32 binding_count, PD2D1_EFFECT_FACTORY effect_factory)
1026 {
1027     struct d2d_factory *factory = impl_from_ID2D1Factory3(iface);
1028
1029     TRACE("iface %p, effect_id %s, property_xml %p, bindings %p, binding_count %u, effect_factory %p.\n",
1030             iface, debugstr_guid(effect_id), property_xml, bindings, binding_count, effect_factory);
1031
1032     d2d_factory_init_builtin_effects(factory);
1033
1034     return d2d_factory_register_effect_from_stream(factory, effect_id, property_xml, bindings,
1035             binding_count, effect_factory, FALSE);
1036 }
1037
1038 static HRESULT d2d_factory_register_effect_from_string(struct d2d_factory *factory,
1039         REFCLSID effect_id, const WCHAR *property_xml, const D2D1_PROPERTY_BINDING *bindings,
1040         UINT32 binding_count, PD2D1_EFFECT_FACTORY effect_factory, BOOL builtin)
1041 {
1042     static const LARGE_INTEGER zero;
1043     IStream *stream;
1044     ULONG size;
1045     HRESULT hr;
1046
1047     if (FAILED(hr = CreateStreamOnHGlobal(NULL, TRUE, &stream)))
1048         return hr;
1049
1050     size = sizeof(*property_xml) * (wcslen(property_xml) + 1);
1051     if (SUCCEEDED(hr = IStream_Write(stream, property_xml, size, NULL)))
1052         hr = IStream_Seek(stream, zero, SEEK_SET, NULL);
1053
1054     if (SUCCEEDED(hr))
1055         hr = d2d_factory_register_effect_from_stream(factory, effect_id, stream, bindings,
1056                 binding_count, effect_factory, builtin);
1057
1058     IStream_Release(stream);
1059     return hr;
1060 }
1061
1062 HRESULT d2d_factory_register_builtin_effect(struct d2d_factory *factory, REFCLSID effect_id,
1063         const WCHAR *property_xml, const D2D1_PROPERTY_BINDING *bindings, UINT32 binding_count,
1064         PD2D1_EFFECT_FACTORY effect_factory)
1065 {
1066     return d2d_factory_register_effect_from_string(factory, effect_id, property_xml, bindings,
1067             binding_count, effect_factory, TRUE);
1068 }
1069
1070 static HRESULT STDMETHODCALLTYPE d2d_factory_RegisterEffectFromString(ID2D1Factory3 *iface,
1071         REFCLSID effect_id, const WCHAR *property_xml, const D2D1_PROPERTY_BINDING *bindings,
1072         UINT32 binding_count, PD2D1_EFFECT_FACTORY effect_factory)
1073 {
1074     struct d2d_factory *factory = impl_from_ID2D1Factory3(iface);
1075
1076     TRACE("iface %p, effect_id %s, property_xml %s, bindings %p, binding_count %u, effect_factory %p.\n",
1077           iface, debugstr_guid(effect_id), debugstr_w(property_xml), bindings, binding_count, effect_factory);
1078
1079     d2d_factory_init_builtin_effects(factory);
1080
1081     return d2d_factory_register_effect_from_string(factory, effect_id, property_xml, bindings,
1082             binding_count, effect_factory, FALSE);
1083 }
1084
1085 static HRESULT STDMETHODCALLTYPE d2d_factory_UnregisterEffect(ID2D1Factory3 *iface, REFCLSID effect_id)
1086 {
1087     struct d2d_factory *factory = impl_from_ID2D1Factory3(iface);
1088     struct d2d_effect_registration *effect;
1089
1090     TRACE("iface %p, effect_id %s.\n", iface, debugstr_guid(effect_id));
1091
1092     d2d_factory_init_builtin_effects(factory);
1093
1094     LIST_FOR_EACH_ENTRY_REV(effect, &factory->effects, struct d2d_effect_registration, entry)
1095     {
1096         if (IsEqualGUID(effect_id, &effect->id))
1097         {
1098             if (effect->builtin) break;
1099             if (!--effect->registration_count)
1100             {
1101                 list_remove(&effect->entry);
1102                 d2d_effect_registration_cleanup(effect);
1103             }
1104             return S_OK;
1105         }
1106     }
1107
1108     return D2DERR_EFFECT_IS_NOT_REGISTERED;
1109 }
1110
1111 static HRESULT STDMETHODCALLTYPE d2d_factory_GetRegisteredEffects(ID2D1Factory3 *iface,
1112         CLSID *effects, UINT32 effect_count, UINT32 *returned, UINT32 *registered)
1113 {
1114     struct d2d_factory *factory = impl_from_ID2D1Factory3(iface);
1115     struct d2d_effect_registration *effect;
1116     UINT32 ret, reg;
1117
1118     TRACE("iface %p, effects %p, effect_count %u, returned %p, registered %p.\n",
1119             iface, effects, effect_count, returned, registered);
1120
1121     if (!returned) returned = &ret;
1122     if (!registered) registered = &reg;
1123
1124     *registered = 0;
1125     *returned = 0;
1126
1127     d2d_factory_init_builtin_effects(factory);
1128
1129     LIST_FOR_EACH_ENTRY(effect, &factory->effects, struct d2d_effect_registration, entry)
1130     {
1131         if (effects && effect_count)
1132         {
1133             *effects = effect->id;
1134             effects++;
1135             effect_count--;
1136             *returned += 1;
1137         }
1138
1139         *registered += 1;
1140     }
1141
1142     if (!effects) return S_OK;
1143     return *returned == *registered ? S_OK : D2DERR_INSUFFICIENT_BUFFER;
1144 }
1145
1146 static HRESULT STDMETHODCALLTYPE d2d_factory_GetEffectProperties(ID2D1Factory3 *iface,
1147         REFCLSID effect_id, ID2D1Properties **props)
1148 {
1149     FIXME("iface %p, effect_id %s, props %p stub!\n", iface, debugstr_guid(effect_id), props);
1150
1151     return E_NOTIMPL;
1152 }
1153
1154 static HRESULT STDMETHODCALLTYPE d2d_factory_ID2D1Factory2_CreateDevice(ID2D1Factory3 *iface, IDXGIDevice *dxgi_device,
1155         ID2D1Device1 **device)
1156 {
1157     TRACE("iface %p, dxgi_device %p, device %p.\n", iface, dxgi_device, device);
1158
1159     return d2d_factory_create_device(iface, dxgi_device, device);
1160 }
1161
1162 static HRESULT STDMETHODCALLTYPE d2d_factory_ID2D1Factory3_CreateDevice(ID2D1Factory3 *iface, IDXGIDevice *dxgi_device,
1163         ID2D1Device2 **device)
1164 {
1165     FIXME("iface %p, dxgi_device %p, device %p stub!\n", iface, dxgi_device, device);
1166
1167     return E_NOTIMPL;
1168 }
1169
1170 static const struct ID2D1Factory3Vtbl d2d_factory_vtbl =
1171 {
1172     d2d_factory_QueryInterface,
1173     d2d_factory_AddRef,
1174     d2d_factory_Release,
1175     d2d_factory_ReloadSystemMetrics,
1176     d2d_factory_GetDesktopDpi,
1177     d2d_factory_CreateRectangleGeometry,
1178     d2d_factory_CreateRoundedRectangleGeometry,
1179     d2d_factory_CreateEllipseGeometry,
1180     d2d_factory_CreateGeometryGroup,
1181     d2d_factory_CreateTransformedGeometry,
1182     d2d_factory_CreatePathGeometry,
1183     d2d_factory_CreateStrokeStyle,
1184     d2d_factory_CreateDrawingStateBlock,
1185     d2d_factory_CreateWicBitmapRenderTarget,
1186     d2d_factory_CreateHwndRenderTarget,
1187     d2d_factory_CreateDxgiSurfaceRenderTarget,
1188     d2d_factory_CreateDCRenderTarget,
1189     d2d_factory_CreateDevice,
1190     d2d_factory_CreateStrokeStyle1,
1191     d2d_factory_CreatePathGeometry1,
1192     d2d_factory_CreateDrawingStateBlock1,
1193     d2d_factory_CreateGdiMetafile,
1194     d2d_factory_RegisterEffectFromStream,
1195     d2d_factory_RegisterEffectFromString,
1196     d2d_factory_UnregisterEffect,
1197     d2d_factory_GetRegisteredEffects,
1198     d2d_factory_GetEffectProperties,
1199     d2d_factory_ID2D1Factory2_CreateDevice,
1200     d2d_factory_ID2D1Factory3_CreateDevice,
1201 };
1202
1203 static HRESULT STDMETHODCALLTYPE d2d_factory_mt_QueryInterface(ID2D1Multithread *iface, REFIID iid, void **out)
1204 {
1205     struct d2d_factory *factory = impl_from_ID2D1Multithread(iface);
1206     return d2d_factory_QueryInterface(&factory->ID2D1Factory3_iface, iid, out);
1207 }
1208
1209 static ULONG STDMETHODCALLTYPE d2d_factory_mt_AddRef(ID2D1Multithread *iface)
1210 {
1211     struct d2d_factory *factory = impl_from_ID2D1Multithread(iface);
1212     return d2d_factory_AddRef(&factory->ID2D1Factory3_iface);
1213 }
1214
1215 static ULONG STDMETHODCALLTYPE d2d_factory_mt_Release(ID2D1Multithread *iface)
1216 {
1217     struct d2d_factory *factory = impl_from_ID2D1Multithread(iface);
1218     return d2d_factory_Release(&factory->ID2D1Factory3_iface);
1219 }
1220
1221 static BOOL STDMETHODCALLTYPE d2d_factory_mt_GetMultithreadProtected(ID2D1Multithread *iface)
1222 {
1223     return TRUE;
1224 }
1225
1226 static void STDMETHODCALLTYPE d2d_factory_mt_Enter(ID2D1Multithread *iface)
1227 {
1228     struct d2d_factory *factory = impl_from_ID2D1Multithread(iface);
1229
1230     TRACE("%p.\n", iface);
1231
1232     EnterCriticalSection(&factory->cs);
1233 }
1234
1235 static void STDMETHODCALLTYPE d2d_factory_mt_Leave(ID2D1Multithread *iface)
1236 {
1237     struct d2d_factory *factory = impl_from_ID2D1Multithread(iface);
1238
1239     TRACE("%p.\n", iface);
1240
1241     LeaveCriticalSection(&factory->cs);
1242 }
1243
1244 static BOOL STDMETHODCALLTYPE d2d_factory_st_GetMultithreadProtected(ID2D1Multithread *iface)
1245 {
1246     return FALSE;
1247 }
1248
1249 static void STDMETHODCALLTYPE d2d_factory_st_Enter(ID2D1Multithread *iface)
1250 {
1251 }
1252
1253 static void STDMETHODCALLTYPE d2d_factory_st_Leave(ID2D1Multithread *iface)
1254 {
1255 }
1256
1257 static const struct ID2D1MultithreadVtbl d2d_factory_multithread_vtbl =
1258 {
1259     d2d_factory_mt_QueryInterface,
1260     d2d_factory_mt_AddRef,
1261     d2d_factory_mt_Release,
1262     d2d_factory_mt_GetMultithreadProtected,
1263     d2d_factory_mt_Enter,
1264     d2d_factory_mt_Leave,
1265 };
1266
1267 static const struct ID2D1MultithreadVtbl d2d_factory_multithread_noop_vtbl =
1268 {
1269     d2d_factory_mt_QueryInterface,
1270     d2d_factory_mt_AddRef,
1271     d2d_factory_mt_Release,
1272     d2d_factory_st_GetMultithreadProtected,
1273     d2d_factory_st_Enter,
1274     d2d_factory_st_Leave,
1275 };
1276
1277 static void d2d_factory_init(struct d2d_factory *factory, D2D1_FACTORY_TYPE factory_type,
1278         const D2D1_FACTORY_OPTIONS *factory_options)
1279 {
1280     if (factory_options && factory_options->debugLevel != D2D1_DEBUG_LEVEL_NONE)
1281         WARN("Ignoring debug level %#x.\n", factory_options->debugLevel);
1282
1283     factory->ID2D1Factory3_iface.lpVtbl = &d2d_factory_vtbl;
1284     factory->ID2D1Multithread_iface.lpVtbl = factory_type == D2D1_FACTORY_TYPE_SINGLE_THREADED ?
1285             &d2d_factory_multithread_noop_vtbl : &d2d_factory_multithread_vtbl;
1286     factory->factory_type = factory_type;
1287     factory->refcount = 1;
1288     d2d_factory_reload_sysmetrics(factory);
1289     list_init(&factory->effects);
1290     InitializeCriticalSection(&factory->cs);
1291     InitOnceInitialize(&factory->init_builtins);
1292 }
1293
1294 HRESULT WINAPI D2D1CreateFactory(D2D1_FACTORY_TYPE factory_type, REFIID iid,
1295         const D2D1_FACTORY_OPTIONS *factory_options, void **factory)
1296 {
1297     struct d2d_factory *object;
1298     HRESULT hr;
1299
1300     TRACE("factory_type %#x, iid %s, factory_options %p, factory %p.\n",
1301             factory_type, debugstr_guid(iid), factory_options, factory);
1302
1303     if (factory_type != D2D1_FACTORY_TYPE_SINGLE_THREADED &&
1304             factory_type != D2D1_FACTORY_TYPE_MULTI_THREADED)
1305     {
1306         return E_INVALIDARG;
1307     }
1308
1309     if (!(object = calloc(1, sizeof(*object))))
1310         return E_OUTOFMEMORY;
1311
1312     d2d_factory_init(object, factory_type, factory_options);
1313
1314     TRACE("Created factory %p.\n", object);
1315
1316     hr = ID2D1Factory3_QueryInterface(&object->ID2D1Factory3_iface, iid, factory);
1317     ID2D1Factory3_Release(&object->ID2D1Factory3_iface);
1318
1319     return hr;
1320 }
1321
1322 void WINAPI D2D1MakeRotateMatrix(float angle, D2D1_POINT_2F center, D2D1_MATRIX_3X2_F *matrix)
1323 {
1324     float theta, sin_theta, cos_theta;
1325
1326     TRACE("angle %.8e, center %s, matrix %p.\n", angle, debug_d2d_point_2f(&center), matrix);
1327
1328     theta = angle * (M_PI / 180.0f);
1329     sin_theta = sinf(theta);
1330     cos_theta = cosf(theta);
1331
1332     /* translate(center) * rotate(theta) * translate(-center) */
1333     matrix->_11 = cos_theta;
1334     matrix->_12 = sin_theta;
1335     matrix->_21 = -sin_theta;
1336     matrix->_22 = cos_theta;
1337     matrix->_31 = center.x - center.x * cos_theta + center.y * sin_theta;
1338     matrix->_32 = center.y - center.x * sin_theta - center.y * cos_theta;
1339 }
1340
1341 void WINAPI D2D1MakeSkewMatrix(float angle_x, float angle_y, D2D1_POINT_2F center, D2D1_MATRIX_3X2_F *matrix)
1342 {
1343     float tan_x, tan_y;
1344
1345     TRACE("angle_x %.8e, angle_y %.8e, center %s, matrix %p.\n", angle_x, angle_y, debug_d2d_point_2f(&center), matrix);
1346
1347     tan_x = tan(angle_x * (M_PI / 180.0f));
1348     tan_y = tan(angle_y * (M_PI / 180.0f));
1349
1350     /* translate(-center) * skew() * translate(center) */
1351     matrix->_11 = 1.0f;
1352     matrix->_12 = tan_y;
1353     matrix->_21 = tan_x;
1354     matrix->_22 = 1.0f;
1355     matrix->_31 = -tan_x * center.y;
1356     matrix->_32 = -tan_y * center.x;
1357 }
1358
1359 BOOL WINAPI D2D1IsMatrixInvertible(const D2D1_MATRIX_3X2_F *matrix)
1360 {
1361     TRACE("matrix %p.\n", matrix);
1362
1363     return (matrix->_11 * matrix->_22 - matrix->_21 * matrix->_12) != 0.0f;
1364 }
1365
1366 BOOL WINAPI D2D1InvertMatrix(D2D1_MATRIX_3X2_F *matrix)
1367 {
1368     D2D1_MATRIX_3X2_F m = *matrix;
1369
1370     TRACE("matrix %p.\n", matrix);
1371
1372     return d2d_matrix_invert(matrix, &m);
1373 }
1374
1375 HRESULT WINAPI D2D1CreateDevice(IDXGIDevice *dxgi_device,
1376         const D2D1_CREATION_PROPERTIES *properties, ID2D1Device **device)
1377 {
1378     D2D1_CREATION_PROPERTIES default_properties = {0};
1379     D2D1_FACTORY_OPTIONS factory_options;
1380     D2D1_FACTORY_TYPE factory_type;
1381     ID3D11Device *d3d_device;
1382     ID2D1Factory1 *factory;
1383     HRESULT hr;
1384
1385     TRACE("dxgi_device %p, properties %p, device %p.\n", dxgi_device, properties, device);
1386
1387     if (!properties)
1388     {
1389         if (SUCCEEDED(IDXGIDevice_QueryInterface(dxgi_device, &IID_ID3D11Device, (void **)&d3d_device)))
1390         {
1391             if (!(ID3D11Device_GetCreationFlags(d3d_device) & D3D11_CREATE_DEVICE_SINGLETHREADED))
1392                 default_properties.threadingMode = D2D1_THREADING_MODE_MULTI_THREADED;
1393             ID3D11Device_Release(d3d_device);
1394         }
1395         properties = &default_properties;
1396     }
1397
1398     switch (properties->threadingMode)
1399     {
1400     case D2D1_THREADING_MODE_SINGLE_THREADED:
1401         factory_type = D2D1_FACTORY_TYPE_SINGLE_THREADED;
1402         break;
1403     case D2D1_THREADING_MODE_MULTI_THREADED:
1404         factory_type = D2D1_FACTORY_TYPE_MULTI_THREADED;
1405         break;
1406     default:
1407         return E_INVALIDARG;
1408     }
1409
1410     factory_options.debugLevel = properties->debugLevel;
1411     if (FAILED(hr = D2D1CreateFactory(factory_type, &IID_ID2D1Factory1, &factory_options, (void **)&factory)))
1412         return hr;
1413
1414     hr = ID2D1Factory1_CreateDevice(factory, dxgi_device, device);
1415     ID2D1Factory1_Release(factory);
1416     return hr;
1417 }
1418
1419 void WINAPI D2D1SinCos(float angle, float *s, float *c)
1420 {
1421     TRACE("angle %.8e, s %p, c %p.\n", angle, s, c);
1422
1423     *s = sinf(angle);
1424     *c = cosf(angle);
1425 }
1426
1427 float WINAPI D2D1Tan(float angle)
1428 {
1429     TRACE("angle %.8e.\n", angle);
1430
1431     return tanf(angle);
1432 }
1433
1434 float WINAPI D2D1Vec3Length(float x, float y, float z)
1435 {
1436     TRACE("x %.8e, y %.8e, z %.8e.\n", x, y, z);
1437
1438     return sqrtf(x * x + y * y + z * z);
1439 }
1440
1441 /* See IEC 61966-2-1:1999; also described in the EXT_texture_sRGB OpenGL
1442  * extension, among others. */
1443 static float srgb_transfer_function(float x)
1444 {
1445     if (x <= 0.0f)
1446         return 0.0f;
1447     else if (x >= 1.0f)
1448         return 1.0f;
1449     else if (x <= 0.0031308f)
1450         return 12.92f * x;
1451     else
1452         return 1.055f * powf(x, 1.0f / 2.4f) - 0.055f;
1453 }
1454
1455 static float srgb_inverse_transfer_function(float x)
1456 {
1457     if (x <= 0.0f)
1458         return 0.0f;
1459     else if (x >= 1.0f)
1460         return 1.0f;
1461     else if (x <= 0.04045f)
1462         return x / 12.92f;
1463     else
1464         return powf((x + 0.055f) / 1.055f, 2.4f);
1465 }
1466
1467 D2D1_COLOR_F WINAPI D2D1ConvertColorSpace(D2D1_COLOR_SPACE src_colour_space,
1468         D2D1_COLOR_SPACE dst_colour_space, const D2D1_COLOR_F *colour)
1469 {
1470     D2D1_COLOR_F ret;
1471
1472     TRACE("src_colour_space %#x, dst_colour_space %#x, colour %s.\n",
1473             src_colour_space, dst_colour_space, debug_d2d_color_f(colour));
1474
1475     if (src_colour_space == D2D1_COLOR_SPACE_CUSTOM || dst_colour_space == D2D1_COLOR_SPACE_CUSTOM)
1476     {
1477         ret.r = 0.0f;
1478         ret.g = 0.0f;
1479         ret.b = 0.0f;
1480         ret.a = 0.0f;
1481
1482         return ret;
1483     }
1484
1485     if (src_colour_space == dst_colour_space)
1486         return *colour;
1487
1488     if (src_colour_space == D2D1_COLOR_SPACE_SRGB && dst_colour_space == D2D1_COLOR_SPACE_SCRGB)
1489     {
1490         ret.r = srgb_inverse_transfer_function(colour->r);
1491         ret.g = srgb_inverse_transfer_function(colour->g);
1492         ret.b = srgb_inverse_transfer_function(colour->b);
1493         ret.a = colour->a;
1494
1495         return ret;
1496     }
1497
1498     if (src_colour_space == D2D1_COLOR_SPACE_SCRGB && dst_colour_space == D2D1_COLOR_SPACE_SRGB)
1499     {
1500         ret.r = srgb_transfer_function(colour->r);
1501         ret.g = srgb_transfer_function(colour->g);
1502         ret.b = srgb_transfer_function(colour->b);
1503         ret.a = colour->a;
1504
1505         return ret;
1506     }
1507
1508     FIXME("Unhandled conversion from source colour space %#x to destination colour space %#x.\n",
1509             src_colour_space, dst_colour_space);
1510     ret.r = 0.0f;
1511     ret.g = 0.0f;
1512     ret.b = 0.0f;
1513     ret.a = 0.0f;
1514
1515     return ret;
1516 }
1517
1518 static bool get_config_key_u32(HKEY default_key, HKEY application_key, const char *name, uint32_t *value)
1519 {
1520     DWORD type, size;
1521     uint32_t data;
1522
1523     size = sizeof(data);
1524     if (application_key && !RegQueryValueExA(application_key,
1525             name, 0, &type, (BYTE *)&data, &size) && type == REG_DWORD)
1526         goto success;
1527
1528     size = sizeof(data);
1529     if (default_key && !RegQueryValueExA(default_key,
1530             name, 0, &type, (BYTE *)&data, &size) && type == REG_DWORD)
1531         goto success;
1532
1533     return false;
1534
1535 success:
1536     *value = data;
1537     return true;
1538 }
1539
1540 static void d2d_settings_init(void)
1541 {
1542     HKEY default_key, tmp_key, application_key = NULL;
1543     char buffer[MAX_PATH + 10];
1544     DWORD len;
1545
1546     if (RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\Direct2D", &default_key))
1547         default_key = NULL;
1548
1549     len = GetModuleFileNameA(0, buffer, MAX_PATH);
1550     if (len && len < MAX_PATH)
1551     {
1552         char *p, *appname = buffer;
1553
1554         if ((p = strrchr(appname, '/')))
1555             appname = p + 1;
1556         if ((p = strrchr(appname, '\\')))
1557             appname = p + 1;
1558         strcat(appname, "\\Direct2D");
1559
1560         if (!RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\AppDefaults", &tmp_key))
1561         {
1562             if (RegOpenKeyA(tmp_key, appname, &application_key))
1563                 application_key = NULL;
1564             RegCloseKey(tmp_key);
1565         }
1566     }
1567
1568     if (!default_key && !application_key)
1569         return;
1570
1571     if (get_config_key_u32(default_key, application_key, "max_version_factory", &d2d_settings.max_version_factory))
1572         ERR_(winediag)("Limiting maximum Direct2D factory version to %#x.\n", d2d_settings.max_version_factory);
1573
1574     if (application_key)
1575         RegCloseKey(application_key);
1576     if (default_key)
1577         RegCloseKey(default_key);
1578 }
1579
1580 BOOL WINAPI DllMain(HINSTANCE inst, DWORD reason, void *reserved)
1581 {
1582     if (reason == DLL_PROCESS_ATTACH)
1583         d2d_settings_init();
1584     return TRUE;
1585 }