#include "wx/defs.h"
#include "wx/dynarray.h"
#include "wx/string.h"
+#include "wx/regex.h"
#include "wx/utils.h"
+#include "wx/fontmap.h"
#include "wx/fontenum.h"
+#include "wx/fontutil.h"
+// ----------------------------------------------------------------------------
+// GTK 2.0
+// ----------------------------------------------------------------------------
+
+#ifdef __WXGTK20__
+
+#include "wx/gtk/private.h"
+
+extern GtkWidget *wxGetRootWindow();
+
+static int
+cmp_families (const void *a, const void *b)
+{
+ const char *a_name = pango_font_family_get_name (*(PangoFontFamily **)a);
+ const char *b_name = pango_font_family_get_name (*(PangoFontFamily **)b);
+
+ return g_utf8_collate (a_name, b_name);
+}
+
+// I admit I don't yet understand encodings with Pango
+bool wxFontEnumerator::EnumerateFacenames(wxFontEncoding encoding,
+ bool fixedWidthOnly)
+{
+ if ( fixedWidthOnly )
+ {
+ OnFacename( wxT("monospace") );
+ }
+ else
+ {
+ PangoFontFamily **families = NULL;
+ gint n_families = 0;
+ pango_context_list_families (
+ gtk_widget_get_pango_context( wxGetRootWindow() ),
+ &families, &n_families );
+ qsort (families, n_families, sizeof (PangoFontFamily *), cmp_families);
+
+ for (int i=0; i<n_families; i++)
+ {
+ const gchar *name = pango_font_family_get_name( families[i] );
+
+ wxString tmp( name, wxConvUTF8 );
+ OnFacename( tmp );
+ }
+ }
+
+ return TRUE;
+}
+
+bool wxFontEnumerator::EnumerateEncodings(const wxString& family)
+{
+ return FALSE;
+}
+
+
+#else
+ // GTK 2.0
+
+#ifdef __VMS__ // Xlib.h for VMS is not (yet) compatible with C++
+ // The resulting warnings are switched off here
+#pragma message disable nosimpint
+#endif
#include <X11/Xlib.h>
+#ifdef __VMS__
+#pragma message enable nosimpint
+#endif
// ----------------------------------------------------------------------------
// private functions
// helpers
// ----------------------------------------------------------------------------
+#if !wxUSE_NANOX
static char **CreateFontList(wxChar spacing,
wxFontEncoding encoding,
int *nFonts)
{
- wxString xencoding, xregistry;
- wxGetXFontEncoding(encoding, &xregistry, &xencoding);
+ wxNativeEncodingInfo info;
+ wxGetNativeFontEncoding(encoding, &info);
+
+#if wxUSE_FONTMAP
+ if ( !wxTestFontEncoding(info) )
+ {
+ // ask font mapper for a replacement
+ (void)wxFontMapper::Get()->GetAltForEncoding(encoding, &info);
+ }
+#endif // wxUSE_FONTMAP
wxString pattern;
pattern.Printf(wxT("-*-*-*-*-*-*-*-*-*-*-%c-*-%s-%s"),
- spacing, xregistry.c_str(), xencoding.c_str());
+ spacing,
+ info.xregistry.c_str(),
+ info.xencoding.c_str());
// get the list of all fonts
return XListFonts((Display *)wxGetDisplay(), pattern.mb_str(), 32767, nFonts);
char **fonts,
int nFonts)
{
+#if wxUSE_REGEX
+ wxRegEx re(wxT("^(-[^-]*){14}$"), wxRE_NOSUB);
+#endif // wxUSE_REGEX
+
// extract the list of (unique) font families
wxSortedArrayString families;
for ( int n = 0; n < nFonts; n++ )
{
char *font = fonts[n];
+#if wxUSE_REGEX
+ if ( !re.Matches(font) )
+#else // !wxUSE_REGEX
if ( !wxString(font).Matches(wxT("-*-*-*-*-*-*-*-*-*-*-*-*-*-*")) )
+#endif // wxUSE_REGEX/!wxUSE_REGEX
{
// it's not a full font name (probably an alias)
continue;
return TRUE;
}
+#endif
+ // wxUSE_NANOX
// ----------------------------------------------------------------------------
// wxFontEnumerator
bool wxFontEnumerator::EnumerateFacenames(wxFontEncoding encoding,
bool fixedWidthOnly)
{
+#if wxUSE_NANOX
+ return FALSE;
+#else
int nFonts;
char **fonts;
(void)ProcessFamiliesFromFontList(this, fonts, nFonts);
XFreeFontNames(fonts);
-
return TRUE;
+#endif
+ // wxUSE_NANOX
}
bool wxFontEnumerator::EnumerateEncodings(const wxString& family)
{
+#if wxUSE_NANOX
+ return FALSE;
+#else
wxString pattern;
pattern.Printf(wxT("-*-%s-*-*-*-*-*-*-*-*-*-*-*-*"),
family.IsEmpty() ? wxT("*") : family.c_str());
XFreeFontNames(fonts);
return TRUE;
+#endif
+ // wxUSE_NANOX
}
+
+#endif
+ // __WXGTK20__