src/msw/fontenum.cpp

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