graphics/win16drv/font.c

   1 /*
   2  * Windows driver font functions
   3  *
   4  * Copyright 1996 John Harvey
   5  *           1998 Huw Davies
   6  */
   7
   8 #include <stdio.h>
   9 #include "windows.h"
  10 #include "win16drv.h"
  11 #include "gdi.h"
  12 #include "module.h"
  13 #include "font.h"
  14 #include "heap.h"
  15 #include "debug.h"
  16
  17
  18 /***********************************************************************
  19  *           WIN16DRV_GetTextExtentPoint
  20  */
  21 BOOL32 WIN16DRV_GetTextExtentPoint( DC *dc, LPCSTR str, INT32 count,
  22                                     LPSIZE32 size )
  23 {
  24     WIN16DRV_PDEVICE *physDev = (WIN16DRV_PDEVICE *)dc->physDev;
  25     DWORD dwRet;
  26
  27     TRACE(win16drv, "%04x %s %d %p\n",
  28                                 dc->hSelf, str, count, size);
  29
  30     dwRet = PRTDRV_ExtTextOut(physDev->segptrPDEVICE, 0, 0,
  31                               NULL, str,
  32                               -count,  physDev->FontInfo,
  33                               win16drv_SegPtr_DrawMode,
  34                               win16drv_SegPtr_TextXForm, NULL, NULL, 0);
  35     size->cx = XDSTOLS(dc,LOWORD(dwRet));
  36     size->cy = YDSTOLS(dc,HIWORD(dwRet));
  37     TRACE(win16drv, "cx=0x%x, cy=0x%x\n",
  38                 size->cx, size->cy );
  39     return TRUE;
  40 }
  41
  42
  43 /***********************************************************************
  44  *           WIN16DRV_GetTextMetrics
  45  */
  46 BOOL32 WIN16DRV_GetTextMetrics( DC *dc, TEXTMETRIC32A *metrics )
  47 {
  48     WIN16DRV_PDEVICE *physDev = (WIN16DRV_PDEVICE *)dc->physDev;
  49
  50     TRACE(win16drv, "%04x \n", dc->hSelf);
  51
  52     FONT_TextMetric16to32A( &physDev->tm, metrics );
  53
  54     TRACE(win16drv, "H %d, A %d, D %d, Int %d, Ext %d, AW %d, MW %d, W %d\n",
  55            metrics->tmHeight,
  56            metrics->tmAscent,
  57            metrics->tmDescent,
  58            metrics->tmInternalLeading,
  59            metrics->tmExternalLeading,
  60            metrics->tmAveCharWidth,
  61            metrics->tmMaxCharWidth,
  62            metrics->tmWeight);
  63
  64     return TRUE;
  65 }
  66
  67 HFONT32 WIN16DRV_FONT_SelectObject( DC * dc, HFONT32 hfont, FONTOBJ * font)
  68 {
  69     WIN16DRV_PDEVICE *physDev = (WIN16DRV_PDEVICE *)dc->physDev;
  70     HPEN32 prevHandle = dc->w.hFont;
  71     int nSize;
  72
  73     dc->w.hFont = hfont;
  74
  75     TRACE(win16drv, "WIN16DRV_FONT_SelectObject '%s' h=%d\n",
  76                      font->logfont.lfFaceName, font->logfont.lfHeight);
  77
  78
  79     if( physDev->FontInfo )
  80     {
  81         TRACE(win16drv, "UnRealizing FontInfo\n");
  82         nSize = PRTDRV_RealizeObject (physDev->segptrPDEVICE, -DRVOBJ_FONT,
  83                                       physDev->FontInfo,
  84                                       physDev->FontInfo, 0);
  85     }
  86
  87     memcpy(&physDev->lf, &font->logfont, sizeof(LOGFONT16));
  88     nSize = PRTDRV_RealizeObject (physDev->segptrPDEVICE, DRVOBJ_FONT,
  89                                   &physDev->lf, 0, 0);
  90
  91     if( physDev->FontInfo &&
  92         HeapSize( SegptrHeap, 0, physDev->FontInfo ) < nSize )
  93     {
  94         SEGPTR_FREE( physDev->FontInfo );
  95         physDev->FontInfo = NULL;
  96     }
  97
  98     if( !physDev->FontInfo )
  99         physDev->FontInfo = SEGPTR_ALLOC( nSize );
 100
 101
 102     nSize = PRTDRV_RealizeObject(physDev->segptrPDEVICE, DRVOBJ_FONT,
 103                                  &physDev->lf,
 104                                  physDev->FontInfo,
 105                                  win16drv_SegPtr_TextXForm );
 106
 107 #define fi physDev->FontInfo
 108     physDev->tm.tmHeight           = YDSTOLS(dc, fi->dfPixHeight);
 109     physDev->tm.tmAscent           = YDSTOLS(dc, fi->dfAscent);
 110     physDev->tm.tmDescent          = physDev->tm.tmHeight -
 111                                             physDev->tm.tmAscent;
 112     physDev->tm.tmInternalLeading  = YDSTOLS(dc, fi->dfInternalLeading);
 113     physDev->tm.tmExternalLeading  = YDSTOLS(dc, fi->dfExternalLeading);
 114     physDev->tm.tmAveCharWidth     = XDSTOLS(dc, fi->dfAvgWidth);
 115     physDev->tm.tmMaxCharWidth     = XDSTOLS(dc, fi->dfMaxWidth);
 116     physDev->tm.tmWeight           = fi->dfWeight;
 117     physDev->tm.tmOverhang         = 0; /*FIXME*/
 118     physDev->tm.tmDigitizedAspectX = fi->dfHorizRes;
 119     physDev->tm.tmDigitizedAspectY = fi->dfVertRes;
 120     physDev->tm.tmFirstChar        = fi->dfFirstChar;
 121     physDev->tm.tmLastChar         = fi->dfLastChar;
 122     physDev->tm.tmDefaultChar      = fi->dfDefaultChar;
 123     physDev->tm.tmBreakChar        = fi->dfBreakChar;
 124     physDev->tm.tmItalic           = fi->dfItalic;
 125     physDev->tm.tmUnderlined       = fi->dfUnderline;
 126     physDev->tm.tmStruckOut        = fi->dfStrikeOut;
 127     physDev->tm.tmPitchAndFamily   = fi->dfPitchAndFamily;
 128     physDev->tm.tmCharSet          = fi->dfCharSet;
 129 #undef fi
 130
 131     TRACE(win16drv, "H %d, A %d, D %d, Int %d, Ext %d, AW %d, MW %d, W %d\n",
 132            physDev->tm.tmHeight,
 133            physDev->tm.tmAscent,
 134            physDev->tm.tmDescent,
 135            physDev->tm.tmInternalLeading,
 136            physDev->tm.tmExternalLeading,
 137            physDev->tm.tmAveCharWidth,
 138            physDev->tm.tmMaxCharWidth,
 139            physDev->tm.tmWeight);
 140
 141     return prevHandle;
 142 }
 143
 144 /***********************************************************************
 145  *           GetCharWidth32A    (GDI32.155)
 146  */
 147 BOOL32 WIN16DRV_GetCharWidth( DC *dc, UINT32 firstChar, UINT32 lastChar,
 148                             LPINT32 buffer )
 149 {
 150     int i;
 151     WORD wRet;
 152
 153     WIN16DRV_PDEVICE *physDev = (WIN16DRV_PDEVICE *)dc->physDev;
 154
 155     TRACE(win16drv, "%d - %d into %p\n",
 156                       firstChar, lastChar, buffer );
 157
 158     wRet = PRTDRV_GetCharWidth( physDev->segptrPDEVICE, buffer, firstChar,
 159                                 lastChar, physDev->FontInfo,
 160                                 win16drv_SegPtr_DrawMode,
 161                                 win16drv_SegPtr_TextXForm );
 162     if( TRACE_ON(win16drv) ){
 163         for(i = 0; i <= lastChar - firstChar; i++)
 164             TRACE(win16drv, "Char %x: width %d\n", i + firstChar,
 165                                          buffer[i]);
 166     }
 167
 168     return wRet;
 169 }
 170
 171 /***********************************************************************
 172  *
 173  *           WIN16DRV_EnumDeviceFonts
 174  */
 175
 176 BOOL32  WIN16DRV_EnumDeviceFonts( DC* dc, LPLOGFONT16 plf,
 177                                         DEVICEFONTENUMPROC proc, LPARAM lp )
 178 {
 179     WIN16DRV_PDEVICE *physDev = (WIN16DRV_PDEVICE *)dc->physDev;
 180     WORD wRet;
 181     WEPFC wepfc = {proc, lp};
 182
 183     /* EnumDFontCallback is GDI.158 */
 184     FARPROC16 pfnCallback = NE_GetEntryPoint( GetModuleHandle16("GDI"), 158 );
 185
 186     wRet = PRTDRV_EnumDFonts(physDev->segptrPDEVICE, plf->lfFaceName[0] ?
 187                              plf->lfFaceName : NULL , pfnCallback , &wepfc );
 188     return wRet;
 189 }
 190
 191 /*
 192  * EnumCallback (GDI.158)
 193  *
 194  * This is the callback function used when EnumDFonts is called.
 195  * (The printer drivers uses it to pass info on available fonts).
 196  *
 197  * lpvClientData is the pointer passed to EnumDFonts, which points to a WEPFC
 198  * structure (WEPFC = WINE_ENUM_PRINTER_FONT_CALLBACK).
 199  *
 200  */
 201
 202
 203 WORD WINAPI WineEnumDFontCallback(LPENUMLOGFONT16 lpLogFont,
 204                                   LPNEWTEXTMETRIC16 lpTextMetrics,
 205                                   WORD wFontType, LONG lpClientData)
 206 {
 207     TRACE(win16drv, "In WineEnumDFontCallback plf=%p\n", lpLogFont);
 208     return (*(((WEPFC *)lpClientData)->proc))( lpLogFont, lpTextMetrics,
 209                                      wFontType, ((WEPFC *)lpClientData)->lp );
 210 }
 211