// Created: 05.11.99
// RCS-ID: $Id$
// Copyright: (c) 1999 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
-// Licence: wxWindows license
+// Licence: wxWindows licence
///////////////////////////////////////////////////////////////////////////////
// ============================================================================
// headers
// ----------------------------------------------------------------------------
-#ifdef __GNUG__
- #pragma implementation "fontutil.h"
-#endif
-
// For compilers that support precompilation, includes "wx.h".
#include "wx/wxprec.h"
#include "wx/string.h"
#include "wx/log.h"
#include "wx/intl.h"
+ #include "wx/encinfo.h"
+ #include "wx/wxcrtvararg.h"
#endif //WX_PRECOMP
#include "wx/msw/private.h"
#include "wx/tokenzr.h"
+// for MSVC5 and old w32api
+#ifndef HANGUL_CHARSET
+# define HANGUL_CHARSET 129
+#endif
+
// ============================================================================
// implementation
// ============================================================================
// ----------------------------------------------------------------------------
// convert to/from the string representation: format is
-// facename[;charset]
+// encodingid;facename[;charset]
bool wxNativeEncodingInfo::FromString(const wxString& s)
{
- wxStringTokenizer tokenizer(s, _T(";"));
+ wxStringTokenizer tokenizer(s, wxT(";"));
+
+ wxString encid = tokenizer.GetNextToken();
+
+ // we support 2 formats: the old one (and still used if !wxUSE_FONTMAP)
+ // used the raw encoding values but the new one uses the encoding names
+ long enc;
+ if ( encid.ToLong(&enc) )
+ {
+ // old format, intepret as encoding -- but after minimal checks
+ if ( enc < 0 || enc >= wxFONTENCODING_MAX )
+ return false;
+
+ encoding = (wxFontEncoding)enc;
+ }
+ else // not a number, interpret as an encoding name
+ {
+#if wxUSE_FONTMAP
+ encoding = wxFontMapper::GetEncodingFromName(encid);
+ if ( encoding == wxFONTENCODING_MAX )
+#endif // wxUSE_FONTMAP
+ {
+ // failed to parse the name (or couldn't even try...)
+ return false;
+ }
+ }
facename = tokenizer.GetNextToken();
- if ( !facename )
- return FALSE;
wxString tmp = tokenizer.GetNextToken();
- if ( !tmp )
+ if ( tmp.empty() )
{
- // default charset (don't use DEFAULT_CHARSET though because of subtle
- // Windows 9x/NT differences in handling it)
+ // default charset: but don't use DEFAULT_CHARSET here because it might
+ // be different from the machine on which the file we had read this
+ // encoding desc from was created
charset = ANSI_CHARSET;
}
else
{
- if ( wxSscanf(tmp, _T("%u"), &charset) != 1 )
+ if ( wxSscanf(tmp, wxT("%u"), &charset) != 1 )
{
// should be a number!
- return FALSE;
+ return false;
}
}
- return TRUE;
+ return true;
}
wxString wxNativeEncodingInfo::ToString() const
{
- wxString s(facename);
+ wxString s;
+
+ s
+#if wxUSE_FONTMAP
+ // use the encoding names as this is safer than using the numerical
+ // values which may change with time (because new encodings are
+ // inserted...)
+ << wxFontMapper::GetEncodingName(encoding)
+#else // !wxUSE_FONTMAP
+ // we don't have any choice but to use the raw value
+ << (long)encoding
+#endif // wxUSE_FONTMAP/!wxUSE_FONTMAP
+ << wxT(';') << facename;
+
+ // ANSI_CHARSET is assumed anyhow
if ( charset != ANSI_CHARSET )
{
- s << _T(';') << charset;
+ s << wxT(';') << charset;
}
return s;
bool wxGetNativeFontEncoding(wxFontEncoding encoding,
wxNativeEncodingInfo *info)
{
- wxCHECK_MSG( info, FALSE, _T("bad pointer in wxGetNativeFontEncoding") );
+ wxCHECK_MSG( info, false, wxT("bad pointer in wxGetNativeFontEncoding") );
if ( encoding == wxFONTENCODING_DEFAULT )
{
encoding = wxFont::GetDefaultEncoding();
}
- switch ( encoding )
- {
- // although this function is supposed to return an exact match, do do
- // some mappings here for the most common case of "standard" encoding
- case wxFONTENCODING_SYSTEM:
- case wxFONTENCODING_ISO8859_1:
- case wxFONTENCODING_ISO8859_15:
- case wxFONTENCODING_CP1252:
- info->charset = ANSI_CHARSET;
- break;
+ extern WXDLLIMPEXP_BASE long wxEncodingToCharset(wxFontEncoding encoding);
+ info->charset = wxEncodingToCharset(encoding);
+ if ( info->charset == -1 )
+ return false;
-#if !defined(__WIN16__)
- case wxFONTENCODING_CP1250:
- info->charset = EASTEUROPE_CHARSET;
- break;
-
- case wxFONTENCODING_CP1251:
- info->charset = RUSSIAN_CHARSET;
- break;
+ info->encoding = encoding;
- case wxFONTENCODING_CP1253:
- info->charset = GREEK_CHARSET;
- break;
-
- case wxFONTENCODING_CP1254:
- info->charset = TURKISH_CHARSET;
- break;
-
- case wxFONTENCODING_CP1255:
- info->charset = HEBREW_CHARSET;
- break;
-
- case wxFONTENCODING_CP1256:
- info->charset = ARABIC_CHARSET;
- break;
-
- case wxFONTENCODING_CP1257:
- info->charset = BALTIC_CHARSET;
- break;
-
- case wxFONTENCODING_CP874:
- info->charset = THAI_CHARSET;
- break;
-#endif // !Win16
-
- case wxFONTENCODING_CP437:
- info->charset = OEM_CHARSET;
- break;
-
- default:
- // no way to translate this encoding into a Windows charset
- return FALSE;
- }
-
- return TRUE;
+ return true;
}
bool wxTestFontEncoding(const wxNativeEncodingInfo& info)
LOGFONT lf;
wxZeroMemory(lf); // all default values
- lf.lfCharSet = info.charset;
- strncpy(lf.lfFaceName, info.facename, sizeof(lf.lfFaceName));
+ lf.lfCharSet = (BYTE)info.charset;
+ wxStrlcpy(lf.lfFaceName, info.facename.c_str(), WXSIZEOF(lf.lfFaceName));
HFONT hfont = ::CreateFontIndirect(&lf);
if ( !hfont )
{
// no such font
- return FALSE;
+ return false;
}
::DeleteObject((HGDIOBJ)hfont);
- return TRUE;
+ return true;
}
// ----------------------------------------------------------------------------
-// wxFont <-> LOGFONT conversion
+// wxFontEncoding <-> CHARSET_XXX
// ----------------------------------------------------------------------------
-void wxFillLogFont(LOGFONT *logFont, const wxFont *font)
+wxFontEncoding wxGetFontEncFromCharSet(int cs)
{
- int ff_family;
- wxString ff_face;
-
- switch ( font->GetFamily() )
- {
- case wxSCRIPT:
- ff_family = FF_SCRIPT;
- ff_face = _T("Script");
- break;
-
- case wxDECORATIVE:
- ff_family = FF_DECORATIVE;
- break;
-
- case wxROMAN:
- ff_family = FF_ROMAN;
- ff_face = _T("Times New Roman");
- break;
-
- case wxTELETYPE:
- case wxMODERN:
- ff_family = FF_MODERN;
- ff_face = _T("Courier New");
- break;
-
- case wxSWISS:
- ff_family = FF_SWISS;
- ff_face = _T("Arial");
- break;
-
- case wxDEFAULT:
- default:
- ff_family = FF_SWISS;
- ff_face = _T("MS Sans Serif");
- }
-
- BYTE ff_italic;
- switch ( font->GetStyle() )
- {
- case wxITALIC:
- case wxSLANT:
- ff_italic = 1;
- break;
-
- default:
- wxFAIL_MSG(wxT("unknown font slant"));
- // fall through
-
- case wxNORMAL:
- ff_italic = 0;
- }
-
- int ff_weight;
- switch ( font->GetWeight() )
- {
- default:
- wxFAIL_MSG(_T("unknown font weight"));
- // fall through
-
- case wxNORMAL:
- ff_weight = FW_NORMAL;
- break;
-
- case wxLIGHT:
- ff_weight = FW_LIGHT;
- break;
-
- case wxBOLD:
- ff_weight = FW_BOLD;
- break;
- }
-
-#if 0
- HDC dc = ::GetDC(NULL);
- int ppInch = ::GetDeviceCaps(dc, LOGPIXELSY);
- ::ReleaseDC(NULL, dc);
-#else
- // New behaviour: apparently ppInch varies according to Large/Small Fonts
- // setting in Windows. This messes up fonts. So, set ppInch to a constant
- // 96 dpi.
- static const int ppInch = 96;
-#endif // 0/1
-
-#if wxFONT_SIZE_COMPATIBILITY
- // Incorrect, but compatible with old wxWindows behaviour
- int nHeight = (font->GetPointSize()*ppInch/72);
-#else
- // Correct for Windows compatibility
- int nHeight = - (font->GetPointSize()*ppInch/72);
-#endif
-
- wxString facename = font->GetFaceName();
- if ( !!facename )
- {
- ff_face = facename;
- }
- //else: ff_face is a reasonable default facename for this font family
-
- // deal with encoding now
- wxNativeEncodingInfo info;
- wxFontEncoding encoding = font->GetEncoding();
- if ( !wxGetNativeFontEncoding(encoding, &info) )
- {
- if ( !wxTheFontMapper->GetAltForEncoding(encoding, &info) )
- {
- // unsupported encoding, replace with the default
- info.charset = ANSI_CHARSET;
- }
- }
-
- if ( !info.facename.IsEmpty() )
- {
- // the facename determined by the encoding overrides everything else
- ff_face = info.facename;
- }
-
- // transfer all the data to LOGFONT
- logFont->lfHeight = nHeight;
- logFont->lfWidth = 0;
- logFont->lfEscapement = 0;
- logFont->lfOrientation = 0;
- logFont->lfWeight = ff_weight;
- logFont->lfItalic = ff_italic;
- logFont->lfUnderline = (BYTE)font->GetUnderlined();
- logFont->lfStrikeOut = 0;
- logFont->lfCharSet = info.charset;
- logFont->lfOutPrecision = OUT_DEFAULT_PRECIS;
- logFont->lfClipPrecision = CLIP_DEFAULT_PRECIS;
- logFont->lfQuality = PROOF_QUALITY;
- logFont->lfPitchAndFamily = DEFAULT_PITCH | ff_family;
- wxStrncpy(logFont->lfFaceName, ff_face, WXSIZEOF(logFont->lfFaceName));
-}
-
-wxFont wxCreateFontFromLogFont(const LOGFONT *logFont)
-{
- // extract family from pitch-and-family
- int lfFamily = logFont->lfPitchAndFamily;
- if ( lfFamily & FIXED_PITCH )
- lfFamily -= FIXED_PITCH;
- if ( lfFamily & VARIABLE_PITCH )
- lfFamily -= VARIABLE_PITCH;
-
- int fontFamily;
- switch ( lfFamily )
- {
- case FF_ROMAN:
- fontFamily = wxROMAN;
- break;
-
- case FF_SWISS:
- fontFamily = wxSWISS;
- break;
-
- case FF_SCRIPT:
- fontFamily = wxSCRIPT;
- break;
-
- case FF_MODERN:
- fontFamily = wxMODERN;
- break;
-
- case FF_DECORATIVE:
- fontFamily = wxDECORATIVE;
- break;
-
- default:
- fontFamily = wxSWISS;
- }
+ wxFontEncoding fontEncoding;
- // weight and style
- int fontWeight = wxNORMAL;
- switch ( logFont->lfWeight )
+ switch ( cs )
{
- case FW_LIGHT:
- fontWeight = wxLIGHT;
- break;
-
default:
- case FW_NORMAL:
- fontWeight = wxNORMAL;
- break;
+ wxFAIL_MSG( wxT("unexpected Win32 charset") );
+ // fall through and assume the system charset
- case FW_BOLD:
- fontWeight = wxBOLD;
+ case DEFAULT_CHARSET:
+ fontEncoding = wxFONTENCODING_SYSTEM;
break;
- }
-
- int fontStyle = logFont->lfItalic ? wxITALIC : wxNORMAL;
-
- bool fontUnderline = logFont->lfUnderline != 0;
-
- wxString fontFace = logFont->lfFaceName;
-
- // font size
- HDC dc = ::GetDC(NULL);
-
- // remember that 1pt = 1/72inch
- int height = abs(logFont->lfHeight);
- int fontPoints = (72*height)/GetDeviceCaps(dc, LOGPIXELSY);
-
- ::ReleaseDC(NULL, dc);
-
- wxFontEncoding fontEncoding;
- switch ( logFont->lfCharSet )
- {
- default:
- wxFAIL_MSG(wxT("unsupported charset"));
- // fall through
case ANSI_CHARSET:
fontEncoding = wxFONTENCODING_CP1252;
break;
-#ifdef __WIN32__
+ case SYMBOL_CHARSET:
+ // what can we do here?
+ fontEncoding = wxFONTENCODING_MAX;
+ break;
+
+#if defined(__WIN32__) && !defined(__WXMICROWIN__)
case EASTEUROPE_CHARSET:
fontEncoding = wxFONTENCODING_CP1250;
break;
break;
case THAI_CHARSET:
- fontEncoding = wxFONTENCODING_CP437;
+ fontEncoding = wxFONTENCODING_CP874;
+ break;
+
+ case SHIFTJIS_CHARSET:
+ fontEncoding = wxFONTENCODING_CP932;
+ break;
+
+ case GB2312_CHARSET:
+ fontEncoding = wxFONTENCODING_CP936;
+ break;
+
+ case HANGUL_CHARSET:
+ fontEncoding = wxFONTENCODING_CP949;
break;
-#endif
+
+ case CHINESEBIG5_CHARSET:
+ fontEncoding = wxFONTENCODING_CP950;
+ break;
+
+#endif // Win32
case OEM_CHARSET:
fontEncoding = wxFONTENCODING_CP437;
break;
}
- return wxFont(fontPoints, fontFamily, fontStyle,
- fontWeight, fontUnderline, fontFace,
- fontEncoding);
+ return fontEncoding;
+}
+
+// ----------------------------------------------------------------------------
+// wxFont <-> LOGFONT conversion
+// ----------------------------------------------------------------------------
+
+void wxFillLogFont(LOGFONT *logFont, const wxFont *font)
+{
+ wxNativeFontInfo fi;
+
+ // maybe we already have LOGFONT for this font?
+ const wxNativeFontInfo *pFI = font->GetNativeFontInfo();
+ if ( !pFI )
+ {
+ // use wxNativeFontInfo methods to build a LOGFONT for this font
+ fi.InitFromFont(*font);
+
+ pFI = &fi;
+ }
+
+ // transfer all the data to LOGFONT
+ *logFont = pFI->lf;
}
+wxFont wxCreateFontFromLogFont(const LOGFONT *logFont)
+{
+ wxNativeFontInfo info;
+
+ info.lf = *logFont;
+
+ return wxFont(info);
+}