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
SetFixedOnly(bool fixedOnly)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
wxFontEnumeratorHelper(wxFontEnumerator * fontEnum)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
SetFamily(const wxString & family)120 void wxFontEnumeratorHelper::SetFamily(const wxString& family)
121 {
122 m_enumEncodings = true;
123 m_family = family;
124 }
125
SetEncoding(wxFontEncoding encoding)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
DoEnumerate()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
OnFont(const LPLOGFONT lf,const LPTEXTMETRIC tm) const178 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
EnumerateFacenames(wxFontEncoding encoding,bool fixedWidthOnly)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
EnumerateEncodings(const wxString & family)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__
wxFontEnumeratorProc(LPLOGFONT lplf,LPTEXTMETRIC lptm,DWORD WXUNUSED (dwStyle),LPARAM lParam)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
301