+#include "wx/encinfo.h"
+
+// ----------------------------------------------------------------------------
+// Pango
+// ----------------------------------------------------------------------------
+
+#if wxUSE_PANGO
+
+#include "pango/pango.h"
+
+#ifdef __WXGTK20__
+#include "gtk/gtk.h"
+extern GtkWidget *wxGetRootWindow();
+#endif // __WXGTK20__
+
+extern "C" int wxCMPFUNC_CONV
+wxCompareFamilies (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);
+}
+
+bool wxFontEnumerator::EnumerateFacenames(wxFontEncoding encoding,
+ bool fixedWidthOnly)
+{
+ if ( encoding != wxFONTENCODING_SYSTEM && encoding != wxFONTENCODING_UTF8 )
+ {
+ // Pango supports only UTF-8 encoding (and system means any, so we
+ // accept it too)
+ return false;
+ }
+
+#if defined(__WXGTK20__) || !defined(HAVE_PANGO_FONT_FAMILY_IS_MONOSPACE)
+ if ( fixedWidthOnly
+#if defined(__WXGTK24__)
+ && (gtk_check_version(2,4,0) != NULL)
+#endif
+ )
+ {
+ OnFacename( wxT("monospace") );
+ }
+ else // !fixedWidthOnly
+#endif // __WXGTK20__ || !HAVE_PANGO_FONT_FAMILY_IS_MONOSPACE
+ {
+ PangoFontFamily **families = NULL;
+ gint n_families = 0;
+ pango_context_list_families (
+#ifdef __WXGTK20__
+ gtk_widget_get_pango_context( wxGetRootWindow() ),
+#else
+ wxTheApp->GetPangoContext(),
+#endif
+ &families, &n_families );
+ qsort (families, n_families, sizeof (PangoFontFamily *), wxCompareFamilies);
+
+ for (int i=0; i<n_families; i++)
+ {
+#if defined(__WXGTK24__) || defined(HAVE_PANGO_FONT_FAMILY_IS_MONOSPACE)
+ if (!fixedWidthOnly || (
+#ifdef __WXGTK24__
+ !gtk_check_version(2,4,0) &&
+#endif
+ pango_font_family_is_monospace(families[i])
+ ) )
+#endif
+ {
+ const gchar *name = pango_font_family_get_name(families[i]);
+ OnFacename(wxString(name, wxConvUTF8));
+ }
+ }
+ g_free(families);
+ }
+
+ return true;
+}
+
+bool wxFontEnumerator::EnumerateEncodings(const wxString& facename)
+{
+ // name of UTF-8 encoding: no need to use wxFontMapper for it as it's
+ // unlikely to change
+ const wxString utf8(_T("UTF-8"));
+
+
+ // all fonts are in UTF-8 only when using Pango
+ if ( !facename.empty() )
+ {
+ OnFontEncoding(facename, utf8);
+ return true;
+ }
+
+ // so enumerating all facenames supporting this encoding is the same as
+ // enumerating all facenames
+ const wxArrayString facenames(GetFacenames(wxFONTENCODING_UTF8));
+ const size_t count = facenames.size();
+ if ( !count )
+ return false;
+
+ for ( size_t n = 0; n < count; n++ )
+ {
+ OnFontEncoding(facenames[n], utf8);
+ }