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 "winnls.h"
  10 #include "wine/winbase16.h"
  11 #include "win16drv.h"
  12 #include "font.h"
  13 #include "heap.h"
  14 #include "gdi.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, len;
  28     char *str;
  29
  30     TRACE("%04x %s %d %p\n",
  31           dc->hSelf, debugstr_wn(wstr, count), count, size);
  32
  33
  34     len = WideCharToMultiByte( CP_ACP, 0, wstr, count, NULL, 0, NULL, NULL );
  35     str = HeapAlloc( GetProcessHeap(), 0, len );
  36     WideCharToMultiByte( CP_ACP, 0, wstr, count, str, len, NULL, NULL );
  37
  38     dwRet = PRTDRV_ExtTextOut(physDev->segptrPDEVICE, 0, 0,
  39                               NULL, str, -len,  physDev->FontInfo,
  40                               win16drv_SegPtr_DrawMode,
  41                               win16drv_SegPtr_TextXForm, NULL, NULL, 0);
  42     size->cx = XDSTOLS(dc,LOWORD(dwRet));
  43     size->cy = YDSTOLS(dc,HIWORD(dwRet));
  44     TRACE("cx=%ld, cy=%ld\n", size->cx, size->cy );
  45     HeapFree( GetProcessHeap(), 0, str );
  46     return TRUE;
  47 }
  48
  49
  50 /***********************************************************************
  51  *           WIN16DRV_GetTextMetrics
  52  */
  53 BOOL WIN16DRV_GetTextMetrics( DC *dc, TEXTMETRICW *metrics )
  54 {
  55     WIN16DRV_PDEVICE *physDev = (WIN16DRV_PDEVICE *)dc->physDev;
  56
  57     TRACE("%04x \n", dc->hSelf);
  58
  59     FONT_TextMetric16ToW( &physDev->tm, metrics );
  60
  61     TRACE(
  62           "H %ld, A %ld, D %ld, Int %ld, Ext %ld, AW %ld, MW %ld, W %ld\n",
  63            metrics->tmHeight,
  64            metrics->tmAscent,
  65            metrics->tmDescent,
  66            metrics->tmInternalLeading,
  67            metrics->tmExternalLeading,
  68            metrics->tmAveCharWidth,
  69            metrics->tmMaxCharWidth,
  70            metrics->tmWeight);
  71
  72     return TRUE;
  73 }
  74
  75 HFONT WIN16DRV_FONT_SelectObject( DC * dc, HFONT hfont)
  76 {
  77     WIN16DRV_PDEVICE *physDev = (WIN16DRV_PDEVICE *)dc->physDev;
  78     int nSize;
  79
  80     if (!GetObject16( hfont, sizeof(physDev->lf), &physDev->lf ))
  81         return GDI_ERROR;
  82
  83     TRACE("WIN16DRV_FONT_SelectObject %s h=%d\n",
  84           debugstr_a(physDev->lf.lfFaceName), physDev->lf.lfHeight);
  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     nSize = PRTDRV_RealizeObject (physDev->segptrPDEVICE, DRVOBJ_FONT,
  95                                   &physDev->lf, 0, 0);
  96
  97     if( physDev->FontInfo &&
  98         HeapSize( GetProcessHeap(), HEAP_WINE_SEGPTR, physDev->FontInfo ) < nSize )
  99     {
 100         SEGPTR_FREE( physDev->FontInfo );
 101         physDev->FontInfo = NULL;
 102     }
 103
 104     if( !physDev->FontInfo )
 105         physDev->FontInfo = SEGPTR_ALLOC( nSize );
 106
 107
 108     nSize = PRTDRV_RealizeObject(physDev->segptrPDEVICE, DRVOBJ_FONT,
 109                                  &physDev->lf,
 110                                  physDev->FontInfo,
 111                                  win16drv_SegPtr_TextXForm );
 112
 113 #define fi physDev->FontInfo
 114     physDev->tm.tmHeight           = YDSTOLS(dc, fi->dfPixHeight);
 115     physDev->tm.tmAscent           = YDSTOLS(dc, fi->dfAscent);
 116     physDev->tm.tmDescent          = physDev->tm.tmHeight -
 117                                             physDev->tm.tmAscent;
 118     physDev->tm.tmInternalLeading  = YDSTOLS(dc, fi->dfInternalLeading);
 119     physDev->tm.tmExternalLeading  = YDSTOLS(dc, fi->dfExternalLeading);
 120     physDev->tm.tmAveCharWidth     = XDSTOLS(dc, fi->dfAvgWidth);
 121     physDev->tm.tmMaxCharWidth     = XDSTOLS(dc, fi->dfMaxWidth);
 122     physDev->tm.tmWeight           = fi->dfWeight;
 123     physDev->tm.tmOverhang         = 0; /*FIXME*/
 124     physDev->tm.tmDigitizedAspectX = fi->dfHorizRes;
 125     physDev->tm.tmDigitizedAspectY = fi->dfVertRes;
 126     physDev->tm.tmFirstChar        = fi->dfFirstChar;
 127     physDev->tm.tmLastChar         = fi->dfLastChar;
 128     physDev->tm.tmDefaultChar      = fi->dfDefaultChar;
 129     physDev->tm.tmBreakChar        = fi->dfBreakChar;
 130     physDev->tm.tmItalic           = fi->dfItalic;
 131     physDev->tm.tmUnderlined       = fi->dfUnderline;
 132     physDev->tm.tmStruckOut        = fi->dfStrikeOut;
 133     physDev->tm.tmPitchAndFamily   = fi->dfPitchAndFamily;
 134     physDev->tm.tmCharSet          = fi->dfCharSet;
 135 #undef fi
 136
 137     TRACE("H %d, A %d, D %d, Int %d, Ext %d, AW %d, MW %d, W %d\n",
 138            physDev->tm.tmHeight,
 139            physDev->tm.tmAscent,
 140            physDev->tm.tmDescent,
 141            physDev->tm.tmInternalLeading,
 142            physDev->tm.tmExternalLeading,
 143            physDev->tm.tmAveCharWidth,
 144            physDev->tm.tmMaxCharWidth,
 145            physDev->tm.tmWeight);
 146
 147     return TRUE; /* We'll use a device font */
 148 }
 149
 150 /***********************************************************************
 151  *           WIN16DRV_GetCharWidth
 152  */
 153 BOOL WIN16DRV_GetCharWidth( DC *dc, UINT firstChar, UINT lastChar,
 154                             LPINT buffer )
 155 {
 156     int i;
 157     WORD wRet;
 158
 159     WIN16DRV_PDEVICE *physDev = (WIN16DRV_PDEVICE *)dc->physDev;
 160
 161     TRACE("%d - %d into %p\n",
 162                       firstChar, lastChar, buffer );
 163
 164     wRet = PRTDRV_GetCharWidth( physDev->segptrPDEVICE, buffer, firstChar,
 165                                 lastChar, physDev->FontInfo,
 166                                 win16drv_SegPtr_DrawMode,
 167                                 win16drv_SegPtr_TextXForm );
 168     if( TRACE_ON(win16drv) ){
 169         for(i = 0; i <= lastChar - firstChar; i++)
 170             TRACE("Char %x: width %d\n", i + firstChar,
 171                                          buffer[i]);
 172     }
 173
 174     return wRet;
 175 }
 176
 177 /***********************************************************************
 178  *
 179  *           WIN16DRV_EnumDeviceFonts
 180  */
 181
 182 BOOL    WIN16DRV_EnumDeviceFonts( HDC hdc, LPLOGFONTW plf,
 183                                   DEVICEFONTENUMPROC proc, LPARAM lp )
 184 {
 185     WIN16DRV_PDEVICE *physDev;
 186     WORD wRet;
 187     WEPFC wepfc;
 188     DC *dc;
 189     char *FaceNameA = NULL;
 190    /* EnumDFontCallback is GDI.158 */
 191     FARPROC16 pfnCallback = GetProcAddress16( GetModuleHandle16("GDI"), (LPCSTR)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 = proc;
 199     wepfc.lp = lp;
 200
 201     if(plf->lfFaceName[0]) {
 202         INT len;
 203         len = WideCharToMultiByte(CP_ACP, 0, plf->lfFaceName, -1, NULL, 0,
 204                                   NULL, NULL);
 205         FaceNameA = HeapAlloc(GetProcessHeap(), 0, len);
 206         WideCharToMultiByte(CP_ACP, 0, plf->lfFaceName, -1, FaceNameA, len,
 207                             NULL, NULL);
 208     }
 209     wRet = PRTDRV_EnumDFonts(physDev->segptrPDEVICE, FaceNameA, pfnCallback,
 210                              &wepfc );
 211     if(FaceNameA) HeapFree(GetProcessHeap(), 0, FaceNameA);
 212     return wRet;
 213 }
 214
 215 /***********************************************************************
 216  * EnumCallback (GDI.158)
 217  *
 218  * This is the callback function used when EnumDFonts is called.
 219  * (The printer drivers uses it to pass info on available fonts).
 220  *
 221  * lpvClientData is the pointer passed to EnumDFonts, which points to a WEPFC
 222  * structure (WEPFC = WINE_ENUM_PRINTER_FONT_CALLBACK).
 223  *
 224  */
 225 WORD WINAPI EnumCallback16(LPENUMLOGFONT16 lpLogFont,
 226                            LPNEWTEXTMETRIC16 lpTextMetrics,
 227                            WORD wFontType, LONG lpClientData)
 228 {
 229     ENUMLOGFONTEXW lfW;
 230     ENUMLOGFONTEX16 lf16;
 231
 232     NEWTEXTMETRICEXW tmW;
 233     NEWTEXTMETRICEX16 tm16;
 234
 235     TRACE("In EnumCallback16 plf=%p\n", lpLogFont);
 236
 237     /* we have a ENUMLOGFONT16 which is a subset of ENUMLOGFONTEX16,
 238        so we copy it into one of these and then convert to ENUMLOGFONTEXW */
 239
 240     memset(&lf16, 0, sizeof(lf16));
 241     memcpy(&lf16, lpLogFont, sizeof(*lpLogFont));
 242     FONT_EnumLogFontEx16ToW(&lf16, &lfW);
 243
 244     /* and a similar idea for NEWTEXTMETRIC16 */
 245     memset(&tm16, 0, sizeof(tm16));
 246     memcpy(&tm16, lpTextMetrics, sizeof(*lpTextMetrics));
 247     FONT_NewTextMetricEx16ToW(&tm16, &tmW);
 248
 249     return (*(((WEPFC *)lpClientData)->proc))( &lfW, &tmW, wFontType,
 250                                                ((WEPFC *)lpClientData)->lp );
 251 }
 252