/////////////////////////////////////////////////////////////////////////////
// Name: font.cpp
// Purpose: wxFont class
-// Author: AUTHOR
+// Author: David Webster
// Modified by:
-// Created: ??/??/98
+// Created: 10/06/99
// RCS-ID: $Id$
-// Copyright: (c) AUTHOR
-// Licence: wxWindows licence
+// Copyright: (c) David Webster
+// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
-#ifdef __GNUG__
-#pragma implementation "font.h"
-#endif
+// ============================================================================
+// declarations
+// ============================================================================
-#include "wx/defs.h"
-#include "wx/string.h"
-#include "wx/font.h"
-#include "wx/gdicmn.h"
+// ----------------------------------------------------------------------------
+// headers
+// ----------------------------------------------------------------------------
-#if !USE_SHARED_LIBRARIES
-IMPLEMENT_DYNAMIC_CLASS(wxFont, wxGDIObject)
-#endif
+// For compilers that support precompilation, includes "wx.h".
+#include "wx/wxprec.h"
-wxFontRefData::wxFontRefData()
+#ifndef WX_PRECOMP
+ #include <stdio.h>
+ #include "wx/setup.h"
+ #include "wx/list.h"
+ #include "wx/utils.h"
+ #include "wx/app.h"
+ #include "wx/font.h"
+#endif // WX_PRECOMP
+
+#include "wx/os2/private.h"
+
+ IMPLEMENT_DYNAMIC_CLASS(wxFont, wxGDIObject)
+
+ #if wxUSE_PORTABLE_FONTS_IN_MSW
+ IMPLEMENT_DYNAMIC_CLASS(wxFontNameDirectory, wxObject)
+ #endif
+
+// ----------------------------------------------------------------------------
+// wxFontRefData - the internal description of the font
+// ----------------------------------------------------------------------------
+
+class WXDLLEXPORT wxFontRefData: public wxGDIRefData
{
- m_style = 0;
- m_pointSize = 0;
- m_family = 0;
- m_style = 0;
- m_weight = 0;
- m_underlined = 0;
- m_faceName = "";
-/* TODO
- m_hFont = 0;
-*/
-}
+friend class WXDLLEXPORT wxFont;
+
+public:
+ 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);
-wxFontRefData::wxFontRefData(const wxFontRefData& data)
+ m_fontId = data.m_fontId;
+ }
+
+ wxFontRefData(int size,
+ int family,
+ int style,
+ int weight,
+ bool underlined,
+ const wxString& faceName,
+ wxFontEncoding encoding)
+ {
+ Init(size, family, style, weight, underlined, faceName, encoding);
+ }
+
+ virtual ~wxFontRefData();
+
+protected:
+ // common part of all ctors
+ void Init(int size,
+ int family,
+ int style,
+ int weight,
+ bool underlined,
+ 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;
+
+ int m_fontId;
+
+ // font characterstics
+ int m_pointSize;
+ int m_family;
+ int m_style;
+ int m_weight;
+ bool m_underlined;
+ wxString m_faceName;
+ wxFontEncoding m_encoding;
+
+ // Windows font handle
+ WXHFONT m_hFont;
+};
+
+// ============================================================================
+// implementation
+// ============================================================================
+
+// ----------------------------------------------------------------------------
+// wxFontRefData
+// ----------------------------------------------------------------------------
+
+void wxFontRefData::Init(int pointSize,
+ int family,
+ int style,
+ int weight,
+ bool underlined,
+ const wxString& faceName,
+ wxFontEncoding encoding)
{
- m_style = data.m_style;
- 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;
-/* TODO
- m_hFont = 0;
-*/
+ 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_fontId = 0;
+ m_temporary = FALSE;
+
+ m_hFont = 0;
}
wxFontRefData::~wxFontRefData()
{
- // TODO: delete font data
+// TODO:
+// if ( m_hFont )
+// {
+// if ( !::DeleteObject((HFONT) m_hFont) )
+// {
+// wxLogLastError("DeleteObject(font)");
+// }
+// }
}
-wxFont::wxFont()
-{
- if ( wxTheFontList )
- wxTheFontList->Append(this);
-}
+// ----------------------------------------------------------------------------
+// wxFont
+// ----------------------------------------------------------------------------
-wxFont::wxFont(int pointSize, int family, int style, int weight, bool underlined, const wxString& faceName)
+void wxFont::Init()
{
- Create(pointSize, family, style, weight, underlined, faceName);
-
if ( wxTheFontList )
wxTheFontList->Append(this);
}
-bool wxFont::Create(int pointSize, int family, int style, int weight, bool underlined, const wxString& faceName)
+/* 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)
{
UnRef();
- m_refData = new wxFontRefData;
-
- 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;
+ m_refData = new wxFontRefData(pointSize, family, style, weight,
+ underlined, faceName, encoding);
RealizeResource();
wxFont::~wxFont()
{
- if (wxTheFontList)
+ if ( wxTheFontList )
wxTheFontList->DeleteObject(this);
}
+// ----------------------------------------------------------------------------
+// real implementation
+// Boris' Kovalenko comments:
+// Because OS/2 fonts are associated with PS we can not create the font
+// here, but we may check that font definition is true
+// ----------------------------------------------------------------------------
+
bool wxFont::RealizeResource()
{
- // TODO: create the font (if there is a native font object)
+ 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(wxT("Calling wxFont::RealizeResource() twice"));
+
+ return TRUE;
+ }
+
+ HPS hps;
+ FATTRS fAttrs;
+ FACENAMEDESC fName;
+ LONG fLid;
+
+ fAttrs.usRecordLength = sizeof(FATTRS);
+ fAttrs.fsFontUse = FATTR_FONTUSE_OUTLINE | // only outline fonts allowed
+ FATTR_FONTUSE_TRANSFORMABLE; // may be transformed
+ fAttrs.fsType = 0;
+ fAttrs.lMaxBaselineExt = fAttrs.lAveCharWidth = 0;
+ fAttrs.idRegistry = 0;
+ fAttrs.lMatch = 0;
+
+ fName.usSize = sizeof(FACENAMEDESC);
+ fName.usWidthClass = FWIDTH_NORMAL;
+ fName.usReserved = 0;
+ fName.flOptions = 0;
+
+ wxString ff_face;
+
+// OS/2 combines the family with styles to give a facename
+
+ switch ( M_FONTDATA->m_family )
+ {
+ case wxSCRIPT:
+ case wxDECORATIVE:
+ case wxROMAN:
+ ff_face = wxT("Times New Roman") ;
+ break;
+
+ case wxTELETYPE:
+ case wxMODERN:
+ ff_face = wxT("Courier") ;
+ break;
+
+ case wxSWISS:
+ case wxDEFAULT:
+ default:
+ ff_face = wxT("Helvetica") ;
+ }
+
+ switch ( M_FONTDATA->m_style )
+ {
+ case wxITALIC:
+ case wxSLANT:
+ fAttrs.fsSelection = FATTR_SEL_ITALIC;
+ break;
+
+ default:
+ wxFAIL_MSG(wxT("unknown font slant"));
+ // fall through
+
+ case wxNORMAL:
+ fAttrs.fsSelection = 0;
+ }
+
+ switch ( M_FONTDATA->m_weight )
+ {
+ default:
+ wxFAIL_MSG(wxT("unknown font weight"));
+ // fall through
+
+ case wxNORMAL:
+ fName.usWeightClass = FWEIGHT_NORMAL;
+ break;
+
+ case wxLIGHT:
+ fName.usWeightClass = FWEIGHT_LIGHT;
+ break;
+
+ case wxBOLD:
+ fName.usWeightClass = FWEIGHT_BOLD;
+ break;
+ }
+
+ if( M_FONTDATA->m_underlined )
+ fAttrs.fsSelection |= FATTR_SEL_UNDERSCORE;
+
+ wxFontEncoding encoding = M_FONTDATA->m_encoding;
+ if ( encoding == wxFONTENCODING_DEFAULT )
+ {
+ encoding = wxFont::GetDefaultEncoding();
+ }
+
+ switch ( encoding )
+ {
+ case wxFONTENCODING_ISO8859_1:
+ case wxFONTENCODING_ISO8859_15:
+ case wxFONTENCODING_CP1250:
+ fAttrs.usCodePage = 1250;
+ break;
+
+ case wxFONTENCODING_ISO8859_2:
+ case wxFONTENCODING_CP1252:
+ fAttrs.usCodePage = 1252;
+ break;
+
+ case wxFONTENCODING_ISO8859_4:
+ case wxFONTENCODING_ISO8859_10:
+ fAttrs.usCodePage = 850; // what is baltic?
+ break;
+
+ case wxFONTENCODING_ISO8859_5:
+ case wxFONTENCODING_CP1251:
+ fAttrs.usCodePage = 1251;
+ break;
+
+ case wxFONTENCODING_ISO8859_6:
+ fAttrs.usCodePage = 850; // what is arabic?
+ break;
+
+ case wxFONTENCODING_ISO8859_7:
+ fAttrs.usCodePage = 850; // what is greek
+ break;
+
+ case wxFONTENCODING_ISO8859_8:
+ fAttrs.usCodePage = 850; // what is hebrew?
+ break;
+
+ case wxFONTENCODING_ISO8859_9:
+ fAttrs.usCodePage = 857;
+ break;
+
+ case wxFONTENCODING_ISO8859_11:
+ fAttrs.usCodePage = 850; // what is thai
+ break;
+
+ case wxFONTENCODING_CP437:
+ fAttrs.usCodePage = 437;
+ break;
+
+ default:
+ wxFAIL_MSG(wxT("unsupported encoding"));
+ // fall through
+
+ case wxFONTENCODING_SYSTEM:
+ fAttrs.usCodePage = 850; // what is ANSI?
+ break;
+ }
+
+// Now cheking
+ fLid = 1;
+ hps = ::WinGetPS( HWND_DESKTOP );
+
+ long numLids = ::GpiQueryNumberSetIds( hps );
+ long gpiError;
+
+ // First we should generate unique id
+ if( numLids )
+ {
+ long Types[255];
+ STR8 Names[255];
+ long lIds[255];
+
+ if( !GpiQuerySetIds(hps, numLids, Types, Names, lIds) )
+ {
+ ::WinReleasePS( hps );
+ return 0;
+ }
+
+ for(unsigned long LCNum = 0; LCNum < numLids; LCNum++)
+ if(lIds[LCNum] == fLid)
+ ++fLid;
+ if(fLid > 254) // wow, no id available!
+ {
+ ::WinReleasePS( hps );
+ return 0;
+ }
+ }
+
+ // now building facestring
+ if(::GpiQueryFaceString(hps, ff_face.c_str(), &fName, FACESIZE, fAttrs.szFacename) == GPI_ERROR)
+ {
+ ::WinReleasePS( hps );
+ return 0;
+ }
+
+ // now creating font
+ WXHFONT hFont = (WXHFONT)0;
+
+ if(::GpiCreateLogFont(hps, NULL, fLid, &fAttrs) != GPI_ERROR)
+ M_FONTDATA->m_hFont = hFont = (WXHFONT)1;
+
+ if( hFont )
+ ::GpiDeleteSetId(hps, fLid);
+
+ ::WinReleasePS( hps );
+
+ if ( !hFont )
+ {
+ wxLogLastError("CreateFont");
+ }
+
+ return hFont != 0;
+}
+
+bool wxFont::FreeResource(bool force)
+{
+ if ( GetResourceHandle() )
+ {
+// TODO:
+// if ( !::DeleteObject((HFONT) M_FONTDATA->m_hFont) )
+// {
+// wxLogLastError("DeleteObject(font)");
+// }
+
+ M_FONTDATA->m_hFont = 0;
+
+ return TRUE;
+ }
return FALSE;
}
+WXHANDLE wxFont::GetResourceHandle()
+{
+ if ( !M_FONTDATA )
+ return 0;
+ else
+ return (WXHANDLE)M_FONTDATA->m_hFont ;
+}
+
+bool wxFont::IsFree() const
+{
+ return (M_FONTDATA && (M_FONTDATA->m_hFont == 0));
+}
+
void wxFont::Unshare()
{
- // Don't change shared data
- if (!m_refData)
+ // Don't change shared data
+ 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(*M_FONTDATA);
+ UnRef();
+ m_refData = ref;
+ }
}
+// ----------------------------------------------------------------------------
+// change font attribute: we recreate font when doing it
+// ----------------------------------------------------------------------------
+
void wxFont::SetPointSize(int pointSize)
{
Unshare();
RealizeResource();
}
-wxString wxFont::GetFamilyString() 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;
-}
-
-/* New font system */
-wxString wxFont::GetFaceName() const
+void wxFont::SetEncoding(wxFontEncoding encoding)
{
- wxString str("");
- if (M_FONTDATA)
- str = M_FONTDATA->m_faceName ;
- return str;
+ Unshare();
+
+ M_FONTDATA->m_encoding = encoding;
+
+ RealizeResource();
}
-wxString wxFont::GetStyleString() const
+// ----------------------------------------------------------------------------
+// accessors
+// ----------------------------------------------------------------------------
+
+int wxFont::GetPointSize() const
{
- wxString styl("");
- switch (GetStyle())
- {
- case wxITALIC:
- styl = "wxITALIC";
- break;
- case wxSLANT:
- styl = "wxSLANT";
- break;
- default:
- styl = "wxNORMAL";
- break;
- }
- return styl;
+ return M_FONTDATA->m_pointSize;
}
-wxString wxFont::GetWeightString() const
+int wxFont::GetFamily() const
{
- wxString w("");
- switch (GetWeight())
- {
- case wxBOLD:
- w = "wxBOLD";
- break;
- case wxLIGHT:
- w = "wxLIGHT";
- break;
- default:
- w = "wxNORMAL";
- break;
- }
- return w;
+ return M_FONTDATA->m_family;
+}
+
+int wxFont::GetFontId() const
+{
+ return M_FONTDATA->m_fontId;
+}
+
+int wxFont::GetStyle() const
+{
+ return M_FONTDATA->m_style;
+}
+
+int wxFont::GetWeight() const
+{
+ return M_FONTDATA->m_weight;
+}
+
+bool wxFont::GetUnderlined() const
+{
+ return M_FONTDATA->m_underlined;
+}
+
+wxString wxFont::GetFaceName() const
+{
+ wxString str;
+ if ( M_FONTDATA )
+ str = M_FONTDATA->m_faceName ;
+ return str;
+}
+
+wxFontEncoding wxFont::GetEncoding() const
+{
+ return M_FONTDATA->m_encoding;
}