X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/e90c1d2a19361551eb07778280f22be3e759cf64..43f4e852a1b2ac37c3db6a2b87315192ac549191:/src/msw/font.cpp diff --git a/src/msw/font.cpp b/src/msw/font.cpp index 6f1ea88cf8..060139df72 100644 --- a/src/msw/font.cpp +++ b/src/msw/font.cpp @@ -1,12 +1,12 @@ ///////////////////////////////////////////////////////////////////////////// -// Name: font.cpp +// Name: src/msw/font.cpp // Purpose: wxFont class // Author: Julian Smart // Modified by: // Created: 01/02/97 // RCS-ID: $Id$ -// Copyright: (c) Julian Smart and Markus Holzem -// Licence: wxWindows licence +// Copyright: (c) wxWidgets team +// Licence: wxWindows licence ///////////////////////////////////////////////////////////////////////////// // ============================================================================ @@ -17,10 +17,6 @@ // headers // ---------------------------------------------------------------------------- -#ifdef __GNUG__ - #pragma implementation "font.h" -#endif - // For compilers that support precompilation, includes "wx.h". #include "wx/wxprec.h" @@ -28,90 +24,317 @@ #pragma hdrstop #endif +#include "wx/font.h" + #ifndef WX_PRECOMP - #include - #include "wx/setup.h" #include "wx/list.h" #include "wx/utils.h" #include "wx/app.h" - #include "wx/font.h" + #include "wx/log.h" + #include "wx/msw/private.h" #endif // WX_PRECOMP -#include "wx/msw/private.h" +#include "wx/encinfo.h" +#include "wx/fontutil.h" +#include "wx/fontmap.h" -#if !USE_SHARED_LIBRARIES - IMPLEMENT_DYNAMIC_CLASS(wxFont, wxGDIObject) - - #if wxUSE_PORTABLE_FONTS_IN_MSW - IMPLEMENT_DYNAMIC_CLASS(wxFontNameDirectory, wxObject) - #endif +#ifndef __WXWINCE__ + #include "wx/sysopt.h" #endif +#include "wx/scopeguard.h" +#include "wx/tokenzr.h" + +// ---------------------------------------------------------------------------- +// constants +// ---------------------------------------------------------------------------- + +// the mask used to extract the pitch from LOGFONT::lfPitchAndFamily field +static const int PITCH_MASK = FIXED_PITCH | VARIABLE_PITCH; + // ---------------------------------------------------------------------------- // wxFontRefData - the internal description of the font // ---------------------------------------------------------------------------- class WXDLLEXPORT wxFontRefData: public wxGDIRefData { -friend class WXDLLEXPORT wxFont; - public: + // constructors wxFontRefData() { - Init(12, wxDEFAULT, wxNORMAL, wxNORMAL, FALSE, - "", wxFONTENCODING_DEFAULT); - } - - wxFontRefData(const wxFontRefData& data) - { - Init(data.m_pointSize, data.m_family, data.m_style, data.m_weight, - data.m_underlined, data.m_faceName, data.m_encoding); - - m_fontId = data.m_fontId; + Init(-1, wxSize(0,0), false, wxFONTFAMILY_DEFAULT, wxFONTSTYLE_NORMAL, + wxFONTWEIGHT_NORMAL, false, false, wxEmptyString, + wxFONTENCODING_DEFAULT); } wxFontRefData(int size, - int family, - int style, - int weight, + const wxSize& pixelSize, + bool sizeUsingPixels, + wxFontFamily family, + wxFontStyle style, + wxFontWeight weight, bool underlined, + bool strikethrough, const wxString& faceName, wxFontEncoding encoding) { - Init(size, family, style, weight, underlined, faceName, encoding); + Init(size, pixelSize, sizeUsingPixels, family, style, weight, + underlined, strikethrough, faceName, encoding); + } + + wxFontRefData(const wxNativeFontInfo& info, WXHFONT hFont = 0) + { + Init(info, hFont); + } + + wxFontRefData(const wxFontRefData& data) : wxGDIRefData() + { + Init(data.m_nativeFontInfo); } virtual ~wxFontRefData(); + // operations + bool Alloc(); + + void Free(); + + // all wxFont accessors + int GetPointSize() const + { + return m_nativeFontInfo.GetPointSize(); + } + + wxSize GetPixelSize() const + { + return m_nativeFontInfo.GetPixelSize(); + } + + bool IsUsingSizeInPixels() const + { + return m_sizeUsingPixels; + } + + wxFontFamily GetFamily() const + { + return m_nativeFontInfo.GetFamily(); + } + + wxFontStyle GetStyle() const + { + return m_nativeFontInfo.GetStyle(); + } + + wxFontWeight GetWeight() const + { + return m_nativeFontInfo.GetWeight(); + } + + bool GetUnderlined() const + { + return m_nativeFontInfo.GetUnderlined(); + } + + bool GetStrikethrough() const + { + return m_nativeFontInfo.GetStrikethrough(); + } + + wxString GetFaceName() const + { + wxString facename = m_nativeFontInfo.GetFaceName(); + if ( facename.empty() ) + { + facename = GetMSWFaceName(); + if ( !facename.empty() ) + { + // cache the face name, it shouldn't change unless the family + // does and wxNativeFontInfo::SetFamily() resets the face name + const_cast(this)->SetFaceName(facename); + } + } + + return facename; + } + + wxFontEncoding GetEncoding() const + { + return m_nativeFontInfo.GetEncoding(); + } + + WXHFONT GetHFONT() const + { + AllocIfNeeded(); + + return (WXHFONT)m_hFont; + } + + bool HasHFONT() const + { + return m_hFont != 0; + } + + // ... and setters: notice that all of them invalidate the currently + // allocated HFONT, if any, so that the next call to GetHFONT() recreates a + // new one + void SetPointSize(int pointSize) + { + Free(); + + m_nativeFontInfo.SetPointSize(pointSize); + m_sizeUsingPixels = false; + } + + void SetPixelSize(const wxSize& pixelSize) + { + wxCHECK_RET( pixelSize.GetWidth() >= 0, "negative font width" ); + wxCHECK_RET( pixelSize.GetHeight() != 0, "zero font height" ); + + Free(); + + m_nativeFontInfo.SetPixelSize(pixelSize); + m_sizeUsingPixels = true; + } + + void SetFamily(wxFontFamily family) + { + Free(); + + m_nativeFontInfo.SetFamily(family); + } + + void SetStyle(wxFontStyle style) + { + Free(); + + m_nativeFontInfo.SetStyle(style); + } + + void SetWeight(wxFontWeight weight) + { + Free(); + + m_nativeFontInfo.SetWeight(weight); + } + + bool SetFaceName(const wxString& faceName) + { + Free(); + + return m_nativeFontInfo.SetFaceName(faceName); + } + + void SetUnderlined(bool underlined) + { + Free(); + + m_nativeFontInfo.SetUnderlined(underlined); + } + + void SetStrikethrough(bool strikethrough) + { + Free(); + + m_nativeFontInfo.SetStrikethrough(strikethrough); + } + + void SetEncoding(wxFontEncoding encoding) + { + Free(); + + m_nativeFontInfo.SetEncoding(encoding); + } + + const wxNativeFontInfo& GetNativeFontInfo() const + { + // we need to create the font now to get the corresponding LOGFONT if + // it hadn't been done yet + AllocIfNeeded(); + + // ensure that we have a valid face name in our font information: + // GetFaceName() will try to retrieve it from our HFONT and save it if + // it was successful + (void)GetFaceName(); + + return m_nativeFontInfo; + } + + void SetNativeFontInfo(const wxNativeFontInfo& nativeFontInfo) + { + Free(); + + m_nativeFontInfo = nativeFontInfo; + } + protected: // common part of all ctors void Init(int size, - int family, - int style, - int weight, + const wxSize& pixelSize, + bool sizeUsingPixels, + wxFontFamily family, + wxFontStyle style, + wxFontWeight weight, bool underlined, + bool strikethrough, const wxString& faceName, wxFontEncoding encoding); - // If TRUE, the pointer to the actual font is temporary and SHOULD NOT BE - // DELETED by destructor - bool m_temporary; + void Init(const wxNativeFontInfo& info, WXHFONT hFont = 0); + + void AllocIfNeeded() const + { + if ( !m_hFont ) + const_cast(this)->Alloc(); + } + + // retrieve the face name really being used by the font: this is used to + // get the face name selected by the system when we don't specify it (but + // use just the family for example) + wxString GetMSWFaceName() const + { + ScreenHDC hdc; + SelectInHDC selectFont(hdc, (HFONT)GetHFONT()); + + UINT otmSize = GetOutlineTextMetrics(hdc, 0, NULL); + if ( !otmSize ) + { + wxLogLastError("GetOutlineTextMetrics(NULL)"); + return wxString(); + } + + OUTLINETEXTMETRIC * const + otm = static_cast(malloc(otmSize)); + wxON_BLOCK_EXIT1( free, otm ); + + otm->otmSize = otmSize; + if ( !GetOutlineTextMetrics(hdc, otmSize, otm) ) + { + wxLogLastError("GetOutlineTextMetrics()"); + return wxString(); + } - int m_fontId; + // in spite of its type, the otmpFamilyName field of OUTLINETEXTMETRIC + // gives an offset in _bytes_ of the face (not family!) name from the + // struct start while the name itself is an array of TCHARs + // + // FWIW otmpFaceName contains the same thing as otmpFamilyName followed + // by a possible " Italic" or " Bold" or something else suffix + return reinterpret_cast(otm) + + wxPtrToUInt(otm->otmpFamilyName)/sizeof(wxChar); + } - // font characterstics - int m_pointSize; - int m_family; - int m_style; - int m_weight; - bool m_underlined; - wxString m_faceName; - wxFontEncoding m_encoding; + // are we using m_nativeFontInfo.lf.lfHeight for point size or pixel size? + bool m_sizeUsingPixels; - // Windows font handle - WXHFONT m_hFont; + // Windows font handle, created on demand in GetHFONT() + HFONT m_hFont; + + // Native font info + wxNativeFontInfo m_nativeFontInfo; }; +#define M_FONTDATA ((wxFontRefData*)m_refData) + // ============================================================================ // implementation // ============================================================================ @@ -121,345 +344,566 @@ protected: // ---------------------------------------------------------------------------- void wxFontRefData::Init(int pointSize, - int family, - int style, - int weight, + const wxSize& pixelSize, + bool sizeUsingPixels, + wxFontFamily family, + wxFontStyle style, + wxFontWeight weight, bool underlined, + bool strikethrough, const wxString& faceName, wxFontEncoding encoding) { - m_style = style; - m_pointSize = pointSize; - m_family = family; - m_style = style; - m_weight = weight; - m_underlined = underlined; - m_faceName = faceName; - m_encoding = encoding; + m_hFont = NULL; - m_fontId = 0; - m_temporary = FALSE; + m_sizeUsingPixels = sizeUsingPixels; + if ( m_sizeUsingPixels ) + SetPixelSize(pixelSize); + else + SetPointSize(pointSize); + + SetStyle(style); + SetWeight(weight); + SetUnderlined(underlined); + SetStrikethrough(strikethrough); + + // set the family/facename + SetFamily(family); + if ( !faceName.empty() ) + SetFaceName(faceName); + + // deal with encoding now (it may override the font family and facename + // so do it after setting them) + SetEncoding(encoding); +} - m_hFont = 0; +void wxFontRefData::Init(const wxNativeFontInfo& info, WXHFONT hFont) +{ + // hFont may be zero, or it be passed in case we really want to + // use the exact font created in the underlying system + // (for example where we can't guarantee conversion from HFONT + // to LOGFONT back to HFONT) + m_hFont = (HFONT)hFont; + m_nativeFontInfo = info; + + // TODO: m_sizeUsingPixels? } wxFontRefData::~wxFontRefData() +{ + Free(); +} + +bool wxFontRefData::Alloc() +{ + m_hFont = ::CreateFontIndirect(&m_nativeFontInfo.lf); + if ( !m_hFont ) + { + wxLogLastError(wxT("CreateFont")); + return false; + } + + return true; +} + +void wxFontRefData::Free() { if ( m_hFont ) { - if ( !::DeleteObject((HFONT) m_hFont) ) + if ( !::DeleteObject(m_hFont) ) { - wxLogLastError("DeleteObject(font)"); + wxLogLastError(wxT("DeleteObject(font)")); } + + m_hFont = 0; } } // ---------------------------------------------------------------------------- -// wxFont +// wxNativeFontInfo // ---------------------------------------------------------------------------- -void wxFont::Init() +void wxNativeFontInfo::Init() { - if ( wxTheFontList ) - wxTheFontList->Append(this); + wxZeroMemory(lf); + + // we get better font quality if we use PROOF_QUALITY instead of + // DEFAULT_QUALITY but some fonts (e.g. "Terminal 6pt") are not available + // then so we allow to set a global option to choose between quality and + // wider font selection +#ifdef __WXWINCE__ + lf.lfQuality = CLEARTYPE_QUALITY; +#else + lf.lfQuality = wxSystemOptions::GetOptionInt("msw.font.no-proof-quality") + ? DEFAULT_QUALITY + : PROOF_QUALITY; +#endif } -/* Constructor for a font. Note that the real construction is done - * in wxDC::SetFont, when information is available about scaling etc. - */ -bool wxFont::Create(int pointSize, - int family, - int style, - int weight, - bool underlined, - const wxString& faceName, - wxFontEncoding encoding) +int wxNativeFontInfo::GetPointSize() const { - UnRef(); - m_refData = new wxFontRefData(pointSize, family, style, weight, - underlined, faceName, encoding); + // FIXME: using the screen here results in incorrect font size calculation + // for printing! + const int ppInch = ::GetDeviceCaps(ScreenHDC(), LOGPIXELSY); - RealizeResource(); + // BC++ 2007 doesn't provide abs(long) overload, hence the cast + return (int) (((72.0*abs((int)lf.lfHeight)) / (double) ppInch) + 0.5); +} - return TRUE; +wxSize wxNativeFontInfo::GetPixelSize() const +{ + wxSize ret; + ret.SetHeight(abs((int)lf.lfHeight)); + ret.SetWidth(lf.lfWidth); + return ret; } -wxFont::~wxFont() +wxFontStyle wxNativeFontInfo::GetStyle() const { - if ( wxTheFontList ) - wxTheFontList->DeleteObject(this); + return lf.lfItalic ? wxFONTSTYLE_ITALIC : wxFONTSTYLE_NORMAL; } -// ---------------------------------------------------------------------------- -// real implementation -// ---------------------------------------------------------------------------- +wxFontWeight wxNativeFontInfo::GetWeight() const +{ + if ( lf.lfWeight <= 300 ) + return wxFONTWEIGHT_LIGHT; -bool wxFont::RealizeResource() + if ( lf.lfWeight >= 600 ) + return wxFONTWEIGHT_BOLD; + + return wxFONTWEIGHT_NORMAL; +} + +bool wxNativeFontInfo::GetUnderlined() const { - if ( GetResourceHandle() ) - { - // VZ: the old code returned FALSE in this case, but it doesn't seem - // to make sense because the font _was_ created - wxLogDebug(T("Calling wxFont::RealizeResource() twice")); + return lf.lfUnderline != 0; +} - return TRUE; - } +bool wxNativeFontInfo::GetStrikethrough() const +{ + return lf.lfStrikeOut != 0; +} - int ff_family = 0; - wxString ff_face; +wxString wxNativeFontInfo::GetFaceName() const +{ + return lf.lfFaceName; +} + +wxFontFamily wxNativeFontInfo::GetFamily() const +{ + wxFontFamily family; - switch ( M_FONTDATA->m_family ) + // extract family from pitch-and-family + switch ( lf.lfPitchAndFamily & ~PITCH_MASK ) { - case wxSCRIPT: - ff_family = FF_SCRIPT ; - ff_face = T("Script") ; - break ; + case 0: + family = wxFONTFAMILY_UNKNOWN; + break; - case wxDECORATIVE: - ff_family = FF_DECORATIVE; + case FF_ROMAN: + family = wxFONTFAMILY_ROMAN; break; - case wxROMAN: - ff_family = FF_ROMAN; - ff_face = T("Times New Roman") ; + case FF_SWISS: + family = wxFONTFAMILY_SWISS; break; - case wxTELETYPE: - case wxMODERN: - ff_family = FF_MODERN; - ff_face = T("Courier New") ; + case FF_SCRIPT: + family = wxFONTFAMILY_SCRIPT; break; - case wxSWISS: - ff_family = FF_SWISS; - ff_face = T("Arial") ; + case FF_MODERN: + family = wxFONTFAMILY_MODERN; + break; + + case FF_DECORATIVE: + family = wxFONTFAMILY_DECORATIVE; break; - case wxDEFAULT: default: - ff_family = FF_SWISS; - ff_face = T("Arial") ; + wxFAIL_MSG( "unknown LOGFONT::lfFamily value" ); + family = wxFONTFAMILY_UNKNOWN; + // just to avoid a warning } - BYTE ff_italic; - switch ( M_FONTDATA->m_style ) - { - case wxITALIC: - case wxSLANT: - ff_italic = 1; - break; + return family; +} + +wxFontEncoding wxNativeFontInfo::GetEncoding() const +{ + return wxGetFontEncFromCharSet(lf.lfCharSet); +} + +void wxNativeFontInfo::SetPointSize(int pointsize) +{ + // FIXME: using the screen here results in incorrect font size calculation + // for printing! + const int ppInch = ::GetDeviceCaps(ScreenHDC(), LOGPIXELSY); + + lf.lfHeight = -(int)((pointsize*((double)ppInch)/72.0) + 0.5); +} + +void wxNativeFontInfo::SetPixelSize(const wxSize& pixelSize) +{ + // MSW accepts both positive and negative heights here but they mean + // different things: positive specifies the cell height while negative + // specifies the character height. We used to just pass the value to MSW + // unchanged but changed the behaviour for positive values in 2.9.1 to + // match other ports and, more importantly, the expected behaviour. So now + // passing the negative height doesn't make sense at all any more but we + // still accept it for compatibility with the existing code which worked + // around the wrong interpretation of the height argument in older wxMSW + // versions by passing a negative value explicitly itself. + lf.lfHeight = -abs(pixelSize.GetHeight()); + lf.lfWidth = pixelSize.GetWidth(); +} +void wxNativeFontInfo::SetStyle(wxFontStyle style) +{ + switch ( style ) + { default: - wxFAIL_MSG(T("unknown font slant")); + wxFAIL_MSG( "unknown font style" ); // fall through - case wxNORMAL: - ff_italic = 0; + case wxFONTSTYLE_NORMAL: + lf.lfItalic = FALSE; + break; + + case wxFONTSTYLE_ITALIC: + case wxFONTSTYLE_SLANT: + lf.lfItalic = TRUE; + break; } +} - int ff_weight = 0; - switch ( M_FONTDATA->m_weight ) +void wxNativeFontInfo::SetWeight(wxFontWeight weight) +{ + switch ( weight ) { default: - wxFAIL_MSG(T("unknown font weight")); + wxFAIL_MSG( "unknown font weight" ); // fall through - case wxNORMAL: - ff_weight = FW_NORMAL; + case wxFONTWEIGHT_NORMAL: + lf.lfWeight = FW_NORMAL; break; - case wxLIGHT: - ff_weight = FW_LIGHT; + case wxFONTWEIGHT_LIGHT: + lf.lfWeight = FW_LIGHT; break; - case wxBOLD: - ff_weight = FW_BOLD; + case wxFONTWEIGHT_BOLD: + lf.lfWeight = FW_BOLD; break; } +} - const wxChar* pzFace; - if ( M_FONTDATA->m_faceName.IsEmpty() ) - pzFace = ff_face; - else - pzFace = M_FONTDATA->m_faceName ; +void wxNativeFontInfo::SetUnderlined(bool underlined) +{ + lf.lfUnderline = underlined; +} -#if 0 - /* Always calculate fonts using the screen DC (is this the best strategy?) - * There may be confusion if a font is selected into a printer - * DC (say), because the height will be calculated very differently. - */ - // What sort of display is it? - int technology = ::GetDeviceCaps(dc, TECHNOLOGY); +void wxNativeFontInfo::SetStrikethrough(bool strikethrough) +{ + lf.lfStrikeOut = strikethrough; +} + +bool wxNativeFontInfo::SetFaceName(const wxString& facename) +{ + wxStrlcpy(lf.lfFaceName, facename.c_str(), WXSIZEOF(lf.lfFaceName)); + return true; +} - int nHeight; +void wxNativeFontInfo::SetFamily(wxFontFamily family) +{ + BYTE ff_family = FF_DONTCARE; - if (technology != DT_RASDISPLAY && technology != DT_RASPRINTER) - { - // Have to get screen DC Caps, because a metafile will return 0. - HDC dc2 = ::GetDC(NULL); - nHeight = M_FONTDATA->m_pointSize*GetDeviceCaps(dc2, LOGPIXELSY)/72; - ::ReleaseDC(NULL, dc2); - } - else + switch ( family ) { - nHeight = M_FONTDATA->m_pointSize*GetDeviceCaps(dc, LOGPIXELSY)/72; - } -#endif // 0 + case wxFONTFAMILY_SCRIPT: + ff_family = FF_SCRIPT; + break; -#if 0 - // Have to get screen DC Caps, because a metafile will return 0. - HDC dc2 = ::GetDC(NULL); - ppInch = ::GetDeviceCaps(dc2, LOGPIXELSY); - ::ReleaseDC(NULL, dc2); -#endif // 0 + case wxFONTFAMILY_DECORATIVE: + ff_family = FF_DECORATIVE; + break; - // 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; + case wxFONTFAMILY_ROMAN: + ff_family = FF_ROMAN; + break; -#if wxFONT_SIZE_COMPATIBILITY - // Incorrect, but compatible with old wxWindows behaviour - int nHeight = (M_FONTDATA->m_pointSize*ppInch/72); -#else - // Correct for Windows compatibility - int nHeight = - (M_FONTDATA->m_pointSize*ppInch/72); -#endif + case wxFONTFAMILY_TELETYPE: + case wxFONTFAMILY_MODERN: + ff_family = FF_MODERN; + break; - BYTE ff_underline = M_FONTDATA->m_underlined; + case wxFONTFAMILY_SWISS: + case wxFONTFAMILY_DEFAULT: + ff_family = FF_SWISS; + break; - wxFontEncoding encoding = M_FONTDATA->m_encoding; - if ( encoding == wxFONTENCODING_DEFAULT ) - { - encoding = wxFont::GetDefaultEncoding(); + case wxFONTFAMILY_UNKNOWN: + wxFAIL_MSG( "invalid font family" ); + return; } - DWORD charset; - switch ( encoding ) - { - case wxFONTENCODING_ISO8859_1: - case wxFONTENCODING_ISO8859_15: - case wxFONTENCODING_CP1250: - charset = ANSI_CHARSET; - break; + wxCHECK_RET( ff_family != FF_DONTCARE, "unknown wxFontFamily" ); - case wxFONTENCODING_ISO8859_2: - case wxFONTENCODING_CP1252: - charset = EASTEUROPE_CHARSET; - break; + lf.lfPitchAndFamily = (BYTE)(DEFAULT_PITCH) | ff_family; - case wxFONTENCODING_ISO8859_4: - case wxFONTENCODING_ISO8859_10: - charset = BALTIC_CHARSET; - break; + // reset the facename so that CreateFontIndirect() will automatically choose a + // face name based only on the font family. + lf.lfFaceName[0] = '\0'; +} - case wxFONTENCODING_ISO8859_5: - case wxFONTENCODING_CP1251: - charset = RUSSIAN_CHARSET; - break; +void wxNativeFontInfo::SetEncoding(wxFontEncoding encoding) +{ + wxNativeEncodingInfo info; + if ( !wxGetNativeFontEncoding(encoding, &info) ) + { +#if wxUSE_FONTMAP + if ( wxFontMapper::Get()->GetAltForEncoding(encoding, &info) ) + { + if ( !info.facename.empty() ) + { + // if we have this encoding only in some particular facename, use + // the facename - it is better to show the correct characters in a + // wrong facename than unreadable text in a correct one + SetFaceName(info.facename); + } + } + else +#endif // wxUSE_FONTMAP + { + // unsupported encoding, replace with the default + info.charset = DEFAULT_CHARSET; + } + } - case wxFONTENCODING_ISO8859_6: - charset = ARABIC_CHARSET; - break; + lf.lfCharSet = (BYTE)info.charset; +} - case wxFONTENCODING_ISO8859_7: - charset = GREEK_CHARSET; - break; +bool wxNativeFontInfo::FromString(const wxString& s) +{ + long l; + + wxStringTokenizer tokenizer(s, wxS(";"), wxTOKEN_RET_EMPTY_ALL); + + // first the version + wxString token = tokenizer.GetNextToken(); + if ( token != wxS('0') ) + return false; + + token = tokenizer.GetNextToken(); + if ( !token.ToLong(&l) ) + return false; + lf.lfHeight = l; + + token = tokenizer.GetNextToken(); + if ( !token.ToLong(&l) ) + return false; + lf.lfWidth = l; + + token = tokenizer.GetNextToken(); + if ( !token.ToLong(&l) ) + return false; + lf.lfEscapement = l; + + token = tokenizer.GetNextToken(); + if ( !token.ToLong(&l) ) + return false; + lf.lfOrientation = l; + + token = tokenizer.GetNextToken(); + if ( !token.ToLong(&l) ) + return false; + lf.lfWeight = l; + + token = tokenizer.GetNextToken(); + if ( !token.ToLong(&l) ) + return false; + lf.lfItalic = (BYTE)l; + + token = tokenizer.GetNextToken(); + if ( !token.ToLong(&l) ) + return false; + lf.lfUnderline = (BYTE)l; + + token = tokenizer.GetNextToken(); + if ( !token.ToLong(&l) ) + return false; + lf.lfStrikeOut = (BYTE)l; + + token = tokenizer.GetNextToken(); + if ( !token.ToLong(&l) ) + return false; + lf.lfCharSet = (BYTE)l; + + token = tokenizer.GetNextToken(); + if ( !token.ToLong(&l) ) + return false; + lf.lfOutPrecision = (BYTE)l; + + token = tokenizer.GetNextToken(); + if ( !token.ToLong(&l) ) + return false; + lf.lfClipPrecision = (BYTE)l; + + token = tokenizer.GetNextToken(); + if ( !token.ToLong(&l) ) + return false; + lf.lfQuality = (BYTE)l; + + token = tokenizer.GetNextToken(); + if ( !token.ToLong(&l) ) + return false; + lf.lfPitchAndFamily = (BYTE)l; + + if ( !tokenizer.HasMoreTokens() ) + return false; + + // the face name may be empty + SetFaceName(tokenizer.GetNextToken()); + + return true; +} - case wxFONTENCODING_ISO8859_8: - charset = HEBREW_CHARSET; - break; +wxString wxNativeFontInfo::ToString() const +{ + wxString s; + + s.Printf(wxS("%d;%ld;%ld;%ld;%ld;%ld;%d;%d;%d;%d;%d;%d;%d;%d;%s"), + 0, // version, in case we want to change the format later + lf.lfHeight, + lf.lfWidth, + lf.lfEscapement, + lf.lfOrientation, + lf.lfWeight, + lf.lfItalic, + lf.lfUnderline, + lf.lfStrikeOut, + lf.lfCharSet, + lf.lfOutPrecision, + lf.lfClipPrecision, + lf.lfQuality, + lf.lfPitchAndFamily, + lf.lfFaceName); + + return s; +} - case wxFONTENCODING_ISO8859_9: - charset = TURKISH_CHARSET; - break; +// ---------------------------------------------------------------------------- +// wxFont +// ---------------------------------------------------------------------------- - case wxFONTENCODING_ISO8859_11: - charset = THAI_CHARSET; - break; +wxFont::wxFont(const wxString& fontdesc) +{ + wxNativeFontInfo info; + if ( info.FromString(fontdesc) ) + (void)Create(info); +} - case wxFONTENCODING_CP437: - charset = OEM_CHARSET; - break; +wxFont::wxFont(int pointSize, + wxFontFamily family, + int flags, + const wxString& face, + wxFontEncoding encoding) +{ + m_refData = new wxFontRefData(pointSize, wxDefaultSize, false, + family, + GetStyleFromFlags(flags), + GetWeightFromFlags(flags), + GetUnderlinedFromFlags(flags), + false, face, encoding); +} - default: - wxFAIL_MSG(T("unsupported encoding")); - // fall through +bool wxFont::Create(const wxNativeFontInfo& info, WXHFONT hFont) +{ + UnRef(); - case wxFONTENCODING_SYSTEM: - charset = ANSI_CHARSET; - } + m_refData = new wxFontRefData(info, hFont); - HFONT hFont = ::CreateFont - ( - nHeight, // height - 0, // width (choose best) - 0, // escapement - 0, // orientation - ff_weight, // weight - ff_italic, // italic? - ff_underline, // underlined? - 0, // strikeout? - charset, // charset - OUT_DEFAULT_PRECIS, // precision - CLIP_DEFAULT_PRECIS, // clip precision - PROOF_QUALITY, // quality of match - DEFAULT_PITCH | // fixed or variable - ff_family, // family id - pzFace // face name - ); + return RealizeResource(); +} - M_FONTDATA->m_hFont = (WXHFONT)hFont; - if ( !hFont ) +bool wxFont::DoCreate(int pointSize, + const wxSize& pixelSize, + bool sizeUsingPixels, + wxFontFamily family, + wxFontStyle style, + wxFontWeight weight, + bool underlined, + const wxString& faceName, + wxFontEncoding encoding) +{ + UnRef(); + + // wxDEFAULT is a valid value for the font size too so we must treat it + // specially here (otherwise the size would be 70 == wxDEFAULT value) + if ( pointSize == wxDEFAULT || pointSize == -1 ) { - wxLogLastError("CreateFont"); + pointSize = wxNORMAL_FONT->GetPointSize(); } - return hFont != 0; + m_refData = new wxFontRefData(pointSize, pixelSize, sizeUsingPixels, + family, style, weight, + underlined, false, faceName, encoding); + + return RealizeResource(); } -bool wxFont::FreeResource(bool force) +wxFont::~wxFont() { - if ( GetResourceHandle() ) - { - if ( !::DeleteObject((HFONT) M_FONTDATA->m_hFont) ) - { - wxLogLastError("DeleteObject(font)"); - } +} - M_FONTDATA->m_hFont = 0; +// ---------------------------------------------------------------------------- +// real implementation +// ---------------------------------------------------------------------------- - return TRUE; - } - return FALSE; +wxGDIRefData *wxFont::CreateGDIRefData() const +{ + return new wxFontRefData(); +} + +wxGDIRefData *wxFont::CloneGDIRefData(const wxGDIRefData *data) const +{ + return new wxFontRefData(*static_cast(data)); } -WXHANDLE wxFont::GetResourceHandle() +bool wxFont::RealizeResource() +{ + // NOTE: the GetHFONT() call automatically triggers a reallocation of + // the HFONT if necessary (will do nothing if we already have the resource); + // it returns NULL only if there is a failure in wxFontRefData::Alloc()... + return GetHFONT() != NULL; +} + +bool wxFont::FreeResource(bool WXUNUSED(force)) { if ( !M_FONTDATA ) - return 0; - else - return (WXHANDLE)M_FONTDATA->m_hFont ; + return false; + + M_FONTDATA->Free(); + + return true; } -bool wxFont::IsFree() const +WXHANDLE wxFont::GetResourceHandle() const { - return (M_FONTDATA && (M_FONTDATA->m_hFont == 0)); + return (WXHANDLE)GetHFONT(); } -void wxFont::Unshare() +WXHFONT wxFont::GetHFONT() const { - // Don't change shared data - if ( !m_refData ) - { - m_refData = new wxFontRefData(); - } - else - { - wxFontRefData* ref = new wxFontRefData(*M_FONTDATA); - UnRef(); - m_refData = ref; - } + // NOTE: wxFontRefData::GetHFONT() will automatically call + // wxFontRefData::Alloc() if necessary + return M_FONTDATA ? M_FONTDATA->GetHFONT() : 0; +} + +bool wxFont::IsFree() const +{ + return M_FONTDATA && !M_FONTDATA->HasHFONT(); } // ---------------------------------------------------------------------------- @@ -468,65 +912,83 @@ void wxFont::Unshare() void wxFont::SetPointSize(int pointSize) { - Unshare(); - - M_FONTDATA->m_pointSize = pointSize; + AllocExclusive(); - RealizeResource(); + M_FONTDATA->Free(); + M_FONTDATA->SetPointSize(pointSize); } -void wxFont::SetFamily(int family) +void wxFont::SetPixelSize(const wxSize& pixelSize) { - Unshare(); + AllocExclusive(); - M_FONTDATA->m_family = family; - - RealizeResource(); + M_FONTDATA->SetPixelSize(pixelSize); } -void wxFont::SetStyle(int style) +void wxFont::SetFamily(wxFontFamily family) { - Unshare(); - - M_FONTDATA->m_style = style; + AllocExclusive(); - RealizeResource(); + M_FONTDATA->SetFamily(family); } -void wxFont::SetWeight(int weight) +void wxFont::SetStyle(wxFontStyle style) { - Unshare(); + AllocExclusive(); - M_FONTDATA->m_weight = weight; - - RealizeResource(); + M_FONTDATA->SetStyle(style); } -void wxFont::SetFaceName(const wxString& faceName) +void wxFont::SetWeight(wxFontWeight weight) { - Unshare(); + AllocExclusive(); - M_FONTDATA->m_faceName = faceName; + M_FONTDATA->SetWeight(weight); +} - RealizeResource(); +bool wxFont::SetFaceName(const wxString& faceName) +{ + AllocExclusive(); + + if ( !M_FONTDATA->SetFaceName(faceName) ) + return false; + + // NB: using win32's GetObject() API on M_FONTDATA->GetHFONT() + // to retrieve a LOGFONT and then compare lf.lfFaceName + // with given facename is not reliable at all: + // Windows copies the facename given to ::CreateFontIndirect() + // without any validity check. + // Thus we use wxFontBase::SetFaceName to check if facename + // is valid... + return wxFontBase::SetFaceName(faceName); } void wxFont::SetUnderlined(bool underlined) { - Unshare(); + AllocExclusive(); + + M_FONTDATA->SetUnderlined(underlined); +} - M_FONTDATA->m_underlined = underlined; +void wxFont::SetStrikethrough(bool strikethrough) +{ + AllocExclusive(); - RealizeResource(); + M_FONTDATA->SetStrikethrough(strikethrough); } void wxFont::SetEncoding(wxFontEncoding encoding) { - Unshare(); + AllocExclusive(); - M_FONTDATA->m_encoding = encoding; + M_FONTDATA->SetEncoding(encoding); +} - RealizeResource(); +void wxFont::DoSetNativeFontInfo(const wxNativeFontInfo& info) +{ + AllocExclusive(); + + M_FONTDATA->SetNativeFontInfo(info); } // ---------------------------------------------------------------------------- @@ -535,43 +997,94 @@ void wxFont::SetEncoding(wxFontEncoding encoding) int wxFont::GetPointSize() const { - return M_FONTDATA->m_pointSize; + wxCHECK_MSG( IsOk(), 0, wxT("invalid font") ); + + return M_FONTDATA->GetPointSize(); +} + +wxSize wxFont::GetPixelSize() const +{ + wxCHECK_MSG( IsOk(), wxDefaultSize, wxT("invalid font") ); + + return M_FONTDATA->GetPixelSize(); } -int wxFont::GetFamily() const +bool wxFont::IsUsingSizeInPixels() const { - return M_FONTDATA->m_family; + wxCHECK_MSG( IsOk(), 0, wxT("invalid font") ); + + return M_FONTDATA->IsUsingSizeInPixels(); } -int wxFont::GetFontId() const +wxFontFamily wxFont::DoGetFamily() const { - return M_FONTDATA->m_fontId; + return M_FONTDATA->GetFamily(); } -int wxFont::GetStyle() const +wxFontStyle wxFont::GetStyle() const { - return M_FONTDATA->m_style; + wxCHECK_MSG( IsOk(), wxFONTSTYLE_MAX, wxT("invalid font") ); + + return M_FONTDATA->GetStyle(); } -int wxFont::GetWeight() const +wxFontWeight wxFont::GetWeight() const { - return M_FONTDATA->m_weight; + wxCHECK_MSG( IsOk(), wxFONTWEIGHT_MAX, wxT("invalid font") ); + + return M_FONTDATA->GetWeight(); } bool wxFont::GetUnderlined() const { - return M_FONTDATA->m_underlined; + wxCHECK_MSG( IsOk(), false, wxT("invalid font") ); + + return M_FONTDATA->GetUnderlined(); +} + +bool wxFont::GetStrikethrough() const +{ + wxCHECK_MSG( IsOk(), false, wxT("invalid font") ); + + return M_FONTDATA->GetStrikethrough(); } wxString wxFont::GetFaceName() const { - wxString str; - if ( M_FONTDATA ) - str = M_FONTDATA->m_faceName ; - return str; + wxCHECK_MSG( IsOk(), wxEmptyString, wxT("invalid font") ); + + return M_FONTDATA->GetFaceName(); } wxFontEncoding wxFont::GetEncoding() const { - return M_FONTDATA->m_encoding; + wxCHECK_MSG( IsOk(), wxFONTENCODING_DEFAULT, wxT("invalid font") ); + + return M_FONTDATA->GetEncoding(); +} + +const wxNativeFontInfo *wxFont::GetNativeFontInfo() const +{ + return IsOk() ? &(M_FONTDATA->GetNativeFontInfo()) : NULL; +} + +bool wxFont::IsFixedWidth() const +{ + wxCHECK_MSG( IsOk(), false, wxT("invalid font") ); + + // LOGFONT doesn't contain the correct pitch information so we need to call + // GetTextMetrics() to get it + ScreenHDC hdc; + SelectInHDC selectFont(hdc, M_FONTDATA->GetHFONT()); + + TEXTMETRIC tm; + if ( !::GetTextMetrics(hdc, &tm) ) + { + wxLogLastError(wxT("GetTextMetrics")); + return false; + } + + // Quoting MSDN description of TMPF_FIXED_PITCH: "Note very carefully that + // those meanings are the opposite of what the constant name implies." + return !(tm.tmPitchAndFamily & TMPF_FIXED_PITCH); }