X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/1f11220943f14b4bb5190db0dfd0054304f5015c..f559d1a23c71252b698badf63e4685a3abfa1712:/src/msw/font.cpp diff --git a/src/msw/font.cpp b/src/msw/font.cpp index 47f4ac63fa..376b8b3b87 100644 --- a/src/msw/font.cpp +++ b/src/msw/font.cpp @@ -1,382 +1,1036 @@ ///////////////////////////////////////////////////////////////////////////// -// 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 ///////////////////////////////////////////////////////////////////////////// -#ifdef __GNUG__ -#pragma implementation "font.h" -#endif +// ============================================================================ +// declarations +// ============================================================================ + +// ---------------------------------------------------------------------------- +// headers +// ---------------------------------------------------------------------------- // For compilers that support precompilation, includes "wx.h". #include "wx/wxprec.h" #ifdef __BORLANDC__ -#pragma hdrstop + #pragma hdrstop #endif -#ifndef WX_PRECOMP -#include -#include "wx/setup.h" -#include "wx/list.h" -#include "wx/utils.h" -#include "wx/app.h" #include "wx/font.h" -#endif -#include "wx/msw/private.h" -#include +#ifndef WX_PRECOMP + #include "wx/list.h" + #include "wx/utils.h" + #include "wx/app.h" + #include "wx/log.h" + #include "wx/msw/private.h" +#endif // WX_PRECOMP -#if !USE_SHARED_LIBRARIES -IMPLEMENT_DYNAMIC_CLASS(wxFont, wxGDIObject) +#include "wx/encinfo.h" +#include "wx/fontutil.h" +#include "wx/fontmap.h" -#if wxUSE_PORTABLE_FONTS_IN_MSW -IMPLEMENT_DYNAMIC_CLASS(wxFontNameDirectory, wxObject) +#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 +{ +public: + // constructors + wxFontRefData() + { + Init(-1, wxSize(0,0), false, wxFONTFAMILY_DEFAULT, wxFONTSTYLE_NORMAL, + wxFONTWEIGHT_NORMAL, false, wxEmptyString, + wxFONTENCODING_DEFAULT); + } + + wxFontRefData(int size, + const wxSize& pixelSize, + bool sizeUsingPixels, + wxFontFamily family, + wxFontStyle style, + wxFontWeight weight, + bool underlined, + const wxString& faceName, + wxFontEncoding encoding) + { + Init(size, pixelSize, sizeUsingPixels, family, style, weight, + underlined, 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(); + } + + 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 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, + const wxSize& pixelSize, + bool sizeUsingPixels, + wxFontFamily family, + wxFontStyle style, + wxFontWeight weight, + bool underlined, + const wxString& faceName, + wxFontEncoding encoding); + + 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(); + } + + // 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); + } + + // are we using m_nativeFontInfo.lf.lfHeight for point size or pixel size? + bool m_sizeUsingPixels; + + // Windows font handle, created on demand in GetHFONT() + HFONT m_hFont; + + // Native font info + wxNativeFontInfo m_nativeFontInfo; +}; + +#define M_FONTDATA ((wxFontRefData*)m_refData) + +// ============================================================================ +// implementation +// ============================================================================ + +// ---------------------------------------------------------------------------- +// wxFontRefData +// ---------------------------------------------------------------------------- + +void wxFontRefData::Init(int pointSize, + const wxSize& pixelSize, + bool sizeUsingPixels, + wxFontFamily family, + wxFontStyle style, + wxFontWeight weight, + bool underlined, + const wxString& faceName, + wxFontEncoding encoding) +{ + m_hFont = NULL; + + m_sizeUsingPixels = sizeUsingPixels; + if ( m_sizeUsingPixels ) + SetPixelSize(pixelSize); + else + SetPointSize(pointSize); + + SetStyle(style); + SetWeight(weight); + SetUnderlined(underlined); + + // 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); +} + +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(m_hFont) ) + { + wxLogLastError(wxT("DeleteObject(font)")); + } + + m_hFont = 0; + } +} + +// ---------------------------------------------------------------------------- +// wxNativeFontInfo +// ---------------------------------------------------------------------------- + +void wxNativeFontInfo::Init() +{ + 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 +} -wxFontRefData::wxFontRefData(void) +int wxNativeFontInfo::GetPointSize() const { - m_style = 0; - m_temporary = FALSE; - m_pointSize = 0; - m_family = 0; - m_fontId = 0; - m_style = 0; - m_weight = 0; - m_underlined = 0; - m_faceName = ""; - m_hFont = 0; + // FIXME: using the screen here results in incorrect font size calculation + // for printing! + const int ppInch = ::GetDeviceCaps(ScreenHDC(), LOGPIXELSY); + + // BC++ 2007 doesn't provide abs(long) overload, hence the cast + return (int) (((72.0*abs((int)lf.lfHeight)) / (double) ppInch) + 0.5); } -wxFontRefData::wxFontRefData(const wxFontRefData& data) +wxSize wxNativeFontInfo::GetPixelSize() const { - m_style = data.m_style; - m_temporary = FALSE; - m_pointSize = data.m_pointSize; - m_family = data.m_family; - m_fontId = data.m_fontId; - m_style = data.m_style; - m_weight = data.m_weight; - m_underlined = data.m_underlined; - m_faceName = data.m_faceName; - m_hFont = 0; + wxSize ret; + ret.SetHeight(abs((int)lf.lfHeight)); + ret.SetWidth(lf.lfWidth); + return ret; } -wxFontRefData::~wxFontRefData(void) +wxFontStyle wxNativeFontInfo::GetStyle() const { - if ( m_hFont ) - ::DeleteObject((HFONT) m_hFont); + return lf.lfItalic ? wxFONTSTYLE_ITALIC : wxFONTSTYLE_NORMAL; } -wxFont::wxFont(void) +wxFontWeight wxNativeFontInfo::GetWeight() const { - if ( wxTheFontList ) - wxTheFontList->Append(this); + if ( lf.lfWeight <= 300 ) + return wxFONTWEIGHT_LIGHT; + + if ( lf.lfWeight >= 600 ) + return wxFONTWEIGHT_BOLD; + + return wxFONTWEIGHT_NORMAL; } -/* Constructor for a font. Note that the real construction is done - * in wxDC::SetFont, when information is available about scaling etc. - */ -wxFont::wxFont(int pointSize, int family, int style, int weight, bool underlined, const wxString& faceName) +bool wxNativeFontInfo::GetUnderlined() const { - Create(pointSize, family, style, weight, underlined, faceName); + return lf.lfUnderline != 0; +} - if ( wxTheFontList ) - wxTheFontList->Append(this); +wxString wxNativeFontInfo::GetFaceName() const +{ + return lf.lfFaceName; } -bool wxFont::Create(int pointSize, int family, int style, int weight, bool underlined, const wxString& faceName) +wxFontFamily wxNativeFontInfo::GetFamily() const { - UnRef(); - m_refData = new wxFontRefData; + wxFontFamily family; + + // extract family from pitch-and-family + switch ( lf.lfPitchAndFamily & ~PITCH_MASK ) + { + case 0: + family = wxFONTFAMILY_UNKNOWN; + break; + + case FF_ROMAN: + family = wxFONTFAMILY_ROMAN; + break; - M_FONTDATA->m_family = family; - M_FONTDATA->m_style = style; - M_FONTDATA->m_weight = weight; - M_FONTDATA->m_pointSize = pointSize; - M_FONTDATA->m_underlined = underlined; - M_FONTDATA->m_faceName = faceName; + case FF_SWISS: + family = wxFONTFAMILY_SWISS; + break; - RealizeResource(); + case FF_SCRIPT: + family = wxFONTFAMILY_SCRIPT; + break; - return TRUE; + case FF_MODERN: + family = wxFONTFAMILY_MODERN; + break; + + case FF_DECORATIVE: + family = wxFONTFAMILY_DECORATIVE; + break; + + default: + wxFAIL_MSG( "unknown LOGFONT::lfFamily value" ); + family = wxFONTFAMILY_UNKNOWN; + // just to avoid a warning + } + + return family; } -wxFont::~wxFont() +wxFontEncoding wxNativeFontInfo::GetEncoding() const { - if (wxTheFontList) - wxTheFontList->DeleteObject(this); -} - -bool wxFont::RealizeResource(void) -{ - if (M_FONTDATA && !M_FONTDATA->m_hFont) - { - BYTE ff_italic; - int ff_weight = 0; - int ff_family = 0; - wxString ff_face(""); - - switch (M_FONTDATA->m_family) - { - case wxSCRIPT: ff_family = FF_SCRIPT ; - ff_face = "Script" ; - break ; - case wxDECORATIVE: ff_family = FF_DECORATIVE; - break; - case wxROMAN: ff_family = FF_ROMAN; - ff_face = "Times New Roman" ; - break; - case wxTELETYPE: - case wxMODERN: ff_family = FF_MODERN; - ff_face = "Courier New" ; - break; - case wxSWISS: ff_family = FF_SWISS; - ff_face = "Arial"; - break; - case wxDEFAULT: - default: ff_family = FF_SWISS; - ff_face = "Arial" ; - } - - if (M_FONTDATA->m_style == wxITALIC || M_FONTDATA->m_style == wxSLANT) - ff_italic = 1; - else - ff_italic = 0; - - if (M_FONTDATA->m_weight == wxNORMAL) - ff_weight = FW_NORMAL; - else if (M_FONTDATA->m_weight == wxLIGHT) - ff_weight = FW_LIGHT; - else if (M_FONTDATA->m_weight == wxBOLD) - ff_weight = FW_BOLD; - - const char* pzFace = (const char*) ff_face; - if (!M_FONTDATA->m_faceName.IsNull()) - pzFace = (const char*) M_FONTDATA->m_faceName ; - -/* 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); - - int nHeight; - - 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); + 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( "unknown font style" ); + // fall through + + case wxFONTSTYLE_NORMAL: + lf.lfItalic = FALSE; + break; + + case wxFONTSTYLE_ITALIC: + case wxFONTSTYLE_SLANT: + lf.lfItalic = TRUE; + break; } - else +} + +void wxNativeFontInfo::SetWeight(wxFontWeight weight) +{ + switch ( weight ) { - nHeight = M_FONTDATA->m_pointSize*GetDeviceCaps(dc, LOGPIXELSY)/72; - } -*/ - // Have to get screen DC Caps, because a metafile will return 0. - HDC dc2 = ::GetDC(NULL); - int ppInch = ::GetDeviceCaps(dc2, LOGPIXELSY); - ::ReleaseDC(NULL, dc2); - - // 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. - ppInch = 96; - -#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 + default: + wxFAIL_MSG( "unknown font weight" ); + // fall through - bool ff_underline = M_FONTDATA->m_underlined; + case wxFONTWEIGHT_NORMAL: + lf.lfWeight = FW_NORMAL; + break; - M_FONTDATA->m_hFont = (WXHFONT) CreateFont(nHeight, 0, 0, 0,ff_weight,ff_italic,(BYTE)ff_underline, - 0, ANSI_CHARSET, OUT_DEFAULT_PRECIS, CLIP_DEFAULT_PRECIS, - PROOF_QUALITY, DEFAULT_PITCH | ff_family, pzFace); -#ifdef WXDEBUG_CREATE - if (m_hFont==NULL) wxError("Cannot create font","Internal Error") ; -#endif - return (M_FONTDATA->m_hFont != (WXHFONT) NULL); - } - return FALSE; + case wxFONTWEIGHT_LIGHT: + lf.lfWeight = FW_LIGHT; + break; + + case wxFONTWEIGHT_BOLD: + lf.lfWeight = FW_BOLD; + break; + } } -bool wxFont::FreeResource(bool force) +void wxNativeFontInfo::SetUnderlined(bool underlined) { - if (M_FONTDATA && M_FONTDATA->m_hFont) - { - ::DeleteObject((HFONT) M_FONTDATA->m_hFont); - M_FONTDATA->m_hFont = 0; - return TRUE; - } - return FALSE; + lf.lfUnderline = underlined; } -WXHANDLE wxFont::GetResourceHandle() +bool wxNativeFontInfo::SetFaceName(const wxString& facename) { - if ( !M_FONTDATA ) - return 0; - else - return (WXHANDLE)M_FONTDATA->m_hFont ; + wxStrlcpy(lf.lfFaceName, facename.c_str(), WXSIZEOF(lf.lfFaceName)); + return true; } -bool wxFont::IsFree() +void wxNativeFontInfo::SetFamily(wxFontFamily family) { - return (M_FONTDATA && (M_FONTDATA->m_hFont == 0)); + BYTE ff_family = FF_DONTCARE; + + switch ( family ) + { + case wxFONTFAMILY_SCRIPT: + ff_family = FF_SCRIPT; + break; + + case wxFONTFAMILY_DECORATIVE: + ff_family = FF_DECORATIVE; + break; + + case wxFONTFAMILY_ROMAN: + ff_family = FF_ROMAN; + break; + + case wxFONTFAMILY_TELETYPE: + case wxFONTFAMILY_MODERN: + ff_family = FF_MODERN; + break; + + case wxFONTFAMILY_SWISS: + case wxFONTFAMILY_DEFAULT: + ff_family = FF_SWISS; + break; + + case wxFONTFAMILY_UNKNOWN: + wxFAIL_MSG( "invalid font family" ); + return; + } + + wxCHECK_RET( ff_family != FF_DONTCARE, "unknown wxFontFamily" ); + + lf.lfPitchAndFamily = (BYTE)(DEFAULT_PITCH) | ff_family; + + // reset the facename so that CreateFontIndirect() will automatically choose a + // face name based only on the font family. + lf.lfFaceName[0] = '\0'; } -void wxFont::Unshare() +void wxNativeFontInfo::SetEncoding(wxFontEncoding encoding) { - // Don't change shared data - if (!m_refData) + wxNativeEncodingInfo info; + if ( !wxGetNativeFontEncoding(encoding, &info) ) { - m_refData = new wxFontRefData(); - } - else +#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; + } + } + + lf.lfCharSet = (BYTE)info.charset; +} + +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; +} + +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; +} + +// ---------------------------------------------------------------------------- +// wxFont +// ---------------------------------------------------------------------------- + +wxFont::wxFont(const wxString& fontdesc) +{ + wxNativeFontInfo info; + if ( info.FromString(fontdesc) ) + (void)Create(info); +} + +bool wxFont::Create(const wxNativeFontInfo& info, WXHFONT hFont) +{ + UnRef(); + + m_refData = new wxFontRefData(info, hFont); + + return RealizeResource(); +} + +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 ) { - wxFontRefData* ref = new wxFontRefData(*(wxFontRefData*)m_refData); - UnRef(); - m_refData = ref; - } + pointSize = wxNORMAL_FONT->GetPointSize(); + } + + m_refData = new wxFontRefData(pointSize, pixelSize, sizeUsingPixels, + family, style, weight, + underlined, faceName, encoding); + + return RealizeResource(); } -void wxFont::SetPointSize(int pointSize) +wxFont::~wxFont() { - Unshare(); +} - M_FONTDATA->m_pointSize = pointSize; +// ---------------------------------------------------------------------------- +// real implementation +// ---------------------------------------------------------------------------- - RealizeResource(); +wxGDIRefData *wxFont::CreateGDIRefData() const +{ + return new wxFontRefData(); } -void wxFont::SetFamily(int family) +wxGDIRefData *wxFont::CloneGDIRefData(const wxGDIRefData *data) const { - Unshare(); + return new wxFontRefData(*static_cast(data)); +} + +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 false; - M_FONTDATA->m_family = family; + M_FONTDATA->Free(); - RealizeResource(); + return true; } -void wxFont::SetStyle(int style) +WXHANDLE wxFont::GetResourceHandle() const { - Unshare(); + return (WXHANDLE)GetHFONT(); +} - M_FONTDATA->m_style = style; +WXHFONT wxFont::GetHFONT() const +{ + // NOTE: wxFontRefData::GetHFONT() will automatically call + // wxFontRefData::Alloc() if necessary + return M_FONTDATA ? M_FONTDATA->GetHFONT() : 0; +} - RealizeResource(); +bool wxFont::IsFree() const +{ + return M_FONTDATA && !M_FONTDATA->HasHFONT(); } -void wxFont::SetWeight(int weight) +// ---------------------------------------------------------------------------- +// change font attribute: we recreate font when doing it +// ---------------------------------------------------------------------------- + +void wxFont::SetPointSize(int pointSize) { - Unshare(); + AllocExclusive(); - M_FONTDATA->m_weight = weight; + M_FONTDATA->Free(); + M_FONTDATA->SetPointSize(pointSize); +} - RealizeResource(); +void wxFont::SetPixelSize(const wxSize& pixelSize) +{ + AllocExclusive(); + + M_FONTDATA->SetPixelSize(pixelSize); } -void wxFont::SetFaceName(const wxString& faceName) +void wxFont::SetFamily(wxFontFamily family) { - Unshare(); + AllocExclusive(); + + M_FONTDATA->SetFamily(family); +} - M_FONTDATA->m_faceName = faceName; +void wxFont::SetStyle(wxFontStyle style) +{ + AllocExclusive(); - RealizeResource(); + M_FONTDATA->SetStyle(style); +} + +void wxFont::SetWeight(wxFontWeight weight) +{ + AllocExclusive(); + + M_FONTDATA->SetWeight(weight); +} + +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(); - - M_FONTDATA->m_underlined = underlined; - - RealizeResource(); -} - -wxString wxFont::GetFamilyString(void) const -{ - wxString fam(""); - switch (GetFamily()) - { - case wxDECORATIVE: - fam = "wxDECORATIVE"; - break; - case wxROMAN: - fam = "wxROMAN"; - break; - case wxSCRIPT: - fam = "wxSCRIPT"; - break; - case wxSWISS: - fam = "wxSWISS"; - break; - case wxMODERN: - fam = "wxMODERN"; - break; - case wxTELETYPE: - fam = "wxTELETYPE"; - break; - default: - fam = "wxDEFAULT"; - break; - } - return fam; -} - -wxString wxFont::GetFaceName(void) const -{ - wxString str(""); - if (M_FONTDATA) - str = M_FONTDATA->m_faceName ; - return str; -} - -wxString wxFont::GetStyleString(void) const -{ - wxString styl(""); - switch (GetStyle()) - { - case wxITALIC: - styl = "wxITALIC"; - break; - case wxSLANT: - styl = "wxSLANT"; - break; - default: - styl = "wxNORMAL"; - break; - } - return styl; -} - -wxString wxFont::GetWeightString(void) const -{ - wxString w(""); - switch (GetWeight()) - { - case wxBOLD: - w = "wxBOLD"; - break; - case wxLIGHT: - w = "wxLIGHT"; - break; - default: - w = "wxNORMAL"; - break; - } - return w; + AllocExclusive(); + + M_FONTDATA->SetUnderlined(underlined); +} + +void wxFont::SetEncoding(wxFontEncoding encoding) +{ + AllocExclusive(); + + M_FONTDATA->SetEncoding(encoding); +} + +void wxFont::DoSetNativeFontInfo(const wxNativeFontInfo& info) +{ + AllocExclusive(); + + M_FONTDATA->SetNativeFontInfo(info); +} + +// ---------------------------------------------------------------------------- +// accessors +// ---------------------------------------------------------------------------- + +int wxFont::GetPointSize() const +{ + 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(); +} + +bool wxFont::IsUsingSizeInPixels() const +{ + wxCHECK_MSG( IsOk(), 0, wxT("invalid font") ); + + return M_FONTDATA->IsUsingSizeInPixels(); +} + +wxFontFamily wxFont::DoGetFamily() const +{ + return M_FONTDATA->GetFamily(); } +wxFontStyle wxFont::GetStyle() const +{ + wxCHECK_MSG( IsOk(), wxFONTSTYLE_MAX, wxT("invalid font") ); + + return M_FONTDATA->GetStyle(); +} + +wxFontWeight wxFont::GetWeight() const +{ + wxCHECK_MSG( IsOk(), wxFONTWEIGHT_MAX, wxT("invalid font") ); + + return M_FONTDATA->GetWeight(); +} + +bool wxFont::GetUnderlined() const +{ + wxCHECK_MSG( IsOk(), false, wxT("invalid font") ); + + return M_FONTDATA->GetUnderlined(); +} + +wxString wxFont::GetFaceName() const +{ + wxCHECK_MSG( IsOk(), wxEmptyString, wxT("invalid font") ); + + return M_FONTDATA->GetFaceName(); +} + +wxFontEncoding wxFont::GetEncoding() const +{ + 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); +}