src/msw/fontenum.cpp

   1 ///////////////////////////////////////////////////////////////////////////////
   2 // Name:        msw/fontenum.cpp
   3 // Purpose:     wxFontEnumerator class for Windows
   4 // Author:      Julian Smart
   5 // Modified by: Vadim Zeitlin to add support for font encodings
   6 // Created:     04/01/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows licence
  10 ///////////////////////////////////////////////////////////////////////////////
  11
  12 // ============================================================================
  13 // declarations
  14 // ============================================================================
  15
  16 // ----------------------------------------------------------------------------
  17 // headers
  18 // ----------------------------------------------------------------------------
  19
  20 #ifdef __GNUG__
  21     #pragma implementation "fontenum.h"
  22 #endif
  23
  24 // For compilers that support precompilation, includes "wx.h".
  25 #include "wx/wxprec.h"
  26
  27 #ifdef __BORLANDC__
  28   #pragma hdrstop
  29 #endif
  30
  31 #if wxUSE_FONTMAP
  32
  33 #ifndef WX_PRECOMP
  34   #include "wx/font.h"
  35 #endif
  36
  37 #include "wx/msw/private.h"
  38
  39 #include "wx/fontutil.h"
  40 #include "wx/fontenum.h"
  41 #include "wx/fontmap.h"
  42
  43 // ----------------------------------------------------------------------------
  44 // private classes
  45 // ----------------------------------------------------------------------------
  46
  47 // the helper class which calls ::EnumFontFamilies() and whose OnFont() is
  48 // called from the callback passed to this function and, in its turn, calls the
  49 // appropariate wxFontEnumerator method
  50 class wxFontEnumeratorHelper
  51 {
  52 public:
  53     wxFontEnumeratorHelper(wxFontEnumerator *fontEnum);
  54
  55     // control what exactly are we enumerating
  56         // we enumerate fonts with given enocding
  57     bool SetEncoding(wxFontEncoding encoding);
  58         // we enumerate fixed-width fonts
  59     void SetFixedOnly(bool fixedOnly) { m_fixedOnly = fixedOnly; }
  60         // we enumerate the encodings available in this family
  61     void SetFamily(const wxString& family);
  62
  63     // call to start enumeration
  64     void DoEnumerate();
  65
  66     // called by our font enumeration proc
  67     bool OnFont(const LPLOGFONT lf, const LPTEXTMETRIC tm) const;
  68
  69 private:
  70     // the object we forward calls to OnFont() to
  71     wxFontEnumerator *m_fontEnum;
  72
  73     // if != -1, enum only fonts which have this encoding
  74     int m_charset;
  75
  76     // if not empty, enum only the fonts with this facename
  77     wxString m_facename;
  78
  79     // if not empty, enum only the fonts in this family
  80     wxString m_family;
  81
  82     // if TRUE, enum only fixed fonts
  83     bool m_fixedOnly;
  84
  85     // if TRUE, we enumerate the encodings, not fonts
  86     bool m_enumEncodings;
  87
  88     // the list of charsets we already found while enumerating charsets
  89     wxArrayInt m_charsets;
  90
  91     // the list of facenames we already found while enumerating facenames
  92     wxArrayString m_facenames;
  93
  94     DECLARE_NO_COPY_CLASS(wxFontEnumeratorHelper)
  95 };
  96
  97 // ----------------------------------------------------------------------------
  98 // private functions
  99 // ----------------------------------------------------------------------------
 100
 101 #ifndef __WXMICROWIN__
 102 int CALLBACK wxFontEnumeratorProc(LPLOGFONT lplf, LPTEXTMETRIC lptm,
 103                                   DWORD dwStyle, LONG lParam);
 104 #endif
 105
 106 // ============================================================================
 107 // implementation
 108 // ============================================================================
 109
 110 // ----------------------------------------------------------------------------
 111 // wxFontEnumeratorHelper
 112 // ----------------------------------------------------------------------------
 113
 114 wxFontEnumeratorHelper::wxFontEnumeratorHelper(wxFontEnumerator *fontEnum)
 115 {
 116     m_fontEnum = fontEnum;
 117     m_charset = DEFAULT_CHARSET;
 118     m_fixedOnly = FALSE;
 119     m_enumEncodings = FALSE;
 120 }
 121
 122 void wxFontEnumeratorHelper::SetFamily(const wxString& family)
 123 {
 124     m_enumEncodings = TRUE;
 125     m_family = family;
 126 }
 127
 128 bool wxFontEnumeratorHelper::SetEncoding(wxFontEncoding encoding)
 129 {
 130     if ( encoding != wxFONTENCODING_SYSTEM )
 131     {
 132         wxNativeEncodingInfo info;
 133         if ( !wxGetNativeFontEncoding(encoding, &info) )
 134         {
 135 #if wxUSE_FONTMAP
 136             if ( !wxFontMapper::Get()->GetAltForEncoding(encoding, &info) )
 137 #endif // wxUSE_FONTMAP
 138             {
 139                 // no such encodings at all
 140                 return FALSE;
 141             }
 142         }
 143
 144         m_charset = info.charset;
 145         m_facename = info.facename;
 146     }
 147
 148     return TRUE;
 149 }
 150
 151 #if defined(__GNUWIN32__) && !defined(__CYGWIN10__) && !wxCHECK_W32API_VERSION( 1, 1 ) && !wxUSE_NORLANDER_HEADERS
 152     #define wxFONTENUMPROC int(*)(ENUMLOGFONTEX *, NEWTEXTMETRICEX*, int, LPARAM)
 153 #else
 154     #define wxFONTENUMPROC FONTENUMPROC
 155 #endif
 156
 157 void wxFontEnumeratorHelper::DoEnumerate()
 158 {
 159 #ifndef __WXMICROWIN__
 160     HDC hDC = ::GetDC(NULL);
 161
 162 #ifdef __WXWINCE__
 163     ::EnumFontFamilies(hDC, m_facename, (wxFONTENUMPROC)wxFontEnumeratorProc,
 164                          (LPARAM)this) ;
 165 #elif defined(__WIN32__)
 166     LOGFONT lf;
 167     lf.lfCharSet = m_charset;
 168     wxStrncpy(lf.lfFaceName, m_facename, WXSIZEOF(lf.lfFaceName));
 169     lf.lfPitchAndFamily = 0;
 170     ::EnumFontFamiliesEx(hDC, &lf, (wxFONTENUMPROC)wxFontEnumeratorProc,
 171                          (LPARAM)this, 0 /* reserved */) ;
 172 #else // Win16
 173     ::EnumFonts(hDC, (LPTSTR)NULL, (FONTENUMPROC)wxFontEnumeratorProc,
 174     #ifdef STRICT
 175                (LPARAM)
 176     #else
 177                (LPSTR)
 178     #endif
 179                this);
 180 #endif // Win32/16
 181
 182     ::ReleaseDC(NULL, hDC);
 183 #endif
 184 }
 185
 186 bool wxFontEnumeratorHelper::OnFont(const LPLOGFONT lf,
 187                                     const LPTEXTMETRIC tm) const
 188 {
 189     if ( m_enumEncodings )
 190     {
 191         // is this a new charset?
 192         int cs = lf->lfCharSet;
 193         if ( m_charsets.Index(cs) == wxNOT_FOUND )
 194         {
 195             wxConstCast(this, wxFontEnumeratorHelper)->m_charsets.Add(cs);
 196
 197             wxFontEncoding enc = wxGetFontEncFromCharSet(cs);
 198             return m_fontEnum->OnFontEncoding(lf->lfFaceName,
 199                                               wxFontMapper::GetEncodingName(enc));
 200         }
 201         else
 202         {
 203             // continue enumeration
 204             return TRUE;
 205         }
 206     }
 207
 208     if ( m_fixedOnly )
 209     {
 210         // check that it's a fixed pitch font (there is *no* error here, the
 211         // flag name is misleading!)
 212         if ( tm->tmPitchAndFamily & TMPF_FIXED_PITCH )
 213         {
 214             // not a fixed pitch font
 215             return TRUE;
 216         }
 217     }
 218
 219     if ( m_charset != DEFAULT_CHARSET )
 220     {
 221         // check that we have the right encoding
 222         if ( lf->lfCharSet != m_charset )
 223         {
 224             return TRUE;
 225         }
 226     }
 227     else // enumerating fonts in all charsets
 228     {
 229         // we can get the same facename twice or more in this case because it
 230         // may exist in several charsets but we only want to return one copy of
 231         // it (note that this can't happen for m_charset != DEFAULT_CHARSET)
 232         if ( m_facenames.Index(lf->lfFaceName) != wxNOT_FOUND )
 233         {
 234             // continue enumeration
 235             return TRUE;
 236         }
 237
 238         wxConstCast(this, wxFontEnumeratorHelper)->
 239             m_facenames.Add(lf->lfFaceName);
 240     }
 241
 242     return m_fontEnum->OnFacename(lf->lfFaceName);
 243 }
 244
 245 // ----------------------------------------------------------------------------
 246 // wxFontEnumerator
 247 // ----------------------------------------------------------------------------
 248
 249 bool wxFontEnumerator::EnumerateFacenames(wxFontEncoding encoding,
 250                                           bool fixedWidthOnly)
 251 {
 252     wxFontEnumeratorHelper fe(this);
 253     if ( fe.SetEncoding(encoding) )
 254     {
 255         fe.SetFixedOnly(fixedWidthOnly);
 256
 257         fe.DoEnumerate();
 258     }
 259     // else: no such fonts, unknown encoding
 260
 261     return TRUE;
 262 }
 263
 264 bool wxFontEnumerator::EnumerateEncodings(const wxString& family)
 265 {
 266     wxFontEnumeratorHelper fe(this);
 267     fe.SetFamily(family);
 268     fe.DoEnumerate();
 269
 270     return TRUE;
 271 }
 272
 273 // ----------------------------------------------------------------------------
 274 // Windows callbacks
 275 // ----------------------------------------------------------------------------
 276
 277 #ifndef __WXMICROWIN__
 278 int CALLBACK wxFontEnumeratorProc(LPLOGFONT lplf, LPTEXTMETRIC lptm,
 279                                   DWORD WXUNUSED(dwStyle), LONG lParam)
 280 {
 281
 282     // we used to process TrueType fonts only, but there doesn't seem to be any
 283     // reasons to restrict ourselves to them here
 284 #if 0
 285     // Get rid of any fonts that we don't want...
 286     if ( dwStyle != TRUETYPE_FONTTYPE )
 287     {
 288         // continue enumeration
 289         return TRUE;
 290     }
 291 #endif // 0
 292
 293     wxFontEnumeratorHelper *fontEnum = (wxFontEnumeratorHelper *)lParam;
 294
 295     return fontEnum->OnFont(lplf, lptm);
 296 }
 297 #endif
 298
 299 #endif // wxUSE_FONTMAP