graphics/win16drv/font.c

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