dlls/dwrite/font.c

   1 /*
   2  *    Font and collections
   3  *
   4  * Copyright 2012, 2014 Nikolay Sivov for CodeWeavers
   5  * Copyright 2014 Aric Stewart for CodeWeavers
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #define COBJMACROS
  23
  24 #include "dwrite_private.h"
  25
  26 WINE_DEFAULT_DEBUG_CHANNEL(dwrite);
  27
  28 #define MS_HEAD_TAG DWRITE_MAKE_OPENTYPE_TAG('h','e','a','d')
  29 #define MS_OS2_TAG  DWRITE_MAKE_OPENTYPE_TAG('O','S','/','2')
  30 #define MS_POST_TAG DWRITE_MAKE_OPENTYPE_TAG('p','o','s','t')
  31 #define MS_CMAP_TAG DWRITE_MAKE_OPENTYPE_TAG('c','m','a','p')
  32
  33 struct dwrite_fontface_data {
  34     LONG ref;
  35
  36     DWRITE_FONT_FACE_TYPE type;
  37     UINT32 file_count;
  38     IDWriteFontFile ** files;
  39     DWRITE_FONT_SIMULATIONS simulations;
  40     UINT32 index;
  41 };
  42
  43 struct dwrite_font_data {
  44     LONG ref;
  45
  46     DWRITE_FONT_STYLE style;
  47     DWRITE_FONT_STRETCH stretch;
  48     DWRITE_FONT_WEIGHT weight;
  49     DWRITE_FONT_SIMULATIONS simulations;
  50     DWRITE_FONT_METRICS metrics;
  51     IDWriteLocalizedStrings *info_strings[DWRITE_INFORMATIONAL_STRING_POSTSCRIPT_CID_NAME+1];
  52
  53     struct dwrite_fontface_data *face_data;
  54
  55     WCHAR *facename;
  56 };
  57
  58 struct dwrite_fontfamily_data {
  59     LONG ref;
  60
  61     IDWriteLocalizedStrings *familyname;
  62
  63     struct dwrite_font_data **fonts;
  64     UINT32  font_count;
  65     UINT32  alloc;
  66 };
  67
  68 struct dwrite_fontcollection {
  69     IDWriteFontCollection IDWriteFontCollection_iface;
  70     LONG ref;
  71
  72     WCHAR **families;
  73     UINT32 count;
  74     int alloc;
  75
  76     struct dwrite_fontfamily_data **family_data;
  77     DWORD data_count;
  78     int data_alloc;
  79 };
  80
  81 struct dwrite_fontfamily {
  82     IDWriteFontFamily IDWriteFontFamily_iface;
  83     LONG ref;
  84
  85     struct dwrite_fontfamily_data *data;
  86
  87     IDWriteFontCollection* collection;
  88 };
  89
  90 struct dwrite_font {
  91     IDWriteFont2 IDWriteFont2_iface;
  92     LONG ref;
  93
  94     BOOL is_system;
  95     IDWriteFontFamily *family;
  96     IDWriteFontFace2 *face;
  97
  98     struct dwrite_font_data *data;
  99 };
 100
 101 #define DWRITE_FONTTABLE_MAGIC 0xededfafa
 102
 103 struct dwrite_fonttablecontext {
 104     UINT32 magic;
 105     void  *context;
 106     UINT32 file_index;
 107 };
 108
 109 struct dwrite_fonttable {
 110     void  *data;
 111     void  *context;
 112     UINT32 size;
 113 };
 114
 115 struct dwrite_fontface {
 116     IDWriteFontFace2 IDWriteFontFace2_iface;
 117     LONG ref;
 118
 119     IDWriteFontFile **files;
 120     UINT32 file_count;
 121     UINT32 index;
 122
 123     DWRITE_FONT_SIMULATIONS simulations;
 124     DWRITE_FONT_FACE_TYPE type;
 125
 126     struct dwrite_fonttable cmap;
 127
 128     BOOL is_system;
 129     LOGFONTW logfont;
 130 };
 131
 132 struct dwrite_fontfile {
 133     IDWriteFontFile IDWriteFontFile_iface;
 134     LONG ref;
 135
 136     IDWriteFontFileLoader *loader;
 137     void *reference_key;
 138     UINT32 key_size;
 139     IDWriteFontFileStream *stream;
 140 };
 141
 142 static HRESULT create_fontfamily(IDWriteLocalizedStrings *familyname, IDWriteFontFamily **family);
 143 static HRESULT create_fontfamily_from_data(struct dwrite_fontfamily_data *data, IDWriteFontCollection *collection, IDWriteFontFamily **family);
 144 static HRESULT create_font_base(IDWriteFont **font);
 145 static HRESULT create_font_from_data(struct dwrite_font_data*,IDWriteFontFamily*,IDWriteFont**);
 146
 147 static inline struct dwrite_fontface *impl_from_IDWriteFontFace2(IDWriteFontFace2 *iface)
 148 {
 149     return CONTAINING_RECORD(iface, struct dwrite_fontface, IDWriteFontFace2_iface);
 150 }
 151
 152 static inline struct dwrite_font *impl_from_IDWriteFont2(IDWriteFont2 *iface)
 153 {
 154     return CONTAINING_RECORD(iface, struct dwrite_font, IDWriteFont2_iface);
 155 }
 156
 157 static inline struct dwrite_fontfile *impl_from_IDWriteFontFile(IDWriteFontFile *iface)
 158 {
 159     return CONTAINING_RECORD(iface, struct dwrite_fontfile, IDWriteFontFile_iface);
 160 }
 161
 162 static inline struct dwrite_fontfamily *impl_from_IDWriteFontFamily(IDWriteFontFamily *iface)
 163 {
 164     return CONTAINING_RECORD(iface, struct dwrite_fontfamily, IDWriteFontFamily_iface);
 165 }
 166
 167 static inline struct dwrite_fontcollection *impl_from_IDWriteFontCollection(IDWriteFontCollection *iface)
 168 {
 169     return CONTAINING_RECORD(iface, struct dwrite_fontcollection, IDWriteFontCollection_iface);
 170 }
 171
 172 static inline void* get_fontface_cmap(struct dwrite_fontface *fontface)
 173 {
 174     BOOL exists = FALSE;
 175     HRESULT hr;
 176
 177     if (fontface->cmap.data)
 178         return fontface->cmap.data;
 179
 180     hr = IDWriteFontFace2_TryGetFontTable(&fontface->IDWriteFontFace2_iface, MS_CMAP_TAG, (const void**)&fontface->cmap.data,
 181         &fontface->cmap.size, &fontface->cmap.context, &exists);
 182     if (FAILED(hr) || !exists) {
 183         ERR("Font does not have a CMAP table\n");
 184         return NULL;
 185     }
 186
 187     return fontface->cmap.data;
 188 }
 189
 190 static HRESULT _dwritefontfile_GetFontFileStream(IDWriteFontFile *iface, IDWriteFontFileStream **stream)
 191 {
 192     HRESULT hr;
 193     struct dwrite_fontfile *This = impl_from_IDWriteFontFile(iface);
 194     if (!This->stream)
 195     {
 196         hr = IDWriteFontFileLoader_CreateStreamFromKey(This->loader, This->reference_key, This->key_size, &This->stream);
 197         if (FAILED(hr))
 198             return hr;
 199     }
 200     if (This->stream)
 201     {
 202         IDWriteFontFileStream_AddRef(This->stream);
 203         *stream = This->stream;
 204         return S_OK;
 205     }
 206     return E_FAIL;
 207 }
 208
 209 static VOID _free_fontface_data(struct dwrite_fontface_data *data)
 210 {
 211     int i;
 212     if (!data)
 213         return;
 214     i = InterlockedDecrement(&data->ref);
 215     if (i > 0)
 216         return;
 217     for (i = 0; i < data->file_count; i++)
 218         IDWriteFontFile_Release(data->files[i]);
 219     heap_free(data->files);
 220     heap_free(data);
 221 }
 222
 223 static VOID _free_font_data(struct dwrite_font_data *data)
 224 {
 225     int i;
 226     if (!data)
 227         return;
 228     i = InterlockedDecrement(&data->ref);
 229     if (i > 0)
 230         return;
 231
 232     for (i = DWRITE_INFORMATIONAL_STRING_NONE; i < sizeof(data->info_strings)/sizeof(data->info_strings[0]); i++) {
 233         if (data->info_strings[i])
 234             IDWriteLocalizedStrings_Release(data->info_strings[i]);
 235     }
 236     _free_fontface_data(data->face_data);
 237     heap_free(data->facename);
 238     heap_free(data);
 239 }
 240
 241 static VOID _free_fontfamily_data(struct dwrite_fontfamily_data *data)
 242 {
 243     int i;
 244     if (!data)
 245         return;
 246     i = InterlockedDecrement(&data->ref);
 247     if (i > 0)
 248         return;
 249     for (i = 0; i < data->font_count; i++)
 250         _free_font_data(data->fonts[i]);
 251     heap_free(data->fonts);
 252     IDWriteLocalizedStrings_Release(data->familyname);
 253     heap_free(data);
 254 }
 255
 256 static HRESULT WINAPI dwritefontface_QueryInterface(IDWriteFontFace2 *iface, REFIID riid, void **obj)
 257 {
 258     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 259
 260     TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), obj);
 261
 262     if (IsEqualIID(riid, &IID_IDWriteFontFace2) ||
 263         IsEqualIID(riid, &IID_IDWriteFontFace1) ||
 264         IsEqualIID(riid, &IID_IDWriteFontFace) ||
 265         IsEqualIID(riid, &IID_IUnknown))
 266     {
 267         *obj = iface;
 268         IDWriteFontFace2_AddRef(iface);
 269         return S_OK;
 270     }
 271
 272     *obj = NULL;
 273     return E_NOINTERFACE;
 274 }
 275
 276 static ULONG WINAPI dwritefontface_AddRef(IDWriteFontFace2 *iface)
 277 {
 278     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 279     ULONG ref = InterlockedIncrement(&This->ref);
 280     TRACE("(%p)->(%d)\n", This, ref);
 281     return ref;
 282 }
 283
 284 static ULONG WINAPI dwritefontface_Release(IDWriteFontFace2 *iface)
 285 {
 286     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 287     ULONG ref = InterlockedDecrement(&This->ref);
 288
 289     TRACE("(%p)->(%d)\n", This, ref);
 290
 291     if (!ref) {
 292         UINT32 i;
 293
 294         if (This->cmap.context)
 295             IDWriteFontFace2_ReleaseFontTable(iface, This->cmap.context);
 296         for (i = 0; i < This->file_count; i++)
 297             IDWriteFontFile_Release(This->files[i]);
 298         heap_free(This);
 299     }
 300
 301     return ref;
 302 }
 303
 304 static DWRITE_FONT_FACE_TYPE WINAPI dwritefontface_GetType(IDWriteFontFace2 *iface)
 305 {
 306     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 307     TRACE("(%p)\n", This);
 308     return This->type;
 309 }
 310
 311 static HRESULT WINAPI dwritefontface_GetFiles(IDWriteFontFace2 *iface, UINT32 *number_of_files,
 312     IDWriteFontFile **fontfiles)
 313 {
 314     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 315     int i;
 316
 317     TRACE("(%p)->(%p %p)\n", This, number_of_files, fontfiles);
 318     if (fontfiles == NULL)
 319     {
 320         *number_of_files = This->file_count;
 321         return S_OK;
 322     }
 323     if (*number_of_files < This->file_count)
 324         return E_INVALIDARG;
 325
 326     for (i = 0; i < This->file_count; i++)
 327     {
 328         IDWriteFontFile_AddRef(This->files[i]);
 329         fontfiles[i] = This->files[i];
 330     }
 331
 332     return S_OK;
 333 }
 334
 335 static UINT32 WINAPI dwritefontface_GetIndex(IDWriteFontFace2 *iface)
 336 {
 337     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 338     TRACE("(%p)\n", This);
 339     return This->index;
 340 }
 341
 342 static DWRITE_FONT_SIMULATIONS WINAPI dwritefontface_GetSimulations(IDWriteFontFace2 *iface)
 343 {
 344     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 345     TRACE("(%p)\n", This);
 346     return This->simulations;
 347 }
 348
 349 static BOOL WINAPI dwritefontface_IsSymbolFont(IDWriteFontFace2 *iface)
 350 {
 351     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 352     FIXME("(%p): stub\n", This);
 353     return FALSE;
 354 }
 355
 356 static void WINAPI dwritefontface_GetMetrics(IDWriteFontFace2 *iface, DWRITE_FONT_METRICS *metrics)
 357 {
 358     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 359     FIXME("(%p)->(%p): stub\n", This, metrics);
 360 }
 361
 362 static UINT16 WINAPI dwritefontface_GetGlyphCount(IDWriteFontFace2 *iface)
 363 {
 364     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 365     FIXME("(%p): stub\n", This);
 366     return 0;
 367 }
 368
 369 static HRESULT WINAPI dwritefontface_GetDesignGlyphMetrics(IDWriteFontFace2 *iface,
 370     UINT16 const *glyph_indices, UINT32 glyph_count, DWRITE_GLYPH_METRICS *metrics, BOOL is_sideways)
 371 {
 372     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 373     FIXME("(%p)->(%p %u %p %d): stub\n", This, glyph_indices, glyph_count, metrics, is_sideways);
 374     return E_NOTIMPL;
 375 }
 376
 377 static HRESULT WINAPI dwritefontface_GetGlyphIndices(IDWriteFontFace2 *iface, UINT32 const *codepoints,
 378     UINT32 count, UINT16 *glyph_indices)
 379 {
 380     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 381     unsigned int i;
 382
 383     if (This->is_system)
 384     {
 385         HFONT hfont;
 386         WCHAR *str;
 387         HDC hdc;
 388
 389         TRACE("(%p)->(%p %u %p)\n", This, codepoints, count, glyph_indices);
 390
 391         str = heap_alloc(count*sizeof(WCHAR));
 392         if (!str) return E_OUTOFMEMORY;
 393
 394         for (i = 0; i < count; i++)
 395             str[i] = codepoints[i] < 0x10000 ? codepoints[i] : '?';
 396
 397         hdc = CreateCompatibleDC(0);
 398         hfont = CreateFontIndirectW(&This->logfont);
 399         SelectObject(hdc, hfont);
 400
 401         GetGlyphIndicesW(hdc, str, count, glyph_indices, 0);
 402         heap_free(str);
 403
 404         DeleteDC(hdc);
 405         DeleteObject(hfont);
 406
 407         return S_OK;
 408     }
 409     else
 410     {
 411         void *data;
 412
 413         TRACE("(%p)->(%p %u %p)\n", This, codepoints, count, glyph_indices);
 414
 415         data = get_fontface_cmap(This);
 416         if (!data)
 417             return E_FAIL;
 418
 419         for (i = 0; i < count; i++)
 420             opentype_cmap_get_glyphindex(data, codepoints[i], &glyph_indices[i]);
 421
 422         return S_OK;
 423     }
 424 }
 425
 426 static HRESULT WINAPI dwritefontface_TryGetFontTable(IDWriteFontFace2 *iface, UINT32 table_tag,
 427     const void **table_data, UINT32 *table_size, void **context, BOOL *exists)
 428 {
 429     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 430     if (This->is_system)
 431     {
 432         FIXME("(%p)->(%u %p %p %p %p): stub\n", This, table_tag, table_data, table_size, context, exists);
 433         return E_NOTIMPL;
 434     }
 435     else
 436     {
 437         HRESULT hr = S_OK;
 438         int i;
 439         struct dwrite_fonttablecontext *tablecontext;
 440
 441         TRACE("(%p)->(%u %p %p %p %p)\n", This, table_tag, table_data, table_size, context, exists);
 442
 443         tablecontext = heap_alloc(sizeof(struct dwrite_fonttablecontext));
 444         if (!tablecontext)
 445             return E_OUTOFMEMORY;
 446         tablecontext->magic = DWRITE_FONTTABLE_MAGIC;
 447
 448         *exists = FALSE;
 449         for (i = 0; i < This->file_count && !(*exists); i++)
 450         {
 451             IDWriteFontFileStream *stream;
 452             hr = _dwritefontfile_GetFontFileStream(This->files[i], &stream);
 453             if (FAILED(hr))
 454                 continue;
 455             tablecontext->file_index = i;
 456
 457             hr = opentype_get_font_table(stream, This->type, This->index, table_tag, table_data, &tablecontext->context, table_size, exists);
 458
 459             IDWriteFontFileStream_Release(stream);
 460         }
 461         if (FAILED(hr) && !*exists)
 462             heap_free(tablecontext);
 463         else
 464             *context = (void*)tablecontext;
 465         return hr;
 466     }
 467 }
 468
 469 static void WINAPI dwritefontface_ReleaseFontTable(IDWriteFontFace2 *iface, void *table_context)
 470 {
 471     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 472     struct dwrite_fonttablecontext *tablecontext = (struct dwrite_fonttablecontext*)table_context;
 473     IDWriteFontFileStream *stream;
 474     HRESULT hr;
 475     TRACE("(%p)->(%p)\n", This, table_context);
 476
 477     if (tablecontext->magic != DWRITE_FONTTABLE_MAGIC)
 478     {
 479         TRACE("Invalid table magic\n");
 480         return;
 481     }
 482
 483     hr = _dwritefontfile_GetFontFileStream(This->files[tablecontext->file_index], &stream);
 484     if (FAILED(hr))
 485         return;
 486     IDWriteFontFileStream_ReleaseFileFragment(stream, tablecontext->context);
 487     IDWriteFontFileStream_Release(stream);
 488     heap_free(tablecontext);
 489 }
 490
 491 static HRESULT WINAPI dwritefontface_GetGlyphRunOutline(IDWriteFontFace2 *iface, FLOAT emSize,
 492     UINT16 const *glyph_indices, FLOAT const* glyph_advances, DWRITE_GLYPH_OFFSET const *glyph_offsets,
 493     UINT32 glyph_count, BOOL is_sideways, BOOL is_rtl, IDWriteGeometrySink *geometrysink)
 494 {
 495     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 496     FIXME("(%p)->(%f %p %p %p %u %d %d %p): stub\n", This, emSize, glyph_indices, glyph_advances, glyph_offsets,
 497         glyph_count, is_sideways, is_rtl, geometrysink);
 498     return E_NOTIMPL;
 499 }
 500
 501 static HRESULT WINAPI dwritefontface_GetRecommendedRenderingMode(IDWriteFontFace2 *iface, FLOAT emSize,
 502     FLOAT pixels_per_dip, DWRITE_MEASURING_MODE mode, IDWriteRenderingParams* params, DWRITE_RENDERING_MODE* rendering_mode)
 503 {
 504     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 505     FIXME("(%p)->(%f %f %d %p %p): stub\n", This, emSize, pixels_per_dip, mode, params, rendering_mode);
 506     return E_NOTIMPL;
 507 }
 508
 509 static HRESULT WINAPI dwritefontface_GetGdiCompatibleMetrics(IDWriteFontFace2 *iface, FLOAT emSize, FLOAT pixels_per_dip,
 510     DWRITE_MATRIX const *transform, DWRITE_FONT_METRICS *metrics)
 511 {
 512     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 513     FIXME("(%p)->(%f %f %p %p): stub\n", This, emSize, pixels_per_dip, transform, metrics);
 514     return E_NOTIMPL;
 515 }
 516
 517 static HRESULT WINAPI dwritefontface_GetGdiCompatibleGlyphMetrics(IDWriteFontFace2 *iface, FLOAT emSize, FLOAT pixels_per_dip,
 518     DWRITE_MATRIX const *transform, BOOL use_gdi_natural, UINT16 const *glyph_indices, UINT32 glyph_count,
 519     DWRITE_GLYPH_METRICS *metrics, BOOL is_sideways)
 520 {
 521     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 522     FIXME("(%p)->(%f %f %p %d %p %u %p %d): stub\n", This, emSize, pixels_per_dip, transform, use_gdi_natural, glyph_indices,
 523         glyph_count, metrics, is_sideways);
 524     return E_NOTIMPL;
 525 }
 526
 527 static HRESULT WINAPI dwritefontface1_GetMetrics(IDWriteFontFace2 *iface, DWRITE_FONT_METRICS1 *metrics)
 528 {
 529     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 530     FIXME("(%p)->(%p): stub\n", This, metrics);
 531     return E_NOTIMPL;
 532 }
 533
 534 static HRESULT WINAPI dwritefontface1_GetGdiCompatibleMetrics(IDWriteFontFace2 *iface, FLOAT em_size, FLOAT pixels_per_dip,
 535     const DWRITE_MATRIX *transform, DWRITE_FONT_METRICS1 *metrics)
 536 {
 537     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 538     FIXME("(%p)->(%f %f %p %p): stub\n", This, em_size, pixels_per_dip, transform, metrics);
 539     return E_NOTIMPL;
 540 }
 541
 542 static void WINAPI dwritefontface1_GetCaretMetrics(IDWriteFontFace2 *iface, DWRITE_CARET_METRICS *metrics)
 543 {
 544     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 545     FIXME("(%p)->(%p): stub\n", This, metrics);
 546 }
 547
 548 static HRESULT WINAPI dwritefontface1_GetUnicodeRanges(IDWriteFontFace2 *iface, UINT32 max_count,
 549     DWRITE_UNICODE_RANGE *ranges, UINT32 *count)
 550 {
 551     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 552
 553     TRACE("(%p)->(%u %p %p)\n", This, max_count, ranges, count);
 554
 555     *count = 0;
 556     if (max_count && !ranges)
 557         return E_INVALIDARG;
 558
 559     return opentype_cmap_get_unicode_ranges(get_fontface_cmap(This), max_count, ranges, count);
 560 }
 561
 562 static BOOL WINAPI dwritefontface1_IsMonospacedFont(IDWriteFontFace2 *iface)
 563 {
 564     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 565     FIXME("(%p): stub\n", This);
 566     return FALSE;
 567 }
 568
 569 static HRESULT WINAPI dwritefontface1_GetDesignGlyphAdvances(IDWriteFontFace2 *iface,
 570     UINT32 glyph_count, UINT16 const *indices, INT32 *advances, BOOL is_sideways)
 571 {
 572     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 573     FIXME("(%p)->(%u %p %p %d): stub\n", This, glyph_count, indices, advances, is_sideways);
 574     return E_NOTIMPL;
 575 }
 576
 577 static HRESULT WINAPI dwritefontface1_GetGdiCompatibleGlyphAdvances(IDWriteFontFace2 *iface,
 578     FLOAT em_size, FLOAT pixels_per_dip, const DWRITE_MATRIX *transform, BOOL use_gdi_natural,
 579     BOOL is_sideways, UINT32 glyph_count, UINT16 const *indices, INT32 *advances)
 580 {
 581     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 582     FIXME("(%p)->(%f %f %p %d %d %u %p %p): stub\n", This, em_size, pixels_per_dip, transform,
 583         use_gdi_natural, is_sideways, glyph_count, indices, advances);
 584     return E_NOTIMPL;
 585 }
 586
 587 static HRESULT WINAPI dwritefontface1_GetKerningPairAdjustments(IDWriteFontFace2 *iface, UINT32 glyph_count,
 588     const UINT16 *indices, INT32 *adjustments)
 589 {
 590     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 591     FIXME("(%p)->(%u %p %p): stub\n", This, glyph_count, indices, adjustments);
 592     return E_NOTIMPL;
 593 }
 594
 595 static BOOL WINAPI dwritefontface1_HasKerningPairs(IDWriteFontFace2 *iface)
 596 {
 597     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 598     FIXME("(%p): stub\n", This);
 599     return FALSE;
 600 }
 601
 602 static HRESULT WINAPI dwritefontface1_GetRecommendedRenderingMode(IDWriteFontFace2 *iface,
 603     FLOAT font_emsize, FLOAT dpiX, FLOAT dpiY, const DWRITE_MATRIX *transform, BOOL is_sideways,
 604     DWRITE_OUTLINE_THRESHOLD threshold, DWRITE_MEASURING_MODE measuring_mode, DWRITE_RENDERING_MODE *rendering_mode)
 605 {
 606     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 607     FIXME("(%p)->(%f %f %f %p %d %d %d %p): stub\n", This, font_emsize, dpiX, dpiY, transform, is_sideways,
 608         threshold, measuring_mode, rendering_mode);
 609     return E_NOTIMPL;
 610 }
 611
 612 static HRESULT WINAPI dwritefontface1_GetVerticalGlyphVariants(IDWriteFontFace2 *iface, UINT32 glyph_count,
 613     const UINT16 *nominal_indices, UINT16 *vertical_indices)
 614 {
 615     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 616     FIXME("(%p)->(%u %p %p): stub\n", This, glyph_count, nominal_indices, vertical_indices);
 617     return E_NOTIMPL;
 618 }
 619
 620 static BOOL WINAPI dwritefontface1_HasVerticalGlyphVariants(IDWriteFontFace2 *iface)
 621 {
 622     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 623     FIXME("(%p): stub\n", This);
 624     return FALSE;
 625 }
 626
 627 static BOOL WINAPI dwritefontface2_IsColorFont(IDWriteFontFace2 *iface)
 628 {
 629     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 630     FIXME("(%p): stub\n", This);
 631     return FALSE;
 632 }
 633
 634 static UINT32 WINAPI dwritefontface2_GetColorPaletteCount(IDWriteFontFace2 *iface)
 635 {
 636     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 637     FIXME("(%p): stub\n", This);
 638     return 0;
 639 }
 640
 641 static UINT32 WINAPI dwritefontface2_GetPaletteEntryCount(IDWriteFontFace2 *iface)
 642 {
 643     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 644     FIXME("(%p): stub\n", This);
 645     return 0;
 646 }
 647
 648 static HRESULT WINAPI dwritefontface2_GetPaletteEntries(IDWriteFontFace2 *iface, UINT32 palette_index,
 649     UINT32 first_entry_index, UINT32 entry_count, DWRITE_COLOR_F *entries)
 650 {
 651     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 652     FIXME("(%p)->(%u %u %u %p): stub\n", This, palette_index, first_entry_index, entry_count, entries);
 653     return E_NOTIMPL;
 654 }
 655
 656 static HRESULT WINAPI dwritefontface2_GetRecommendedRenderingMode(IDWriteFontFace2 *iface, FLOAT fontEmSize,
 657     FLOAT dpiX, FLOAT dpiY, DWRITE_MATRIX const *transform, BOOL is_sideways, DWRITE_OUTLINE_THRESHOLD threshold,
 658     DWRITE_MEASURING_MODE measuringmode, IDWriteRenderingParams *params, DWRITE_RENDERING_MODE *renderingmode,
 659     DWRITE_GRID_FIT_MODE *gridfitmode)
 660 {
 661     struct dwrite_fontface *This = impl_from_IDWriteFontFace2(iface);
 662     FIXME("(%p)->(%f %f %f %p %d %d %d %p %p %p): stub\n", This, fontEmSize, dpiX, dpiY, transform, is_sideways, threshold,
 663         measuringmode, params, renderingmode, gridfitmode);
 664     return E_NOTIMPL;
 665 }
 666
 667 static const IDWriteFontFace2Vtbl dwritefontfacevtbl = {
 668     dwritefontface_QueryInterface,
 669     dwritefontface_AddRef,
 670     dwritefontface_Release,
 671     dwritefontface_GetType,
 672     dwritefontface_GetFiles,
 673     dwritefontface_GetIndex,
 674     dwritefontface_GetSimulations,
 675     dwritefontface_IsSymbolFont,
 676     dwritefontface_GetMetrics,
 677     dwritefontface_GetGlyphCount,
 678     dwritefontface_GetDesignGlyphMetrics,
 679     dwritefontface_GetGlyphIndices,
 680     dwritefontface_TryGetFontTable,
 681     dwritefontface_ReleaseFontTable,
 682     dwritefontface_GetGlyphRunOutline,
 683     dwritefontface_GetRecommendedRenderingMode,
 684     dwritefontface_GetGdiCompatibleMetrics,
 685     dwritefontface_GetGdiCompatibleGlyphMetrics,
 686     dwritefontface1_GetMetrics,
 687     dwritefontface1_GetGdiCompatibleMetrics,
 688     dwritefontface1_GetCaretMetrics,
 689     dwritefontface1_GetUnicodeRanges,
 690     dwritefontface1_IsMonospacedFont,
 691     dwritefontface1_GetDesignGlyphAdvances,
 692     dwritefontface1_GetGdiCompatibleGlyphAdvances,
 693     dwritefontface1_GetKerningPairAdjustments,
 694     dwritefontface1_HasKerningPairs,
 695     dwritefontface1_GetRecommendedRenderingMode,
 696     dwritefontface1_GetVerticalGlyphVariants,
 697     dwritefontface1_HasVerticalGlyphVariants,
 698     dwritefontface2_IsColorFont,
 699     dwritefontface2_GetColorPaletteCount,
 700     dwritefontface2_GetPaletteEntryCount,
 701     dwritefontface2_GetPaletteEntries,
 702     dwritefontface2_GetRecommendedRenderingMode
 703 };
 704
 705 static HRESULT create_system_fontface(struct dwrite_font *font, IDWriteFontFace2 **face)
 706 {
 707     struct dwrite_fontface *This;
 708
 709     *face = NULL;
 710
 711     This = heap_alloc(sizeof(struct dwrite_fontface));
 712     if (!This) return E_OUTOFMEMORY;
 713
 714     This->IDWriteFontFace2_iface.lpVtbl = &dwritefontfacevtbl;
 715     This->ref = 1;
 716     This->type = DWRITE_FONT_FACE_TYPE_UNKNOWN;
 717     This->file_count = 0;
 718     This->files = NULL;
 719     This->index = 0;
 720     This->simulations = DWRITE_FONT_SIMULATIONS_NONE;
 721     This->cmap.data = NULL;
 722     This->cmap.context = NULL;
 723     This->cmap.size = 0;
 724
 725     This->is_system = TRUE;
 726     memset(&This->logfont, 0, sizeof(This->logfont));
 727     This->logfont.lfItalic = font->data->style == DWRITE_FONT_STYLE_ITALIC;
 728     /* weight values from DWRITE_FONT_WEIGHT match values used for LOGFONT */
 729     This->logfont.lfWeight = font->data->weight;
 730     strcpyW(This->logfont.lfFaceName, font->data->facename);
 731
 732     *face = &This->IDWriteFontFace2_iface;
 733
 734     return S_OK;
 735 }
 736
 737 HRESULT convert_fontface_to_logfont(IDWriteFontFace *face, LOGFONTW *logfont)
 738 {
 739     struct dwrite_fontface *fontface = impl_from_IDWriteFontFace2((IDWriteFontFace2*)face);
 740
 741     *logfont = fontface->logfont;
 742
 743     return S_OK;
 744 }
 745
 746 static HRESULT get_fontface_from_font(struct dwrite_font *font, IDWriteFontFace2 **fontface)
 747 {
 748     *fontface = NULL;
 749
 750     if (!font->face) {
 751         HRESULT hr = font->is_system ? create_system_fontface(font, &font->face) :
 752             create_fontface(font->data->face_data->type, font->data->face_data->file_count, font->data->face_data->files,
 753                                  font->data->face_data->index, font->data->face_data->simulations, &font->face);
 754         if (FAILED(hr)) return hr;
 755     }
 756
 757     *fontface = font->face;
 758     return S_OK;
 759 }
 760
 761 static HRESULT create_font_base(IDWriteFont **font)
 762 {
 763     struct dwrite_font_data *data;
 764     HRESULT ret;
 765
 766     *font = NULL;
 767     data = heap_alloc_zero(sizeof(*data));
 768     if (!data) return E_OUTOFMEMORY;
 769
 770     ret = create_font_from_data( data, NULL, font );
 771     if (FAILED(ret)) heap_free( data );
 772     return ret;
 773 }
 774
 775 static HRESULT create_font_from_logfont(const LOGFONTW *logfont, IDWriteFont **font)
 776 {
 777     const WCHAR* facename, *familyname;
 778     IDWriteLocalizedStrings *name;
 779     struct dwrite_font *This;
 780     IDWriteFontFamily *family;
 781     OUTLINETEXTMETRICW *otm;
 782     HRESULT hr;
 783     HFONT hfont;
 784     HDC hdc;
 785     int ret;
 786     static const WCHAR enusW[] = {'e','n','-','u','s',0};
 787     LPVOID tt_os2 = NULL;
 788     LPVOID tt_head = NULL;
 789     LPVOID tt_post = NULL;
 790     LONG size;
 791
 792     hr = create_font_base(font);
 793     if (FAILED(hr))
 794         return hr;
 795
 796     This = impl_from_IDWriteFont2((IDWriteFont2*)*font);
 797
 798     hfont = CreateFontIndirectW(logfont);
 799     if (!hfont)
 800     {
 801         heap_free(This->data);
 802         heap_free(This);
 803         return DWRITE_E_NOFONT;
 804     }
 805
 806     hdc = CreateCompatibleDC(0);
 807     SelectObject(hdc, hfont);
 808
 809     ret = GetOutlineTextMetricsW(hdc, 0, NULL);
 810     otm = heap_alloc(ret);
 811     if (!otm)
 812     {
 813         heap_free(This->data);
 814         heap_free(This);
 815         DeleteDC(hdc);
 816         DeleteObject(hfont);
 817         return E_OUTOFMEMORY;
 818     }
 819     otm->otmSize = ret;
 820     ret = GetOutlineTextMetricsW(hdc, otm->otmSize, otm);
 821
 822     size = GetFontData(hdc, MS_OS2_TAG, 0, NULL, 0);
 823     if (size != GDI_ERROR)
 824     {
 825         tt_os2 = heap_alloc(size);
 826         GetFontData(hdc, MS_OS2_TAG, 0, tt_os2, size);
 827     }
 828     size = GetFontData(hdc, MS_HEAD_TAG, 0, NULL, 0);
 829     if (size != GDI_ERROR)
 830     {
 831         tt_head = heap_alloc(size);
 832         GetFontData(hdc, MS_HEAD_TAG, 0, tt_head, size);
 833     }
 834     size = GetFontData(hdc, MS_POST_TAG, 0, NULL, 0);
 835     if (size != GDI_ERROR)
 836     {
 837         tt_post = heap_alloc(size);
 838         GetFontData(hdc, MS_POST_TAG, 0, tt_post, size);
 839     }
 840
 841     get_font_properties(tt_os2, tt_head, tt_post, &This->data->metrics, &This->data->stretch, &This->data->weight, &This->data->style);
 842     heap_free(tt_os2);
 843     heap_free(tt_head);
 844     heap_free(tt_post);
 845
 846     if (logfont->lfItalic)
 847         This->data->style = DWRITE_FONT_STYLE_ITALIC;
 848
 849     DeleteDC(hdc);
 850     DeleteObject(hfont);
 851
 852     facename = (WCHAR*)((char*)otm + (ptrdiff_t)otm->otmpFaceName);
 853     familyname = (WCHAR*)((char*)otm + (ptrdiff_t)otm->otmpFamilyName);
 854     TRACE("facename=%s, familyname=%s\n", debugstr_w(facename), debugstr_w(familyname));
 855
 856     hr = create_localizedstrings(&name);
 857     if (FAILED(hr))
 858     {
 859         heap_free(This);
 860         return hr;
 861     }
 862     add_localizedstring(name, enusW, familyname);
 863     hr = create_fontfamily(name, &family);
 864
 865     heap_free(otm);
 866     if (hr != S_OK)
 867     {
 868         heap_free(This->data);
 869         heap_free(This);
 870         return hr;
 871     }
 872
 873     This->is_system = TRUE;
 874     This->family = family;
 875     This->data->simulations = DWRITE_FONT_SIMULATIONS_NONE;
 876     This->data->facename = heap_strdupW(logfont->lfFaceName);
 877
 878     return S_OK;
 879 }
 880
 881 static HRESULT WINAPI dwritefont_QueryInterface(IDWriteFont2 *iface, REFIID riid, void **obj)
 882 {
 883     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
 884
 885     TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), obj);
 886
 887     if (IsEqualIID(riid, &IID_IDWriteFont2) ||
 888         IsEqualIID(riid, &IID_IDWriteFont1) ||
 889         IsEqualIID(riid, &IID_IDWriteFont)  ||
 890         IsEqualIID(riid, &IID_IUnknown))
 891     {
 892         *obj = iface;
 893         IDWriteFont2_AddRef(iface);
 894         return S_OK;
 895     }
 896
 897     *obj = NULL;
 898     return E_NOINTERFACE;
 899 }
 900
 901 static ULONG WINAPI dwritefont_AddRef(IDWriteFont2 *iface)
 902 {
 903     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
 904     ULONG ref = InterlockedIncrement(&This->ref);
 905     TRACE("(%p)->(%d)\n", This, ref);
 906     return ref;
 907 }
 908
 909 static ULONG WINAPI dwritefont_Release(IDWriteFont2 *iface)
 910 {
 911     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
 912     ULONG ref = InterlockedDecrement(&This->ref);
 913
 914     TRACE("(%p)->(%d)\n", This, ref);
 915
 916     if (!ref)
 917     {
 918         if (This->face) IDWriteFontFace2_Release(This->face);
 919         if (This->family) IDWriteFontFamily_Release(This->family);
 920         _free_font_data(This->data);
 921         heap_free(This);
 922     }
 923
 924     return ref;
 925 }
 926
 927 static HRESULT WINAPI dwritefont_GetFontFamily(IDWriteFont2 *iface, IDWriteFontFamily **family)
 928 {
 929     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
 930     TRACE("(%p)->(%p)\n", This, family);
 931
 932     *family = This->family;
 933     IDWriteFontFamily_AddRef(*family);
 934     return S_OK;
 935 }
 936
 937 static DWRITE_FONT_WEIGHT WINAPI dwritefont_GetWeight(IDWriteFont2 *iface)
 938 {
 939     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
 940     TRACE("(%p)\n", This);
 941     return This->data->weight;
 942 }
 943
 944 static DWRITE_FONT_STRETCH WINAPI dwritefont_GetStretch(IDWriteFont2 *iface)
 945 {
 946     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
 947     TRACE("(%p)\n", This);
 948     return This->data->stretch;
 949 }
 950
 951 static DWRITE_FONT_STYLE WINAPI dwritefont_GetStyle(IDWriteFont2 *iface)
 952 {
 953     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
 954     TRACE("(%p)\n", This);
 955     return This->data->style;
 956 }
 957
 958 static BOOL WINAPI dwritefont_IsSymbolFont(IDWriteFont2 *iface)
 959 {
 960     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
 961     FIXME("(%p): stub\n", This);
 962     return FALSE;
 963 }
 964
 965 static HRESULT WINAPI dwritefont_GetFaceNames(IDWriteFont2 *iface, IDWriteLocalizedStrings **names)
 966 {
 967     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
 968     FIXME("(%p)->(%p): stub\n", This, names);
 969     return E_NOTIMPL;
 970 }
 971
 972 static HRESULT WINAPI dwritefont_GetInformationalStrings(IDWriteFont2 *iface,
 973     DWRITE_INFORMATIONAL_STRING_ID stringid, IDWriteLocalizedStrings **strings, BOOL *exists)
 974 {
 975     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
 976     struct dwrite_font_data *data = This->data;
 977     HRESULT hr;
 978
 979     TRACE("(%p)->(%d %p %p)\n", This, stringid, strings, exists);
 980
 981     *exists = FALSE;
 982     *strings = NULL;
 983
 984     if (stringid > DWRITE_INFORMATIONAL_STRING_POSTSCRIPT_CID_NAME || stringid == DWRITE_INFORMATIONAL_STRING_NONE)
 985         return S_OK;
 986
 987     if (!data->info_strings[stringid]) {
 988         IDWriteFontFace2 *fontface;
 989
 990         hr = get_fontface_from_font(This, &fontface);
 991         if (FAILED(hr))
 992             return hr;
 993
 994         hr = opentype_get_font_strings_from_id(fontface, stringid, &data->info_strings[stringid]);
 995         if (FAILED(hr) || !data->info_strings[stringid])
 996             return hr;
 997     }
 998
 999     hr = clone_localizedstring(data->info_strings[stringid], strings);
1000     if (FAILED(hr))
1001         return hr;
1002
1003     *exists = TRUE;
1004     return hr;
1005 }
1006
1007 static DWRITE_FONT_SIMULATIONS WINAPI dwritefont_GetSimulations(IDWriteFont2 *iface)
1008 {
1009     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
1010     TRACE("(%p)\n", This);
1011     return This->data->simulations;
1012 }
1013
1014 static void WINAPI dwritefont_GetMetrics(IDWriteFont2 *iface, DWRITE_FONT_METRICS *metrics)
1015 {
1016     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
1017
1018     TRACE("(%p)->(%p)\n", This, metrics);
1019     *metrics = This->data->metrics;
1020 }
1021
1022 static HRESULT WINAPI dwritefont_HasCharacter(IDWriteFont2 *iface, UINT32 value, BOOL *exists)
1023 {
1024     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
1025     IDWriteFontFace2 *fontface;
1026     UINT16 index;
1027     HRESULT hr;
1028
1029     TRACE("(%p)->(0x%08x %p)\n", This, value, exists);
1030
1031     *exists = FALSE;
1032
1033     hr = get_fontface_from_font(This, &fontface);
1034     if (FAILED(hr))
1035         return hr;
1036
1037     index = 0;
1038     hr = IDWriteFontFace2_GetGlyphIndices(fontface, &value, 1, &index);
1039     if (FAILED(hr))
1040         return hr;
1041
1042     *exists = index != 0;
1043     return S_OK;
1044 }
1045
1046 static HRESULT WINAPI dwritefont_CreateFontFace(IDWriteFont2 *iface, IDWriteFontFace **face)
1047 {
1048     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
1049     HRESULT hr;
1050
1051     TRACE("(%p)->(%p)\n", This, face);
1052
1053     hr = get_fontface_from_font(This, (IDWriteFontFace2**)face);
1054     if (hr == S_OK)
1055         IDWriteFontFace_AddRef(*face);
1056
1057     return hr;
1058 }
1059
1060 static void WINAPI dwritefont1_GetMetrics(IDWriteFont2 *iface, DWRITE_FONT_METRICS1 *metrics)
1061 {
1062     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
1063     FIXME("(%p)->(%p): stub\n", This, metrics);
1064 }
1065
1066 static void WINAPI dwritefont1_GetPanose(IDWriteFont2 *iface, DWRITE_PANOSE *panose)
1067 {
1068     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
1069     FIXME("(%p)->(%p): stub\n", This, panose);
1070 }
1071
1072 static HRESULT WINAPI dwritefont1_GetUnicodeRanges(IDWriteFont2 *iface, UINT32 max_count, DWRITE_UNICODE_RANGE *ranges, UINT32 *count)
1073 {
1074     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
1075     IDWriteFontFace2 *fontface;
1076     HRESULT hr;
1077
1078     TRACE("(%p)->(%u %p %p)\n", This, max_count, ranges, count);
1079
1080     hr = get_fontface_from_font(This, &fontface);
1081     if (FAILED(hr))
1082         return hr;
1083
1084     return IDWriteFontFace2_GetUnicodeRanges(fontface, max_count, ranges, count);
1085 }
1086
1087 static HRESULT WINAPI dwritefont1_IsMonospacedFont(IDWriteFont2 *iface)
1088 {
1089     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
1090     FIXME("(%p): stub\n", This);
1091     return FALSE;
1092 }
1093
1094 static HRESULT WINAPI dwritefont2_IsColorFont(IDWriteFont2 *iface)
1095 {
1096     struct dwrite_font *This = impl_from_IDWriteFont2(iface);
1097     FIXME("(%p): stub\n", This);
1098     return FALSE;
1099 }
1100
1101 static const IDWriteFont2Vtbl dwritefontvtbl = {
1102     dwritefont_QueryInterface,
1103     dwritefont_AddRef,
1104     dwritefont_Release,
1105     dwritefont_GetFontFamily,
1106     dwritefont_GetWeight,
1107     dwritefont_GetStretch,
1108     dwritefont_GetStyle,
1109     dwritefont_IsSymbolFont,
1110     dwritefont_GetFaceNames,
1111     dwritefont_GetInformationalStrings,
1112     dwritefont_GetSimulations,
1113     dwritefont_GetMetrics,
1114     dwritefont_HasCharacter,
1115     dwritefont_CreateFontFace,
1116     dwritefont1_GetMetrics,
1117     dwritefont1_GetPanose,
1118     dwritefont1_GetUnicodeRanges,
1119     dwritefont1_IsMonospacedFont,
1120     dwritefont2_IsColorFont
1121 };
1122
1123 static HRESULT WINAPI dwritefontfamily_QueryInterface(IDWriteFontFamily *iface, REFIID riid, void **obj)
1124 {
1125     struct dwrite_fontfamily *This = impl_from_IDWriteFontFamily(iface);
1126     TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), obj);
1127
1128     if (IsEqualIID(riid, &IID_IUnknown) ||
1129         IsEqualIID(riid, &IID_IDWriteFontList) ||
1130         IsEqualIID(riid, &IID_IDWriteFontFamily))
1131     {
1132         *obj = iface;
1133         IDWriteFontFamily_AddRef(iface);
1134         return S_OK;
1135     }
1136
1137     *obj = NULL;
1138     return E_NOINTERFACE;
1139 }
1140
1141 static ULONG WINAPI dwritefontfamily_AddRef(IDWriteFontFamily *iface)
1142 {
1143     struct dwrite_fontfamily *This = impl_from_IDWriteFontFamily(iface);
1144     ULONG ref = InterlockedIncrement(&This->ref);
1145     TRACE("(%p)->(%d)\n", This, ref);
1146     return ref;
1147 }
1148
1149 static ULONG WINAPI dwritefontfamily_Release(IDWriteFontFamily *iface)
1150 {
1151     struct dwrite_fontfamily *This = impl_from_IDWriteFontFamily(iface);
1152     ULONG ref = InterlockedDecrement(&This->ref);
1153
1154     TRACE("(%p)->(%d)\n", This, ref);
1155
1156     if (!ref)
1157     {
1158         if (This->collection)
1159             IDWriteFontCollection_Release(This->collection);
1160         _free_fontfamily_data(This->data);
1161         heap_free(This);
1162     }
1163
1164     return ref;
1165 }
1166
1167 static HRESULT WINAPI dwritefontfamily_GetFontCollection(IDWriteFontFamily *iface, IDWriteFontCollection **collection)
1168 {
1169     struct dwrite_fontfamily *This = impl_from_IDWriteFontFamily(iface);
1170     TRACE("(%p)->(%p)\n", This, collection);
1171     if (This->collection)
1172     {
1173         IDWriteFontCollection_AddRef(This->collection);
1174         *collection = This->collection;
1175         return S_OK;
1176     }
1177     else
1178         return E_NOTIMPL;
1179 }
1180
1181 static UINT32 WINAPI dwritefontfamily_GetFontCount(IDWriteFontFamily *iface)
1182 {
1183     struct dwrite_fontfamily *This = impl_from_IDWriteFontFamily(iface);
1184     TRACE("(%p)\n", This);
1185     return This->data->font_count;
1186 }
1187
1188 static HRESULT WINAPI dwritefontfamily_GetFont(IDWriteFontFamily *iface, UINT32 index, IDWriteFont **font)
1189 {
1190     struct dwrite_fontfamily *This = impl_from_IDWriteFontFamily(iface);
1191     TRACE("(%p)->(%u %p)\n", This, index, font);
1192     if (This->data->font_count > 0)
1193     {
1194         if (index >= This->data->font_count)
1195             return E_INVALIDARG;
1196         return create_font_from_data(This->data->fonts[index], iface, font);
1197     }
1198     else
1199         return E_NOTIMPL;
1200 }
1201
1202 static HRESULT WINAPI dwritefontfamily_GetFamilyNames(IDWriteFontFamily *iface, IDWriteLocalizedStrings **names)
1203 {
1204     struct dwrite_fontfamily *This = impl_from_IDWriteFontFamily(iface);
1205     return clone_localizedstring(This->data->familyname, names);
1206 }
1207
1208 static HRESULT WINAPI dwritefontfamily_GetFirstMatchingFont(IDWriteFontFamily *iface, DWRITE_FONT_WEIGHT weight,
1209     DWRITE_FONT_STRETCH stretch, DWRITE_FONT_STYLE style, IDWriteFont **font)
1210 {
1211     struct dwrite_fontfamily *This = impl_from_IDWriteFontFamily(iface);
1212     LOGFONTW lf;
1213
1214     TRACE("(%p)->(%d %d %d %p)\n", This, weight, stretch, style, font);
1215
1216     /* fallback for system font collections */
1217     if (This->data->font_count == 0)
1218     {
1219         memset(&lf, 0, sizeof(lf));
1220         lf.lfWeight = weight;
1221         lf.lfItalic = style == DWRITE_FONT_STYLE_ITALIC;
1222         IDWriteLocalizedStrings_GetString(This->data->familyname, 0, lf.lfFaceName, LF_FACESIZE);
1223
1224         return create_font_from_logfont(&lf, font);
1225     }
1226     else
1227     {
1228         int i;
1229         for (i = 0; i < This->data->font_count; i++)
1230         {
1231             if (style == This->data->fonts[i]->style &&
1232                 weight == This->data->fonts[i]->weight &&
1233                 stretch == This->data->fonts[i]->stretch)
1234             {
1235                 return create_font_from_data(This->data->fonts[i], iface, font);
1236             }
1237         }
1238         return DWRITE_E_NOFONT;
1239     }
1240 }
1241
1242 static HRESULT WINAPI dwritefontfamily_GetMatchingFonts(IDWriteFontFamily *iface, DWRITE_FONT_WEIGHT weight,
1243     DWRITE_FONT_STRETCH stretch, DWRITE_FONT_STYLE style, IDWriteFontList **fonts)
1244 {
1245     struct dwrite_fontfamily *This = impl_from_IDWriteFontFamily(iface);
1246     FIXME("(%p)->(%d %d %d %p): stub\n", This, weight, stretch, style, fonts);
1247     return E_NOTIMPL;
1248 }
1249
1250 static const IDWriteFontFamilyVtbl fontfamilyvtbl = {
1251     dwritefontfamily_QueryInterface,
1252     dwritefontfamily_AddRef,
1253     dwritefontfamily_Release,
1254     dwritefontfamily_GetFontCollection,
1255     dwritefontfamily_GetFontCount,
1256     dwritefontfamily_GetFont,
1257     dwritefontfamily_GetFamilyNames,
1258     dwritefontfamily_GetFirstMatchingFont,
1259     dwritefontfamily_GetMatchingFonts
1260 };
1261
1262 static HRESULT WINAPI dwritefontcollection_QueryInterface(IDWriteFontCollection *iface, REFIID riid, void **obj)
1263 {
1264     struct dwrite_fontcollection *This = impl_from_IDWriteFontCollection(iface);
1265     TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), obj);
1266
1267     if (IsEqualIID(riid, &IID_IUnknown) ||
1268         IsEqualIID(riid, &IID_IDWriteFontCollection))
1269     {
1270         *obj = iface;
1271         IDWriteFontCollection_AddRef(iface);
1272         return S_OK;
1273     }
1274
1275     *obj = NULL;
1276     return E_NOINTERFACE;
1277 }
1278
1279 static ULONG WINAPI dwritefontcollection_AddRef(IDWriteFontCollection *iface)
1280 {
1281     struct dwrite_fontcollection *This = impl_from_IDWriteFontCollection(iface);
1282     ULONG ref = InterlockedIncrement(&This->ref);
1283     TRACE("(%p)->(%d)\n", This, ref);
1284     return ref;
1285 }
1286
1287 static ULONG WINAPI dwritefontcollection_Release(IDWriteFontCollection *iface)
1288 {
1289     unsigned int i;
1290     struct dwrite_fontcollection *This = impl_from_IDWriteFontCollection(iface);
1291     ULONG ref = InterlockedDecrement(&This->ref);
1292     TRACE("(%p)->(%d)\n", This, ref);
1293
1294     if (!ref)
1295     {
1296         for (i = 0; i < This->count; i++)
1297             heap_free(This->families[i]);
1298         heap_free(This->families);
1299         for (i = 0; i < This->data_count; i++)
1300             _free_fontfamily_data(This->family_data[i]);
1301         heap_free(This->family_data);
1302         heap_free(This);
1303     }
1304
1305     return ref;
1306 }
1307
1308 static UINT32 WINAPI dwritefontcollection_GetFontFamilyCount(IDWriteFontCollection *iface)
1309 {
1310     struct dwrite_fontcollection *This = impl_from_IDWriteFontCollection(iface);
1311     TRACE("(%p)\n", This);
1312     if (This->data_count)
1313         return This->data_count;
1314     return This->count;
1315 }
1316
1317 static HRESULT WINAPI dwritefontcollection_GetFontFamily(IDWriteFontCollection *iface, UINT32 index, IDWriteFontFamily **family)
1318 {
1319     struct dwrite_fontcollection *This = impl_from_IDWriteFontCollection(iface);
1320     HRESULT hr;
1321     IDWriteLocalizedStrings *familyname;
1322     static const WCHAR enusW[] = {'e','n','-','u','s',0};
1323
1324     TRACE("(%p)->(%u %p)\n", This, index, family);
1325
1326     if (This->data_count)
1327     {
1328         if (index >= This->data_count)
1329         {
1330             *family = NULL;
1331             return E_FAIL;
1332         }
1333         else
1334             return create_fontfamily_from_data(This->family_data[index], iface, family);
1335     }
1336     else
1337     {
1338         if (index >= This->count)
1339         {
1340             *family = NULL;
1341             return E_FAIL;
1342         }
1343
1344         hr = create_localizedstrings(&familyname);
1345         if (FAILED(hr))
1346             return hr;
1347         add_localizedstring(familyname, enusW, This->families[index]);
1348
1349         return create_fontfamily(familyname, family);
1350     }
1351 }
1352
1353 static HRESULT WINAPI dwritefontcollection_FindFamilyName(IDWriteFontCollection *iface, const WCHAR *name, UINT32 *index, BOOL *exists)
1354 {
1355     struct dwrite_fontcollection *This = impl_from_IDWriteFontCollection(iface);
1356     UINT32 i;
1357
1358     TRACE("(%p)->(%s %p %p)\n", This, debugstr_w(name), index, exists);
1359
1360     if (This->data_count)
1361     {
1362         for (i = 0; i < This->data_count; i++)
1363         {
1364             HRESULT hr;
1365             IDWriteLocalizedStrings *family_name = This->family_data[i]->familyname;
1366             int j;
1367             for (j = 0; j < IDWriteLocalizedStrings_GetCount(family_name); j ++)
1368             {
1369                 WCHAR buffer[255];
1370                 hr = IDWriteLocalizedStrings_GetString(family_name, j, buffer, 255);
1371                 if (SUCCEEDED(hr))
1372                 {
1373                     if (!strcmpW(buffer, name))
1374                     {
1375                         *index = i;
1376                         *exists = TRUE;
1377                         return S_OK;
1378                     }
1379                 }
1380             }
1381         }
1382         *index = (UINT32)-1;
1383         *exists = FALSE;
1384     }
1385     else
1386     {
1387         for (i = 0; i < This->count; i++)
1388             if (!strcmpW(This->families[i], name))
1389             {
1390                 *index = i;
1391                 *exists = TRUE;
1392                 return S_OK;
1393             }
1394
1395         *index = (UINT32)-1;
1396         *exists = FALSE;
1397     }
1398
1399     return S_OK;
1400 }
1401
1402 static HRESULT WINAPI dwritefontcollection_GetFontFromFontFace(IDWriteFontCollection *iface, IDWriteFontFace *face, IDWriteFont **font)
1403 {
1404     struct dwrite_fontcollection *This = impl_from_IDWriteFontCollection(iface);
1405     FIXME("(%p)->(%p %p): stub\n", This, face, font);
1406     return E_NOTIMPL;
1407 }
1408
1409 static const IDWriteFontCollectionVtbl fontcollectionvtbl = {
1410     dwritefontcollection_QueryInterface,
1411     dwritefontcollection_AddRef,
1412     dwritefontcollection_Release,
1413     dwritefontcollection_GetFontFamilyCount,
1414     dwritefontcollection_GetFontFamily,
1415     dwritefontcollection_FindFamilyName,
1416     dwritefontcollection_GetFontFromFontFace
1417 };
1418
1419 static HRESULT add_family_syscollection(struct dwrite_fontcollection *collection, const WCHAR *family)
1420 {
1421     /* check for duplicate family name */
1422     if (collection->count && !strcmpW(collection->families[collection->count-1], family)) return S_OK;
1423
1424     /* double array length */
1425     if (collection->count == collection->alloc)
1426     {
1427         collection->alloc *= 2;
1428         collection->families = heap_realloc(collection->families, collection->alloc*sizeof(WCHAR*));
1429     }
1430
1431     collection->families[collection->count++] = heap_strdupW(family);
1432     TRACE("family name %s\n", debugstr_w(family));
1433
1434     return S_OK;
1435 }
1436
1437 static INT CALLBACK enum_font_families(const LOGFONTW *lf, const TEXTMETRICW *tm, DWORD type, LPARAM lParam)
1438 {
1439     struct dwrite_fontcollection *collection = (struct dwrite_fontcollection*)lParam;
1440     return add_family_syscollection(collection, lf->lfFaceName) == S_OK;
1441 }
1442
1443 HRESULT get_system_fontcollection(IDWriteFontCollection **collection)
1444 {
1445     struct dwrite_fontcollection *This;
1446     LOGFONTW lf;
1447     HDC hdc;
1448
1449     *collection = NULL;
1450
1451     This = heap_alloc(sizeof(struct dwrite_fontcollection));
1452     if (!This) return E_OUTOFMEMORY;
1453
1454     This->IDWriteFontCollection_iface.lpVtbl = &fontcollectionvtbl;
1455     This->ref = 1;
1456     This->alloc = 50;
1457     This->count = 0;
1458     This->families = heap_alloc(This->alloc*sizeof(WCHAR*));
1459     if (!This->families)
1460     {
1461         heap_free(This);
1462         return E_OUTOFMEMORY;
1463     }
1464     This->data_count = 0;
1465     This->data_alloc = 2;
1466     This->family_data = heap_alloc(sizeof(*This->family_data)*2);
1467     if (!This->family_data)
1468     {
1469         heap_free(This->families);
1470         heap_free(This);
1471         return E_OUTOFMEMORY;
1472     }
1473
1474     TRACE("building system font collection:\n");
1475
1476     hdc = CreateCompatibleDC(0);
1477     memset(&lf, 0, sizeof(lf));
1478     lf.lfCharSet = DEFAULT_CHARSET;
1479     lf.lfPitchAndFamily = DEFAULT_PITCH;
1480     lf.lfFaceName[0] = 0;
1481     EnumFontFamiliesExW(hdc, &lf, enum_font_families, (LPARAM)This, 0);
1482     DeleteDC(hdc);
1483
1484     *collection = &This->IDWriteFontCollection_iface;
1485
1486     return S_OK;
1487 }
1488
1489 static HRESULT create_fontfamily_from_data(struct dwrite_fontfamily_data *data, IDWriteFontCollection *collection, IDWriteFontFamily **family)
1490 {
1491     struct dwrite_fontfamily *This;
1492
1493     *family = NULL;
1494
1495     This = heap_alloc(sizeof(struct dwrite_fontfamily));
1496     if (!This) return E_OUTOFMEMORY;
1497
1498     This->IDWriteFontFamily_iface.lpVtbl = &fontfamilyvtbl;
1499     This->ref = 1;
1500     This->collection = collection;
1501     if (collection)
1502         IDWriteFontCollection_AddRef(collection);
1503     This->data = data;
1504     InterlockedIncrement(&This->data->ref);
1505
1506     *family = &This->IDWriteFontFamily_iface;
1507
1508     return S_OK;
1509 }
1510
1511 static HRESULT create_fontfamily(IDWriteLocalizedStrings *familyname, IDWriteFontFamily **family)
1512 {
1513     struct dwrite_fontfamily_data *data;
1514     HRESULT ret;
1515
1516     data = heap_alloc(sizeof(struct dwrite_fontfamily_data));
1517     if (!data) return E_OUTOFMEMORY;
1518
1519     data->ref = 0;
1520     data->font_count = 0;
1521     data->alloc = 2;
1522     data->fonts = heap_alloc(sizeof(*data->fonts) * 2);
1523     if (!data->fonts)
1524     {
1525         heap_free(data);
1526         return E_OUTOFMEMORY;
1527     }
1528     data->familyname = familyname;
1529
1530     ret = create_fontfamily_from_data(data, NULL, family);
1531     if (FAILED(ret))
1532     {
1533         heap_free(data->fonts);
1534         heap_free(data);
1535     }
1536
1537     return ret;
1538 }
1539
1540 static HRESULT create_font_from_data(struct dwrite_font_data *data, IDWriteFontFamily *family, IDWriteFont **font)
1541 {
1542     struct dwrite_font *This;
1543     *font = NULL;
1544
1545     This = heap_alloc(sizeof(struct dwrite_font));
1546     if (!This) return E_OUTOFMEMORY;
1547
1548     This->IDWriteFont2_iface.lpVtbl = &dwritefontvtbl;
1549     This->ref = 1;
1550     This->face = NULL;
1551     This->family = family;
1552     if (family)
1553         IDWriteFontFamily_AddRef(family);
1554     This->is_system = FALSE;
1555     This->data = data;
1556     InterlockedIncrement(&This->data->ref);
1557
1558     *font = (IDWriteFont*)&This->IDWriteFont2_iface;
1559
1560     return S_OK;
1561 }
1562
1563 static HRESULT WINAPI dwritefontfile_QueryInterface(IDWriteFontFile *iface, REFIID riid, void **obj)
1564 {
1565     struct dwrite_fontfile *This = impl_from_IDWriteFontFile(iface);
1566
1567     TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), obj);
1568
1569     if (IsEqualIID(riid, &IID_IUnknown) || IsEqualIID(riid, &IID_IDWriteFontFile))
1570     {
1571         *obj = iface;
1572         IDWriteFontFile_AddRef(iface);
1573         return S_OK;
1574     }
1575
1576     *obj = NULL;
1577     return E_NOINTERFACE;
1578 }
1579
1580 static ULONG WINAPI dwritefontfile_AddRef(IDWriteFontFile *iface)
1581 {
1582     struct dwrite_fontfile *This = impl_from_IDWriteFontFile(iface);
1583     ULONG ref = InterlockedIncrement(&This->ref);
1584     TRACE("(%p)->(%d)\n", This, ref);
1585     return ref;
1586 }
1587
1588 static ULONG WINAPI dwritefontfile_Release(IDWriteFontFile *iface)
1589 {
1590     struct dwrite_fontfile *This = impl_from_IDWriteFontFile(iface);
1591     ULONG ref = InterlockedDecrement(&This->ref);
1592
1593     TRACE("(%p)->(%d)\n", This, ref);
1594
1595     if (!ref)
1596     {
1597         IDWriteFontFileLoader_Release(This->loader);
1598         if (This->stream) IDWriteFontFileStream_Release(This->stream);
1599         heap_free(This->reference_key);
1600         heap_free(This);
1601     }
1602
1603     return ref;
1604 }
1605
1606 static HRESULT WINAPI dwritefontfile_GetReferenceKey(IDWriteFontFile *iface, const void **fontFileReferenceKey, UINT32 *fontFileReferenceKeySize)
1607 {
1608     struct dwrite_fontfile *This = impl_from_IDWriteFontFile(iface);
1609     TRACE("(%p)->(%p, %p)\n", This, fontFileReferenceKey, fontFileReferenceKeySize);
1610     *fontFileReferenceKey = This->reference_key;
1611     *fontFileReferenceKeySize = This->key_size;
1612
1613     return S_OK;
1614 }
1615
1616 static HRESULT WINAPI dwritefontfile_GetLoader(IDWriteFontFile *iface, IDWriteFontFileLoader **fontFileLoader)
1617 {
1618     struct dwrite_fontfile *This = impl_from_IDWriteFontFile(iface);
1619     TRACE("(%p)->(%p)\n", This, fontFileLoader);
1620     *fontFileLoader = This->loader;
1621     IDWriteFontFileLoader_AddRef(This->loader);
1622
1623     return S_OK;
1624 }
1625
1626 static HRESULT WINAPI dwritefontfile_Analyze(IDWriteFontFile *iface, BOOL *isSupportedFontType, DWRITE_FONT_FILE_TYPE *fontFileType, DWRITE_FONT_FACE_TYPE *fontFaceType, UINT32 *numberOfFaces)
1627 {
1628     struct dwrite_fontfile *This = impl_from_IDWriteFontFile(iface);
1629     IDWriteFontFileStream *stream;
1630     HRESULT hr;
1631
1632     FIXME("(%p)->(%p, %p, %p, %p): Stub\n", This, isSupportedFontType, fontFileType, fontFaceType, numberOfFaces);
1633
1634     *isSupportedFontType = FALSE;
1635     *fontFileType = DWRITE_FONT_FILE_TYPE_UNKNOWN;
1636     if (fontFaceType)
1637         *fontFaceType = DWRITE_FONT_FACE_TYPE_UNKNOWN;
1638     *numberOfFaces = 0;
1639
1640     hr = IDWriteFontFileLoader_CreateStreamFromKey(This->loader, This->reference_key, This->key_size, &stream);
1641     if (FAILED(hr))
1642         return S_OK;
1643
1644     hr = opentype_analyze_font(stream, numberOfFaces, fontFileType, fontFaceType, isSupportedFontType);
1645
1646     /* TODO: Further Analysis */
1647     IDWriteFontFileStream_Release(stream);
1648     return S_OK;
1649 }
1650
1651 static const IDWriteFontFileVtbl dwritefontfilevtbl = {
1652     dwritefontfile_QueryInterface,
1653     dwritefontfile_AddRef,
1654     dwritefontfile_Release,
1655     dwritefontfile_GetReferenceKey,
1656     dwritefontfile_GetLoader,
1657     dwritefontfile_Analyze,
1658 };
1659
1660 HRESULT create_font_file(IDWriteFontFileLoader *loader, const void *reference_key, UINT32 key_size, IDWriteFontFile **font_file)
1661 {
1662     struct dwrite_fontfile *This;
1663
1664     This = heap_alloc(sizeof(struct dwrite_fontfile));
1665     if (!This) return E_OUTOFMEMORY;
1666
1667     This->IDWriteFontFile_iface.lpVtbl = &dwritefontfilevtbl;
1668     This->ref = 1;
1669     IDWriteFontFileLoader_AddRef(loader);
1670     This->loader = loader;
1671     This->stream = NULL;
1672     This->reference_key = heap_alloc(key_size);
1673     memcpy(This->reference_key, reference_key, key_size);
1674     This->key_size = key_size;
1675
1676     *font_file = &This->IDWriteFontFile_iface;
1677
1678     return S_OK;
1679 }
1680
1681 HRESULT create_fontface(DWRITE_FONT_FACE_TYPE facetype, UINT32 files_number, IDWriteFontFile* const* font_files, UINT32 index,
1682     DWRITE_FONT_SIMULATIONS simulations, IDWriteFontFace2 **ret)
1683 {
1684     struct dwrite_fontface *fontface;
1685     HRESULT hr = S_OK;
1686     int i;
1687
1688     fontface = heap_alloc(sizeof(struct dwrite_fontface));
1689     if (!fontface)
1690         return E_OUTOFMEMORY;
1691
1692     fontface->files = heap_alloc(sizeof(*fontface->files) * files_number);
1693     if (!fontface->files) {
1694         heap_free(fontface);
1695         return E_OUTOFMEMORY;
1696     }
1697
1698     fontface->IDWriteFontFace2_iface.lpVtbl = &dwritefontfacevtbl;
1699     fontface->ref = 1;
1700     fontface->type = facetype;
1701     fontface->file_count = files_number;
1702     fontface->cmap.data = NULL;
1703     fontface->cmap.context = NULL;
1704     fontface->cmap.size = 0;
1705
1706     /* Verify font file streams */
1707     for (i = 0; i < fontface->file_count && SUCCEEDED(hr); i++)
1708     {
1709         IDWriteFontFileStream *stream;
1710         hr = _dwritefontfile_GetFontFileStream(font_files[i], &stream);
1711         if (SUCCEEDED(hr))
1712             IDWriteFontFileStream_Release(stream);
1713     }
1714
1715     if (FAILED(hr)) {
1716         heap_free(fontface->files);
1717         heap_free(fontface);
1718         return hr;
1719     }
1720
1721     for (i = 0; i < fontface->file_count; i++) {
1722         fontface->files[i] = font_files[i];
1723         IDWriteFontFile_AddRef(font_files[i]);
1724     }
1725
1726     fontface->index = index;
1727     fontface->simulations = simulations;
1728     fontface->is_system = FALSE;
1729
1730     *ret = &fontface->IDWriteFontFace2_iface;
1731     return S_OK;
1732 }
1733
1734 /* IDWriteLocalFontFileLoader and its required IDWriteFontFileStream */
1735
1736 struct dwrite_localfontfilestream
1737 {
1738     IDWriteFontFileStream IDWriteFontFileStream_iface;
1739     LONG ref;
1740
1741     HANDLE handle;
1742 };
1743
1744 struct dwrite_localfontfileloader {
1745     IDWriteLocalFontFileLoader IDWriteLocalFontFileLoader_iface;
1746     LONG ref;
1747 };
1748
1749 static inline struct dwrite_localfontfileloader *impl_from_IDWriteLocalFontFileLoader(IDWriteLocalFontFileLoader *iface)
1750 {
1751     return CONTAINING_RECORD(iface, struct dwrite_localfontfileloader, IDWriteLocalFontFileLoader_iface);
1752 }
1753
1754 static inline struct dwrite_localfontfilestream *impl_from_IDWriteFontFileStream(IDWriteFontFileStream *iface)
1755 {
1756     return CONTAINING_RECORD(iface, struct dwrite_localfontfilestream, IDWriteFontFileStream_iface);
1757 }
1758
1759 static HRESULT WINAPI localfontfilestream_QueryInterface(IDWriteFontFileStream *iface, REFIID riid, void **obj)
1760 {
1761     struct dwrite_localfontfilestream *This = impl_from_IDWriteFontFileStream(iface);
1762     TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), obj);
1763     if (IsEqualIID(riid, &IID_IUnknown) || IsEqualIID(riid, &IID_IDWriteFontFileStream))
1764     {
1765         *obj = iface;
1766         IDWriteFontFileStream_AddRef(iface);
1767         return S_OK;
1768     }
1769
1770     *obj = NULL;
1771     return E_NOINTERFACE;
1772 }
1773
1774 static ULONG WINAPI localfontfilestream_AddRef(IDWriteFontFileStream *iface)
1775 {
1776     struct dwrite_localfontfilestream *This = impl_from_IDWriteFontFileStream(iface);
1777     ULONG ref = InterlockedIncrement(&This->ref);
1778     TRACE("(%p)->(%d)\n", This, ref);
1779     return ref;
1780 }
1781
1782 static ULONG WINAPI localfontfilestream_Release(IDWriteFontFileStream *iface)
1783 {
1784     struct dwrite_localfontfilestream *This = impl_from_IDWriteFontFileStream(iface);
1785     ULONG ref = InterlockedDecrement(&This->ref);
1786
1787     TRACE("(%p)->(%d)\n", This, ref);
1788
1789     if (!ref)
1790     {
1791         if (This->handle != INVALID_HANDLE_VALUE)
1792             CloseHandle(This->handle);
1793         heap_free(This);
1794     }
1795
1796     return ref;
1797 }
1798
1799 static HRESULT WINAPI localfontfilestream_ReadFileFragment(IDWriteFontFileStream *iface, void const **fragment_start, UINT64 offset, UINT64 fragment_size, void **fragment_context)
1800 {
1801     struct dwrite_localfontfilestream *This = impl_from_IDWriteFontFileStream(iface);
1802     LARGE_INTEGER distance;
1803     DWORD bytes = fragment_size;
1804     DWORD read;
1805
1806     TRACE("(%p)->(%p, %s, %s, %p)\n",This, fragment_start,
1807           wine_dbgstr_longlong(offset), wine_dbgstr_longlong(fragment_size), fragment_context);
1808
1809     *fragment_context = NULL;
1810     distance.QuadPart = offset;
1811     if (!SetFilePointerEx(This->handle, distance, NULL, FILE_BEGIN))
1812         return E_FAIL;
1813     *fragment_start = *fragment_context = heap_alloc(bytes);
1814     if (!*fragment_context)
1815         return E_FAIL;
1816     if (!ReadFile(This->handle, *fragment_context, bytes, &read, NULL))
1817     {
1818         heap_free(*fragment_context);
1819         return E_FAIL;
1820     }
1821
1822     return S_OK;
1823 }
1824
1825 static void WINAPI localfontfilestream_ReleaseFileFragment(IDWriteFontFileStream *iface, void *fragment_context)
1826 {
1827     struct dwrite_localfontfilestream *This = impl_from_IDWriteFontFileStream(iface);
1828     TRACE("(%p)->(%p)\n", This, fragment_context);
1829     heap_free(fragment_context);
1830 }
1831
1832 static HRESULT WINAPI localfontfilestream_GetFileSize(IDWriteFontFileStream *iface, UINT64 *size)
1833 {
1834     struct dwrite_localfontfilestream *This = impl_from_IDWriteFontFileStream(iface);
1835     LARGE_INTEGER li;
1836     TRACE("(%p)->(%p)\n",This, size);
1837     GetFileSizeEx(This->handle, &li);
1838     *size = li.QuadPart;
1839     return S_OK;
1840 }
1841
1842 static HRESULT WINAPI localfontfilestream_GetLastWriteTime(IDWriteFontFileStream *iface, UINT64 *last_writetime)
1843 {
1844     struct dwrite_localfontfilestream *This = impl_from_IDWriteFontFileStream(iface);
1845     FIXME("(%p)->(%p): stub\n",This, last_writetime);
1846     *last_writetime = 0;
1847     return E_NOTIMPL;
1848 }
1849
1850 static const IDWriteFontFileStreamVtbl localfontfilestreamvtbl =
1851 {
1852     localfontfilestream_QueryInterface,
1853     localfontfilestream_AddRef,
1854     localfontfilestream_Release,
1855     localfontfilestream_ReadFileFragment,
1856     localfontfilestream_ReleaseFileFragment,
1857     localfontfilestream_GetFileSize,
1858     localfontfilestream_GetLastWriteTime
1859 };
1860
1861 static HRESULT create_localfontfilestream(HANDLE handle, IDWriteFontFileStream** iface)
1862 {
1863     struct dwrite_localfontfilestream *This = heap_alloc(sizeof(struct dwrite_localfontfilestream));
1864     if (!This)
1865         return E_OUTOFMEMORY;
1866
1867     This->ref = 1;
1868     This->handle = handle;
1869     This->IDWriteFontFileStream_iface.lpVtbl = &localfontfilestreamvtbl;
1870
1871     *iface = &This->IDWriteFontFileStream_iface;
1872     return S_OK;
1873 }
1874
1875 static HRESULT WINAPI localfontfileloader_QueryInterface(IDWriteLocalFontFileLoader *iface, REFIID riid, void **obj)
1876 {
1877     struct dwrite_localfontfileloader *This = impl_from_IDWriteLocalFontFileLoader(iface);
1878
1879     TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), obj);
1880
1881     if (IsEqualIID(riid, &IID_IUnknown) || IsEqualIID(riid, &IID_IDWriteFontFileLoader) || IsEqualIID(riid, &IID_IDWriteLocalFontFileLoader))
1882     {
1883         *obj = iface;
1884         IDWriteLocalFontFileLoader_AddRef(iface);
1885         return S_OK;
1886     }
1887
1888     *obj = NULL;
1889     return E_NOINTERFACE;
1890 }
1891
1892 static ULONG WINAPI localfontfileloader_AddRef(IDWriteLocalFontFileLoader *iface)
1893 {
1894     struct dwrite_localfontfileloader *This = impl_from_IDWriteLocalFontFileLoader(iface);
1895     ULONG ref = InterlockedIncrement(&This->ref);
1896     TRACE("(%p)->(%d)\n", This, ref);
1897     return ref;
1898 }
1899
1900 static ULONG WINAPI localfontfileloader_Release(IDWriteLocalFontFileLoader *iface)
1901 {
1902     struct dwrite_localfontfileloader *This = impl_from_IDWriteLocalFontFileLoader(iface);
1903     ULONG ref = InterlockedDecrement(&This->ref);
1904
1905     TRACE("(%p)->(%d)\n", This, ref);
1906
1907     if (!ref)
1908         heap_free(This);
1909
1910     return ref;
1911 }
1912
1913 static HRESULT WINAPI localfontfileloader_CreateStreamFromKey(IDWriteLocalFontFileLoader *iface, const void *fontFileReferenceKey, UINT32 fontFileReferenceKeySize, IDWriteFontFileStream **fontFileStream)
1914 {
1915     HANDLE handle;
1916     struct dwrite_localfontfileloader *This = impl_from_IDWriteLocalFontFileLoader(iface);
1917     const WCHAR *name = (const WCHAR*)fontFileReferenceKey;
1918
1919     TRACE("(%p)->(%p, %i, %p)\n",This, fontFileReferenceKey, fontFileReferenceKeySize, fontFileStream);
1920
1921     TRACE("name: %s\n",debugstr_w(name));
1922     handle = CreateFileW(name, GENERIC_READ, FILE_SHARE_READ|FILE_SHARE_WRITE,
1923                          NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
1924
1925     if (handle == INVALID_HANDLE_VALUE)
1926         return E_FAIL;
1927
1928     return create_localfontfilestream(handle, fontFileStream);
1929 }
1930
1931 static HRESULT WINAPI localfontfileloader_GetFilePathLengthFromKey(IDWriteLocalFontFileLoader *iface, void const *key, UINT32 key_size, UINT32 *length)
1932 {
1933     struct dwrite_localfontfileloader *This = impl_from_IDWriteLocalFontFileLoader(iface);
1934     TRACE("(%p)->(%p, %i, %p)\n",This, key, key_size, length);
1935     *length = key_size;
1936     return S_OK;
1937 }
1938
1939 static HRESULT WINAPI localfontfileloader_GetFilePathFromKey(IDWriteLocalFontFileLoader *iface, void const *key, UINT32 key_size, WCHAR *path, UINT32 length)
1940 {
1941     struct dwrite_localfontfileloader *This = impl_from_IDWriteLocalFontFileLoader(iface);
1942     TRACE("(%p)->(%p, %i, %p, %i)\n",This, key, key_size, path, length);
1943     if (length < key_size)
1944         return E_INVALIDARG;
1945     lstrcpynW((WCHAR*)key, path, key_size);
1946     return S_OK;
1947 }
1948
1949 static HRESULT WINAPI localfontfileloader_GetLastWriteTimeFromKey(IDWriteLocalFontFileLoader *iface, void const *key, UINT32 key_size, FILETIME *writetime)
1950 {
1951     struct dwrite_localfontfileloader *This = impl_from_IDWriteLocalFontFileLoader(iface);
1952     FIXME("(%p)->(%p, %i, %p):stub\n",This, key, key_size, writetime);
1953     return E_NOTIMPL;
1954 }
1955
1956 static const struct IDWriteLocalFontFileLoaderVtbl localfontfileloadervtbl = {
1957     localfontfileloader_QueryInterface,
1958     localfontfileloader_AddRef,
1959     localfontfileloader_Release,
1960     localfontfileloader_CreateStreamFromKey,
1961     localfontfileloader_GetFilePathLengthFromKey,
1962     localfontfileloader_GetFilePathFromKey,
1963     localfontfileloader_GetLastWriteTimeFromKey
1964 };
1965
1966 HRESULT create_localfontfileloader(IDWriteLocalFontFileLoader** iface)
1967 {
1968     struct dwrite_localfontfileloader *This = heap_alloc(sizeof(struct dwrite_localfontfileloader));
1969     if (!This)
1970         return E_OUTOFMEMORY;
1971
1972     This->ref = 1;
1973     This->IDWriteLocalFontFileLoader_iface.lpVtbl = &localfontfileloadervtbl;
1974
1975     *iface = &This->IDWriteLocalFontFileLoader_iface;
1976     return S_OK;
1977 }