dlls/dwrite/main.c

   1 /*
   2  *    DWrite
   3  *
   4  * Copyright 2012 Nikolay Sivov for CodeWeavers
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #define COBJMACROS
  22
  23 #include <stdarg.h>
  24 #include <math.h>
  25
  26 #include "windef.h"
  27 #include "winbase.h"
  28 #include "winuser.h"
  29
  30 #include "initguid.h"
  31
  32 #include "dwrite_private.h"
  33 #include "wine/debug.h"
  34
  35 WINE_DEFAULT_DEBUG_CHANNEL(dwrite);
  36
  37 static IDWriteFactory5 *shared_factory;
  38 static void release_shared_factory(IDWriteFactory5*);
  39
  40 BOOL WINAPI DllMain(HINSTANCE hinstDLL, DWORD reason, LPVOID reserved)
  41 {
  42     switch (reason)
  43     {
  44     case DLL_PROCESS_ATTACH:
  45         DisableThreadLibraryCalls( hinstDLL );
  46         init_freetype();
  47         init_local_fontfile_loader();
  48         break;
  49     case DLL_PROCESS_DETACH:
  50         if (reserved) break;
  51         release_shared_factory(shared_factory);
  52         release_freetype();
  53     }
  54     return TRUE;
  55 }
  56
  57 struct renderingparams {
  58     IDWriteRenderingParams3 IDWriteRenderingParams3_iface;
  59     LONG ref;
  60
  61     FLOAT gamma;
  62     FLOAT contrast;
  63     FLOAT grayscalecontrast;
  64     FLOAT cleartype_level;
  65     DWRITE_PIXEL_GEOMETRY geometry;
  66     DWRITE_RENDERING_MODE1 mode;
  67     DWRITE_GRID_FIT_MODE gridfit;
  68 };
  69
  70 static inline struct renderingparams *impl_from_IDWriteRenderingParams3(IDWriteRenderingParams3 *iface)
  71 {
  72     return CONTAINING_RECORD(iface, struct renderingparams, IDWriteRenderingParams3_iface);
  73 }
  74
  75 static HRESULT WINAPI renderingparams_QueryInterface(IDWriteRenderingParams3 *iface, REFIID riid, void **obj)
  76 {
  77     struct renderingparams *This = impl_from_IDWriteRenderingParams3(iface);
  78
  79     TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), obj);
  80
  81     if (IsEqualIID(riid, &IID_IDWriteRenderingParams3) ||
  82         IsEqualIID(riid, &IID_IDWriteRenderingParams2) ||
  83         IsEqualIID(riid, &IID_IDWriteRenderingParams1) ||
  84         IsEqualIID(riid, &IID_IDWriteRenderingParams) ||
  85         IsEqualIID(riid, &IID_IUnknown))
  86     {
  87         *obj = iface;
  88         IDWriteRenderingParams3_AddRef(iface);
  89         return S_OK;
  90     }
  91
  92     *obj = NULL;
  93
  94     return E_NOINTERFACE;
  95 }
  96
  97 static ULONG WINAPI renderingparams_AddRef(IDWriteRenderingParams3 *iface)
  98 {
  99     struct renderingparams *This = impl_from_IDWriteRenderingParams3(iface);
 100     ULONG ref = InterlockedIncrement(&This->ref);
 101     TRACE("(%p)->(%d)\n", This, ref);
 102     return ref;
 103 }
 104
 105 static ULONG WINAPI renderingparams_Release(IDWriteRenderingParams3 *iface)
 106 {
 107     struct renderingparams *This = impl_from_IDWriteRenderingParams3(iface);
 108     ULONG ref = InterlockedDecrement(&This->ref);
 109
 110     TRACE("(%p)->(%d)\n", This, ref);
 111
 112     if (!ref)
 113         heap_free(This);
 114
 115     return ref;
 116 }
 117
 118 static FLOAT WINAPI renderingparams_GetGamma(IDWriteRenderingParams3 *iface)
 119 {
 120     struct renderingparams *This = impl_from_IDWriteRenderingParams3(iface);
 121     TRACE("(%p)\n", This);
 122     return This->gamma;
 123 }
 124
 125 static FLOAT WINAPI renderingparams_GetEnhancedContrast(IDWriteRenderingParams3 *iface)
 126 {
 127     struct renderingparams *This = impl_from_IDWriteRenderingParams3(iface);
 128     TRACE("(%p)\n", This);
 129     return This->contrast;
 130 }
 131
 132 static FLOAT WINAPI renderingparams_GetClearTypeLevel(IDWriteRenderingParams3 *iface)
 133 {
 134     struct renderingparams *This = impl_from_IDWriteRenderingParams3(iface);
 135     TRACE("(%p)\n", This);
 136     return This->cleartype_level;
 137 }
 138
 139 static DWRITE_PIXEL_GEOMETRY WINAPI renderingparams_GetPixelGeometry(IDWriteRenderingParams3 *iface)
 140 {
 141     struct renderingparams *This = impl_from_IDWriteRenderingParams3(iface);
 142     TRACE("(%p)\n", This);
 143     return This->geometry;
 144 }
 145
 146 static DWRITE_RENDERING_MODE rendering_mode_from_mode1(DWRITE_RENDERING_MODE1 mode)
 147 {
 148     static const DWRITE_RENDERING_MODE rendering_modes[] = {
 149         DWRITE_RENDERING_MODE_DEFAULT,           /* DWRITE_RENDERING_MODE1_DEFAULT */
 150         DWRITE_RENDERING_MODE_ALIASED,           /* DWRITE_RENDERING_MODE1_ALIASED */
 151         DWRITE_RENDERING_MODE_GDI_CLASSIC,       /* DWRITE_RENDERING_MODE1_GDI_CLASSIC */
 152         DWRITE_RENDERING_MODE_GDI_NATURAL,       /* DWRITE_RENDERING_MODE1_GDI_NATURAL */
 153         DWRITE_RENDERING_MODE_NATURAL,           /* DWRITE_RENDERING_MODE1_NATURAL */
 154         DWRITE_RENDERING_MODE_NATURAL_SYMMETRIC, /* DWRITE_RENDERING_MODE1_NATURAL_SYMMETRIC */
 155         DWRITE_RENDERING_MODE_OUTLINE,           /* DWRITE_RENDERING_MODE1_OUTLINE */
 156         DWRITE_RENDERING_MODE_NATURAL_SYMMETRIC, /* DWRITE_RENDERING_MODE1_NATURAL_SYMMETRIC_DOWNSAMPLED */
 157     };
 158
 159     return rendering_modes[mode];
 160 }
 161
 162 static DWRITE_RENDERING_MODE WINAPI renderingparams_GetRenderingMode(IDWriteRenderingParams3 *iface)
 163 {
 164     struct renderingparams *This = impl_from_IDWriteRenderingParams3(iface);
 165
 166     TRACE("(%p)\n", This);
 167
 168     return rendering_mode_from_mode1(This->mode);
 169 }
 170
 171 static FLOAT WINAPI renderingparams1_GetGrayscaleEnhancedContrast(IDWriteRenderingParams3 *iface)
 172 {
 173     struct renderingparams *This = impl_from_IDWriteRenderingParams3(iface);
 174     TRACE("(%p)\n", This);
 175     return This->grayscalecontrast;
 176 }
 177
 178 static DWRITE_GRID_FIT_MODE WINAPI renderingparams2_GetGridFitMode(IDWriteRenderingParams3 *iface)
 179 {
 180     struct renderingparams *This = impl_from_IDWriteRenderingParams3(iface);
 181     TRACE("(%p)\n", This);
 182     return This->gridfit;
 183 }
 184
 185 static DWRITE_RENDERING_MODE1 WINAPI renderingparams3_GetRenderingMode1(IDWriteRenderingParams3 *iface)
 186 {
 187     struct renderingparams *This = impl_from_IDWriteRenderingParams3(iface);
 188     TRACE("(%p)\n", This);
 189     return This->mode;
 190 }
 191
 192 static const struct IDWriteRenderingParams3Vtbl renderingparamsvtbl = {
 193     renderingparams_QueryInterface,
 194     renderingparams_AddRef,
 195     renderingparams_Release,
 196     renderingparams_GetGamma,
 197     renderingparams_GetEnhancedContrast,
 198     renderingparams_GetClearTypeLevel,
 199     renderingparams_GetPixelGeometry,
 200     renderingparams_GetRenderingMode,
 201     renderingparams1_GetGrayscaleEnhancedContrast,
 202     renderingparams2_GetGridFitMode,
 203     renderingparams3_GetRenderingMode1
 204 };
 205
 206 static HRESULT create_renderingparams(FLOAT gamma, FLOAT contrast, FLOAT grayscalecontrast, FLOAT cleartype_level,
 207         DWRITE_PIXEL_GEOMETRY geometry, DWRITE_RENDERING_MODE1 mode, DWRITE_GRID_FIT_MODE gridfit,
 208         IDWriteRenderingParams3 **params)
 209 {
 210     struct renderingparams *This;
 211
 212     *params = NULL;
 213
 214     if (gamma <= 0.0f || contrast < 0.0f || grayscalecontrast < 0.0f || cleartype_level < 0.0f)
 215         return E_INVALIDARG;
 216
 217     if ((UINT32)gridfit > DWRITE_GRID_FIT_MODE_ENABLED || (UINT32)geometry > DWRITE_PIXEL_GEOMETRY_BGR)
 218         return E_INVALIDARG;
 219
 220     This = heap_alloc(sizeof(struct renderingparams));
 221     if (!This) return E_OUTOFMEMORY;
 222
 223     This->IDWriteRenderingParams3_iface.lpVtbl = &renderingparamsvtbl;
 224     This->ref = 1;
 225
 226     This->gamma = gamma;
 227     This->contrast = contrast;
 228     This->grayscalecontrast = grayscalecontrast;
 229     This->cleartype_level = cleartype_level;
 230     This->geometry = geometry;
 231     This->mode = mode;
 232     This->gridfit = gridfit;
 233
 234     *params = &This->IDWriteRenderingParams3_iface;
 235
 236     return S_OK;
 237 }
 238
 239 struct localizedpair {
 240     WCHAR *locale;
 241     WCHAR *string;
 242 };
 243
 244 struct localizedstrings {
 245     IDWriteLocalizedStrings IDWriteLocalizedStrings_iface;
 246     LONG ref;
 247
 248     struct localizedpair *data;
 249     UINT32 count;
 250     UINT32 alloc;
 251 };
 252
 253 static inline struct localizedstrings *impl_from_IDWriteLocalizedStrings(IDWriteLocalizedStrings *iface)
 254 {
 255     return CONTAINING_RECORD(iface, struct localizedstrings, IDWriteLocalizedStrings_iface);
 256 }
 257
 258 static HRESULT WINAPI localizedstrings_QueryInterface(IDWriteLocalizedStrings *iface, REFIID riid, void **obj)
 259 {
 260     struct localizedstrings *This = impl_from_IDWriteLocalizedStrings(iface);
 261
 262     TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), obj);
 263
 264     if (IsEqualIID(riid, &IID_IUnknown) || IsEqualIID(riid, &IID_IDWriteLocalizedStrings))
 265     {
 266         *obj = iface;
 267         IDWriteLocalizedStrings_AddRef(iface);
 268         return S_OK;
 269     }
 270
 271     *obj = NULL;
 272
 273     return E_NOINTERFACE;
 274 }
 275
 276 static ULONG WINAPI localizedstrings_AddRef(IDWriteLocalizedStrings *iface)
 277 {
 278     struct localizedstrings *This = impl_from_IDWriteLocalizedStrings(iface);
 279     ULONG ref = InterlockedIncrement(&This->ref);
 280     TRACE("(%p)->(%d)\n", This, ref);
 281     return ref;
 282 }
 283
 284 static ULONG WINAPI localizedstrings_Release(IDWriteLocalizedStrings *iface)
 285 {
 286     struct localizedstrings *This = impl_from_IDWriteLocalizedStrings(iface);
 287     ULONG ref = InterlockedDecrement(&This->ref);
 288
 289     TRACE("(%p)->(%d)\n", This, ref);
 290
 291     if (!ref) {
 292         unsigned int i;
 293
 294         for (i = 0; i < This->count; i++) {
 295             heap_free(This->data[i].locale);
 296             heap_free(This->data[i].string);
 297         }
 298
 299         heap_free(This->data);
 300         heap_free(This);
 301     }
 302
 303     return ref;
 304 }
 305
 306 static UINT32 WINAPI localizedstrings_GetCount(IDWriteLocalizedStrings *iface)
 307 {
 308     struct localizedstrings *This = impl_from_IDWriteLocalizedStrings(iface);
 309     TRACE("(%p)\n", This);
 310     return This->count;
 311 }
 312
 313 static HRESULT WINAPI localizedstrings_FindLocaleName(IDWriteLocalizedStrings *iface,
 314     WCHAR const *locale_name, UINT32 *index, BOOL *exists)
 315 {
 316     struct localizedstrings *This = impl_from_IDWriteLocalizedStrings(iface);
 317     UINT32 i;
 318
 319     TRACE("(%p)->(%s %p %p)\n", This, debugstr_w(locale_name), index, exists);
 320
 321     *exists = FALSE;
 322     *index = ~0;
 323
 324     for (i = 0; i < This->count; i++) {
 325         if (!strcmpiW(This->data[i].locale, locale_name)) {
 326             *exists = TRUE;
 327             *index = i;
 328             break;
 329         }
 330     }
 331
 332     return S_OK;
 333 }
 334
 335 static HRESULT WINAPI localizedstrings_GetLocaleNameLength(IDWriteLocalizedStrings *iface, UINT32 index, UINT32 *length)
 336 {
 337     struct localizedstrings *This = impl_from_IDWriteLocalizedStrings(iface);
 338
 339     TRACE("(%p)->(%u %p)\n", This, index, length);
 340
 341     if (index >= This->count) {
 342         *length = (UINT32)-1;
 343         return E_FAIL;
 344     }
 345
 346     *length = strlenW(This->data[index].locale);
 347     return S_OK;
 348 }
 349
 350 static HRESULT WINAPI localizedstrings_GetLocaleName(IDWriteLocalizedStrings *iface, UINT32 index, WCHAR *buffer, UINT32 size)
 351 {
 352     struct localizedstrings *This = impl_from_IDWriteLocalizedStrings(iface);
 353
 354     TRACE("(%p)->(%u %p %u)\n", This, index, buffer, size);
 355
 356     if (index >= This->count) {
 357         if (buffer) *buffer = 0;
 358         return E_FAIL;
 359     }
 360
 361     if (size < strlenW(This->data[index].locale)+1) {
 362         if (buffer) *buffer = 0;
 363         return E_NOT_SUFFICIENT_BUFFER;
 364     }
 365
 366     strcpyW(buffer, This->data[index].locale);
 367     return S_OK;
 368 }
 369
 370 static HRESULT WINAPI localizedstrings_GetStringLength(IDWriteLocalizedStrings *iface, UINT32 index, UINT32 *length)
 371 {
 372     struct localizedstrings *This = impl_from_IDWriteLocalizedStrings(iface);
 373
 374     TRACE("(%p)->(%u %p)\n", This, index, length);
 375
 376     if (index >= This->count) {
 377         *length = (UINT32)-1;
 378         return E_FAIL;
 379     }
 380
 381     *length = strlenW(This->data[index].string);
 382     return S_OK;
 383 }
 384
 385 static HRESULT WINAPI localizedstrings_GetString(IDWriteLocalizedStrings *iface, UINT32 index, WCHAR *buffer, UINT32 size)
 386 {
 387     struct localizedstrings *This = impl_from_IDWriteLocalizedStrings(iface);
 388
 389     TRACE("(%p)->(%u %p %u)\n", This, index, buffer, size);
 390
 391     if (index >= This->count) {
 392         if (buffer) *buffer = 0;
 393         return E_FAIL;
 394     }
 395
 396     if (size < strlenW(This->data[index].string)+1) {
 397         if (buffer) *buffer = 0;
 398         return E_NOT_SUFFICIENT_BUFFER;
 399     }
 400
 401     strcpyW(buffer, This->data[index].string);
 402     return S_OK;
 403 }
 404
 405 static const IDWriteLocalizedStringsVtbl localizedstringsvtbl = {
 406     localizedstrings_QueryInterface,
 407     localizedstrings_AddRef,
 408     localizedstrings_Release,
 409     localizedstrings_GetCount,
 410     localizedstrings_FindLocaleName,
 411     localizedstrings_GetLocaleNameLength,
 412     localizedstrings_GetLocaleName,
 413     localizedstrings_GetStringLength,
 414     localizedstrings_GetString
 415 };
 416
 417 HRESULT create_localizedstrings(IDWriteLocalizedStrings **strings)
 418 {
 419     struct localizedstrings *This;
 420
 421     *strings = NULL;
 422
 423     This = heap_alloc(sizeof(struct localizedstrings));
 424     if (!This) return E_OUTOFMEMORY;
 425
 426     This->IDWriteLocalizedStrings_iface.lpVtbl = &localizedstringsvtbl;
 427     This->ref = 1;
 428     This->count = 0;
 429     This->data = heap_alloc_zero(sizeof(struct localizedpair));
 430     if (!This->data) {
 431         heap_free(This);
 432         return E_OUTOFMEMORY;
 433     }
 434     This->alloc = 1;
 435
 436     *strings = &This->IDWriteLocalizedStrings_iface;
 437
 438     return S_OK;
 439 }
 440
 441 HRESULT add_localizedstring(IDWriteLocalizedStrings *iface, const WCHAR *locale, const WCHAR *string)
 442 {
 443     struct localizedstrings *This = impl_from_IDWriteLocalizedStrings(iface);
 444     UINT32 i;
 445
 446     /* make sure there's no duplicates */
 447     for (i = 0; i < This->count; i++)
 448         if (!strcmpW(This->data[i].locale, locale))
 449             return S_OK;
 450
 451     if (This->count == This->alloc) {
 452         void *ptr;
 453
 454         ptr = heap_realloc(This->data, 2*This->alloc*sizeof(struct localizedpair));
 455         if (!ptr)
 456             return E_OUTOFMEMORY;
 457
 458         This->alloc *= 2;
 459         This->data = ptr;
 460     }
 461
 462     This->data[This->count].locale = heap_strdupW(locale);
 463     This->data[This->count].string = heap_strdupW(string);
 464     if (!This->data[This->count].locale || !This->data[This->count].string) {
 465         heap_free(This->data[This->count].locale);
 466         heap_free(This->data[This->count].string);
 467         return E_OUTOFMEMORY;
 468     }
 469
 470     This->count++;
 471
 472     return S_OK;
 473 }
 474
 475 HRESULT clone_localizedstring(IDWriteLocalizedStrings *iface, IDWriteLocalizedStrings **ret)
 476 {
 477     struct localizedstrings *strings, *strings_clone;
 478     int i;
 479
 480     *ret = NULL;
 481
 482     if (!iface)
 483         return S_FALSE;
 484
 485     strings = impl_from_IDWriteLocalizedStrings(iface);
 486     strings_clone = heap_alloc(sizeof(struct localizedstrings));
 487     if (!strings_clone) return E_OUTOFMEMORY;
 488
 489     strings_clone->IDWriteLocalizedStrings_iface.lpVtbl = &localizedstringsvtbl;
 490     strings_clone->ref = 1;
 491     strings_clone->count = strings->count;
 492     strings_clone->data = heap_alloc(sizeof(struct localizedpair) * strings_clone->count);
 493     if (!strings_clone->data) {
 494         heap_free(strings_clone);
 495         return E_OUTOFMEMORY;
 496     }
 497     for (i = 0; i < strings_clone->count; i++)
 498     {
 499         strings_clone->data[i].locale = heap_strdupW(strings->data[i].locale);
 500         strings_clone->data[i].string = heap_strdupW(strings->data[i].string);
 501     }
 502     strings_clone->alloc = strings_clone->count;
 503
 504     *ret = &strings_clone->IDWriteLocalizedStrings_iface;
 505
 506     return S_OK;
 507 }
 508
 509 void set_en_localizedstring(IDWriteLocalizedStrings *iface, const WCHAR *string)
 510 {
 511     static const WCHAR enusW[] = {'e','n','-','U','S',0};
 512     struct localizedstrings *This = impl_from_IDWriteLocalizedStrings(iface);
 513     UINT32 i;
 514
 515     for (i = 0; i < This->count; i++) {
 516         if (!strcmpiW(This->data[i].locale, enusW)) {
 517             heap_free(This->data[i].string);
 518             This->data[i].string = heap_strdupW(string);
 519             break;
 520         }
 521     }
 522 }
 523
 524 struct collectionloader
 525 {
 526     struct list entry;
 527     IDWriteFontCollectionLoader *loader;
 528 };
 529
 530 struct fileloader
 531 {
 532     struct list entry;
 533     struct list fontfaces;
 534     IDWriteFontFileLoader *loader;
 535 };
 536
 537 struct dwritefactory {
 538     IDWriteFactory5 IDWriteFactory5_iface;
 539     LONG ref;
 540
 541     IDWriteFontCollection1 *system_collection;
 542     IDWriteFontCollection1 *eudc_collection;
 543     IDWriteGdiInterop1 *gdiinterop;
 544     IDWriteFontFallback *fallback;
 545
 546     IDWriteFontFileLoader *localfontfileloader;
 547     struct list localfontfaces;
 548
 549     struct list collection_loaders;
 550     struct list file_loaders;
 551
 552     CRITICAL_SECTION cs;
 553 };
 554
 555 static inline struct dwritefactory *impl_from_IDWriteFactory5(IDWriteFactory5 *iface)
 556 {
 557     return CONTAINING_RECORD(iface, struct dwritefactory, IDWriteFactory5_iface);
 558 }
 559
 560 static void release_fontface_cache(struct list *fontfaces)
 561 {
 562     struct fontfacecached *fontface, *fontface2;
 563
 564     LIST_FOR_EACH_ENTRY_SAFE(fontface, fontface2, fontfaces, struct fontfacecached, entry) {
 565         list_remove(&fontface->entry);
 566         fontface_detach_from_cache(fontface->fontface);
 567         heap_free(fontface);
 568     }
 569 }
 570
 571 static void release_fileloader(struct fileloader *fileloader)
 572 {
 573     list_remove(&fileloader->entry);
 574     release_fontface_cache(&fileloader->fontfaces);
 575     IDWriteFontFileLoader_Release(fileloader->loader);
 576     heap_free(fileloader);
 577 }
 578
 579 static void release_dwritefactory(struct dwritefactory *factory)
 580 {
 581     struct fileloader *fileloader, *fileloader2;
 582     struct collectionloader *loader, *loader2;
 583
 584     EnterCriticalSection(&factory->cs);
 585     release_fontface_cache(&factory->localfontfaces);
 586     LeaveCriticalSection(&factory->cs);
 587
 588     LIST_FOR_EACH_ENTRY_SAFE(loader, loader2, &factory->collection_loaders, struct collectionloader, entry) {
 589         list_remove(&loader->entry);
 590         IDWriteFontCollectionLoader_Release(loader->loader);
 591         heap_free(loader);
 592     }
 593
 594     LIST_FOR_EACH_ENTRY_SAFE(fileloader, fileloader2, &factory->file_loaders, struct fileloader, entry)
 595         release_fileloader(fileloader);
 596
 597     if (factory->system_collection)
 598         IDWriteFontCollection1_Release(factory->system_collection);
 599     if (factory->eudc_collection)
 600         IDWriteFontCollection1_Release(factory->eudc_collection);
 601     if (factory->fallback)
 602         release_system_fontfallback(factory->fallback);
 603
 604     factory->cs.DebugInfo->Spare[0] = 0;
 605     DeleteCriticalSection(&factory->cs);
 606     heap_free(factory);
 607 }
 608
 609 static void release_shared_factory(IDWriteFactory5 *iface)
 610 {
 611     struct dwritefactory *factory;
 612     if (!iface) return;
 613     factory = impl_from_IDWriteFactory5(iface);
 614     release_dwritefactory(factory);
 615 }
 616
 617 static struct fileloader *factory_get_file_loader(struct dwritefactory *factory, IDWriteFontFileLoader *loader)
 618 {
 619     struct fileloader *entry, *found = NULL;
 620
 621     LIST_FOR_EACH_ENTRY(entry, &factory->file_loaders, struct fileloader, entry) {
 622         if (entry->loader == loader) {
 623             found = entry;
 624             break;
 625         }
 626     }
 627
 628     return found;
 629 }
 630
 631 static struct collectionloader *factory_get_collection_loader(struct dwritefactory *factory,
 632         IDWriteFontCollectionLoader *loader)
 633 {
 634     struct collectionloader *entry, *found = NULL;
 635
 636     LIST_FOR_EACH_ENTRY(entry, &factory->collection_loaders, struct collectionloader, entry) {
 637         if (entry->loader == loader) {
 638             found = entry;
 639             break;
 640         }
 641     }
 642
 643     return found;
 644 }
 645
 646 static IDWriteFontCollection1 *factory_get_system_collection(struct dwritefactory *factory)
 647 {
 648     IDWriteFontCollection1 *collection;
 649     HRESULT hr;
 650
 651     if (factory->system_collection) {
 652         IDWriteFontCollection1_AddRef(factory->system_collection);
 653         return factory->system_collection;
 654     }
 655
 656     if (FAILED(hr = get_system_fontcollection(&factory->IDWriteFactory5_iface, &collection))) {
 657         WARN("Failed to create system font collection, hr %#x.\n", hr);
 658         return NULL;
 659     }
 660
 661     if (InterlockedCompareExchangePointer((void **)&factory->system_collection, collection, NULL))
 662         IDWriteFontCollection1_Release(collection);
 663
 664     return factory->system_collection;
 665 }
 666
 667 static HRESULT WINAPI dwritefactory_QueryInterface(IDWriteFactory5 *iface, REFIID riid, void **obj)
 668 {
 669     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
 670
 671     TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), obj);
 672
 673     if (IsEqualIID(riid, &IID_IDWriteFactory5) ||
 674         IsEqualIID(riid, &IID_IDWriteFactory4) ||
 675         IsEqualIID(riid, &IID_IDWriteFactory3) ||
 676         IsEqualIID(riid, &IID_IDWriteFactory2) ||
 677         IsEqualIID(riid, &IID_IDWriteFactory1) ||
 678         IsEqualIID(riid, &IID_IDWriteFactory) ||
 679         IsEqualIID(riid, &IID_IUnknown))
 680    {
 681         *obj = iface;
 682         IDWriteFactory5_AddRef(iface);
 683         return S_OK;
 684     }
 685
 686     *obj = NULL;
 687
 688     return E_NOINTERFACE;
 689 }
 690
 691 static ULONG WINAPI dwritefactory_AddRef(IDWriteFactory5 *iface)
 692 {
 693     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
 694     ULONG ref = InterlockedIncrement(&This->ref);
 695     TRACE("(%p)->(%d)\n", This, ref);
 696     return ref;
 697 }
 698
 699 static ULONG WINAPI dwritefactory_Release(IDWriteFactory5 *iface)
 700 {
 701     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
 702     ULONG ref = InterlockedDecrement(&This->ref);
 703
 704     TRACE("(%p)->(%d)\n", This, ref);
 705
 706     if (!ref)
 707         release_dwritefactory(This);
 708
 709     return ref;
 710 }
 711
 712 static HRESULT WINAPI dwritefactory_GetSystemFontCollection(IDWriteFactory5 *iface,
 713     IDWriteFontCollection **collection, BOOL check_for_updates)
 714 {
 715     return IDWriteFactory5_GetSystemFontCollection(iface, FALSE, (IDWriteFontCollection1 **)collection,
 716             check_for_updates);
 717 }
 718
 719 static HRESULT WINAPI dwritefactory_CreateCustomFontCollection(IDWriteFactory5 *iface,
 720     IDWriteFontCollectionLoader *loader, void const *key, UINT32 key_size, IDWriteFontCollection **collection)
 721 {
 722     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
 723     IDWriteFontFileEnumerator *enumerator;
 724     struct collectionloader *found;
 725     HRESULT hr;
 726
 727     TRACE("(%p)->(%p %p %u %p)\n", This, loader, key, key_size, collection);
 728
 729     *collection = NULL;
 730
 731     if (!loader)
 732         return E_INVALIDARG;
 733
 734     found = factory_get_collection_loader(This, loader);
 735     if (!found)
 736         return E_INVALIDARG;
 737
 738     hr = IDWriteFontCollectionLoader_CreateEnumeratorFromKey(found->loader, (IDWriteFactory*)iface,
 739             key, key_size, &enumerator);
 740     if (FAILED(hr))
 741         return hr;
 742
 743     hr = create_font_collection(iface, enumerator, FALSE, (IDWriteFontCollection1**)collection);
 744     IDWriteFontFileEnumerator_Release(enumerator);
 745     return hr;
 746 }
 747
 748 static HRESULT WINAPI dwritefactory_RegisterFontCollectionLoader(IDWriteFactory5 *iface,
 749     IDWriteFontCollectionLoader *loader)
 750 {
 751     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
 752     struct collectionloader *entry;
 753
 754     TRACE("(%p)->(%p)\n", This, loader);
 755
 756     if (!loader)
 757         return E_INVALIDARG;
 758
 759     if (factory_get_collection_loader(This, loader))
 760         return DWRITE_E_ALREADYREGISTERED;
 761
 762     entry = heap_alloc(sizeof(*entry));
 763     if (!entry)
 764         return E_OUTOFMEMORY;
 765
 766     entry->loader = loader;
 767     IDWriteFontCollectionLoader_AddRef(loader);
 768     list_add_tail(&This->collection_loaders, &entry->entry);
 769
 770     return S_OK;
 771 }
 772
 773 static HRESULT WINAPI dwritefactory_UnregisterFontCollectionLoader(IDWriteFactory5 *iface,
 774     IDWriteFontCollectionLoader *loader)
 775 {
 776     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
 777     struct collectionloader *found;
 778
 779     TRACE("(%p)->(%p)\n", This, loader);
 780
 781     if (!loader)
 782         return E_INVALIDARG;
 783
 784     found = factory_get_collection_loader(This, loader);
 785     if (!found)
 786         return E_INVALIDARG;
 787
 788     IDWriteFontCollectionLoader_Release(found->loader);
 789     list_remove(&found->entry);
 790     heap_free(found);
 791
 792     return S_OK;
 793 }
 794
 795 static HRESULT WINAPI dwritefactory_CreateFontFileReference(IDWriteFactory5 *iface,
 796     WCHAR const *path, FILETIME const *writetime, IDWriteFontFile **font_file)
 797 {
 798     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
 799     UINT32 key_size;
 800     HRESULT hr;
 801     void *key;
 802
 803     TRACE("(%p)->(%s %p %p)\n", This, debugstr_w(path), writetime, font_file);
 804
 805     *font_file = NULL;
 806
 807     /* Get a reference key in local file loader format. */
 808     hr = get_local_refkey(path, writetime, &key, &key_size);
 809     if (FAILED(hr))
 810         return hr;
 811
 812     hr = create_font_file(This->localfontfileloader, key, key_size, font_file);
 813     heap_free(key);
 814
 815     return hr;
 816 }
 817
 818 static HRESULT WINAPI dwritefactory_CreateCustomFontFileReference(IDWriteFactory5 *iface,
 819     void const *reference_key, UINT32 key_size, IDWriteFontFileLoader *loader, IDWriteFontFile **font_file)
 820 {
 821     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
 822
 823     TRACE("(%p)->(%p %u %p %p)\n", This, reference_key, key_size, loader, font_file);
 824
 825     *font_file = NULL;
 826
 827     if (!loader || !(factory_get_file_loader(This, loader) || This->localfontfileloader == loader))
 828         return E_INVALIDARG;
 829
 830     return create_font_file(loader, reference_key, key_size, font_file);
 831 }
 832
 833 void factory_lock(IDWriteFactory5 *iface)
 834 {
 835     struct dwritefactory *factory = impl_from_IDWriteFactory5(iface);
 836     EnterCriticalSection(&factory->cs);
 837 }
 838
 839 void factory_unlock(IDWriteFactory5 *iface)
 840 {
 841     struct dwritefactory *factory = impl_from_IDWriteFactory5(iface);
 842     LeaveCriticalSection(&factory->cs);
 843 }
 844
 845 HRESULT factory_get_cached_fontface(IDWriteFactory5 *iface, IDWriteFontFile * const *font_files, UINT32 index,
 846         DWRITE_FONT_SIMULATIONS simulations, struct list **cached_list, REFIID riid, void **obj)
 847 {
 848     struct dwritefactory *factory = impl_from_IDWriteFactory5(iface);
 849     struct fontfacecached *cached;
 850     IDWriteFontFileLoader *loader;
 851     struct list *fontfaces;
 852     UINT32 key_size;
 853     const void *key;
 854     HRESULT hr;
 855
 856     *obj = NULL;
 857     *cached_list = NULL;
 858
 859     hr = IDWriteFontFile_GetReferenceKey(*font_files, &key, &key_size);
 860     if (FAILED(hr))
 861         return hr;
 862
 863     hr = IDWriteFontFile_GetLoader(*font_files, &loader);
 864     if (FAILED(hr))
 865         return hr;
 866
 867     if (loader == factory->localfontfileloader) {
 868         fontfaces = &factory->localfontfaces;
 869         IDWriteFontFileLoader_Release(loader);
 870     }
 871     else {
 872         struct fileloader *fileloader = factory_get_file_loader(factory, loader);
 873         IDWriteFontFileLoader_Release(loader);
 874         if (!fileloader)
 875             return E_INVALIDARG;
 876         fontfaces = &fileloader->fontfaces;
 877     }
 878
 879     *cached_list = fontfaces;
 880
 881     EnterCriticalSection(&factory->cs);
 882
 883     /* search through cache list */
 884     LIST_FOR_EACH_ENTRY(cached, fontfaces, struct fontfacecached, entry) {
 885         UINT32 cached_key_size, count = 1, cached_face_index;
 886         DWRITE_FONT_SIMULATIONS cached_simulations;
 887         const void *cached_key;
 888         IDWriteFontFile *file;
 889
 890         cached_face_index = IDWriteFontFace4_GetIndex(cached->fontface);
 891         cached_simulations = IDWriteFontFace4_GetSimulations(cached->fontface);
 892
 893         /* skip earlier */
 894         if (cached_face_index != index || cached_simulations != simulations)
 895             continue;
 896
 897         hr = IDWriteFontFace4_GetFiles(cached->fontface, &count, &file);
 898         if (FAILED(hr))
 899             break;
 900
 901         hr = IDWriteFontFile_GetReferenceKey(file, &cached_key, &cached_key_size);
 902         IDWriteFontFile_Release(file);
 903         if (FAILED(hr))
 904             break;
 905
 906         if (cached_key_size == key_size && !memcmp(cached_key, key, key_size)) {
 907             if (FAILED(hr = IDWriteFontFace4_QueryInterface(cached->fontface, riid, obj)))
 908                 WARN("Failed to get %s from fontface, hr %#x.\n", debugstr_guid(riid), hr);
 909
 910             TRACE("returning cached fontface %p\n", cached->fontface);
 911             break;
 912         }
 913     }
 914
 915     LeaveCriticalSection(&factory->cs);
 916
 917     return *obj ? S_OK : S_FALSE;
 918 }
 919
 920 struct fontfacecached *factory_cache_fontface(IDWriteFactory5 *iface, struct list *fontfaces,
 921         IDWriteFontFace4 *fontface)
 922 {
 923     struct dwritefactory *factory = impl_from_IDWriteFactory5(iface);
 924     struct fontfacecached *cached;
 925
 926     /* new cache entry */
 927     cached = heap_alloc(sizeof(*cached));
 928     if (!cached)
 929         return NULL;
 930
 931     cached->fontface = fontface;
 932     EnterCriticalSection(&factory->cs);
 933     list_add_tail(fontfaces, &cached->entry);
 934     LeaveCriticalSection(&factory->cs);
 935
 936     return cached;
 937 }
 938
 939 static HRESULT WINAPI dwritefactory_CreateFontFace(IDWriteFactory5 *iface, DWRITE_FONT_FACE_TYPE req_facetype,
 940     UINT32 files_number, IDWriteFontFile* const* font_files, UINT32 index, DWRITE_FONT_SIMULATIONS simulations,
 941     IDWriteFontFace **fontface)
 942 {
 943     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
 944     DWRITE_FONT_FILE_TYPE file_type;
 945     DWRITE_FONT_FACE_TYPE face_type;
 946     IDWriteFontFileStream *stream;
 947     struct fontface_desc desc;
 948     struct list *fontfaces;
 949     BOOL is_supported;
 950     UINT32 face_count;
 951     HRESULT hr;
 952
 953     TRACE("(%p)->(%d %u %p %u 0x%x %p)\n", This, req_facetype, files_number, font_files, index,
 954         simulations, fontface);
 955
 956     *fontface = NULL;
 957
 958     if (!is_face_type_supported(req_facetype))
 959         return E_INVALIDARG;
 960
 961     if (req_facetype != DWRITE_FONT_FACE_TYPE_OPENTYPE_COLLECTION && index)
 962         return E_INVALIDARG;
 963
 964     if (!is_simulation_valid(simulations))
 965         return E_INVALIDARG;
 966
 967     if (FAILED(hr = get_filestream_from_file(*font_files, &stream)))
 968         return hr;
 969
 970     /* check actual file/face type */
 971     is_supported = FALSE;
 972     face_type = DWRITE_FONT_FACE_TYPE_UNKNOWN;
 973     hr = opentype_analyze_font(stream, &is_supported, &file_type, &face_type, &face_count);
 974     if (FAILED(hr))
 975         goto failed;
 976
 977     if (!is_supported) {
 978         hr = E_FAIL;
 979         goto failed;
 980     }
 981
 982     if (face_type != req_facetype) {
 983         hr = DWRITE_E_FILEFORMAT;
 984         goto failed;
 985     }
 986
 987     hr = factory_get_cached_fontface(iface, font_files, index, simulations, &fontfaces,
 988             &IID_IDWriteFontFace, (void **)fontface);
 989     if (hr != S_FALSE)
 990         goto failed;
 991
 992     desc.factory = iface;
 993     desc.face_type = req_facetype;
 994     desc.files = font_files;
 995     desc.stream = stream;
 996     desc.files_number = files_number;
 997     desc.index = index;
 998     desc.simulations = simulations;
 999     desc.font_data = NULL;
1000     hr = create_fontface(&desc, fontfaces, (IDWriteFontFace4 **)fontface);
1001
1002 failed:
1003     IDWriteFontFileStream_Release(stream);
1004     return hr;
1005 }
1006
1007 static HRESULT WINAPI dwritefactory_CreateRenderingParams(IDWriteFactory5 *iface, IDWriteRenderingParams **params)
1008 {
1009     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1010     HMONITOR monitor;
1011     POINT pt;
1012
1013     TRACE("(%p)->(%p)\n", This, params);
1014
1015     pt.x = pt.y = 0;
1016     monitor = MonitorFromPoint(pt, MONITOR_DEFAULTTOPRIMARY);
1017     return IDWriteFactory5_CreateMonitorRenderingParams(iface, monitor, params);
1018 }
1019
1020 static HRESULT WINAPI dwritefactory_CreateMonitorRenderingParams(IDWriteFactory5 *iface, HMONITOR monitor,
1021     IDWriteRenderingParams **params)
1022 {
1023     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1024     IDWriteRenderingParams3 *params3;
1025     static int fixme_once = 0;
1026     HRESULT hr;
1027
1028     TRACE("(%p)->(%p %p)\n", This, monitor, params);
1029
1030     if (!fixme_once++)
1031         FIXME("(%p): monitor setting ignored\n", monitor);
1032
1033     /* FIXME: use actual per-monitor gamma factor */
1034     hr = IDWriteFactory5_CreateCustomRenderingParams(iface, 2.0f, 0.0f, 1.0f, 0.0f, DWRITE_PIXEL_GEOMETRY_FLAT,
1035         DWRITE_RENDERING_MODE1_DEFAULT, DWRITE_GRID_FIT_MODE_DEFAULT, &params3);
1036     *params = (IDWriteRenderingParams*)params3;
1037     return hr;
1038 }
1039
1040 static HRESULT WINAPI dwritefactory_CreateCustomRenderingParams(IDWriteFactory5 *iface, FLOAT gamma,
1041         FLOAT enhancedContrast, FLOAT cleartype_level, DWRITE_PIXEL_GEOMETRY geometry, DWRITE_RENDERING_MODE mode,
1042         IDWriteRenderingParams **params)
1043 {
1044     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1045     IDWriteRenderingParams3 *params3;
1046     HRESULT hr;
1047
1048     TRACE("(%p)->(%f %f %f %d %d %p)\n", This, gamma, enhancedContrast, cleartype_level, geometry, mode, params);
1049
1050     if ((UINT32)mode > DWRITE_RENDERING_MODE_OUTLINE) {
1051         *params = NULL;
1052         return E_INVALIDARG;
1053     }
1054
1055     hr = IDWriteFactory5_CreateCustomRenderingParams(iface, gamma, enhancedContrast, 1.0f, cleartype_level, geometry,
1056             (DWRITE_RENDERING_MODE1)mode, DWRITE_GRID_FIT_MODE_DEFAULT, &params3);
1057     *params = (IDWriteRenderingParams*)params3;
1058     return hr;
1059 }
1060
1061 static HRESULT WINAPI dwritefactory_RegisterFontFileLoader(IDWriteFactory5 *iface, IDWriteFontFileLoader *loader)
1062 {
1063     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1064     struct fileloader *entry;
1065
1066     TRACE("(%p)->(%p)\n", This, loader);
1067
1068     if (!loader)
1069         return E_INVALIDARG;
1070
1071     if (factory_get_file_loader(This, loader))
1072         return DWRITE_E_ALREADYREGISTERED;
1073
1074     entry = heap_alloc(sizeof(*entry));
1075     if (!entry)
1076         return E_OUTOFMEMORY;
1077
1078     entry->loader = loader;
1079     list_init(&entry->fontfaces);
1080     IDWriteFontFileLoader_AddRef(loader);
1081     list_add_tail(&This->file_loaders, &entry->entry);
1082
1083     return S_OK;
1084 }
1085
1086 static HRESULT WINAPI dwritefactory_UnregisterFontFileLoader(IDWriteFactory5 *iface, IDWriteFontFileLoader *loader)
1087 {
1088     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1089     struct fileloader *found;
1090
1091     TRACE("(%p)->(%p)\n", This, loader);
1092
1093     if (!loader)
1094         return E_INVALIDARG;
1095
1096     found = factory_get_file_loader(This, loader);
1097     if (!found)
1098         return E_INVALIDARG;
1099
1100     release_fileloader(found);
1101     return S_OK;
1102 }
1103
1104 static HRESULT WINAPI dwritefactory_CreateTextFormat(IDWriteFactory5 *iface, WCHAR const* family_name,
1105     IDWriteFontCollection *collection, DWRITE_FONT_WEIGHT weight, DWRITE_FONT_STYLE style,
1106     DWRITE_FONT_STRETCH stretch, FLOAT size, WCHAR const *locale, IDWriteTextFormat **format)
1107 {
1108     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1109     HRESULT hr;
1110
1111     TRACE("(%p)->(%s %p %d %d %d %f %s %p)\n", This, debugstr_w(family_name), collection, weight, style, stretch,
1112         size, debugstr_w(locale), format);
1113
1114     if (collection)
1115         IDWriteFontCollection_AddRef(collection);
1116     else {
1117         collection = (IDWriteFontCollection *)factory_get_system_collection(This);
1118         if (!collection) {
1119             *format = NULL;
1120             return E_FAIL;
1121         }
1122     }
1123
1124     hr = create_textformat(family_name, collection, weight, style, stretch, size, locale, format);
1125     IDWriteFontCollection_Release(collection);
1126     return hr;
1127 }
1128
1129 static HRESULT WINAPI dwritefactory_CreateTypography(IDWriteFactory5 *iface, IDWriteTypography **typography)
1130 {
1131     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1132     TRACE("(%p)->(%p)\n", This, typography);
1133     return create_typography(typography);
1134 }
1135
1136 static HRESULT WINAPI dwritefactory_GetGdiInterop(IDWriteFactory5 *iface, IDWriteGdiInterop **gdi_interop)
1137 {
1138     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1139     HRESULT hr = S_OK;
1140
1141     TRACE("(%p)->(%p)\n", This, gdi_interop);
1142
1143     if (This->gdiinterop)
1144         IDWriteGdiInterop1_AddRef(This->gdiinterop);
1145     else
1146         hr = create_gdiinterop(iface, &This->gdiinterop);
1147
1148     *gdi_interop = (IDWriteGdiInterop *)This->gdiinterop;
1149
1150     return hr;
1151 }
1152
1153 static HRESULT WINAPI dwritefactory_CreateTextLayout(IDWriteFactory5 *iface, WCHAR const* string,
1154     UINT32 length, IDWriteTextFormat *format, FLOAT max_width, FLOAT max_height, IDWriteTextLayout **layout)
1155 {
1156     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1157     struct textlayout_desc desc;
1158
1159     TRACE("(%p)->(%s:%u %p %f %f %p)\n", This, debugstr_wn(string, length), length, format, max_width, max_height, layout);
1160
1161     desc.factory = iface;
1162     desc.string = string;
1163     desc.length = length;
1164     desc.format = format;
1165     desc.max_width = max_width;
1166     desc.max_height = max_height;
1167     desc.is_gdi_compatible = FALSE;
1168     desc.ppdip = 1.0f;
1169     desc.transform = NULL;
1170     desc.use_gdi_natural = FALSE;
1171     return create_textlayout(&desc, layout);
1172 }
1173
1174 static HRESULT WINAPI dwritefactory_CreateGdiCompatibleTextLayout(IDWriteFactory5 *iface, WCHAR const* string,
1175     UINT32 length, IDWriteTextFormat *format, FLOAT max_width, FLOAT max_height, FLOAT pixels_per_dip,
1176     DWRITE_MATRIX const* transform, BOOL use_gdi_natural, IDWriteTextLayout **layout)
1177 {
1178     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1179     struct textlayout_desc desc;
1180
1181     TRACE("(%p)->(%s:%u %p %f %f %f %p %d %p)\n", This, debugstr_wn(string, length), length, format, max_width,
1182             max_height, pixels_per_dip, transform, use_gdi_natural, layout);
1183
1184     desc.factory = iface;
1185     desc.string = string;
1186     desc.length = length;
1187     desc.format = format;
1188     desc.max_width = max_width;
1189     desc.max_height = max_height;
1190     desc.is_gdi_compatible = TRUE;
1191     desc.ppdip = pixels_per_dip;
1192     desc.transform = transform;
1193     desc.use_gdi_natural = use_gdi_natural;
1194     return create_textlayout(&desc, layout);
1195 }
1196
1197 static HRESULT WINAPI dwritefactory_CreateEllipsisTrimmingSign(IDWriteFactory5 *iface, IDWriteTextFormat *format,
1198     IDWriteInlineObject **trimming_sign)
1199 {
1200     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1201     TRACE("(%p)->(%p %p)\n", This, format, trimming_sign);
1202     return create_trimmingsign(iface, format, trimming_sign);
1203 }
1204
1205 static HRESULT WINAPI dwritefactory_CreateTextAnalyzer(IDWriteFactory5 *iface, IDWriteTextAnalyzer **analyzer)
1206 {
1207     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1208
1209     TRACE("(%p)->(%p)\n", This, analyzer);
1210
1211     *analyzer = get_text_analyzer();
1212
1213     return S_OK;
1214 }
1215
1216 static HRESULT WINAPI dwritefactory_CreateNumberSubstitution(IDWriteFactory5 *iface,
1217         DWRITE_NUMBER_SUBSTITUTION_METHOD method, WCHAR const* locale, BOOL ignore_user_override,
1218         IDWriteNumberSubstitution **substitution)
1219 {
1220     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1221     TRACE("(%p)->(%d %s %d %p)\n", This, method, debugstr_w(locale), ignore_user_override, substitution);
1222     return create_numbersubstitution(method, locale, ignore_user_override, substitution);
1223 }
1224
1225 static HRESULT WINAPI dwritefactory_CreateGlyphRunAnalysis(IDWriteFactory5 *iface, DWRITE_GLYPH_RUN const *run,
1226     FLOAT ppdip, DWRITE_MATRIX const* transform, DWRITE_RENDERING_MODE rendering_mode,
1227     DWRITE_MEASURING_MODE measuring_mode, FLOAT originX, FLOAT originY, IDWriteGlyphRunAnalysis **analysis)
1228 {
1229     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1230     struct glyphrunanalysis_desc desc;
1231
1232     TRACE("(%p)->(%p %.2f %p %d %d %.2f %.2f %p)\n", This, run, ppdip, transform, rendering_mode,
1233         measuring_mode, originX, originY, analysis);
1234
1235     if (ppdip <= 0.0f) {
1236         *analysis = NULL;
1237         return E_INVALIDARG;
1238     }
1239
1240     desc.run = run;
1241     desc.ppdip = ppdip;
1242     desc.transform = transform;
1243     desc.rendering_mode = (DWRITE_RENDERING_MODE1)rendering_mode;
1244     desc.measuring_mode = measuring_mode;
1245     desc.gridfit_mode = DWRITE_GRID_FIT_MODE_DEFAULT;
1246     desc.aa_mode = DWRITE_TEXT_ANTIALIAS_MODE_CLEARTYPE;
1247     desc.origin_x = originX;
1248     desc.origin_y = originY;
1249     return create_glyphrunanalysis(&desc, analysis);
1250 }
1251
1252 static HRESULT WINAPI dwritefactory1_GetEudcFontCollection(IDWriteFactory5 *iface, IDWriteFontCollection **collection,
1253     BOOL check_for_updates)
1254 {
1255     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1256     HRESULT hr = S_OK;
1257
1258     TRACE("(%p)->(%p %d)\n", This, collection, check_for_updates);
1259
1260     if (check_for_updates)
1261         FIXME("checking for eudc updates not implemented\n");
1262
1263     if (This->eudc_collection)
1264         IDWriteFontCollection1_AddRef(This->eudc_collection);
1265     else {
1266         IDWriteFontCollection1 *eudc_collection;
1267
1268         if (FAILED(hr = get_eudc_fontcollection(iface, &eudc_collection))) {
1269             *collection = NULL;
1270             WARN("Failed to get EUDC collection, hr %#x.\n", hr);
1271             return hr;
1272         }
1273
1274         if (InterlockedCompareExchangePointer((void **)&This->eudc_collection, eudc_collection, NULL))
1275             IDWriteFontCollection1_Release(eudc_collection);
1276     }
1277
1278     *collection = (IDWriteFontCollection *)This->eudc_collection;
1279
1280     return hr;
1281 }
1282
1283 static HRESULT WINAPI dwritefactory1_CreateCustomRenderingParams(IDWriteFactory5 *iface, FLOAT gamma,
1284     FLOAT enhcontrast, FLOAT enhcontrast_grayscale, FLOAT cleartype_level, DWRITE_PIXEL_GEOMETRY geometry,
1285     DWRITE_RENDERING_MODE mode, IDWriteRenderingParams1** params)
1286 {
1287     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1288     IDWriteRenderingParams3 *params3;
1289     HRESULT hr;
1290
1291     TRACE("(%p)->(%.2f %.2f %.2f %.2f %d %d %p)\n", This, gamma, enhcontrast, enhcontrast_grayscale,
1292         cleartype_level, geometry, mode, params);
1293
1294     if ((UINT32)mode > DWRITE_RENDERING_MODE_OUTLINE) {
1295         *params = NULL;
1296         return E_INVALIDARG;
1297     }
1298
1299     hr = IDWriteFactory5_CreateCustomRenderingParams(iface, gamma, enhcontrast, enhcontrast_grayscale,
1300         cleartype_level, geometry, (DWRITE_RENDERING_MODE1)mode, DWRITE_GRID_FIT_MODE_DEFAULT, &params3);
1301     *params = (IDWriteRenderingParams1*)params3;
1302     return hr;
1303 }
1304
1305 static HRESULT WINAPI dwritefactory2_GetSystemFontFallback(IDWriteFactory5 *iface, IDWriteFontFallback **fallback)
1306 {
1307     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1308
1309     TRACE("(%p)->(%p)\n", This, fallback);
1310
1311     *fallback = NULL;
1312
1313     if (!This->fallback) {
1314         HRESULT hr = create_system_fontfallback(iface, &This->fallback);
1315         if (FAILED(hr))
1316             return hr;
1317     }
1318
1319     *fallback = This->fallback;
1320     IDWriteFontFallback_AddRef(*fallback);
1321     return S_OK;
1322 }
1323
1324 static HRESULT WINAPI dwritefactory2_CreateFontFallbackBuilder(IDWriteFactory5 *iface,
1325         IDWriteFontFallbackBuilder **fallbackbuilder)
1326 {
1327     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1328
1329     TRACE("(%p)->(%p)\n", This, fallbackbuilder);
1330
1331     return create_fontfallback_builder(iface, fallbackbuilder);
1332 }
1333
1334 static HRESULT WINAPI dwritefactory2_TranslateColorGlyphRun(IDWriteFactory5 *iface, FLOAT originX, FLOAT originY,
1335     const DWRITE_GLYPH_RUN *run, const DWRITE_GLYPH_RUN_DESCRIPTION *rundescr, DWRITE_MEASURING_MODE mode,
1336     const DWRITE_MATRIX *transform, UINT32 palette, IDWriteColorGlyphRunEnumerator **colorlayers)
1337 {
1338     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1339     TRACE("(%p)->(%.2f %.2f %p %p %d %p %u %p)\n", This, originX, originY, run, rundescr, mode,
1340         transform, palette, colorlayers);
1341     return create_colorglyphenum(originX, originY, run, rundescr, mode, transform, palette, colorlayers);
1342 }
1343
1344 static HRESULT WINAPI dwritefactory2_CreateCustomRenderingParams(IDWriteFactory5 *iface, FLOAT gamma, FLOAT contrast,
1345     FLOAT grayscalecontrast, FLOAT cleartype_level, DWRITE_PIXEL_GEOMETRY geometry, DWRITE_RENDERING_MODE mode,
1346     DWRITE_GRID_FIT_MODE gridfit, IDWriteRenderingParams2 **params)
1347 {
1348     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1349     IDWriteRenderingParams3 *params3;
1350     HRESULT hr;
1351
1352     TRACE("(%p)->(%.2f %.2f %.2f %.2f %d %d %d %p)\n", This, gamma, contrast, grayscalecontrast, cleartype_level,
1353         geometry, mode, gridfit, params);
1354
1355     if ((UINT32)mode > DWRITE_RENDERING_MODE_OUTLINE) {
1356         *params = NULL;
1357         return E_INVALIDARG;
1358     }
1359
1360     hr = IDWriteFactory5_CreateCustomRenderingParams(iface, gamma, contrast, grayscalecontrast,
1361         cleartype_level, geometry, (DWRITE_RENDERING_MODE1)mode, DWRITE_GRID_FIT_MODE_DEFAULT, &params3);
1362     *params = (IDWriteRenderingParams2*)params3;
1363     return hr;
1364 }
1365
1366 static HRESULT WINAPI dwritefactory2_CreateGlyphRunAnalysis(IDWriteFactory5 *iface, const DWRITE_GLYPH_RUN *run,
1367     const DWRITE_MATRIX *transform, DWRITE_RENDERING_MODE rendering_mode, DWRITE_MEASURING_MODE measuring_mode,
1368     DWRITE_GRID_FIT_MODE gridfit_mode, DWRITE_TEXT_ANTIALIAS_MODE aa_mode, FLOAT originX, FLOAT originY,
1369     IDWriteGlyphRunAnalysis **analysis)
1370 {
1371     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1372     struct glyphrunanalysis_desc desc;
1373
1374     TRACE("(%p)->(%p %p %d %d %d %d %.2f %.2f %p)\n", This, run, transform, rendering_mode, measuring_mode,
1375         gridfit_mode, aa_mode, originX, originY, analysis);
1376
1377     desc.run = run;
1378     desc.ppdip = 1.0f;
1379     desc.transform = transform;
1380     desc.rendering_mode = (DWRITE_RENDERING_MODE1)rendering_mode;
1381     desc.measuring_mode = measuring_mode;
1382     desc.gridfit_mode = gridfit_mode;
1383     desc.aa_mode = aa_mode;
1384     desc.origin_x = originX;
1385     desc.origin_y = originY;
1386     return create_glyphrunanalysis(&desc, analysis);
1387 }
1388
1389 static HRESULT WINAPI dwritefactory3_CreateGlyphRunAnalysis(IDWriteFactory5 *iface, DWRITE_GLYPH_RUN const *run,
1390     DWRITE_MATRIX const *transform, DWRITE_RENDERING_MODE1 rendering_mode, DWRITE_MEASURING_MODE measuring_mode,
1391     DWRITE_GRID_FIT_MODE gridfit_mode, DWRITE_TEXT_ANTIALIAS_MODE aa_mode, FLOAT originX, FLOAT originY,
1392     IDWriteGlyphRunAnalysis **analysis)
1393 {
1394     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1395     struct glyphrunanalysis_desc desc;
1396
1397     TRACE("(%p)->(%p %p %d %d %d %d %.2f %.2f %p)\n", This, run, transform, rendering_mode, measuring_mode,
1398         gridfit_mode, aa_mode, originX, originY, analysis);
1399
1400     desc.run = run;
1401     desc.ppdip = 1.0f;
1402     desc.transform = transform;
1403     desc.rendering_mode = rendering_mode;
1404     desc.measuring_mode = measuring_mode;
1405     desc.gridfit_mode = gridfit_mode;
1406     desc.aa_mode = aa_mode;
1407     desc.origin_x = originX;
1408     desc.origin_y = originY;
1409     return create_glyphrunanalysis(&desc, analysis);
1410 }
1411
1412 static HRESULT WINAPI dwritefactory3_CreateCustomRenderingParams(IDWriteFactory5 *iface, FLOAT gamma, FLOAT contrast,
1413         FLOAT grayscale_contrast, FLOAT cleartype_level, DWRITE_PIXEL_GEOMETRY pixel_geometry,
1414         DWRITE_RENDERING_MODE1 rendering_mode, DWRITE_GRID_FIT_MODE gridfit_mode, IDWriteRenderingParams3 **params)
1415 {
1416     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1417
1418     TRACE("(%p)->(%.2f %.2f %.2f %.2f %d %d %d %p)\n", This, gamma, contrast, grayscale_contrast, cleartype_level,
1419         pixel_geometry, rendering_mode, gridfit_mode, params);
1420
1421     return create_renderingparams(gamma, contrast, grayscale_contrast, cleartype_level, pixel_geometry, rendering_mode,
1422         gridfit_mode, params);
1423 }
1424
1425 static HRESULT WINAPI dwritefactory3_CreateFontFaceReference_(IDWriteFactory5 *iface, IDWriteFontFile *file,
1426         UINT32 index, DWRITE_FONT_SIMULATIONS simulations, IDWriteFontFaceReference **reference)
1427 {
1428     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1429
1430     TRACE("(%p)->(%p %u %x %p)\n", This, file, index, simulations, reference);
1431
1432     return create_fontfacereference(iface, file, index, simulations, reference);
1433 }
1434
1435 static HRESULT WINAPI dwritefactory3_CreateFontFaceReference(IDWriteFactory5 *iface, WCHAR const *path,
1436         FILETIME const *writetime, UINT32 index, DWRITE_FONT_SIMULATIONS simulations,
1437         IDWriteFontFaceReference **reference)
1438 {
1439     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1440     IDWriteFontFile *file;
1441     HRESULT hr;
1442
1443     TRACE("(%p)->(%s %p %u %x, %p)\n", This, debugstr_w(path), writetime, index, simulations, reference);
1444
1445     hr = IDWriteFactory5_CreateFontFileReference(iface, path, writetime, &file);
1446     if (FAILED(hr)) {
1447         *reference = NULL;
1448         return hr;
1449     }
1450
1451     hr = IDWriteFactory5_CreateFontFaceReference_(iface, file, index, simulations, reference);
1452     IDWriteFontFile_Release(file);
1453     return hr;
1454 }
1455
1456 static HRESULT WINAPI dwritefactory3_GetSystemFontSet(IDWriteFactory5 *iface, IDWriteFontSet **fontset)
1457 {
1458     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1459
1460     FIXME("(%p)->(%p): stub\n", This, fontset);
1461
1462     return E_NOTIMPL;
1463 }
1464
1465 static HRESULT WINAPI dwritefactory3_CreateFontSetBuilder(IDWriteFactory5 *iface, IDWriteFontSetBuilder **builder)
1466 {
1467     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1468
1469     FIXME("(%p)->(%p): stub\n", This, builder);
1470
1471     return E_NOTIMPL;
1472 }
1473
1474 static HRESULT WINAPI dwritefactory3_CreateFontCollectionFromFontSet(IDWriteFactory5 *iface, IDWriteFontSet *fontset,
1475     IDWriteFontCollection1 **collection)
1476 {
1477     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1478
1479     FIXME("(%p)->(%p %p): stub\n", This, fontset, collection);
1480
1481     return E_NOTIMPL;
1482 }
1483
1484 static HRESULT WINAPI dwritefactory3_GetSystemFontCollection(IDWriteFactory5 *iface, BOOL include_downloadable,
1485     IDWriteFontCollection1 **collection, BOOL check_for_updates)
1486 {
1487     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1488
1489     TRACE("(%p)->(%d %p %d)\n", This, include_downloadable, collection, check_for_updates);
1490
1491     if (include_downloadable)
1492         FIXME("remote fonts are not supported\n");
1493
1494     if (check_for_updates)
1495         FIXME("checking for system font updates not implemented\n");
1496
1497     *collection = factory_get_system_collection(This);
1498
1499     return *collection ? S_OK : E_FAIL;
1500 }
1501
1502 static HRESULT WINAPI dwritefactory3_GetFontDownloadQueue(IDWriteFactory5 *iface, IDWriteFontDownloadQueue **queue)
1503 {
1504     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1505
1506     FIXME("(%p)->(%p): stub\n", This, queue);
1507
1508     return E_NOTIMPL;
1509 }
1510
1511 static HRESULT WINAPI dwritefactory4_TranslateColorGlyphRun(IDWriteFactory5 *iface, D2D1_POINT_2F baseline_origin,
1512         DWRITE_GLYPH_RUN const *run, DWRITE_GLYPH_RUN_DESCRIPTION const *run_desc,
1513         DWRITE_GLYPH_IMAGE_FORMATS desired_formats, DWRITE_MEASURING_MODE measuring_mode, DWRITE_MATRIX const *transform,
1514         UINT32 palette, IDWriteColorGlyphRunEnumerator1 **layers)
1515 {
1516     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1517
1518     FIXME("(%p)->(%p %p %u %d %p %u %p): stub\n", This, run, run_desc, desired_formats, measuring_mode,
1519         transform, palette, layers);
1520
1521     return E_NOTIMPL;
1522 }
1523
1524 static HRESULT compute_glyph_origins(DWRITE_GLYPH_RUN const *run, DWRITE_MEASURING_MODE measuring_mode,
1525     D2D1_POINT_2F baseline_origin, DWRITE_MATRIX const *transform,  D2D1_POINT_2F *origins)
1526 {
1527     IDWriteFontFace1 *fontface1 = NULL;
1528     DWRITE_FONT_METRICS metrics;
1529     FLOAT rtl_factor;
1530     HRESULT hr;
1531     UINT32 i;
1532
1533     rtl_factor = run->bidiLevel & 1 ? -1.0f : 1.0f;
1534
1535     if (run->fontFace) {
1536         IDWriteFontFace_GetMetrics(run->fontFace, &metrics);
1537         if (FAILED(hr = IDWriteFontFace_QueryInterface(run->fontFace, &IID_IDWriteFontFace1, (void **)&fontface1)))
1538             WARN("Failed to get IDWriteFontFace1, %#x.\n", hr);
1539     }
1540
1541     for (i = 0; i < run->glyphCount; i++) {
1542         FLOAT advance;
1543
1544         /* Use nominal advances if not provided by caller. */
1545         if (run->glyphAdvances)
1546             advance = rtl_factor * run->glyphAdvances[i];
1547         else {
1548             INT32 a;
1549
1550             advance = 0.0f;
1551             switch (measuring_mode)
1552             {
1553             case DWRITE_MEASURING_MODE_NATURAL:
1554                 if (SUCCEEDED(IDWriteFontFace1_GetDesignGlyphAdvances(fontface1, 1, run->glyphIndices + i, &a,
1555                         run->isSideways)))
1556                     advance = rtl_factor * get_scaled_advance_width(a, run->fontEmSize, &metrics);
1557                 break;
1558             case DWRITE_MEASURING_MODE_GDI_CLASSIC:
1559             case DWRITE_MEASURING_MODE_GDI_NATURAL:
1560                 if (SUCCEEDED(IDWriteFontFace1_GetGdiCompatibleGlyphAdvances(fontface1, run->fontEmSize,
1561                         1.0f, transform, measuring_mode == DWRITE_MEASURING_MODE_GDI_NATURAL,
1562                         run->isSideways, 1, run->glyphIndices + i, &a)))
1563                     advance = rtl_factor * floorf(a * run->fontEmSize / metrics.designUnitsPerEm + 0.5f);
1564                 break;
1565             default:
1566                 ;
1567             }
1568         }
1569
1570         origins[i] = baseline_origin;
1571
1572         /* Apply offsets. */
1573         if (run->glyphOffsets) {
1574             FLOAT advanceoffset = rtl_factor * run->glyphOffsets[i].advanceOffset;
1575             FLOAT ascenderoffset = -run->glyphOffsets[i].ascenderOffset;
1576
1577             if (run->isSideways) {
1578                 origins[i].x += ascenderoffset;
1579                 origins[i].y += advanceoffset;
1580             }
1581             else {
1582                 origins[i].x += advanceoffset;
1583                 origins[i].y += ascenderoffset;
1584             }
1585         }
1586
1587         if (run->isSideways)
1588             baseline_origin.y += advance;
1589         else
1590             baseline_origin.x += advance;
1591     }
1592
1593     if (fontface1)
1594         IDWriteFontFace1_Release(fontface1);
1595     return S_OK;
1596 }
1597
1598 static HRESULT WINAPI dwritefactory4_ComputeGlyphOrigins_(IDWriteFactory5 *iface, DWRITE_GLYPH_RUN const *run,
1599     D2D1_POINT_2F baseline_origin, D2D1_POINT_2F *origins)
1600 {
1601     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1602
1603     TRACE("(%p)->(%p (%f,%f) %p)\n", This, run, baseline_origin.x, baseline_origin.y, origins);
1604
1605     return compute_glyph_origins(run, DWRITE_MEASURING_MODE_NATURAL, baseline_origin, NULL, origins);
1606 }
1607
1608 static HRESULT WINAPI dwritefactory4_ComputeGlyphOrigins(IDWriteFactory5 *iface, DWRITE_GLYPH_RUN const *run,
1609     DWRITE_MEASURING_MODE measuring_mode, D2D1_POINT_2F baseline_origin, DWRITE_MATRIX const *transform,
1610     D2D1_POINT_2F *origins)
1611 {
1612     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1613
1614     TRACE("(%p)->(%p %d (%f,%f) %p %p)\n", This, run, measuring_mode, baseline_origin.x, baseline_origin.y,
1615         transform, origins);
1616
1617     return compute_glyph_origins(run, measuring_mode, baseline_origin, transform, origins);
1618 }
1619
1620 static HRESULT WINAPI dwritefactory5_CreateFontSetBuilder(IDWriteFactory5 *iface, IDWriteFontSetBuilder1 **builder)
1621 {
1622     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1623
1624     FIXME("(%p)->(%p): stub\n", This, builder);
1625
1626     return E_NOTIMPL;
1627 }
1628
1629 static HRESULT WINAPI dwritefactory5_CreateInMemoryFontFileLoader(IDWriteFactory5 *iface, IDWriteFontFileLoader **loader)
1630 {
1631     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1632
1633     TRACE("(%p)->(%p)\n", This, loader);
1634
1635     return create_inmemory_fileloader(loader);
1636 }
1637
1638 static HRESULT WINAPI dwritefactory5_CreateHttpFontFileLoader(IDWriteFactory5 *iface, WCHAR const *referrer_url, WCHAR const *extra_headers,
1639         IDWriteRemoteFontFileLoader **loader)
1640 {
1641     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1642
1643     FIXME("(%p)->(%s %s %p): stub\n", This, debugstr_w(referrer_url), wine_dbgstr_w(extra_headers), loader);
1644
1645     return E_NOTIMPL;
1646 }
1647
1648 static DWRITE_CONTAINER_TYPE WINAPI dwritefactory5_AnalyzeContainerType(IDWriteFactory5 *iface, void const *data, UINT32 data_size)
1649 {
1650     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1651
1652     TRACE("(%p)->(%p %u)\n", This, data, data_size);
1653
1654     return opentype_analyze_container_type(data, data_size);
1655 }
1656
1657 static HRESULT WINAPI dwritefactory5_UnpackFontFile(IDWriteFactory5 *iface, DWRITE_CONTAINER_TYPE container_type, void const *data,
1658         UINT32 data_size, IDWriteFontFileStream **stream)
1659 {
1660     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1661
1662     FIXME("(%p)->(%d %p %u %p): stub\n", This, container_type, data, data_size, stream);
1663
1664     return E_NOTIMPL;
1665 }
1666
1667 static const struct IDWriteFactory5Vtbl dwritefactoryvtbl = {
1668     dwritefactory_QueryInterface,
1669     dwritefactory_AddRef,
1670     dwritefactory_Release,
1671     dwritefactory_GetSystemFontCollection,
1672     dwritefactory_CreateCustomFontCollection,
1673     dwritefactory_RegisterFontCollectionLoader,
1674     dwritefactory_UnregisterFontCollectionLoader,
1675     dwritefactory_CreateFontFileReference,
1676     dwritefactory_CreateCustomFontFileReference,
1677     dwritefactory_CreateFontFace,
1678     dwritefactory_CreateRenderingParams,
1679     dwritefactory_CreateMonitorRenderingParams,
1680     dwritefactory_CreateCustomRenderingParams,
1681     dwritefactory_RegisterFontFileLoader,
1682     dwritefactory_UnregisterFontFileLoader,
1683     dwritefactory_CreateTextFormat,
1684     dwritefactory_CreateTypography,
1685     dwritefactory_GetGdiInterop,
1686     dwritefactory_CreateTextLayout,
1687     dwritefactory_CreateGdiCompatibleTextLayout,
1688     dwritefactory_CreateEllipsisTrimmingSign,
1689     dwritefactory_CreateTextAnalyzer,
1690     dwritefactory_CreateNumberSubstitution,
1691     dwritefactory_CreateGlyphRunAnalysis,
1692     dwritefactory1_GetEudcFontCollection,
1693     dwritefactory1_CreateCustomRenderingParams,
1694     dwritefactory2_GetSystemFontFallback,
1695     dwritefactory2_CreateFontFallbackBuilder,
1696     dwritefactory2_TranslateColorGlyphRun,
1697     dwritefactory2_CreateCustomRenderingParams,
1698     dwritefactory2_CreateGlyphRunAnalysis,
1699     dwritefactory3_CreateGlyphRunAnalysis,
1700     dwritefactory3_CreateCustomRenderingParams,
1701     dwritefactory3_CreateFontFaceReference_,
1702     dwritefactory3_CreateFontFaceReference,
1703     dwritefactory3_GetSystemFontSet,
1704     dwritefactory3_CreateFontSetBuilder,
1705     dwritefactory3_CreateFontCollectionFromFontSet,
1706     dwritefactory3_GetSystemFontCollection,
1707     dwritefactory3_GetFontDownloadQueue,
1708     dwritefactory4_TranslateColorGlyphRun,
1709     dwritefactory4_ComputeGlyphOrigins_,
1710     dwritefactory4_ComputeGlyphOrigins,
1711     dwritefactory5_CreateFontSetBuilder,
1712     dwritefactory5_CreateInMemoryFontFileLoader,
1713     dwritefactory5_CreateHttpFontFileLoader,
1714     dwritefactory5_AnalyzeContainerType,
1715     dwritefactory5_UnpackFontFile,
1716 };
1717
1718 static ULONG WINAPI shareddwritefactory_AddRef(IDWriteFactory5 *iface)
1719 {
1720     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1721     TRACE("(%p)\n", This);
1722     return 2;
1723 }
1724
1725 static ULONG WINAPI shareddwritefactory_Release(IDWriteFactory5 *iface)
1726 {
1727     struct dwritefactory *This = impl_from_IDWriteFactory5(iface);
1728     TRACE("(%p)\n", This);
1729     return 1;
1730 }
1731
1732 static const struct IDWriteFactory5Vtbl shareddwritefactoryvtbl = {
1733     dwritefactory_QueryInterface,
1734     shareddwritefactory_AddRef,
1735     shareddwritefactory_Release,
1736     dwritefactory_GetSystemFontCollection,
1737     dwritefactory_CreateCustomFontCollection,
1738     dwritefactory_RegisterFontCollectionLoader,
1739     dwritefactory_UnregisterFontCollectionLoader,
1740     dwritefactory_CreateFontFileReference,
1741     dwritefactory_CreateCustomFontFileReference,
1742     dwritefactory_CreateFontFace,
1743     dwritefactory_CreateRenderingParams,
1744     dwritefactory_CreateMonitorRenderingParams,
1745     dwritefactory_CreateCustomRenderingParams,
1746     dwritefactory_RegisterFontFileLoader,
1747     dwritefactory_UnregisterFontFileLoader,
1748     dwritefactory_CreateTextFormat,
1749     dwritefactory_CreateTypography,
1750     dwritefactory_GetGdiInterop,
1751     dwritefactory_CreateTextLayout,
1752     dwritefactory_CreateGdiCompatibleTextLayout,
1753     dwritefactory_CreateEllipsisTrimmingSign,
1754     dwritefactory_CreateTextAnalyzer,
1755     dwritefactory_CreateNumberSubstitution,
1756     dwritefactory_CreateGlyphRunAnalysis,
1757     dwritefactory1_GetEudcFontCollection,
1758     dwritefactory1_CreateCustomRenderingParams,
1759     dwritefactory2_GetSystemFontFallback,
1760     dwritefactory2_CreateFontFallbackBuilder,
1761     dwritefactory2_TranslateColorGlyphRun,
1762     dwritefactory2_CreateCustomRenderingParams,
1763     dwritefactory2_CreateGlyphRunAnalysis,
1764     dwritefactory3_CreateGlyphRunAnalysis,
1765     dwritefactory3_CreateCustomRenderingParams,
1766     dwritefactory3_CreateFontFaceReference_,
1767     dwritefactory3_CreateFontFaceReference,
1768     dwritefactory3_GetSystemFontSet,
1769     dwritefactory3_CreateFontSetBuilder,
1770     dwritefactory3_CreateFontCollectionFromFontSet,
1771     dwritefactory3_GetSystemFontCollection,
1772     dwritefactory3_GetFontDownloadQueue,
1773     dwritefactory4_TranslateColorGlyphRun,
1774     dwritefactory4_ComputeGlyphOrigins_,
1775     dwritefactory4_ComputeGlyphOrigins,
1776     dwritefactory5_CreateFontSetBuilder,
1777     dwritefactory5_CreateInMemoryFontFileLoader,
1778     dwritefactory5_CreateHttpFontFileLoader,
1779     dwritefactory5_AnalyzeContainerType,
1780     dwritefactory5_UnpackFontFile,
1781 };
1782
1783 static void init_dwritefactory(struct dwritefactory *factory, DWRITE_FACTORY_TYPE type)
1784 {
1785     factory->IDWriteFactory5_iface.lpVtbl = type == DWRITE_FACTORY_TYPE_SHARED ?
1786             &shareddwritefactoryvtbl : &dwritefactoryvtbl;
1787     factory->ref = 1;
1788     factory->localfontfileloader = get_local_fontfile_loader();
1789     factory->system_collection = NULL;
1790     factory->eudc_collection = NULL;
1791     factory->gdiinterop = NULL;
1792     factory->fallback = NULL;
1793
1794     list_init(&factory->collection_loaders);
1795     list_init(&factory->file_loaders);
1796     list_init(&factory->localfontfaces);
1797
1798     InitializeCriticalSection(&factory->cs);
1799     factory->cs.DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": dwritefactory.lock");
1800 }
1801
1802 void factory_detach_fontcollection(IDWriteFactory5 *iface, IDWriteFontCollection1 *collection)
1803 {
1804     struct dwritefactory *factory = impl_from_IDWriteFactory5(iface);
1805     InterlockedCompareExchangePointer((void **)&factory->system_collection, NULL, collection);
1806     InterlockedCompareExchangePointer((void **)&factory->eudc_collection, NULL, collection);
1807     IDWriteFactory5_Release(iface);
1808 }
1809
1810 void factory_detach_gdiinterop(IDWriteFactory5 *iface, IDWriteGdiInterop1 *interop)
1811 {
1812     struct dwritefactory *factory = impl_from_IDWriteFactory5(iface);
1813     factory->gdiinterop = NULL;
1814     IDWriteFactory5_Release(iface);
1815 }
1816
1817 HRESULT WINAPI DWriteCreateFactory(DWRITE_FACTORY_TYPE type, REFIID riid, IUnknown **ret)
1818 {
1819     struct dwritefactory *factory;
1820     HRESULT hr;
1821
1822     TRACE("(%d, %s, %p)\n", type, debugstr_guid(riid), ret);
1823
1824     *ret = NULL;
1825
1826     if (type == DWRITE_FACTORY_TYPE_SHARED && shared_factory)
1827         return IDWriteFactory5_QueryInterface(shared_factory, riid, (void**)ret);
1828
1829     factory = heap_alloc(sizeof(struct dwritefactory));
1830     if (!factory) return E_OUTOFMEMORY;
1831
1832     init_dwritefactory(factory, type);
1833
1834     if (type == DWRITE_FACTORY_TYPE_SHARED)
1835         if (InterlockedCompareExchangePointer((void**)&shared_factory, &factory->IDWriteFactory5_iface, NULL)) {
1836             release_shared_factory(&factory->IDWriteFactory5_iface);
1837             return IDWriteFactory5_QueryInterface(shared_factory, riid, (void**)ret);
1838         }
1839
1840     hr = IDWriteFactory5_QueryInterface(&factory->IDWriteFactory5_iface, riid, (void**)ret);
1841     IDWriteFactory5_Release(&factory->IDWriteFactory5_iface);
1842     return hr;
1843 }