/////////////////////////////////////////////////////////////////////////////
-// Name: font.cpp
+// Name: src/motif/font.cpp
// Purpose: wxFont class
// Author: Julian Smart
// Modified by:
#endif
#include "wx/defs.h"
+
+#ifdef __VMS
+#pragma message disable nosimpint
+#include "wx/vms_x_fix.h"
+#endif
+#include <Xm/Xm.h>
+#ifdef __VMS
+#pragma message enable nosimpint
+#endif
+
#include "wx/string.h"
#include "wx/font.h"
#include "wx/gdicmn.h"
-#include "wx/utils.h"
+#include "wx/utils.h" // for wxGetDisplay()
+#include "wx/fontutil.h" // for wxNativeFontInfo
+#include "wx/tokenzr.h"
+#include "wx/settings.h"
+#include "wx/motif/private.h"
-#include <Xm/Xm.h>
-
-#if !USE_SHARED_LIBRARIES
- IMPLEMENT_DYNAMIC_CLASS(wxFont, wxGDIObject)
-#endif
+IMPLEMENT_DYNAMIC_CLASS(wxFont, wxGDIObject)
// ----------------------------------------------------------------------------
// private classes
// For every wxFont, there must be a font for each display and scale requested.
// So these objects are stored in wxFontRefData::m_fonts
-class wxXFont: public wxObject
+class wxXFont : public wxObject
{
public:
wxXFont();
WXFontStructPtr m_fontStruct; // XFontStruct
WXFontList m_fontList; // Motif XmFontList
+#if wxCHECK_MOTIF_VERSION( 2, 0 )
+ WXRenderTable m_renderTable; // Motif XmRenderTable
+#endif
WXDisplay* m_display; // XDisplay
int m_scale; // Scale * 100
};
wxString m_faceName;
wxFontEncoding m_encoding;
+ wxNativeFontInfo m_nativeFontInfo;
+
// A list of wxXFonts
wxList m_fonts;
};
{
m_fontStruct = (WXFontStructPtr) 0;
m_fontList = (WXFontList) 0;
+#if wxCHECK_MOTIF_VERSION( 2, 0 )
+ m_renderTable = (WXRenderTable) 0;
+#endif
m_display = (WXDisplay*) 0;
m_scale = 100;
}
wxXFont::~wxXFont()
{
XmFontList fontList = (XmFontList) m_fontList;
-
XmFontListFree (fontList);
+#if wxCHECK_MOTIF_VERSION( 2, 0 ) && !wxCHECK_LESSTIF()
+ XmRenderTable renderTable = (XmRenderTable) m_renderTable;
+ XmRenderTableFree (renderTable);
+#endif
+
// TODO: why does freeing the font produce a segv???
// Note that XFreeFont wasn't called in wxWin 1.68 either.
// XFontStruct* fontStruct = (XFontStruct*) m_fontStruct;
wxFontRefData::~wxFontRefData()
{
- wxNode* node = m_fonts.First();
+ wxList::Node* node = m_fonts.GetFirst();
while (node)
{
- wxXFont* f = (wxXFont*) node->Data();
+ wxXFont* f = (wxXFont*) node->GetData();
delete f;
- node = node->Next();
+ node = node->GetNext();
}
m_fonts.Clear();
}
// wxFont
// ----------------------------------------------------------------------------
+wxFont::wxFont(const wxNativeFontInfo& info)
+{
+ Init();
+
+ (void)Create(info.GetXFontName());
+}
+
void wxFont::Init()
{
- if ( wxTheFontList )
- wxTheFontList->Append(this);
}
bool wxFont::Create(int pointSize,
return TRUE;
}
+bool wxFont::Create(const wxString& fontname, wxFontEncoding enc)
+{
+ if( !fontname )
+ {
+ *this = wxSystemSettings::GetFont( wxSYS_DEFAULT_GUI_FONT);
+ return TRUE;
+ }
+
+ m_refData = new wxFontRefData();
+
+ M_FONTDATA->m_nativeFontInfo.SetXFontName(fontname); // X font name
+
+ wxString tmp;
+
+ wxStringTokenizer tn( fontname, wxT("-") );
+
+ tn.GetNextToken(); // skip initial empty token
+ tn.GetNextToken(); // foundry
+
+
+ M_FONTDATA->m_faceName = tn.GetNextToken(); // family
+
+ tmp = tn.GetNextToken().MakeUpper(); // weight
+ if (tmp == wxT("BOLD")) M_FONTDATA->m_weight = wxBOLD;
+ if (tmp == wxT("BLACK")) M_FONTDATA->m_weight = wxBOLD;
+ if (tmp == wxT("EXTRABOLD")) M_FONTDATA->m_weight = wxBOLD;
+ if (tmp == wxT("DEMIBOLD")) M_FONTDATA->m_weight = wxBOLD;
+ if (tmp == wxT("ULTRABOLD")) M_FONTDATA->m_weight = wxBOLD;
+
+ if (tmp == wxT("LIGHT")) M_FONTDATA->m_weight = wxLIGHT;
+ if (tmp == wxT("THIN")) M_FONTDATA->m_weight = wxLIGHT;
+
+ tmp = tn.GetNextToken().MakeUpper(); // slant
+ if (tmp == wxT("I")) M_FONTDATA->m_style = wxITALIC;
+ if (tmp == wxT("O")) M_FONTDATA->m_style = wxITALIC;
+
+ tn.GetNextToken(); // set width
+ tn.GetNextToken(); // add. style
+ tn.GetNextToken(); // pixel size
+
+ tmp = tn.GetNextToken(); // pointsize
+ if (tmp != wxT("*"))
+ {
+ long num = wxStrtol (tmp.c_str(), (wxChar **) NULL, 10);
+ M_FONTDATA->m_pointSize = (int)(num / 10);
+ }
+
+ tn.GetNextToken(); // x-res
+ tn.GetNextToken(); // y-res
+
+ tmp = tn.GetNextToken().MakeUpper(); // spacing
+
+ if (tmp == wxT("M"))
+ M_FONTDATA->m_family = wxMODERN;
+ else if (M_FONTDATA->m_faceName == wxT("TIMES"))
+ M_FONTDATA->m_family = wxROMAN;
+ else if (M_FONTDATA->m_faceName == wxT("HELVETICA"))
+ M_FONTDATA->m_family = wxSWISS;
+ else if (M_FONTDATA->m_faceName == wxT("LUCIDATYPEWRITER"))
+ M_FONTDATA->m_family = wxTELETYPE;
+ else if (M_FONTDATA->m_faceName == wxT("LUCIDA"))
+ M_FONTDATA->m_family = wxDECORATIVE;
+ else if (M_FONTDATA->m_faceName == wxT("UTOPIA"))
+ M_FONTDATA->m_family = wxSCRIPT;
+
+ tn.GetNextToken(); // avg width
+
+ // deal with font encoding
+ M_FONTDATA->m_encoding = enc;
+ if ( M_FONTDATA->m_encoding == wxFONTENCODING_SYSTEM )
+ {
+ wxString registry = tn.GetNextToken().MakeUpper(),
+ encoding = tn.GetNextToken().MakeUpper();
+
+ if ( registry == _T("ISO8859") )
+ {
+ int cp;
+ if ( wxSscanf(encoding, wxT("%d"), &cp) == 1 )
+ {
+ M_FONTDATA->m_encoding =
+ (wxFontEncoding)(wxFONTENCODING_ISO8859_1 + cp - 1);
+ }
+ }
+ else if ( registry == _T("MICROSOFT") )
+ {
+ int cp;
+ if ( wxSscanf(encoding, wxT("cp125%d"), &cp) == 1 )
+ {
+ M_FONTDATA->m_encoding =
+ (wxFontEncoding)(wxFONTENCODING_CP1250 + cp);
+ }
+ }
+ else if ( registry == _T("KOI8") )
+ {
+ M_FONTDATA->m_encoding = wxFONTENCODING_KOI8;
+ }
+ //else: unknown encoding - may be give a warning here?
+ else
+ return FALSE;
+ }
+ return TRUE;
+}
+
wxFont::~wxFont()
{
- if ( wxTheFontList )
- wxTheFontList->DeleteObject(this);
}
// ----------------------------------------------------------------------------
Unshare();
M_FONTDATA->m_pointSize = pointSize;
+ M_FONTDATA->m_nativeFontInfo.GetXFontName().Clear(); // invalid now
RealizeResource();
}
Unshare();
M_FONTDATA->m_family = family;
+ M_FONTDATA->m_nativeFontInfo.GetXFontName().Clear(); // invalid now
RealizeResource();
}
Unshare();
M_FONTDATA->m_style = style;
+ M_FONTDATA->m_nativeFontInfo.GetXFontName().Clear(); // invalid now
RealizeResource();
}
Unshare();
M_FONTDATA->m_weight = weight;
+ M_FONTDATA->m_nativeFontInfo.GetXFontName().Clear(); // invalid now
RealizeResource();
}
Unshare();
M_FONTDATA->m_faceName = faceName;
+ M_FONTDATA->m_nativeFontInfo.GetXFontName().Clear(); // invalid now
RealizeResource();
}
Unshare();
M_FONTDATA->m_encoding = encoding;
+ M_FONTDATA->m_nativeFontInfo.GetXFontName().Clear(); // invalid now
RealizeResource();
}
+void wxFont::DoSetNativeFontInfo(const wxNativeFontInfo& info)
+{
+ Unshare();
+
+ M_FONTDATA->m_nativeFontInfo = info;
+}
+
// ----------------------------------------------------------------------------
// query font attributes
// ----------------------------------------------------------------------------
int wxFont::GetPointSize() const
{
+ wxCHECK_MSG( Ok(), 0, wxT("invalid font") );
+
return M_FONTDATA->m_pointSize;
}
+wxString wxFont::GetFaceName() const
+{
+ wxCHECK_MSG( Ok(), wxT(""), wxT("invalid font") );
+
+ return M_FONTDATA->m_faceName ;
+}
+
int wxFont::GetFamily() const
{
+ wxCHECK_MSG( Ok(), 0, wxT("invalid font") );
+
return M_FONTDATA->m_family;
}
int wxFont::GetStyle() const
{
+ wxCHECK_MSG( Ok(), 0, wxT("invalid font") );
+
return M_FONTDATA->m_style;
}
int wxFont::GetWeight() const
{
+ wxCHECK_MSG( Ok(), 0, wxT("invalid font") );
+
return M_FONTDATA->m_weight;
}
bool wxFont::GetUnderlined() const
{
+ wxCHECK_MSG( Ok(), FALSE, wxT("invalid font") );
+
return M_FONTDATA->m_underlined;
}
-wxString wxFont::GetFaceName() const
+wxFontEncoding wxFont::GetEncoding() const
{
- wxString str;
- if ( M_FONTDATA )
- str = M_FONTDATA->m_faceName ;
- return str;
+ wxCHECK_MSG( Ok(), wxFONTENCODING_DEFAULT, wxT("invalid font") );
+
+ return M_FONTDATA->m_encoding;
}
-wxFontEncoding wxFont::GetEncoding() const
+wxNativeFontInfo *wxFont::GetNativeFontInfo() const
{
- return M_FONTDATA->m_encoding;
+ wxCHECK_MSG( Ok(), (wxNativeFontInfo *)NULL, wxT("invalid font") );
+
+ if(M_FONTDATA->m_nativeFontInfo.GetXFontName().IsEmpty())
+ GetInternalFont();
+
+ return new wxNativeFontInfo(M_FONTDATA->m_nativeFontInfo);
}
// ----------------------------------------------------------------------------
int pointSize = (M_FONTDATA->m_pointSize * 10 * intScale) / 100;
// search existing fonts first
- wxNode* node = M_FONTDATA->m_fonts.First();
+ wxList::Node* node = M_FONTDATA->m_fonts.GetFirst();
while (node)
{
- wxXFont* f = (wxXFont*) node->Data();
+ wxXFont* f = (wxXFont*) node->GetData();
if ((!display || (f->m_display == display)) && (f->m_scale == intScale))
return f;
- node = node->Next();
+ node = node->GetNext();
}
// not found, create a new one
- XFontStruct *font = wxLoadQueryNearestFont(pointSize,
+ XFontStruct *font = (XFontStruct *)
+ wxLoadQueryNearestFont(pointSize,
M_FONTDATA->m_family,
M_FONTDATA->m_style,
M_FONTDATA->m_weight,
M_FONTDATA->m_underlined,
- T(""),
+ wxT(""),
M_FONTDATA->m_encoding);
if ( !font )
{
- wxFAIL_MSG( T("Could not allocate even a default font -- something is wrong.") );
+ wxFAIL_MSG( wxT("Could not allocate even a default font -- something is wrong.") );
return (wxXFont*) NULL;
}
f->m_fontList = XmFontListCreate ((XFontStruct*) font, XmSTRING_DEFAULT_CHARSET);
M_FONTDATA->m_fonts.Append(f);
+#if wxCHECK_MOTIF_VERSION( 2, 0 ) && !wxCHECK_LESSTIF()
+ XmRendition rendition;
+ XmRenderTable renderTable;
+ Arg args[5];
+ int count = 0;
+
+ XtSetArg( args[count], XmNfont, font ); ++count;
+ XtSetArg( args[count], XmNunderlineType,
+ GetUnderlined() ? XmSINGLE_LINE : XmNO_LINE ); ++count;
+ rendition = XmRenditionCreate( XmGetXmDisplay( (Display*)f->m_display ),
+ (XmStringTag)"",
+ args, count );
+ renderTable = XmRenderTableAddRenditions( NULL, &rendition, 1,
+ XmMERGE_REPLACE );
+
+ f->m_renderTable = (WXRenderTable)renderTable;
+#endif
+
return f;
}
return (f ? f->m_fontList : (WXFontList) 0);
}
+
+#if wxCHECK_MOTIF_VERSION( 2, 0 )
+
+WXRenderTable wxFont::GetRenderTable(WXDisplay* display) const
+{
+ wxXFont* f = GetInternalFont(1.0, display);
+
+ return (f ? f->m_renderTable : (WXFontList) 0);
+}
+
+#endif
+
+WXFontType wxFont::GetFontType(WXDisplay* display) const
+{
+#if wxCHECK_MOTIF_VERSION( 2, 0 ) && !wxCHECK_LESSTIF()
+ return Ok() ? GetRenderTable(display) : NULL;
+#else
+ return Ok() ? GetFontList(1.0, display) : NULL;
+#endif
+}
+
+/*static*/ WXString wxFont::GetFontTag()
+{
+#if wxCHECK_MOTIF_VERSION( 2, 0 ) && !wxCHECK_LESSTIF()
+ return (WXString)XmNrenderTable;
+#else
+ return (WXString)XmNfontList;
+#endif
+}