Call wxThread::Create() from Run() automatically.
[wxWidgets.git] / src / msw / fontutil.cpp
1 ///////////////////////////////////////////////////////////////////////////////
2 // Name: src/msw/fontutil.cpp
3 // Purpose: font-related helper functions for wxMSW
4 // Author: Vadim Zeitlin
5 // Modified by:
6 // Created: 05.11.99
7 // RCS-ID: $Id$
8 // Copyright: (c) 1999 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
9 // Licence: wxWindows licence
10 ///////////////////////////////////////////////////////////////////////////////
11
12 // ============================================================================
13 // declarations
14 // ============================================================================
15
16 // ----------------------------------------------------------------------------
17 // headers
18 // ----------------------------------------------------------------------------
19
20 // For compilers that support precompilation, includes "wx.h".
21 #include "wx/wxprec.h"
22
23 #ifdef __BORLANDC__
24 #pragma hdrstop
25 #endif
26
27 #include "wx/fontutil.h"
28
29 #ifndef WX_PRECOMP
30 #include "wx/string.h"
31 #include "wx/log.h"
32 #include "wx/intl.h"
33 #include "wx/wxcrtvararg.h"
34 #include "wx/msw/private.h"
35 #endif //WX_PRECOMP
36
37 #include "wx/encinfo.h"
38 #include "wx/fontmap.h"
39 #include "wx/tokenzr.h"
40
41 // for MSVC5 and old w32api
42 #ifndef HANGUL_CHARSET
43 # define HANGUL_CHARSET 129
44 #endif
45
46 // ============================================================================
47 // implementation
48 // ============================================================================
49
50 // ----------------------------------------------------------------------------
51 // wxNativeEncodingInfo
52 // ----------------------------------------------------------------------------
53
54 // convert to/from the string representation: format is
55 // encodingid;facename[;charset]
56
57 bool wxNativeEncodingInfo::FromString(const wxString& s)
58 {
59 wxStringTokenizer tokenizer(s, wxT(";"));
60
61 wxString encid = tokenizer.GetNextToken();
62
63 // we support 2 formats: the old one (and still used if !wxUSE_FONTMAP)
64 // used the raw encoding values but the new one uses the encoding names
65 long enc;
66 if ( encid.ToLong(&enc) )
67 {
68 // old format, intepret as encoding -- but after minimal checks
69 if ( enc < 0 || enc >= wxFONTENCODING_MAX )
70 return false;
71
72 encoding = (wxFontEncoding)enc;
73 }
74 else // not a number, interpret as an encoding name
75 {
76 #if wxUSE_FONTMAP
77 encoding = wxFontMapper::GetEncodingFromName(encid);
78 if ( encoding == wxFONTENCODING_MAX )
79 #endif // wxUSE_FONTMAP
80 {
81 // failed to parse the name (or couldn't even try...)
82 return false;
83 }
84 }
85
86 facename = tokenizer.GetNextToken();
87
88 wxString tmp = tokenizer.GetNextToken();
89 if ( tmp.empty() )
90 {
91 // default charset: but don't use DEFAULT_CHARSET here because it might
92 // be different from the machine on which the file we had read this
93 // encoding desc from was created
94 charset = ANSI_CHARSET;
95 }
96 else
97 {
98 if ( wxSscanf(tmp, wxT("%u"), &charset) != 1 )
99 {
100 // should be a number!
101 return false;
102 }
103 }
104
105 return true;
106 }
107
108 wxString wxNativeEncodingInfo::ToString() const
109 {
110 wxString s;
111
112 s
113 #if wxUSE_FONTMAP
114 // use the encoding names as this is safer than using the numerical
115 // values which may change with time (because new encodings are
116 // inserted...)
117 << wxFontMapper::GetEncodingName(encoding)
118 #else // !wxUSE_FONTMAP
119 // we don't have any choice but to use the raw value
120 << (long)encoding
121 #endif // wxUSE_FONTMAP/!wxUSE_FONTMAP
122 << wxT(';') << facename;
123
124 // ANSI_CHARSET is assumed anyhow
125 if ( charset != ANSI_CHARSET )
126 {
127 s << wxT(';') << charset;
128 }
129
130 return s;
131 }
132
133 // ----------------------------------------------------------------------------
134 // helper functions
135 // ----------------------------------------------------------------------------
136
137 bool wxGetNativeFontEncoding(wxFontEncoding encoding,
138 wxNativeEncodingInfo *info)
139 {
140 wxCHECK_MSG( info, false, wxT("bad pointer in wxGetNativeFontEncoding") );
141
142 if ( encoding == wxFONTENCODING_DEFAULT )
143 {
144 encoding = wxFont::GetDefaultEncoding();
145 }
146
147 extern WXDLLIMPEXP_BASE long wxEncodingToCharset(wxFontEncoding encoding);
148 info->charset = wxEncodingToCharset(encoding);
149 if ( info->charset == -1 )
150 return false;
151
152 info->encoding = encoding;
153
154 return true;
155 }
156
157 bool wxTestFontEncoding(const wxNativeEncodingInfo& info)
158 {
159 // try to create such font
160 LOGFONT lf;
161 wxZeroMemory(lf); // all default values
162
163 lf.lfCharSet = (BYTE)info.charset;
164 wxStrlcpy(lf.lfFaceName, info.facename.c_str(), WXSIZEOF(lf.lfFaceName));
165
166 HFONT hfont = ::CreateFontIndirect(&lf);
167 if ( !hfont )
168 {
169 // no such font
170 return false;
171 }
172
173 ::DeleteObject((HGDIOBJ)hfont);
174
175 return true;
176 }
177
178 // ----------------------------------------------------------------------------
179 // wxFontEncoding <-> CHARSET_XXX
180 // ----------------------------------------------------------------------------
181
182 wxFontEncoding wxGetFontEncFromCharSet(int cs)
183 {
184 wxFontEncoding fontEncoding;
185
186 switch ( cs )
187 {
188 default:
189 wxFAIL_MSG( wxT("unexpected Win32 charset") );
190 // fall through and assume the system charset
191
192 case DEFAULT_CHARSET:
193 fontEncoding = wxFONTENCODING_SYSTEM;
194 break;
195
196 case ANSI_CHARSET:
197 fontEncoding = wxFONTENCODING_CP1252;
198 break;
199
200 case SYMBOL_CHARSET:
201 // what can we do here?
202 fontEncoding = wxFONTENCODING_MAX;
203 break;
204
205 #if defined(__WIN32__) && !defined(__WXMICROWIN__)
206 case EASTEUROPE_CHARSET:
207 fontEncoding = wxFONTENCODING_CP1250;
208 break;
209
210 case BALTIC_CHARSET:
211 fontEncoding = wxFONTENCODING_CP1257;
212 break;
213
214 case RUSSIAN_CHARSET:
215 fontEncoding = wxFONTENCODING_CP1251;
216 break;
217
218 case ARABIC_CHARSET:
219 fontEncoding = wxFONTENCODING_CP1256;
220 break;
221
222 case GREEK_CHARSET:
223 fontEncoding = wxFONTENCODING_CP1253;
224 break;
225
226 case HEBREW_CHARSET:
227 fontEncoding = wxFONTENCODING_CP1255;
228 break;
229
230 case TURKISH_CHARSET:
231 fontEncoding = wxFONTENCODING_CP1254;
232 break;
233
234 case THAI_CHARSET:
235 fontEncoding = wxFONTENCODING_CP874;
236 break;
237
238 case SHIFTJIS_CHARSET:
239 fontEncoding = wxFONTENCODING_CP932;
240 break;
241
242 case GB2312_CHARSET:
243 fontEncoding = wxFONTENCODING_CP936;
244 break;
245
246 case HANGUL_CHARSET:
247 fontEncoding = wxFONTENCODING_CP949;
248 break;
249
250 case CHINESEBIG5_CHARSET:
251 fontEncoding = wxFONTENCODING_CP950;
252 break;
253
254 case VIETNAMESE_CHARSET:
255 fontEncoding = wxFONTENCODING_CP1258;
256 break;
257
258 case JOHAB_CHARSET:
259 fontEncoding = wxFONTENCODING_CP1361;
260 break;
261
262 #endif // Win32
263
264 case OEM_CHARSET:
265 fontEncoding = wxFONTENCODING_CP437;
266 break;
267 }
268
269 return fontEncoding;
270 }
271
272 // ----------------------------------------------------------------------------
273 // wxFont <-> LOGFONT conversion
274 // ----------------------------------------------------------------------------
275
276 void wxFillLogFont(LOGFONT *logFont, const wxFont *font)
277 {
278 wxNativeFontInfo fi;
279
280 // maybe we already have LOGFONT for this font?
281 const wxNativeFontInfo *pFI = font->GetNativeFontInfo();
282 if ( !pFI )
283 {
284 // use wxNativeFontInfo methods to build a LOGFONT for this font
285 fi.InitFromFont(*font);
286
287 pFI = &fi;
288 }
289
290 // transfer all the data to LOGFONT
291 *logFont = pFI->lf;
292 }
293
294 wxFont wxCreateFontFromLogFont(const LOGFONT *logFont)
295 {
296 wxNativeFontInfo info;
297
298 info.lf = *logFont;
299
300 return wxFont(info);
301 }
302