| Viewing file:  GDIFontInstance.cpp (9.6 KB)      -rw-r--r-- Select action/file-type:
 
  (+) |  (+) |  (+) | Code (+) | Session (+) |  (+) | SDB (+) |  (+) |  (+) |  (+) |  (+) |  (+) | 
 
/********************************************************************************
 *
 *   © 2016 and later: Unicode, Inc. and others.
 *   License & terms of use: http://www.unicode.org/copyright.html#License
 *
 *******************************************************************************
 *******************************************************************************
 *
 *   Copyright (C) 1999-2008, International Business Machines
 *   Corporation and others.  All Rights Reserved.
 *
 *******************************************************************************
 *   file name:  GDIFontInstance.cpp
 *
 *   created on: 08/09/2000
 *   created by: Eric R. Mader
 */
 
 #include <windows.h>
 
 #include "layout/LETypes.h"
 #include "layout/LESwaps.h"
 #include "layout/LEFontInstance.h"
 
 #include "GDIFontInstance.h"
 #include "sfnt.h"
 #include "cmaps.h"
 
 GDISurface::GDISurface(HDC theHDC)
 : fHdc(theHDC), fCurrentFont(NULL)
 {
 // nothing else to do
 }
 
 GDISurface::~GDISurface()
 {
 // nothing to do
 }
 
 void GDISurface::setHDC(HDC theHDC)
 {
 fHdc         = theHDC;
 fCurrentFont = NULL;
 }
 
 void GDISurface::setFont(const GDIFontInstance *font)
 {
 #if 0
 if (fCurrentFont != font) {
 fCurrentFont = font;
 SelectObject(fHdc, font->getFont());
 }
 #else
 SelectObject(fHdc, font->getFont());
 #endif
 }
 
 void GDISurface::drawGlyphs(const LEFontInstance *font, const LEGlyphID *glyphs, le_int32 count, const float *positions,
 le_int32 x, le_int32 y, le_int32 width, le_int32 height)
 {
 TTGlyphID *ttGlyphs = LE_NEW_ARRAY(TTGlyphID, count);
 le_int32  *dx = LE_NEW_ARRAY(le_int32, count);
 float     *ps = LE_NEW_ARRAY(float, count * 2 + 2);
 le_int32   out = 0;
 RECT clip;
 
 clip.top    = 0;
 clip.left   = 0;
 clip.bottom = height;
 clip.right  = width;
 
 for (le_int32 g = 0; g < count; g += 1) {
 TTGlyphID ttGlyph = (TTGlyphID) LE_GET_GLYPH(glyphs[g]);
 
 if (ttGlyph < 0xFFFE) {
 ttGlyphs[out] = ttGlyph;
 dx[out] = (le_int32) (positions[g * 2 + 2] - positions[g * 2]);
 ps[out * 2] = positions[g * 2];
 ps[out * 2 + 1] = positions[g * 2 + 1];
 out += 1;
 }
 }
 
 le_int32 dyStart, dyEnd;
 
 setFont((GDIFontInstance *) font);
 
 dyStart = dyEnd = 0;
 
 while (dyEnd < out) {
 float yOffset = ps[dyStart * 2 + 1];
 float xOffset = ps[dyStart * 2];
 
 while (dyEnd < out && yOffset == ps[dyEnd * 2 + 1]) {
 dyEnd += 1;
 }
 
 ExtTextOut(fHdc, x + (le_int32) xOffset, y + (le_int32) yOffset - font->getAscent(), ETO_CLIPPED | ETO_GLYPH_INDEX, &clip,
 (LPCWSTR) &ttGlyphs[dyStart], dyEnd - dyStart, (INT *) &dx[dyStart]);
 
 dyStart = dyEnd;
 }
 
 LE_DELETE_ARRAY(ps);
 LE_DELETE_ARRAY(dx);
 LE_DELETE_ARRAY(ttGlyphs);
 }
 
 GDIFontInstance::GDIFontInstance(GDISurface *surface, TCHAR *faceName, le_int16 pointSize, LEErrorCode &status)
 : FontTableCache(), fSurface(surface), fFont(NULL),
 fPointSize(pointSize), fUnitsPerEM(0), fAscent(0), fDescent(0), fLeading(0),
 fDeviceScaleX(1), fDeviceScaleY(1), fMapper(NULL)
 {
 LOGFONT lf;
 FLOAT dpiX, dpiY;
 POINT pt;
 OUTLINETEXTMETRIC otm;
 HDC hdc = surface->getHDC();
 
 if (LE_FAILURE(status)) {
 return;
 }
 
 SaveDC(hdc);
 
 SetGraphicsMode(hdc, GM_ADVANCED);
 ModifyWorldTransform(hdc, NULL, MWT_IDENTITY);
 SetViewportOrgEx(hdc, 0, 0, NULL);
 SetWindowOrgEx(hdc, 0, 0, NULL);
 
 dpiX = (FLOAT) GetDeviceCaps(hdc, LOGPIXELSX);
 dpiY = (FLOAT) GetDeviceCaps(hdc, LOGPIXELSY);
 
 #if 1
 pt.x = (int) (pointSize * dpiX / 72);
 pt.y = (int) (pointSize * dpiY / 72);
 
 DPtoLP(hdc, &pt, 1);
 #else
 pt.x = pt.y = pointSize;
 #endif
 
 lf.lfHeight = - pt.y;
 lf.lfWidth = 0;
 lf.lfEscapement = 0;
 lf.lfOrientation = 0;
 lf.lfWeight = 0;
 lf.lfItalic = 0;
 lf.lfUnderline = 0;
 lf.lfStrikeOut = 0;
 lf.lfCharSet = DEFAULT_CHARSET;
 lf.lfOutPrecision = 0;
 lf.lfClipPrecision = 0;
 lf.lfQuality = 0;
 lf.lfPitchAndFamily = 0;
 
 lstrcpy(lf.lfFaceName, faceName);
 
 fFont = CreateFontIndirect(&lf);
 
 if (fFont == NULL) {
 status = LE_FONT_FILE_NOT_FOUND_ERROR;
 return;
 }
 
 SelectObject(hdc, fFont);
 
 UINT ret = GetOutlineTextMetrics(hdc, sizeof otm, &otm);
 
 if (ret == 0) {
 status = LE_MISSING_FONT_TABLE_ERROR;
 goto restore;
 }
 
 fUnitsPerEM = otm.otmEMSquare;
 fAscent  = otm.otmTextMetrics.tmAscent;
 fDescent = otm.otmTextMetrics.tmDescent;
 fLeading = otm.otmTextMetrics.tmExternalLeading;
 
 status = initMapper();
 
 if (LE_FAILURE(status)) {
 goto restore;
 }
 
 #if 0
 status = initFontTableCache();
 #endif
 
 restore:
 RestoreDC(hdc, -1);
 }
 
 GDIFontInstance::GDIFontInstance(GDISurface *surface, const char *faceName, le_int16 pointSize, LEErrorCode &status)
 : FontTableCache(), fSurface(surface), fFont(NULL),
 fPointSize(pointSize), fUnitsPerEM(0), fAscent(0), fDescent(0), fLeading(0),
 fDeviceScaleX(1), fDeviceScaleY(1), fMapper(NULL)
 {
 LOGFONTA lf;
 FLOAT dpiX, dpiY;
 POINT pt;
 OUTLINETEXTMETRIC otm;
 HDC hdc = surface->getHDC();
 
 if (LE_FAILURE(status)) {
 return;
 }
 
 SaveDC(hdc);
 
 SetGraphicsMode(hdc, GM_ADVANCED);
 ModifyWorldTransform(hdc, NULL, MWT_IDENTITY);
 SetViewportOrgEx(hdc, 0, 0, NULL);
 SetWindowOrgEx(hdc, 0, 0, NULL);
 
 dpiX = (FLOAT) GetDeviceCaps(hdc, LOGPIXELSX);
 dpiY = (FLOAT) GetDeviceCaps(hdc, LOGPIXELSY);
 
 fDeviceScaleX = dpiX / 72;
 fDeviceScaleY = dpiY / 72;
 
 #if 1
 pt.x = (int) (pointSize * fDeviceScaleX);
 pt.y = (int) (pointSize * fDeviceScaleY);
 
 DPtoLP(hdc, &pt, 1);
 #else
 pt.x = pt.y = pointSize;
 #endif
 
 lf.lfHeight = - pt.y;
 lf.lfWidth = 0;
 lf.lfEscapement = 0;
 lf.lfOrientation = 0;
 lf.lfWeight = 0;
 lf.lfItalic = 0;
 lf.lfUnderline = 0;
 lf.lfStrikeOut = 0;
 lf.lfCharSet = DEFAULT_CHARSET;
 lf.lfOutPrecision = 0;
 lf.lfClipPrecision = 0;
 lf.lfQuality = 0;
 lf.lfPitchAndFamily = 0;
 
 strcpy(lf.lfFaceName, faceName);
 
 fFont = CreateFontIndirectA(&lf);
 
 if (fFont == NULL) {
 status = LE_FONT_FILE_NOT_FOUND_ERROR;
 return;
 }
 
 SelectObject(hdc, fFont);
 
 UINT ret = GetOutlineTextMetrics(hdc, sizeof otm, &otm);
 
 if (ret != 0) {
 fUnitsPerEM = otm.otmEMSquare;
 fAscent  = otm.otmTextMetrics.tmAscent;
 fDescent = otm.otmTextMetrics.tmDescent;
 fLeading = otm.otmTextMetrics.tmExternalLeading;
 } else {
 const HEADTable *headTable = NULL;
 const HHEATable *hheaTable = NULL;
 
 // read unitsPerEm from 'head' table
 headTable = (const HEADTable *) readFontTable(LE_HEAD_TABLE_TAG);
 
 if (headTable == NULL) {
 status = LE_MISSING_FONT_TABLE_ERROR;
 goto restore;
 }
 
 fUnitsPerEM   = SWAPW(headTable->unitsPerEm);
 freeFontTable((const void *)headTable);
 
 hheaTable = (HHEATable *) readFontTable(LE_HHEA_TABLE_TAG);
 
 if (hheaTable == NULL) {
 status = LE_MISSING_FONT_TABLE_ERROR;
 goto restore;
 }
 
 fAscent  = (le_int32) yUnitsToPoints((float) SWAPW(hheaTable->ascent));
 fDescent = (le_int32) yUnitsToPoints((float) SWAPW(hheaTable->descent));
 fLeading = (le_int32) yUnitsToPoints((float) SWAPW(hheaTable->lineGap));
 
 freeFontTable((const void *) hheaTable);
 }
 
 status = initMapper();
 
 if (LE_FAILURE(status)) {
 goto restore;
 }
 
 #if 0
 status = initFontTableCache();
 #endif
 
 restore:
 RestoreDC(hdc, -1);
 }
 
 GDIFontInstance::~GDIFontInstance()
 {
 #if 0
 flushFontTableCache();
 delete[] fTableCache;
 #endif
 
 if (fFont != NULL) {
 // FIXME: call RemoveObject first?
 DeleteObject(fFont);
 }
 
 delete fMapper;
 fMapper = NULL;
 }
 
 LEErrorCode GDIFontInstance::initMapper()
 {
 LETag cmapTag = LE_CMAP_TABLE_TAG;
 const CMAPTable *cmap = (const CMAPTable *) readFontTable(cmapTag);
 
 if (cmap == NULL) {
 return LE_MISSING_FONT_TABLE_ERROR;
 }
 
 fMapper = CMAPMapper::createUnicodeMapper(cmap);
 
 if (fMapper == NULL) {
 return LE_MISSING_FONT_TABLE_ERROR;
 }
 
 return LE_NO_ERROR;
 }
 
 const void *GDIFontInstance::getFontTable(LETag tableTag) const
 {
 return FontTableCache::find(tableTag);
 }
 
 const void *GDIFontInstance::readFontTable(LETag tableTag) const
 {
 fSurface->setFont(this);
 
 HDC   hdc    = fSurface->getHDC();
 DWORD stag   = SWAPL(tableTag);
 DWORD len    = GetFontData(hdc, stag, 0, NULL, 0);
 void *result = NULL;
 
 if (len != GDI_ERROR) {
 result = LE_NEW_ARRAY(char, len);
 GetFontData(hdc, stag, 0, result, len);
 }
 
 return result;
 }
 
 void GDIFontInstance::getGlyphAdvance(LEGlyphID glyph, LEPoint &advance) const
 {
 advance.fX = 0;
 advance.fY = 0;
 
 if (glyph == 0xFFFE || glyph == 0xFFFF) {
 return;
 }
 
 
 GLYPHMETRICS metrics;
 DWORD result;
 MAT2 identity = {{0, 1}, {0, 0}, {0, 0}, {0, 1}};
 HDC hdc = fSurface->getHDC();
 
 fSurface->setFont(this);
 
 result = GetGlyphOutline(hdc, glyph, GGO_GLYPH_INDEX | GGO_METRICS, &metrics, 0, NULL, &identity);
 
 if (result == GDI_ERROR) {
 return;
 }
 
 advance.fX = metrics.gmCellIncX;
 return;
 }
 
 le_bool GDIFontInstance::getGlyphPoint(LEGlyphID glyph, le_int32 pointNumber, LEPoint &point) const
 {
 #if 0
 hsFixedPoint2 pt;
 le_bool result;
 
 result = fFontInstance->getGlyphPoint(glyph, pointNumber, pt);
 
 if (result) {
 point.fX = xUnitsToPoints(pt.fX);
 point.fY = yUnitsToPoints(pt.fY);
 }
 
 return result;
 #else
 return FALSE;
 #endif
 }
 
 
 |