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