/////////////////////////////////////////////////////////////////////////////
-// Name: font.cpp
+// Name: gtk/font.cpp
// Purpose:
// Author: Robert Roebling
// Id: $Id$
// Copyright: (c) 1998 Robert Roebling, Julian Smart and Markus Holzem
-// Licence: wxWindows licence
+// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
+// ============================================================================
+// declarations
+// ============================================================================
+
+// ----------------------------------------------------------------------------
+// headers
+// ----------------------------------------------------------------------------
+
#ifdef __GNUG__
-#pragma implementation "font.h"
+ #pragma implementation "font.h"
#endif
#include "wx/font.h"
+#include "wx/fontutil.h"
+#include "wx/cmndata.h"
#include "wx/utils.h"
#include "wx/log.h"
#include "wx/gdicmn.h"
+#include "wx/tokenzr.h"
+#include "wx/settings.h"
+
#include <strings.h>
-#include "gdk/gdk.h"
+#include "wx/gtk/private.h"
+#include <gdk/gdkprivate.h>
-//-----------------------------------------------------------------------------
-// local data
-//-----------------------------------------------------------------------------
+// ----------------------------------------------------------------------------
+// constants
+// ----------------------------------------------------------------------------
-/*
-extern wxFontNameDirectory *wxTheFontNameDirectory;
-*/
+// the default size (in points) for the fonts
+static const int wxDEFAULT_FONT_SIZE = 12;
-//-----------------------------------------------------------------------------
-// wxFont
-//-----------------------------------------------------------------------------
+// ----------------------------------------------------------------------------
+// wxScaledFontList
+// ----------------------------------------------------------------------------
-class wxFontRefData: public wxObjectRefData
+// TODO: replace this with a type safe list or hash!!
+class wxScaledFontList : public wxList
{
public:
+ wxScaledFontList() : wxList(wxKEY_INTEGER) { }
+};
+
+// ----------------------------------------------------------------------------
+// wxFontRefData
+// ----------------------------------------------------------------------------
- wxFontRefData();
+class wxFontRefData : public wxObjectRefData
+{
+public:
+ // from broken down font parameters, also default ctor
+ wxFontRefData(int size = -1,
+ int family = wxFONTFAMILY_DEFAULT,
+ int style = wxFONTSTYLE_NORMAL,
+ int weight = wxFONTWEIGHT_NORMAL,
+ bool underlined = FALSE,
+ const wxString& faceName = wxEmptyString,
+ wxFontEncoding encoding = wxFONTENCODING_DEFAULT);
+
+ // from XFLD
+ wxFontRefData(const wxString& fontname);
+
+ // copy ctor
wxFontRefData( const wxFontRefData& data );
- ~wxFontRefData();
- wxList m_scaled_xfonts;
- int m_pointSize;
- int m_family, m_style, m_weight;
- bool m_underlined;
- wxString m_faceName;
+ virtual ~wxFontRefData();
- bool m_byXFontName;
- GdkFont *m_font;
+ // do we have the native font info?
+ bool HasNativeFont() const
+ {
+ return !m_nativeFontInfo.IsDefault();
+ }
- friend wxFont;
+ // setters: all of them also take care to modify m_nativeFontInfo if we
+ // have it so as to not lose the information not carried by our fields
+ void SetPointSize(int pointSize);
+ void SetFamily(int family);
+ void SetStyle(int style);
+ void SetWeight(int weight);
+ void SetUnderlined(bool underlined);
+ void SetFaceName(const wxString& facename);
+ void SetEncoding(wxFontEncoding encoding);
+
+ // debugger helper: shows what the font really is
+ //
+ // VZ: I need this as my gdb either shows wildly wrong values or crashes
+ // when I ask it to "p fontRefData" :-(
+#ifdef __WXDEBUG__
+ void Dump() const
+ {
+ wxPrintf(_T("%s-%s-%s-%d-%d\n"),
+ m_faceName.c_str(),
+ m_weight == wxFONTWEIGHT_NORMAL
+ ? _T("normal")
+ : m_weight == wxFONTWEIGHT_BOLD
+ ? _T("bold")
+ : _T("light"),
+ m_style == wxFONTSTYLE_NORMAL ? _T("regular") : _T("italic"),
+ m_pointSize,
+ m_encoding);
+ }
+#endif // Debug
+
+protected:
+ // common part of all ctors
+ void Init(int pointSize,
+ int family,
+ int style,
+ int weight,
+ bool underlined,
+ const wxString& faceName,
+ wxFontEncoding encoding);
+
+private:
+ // the map of font sizes to "GdkFont *"
+ wxScaledFontList m_scaled_xfonts;
+
+ // the broken down font parameters
+ int m_pointSize;
+ int m_family,
+ m_style,
+ m_weight;
+ bool m_underlined;
+ wxString m_faceName;
+ wxFontEncoding m_encoding;
+
+ // the native font info, basicly an XFLD
+ wxNativeFontInfo m_nativeFontInfo;
+
+ friend class wxFont;
};
-wxFontRefData::wxFontRefData() : m_scaled_xfonts(wxKEY_INTEGER)
+// ============================================================================
+// wxFontRefData implementation
+// ============================================================================
+
+// ----------------------------------------------------------------------------
+// wxFontRefData creation
+// ----------------------------------------------------------------------------
+
+void wxFontRefData::Init(int pointSize,
+ int family,
+ int style,
+ int weight,
+ bool underlined,
+ const wxString& faceName,
+ wxFontEncoding encoding)
{
- m_byXFontName = FALSE;
- m_pointSize = 12;
- m_family = wxSWISS;
- m_style = wxNORMAL;
- m_weight = wxNORMAL;
- m_underlined = FALSE;
- m_font = (GdkFont *) NULL;
+ m_family = family == wxFONTFAMILY_DEFAULT ? wxFONTFAMILY_SWISS : family;
+
+ m_faceName = faceName;
+
+ // we accept both wxDEFAULT and wxNORMAL here - should we?
+ m_style = style == wxDEFAULT ? wxFONTSTYLE_NORMAL : style;
+ m_weight = weight == wxDEFAULT ? wxFONTWEIGHT_NORMAL : weight;
+
+ // and here, do we really want to forbid creation of the font of the size
+ // 90 (the value of wxDEFAULT)??
+ m_pointSize = pointSize == wxDEFAULT ||
+ pointSize == -1 ? wxDEFAULT_FONT_SIZE : pointSize;
+
+ m_underlined = underlined;
+ m_encoding = encoding;
}
-wxFontRefData::wxFontRefData( const wxFontRefData& data ) : m_scaled_xfonts(wxKEY_INTEGER)
+wxFontRefData::wxFontRefData( const wxFontRefData& data )
{
- m_byXFontName = FALSE;
m_pointSize = data.m_pointSize;
m_family = data.m_family;
m_style = data.m_style;
m_weight = data.m_weight;
+
m_underlined = data.m_underlined;
+
m_faceName = data.m_faceName;
- m_font = (GdkFont *) NULL;
- if (data.m_font) m_font = gdk_font_ref( data.m_font );
+ m_encoding = data.m_encoding;
+
+ m_nativeFontInfo = data.m_nativeFontInfo;
+}
+
+wxFontRefData::wxFontRefData(int size, int family, int style,
+ int weight, bool underlined,
+ const wxString& faceName,
+ wxFontEncoding encoding)
+{
+ Init(size, family, style, weight, underlined, faceName, encoding);
+}
+
+wxFontRefData::wxFontRefData(const wxString& fontname)
+{
+ // remember the X font name
+ m_nativeFontInfo.SetXFontName(fontname);
+
+ // get the font parameters from the XLFD
+ // -------------------------------------
+
+ m_faceName = m_nativeFontInfo.GetXFontComponent(wxXLFD_FAMILY);
+
+ m_weight = wxFONTWEIGHT_NORMAL;
+
+ wxString w = m_nativeFontInfo.GetXFontComponent(wxXLFD_WEIGHT).Upper();
+ if ( !w.empty() && w != _T('*') )
+ {
+ // the test below catches all of BOLD, EXTRABOLD, DEMIBOLD, ULTRABOLD
+ // and BLACK
+ if ( ((w[0u] == _T('B') && (!strcmp(w.c_str() + 1, _T("OLD")) ||
+ !strcmp(w.c_str() + 1, _T("LACK"))))) ||
+ strstr(w.c_str() + 1, _T("BOLD")) )
+ {
+ m_weight = wxFONTWEIGHT_BOLD;
+ }
+ else if ( w == _T("LIGHT") || w == _T("THIN") )
+ {
+ m_weight = wxFONTWEIGHT_LIGHT;
+ }
+ }
+
+ switch ( wxToupper(*m_nativeFontInfo.
+ GetXFontComponent(wxXLFD_SLANT).c_str()) )
+ {
+ case _T('I'): // italique
+ m_style = wxFONTSTYLE_ITALIC;
+ break;
+
+ case _T('O'): // oblique
+ m_style = wxFONTSTYLE_SLANT;
+ break;
+
+ default:
+ m_style = wxFONTSTYLE_NORMAL;
+ }
+
+ long ptSize;
+ if ( m_nativeFontInfo.GetXFontComponent(wxXLFD_POINTSIZE).ToLong(&ptSize) )
+ {
+ // size in XLFD is in 10 point units
+ m_pointSize = (int)(ptSize / 10);
+ }
+ else
+ {
+ m_pointSize = wxDEFAULT_FONT_SIZE;
+ }
+
+ // examine the spacing: if the font is monospaced, assume wxTELETYPE
+ // family for compatibility with the old code which used it instead of
+ // IsFixedWidth()
+ if ( m_nativeFontInfo.GetXFontComponent(wxXLFD_SPACING).Upper() == _T('M') )
+ {
+ m_family = wxFONTFAMILY_TELETYPE;
+ }
+ else // not monospaceed
+ {
+ // don't even try guessing it, it doesn't work for too many fonts
+ // anyhow
+ m_family = wxFONTFAMILY_UNKNOWN;
+ }
+
+ // X fonts are never underlined...
+ m_underlined = FALSE;
+
+ // deal with font encoding
+ wxString
+ registry = m_nativeFontInfo.GetXFontComponent(wxXLFD_REGISTRY).Upper(),
+ encoding = m_nativeFontInfo.GetXFontComponent(wxXLFD_ENCODING).Upper();
+
+ if ( registry == _T("ISO8859") )
+ {
+ int cp;
+ if ( wxSscanf(encoding, wxT("%d"), &cp) == 1 )
+ {
+ m_encoding = (wxFontEncoding)(wxFONTENCODING_ISO8859_1 + cp - 1);
+ }
+ }
+ else if ( registry == _T("MICROSOFT") )
+ {
+ int cp;
+ if ( wxSscanf(encoding, wxT("cp125%d"), &cp) == 1 )
+ {
+ m_encoding = (wxFontEncoding)(wxFONTENCODING_CP1250 + cp);
+ }
+ }
+ else if ( registry == _T("KOI8") )
+ {
+ m_encoding = wxFONTENCODING_KOI8;
+ }
+ else // unknown encoding
+ {
+ // may be give a warning here?
+ m_encoding = wxFONTENCODING_SYSTEM;
+ }
}
wxFontRefData::~wxFontRefData()
gdk_font_unref( font );
node = next;
}
- if (m_font) gdk_font_unref( m_font );
}
-//-----------------------------------------------------------------------------
+// ----------------------------------------------------------------------------
+// wxFontRefData SetXXX()
+// ----------------------------------------------------------------------------
-#define M_FONTDATA ((wxFontRefData *)m_refData)
+void wxFontRefData::SetPointSize(int pointSize)
+{
+ m_pointSize = pointSize;
-IMPLEMENT_DYNAMIC_CLASS(wxFont, wxGDIObject)
+ if ( HasNativeFont() )
+ {
+ wxString size;
+ if ( pointSize == -1 )
+ size = _T('*');
+ else
+ size.Printf(_T("%d"), 10*pointSize);
-wxFont::wxFont()
-{
- if (wxTheFontList) wxTheFontList->Append( this );
+ m_nativeFontInfo.SetXFontComponent(wxXLFD_POINTSIZE, size);
+ }
}
-wxFont::wxFont( char *xFontName )
+void wxFontRefData::SetFamily(int family)
{
- if (!xFontName) return;
-
- m_refData = new wxFontRefData();
+ m_family = family;
- M_FONTDATA->m_byXFontName = TRUE;
- M_FONTDATA->m_font = gdk_font_load( xFontName );
+ // TODO: what are we supposed to do with m_nativeFontInfo here?
}
-wxFont::wxFont( int pointSize, int family, int style, int weight, bool underlined, const wxString& face )
+void wxFontRefData::SetStyle(int style)
{
- m_refData = new wxFontRefData();
+ m_style = style;
- if (family == wxDEFAULT)
- M_FONTDATA->m_family = wxSWISS;
- else
- M_FONTDATA->m_family = family;
-
- if (!face.IsEmpty()) M_FONTDATA->m_faceName = face;
-
- if (style == wxDEFAULT)
- M_FONTDATA->m_style = wxNORMAL;
- else
- M_FONTDATA->m_style = style;
-
- if (weight == wxDEFAULT)
- M_FONTDATA->m_weight = wxNORMAL;
- else
- M_FONTDATA->m_weight = weight;
-
- if (pointSize == wxDEFAULT)
- M_FONTDATA->m_pointSize = 12;
- else
- M_FONTDATA->m_pointSize = pointSize;
-
- M_FONTDATA->m_underlined = underlined;
+ if ( HasNativeFont() )
+ {
+ wxString slant;
+ switch ( style )
+ {
+ case wxFONTSTYLE_ITALIC:
+ slant = _T('i');
+ break;
- if (wxTheFontList) wxTheFontList->Append( this );
-
-}
+ case wxFONTSTYLE_SLANT:
+ slant = _T('o');
+ break;
-wxFont::wxFont( const wxFont& font )
-{
- Ref( font );
+ default:
+ wxFAIL_MSG( _T("unknown font style") );
+ // fall through
- if (wxTheFontList) wxTheFontList->Append( this );
-}
+ case wxFONTSTYLE_NORMAL:
+ slant = _T('r');
+ }
-wxFont::~wxFont()
-{
- if (wxTheFontList) wxTheFontList->DeleteObject( this );
+ m_nativeFontInfo.SetXFontComponent(wxXLFD_SLANT, slant);
+ }
}
-wxFont& wxFont::operator = ( const wxFont& font )
+void wxFontRefData::SetWeight(int weight)
{
- if (*this == font) return (*this);
- Ref( font );
- return *this;
-}
+ m_weight = weight;
-bool wxFont::operator == ( const wxFont& font ) const
-{
- return m_refData == font.m_refData;
-}
+ if ( HasNativeFont() )
+ {
+ wxString boldness;
+ switch ( weight )
+ {
+ case wxFONTWEIGHT_BOLD:
+ boldness = _T("bold");
+ break;
-bool wxFont::operator != ( const wxFont& font ) const
-{
- return m_refData != font.m_refData;
-}
+ case wxFONTWEIGHT_LIGHT:
+ boldness = _T("light");
+ break;
-bool wxFont::Ok() const
-{
- return (m_refData != NULL);
-}
+ default:
+ wxFAIL_MSG( _T("unknown font weight") );
+ // fall through
-int wxFont::GetPointSize() const
-{
- wxCHECK_MSG( Ok(), 0, _T("invalid font") );
+ case wxFONTWEIGHT_NORMAL:
+ // unspecified
+ boldness = _T("medium");
+ }
- return M_FONTDATA->m_pointSize;
+ m_nativeFontInfo.SetXFontComponent(wxXLFD_WEIGHT, boldness);
+ }
}
-wxString wxFont::GetFaceName() const
+void wxFontRefData::SetUnderlined(bool underlined)
{
- wxCHECK_MSG( Ok(), _T(""), _T("invalid font") );
+ m_underlined = underlined;
- return M_FONTDATA->m_faceName;
+ // the XLFD doesn't have "underlined" field anyhow
}
-int wxFont::GetFamily() const
+void wxFontRefData::SetFaceName(const wxString& facename)
{
- wxCHECK_MSG( Ok(), 0, _T("invalid font") );
+ m_faceName = facename;
- return M_FONTDATA->m_family;
+ if ( HasNativeFont() )
+ {
+ m_nativeFontInfo.SetXFontComponent(wxXLFD_FAMILY, facename);
+ }
}
-wxString wxFont::GetFamilyString() const
+void wxFontRefData::SetEncoding(wxFontEncoding encoding)
{
- wxCHECK_MSG( Ok(), _T("wxDEFAULT"), _T("invalid font") );
+ m_encoding = encoding;
- switch (M_FONTDATA->m_family)
+ if ( HasNativeFont() )
{
- case wxDECORATIVE: return wxString(_T("wxDECORATIVE"));
- case wxROMAN: return wxString(_T("wxROMAN"));
- case wxSCRIPT: return wxString(_T("wxSCRIPT"));
- case wxSWISS: return wxString(_T("wxSWISS"));
- case wxMODERN: return wxString(_T("wxMODERN"));
- case wxTELETYPE: return wxString(_T("wxTELETYPE"));
- default: return _T("wxDEFAULT");
+ wxNativeEncodingInfo info;
+ if ( wxGetNativeFontEncoding(encoding, &info) )
+ {
+ m_nativeFontInfo.SetXFontComponent(wxXLFD_REGISTRY, info.xregistry);
+ m_nativeFontInfo.SetXFontComponent(wxXLFD_ENCODING, info.xencoding);
+ }
}
-
- return "wxDEFAULT";
}
-int wxFont::GetStyle() const
-{
- wxCHECK_MSG( Ok(), 0, _T("invalid font") );
+// ============================================================================
+// wxFont implementation
+// ============================================================================
- return M_FONTDATA->m_style;
-}
+// ----------------------------------------------------------------------------
+// wxFont creation
+// ----------------------------------------------------------------------------
+
+IMPLEMENT_DYNAMIC_CLASS(wxFont, wxGDIObject)
-wxString wxFont::GetStyleString() const
+void wxFont::Init()
{
- wxCHECK_MSG( Ok(), _T("wxDEFAULT"), _T("invalid font") );
+}
- switch (M_FONTDATA->m_style)
- {
- case wxNORMAL: return wxString(_T("wxNORMAL"));
- case wxSLANT: return wxString(_T("wxSLANT"));
- case wxITALIC: return wxString(_T("wxITALIC"));
- default: return wxString(_T("wxDEFAULT"));
- }
+wxFont::wxFont(const wxNativeFontInfo& info)
+{
+ Init();
- return wxString(_T("wxDEFAULT"));
+ Create(info.GetXFontName());
}
-int wxFont::GetWeight() const
+bool wxFont::Create( int pointSize,
+ int family,
+ int style,
+ int weight,
+ bool underlined,
+ const wxString& face,
+ wxFontEncoding encoding)
{
- wxCHECK_MSG( Ok(), 0, _T("invalid font") );
+ m_refData = new wxFontRefData(pointSize, family, style, weight,
+ underlined, face, encoding);
- return M_FONTDATA->m_weight;
+ return TRUE;
}
-wxString wxFont::GetWeightString() const
+bool wxFont::Create(const wxString& fontname)
{
- wxCHECK_MSG( Ok(), _T("wxDEFAULT"), _T("invalid font") );
-
- switch (M_FONTDATA->m_weight)
+ // VZ: does this really happen?
+ if ( fontname.empty() )
{
- case wxNORMAL: return wxString(_T("wxNORMAL"));
- case wxBOLD: return wxString(_T("wxBOLD"));
- case wxLIGHT: return wxString(_T("wxLIGHT"));
- default: return wxString(_T("wxDEFAULT"));
- }
+ *this = wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT);
- return wxString(_T("wxDEFAULT"));
-}
+ return TRUE;
+ }
-bool wxFont::GetUnderlined() const
-{
- wxCHECK_MSG( Ok(), FALSE, _T("invalid font") );
+ m_refData = new wxFontRefData(fontname);
- return M_FONTDATA->m_underlined;
+ return TRUE;
}
void wxFont::Unshare()
{
if (!m_refData)
{
- m_refData = new wxFontRefData();
+ m_refData = new wxFontRefData();
}
else
{
- wxFontRefData* ref = new wxFontRefData(*(wxFontRefData*)m_refData);
- UnRef();
- m_refData = ref;
+ wxFontRefData* ref = new wxFontRefData(*(wxFontRefData*)m_refData);
+ UnRef();
+ m_refData = ref;
}
}
-void wxFont::SetPointSize(int pointSize)
+wxFont::~wxFont()
{
- Unshare();
-
- M_FONTDATA->m_pointSize = pointSize;
}
-void wxFont::SetFamily(int family)
-{
- Unshare();
+// ----------------------------------------------------------------------------
+// accessors
+// ----------------------------------------------------------------------------
- M_FONTDATA->m_family = family;
-}
+// all accessors are just forwarded to wxFontRefData which has everything we
+// need
-void wxFont::SetStyle(int style)
+int wxFont::GetPointSize() const
{
- Unshare();
+ wxCHECK_MSG( Ok(), 0, wxT("invalid font") );
- M_FONTDATA->m_style = style;
+ return M_FONTDATA->m_pointSize;
}
-void wxFont::SetWeight(int weight)
+wxString wxFont::GetFaceName() const
{
- Unshare();
+ wxCHECK_MSG( Ok(), wxT(""), wxT("invalid font") );
- M_FONTDATA->m_weight = weight;
+ return M_FONTDATA->m_faceName;
}
-void wxFont::SetFaceName(const wxString& faceName)
+int wxFont::GetFamily() const
{
- Unshare();
+ wxCHECK_MSG( Ok(), 0, wxT("invalid font") );
- M_FONTDATA->m_faceName = faceName;
+ return M_FONTDATA->m_family;
}
-void wxFont::SetUnderlined(bool underlined)
+int wxFont::GetStyle() const
{
- Unshare();
+ wxCHECK_MSG( Ok(), 0, wxT("invalid font") );
- M_FONTDATA->m_underlined = underlined;
+ return M_FONTDATA->m_style;
}
-//-----------------------------------------------------------------------------
-// get internal representation of font
-//-----------------------------------------------------------------------------
-
-static GdkFont *wxLoadQueryNearestFont( int point_size, int family, int style, int weight,
- bool underlined, const wxString &facename );
-
-GdkFont *wxFont::GetInternalFont( float scale ) const
+int wxFont::GetWeight() const
{
- if (!Ok())
- {
- wxFAIL_MSG( _T("invalid font") );
- return (GdkFont*) NULL;
- }
-
- /* short cut if the special X font constructor has been used */
- if (M_FONTDATA->m_byXFontName) return M_FONTDATA->m_font;
-
- long int_scale = long(scale * 100.0 + 0.5); /* key for fontlist */
- int point_scale = (M_FONTDATA->m_pointSize * 10 * int_scale) / 100;
- GdkFont *font = (GdkFont *) NULL;
+ wxCHECK_MSG( Ok(), 0, wxT("invalid font") );
- wxNode *node = M_FONTDATA->m_scaled_xfonts.Find(int_scale);
- if (node)
- {
- font = (GdkFont*)node->Data();
- }
- else
- {
-/*
- if ((int_scale == 100) &&
- (M_FONTDATA->m_family == wxSWISS) &&
- (M_FONTDATA->m_style == wxNORMAL) &&
- (M_FONTDATA->m_pointSize == 12) &&
- (M_FONTDATA->m_weight == wxNORMAL) &&
- (M_FONTDATA->m_underlined == FALSE))
- {
- font = gdk_font_load( "-adobe-helvetica-medium-r-normal--*-120-*-*-*-*-*-*" );
- }
- else
-*/
- {
- font = wxLoadQueryNearestFont( point_scale, M_FONTDATA->m_family, M_FONTDATA->m_style,
- M_FONTDATA->m_weight, M_FONTDATA->m_underlined, M_FONTDATA->m_faceName );
- }
- M_FONTDATA->m_scaled_xfonts.Append( int_scale, (wxObject*)font );
- }
-
- if (!font)
- {
- wxLogError(_T("could not load any font"));
- }
-
- return font;
+ return M_FONTDATA->m_weight;
}
-//-----------------------------------------------------------------------------
-// local utilities to find a X font
-//-----------------------------------------------------------------------------
-
-static GdkFont*wxLoadQueryFont( int pointSize, int family, int style, int weight,
- bool underlined, const wxString &facename )
+bool wxFont::GetUnderlined() const
{
- wxChar *xfamily = (wxChar*) NULL;
- wxChar *xstyle = (wxChar*) NULL;
- wxChar *xweight = (wxChar*) NULL;
-
- switch (family)
- {
- case wxDECORATIVE: xfamily = _T("lucida"); break;
- case wxROMAN: xfamily = _T("times"); break;
- case wxMODERN: xfamily = _T("courier"); break;
- case wxSWISS: xfamily = _T("helvetica"); break;
- case wxTELETYPE: xfamily = _T("lucidatypewriter"); break;
- case wxSCRIPT: xfamily = _T("utopia"); break;
- default: xfamily = _T("*");
- }
-
- if (!facename.IsEmpty())
- {
- wxSprintf( wxBuffer, _T("-*-%s-*-*-normal-*-*-*-*-*-*-*-*-*"), facename.c_str() );
- GdkFont *test = gdk_font_load( wxConvCurrent->cWX2MB(wxBuffer) );
- if (test)
- {
- gdk_font_unref( test );
- xfamily = WXSTRINGCAST facename;
- }
- }
-
- switch (style)
- {
- case wxITALIC: xstyle = _T("i"); break;
- case wxSLANT: xstyle = _T("o"); break;
- case wxNORMAL: xstyle = _T("r"); break;
- default: xstyle = _T("*"); break;
- }
- switch (weight)
- {
- case wxBOLD: xweight = _T("bold"); break;
- case wxLIGHT:
- case wxNORMAL: xweight = _T("medium"); break;
- default: xweight = _T("*"); break;
- }
-
- wxSprintf( wxBuffer, _T("-*-%s-%s-%s-normal-*-*-%d-*-*-*-*-*-*"),
- xfamily, xweight, xstyle, pointSize);
-
- return gdk_font_load( wxConvCurrent->cWX2MB(wxBuffer) );
+ wxCHECK_MSG( Ok(), FALSE, wxT("invalid font") );
+
+ return M_FONTDATA->m_underlined;
}
-static GdkFont *wxLoadQueryNearestFont( int point_size, int family, int style, int weight,
- bool underlined, const wxString &facename )
+wxFontEncoding wxFont::GetEncoding() const
{
- GdkFont *font = wxLoadQueryFont( point_size, family, style, weight, underlined, facename );
-
- if (!font)
- {
- /* search up and down by stepsize 10 */
- int max_size = point_size + 20 * (1 + (point_size/180));
- int min_size = point_size - 20 * (1 + (point_size/180));
-
- int i;
-
- /* Search for smaller size (approx.) */
- for (i=point_size-10; !font && i >= 10 && i >= min_size; i -= 10)
- font = wxLoadQueryFont(i, family, style, weight, underlined, facename );
-
- /* Search for larger size (approx.) */
- for (i=point_size+10; !font && i <= max_size; i += 10)
- font = wxLoadQueryFont( i, family, style, weight, underlined, facename );
+ wxCHECK_MSG( Ok(), wxFONTENCODING_DEFAULT, wxT("invalid font") );
- /* Try default family */
- if (!font && family != wxDEFAULT)
- font = wxLoadQueryFont( point_size, wxDEFAULT, style, weight, underlined, facename );
-
- /* Bogus font */
- if (!font)
- font = wxLoadQueryFont(120, wxDEFAULT, wxNORMAL, wxNORMAL, underlined, facename );
- }
-
- return font;
+ return M_FONTDATA->m_encoding;
}
-/*
-
-//-----------------------------------------------------------------------------
-// face names and index functions
-//-----------------------------------------------------------------------------
-
-static char *font_defaults[] = {
- "FamilyDefault", "Default",
- "FamilyRoman", "Roman",
- "FamilyDecorative", "Decorative",
- "FamilyModern", "Modern",
- "FamilyTeletype", "Teletype",
- "FamilySwiss", "Swiss",
- "FamilyScript", "Script",
-
- "AfmMedium", "",
- "AfmBold", "Bo",
- "AfmLight", "",
- "AfmStraight", "",
- "AfmItalic", "${AfmSlant}",
- "AfmSlant", "O",
- "AfmRoman", "Ro",
- "AfmTimes", "Times",
- "AfmHelvetica", "Helv",
- "AfmCourier", "Cour",
-
- "Afm___", "${AfmTimes,$[weight],$[style]}",
-
- "AfmTimes__", "${AfmTimes}${Afm$[weight]}${Afm$[style]}",
- "AfmTimesMediumStraight", "${AfmTimes}${AfmRoman}",
- "AfmTimesLightStraight", "${AfmTimes}${AfmRoman}",
- "AfmTimes_Italic", "${AfmTimes}$[weight]${AfmItalic}",
- "AfmTimes_Slant", "${AfmTimes}$[weight]${AfmItalic}",
-
- "AfmSwiss__", "${AfmHelvetica}${Afm$[weight]}${Afm$[style]}",
- "AfmModern__", "${AfmCourier}${Afm$[weight]}${Afm$[style]}",
-
- "AfmTeletype__", "${AfmModern,$[weight],$[style]}",
-
- "PostScriptMediumStraight", "",
- "PostScriptMediumItalic", "-Oblique",
- "PostScriptMediumSlant", "-Oblique",
- "PostScriptLightStraight", "",
- "PostScriptLightItalic", "-Oblique",
- "PostScriptLightSlant", "-Oblique",
- "PostScriptBoldStraight", "-Bold",
- "PostScriptBoldItalic", "-BoldOblique",
- "PostScriptBoldSlant", "-BoldOblique",
-
-#if WX_NORMALIZED_PS_FONTS
- "PostScript___", "${PostScriptTimes,$[weight],$[style]}",
-#else
- "PostScriptRoman__", "${PostScriptTimes,$[weight],$[style]}",
- "PostScript___", "LucidaSans${PostScript$[weight]$[style]}",
-#endif
-
- "PostScriptTimesMedium", "",
- "PostScriptTimesLight", "",
- "PostScriptTimesBold", "Bold",
-
- "PostScriptTimes__", "Times${PostScript$[weight]$[style]}",
- "PostScriptTimesMediumStraight", "Times-Roman",
- "PostScriptTimesLightStraight", "Times-Roman",
- "PostScriptTimes_Slant", "Times-${PostScriptTimes$[weight]}Italic",
- "PostScriptTimes_Italic", "Times-${PostScriptTimes$[weight]}Italic",
-
- "PostScriptSwiss__", "Helvetica${PostScript$[weight]$[style]}",
- "PostScriptModern__", "Courier${PostScript$[weight]$[style]}",
-
- "PostScriptTeletype__", "${PostScriptModern,$[weight],$[style]}",
-
-#if !WX_NORMALIZED_PS_FONTS
- "PostScriptScript__", "Zapf-Chancery-MediumItalic",
-#endif
-
- "ScreenMedium", "medium",
- "ScreenBold", "bold",
- "ScreenLight", "light",
- "ScreenStraight", "r",
- "ScreenItalic", "i",
- "ScreenSlant", "o",
-
- "ScreenDefaultBase", "*-times",
-
- "ScreenRomanBase", "*-times",
- "ScreenDecorativeBase", "*-helvetica",
- "ScreenModernBase", "*-courier",
- "ScreenTeletypeBase", "*-lucidatypewriter",
- "ScreenSwissBase", "*-lucida",
- "ScreenScriptBase", "*-zapfchancery",
-
- "ScreenStdSuffix", "-${Screen$[weight]}-${Screen$[style]}"
- "-normal-*-*-%d-*-*-*-*-*-*",
-
- "Screen___",
- "-${ScreenDefaultBase}${ScreenStdSuffix}",
- "ScreenRoman__",
- "-${ScreenRomanBase}${ScreenStdSuffix}",
- "ScreenDecorative__",
- "-${ScreenDecorativeBase}${ScreenStdSuffix}",
- "ScreenModern__",
- "-${ScreenModernBase}${ScreenStdSuffix}",
- "ScreenTeletype__",
- "-${ScreenTeletypeBase}${ScreenStdSuffix}",
- "ScreenSwiss__",
- "-${ScreenSwissBase}${ScreenStdSuffix}",
- "ScreenScript__",
- "-${ScreenScriptBase}${ScreenStdSuffix}",
- (char *) NULL
-};
-
-enum {wxWEIGHT_NORMAL, wxWEIGHT_BOLD, wxWEIGHT_LIGHT, wxNUM_WEIGHTS};
-enum {wxSTYLE_NORMAL, wxSTYLE_ITALIC, wxSTYLE_SLANT, wxNUM_STYLES};
-
-static int WCoordinate(int w)
+wxNativeFontInfo *wxFont::GetNativeFontInfo() const
{
- switch (w)
- {
- case wxBOLD: return wxWEIGHT_BOLD;
- case wxLIGHT: return wxWEIGHT_LIGHT;
- case wxNORMAL:
- default: return wxWEIGHT_NORMAL;
- }
-};
+ wxCHECK_MSG( Ok(), (wxNativeFontInfo *)NULL, wxT("invalid font") );
-static int SCoordinate(int s)
-{
- switch (s)
- {
- case wxITALIC: return wxSTYLE_ITALIC;
- case wxSLANT: return wxSTYLE_SLANT;
- case wxNORMAL:
- default: return wxSTYLE_NORMAL;
- }
-};
+ if ( M_FONTDATA->m_nativeFontInfo.GetXFontName().empty() )
+ GetInternalFont();
-//-----------------------------------------------------------------------------
-// wxSuffixMap
-//-----------------------------------------------------------------------------
+ return new wxNativeFontInfo(M_FONTDATA->m_nativeFontInfo);
+}
-class wxSuffixMap
+bool wxFont::IsFixedWidth() const
{
-public:
- ~wxSuffixMap();
+ wxCHECK_MSG( Ok(), FALSE, wxT("invalid font") );
- inline char *GetName(int weight, int style)
+ if ( M_FONTDATA->HasNativeFont() )
{
- return ( map [WCoordinate(weight)] [SCoordinate(style)] );
- }
+ // the monospace fonts are supposed to have "M" in the spacing field
+ wxString spacing = M_FONTDATA->
+ m_nativeFontInfo.GetXFontComponent(wxXLFD_SPACING);
- char *map[wxNUM_WEIGHTS][wxNUM_STYLES];
- void Initialize(const char *, const char *);
-};
+ return spacing.Upper() == _T('M');
+ }
-static void SearchResource(const char *prefix, const char **names, int count, char **v)
-{
- int k, i, j;
- char resource[1024], **defaults, *internal;
+ return wxFontBase::IsFixedWidth();
+}
- k = 1 << count;
+// ----------------------------------------------------------------------------
+// change font attributes
+// ----------------------------------------------------------------------------
- *v = (char *) NULL;
- internal = (char *) NULL;
+void wxFont::SetPointSize(int pointSize)
+{
+ Unshare();
- for (i = 0; i < k; i++)
- {
- strcpy(resource, prefix);
- for (j = 0; j < count; j++)
- {
- // upon failure to find a matching fontname
- // in the default fonts above, we substitute more
- // and more values by _ so that at last ScreenMyFontBoldNormal
- // would turn into Screen___ and this will then get
- // converted to -${ScreenDefaultBase}${ScreenStdSuffix}
-
- if (!(i & (1 << j)))
- strcat(resource, names[j]);
- else
- strcat(resource, "_");
- }
-
- // we previously search the Xt-resources here
-
- if (!internal)
- {
- defaults = font_defaults;
- while (*defaults)
- {
- if (!strcmp(*defaults, resource))
- {
- internal = defaults[1];
- break;
- }
- defaults += 2;
- }
- }
- }
-
- if (internal)
- {
- if ((strcmp(internal,"-${ScreenDefaultBase}${ScreenStdSuffix}") == 0) &&
- (strcmp(names[0], "Default") != 0))
- {
- // we did not find any font name in the standard list.
- // this can (hopefully does) mean that someone supplied
- // the facename in the wxFont constructor so we insert
- // it here
-
- strcpy( resource,"-*-" ); // any producer
- strcat( resource, names[0] ); // facename
- strcat( resource, "${ScreenStdSuffix}" ); // add size params later on
- *v = copystring(resource);
- }
- else
- {
- *v = copystring(internal);
- }
- }
+ M_FONTDATA->SetPointSize(pointSize);
}
-wxSuffixMap::~wxSuffixMap()
+void wxFont::SetFamily(int family)
{
- int k, j;
+ Unshare();
- for (k = 0; k < wxNUM_WEIGHTS; ++k)
- for (j = 0; j < wxNUM_STYLES; ++j)
- if (map[k][j])
- {
- delete[] map[k][j];
- map[k][j] = (char *) NULL;
- }
+ M_FONTDATA->SetFamily(family);
}
-void wxSuffixMap::Initialize(const char *resname, const char *devresname)
+void wxFont::SetStyle(int style)
{
- const char *weight, *style;
- char *v;
- int i, j, k;
- const char *names[3];
+ Unshare();
- for (k = 0; k < wxNUM_WEIGHTS; k++)
- {
- switch (k)
- {
- case wxWEIGHT_NORMAL: weight = "Medium"; break;
- case wxWEIGHT_LIGHT: weight = "Light"; break;
- case wxWEIGHT_BOLD:
- default: weight = "Bold";
- }
- for (j = 0; j < wxNUM_STYLES; j++)
- {
- switch (j)
- {
- case wxSTYLE_NORMAL: style = "Straight"; break;
- case wxSTYLE_ITALIC: style = "Italic"; break;
- case wxSTYLE_SLANT:
- default: style = "Slant";
- }
- names[0] = resname;
- names[1] = weight;
- names[2] = style;
-
- SearchResource(devresname, names, 3, &v);
-
- // Expand macros in the found string:
-found:
- int len, closer = 0, startpos = 0;
-
- len = (v ? strlen(v) : 0);
- for (i = 0; i < len; i++)
- {
- if (v[i] == '$' && ((v[i+1] == '[') || (v[i+1] == '{')))
- {
- startpos = i;
- closer = (v[i+1] == '[') ? ']' : '}';
- ++i;
- }
- else if (v[i] == closer)
- {
- int newstrlen;
- const char *r = (char *) NULL; bool delete_r = FALSE;
- char *name;
-
- name = v + startpos + 2;
- v[i] = 0;
-
- if (closer == '}')
- {
- int i, count, len;
- char **names;
-
- for (i = 0, count = 1; name[i]; i++)
- if (name[i] == ',')
- count++;
-
- len = i;
-
- names = new char*[count];
- names[0] = name;
- for (i = 0, count = 1; i < len; i++)
- if (name[i] == ',')
- {
- names[count++] = name + i + 1;
- name[i] = 0;
- }
-
- SearchResource("", (const char **)names, count, (char **)&r);
- delete_r = (r != 0);
- delete[] names;
-
- if (!r)
- {
- for (i = 0; i < len; i++)
- if (!name[i])
- name[i] = ',';
- r = "";
- wxLogError( "Bad resource name in font lookup." );
- }
- } else if (!strcmp(name, "weight")) {
- r = weight;
- } else if (!strcmp(name, "style")) {
- r = style;
- } else if (!strcmp(name, "family")) {
- r = resname;
- } else {
- r = "";
- wxLogError( "Bad font macro name." );
- }
-
- // add r to v
- newstrlen = strlen(r);
- char *naya = new char[startpos + newstrlen + len - i];
- memcpy(naya, v, startpos);
- memcpy(naya + startpos, r, newstrlen);
- memcpy(naya + startpos + newstrlen, v + i + 1, len - i);
- if (delete_r)
- delete[] (char*)r;
- delete[] v;
- v = naya;
-
- goto found;
- }
- }
- // We have a final value:
- map[k][j] = v;
- }
- }
+ M_FONTDATA->SetStyle(style);
}
-//-----------------------------------------------------------------------------
-// wxFontNameItem
-//-----------------------------------------------------------------------------
-
-class wxFontNameItem : public wxObject
+void wxFont::SetWeight(int weight)
{
- DECLARE_DYNAMIC_CLASS(wxFontNameItem)
-public:
- wxFontNameItem(const char *name, int id, int family);
- ~wxFontNameItem();
-
- inline char* GetScreenName(int w, int s) {return screen.GetName(w, s);}
- inline char* GetPostScriptName(int w, int s) {return printing.GetName(w, s);}
- inline char* GetAFMName(int w, int s) {return afm.GetName(w, s);}
- inline char* GetName() {return name;}
- inline int GetFamily() {return family;}
- inline int GetId() {return id;}
- inline bool IsRoman() {return isroman;}
-#if defined(__WXDEBUG__)
- void Dump(ostream& str);
-#endif
-
- int id;
- int family;
- char *name;
- wxSuffixMap screen, printing, afm;
- bool isroman;
-};
+ Unshare();
-IMPLEMENT_ABSTRACT_CLASS(wxFontNameItem, wxObject)
+ M_FONTDATA->SetWeight(weight);
+}
-wxFontNameItem::wxFontNameItem(const char *Name, int Id, int Family)
+void wxFont::SetFaceName(const wxString& faceName)
{
- name = copystring(Name);
- id = Id;
- family = Family;
+ Unshare();
- screen. Initialize(name, "Screen");
- printing.Initialize(name, "PostScript");
- afm. Initialize(name, "Afm");
+ M_FONTDATA->SetFaceName(faceName);
}
-wxFontNameItem::~wxFontNameItem()
+void wxFont::SetUnderlined(bool underlined)
{
- if (name)
- delete[] name;
- name = (char *) NULL;
-}
+ Unshare();
-#if defined(__WXDEBUG__)
-void wxFontNameItem::Dump(ostream& str)
-{
- str << "wxFontNameItem(" << name << ")";
+ M_FONTDATA->SetUnderlined(underlined);
}
-#endif
-
-//-----------------------------------------------------------------------------
-// wxFontDirectory
-//-----------------------------------------------------------------------------
-
-IMPLEMENT_DYNAMIC_CLASS(wxFontNameDirectory, wxObject)
-wxFontNameDirectory::wxFontNameDirectory()
+void wxFont::SetEncoding(wxFontEncoding encoding)
{
- table = new wxHashTable(wxKEY_INTEGER, 20);
- nextFontId = -1;
-}
+ Unshare();
-wxFontNameDirectory::~wxFontNameDirectory()
-{
- // Cleanup wxFontNameItems allocated
- table->BeginFind();
- wxNode *node = table->Next();
- while (node)
- {
- wxFontNameItem *item = (wxFontNameItem*)node->Data();
- delete item;
- node = table->Next();
- }
- delete table;
+ M_FONTDATA->SetEncoding(encoding);
}
-int wxFontNameDirectory::GetNewFontId()
+void wxFont::SetNativeFontInfo(const wxNativeFontInfo& info)
{
- return (nextFontId--);
-}
+ Unshare();
-void wxFontNameDirectory::Initialize()
-{
- Initialize(wxDEFAULT, wxDEFAULT, "Default");
- Initialize(wxDECORATIVE, wxDECORATIVE, "Decorative");
- Initialize(wxROMAN, wxROMAN, "Roman");
- Initialize(wxMODERN, wxMODERN, "Modern");
- Initialize(wxTELETYPE, wxTELETYPE, "Teletype");
- Initialize(wxSWISS, wxSWISS, "Swiss");
- Initialize(wxSCRIPT, wxSCRIPT, "Script");
+ M_FONTDATA->m_nativeFontInfo = info;
}
-void wxFontNameDirectory::Initialize(int fontid, int family, const char *resname)
-{
- char *fam, resource[256];
+// ----------------------------------------------------------------------------
+// get internal representation of font
+// ----------------------------------------------------------------------------
- sprintf(resource, "Family%s", resname);
- SearchResource((const char *)resource, (const char **) NULL, 0, (char **)&fam);
-
- if (fam)
+static GdkFont *g_systemDefaultGuiFont = (GdkFont*) NULL;
+
+// this is also used from tbargtk.cpp and tooltip.cpp, hence extern
+extern GdkFont *GtkGetDefaultGuiFont()
+{
+ if (!g_systemDefaultGuiFont)
{
- if (!strcmp(fam, "Default")) family = wxDEFAULT;
- else if (!strcmp(fam, "Roman")) family = wxROMAN;
- else if (!strcmp(fam, "Decorative")) family = wxDECORATIVE;
- else if (!strcmp(fam, "Modern")) family = wxMODERN;
- else if (!strcmp(fam, "Teletype")) family = wxTELETYPE;
- else if (!strcmp(fam, "Swiss")) family = wxSWISS;
- else if (!strcmp(fam, "Script")) family = wxSCRIPT;
- delete[] fam; // free resource
+ GtkWidget *widget = gtk_button_new();
+ GtkStyle *def = gtk_rc_get_style( widget );
+ if (def)
+ {
+ g_systemDefaultGuiFont = gdk_font_ref( GET_STYLE_FONT(def) );
+ }
+ else
+ {
+ def = gtk_widget_get_default_style();
+ if (def)
+ g_systemDefaultGuiFont = gdk_font_ref( GET_STYLE_FONT(def) );
+ }
+ gtk_widget_destroy( widget );
+ }
+ else
+ {
+ // already have it, but ref it once more before returning
+ gdk_font_ref(g_systemDefaultGuiFont);
}
- table->Put(fontid, new wxFontNameItem(resname, fontid, family));
-}
-int wxFontNameDirectory::FindOrCreateFontId(const char *name, int family)
-{
- int id;
-
- // font exists -> return id
- if ( (id = GetFontId(name)) ) return id;
-
- // create new font
- Initialize(id=GetNewFontId(), family, name);
- return id;
+ return g_systemDefaultGuiFont;
}
-char *wxFontNameDirectory::GetScreenName(int fontid, int weight, int style)
+GdkFont *wxFont::GetInternalFont( float scale ) const
{
- wxFontNameItem *item = (wxFontNameItem*)table->Get(fontid); // find font
- if (item)
- return item->GetScreenName(weight, style);
-
- // font does not exist
- return (char *) NULL;
-}
+ GdkFont *font = (GdkFont *) NULL;
-char *wxFontNameDirectory::GetPostScriptName(int fontid, int weight, int style)
-{
- wxFontNameItem *item = (wxFontNameItem*)table->Get(fontid); // find font
- if (item)
- return item->GetPostScriptName(weight, style);
-
- // font does not exist
- return (char *) NULL;
-}
+ wxCHECK_MSG( Ok(), font, wxT("invalid font") )
-char *wxFontNameDirectory::GetAFMName(int fontid, int weight, int style)
-{
- wxFontNameItem *item = (wxFontNameItem *)table->Get(fontid); // find font
- if (item)
- return item->GetAFMName(weight, style);
- // font does not exist
- return (char *) NULL;
-}
+ long int_scale = long(scale * 100.0 + 0.5); /* key for fontlist */
+ int point_scale = (int)((M_FONTDATA->m_pointSize * 10 * int_scale) / 100);
-char *wxFontNameDirectory::GetFontName(int fontid)
-{
- wxFontNameItem *item = (wxFontNameItem *)table->Get(fontid); // find font
- if (item)
- return item->GetName();
-
- // font does not exist
- return (char *) NULL;
-}
+ wxNode *node = M_FONTDATA->m_scaled_xfonts.Find(int_scale);
+ if (node)
+ {
+ font = (GdkFont*)node->Data();
+ }
+ else // we don't have this font in this size yet
+ {
+ if (*this == wxSystemSettings::GetFont( wxSYS_DEFAULT_GUI_FONT))
+ {
+ font = GtkGetDefaultGuiFont();
+ }
-int wxFontNameDirectory::GetFontId(const char *name)
-{
- wxNode *node;
+ if ( !font )
+ {
+ // do we have the XLFD?
+ if ( M_FONTDATA->HasNativeFont() )
+ {
+ font = wxLoadFont(M_FONTDATA->m_nativeFontInfo.GetXFontName());
+ }
- table->BeginFind();
+ // no XLFD of no exact match - try the approximate one now
+ if ( !font )
+ {
+ wxString xfontname;
+ font = wxLoadQueryNearestFont( point_scale,
+ M_FONTDATA->m_family,
+ M_FONTDATA->m_style,
+ M_FONTDATA->m_weight,
+ M_FONTDATA->m_underlined,
+ M_FONTDATA->m_faceName,
+ M_FONTDATA->m_encoding,
+ &xfontname);
+ if ( font )
+ {
+ M_FONTDATA->m_nativeFontInfo.SetXFontName(xfontname);
+ }
+ }
+ }
- while ( (node = table->Next()) )
- {
- wxFontNameItem *item = (wxFontNameItem*)node->Data();
- if (!strcmp(name, item->name))
- return item->id;
+ if ( font )
+ {
+ M_FONTDATA->m_scaled_xfonts.Append( int_scale, (wxObject*)font );
+ }
}
-
- // font does not exist
- return 0;
-}
-int wxFontNameDirectory::GetFamily(int fontid)
-{
- wxFontNameItem *item = (wxFontNameItem *)table->Get(fontid);
+ // it's quite useless to make it a wxCHECK because we're going to crash
+ // anyhow...
+ wxASSERT_MSG( font, wxT("could not load any font?") );
- if (item)
- return item->family;
-
- // font does not exist
- return wxDEFAULT;
+ return font;
}
-*/