src/frontends/gnome/gnome_helpers.C

   1 // -*- C++ -*-
   2 /* This file is part of
   3  * ======================================================
   4  *
   5  *           LyX, The Document Processor
   6  *
   7  *          Copyright 2000 The LyX Team.
   8  *
   9  * ====================================================== */
  10
  11 #include <config.h>
  12
  13 #include <gdk--/font.h>
  14 #include <gdk/gdktypes.h>
  15 #include <gdk/gdkx.h>
  16 #include <glib.h>
  17
  18 #include "gnome_helpers.h"
  19
  20 string get_font_name(Gdk_Font const & font)
  21 {
  22         gchar * name = get_font_name(font.gdkobj());
  23         string name_str(name);
  24         g_free(name);
  25         return name_str;
  26 }
  27
  28
  29 gchar *
  30 get_font_name (const GdkFont * font)
  31 {
  32         Atom font_atom, atom;
  33         bool status = false;
  34
  35 #ifdef E_FONT_VERBOSE
  36         gint i;
  37         g_print ("Extracting X font info\n");
  38 #endif
  39
  40         font_atom = gdk_atom_intern ("FONT", FALSE);
  41
  42         if (font->type == GDK_FONT_FONTSET) {
  43                 XFontStruct **font_structs;
  44                 gint num_fonts;
  45                 gchar **font_names;
  46
  47                 num_fonts = XFontsOfFontSet (
  48                                 static_cast<XFontSet>(GDK_FONT_XFONT (font))
  49                                 , &font_structs, &font_names);
  50 #ifdef E_FONT_VERBOSE
  51                 g_print ("Fonts of fontset:\n");
  52                 for (i = 0; i < num_fonts; i++) g_print ("  %s\n", font_names[i]);
  53 #endif
  54                 status = XGetFontProperty (font_structs[0], font_atom, &atom);
  55         } else {
  56                 status = XGetFontProperty (
  57                                 static_cast<XFontStruct*>(GDK_FONT_XFONT (font))
  58                                 , font_atom, &atom);
  59         }
  60
  61         if (status) {
  62                 return gdk_atom_name (atom);
  63         }
  64
  65         return NULL;
  66 }
  67
  68 #if USE_UNUSED_STUFF_FROM_E_FONT
  69 /*
  70  * Splits full X font name into pieces, overwriting hyphens
  71  */
  72
  73 static void
  74 split_name (gchar * c[], gchar * name)
  75 {
  76         gchar *p;
  77         gint i;
  78
  79         p = name;
  80         if (*p == '-') p++;
  81
  82         for (i = 0; i < 12; i++) {
  83                 c[i] = p;
  84                 /* Skip text */
  85                 while (*p && (*p != '-')) p++;
  86                 /* Replace hyphen with '\0' */
  87                 if (*p) *p++ = '\0';
  88         }
  89
  90         c[i] = p;
  91 }
  92
  93 /*
  94  * Find light and bold variants of a font, ideally using the provided
  95  * weight for the light variant, and a weight 2 shades darker than it
  96  * for the bold variant. If there isn't something 2 shades darker, use
  97  * something 3 or more shades darker if it exists, or 1 shade darker
  98  * if that's all there is. If there is nothing darker than the provided
  99  * weight, but there are lighter fonts, then use the darker one for
 100  * bold and a lighter one for light.
 101  */
 102
 103 static gboolean
 104 find_variants (gchar **namelist, gint length, gchar *weight,
 105                gchar **lightname, gchar **boldname)
 106 {
 107         static GHashTable *wh = NULL;
 108         /* Standard, Found, Bold, Light */
 109         gint sw, fw, bw, lw;
 110         gchar s[32];
 111         gchar *f, *b, *l;
 112         gchar *p;
 113         gint i;
 114
 115         if (!wh) {
 116                 wh = g_hash_table_new (g_str_hash, g_str_equal);
 117                 g_hash_table_insert (wh, "light", GINT_TO_POINTER (1));
 118                 g_hash_table_insert (wh, "book", GINT_TO_POINTER (2));
 119                 g_hash_table_insert (wh, "regular", GINT_TO_POINTER (2));
 120                 g_hash_table_insert (wh, "medium", GINT_TO_POINTER (3));
 121                 g_hash_table_insert (wh, "demibold", GINT_TO_POINTER (5));
 122                 g_hash_table_insert (wh, "bold", GINT_TO_POINTER (6));
 123                 g_hash_table_insert (wh, "black", GINT_TO_POINTER (8));
 124         }
 125
 126         g_snprintf (s, 32, weight);
 127         g_strdown (s);
 128         sw = GPOINTER_TO_INT (g_hash_table_lookup (wh, s));
 129         if (sw == 0) return FALSE;
 130
 131         fw = 0; lw = 0; bw = 32;
 132         f = NULL; l = NULL; b = NULL;
 133         *lightname = NULL; *boldname = NULL;
 134
 135         for (i = 0; i < length; i++) {
 136                 p = namelist[i];
 137                 if (*p) p++;
 138                 while (*p && (*p != '-')) p++;
 139                 if (*p) p++;
 140                 while (*p && (*p != '-')) p++;
 141                 if (*p) p++;
 142                 f = p;
 143                 while (*p && (*p != '-')) p++;
 144                 if (*p) *p = '\0';
 145                 g_strdown (f);
 146                 fw = GPOINTER_TO_INT (g_hash_table_lookup (wh, f));
 147                 if (fw) {
 148                         if (fw > sw) {
 149                                 if ((fw - 2 == sw) ||
 150                                     ((fw > bw) && (bw == sw + 1)) ||
 151                                     ((fw < bw) && (fw - 2 > sw))) {
 152                                         bw = fw;
 153                                         b = f;
 154                                 }
 155                         } else if (fw < sw) {
 156                                 if ((fw + 2 == sw) ||
 157                                     ((fw < lw) && (lw == sw - 1)) ||
 158                                     ((fw > lw) && (fw + 2 < sw))) {
 159                                         lw = fw;
 160                                         l = f;
 161                                 }
 162                         }
 163                 }
 164         }
 165
 166         if (b) {
 167                 *lightname = weight;
 168                 *boldname = b;
 169                 return TRUE;
 170         } else if (l) {
 171                 *lightname = l;
 172                 *boldname = weight;
 173                 return TRUE;
 174         }
 175         return FALSE;
 176 }
 177 #endif
 178
 179 #ifdef E_FONT_VERBOSE
 180 /*
 181  * Return newly allocated full name
 182  */
 183
 184 static void
 185 e_font_print_gdk_font_name (const GdkFont * font)
 186 {
 187         Atom font_atom, atom;
 188         Bool status;
 189
 190         font_atom = gdk_atom_intern ("FONT", FALSE);
 191
 192         g_print ("-------- start of font description --------\n");
 193
 194         if (font == NULL) {
 195                 g_print ("GdkFont is NULL\n");
 196         } else if (font->type == GDK_FONT_FONTSET) {
 197                 XFontStruct **font_structs;
 198                 gint num_fonts;
 199                 gchar **font_names;
 200                 gint i;
 201
 202                 num_fonts = XFontsOfFontSet (GDK_FONT_XFONT (font), &font_structs, &font_names);
 203
 204                 g_print ("Gdk Fontset, locale: %s\n", XLocaleOfFontSet (GDK_FONT_XFONT (font)));
 205                 for (i = 0; i < num_fonts; i++) {
 206                         g_print ("    %s\n", font_names[i]);
 207                 }
 208         } else {
 209                 gchar * name;
 210                 status = XGetFontProperty (GDK_FONT_XFONT (font), font_atom, &atom);
 211                 name = gdk_atom_name (atom);
 212                 g_print ("GdkFont: %s\n", name);
 213                 if (name) g_free (name);
 214         }
 215
 216         g_print ("-------- end of font description --------\n");
 217 }
 218 #endif