src/frontends/gnome/gnome_helpers.C

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