| 1 | /////////////////////////////////////////////////////////////////////////////// |
| 2 | // Name: 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 license |
| 10 | /////////////////////////////////////////////////////////////////////////////// |
| 11 | |
| 12 | // ============================================================================ |
| 13 | // declarations |
| 14 | // ============================================================================ |
| 15 | |
| 16 | // ---------------------------------------------------------------------------- |
| 17 | // headers |
| 18 | // ---------------------------------------------------------------------------- |
| 19 | |
| 20 | #ifdef __GNUG__ |
| 21 | #pragma implementation "fontutil.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 | #ifndef WX_PRECOMP |
| 32 | #include "wx/string.h" |
| 33 | #include "wx/log.h" |
| 34 | #include "wx/intl.h" |
| 35 | #endif //WX_PRECOMP |
| 36 | |
| 37 | #include "wx/msw/private.h" |
| 38 | |
| 39 | #include "wx/fontutil.h" |
| 40 | #include "wx/fontmap.h" |
| 41 | |
| 42 | #include "wx/tokenzr.h" |
| 43 | |
| 44 | // ============================================================================ |
| 45 | // implementation |
| 46 | // ============================================================================ |
| 47 | |
| 48 | // ---------------------------------------------------------------------------- |
| 49 | // wxNativeEncodingInfo |
| 50 | // ---------------------------------------------------------------------------- |
| 51 | |
| 52 | // convert to/from the string representation: format is |
| 53 | // facename[;charset] |
| 54 | |
| 55 | bool wxNativeEncodingInfo::FromString(const wxString& s) |
| 56 | { |
| 57 | wxStringTokenizer tokenizer(s, _T(";")); |
| 58 | |
| 59 | facename = tokenizer.GetNextToken(); |
| 60 | if ( !facename ) |
| 61 | return FALSE; |
| 62 | |
| 63 | wxString tmp = tokenizer.GetNextToken(); |
| 64 | if ( !tmp ) |
| 65 | { |
| 66 | // default charset (don't use DEFAULT_CHARSET though because of subtle |
| 67 | // Windows 9x/NT differences in handling it) |
| 68 | charset = ANSI_CHARSET; |
| 69 | } |
| 70 | else |
| 71 | { |
| 72 | if ( wxSscanf(tmp, _T("%u"), &charset) != 1 ) |
| 73 | { |
| 74 | // should be a number! |
| 75 | return FALSE; |
| 76 | } |
| 77 | } |
| 78 | |
| 79 | return TRUE; |
| 80 | } |
| 81 | |
| 82 | wxString wxNativeEncodingInfo::ToString() const |
| 83 | { |
| 84 | wxString s(facename); |
| 85 | if ( charset != ANSI_CHARSET ) |
| 86 | { |
| 87 | s << _T(';') << charset; |
| 88 | } |
| 89 | |
| 90 | return s; |
| 91 | } |
| 92 | |
| 93 | // ---------------------------------------------------------------------------- |
| 94 | // helper functions |
| 95 | // ---------------------------------------------------------------------------- |
| 96 | |
| 97 | bool wxGetNativeFontEncoding(wxFontEncoding encoding, |
| 98 | wxNativeEncodingInfo *info) |
| 99 | { |
| 100 | wxCHECK_MSG( info, FALSE, _T("bad pointer in wxGetNativeFontEncoding") ); |
| 101 | |
| 102 | if ( encoding == wxFONTENCODING_DEFAULT ) |
| 103 | { |
| 104 | encoding = wxFont::GetDefaultEncoding(); |
| 105 | } |
| 106 | |
| 107 | switch ( encoding ) |
| 108 | { |
| 109 | // although this function is supposed to return an exact match, do do |
| 110 | // some mappings here for the most common case of "standard" encoding |
| 111 | case wxFONTENCODING_SYSTEM: |
| 112 | case wxFONTENCODING_ISO8859_1: |
| 113 | case wxFONTENCODING_ISO8859_15: |
| 114 | case wxFONTENCODING_CP1252: |
| 115 | info->charset = ANSI_CHARSET; |
| 116 | break; |
| 117 | |
| 118 | #if !defined(__WIN16__) |
| 119 | case wxFONTENCODING_CP1250: |
| 120 | info->charset = EASTEUROPE_CHARSET; |
| 121 | break; |
| 122 | |
| 123 | case wxFONTENCODING_CP1251: |
| 124 | info->charset = RUSSIAN_CHARSET; |
| 125 | break; |
| 126 | |
| 127 | case wxFONTENCODING_CP1253: |
| 128 | info->charset = GREEK_CHARSET; |
| 129 | break; |
| 130 | |
| 131 | case wxFONTENCODING_CP1254: |
| 132 | info->charset = TURKISH_CHARSET; |
| 133 | break; |
| 134 | |
| 135 | case wxFONTENCODING_CP1255: |
| 136 | info->charset = HEBREW_CHARSET; |
| 137 | break; |
| 138 | |
| 139 | case wxFONTENCODING_CP1256: |
| 140 | info->charset = ARABIC_CHARSET; |
| 141 | break; |
| 142 | |
| 143 | case wxFONTENCODING_CP1257: |
| 144 | info->charset = BALTIC_CHARSET; |
| 145 | break; |
| 146 | |
| 147 | case wxFONTENCODING_CP874: |
| 148 | info->charset = THAI_CHARSET; |
| 149 | break; |
| 150 | #endif // !Win16 |
| 151 | |
| 152 | case wxFONTENCODING_CP437: |
| 153 | info->charset = OEM_CHARSET; |
| 154 | break; |
| 155 | |
| 156 | default: |
| 157 | // no way to translate this encoding into a Windows charset |
| 158 | return FALSE; |
| 159 | } |
| 160 | |
| 161 | return TRUE; |
| 162 | } |
| 163 | |
| 164 | bool wxTestFontEncoding(const wxNativeEncodingInfo& info) |
| 165 | { |
| 166 | // try to create such font |
| 167 | LOGFONT lf; |
| 168 | wxZeroMemory(lf); // all default values |
| 169 | |
| 170 | lf.lfCharSet = info.charset; |
| 171 | strncpy(lf.lfFaceName, info.facename, sizeof(lf.lfFaceName)); |
| 172 | |
| 173 | HFONT hfont = ::CreateFontIndirect(&lf); |
| 174 | if ( !hfont ) |
| 175 | { |
| 176 | // no such font |
| 177 | return FALSE; |
| 178 | } |
| 179 | |
| 180 | ::DeleteObject((HGDIOBJ)hfont); |
| 181 | |
| 182 | return TRUE; |
| 183 | } |
| 184 | |
| 185 | // ---------------------------------------------------------------------------- |
| 186 | // wxFont <-> LOGFONT conversion |
| 187 | // ---------------------------------------------------------------------------- |
| 188 | |
| 189 | void wxFillLogFont(LOGFONT *logFont, const wxFont *font) |
| 190 | { |
| 191 | int ff_family; |
| 192 | wxString ff_face; |
| 193 | |
| 194 | switch ( font->GetFamily() ) |
| 195 | { |
| 196 | case wxSCRIPT: |
| 197 | ff_family = FF_SCRIPT; |
| 198 | ff_face = _T("Script"); |
| 199 | break; |
| 200 | |
| 201 | case wxDECORATIVE: |
| 202 | ff_family = FF_DECORATIVE; |
| 203 | break; |
| 204 | |
| 205 | case wxROMAN: |
| 206 | ff_family = FF_ROMAN; |
| 207 | ff_face = _T("Times New Roman"); |
| 208 | break; |
| 209 | |
| 210 | case wxTELETYPE: |
| 211 | case wxMODERN: |
| 212 | ff_family = FF_MODERN; |
| 213 | ff_face = _T("Courier New"); |
| 214 | break; |
| 215 | |
| 216 | case wxSWISS: |
| 217 | ff_family = FF_SWISS; |
| 218 | ff_face = _T("Arial"); |
| 219 | break; |
| 220 | |
| 221 | case wxDEFAULT: |
| 222 | default: |
| 223 | ff_family = FF_SWISS; |
| 224 | ff_face = _T("MS Sans Serif"); |
| 225 | } |
| 226 | |
| 227 | BYTE ff_italic; |
| 228 | switch ( font->GetStyle() ) |
| 229 | { |
| 230 | case wxITALIC: |
| 231 | case wxSLANT: |
| 232 | ff_italic = 1; |
| 233 | break; |
| 234 | |
| 235 | default: |
| 236 | wxFAIL_MSG(wxT("unknown font slant")); |
| 237 | // fall through |
| 238 | |
| 239 | case wxNORMAL: |
| 240 | ff_italic = 0; |
| 241 | } |
| 242 | |
| 243 | int ff_weight; |
| 244 | switch ( font->GetWeight() ) |
| 245 | { |
| 246 | default: |
| 247 | wxFAIL_MSG(_T("unknown font weight")); |
| 248 | // fall through |
| 249 | |
| 250 | case wxNORMAL: |
| 251 | ff_weight = FW_NORMAL; |
| 252 | break; |
| 253 | |
| 254 | case wxLIGHT: |
| 255 | ff_weight = FW_LIGHT; |
| 256 | break; |
| 257 | |
| 258 | case wxBOLD: |
| 259 | ff_weight = FW_BOLD; |
| 260 | break; |
| 261 | } |
| 262 | |
| 263 | #if 0 |
| 264 | HDC dc = ::GetDC(NULL); |
| 265 | int ppInch = ::GetDeviceCaps(dc, LOGPIXELSY); |
| 266 | ::ReleaseDC(NULL, dc); |
| 267 | #else |
| 268 | // New behaviour: apparently ppInch varies according to Large/Small Fonts |
| 269 | // setting in Windows. This messes up fonts. So, set ppInch to a constant |
| 270 | // 96 dpi. |
| 271 | static const int ppInch = 96; |
| 272 | #endif // 0/1 |
| 273 | |
| 274 | #if wxFONT_SIZE_COMPATIBILITY |
| 275 | // Incorrect, but compatible with old wxWindows behaviour |
| 276 | int nHeight = (font->GetPointSize()*ppInch/72); |
| 277 | #else |
| 278 | // Correct for Windows compatibility |
| 279 | int nHeight = - (font->GetPointSize()*ppInch/72); |
| 280 | #endif |
| 281 | |
| 282 | wxString facename = font->GetFaceName(); |
| 283 | if ( !!facename ) |
| 284 | { |
| 285 | ff_face = facename; |
| 286 | } |
| 287 | //else: ff_face is a reasonable default facename for this font family |
| 288 | |
| 289 | // deal with encoding now |
| 290 | wxNativeEncodingInfo info; |
| 291 | wxFontEncoding encoding = font->GetEncoding(); |
| 292 | if ( !wxGetNativeFontEncoding(encoding, &info) ) |
| 293 | { |
| 294 | if ( !wxTheFontMapper->GetAltForEncoding(encoding, &info) ) |
| 295 | { |
| 296 | // unsupported encoding, replace with the default |
| 297 | info.charset = ANSI_CHARSET; |
| 298 | } |
| 299 | } |
| 300 | |
| 301 | if ( !info.facename.IsEmpty() ) |
| 302 | { |
| 303 | // the facename determined by the encoding overrides everything else |
| 304 | ff_face = info.facename; |
| 305 | } |
| 306 | |
| 307 | // transfer all the data to LOGFONT |
| 308 | logFont->lfHeight = nHeight; |
| 309 | logFont->lfWidth = 0; |
| 310 | logFont->lfEscapement = 0; |
| 311 | logFont->lfOrientation = 0; |
| 312 | logFont->lfWeight = ff_weight; |
| 313 | logFont->lfItalic = ff_italic; |
| 314 | logFont->lfUnderline = (BYTE)font->GetUnderlined(); |
| 315 | logFont->lfStrikeOut = 0; |
| 316 | logFont->lfCharSet = info.charset; |
| 317 | logFont->lfOutPrecision = OUT_DEFAULT_PRECIS; |
| 318 | logFont->lfClipPrecision = CLIP_DEFAULT_PRECIS; |
| 319 | logFont->lfQuality = PROOF_QUALITY; |
| 320 | logFont->lfPitchAndFamily = DEFAULT_PITCH | ff_family; |
| 321 | wxStrncpy(logFont->lfFaceName, ff_face, WXSIZEOF(logFont->lfFaceName)); |
| 322 | } |
| 323 | |
| 324 | wxFont wxCreateFontFromLogFont(const LOGFONT *logFont) |
| 325 | { |
| 326 | // extract family from pitch-and-family |
| 327 | int lfFamily = logFont->lfPitchAndFamily; |
| 328 | if ( lfFamily & FIXED_PITCH ) |
| 329 | lfFamily -= FIXED_PITCH; |
| 330 | if ( lfFamily & VARIABLE_PITCH ) |
| 331 | lfFamily -= VARIABLE_PITCH; |
| 332 | |
| 333 | int fontFamily; |
| 334 | switch ( lfFamily ) |
| 335 | { |
| 336 | case FF_ROMAN: |
| 337 | fontFamily = wxROMAN; |
| 338 | break; |
| 339 | |
| 340 | case FF_SWISS: |
| 341 | fontFamily = wxSWISS; |
| 342 | break; |
| 343 | |
| 344 | case FF_SCRIPT: |
| 345 | fontFamily = wxSCRIPT; |
| 346 | break; |
| 347 | |
| 348 | case FF_MODERN: |
| 349 | fontFamily = wxMODERN; |
| 350 | break; |
| 351 | |
| 352 | case FF_DECORATIVE: |
| 353 | fontFamily = wxDECORATIVE; |
| 354 | break; |
| 355 | |
| 356 | default: |
| 357 | fontFamily = wxSWISS; |
| 358 | } |
| 359 | |
| 360 | // weight and style |
| 361 | int fontWeight = wxNORMAL; |
| 362 | switch ( logFont->lfWeight ) |
| 363 | { |
| 364 | case FW_LIGHT: |
| 365 | fontWeight = wxLIGHT; |
| 366 | break; |
| 367 | |
| 368 | default: |
| 369 | case FW_NORMAL: |
| 370 | fontWeight = wxNORMAL; |
| 371 | break; |
| 372 | |
| 373 | case FW_BOLD: |
| 374 | fontWeight = wxBOLD; |
| 375 | break; |
| 376 | } |
| 377 | |
| 378 | int fontStyle = logFont->lfItalic ? wxITALIC : wxNORMAL; |
| 379 | |
| 380 | bool fontUnderline = logFont->lfUnderline != 0; |
| 381 | |
| 382 | wxString fontFace = logFont->lfFaceName; |
| 383 | |
| 384 | // font size |
| 385 | HDC dc = ::GetDC(NULL); |
| 386 | |
| 387 | // remember that 1pt = 1/72inch |
| 388 | int height = abs(logFont->lfHeight); |
| 389 | int fontPoints = (72*height)/GetDeviceCaps(dc, LOGPIXELSY); |
| 390 | |
| 391 | ::ReleaseDC(NULL, dc); |
| 392 | |
| 393 | wxFontEncoding fontEncoding; |
| 394 | switch ( logFont->lfCharSet ) |
| 395 | { |
| 396 | default: |
| 397 | wxFAIL_MSG(wxT("unsupported charset")); |
| 398 | // fall through |
| 399 | |
| 400 | case ANSI_CHARSET: |
| 401 | fontEncoding = wxFONTENCODING_CP1252; |
| 402 | break; |
| 403 | |
| 404 | #ifdef __WIN32__ |
| 405 | case EASTEUROPE_CHARSET: |
| 406 | fontEncoding = wxFONTENCODING_CP1250; |
| 407 | break; |
| 408 | |
| 409 | case BALTIC_CHARSET: |
| 410 | fontEncoding = wxFONTENCODING_CP1257; |
| 411 | break; |
| 412 | |
| 413 | case RUSSIAN_CHARSET: |
| 414 | fontEncoding = wxFONTENCODING_CP1251; |
| 415 | break; |
| 416 | |
| 417 | case ARABIC_CHARSET: |
| 418 | fontEncoding = wxFONTENCODING_CP1256; |
| 419 | break; |
| 420 | |
| 421 | case GREEK_CHARSET: |
| 422 | fontEncoding = wxFONTENCODING_CP1253; |
| 423 | break; |
| 424 | |
| 425 | case HEBREW_CHARSET: |
| 426 | fontEncoding = wxFONTENCODING_CP1255; |
| 427 | break; |
| 428 | |
| 429 | case TURKISH_CHARSET: |
| 430 | fontEncoding = wxFONTENCODING_CP1254; |
| 431 | break; |
| 432 | |
| 433 | case THAI_CHARSET: |
| 434 | fontEncoding = wxFONTENCODING_CP437; |
| 435 | break; |
| 436 | #endif |
| 437 | |
| 438 | case OEM_CHARSET: |
| 439 | fontEncoding = wxFONTENCODING_CP437; |
| 440 | break; |
| 441 | } |
| 442 | |
| 443 | return wxFont(fontPoints, fontFamily, fontStyle, |
| 444 | fontWeight, fontUnderline, fontFace, |
| 445 | fontEncoding); |
| 446 | } |
| 447 | |
| 448 | |