wine-wine/dlls/dwrite/gdiinterop.c

1122 lines
34 KiB
C

/*
* GDI Interop
*
* Copyright 2011 Huw Davies
* Copyright 2012, 2014-2018 Nikolay Sivov for CodeWeavers
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
*/
#define COBJMACROS
#include <stdarg.h>
#include "windef.h"
#include "winbase.h"
#include "wingdi.h"
#include "dwrite_private.h"
#include "wine/debug.h"
WINE_DEFAULT_DEBUG_CHANNEL(dwrite);
struct dib_data {
DWORD *ptr;
int stride;
int width;
};
struct rendertarget
{
IDWriteBitmapRenderTarget1 IDWriteBitmapRenderTarget1_iface;
ID2D1SimplifiedGeometrySink ID2D1SimplifiedGeometrySink_iface;
LONG refcount;
IDWriteFactory7 *factory;
DWRITE_TEXT_ANTIALIAS_MODE antialiasmode;
FLOAT ppdip;
DWRITE_MATRIX m;
SIZE size;
HDC hdc;
struct dib_data dib;
};
struct gdiinterop
{
IDWriteGdiInterop1 IDWriteGdiInterop1_iface;
IDWriteFontFileLoader IDWriteFontFileLoader_iface;
LONG refcount;
IDWriteFactory7 *factory;
};
struct memresource_stream {
IDWriteFontFileStream IDWriteFontFileStream_iface;
LONG ref;
DWORD key;
};
static inline int get_dib_stride(int width, int bpp)
{
return ((width * bpp + 31) >> 3) & ~3;
}
static HRESULT create_target_dibsection(struct rendertarget *target, UINT32 width, UINT32 height)
{
char bmibuf[FIELD_OFFSET(BITMAPINFO, bmiColors[256])];
BITMAPINFO *bmi = (BITMAPINFO*)bmibuf;
HBITMAP hbm;
target->size.cx = width;
target->size.cy = height;
memset(bmi, 0, sizeof(bmibuf));
bmi->bmiHeader.biSize = sizeof(bmi->bmiHeader);
bmi->bmiHeader.biHeight = -height;
bmi->bmiHeader.biWidth = width;
bmi->bmiHeader.biBitCount = 32;
bmi->bmiHeader.biPlanes = 1;
bmi->bmiHeader.biCompression = BI_RGB;
hbm = CreateDIBSection(target->hdc, bmi, DIB_RGB_COLORS, (void**)&target->dib.ptr, NULL, 0);
if (!hbm) {
hbm = CreateBitmap(1, 1, 1, 1, NULL);
target->dib.ptr = NULL;
target->dib.stride = 0;
target->dib.width = 0;
}
else {
target->dib.stride = get_dib_stride(width, 32);
target->dib.width = width;
}
DeleteObject(SelectObject(target->hdc, hbm));
return S_OK;
}
static inline struct rendertarget *impl_from_IDWriteBitmapRenderTarget1(IDWriteBitmapRenderTarget1 *iface)
{
return CONTAINING_RECORD(iface, struct rendertarget, IDWriteBitmapRenderTarget1_iface);
}
static inline struct rendertarget *impl_from_ID2D1SimplifiedGeometrySink(ID2D1SimplifiedGeometrySink *iface)
{
return CONTAINING_RECORD(iface, struct rendertarget, ID2D1SimplifiedGeometrySink_iface);
}
static inline struct gdiinterop *impl_from_IDWriteGdiInterop1(IDWriteGdiInterop1 *iface)
{
return CONTAINING_RECORD(iface, struct gdiinterop, IDWriteGdiInterop1_iface);
}
static inline struct gdiinterop *impl_from_IDWriteFontFileLoader(IDWriteFontFileLoader *iface)
{
return CONTAINING_RECORD(iface, struct gdiinterop, IDWriteFontFileLoader_iface);
}
static inline struct memresource_stream *impl_from_IDWriteFontFileStream(IDWriteFontFileStream *iface)
{
return CONTAINING_RECORD(iface, struct memresource_stream, IDWriteFontFileStream_iface);
}
static HRESULT WINAPI rendertarget_sink_QueryInterface(ID2D1SimplifiedGeometrySink *iface, REFIID riid, void **obj)
{
if (IsEqualIID(riid, &IID_ID2D1SimplifiedGeometrySink) ||
IsEqualIID(riid, &IID_IUnknown))
{
*obj = iface;
ID2D1SimplifiedGeometrySink_AddRef(iface);
return S_OK;
}
WARN("%s not implemented.\n", debugstr_guid(riid));
*obj = NULL;
return E_NOINTERFACE;
}
static ULONG WINAPI rendertarget_sink_AddRef(ID2D1SimplifiedGeometrySink *iface)
{
struct rendertarget *This = impl_from_ID2D1SimplifiedGeometrySink(iface);
return IDWriteBitmapRenderTarget1_AddRef(&This->IDWriteBitmapRenderTarget1_iface);
}
static ULONG WINAPI rendertarget_sink_Release(ID2D1SimplifiedGeometrySink *iface)
{
struct rendertarget *This = impl_from_ID2D1SimplifiedGeometrySink(iface);
return IDWriteBitmapRenderTarget1_Release(&This->IDWriteBitmapRenderTarget1_iface);
}
static void WINAPI rendertarget_sink_SetFillMode(ID2D1SimplifiedGeometrySink *iface, D2D1_FILL_MODE mode)
{
struct rendertarget *This = impl_from_ID2D1SimplifiedGeometrySink(iface);
SetPolyFillMode(This->hdc, mode == D2D1_FILL_MODE_ALTERNATE ? ALTERNATE : WINDING);
}
static void WINAPI rendertarget_sink_SetSegmentFlags(ID2D1SimplifiedGeometrySink *iface, D2D1_PATH_SEGMENT vertexFlags)
{
}
static void WINAPI rendertarget_sink_BeginFigure(ID2D1SimplifiedGeometrySink *iface, D2D1_POINT_2F startPoint, D2D1_FIGURE_BEGIN figureBegin)
{
struct rendertarget *This = impl_from_ID2D1SimplifiedGeometrySink(iface);
MoveToEx(This->hdc, startPoint.x, startPoint.y, NULL);
}
static void WINAPI rendertarget_sink_AddLines(ID2D1SimplifiedGeometrySink *iface, const D2D1_POINT_2F *points, UINT32 count)
{
struct rendertarget *This = impl_from_ID2D1SimplifiedGeometrySink(iface);
while (count--) {
LineTo(This->hdc, points->x, points->y);
points++;
}
}
static void WINAPI rendertarget_sink_AddBeziers(ID2D1SimplifiedGeometrySink *iface, const D2D1_BEZIER_SEGMENT *beziers, UINT32 count)
{
struct rendertarget *This = impl_from_ID2D1SimplifiedGeometrySink(iface);
POINT points[3];
while (count--) {
points[0].x = beziers->point1.x;
points[0].y = beziers->point1.y;
points[1].x = beziers->point2.x;
points[1].y = beziers->point2.y;
points[2].x = beziers->point3.x;
points[2].y = beziers->point3.y;
PolyBezierTo(This->hdc, points, 3);
beziers++;
}
}
static void WINAPI rendertarget_sink_EndFigure(ID2D1SimplifiedGeometrySink *iface, D2D1_FIGURE_END figureEnd)
{
struct rendertarget *This = impl_from_ID2D1SimplifiedGeometrySink(iface);
CloseFigure(This->hdc);
}
static HRESULT WINAPI rendertarget_sink_Close(ID2D1SimplifiedGeometrySink *iface)
{
return S_OK;
}
static const ID2D1SimplifiedGeometrySinkVtbl rendertargetsinkvtbl = {
rendertarget_sink_QueryInterface,
rendertarget_sink_AddRef,
rendertarget_sink_Release,
rendertarget_sink_SetFillMode,
rendertarget_sink_SetSegmentFlags,
rendertarget_sink_BeginFigure,
rendertarget_sink_AddLines,
rendertarget_sink_AddBeziers,
rendertarget_sink_EndFigure,
rendertarget_sink_Close
};
static HRESULT WINAPI rendertarget_QueryInterface(IDWriteBitmapRenderTarget1 *iface, REFIID riid, void **obj)
{
struct rendertarget *This = impl_from_IDWriteBitmapRenderTarget1(iface);
TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), obj);
if (IsEqualIID(riid, &IID_IDWriteBitmapRenderTarget1) ||
IsEqualIID(riid, &IID_IDWriteBitmapRenderTarget) ||
IsEqualIID(riid, &IID_IUnknown))
{
*obj = iface;
IDWriteBitmapRenderTarget1_AddRef(iface);
return S_OK;
}
WARN("%s not implemented.\n", debugstr_guid(riid));
*obj = NULL;
return E_NOINTERFACE;
}
static ULONG WINAPI rendertarget_AddRef(IDWriteBitmapRenderTarget1 *iface)
{
struct rendertarget *target = impl_from_IDWriteBitmapRenderTarget1(iface);
ULONG refcount = InterlockedIncrement(&target->refcount);
TRACE("%p, refcount %u.\n", iface, refcount);
return refcount;
}
static ULONG WINAPI rendertarget_Release(IDWriteBitmapRenderTarget1 *iface)
{
struct rendertarget *target = impl_from_IDWriteBitmapRenderTarget1(iface);
ULONG refcount = InterlockedDecrement(&target->refcount);
TRACE("%p, refcount %u.\n", iface, refcount);
if (!refcount)
{
IDWriteFactory7_Release(target->factory);
DeleteDC(target->hdc);
heap_free(target);
}
return refcount;
}
static inline DWORD *get_pixel_ptr_32(struct dib_data *dib, int x, int y)
{
return (DWORD *)((BYTE*)dib->ptr + y * dib->stride + x * 4);
}
static inline BYTE blend_color(BYTE dst, BYTE src, BYTE alpha)
{
return (src * alpha + dst * (255 - alpha) + 127) / 255;
}
static inline DWORD blend_subpixel(BYTE r, BYTE g, BYTE b, DWORD text, const BYTE *alpha)
{
return blend_color(r, text >> 16, alpha[0]) << 16 |
blend_color(g, text >> 8, alpha[1]) << 8 |
blend_color(b, text, alpha[2]);
}
static inline DWORD blend_pixel(BYTE r, BYTE g, BYTE b, DWORD text, BYTE alpha)
{
return blend_color(r, text >> 16, alpha) << 16 |
blend_color(g, text >> 8, alpha) << 8 |
blend_color(b, text, alpha);
}
static void blit_8(struct dib_data *dib, const BYTE *src, const RECT *rect, DWORD text_pixel)
{
DWORD *dst_ptr = get_pixel_ptr_32(dib, rect->left, rect->top);
int x, y, src_width = rect->right - rect->left;
for (y = rect->top; y < rect->bottom; y++) {
for (x = 0; x < src_width; x++) {
if (!src[x]) continue;
if (src[x] == DWRITE_ALPHA_MAX)
dst_ptr[x] = text_pixel;
else
dst_ptr[x] = blend_pixel(dst_ptr[x] >> 16, dst_ptr[x] >> 8, dst_ptr[x], text_pixel, src[x]);
}
src += src_width;
dst_ptr += dib->stride / 4;
}
}
static void blit_subpixel_888(struct dib_data *dib, int dib_width, const BYTE *src,
const RECT *rect, DWORD text_pixel)
{
DWORD *dst_ptr = get_pixel_ptr_32(dib, rect->left, rect->top);
int x, y, src_width = rect->right - rect->left;
for (y = rect->top; y < rect->bottom; y++) {
for (x = 0; x < src_width; x++) {
if (src[3*x] == 0 && src[3*x+1] == 0 && src[3*x+2] == 0) continue;
dst_ptr[x] = blend_subpixel(dst_ptr[x] >> 16, dst_ptr[x] >> 8, dst_ptr[x], text_pixel, &src[3*x]);
}
dst_ptr += dib->stride / 4;
src += src_width * 3;
}
}
static inline DWORD colorref_to_pixel_888(COLORREF color)
{
return (((color >> 16) & 0xff) | (color & 0xff00) | ((color << 16) & 0xff0000));
}
static HRESULT WINAPI rendertarget_DrawGlyphRun(IDWriteBitmapRenderTarget1 *iface,
FLOAT originX, FLOAT originY, DWRITE_MEASURING_MODE measuring_mode,
DWRITE_GLYPH_RUN const *run, IDWriteRenderingParams *params, COLORREF color,
RECT *bbox_ret)
{
struct rendertarget *target = impl_from_IDWriteBitmapRenderTarget1(iface);
IDWriteGlyphRunAnalysis *analysis;
DWRITE_RENDERING_MODE1 rendermode;
DWRITE_GRID_FIT_MODE gridfitmode;
DWRITE_TEXTURE_TYPE texturetype;
DWRITE_GLYPH_RUN scaled_run;
IDWriteFontFace3 *fontface;
RECT target_rect, bounds;
HRESULT hr;
TRACE("%p, %.8e, %.8e, %d, %p, %p, 0x%08x, %p.\n", iface, originX, originY,
measuring_mode, run, params, color, bbox_ret);
SetRectEmpty(bbox_ret);
if (!target->dib.ptr)
return S_OK;
if (!params)
return E_INVALIDARG;
if (FAILED(hr = IDWriteFontFace_QueryInterface(run->fontFace, &IID_IDWriteFontFace3, (void **)&fontface))) {
WARN("Failed to get IDWriteFontFace2 interface, hr %#x.\n", hr);
return hr;
}
hr = IDWriteFontFace3_GetRecommendedRenderingMode(fontface, run->fontEmSize, target->ppdip * 96.0f,
target->ppdip * 96.0f, NULL /* FIXME */, run->isSideways, DWRITE_OUTLINE_THRESHOLD_ALIASED, measuring_mode,
params, &rendermode, &gridfitmode);
IDWriteFontFace3_Release(fontface);
if (FAILED(hr))
return hr;
SetRect(&target_rect, 0, 0, target->size.cx, target->size.cy);
if (rendermode == DWRITE_RENDERING_MODE1_OUTLINE)
{
static const XFORM identity = { 1.0f, 0.0f, 0.0f, 1.0f, 0.0f, 0.0f };
const DWRITE_MATRIX *m = &target->m;
XFORM xform;
/* target allows any transform to be set, filter it here */
if (m->m11 * m->m22 == m->m12 * m->m21) {
xform.eM11 = 1.0f;
xform.eM12 = 0.0f;
xform.eM21 = 0.0f;
xform.eM22 = 1.0f;
xform.eDx = originX;
xform.eDy = originY;
} else {
xform.eM11 = m->m11;
xform.eM12 = m->m12;
xform.eM21 = m->m21;
xform.eM22 = m->m22;
xform.eDx = m->m11 * originX + m->m21 * originY + m->dx;
xform.eDy = m->m12 * originX + m->m22 * originY + m->dy;
}
SetWorldTransform(target->hdc, &xform);
BeginPath(target->hdc);
hr = IDWriteFontFace_GetGlyphRunOutline(run->fontFace, run->fontEmSize * target->ppdip,
run->glyphIndices, run->glyphAdvances, run->glyphOffsets, run->glyphCount,
run->isSideways, run->bidiLevel & 1, &target->ID2D1SimplifiedGeometrySink_iface);
EndPath(target->hdc);
if (hr == S_OK)
{
HBRUSH brush = CreateSolidBrush(color);
SelectObject(target->hdc, brush);
FillPath(target->hdc);
/* FIXME: one way to get affected rectangle bounds is to use region fill */
if (bbox_ret)
*bbox_ret = target_rect;
DeleteObject(brush);
}
SetWorldTransform(target->hdc, &identity);
return hr;
}
scaled_run = *run;
scaled_run.fontEmSize *= target->ppdip;
hr = IDWriteFactory7_CreateGlyphRunAnalysis(target->factory, &scaled_run, &target->m, rendermode, measuring_mode,
gridfitmode, target->antialiasmode, originX, originY, &analysis);
if (FAILED(hr))
{
WARN("failed to create analysis instance, 0x%08x\n", hr);
return hr;
}
SetRectEmpty(&bounds);
texturetype = DWRITE_TEXTURE_ALIASED_1x1;
hr = IDWriteGlyphRunAnalysis_GetAlphaTextureBounds(analysis, DWRITE_TEXTURE_ALIASED_1x1, &bounds);
if (FAILED(hr) || IsRectEmpty(&bounds)) {
hr = IDWriteGlyphRunAnalysis_GetAlphaTextureBounds(analysis, DWRITE_TEXTURE_CLEARTYPE_3x1, &bounds);
if (FAILED(hr)) {
WARN("GetAlphaTextureBounds() failed, 0x%08x\n", hr);
IDWriteGlyphRunAnalysis_Release(analysis);
return hr;
}
texturetype = DWRITE_TEXTURE_CLEARTYPE_3x1;
}
if (IntersectRect(&target_rect, &target_rect, &bounds))
{
UINT32 size = (target_rect.right - target_rect.left) * (target_rect.bottom - target_rect.top);
BYTE *bitmap;
color = colorref_to_pixel_888(color);
if (texturetype == DWRITE_TEXTURE_CLEARTYPE_3x1)
size *= 3;
bitmap = heap_alloc_zero(size);
if (!bitmap) {
IDWriteGlyphRunAnalysis_Release(analysis);
return E_OUTOFMEMORY;
}
hr = IDWriteGlyphRunAnalysis_CreateAlphaTexture(analysis, texturetype, &target_rect, bitmap, size);
if (hr == S_OK) {
/* blit to target dib */
if (texturetype == DWRITE_TEXTURE_ALIASED_1x1)
blit_8(&target->dib, bitmap, &target_rect, color);
else
blit_subpixel_888(&target->dib, target->size.cx, bitmap, &target_rect, color);
if (bbox_ret) *bbox_ret = target_rect;
}
heap_free(bitmap);
}
IDWriteGlyphRunAnalysis_Release(analysis);
return S_OK;
}
static HDC WINAPI rendertarget_GetMemoryDC(IDWriteBitmapRenderTarget1 *iface)
{
struct rendertarget *This = impl_from_IDWriteBitmapRenderTarget1(iface);
TRACE("(%p)\n", This);
return This->hdc;
}
static FLOAT WINAPI rendertarget_GetPixelsPerDip(IDWriteBitmapRenderTarget1 *iface)
{
struct rendertarget *This = impl_from_IDWriteBitmapRenderTarget1(iface);
TRACE("(%p)\n", This);
return This->ppdip;
}
static HRESULT WINAPI rendertarget_SetPixelsPerDip(IDWriteBitmapRenderTarget1 *iface, FLOAT ppdip)
{
struct rendertarget *This = impl_from_IDWriteBitmapRenderTarget1(iface);
TRACE("(%p)->(%.2f)\n", This, ppdip);
if (ppdip <= 0.0f)
return E_INVALIDARG;
This->ppdip = ppdip;
return S_OK;
}
static HRESULT WINAPI rendertarget_GetCurrentTransform(IDWriteBitmapRenderTarget1 *iface, DWRITE_MATRIX *transform)
{
struct rendertarget *This = impl_from_IDWriteBitmapRenderTarget1(iface);
TRACE("(%p)->(%p)\n", This, transform);
*transform = This->m;
return S_OK;
}
static HRESULT WINAPI rendertarget_SetCurrentTransform(IDWriteBitmapRenderTarget1 *iface, DWRITE_MATRIX const *transform)
{
struct rendertarget *This = impl_from_IDWriteBitmapRenderTarget1(iface);
TRACE("(%p)->(%p)\n", This, transform);
This->m = transform ? *transform : identity;
return S_OK;
}
static HRESULT WINAPI rendertarget_GetSize(IDWriteBitmapRenderTarget1 *iface, SIZE *size)
{
struct rendertarget *This = impl_from_IDWriteBitmapRenderTarget1(iface);
TRACE("(%p)->(%p)\n", This, size);
*size = This->size;
return S_OK;
}
static HRESULT WINAPI rendertarget_Resize(IDWriteBitmapRenderTarget1 *iface, UINT32 width, UINT32 height)
{
struct rendertarget *This = impl_from_IDWriteBitmapRenderTarget1(iface);
TRACE("(%p)->(%u %u)\n", This, width, height);
if (This->size.cx == width && This->size.cy == height)
return S_OK;
return create_target_dibsection(This, width, height);
}
static DWRITE_TEXT_ANTIALIAS_MODE WINAPI rendertarget_GetTextAntialiasMode(IDWriteBitmapRenderTarget1 *iface)
{
struct rendertarget *This = impl_from_IDWriteBitmapRenderTarget1(iface);
TRACE("(%p)\n", This);
return This->antialiasmode;
}
static HRESULT WINAPI rendertarget_SetTextAntialiasMode(IDWriteBitmapRenderTarget1 *iface, DWRITE_TEXT_ANTIALIAS_MODE mode)
{
struct rendertarget *This = impl_from_IDWriteBitmapRenderTarget1(iface);
TRACE("(%p)->(%d)\n", This, mode);
if ((DWORD)mode > DWRITE_TEXT_ANTIALIAS_MODE_GRAYSCALE)
return E_INVALIDARG;
This->antialiasmode = mode;
return S_OK;
}
static const IDWriteBitmapRenderTarget1Vtbl rendertargetvtbl = {
rendertarget_QueryInterface,
rendertarget_AddRef,
rendertarget_Release,
rendertarget_DrawGlyphRun,
rendertarget_GetMemoryDC,
rendertarget_GetPixelsPerDip,
rendertarget_SetPixelsPerDip,
rendertarget_GetCurrentTransform,
rendertarget_SetCurrentTransform,
rendertarget_GetSize,
rendertarget_Resize,
rendertarget_GetTextAntialiasMode,
rendertarget_SetTextAntialiasMode
};
static HRESULT create_rendertarget(IDWriteFactory7 *factory, HDC hdc, UINT32 width, UINT32 height, IDWriteBitmapRenderTarget **ret)
{
struct rendertarget *target;
HRESULT hr;
*ret = NULL;
target = heap_alloc(sizeof(struct rendertarget));
if (!target) return E_OUTOFMEMORY;
target->IDWriteBitmapRenderTarget1_iface.lpVtbl = &rendertargetvtbl;
target->ID2D1SimplifiedGeometrySink_iface.lpVtbl = &rendertargetsinkvtbl;
target->refcount = 1;
target->hdc = CreateCompatibleDC(hdc);
SetGraphicsMode(target->hdc, GM_ADVANCED);
hr = create_target_dibsection(target, width, height);
if (FAILED(hr)) {
IDWriteBitmapRenderTarget1_Release(&target->IDWriteBitmapRenderTarget1_iface);
return hr;
}
target->m = identity;
target->ppdip = GetDeviceCaps(target->hdc, LOGPIXELSX) / 96.0f;
target->antialiasmode = DWRITE_TEXT_ANTIALIAS_MODE_CLEARTYPE;
target->factory = factory;
IDWriteFactory7_AddRef(factory);
*ret = (IDWriteBitmapRenderTarget*)&target->IDWriteBitmapRenderTarget1_iface;
return S_OK;
}
static HRESULT WINAPI gdiinterop_QueryInterface(IDWriteGdiInterop1 *iface, REFIID riid, void **obj)
{
struct gdiinterop *This = impl_from_IDWriteGdiInterop1(iface);
TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), obj);
if (IsEqualIID(riid, &IID_IDWriteGdiInterop1) ||
IsEqualIID(riid, &IID_IDWriteGdiInterop) ||
IsEqualIID(riid, &IID_IUnknown))
{
*obj = iface;
IDWriteGdiInterop1_AddRef(iface);
return S_OK;
}
WARN("%s not implemented.\n", debugstr_guid(riid));
*obj = NULL;
return E_NOINTERFACE;
}
static ULONG WINAPI gdiinterop_AddRef(IDWriteGdiInterop1 *iface)
{
struct gdiinterop *interop = impl_from_IDWriteGdiInterop1(iface);
LONG refcount = InterlockedIncrement(&interop->refcount);
TRACE("%p, refcount %u.\n", iface, refcount);
return refcount;
}
static ULONG WINAPI gdiinterop_Release(IDWriteGdiInterop1 *iface)
{
struct gdiinterop *interop = impl_from_IDWriteGdiInterop1(iface);
LONG refcount = InterlockedDecrement(&interop->refcount);
TRACE("%p, refcount %u.\n", iface, refcount);
if (!refcount)
{
IDWriteFactory7_UnregisterFontFileLoader(interop->factory, &interop->IDWriteFontFileLoader_iface);
factory_detach_gdiinterop(interop->factory, iface);
heap_free(interop);
}
return refcount;
}
static HRESULT WINAPI gdiinterop_CreateFontFromLOGFONT(IDWriteGdiInterop1 *iface,
LOGFONTW const *logfont, IDWriteFont **font)
{
struct gdiinterop *This = impl_from_IDWriteGdiInterop1(iface);
TRACE("(%p)->(%p %p)\n", This, logfont, font);
return IDWriteGdiInterop1_CreateFontFromLOGFONT(iface, logfont, NULL, font);
}
static HRESULT WINAPI gdiinterop_ConvertFontToLOGFONT(IDWriteGdiInterop1 *iface,
IDWriteFont *font, LOGFONTW *logfont, BOOL *is_systemfont)
{
struct gdiinterop *This = impl_from_IDWriteGdiInterop1(iface);
IDWriteFontCollection *collection;
IDWriteFontFamily *family;
HRESULT hr;
TRACE("(%p)->(%p %p %p)\n", This, font, logfont, is_systemfont);
*is_systemfont = FALSE;
memset(logfont, 0, sizeof(*logfont));
if (!font)
return E_INVALIDARG;
hr = IDWriteFont_GetFontFamily(font, &family);
if (FAILED(hr))
return hr;
hr = IDWriteFontFamily_GetFontCollection(family, &collection);
IDWriteFontFamily_Release(family);
if (FAILED(hr))
return hr;
*is_systemfont = is_system_collection(collection);
IDWriteFontCollection_Release(collection);
get_logfont_from_font(font, logfont);
logfont->lfCharSet = DEFAULT_CHARSET;
logfont->lfOutPrecision = OUT_OUTLINE_PRECIS;
return hr;
}
static HRESULT WINAPI gdiinterop_ConvertFontFaceToLOGFONT(IDWriteGdiInterop1 *iface,
IDWriteFontFace *fontface, LOGFONTW *logfont)
{
struct gdiinterop *This = impl_from_IDWriteGdiInterop1(iface);
TRACE("(%p)->(%p %p)\n", This, fontface, logfont);
memset(logfont, 0, sizeof(*logfont));
if (!fontface)
return E_INVALIDARG;
get_logfont_from_fontface(fontface, logfont);
logfont->lfCharSet = DEFAULT_CHARSET;
logfont->lfOutPrecision = OUT_OUTLINE_PRECIS;
return S_OK;
}
struct font_realization_info {
DWORD size;
DWORD flags;
DWORD cache_num;
DWORD instance_id;
DWORD unk;
WORD face_index;
WORD simulations;
};
struct font_fileinfo {
FILETIME writetime;
LARGE_INTEGER size;
WCHAR path[1];
};
/* Undocumented gdi32 exports, used to access actually selected font information */
extern BOOL WINAPI GetFontRealizationInfo(HDC hdc, struct font_realization_info *info);
extern BOOL WINAPI GetFontFileInfo(DWORD instance_id, DWORD unknown, struct font_fileinfo *info, SIZE_T size, SIZE_T *needed);
extern BOOL WINAPI GetFontFileData(DWORD instance_id, DWORD unknown, UINT64 offset, void *buff, DWORD buff_size);
static HRESULT WINAPI gdiinterop_CreateFontFaceFromHdc(IDWriteGdiInterop1 *iface,
HDC hdc, IDWriteFontFace **fontface)
{
struct gdiinterop *interop = impl_from_IDWriteGdiInterop1(iface);
struct font_realization_info info;
struct font_fileinfo *fileinfo;
DWRITE_FONT_FILE_TYPE filetype;
DWRITE_FONT_FACE_TYPE facetype;
IDWriteFontFile *file;
BOOL is_supported;
UINT32 facenum;
SIZE_T needed;
HRESULT hr;
TRACE("%p, %p, %p.\n", iface, hdc, fontface);
*fontface = NULL;
if (!hdc)
return E_INVALIDARG;
/* get selected font id */
info.size = sizeof(info);
if (!GetFontRealizationInfo(hdc, &info)) {
WARN("failed to get selected font id\n");
return E_FAIL;
}
needed = 0;
GetFontFileInfo(info.instance_id, 0, NULL, 0, &needed);
if (needed == 0) {
WARN("failed to get font file info size\n");
return E_FAIL;
}
fileinfo = heap_alloc(needed);
if (!fileinfo)
return E_OUTOFMEMORY;
if (!GetFontFileInfo(info.instance_id, 0, fileinfo, needed, &needed)) {
heap_free(fileinfo);
return E_FAIL;
}
if (*fileinfo->path)
hr = IDWriteFactory7_CreateFontFileReference(interop->factory, fileinfo->path, &fileinfo->writetime, &file);
else
hr = IDWriteFactory7_CreateCustomFontFileReference(interop->factory, &info.instance_id,
sizeof(info.instance_id), &interop->IDWriteFontFileLoader_iface, &file);
heap_free(fileinfo);
if (FAILED(hr))
return hr;
is_supported = FALSE;
hr = IDWriteFontFile_Analyze(file, &is_supported, &filetype, &facetype, &facenum);
if (SUCCEEDED(hr)) {
if (is_supported)
/* Simulations flags values match DWRITE_FONT_SIMULATIONS */
hr = IDWriteFactory7_CreateFontFace(interop->factory, facetype, 1, &file, info.face_index,
info.simulations, fontface);
else
hr = DWRITE_E_FILEFORMAT;
}
IDWriteFontFile_Release(file);
return hr;
}
static HRESULT WINAPI gdiinterop_CreateBitmapRenderTarget(IDWriteGdiInterop1 *iface,
HDC hdc, UINT32 width, UINT32 height, IDWriteBitmapRenderTarget **target)
{
struct gdiinterop *This = impl_from_IDWriteGdiInterop1(iface);
TRACE("(%p)->(%p %u %u %p)\n", This, hdc, width, height, target);
return create_rendertarget(This->factory, hdc, width, height, target);
}
static HRESULT WINAPI gdiinterop1_CreateFontFromLOGFONT(IDWriteGdiInterop1 *iface,
LOGFONTW const *logfont, IDWriteFontCollection *collection, IDWriteFont **font)
{
struct gdiinterop *interop = impl_from_IDWriteGdiInterop1(iface);
IDWriteFontFamily *family;
DWRITE_FONT_STYLE style;
BOOL exists = FALSE;
UINT32 index;
HRESULT hr;
TRACE("%p, %p, %p, %p.\n", iface, logfont, collection, font);
*font = NULL;
if (!logfont) return E_INVALIDARG;
if (collection)
IDWriteFontCollection_AddRef(collection);
else {
hr = IDWriteFactory5_GetSystemFontCollection((IDWriteFactory5 *)interop->factory, FALSE, (IDWriteFontCollection1 **)&collection, FALSE);
if (FAILED(hr)) {
ERR("failed to get system font collection: 0x%08x.\n", hr);
return hr;
}
}
hr = IDWriteFontCollection_FindFamilyName(collection, logfont->lfFaceName, &index, &exists);
if (FAILED(hr))
goto done;
if (!exists) {
hr = DWRITE_E_NOFONT;
goto done;
}
hr = IDWriteFontCollection_GetFontFamily(collection, index, &family);
if (FAILED(hr))
goto done;
style = logfont->lfItalic ? DWRITE_FONT_STYLE_ITALIC : DWRITE_FONT_STYLE_NORMAL;
hr = IDWriteFontFamily_GetFirstMatchingFont(family, logfont->lfWeight, DWRITE_FONT_STRETCH_NORMAL, style, font);
IDWriteFontFamily_Release(family);
done:
IDWriteFontCollection_Release(collection);
return hr;
}
static HRESULT WINAPI gdiinterop1_GetFontSignature_(IDWriteGdiInterop1 *iface, IDWriteFontFace *fontface,
FONTSIGNATURE *fontsig)
{
struct gdiinterop *This = impl_from_IDWriteGdiInterop1(iface);
TRACE("(%p)->(%p %p)\n", This, fontface, fontsig);
return get_fontsig_from_fontface(fontface, fontsig);
}
static HRESULT WINAPI gdiinterop1_GetFontSignature(IDWriteGdiInterop1 *iface, IDWriteFont *font, FONTSIGNATURE *fontsig)
{
struct gdiinterop *This = impl_from_IDWriteGdiInterop1(iface);
TRACE("(%p)->(%p %p)\n", This, font, fontsig);
if (!font)
return E_INVALIDARG;
return get_fontsig_from_font(font, fontsig);
}
static HRESULT WINAPI gdiinterop1_GetMatchingFontsByLOGFONT(IDWriteGdiInterop1 *iface, LOGFONTW const *logfont,
IDWriteFontSet *fontset, IDWriteFontSet **subset)
{
struct gdiinterop *This = impl_from_IDWriteGdiInterop1(iface);
FIXME("(%p)->(%p %p %p): stub\n", This, logfont, fontset, subset);
return E_NOTIMPL;
}
static const struct IDWriteGdiInterop1Vtbl gdiinteropvtbl = {
gdiinterop_QueryInterface,
gdiinterop_AddRef,
gdiinterop_Release,
gdiinterop_CreateFontFromLOGFONT,
gdiinterop_ConvertFontToLOGFONT,
gdiinterop_ConvertFontFaceToLOGFONT,
gdiinterop_CreateFontFaceFromHdc,
gdiinterop_CreateBitmapRenderTarget,
gdiinterop1_CreateFontFromLOGFONT,
gdiinterop1_GetFontSignature_,
gdiinterop1_GetFontSignature,
gdiinterop1_GetMatchingFontsByLOGFONT
};
static HRESULT WINAPI memresourcestream_QueryInterface(IDWriteFontFileStream *iface, REFIID riid, void **out)
{
struct memresource_stream *This = impl_from_IDWriteFontFileStream(iface);
TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), out);
if (IsEqualIID(&IID_IDWriteFontFileStream, riid) || IsEqualIID(&IID_IUnknown, riid)) {
*out = iface;
IDWriteFontFileStream_AddRef(iface);
return S_OK;
}
*out = NULL;
WARN("Unsupported interface %s.\n", debugstr_guid(riid));
return E_NOINTERFACE;
}
static ULONG WINAPI memresourcestream_AddRef(IDWriteFontFileStream *iface)
{
struct memresource_stream *This = impl_from_IDWriteFontFileStream(iface);
ULONG ref = InterlockedIncrement(&This->ref);
TRACE("(%p)->(%d)\n", This, ref);
return ref;
}
static ULONG WINAPI memresourcestream_Release(IDWriteFontFileStream *iface)
{
struct memresource_stream *This = impl_from_IDWriteFontFileStream(iface);
ULONG ref = InterlockedDecrement(&This->ref);
TRACE("(%p)->(%d)\n", This, ref);
if (!ref)
heap_free(This);
return ref;
}
static HRESULT WINAPI memresourcestream_ReadFileFragment(IDWriteFontFileStream *iface, void const **fragment_start,
UINT64 offset, UINT64 fragment_size, void **fragment_context)
{
struct memresource_stream *This = impl_from_IDWriteFontFileStream(iface);
struct font_fileinfo fileinfo;
void *fragment;
TRACE("(%p)->(%p %s %s %p)\n", This, fragment_start, wine_dbgstr_longlong(offset),
wine_dbgstr_longlong(fragment_size), fragment_context);
*fragment_context = NULL;
*fragment_start = NULL;
if (!GetFontFileInfo(This->key, 0, &fileinfo, sizeof(fileinfo), NULL))
return E_INVALIDARG;
if ((offset >= fileinfo.size.QuadPart - 1) || (fragment_size > fileinfo.size.QuadPart - offset))
return E_INVALIDARG;
if (!(fragment = heap_alloc(fragment_size)))
return E_OUTOFMEMORY;
if (!GetFontFileData(This->key, 0, offset, fragment, fragment_size))
return E_FAIL;
*fragment_start = *fragment_context = fragment;
return S_OK;
}
static void WINAPI memresourcestream_ReleaseFileFragment(IDWriteFontFileStream *iface, void *fragment_context)
{
struct memresource_stream *This = impl_from_IDWriteFontFileStream(iface);
TRACE("(%p)->(%p)\n", This, fragment_context);
heap_free(fragment_context);
}
static HRESULT WINAPI memresourcestream_GetFileSize(IDWriteFontFileStream *iface, UINT64 *size)
{
struct memresource_stream *This = impl_from_IDWriteFontFileStream(iface);
struct font_fileinfo fileinfo;
TRACE("(%p)->(%p)\n", This, size);
if (!GetFontFileInfo(This->key, 0, &fileinfo, sizeof(fileinfo), NULL))
return E_INVALIDARG;
*size = fileinfo.size.QuadPart;
return S_OK;
}
static HRESULT WINAPI memresourcestream_GetLastWriteTime(IDWriteFontFileStream *iface, UINT64 *last_writetime)
{
struct memresource_stream *This = impl_from_IDWriteFontFileStream(iface);
TRACE("(%p)->(%p)\n", This, last_writetime);
return E_NOTIMPL;
}
static const struct IDWriteFontFileStreamVtbl memresourcestreamvtbl = {
memresourcestream_QueryInterface,
memresourcestream_AddRef,
memresourcestream_Release,
memresourcestream_ReadFileFragment,
memresourcestream_ReleaseFileFragment,
memresourcestream_GetFileSize,
memresourcestream_GetLastWriteTime,
};
static HRESULT WINAPI memresourceloader_QueryInterface(IDWriteFontFileLoader *iface, REFIID riid, void **out)
{
struct gdiinterop *This = impl_from_IDWriteFontFileLoader(iface);
TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), out);
if (IsEqualIID(&IID_IDWriteFontFileLoader, riid) || IsEqualIID(&IID_IUnknown, riid)) {
*out = iface;
IDWriteFontFileLoader_AddRef(iface);
return S_OK;
}
*out = NULL;
WARN("Unsupported interface %s.\n", debugstr_guid(riid));
return E_NOINTERFACE;
}
static ULONG WINAPI memresourceloader_AddRef(IDWriteFontFileLoader *iface)
{
return 2;
}
static ULONG WINAPI memresourceloader_Release(IDWriteFontFileLoader *iface)
{
return 1;
}
static HRESULT WINAPI memresourceloader_CreateStreamFromKey(IDWriteFontFileLoader *iface, void const *key,
UINT32 key_size, IDWriteFontFileStream **ret)
{
struct gdiinterop *This = impl_from_IDWriteFontFileLoader(iface);
struct memresource_stream *stream;
TRACE("(%p)->(%p %u %p)\n", This, key, key_size, ret);
*ret = NULL;
if (!key || key_size != sizeof(DWORD))
return E_INVALIDARG;
if (!(stream = heap_alloc(sizeof(*stream))))
return E_OUTOFMEMORY;
stream->IDWriteFontFileStream_iface.lpVtbl = &memresourcestreamvtbl;
stream->ref = 1;
memcpy(&stream->key, key, sizeof(stream->key));
*ret = &stream->IDWriteFontFileStream_iface;
return S_OK;
}
static const struct IDWriteFontFileLoaderVtbl memresourceloadervtbl = {
memresourceloader_QueryInterface,
memresourceloader_AddRef,
memresourceloader_Release,
memresourceloader_CreateStreamFromKey,
};
HRESULT create_gdiinterop(IDWriteFactory7 *factory, IDWriteGdiInterop1 **ret)
{
struct gdiinterop *interop;
*ret = NULL;
if (!(interop = heap_alloc(sizeof(*interop))))
return E_OUTOFMEMORY;
interop->IDWriteGdiInterop1_iface.lpVtbl = &gdiinteropvtbl;
interop->IDWriteFontFileLoader_iface.lpVtbl = &memresourceloadervtbl;
interop->refcount = 1;
interop->factory = factory;
IDWriteFactory7_AddRef(interop->factory);
IDWriteFactory7_RegisterFontFileLoader(factory, &interop->IDWriteFontFileLoader_iface);
*ret = &interop->IDWriteGdiInterop1_iface;
return S_OK;
}