Task 667. Unhardcode font strings.

* libnautilus-extensions/nautilus-font-factory.c:
(nautilus_get_current_font_factory), (nautilus_font_factory_get),
(nautilus_font_factory_new), (nautilus_font_factory_initialize),
(nautilus_font_factory_initialize_class), (font_hash_node_alloc),
(font_hash_node_free), (font_hash_node_lookup),
(font_hash_node_lookup_with_insertion),
(nautilus_font_factory_get_font_by_family),
(nautilus_font_factory_get_font_from_preferences),
(nautilus_font_factory_get_fallback_font), (make_font_name_string):
* libnautilus-extensions/nautilus-font-factory.h:
New class to obtain fonts either by family or from preferences.  A
specific size can be requested.

Right now its a pretty dumb class, but it can be enhanced to do
smart things like looking at gtkstyles and/or smarted choosing of
fonts if the specifically requested size is not avialable.

* components/hardware/nautilus-hardware-view.c: (setup_form_title):
* components/music/nautilus-music-view.c:
(nautilus_music_view_initialize):
* components/rpmview/nautilus-rpm-view.c:
(nautilus_rpm_view_initialize):
* components/services/startup/nautilus-view/nautilus-service-startup-view.c:
(setup_form_title):
* libnautilus-extensions/Makefile.am:
* libnautilus-extensions/nautilus-icon-container.c:
(nautilus_icon_container_initialize):
* src/nautilus-property-browser.c:
(nautilus_property_browser_initialize):
* src/nautilus-sidebar-title.c: (nautilus_index_title_update_info):
Unhardcode xlfd font strings in all of these and use the font
factory instead.

1 files changed, 320 insertions, 0 deletions

diff --git a/libnautilus-extensions/nautilus-font-factory.c b/libnautilus-extensions/nautilus-font-factory.c
new file mode 100644
index 000000000..e5abff60f
--- /dev/null
+++ b/libnautilus-extensions/nautilus-font-factory.c
@@ -0,0 +1,320 @@
+/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*-
+
+   nautilus-font-factory.c: Class for obtaining fonts.
+ 
+   Copyright (C) 2000 Eazel, Inc.
+  
+   This program is free software; you can redistribute it and/or
+   modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation; either version 2 of the
+   License, or (at your option) any later version.
+  
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   General Public License for more details.
+  
+   You should have received a copy of the GNU General Public
+   License along with this program; if not, write to the
+   Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+  
+   Authors: Ramiro Estrugo <ramiro@eazel.com>
+*/
+
+#include <config.h>
+
+#include "nautilus-font-factory.h"
+#include "nautilus-gtk-macros.h"
+#include "nautilus-string.h"
+#include "nautilus-global-preferences.h"
+
+#include <unistd.h>
+#include <pthread.h>
+
+/* The font factory */
+typedef struct {
+	GtkObject object;
+
+	GHashTable *fonts;
+} NautilusFontFactory;
+
+typedef struct {
+	GtkObjectClass parent_class;
+} NautilusFontFactoryClass;
+
+/* FontHashNode */
+typedef struct {
+	char		*name;
+	GdkFont		*font;
+} FontHashNode;
+
+static GtkType              nautilus_font_factory_get_type         (void);
+static void                 nautilus_font_factory_initialize_class (NautilusFontFactoryClass *class);
+static void                 nautilus_font_factory_initialize       (NautilusFontFactory      *factory);
+static NautilusFontFactory *nautilus_get_current_font_factory      (void);
+static NautilusFontFactory *nautilus_font_factory_new              (void);
+static char *               make_font_name_string                  (const char               *foundry,
+								    const char               *familiy,
+								    const char               *weight,
+								    const char               *slant,
+								    const char               *set_width,
+								    const char               *add_style,
+								    guint                     size_in_pixels);
+static FontHashNode *       font_hash_node_alloc                   (const char               *name);
+static FontHashNode *       font_hash_node_lookup                  (const char               *name);
+static FontHashNode *       font_hash_node_lookup_with_insertion   (const char               *name);
+
+#if 0
+static void                     font_hash_node_free                     (FontHashNode         *node);
+#endif
+
+NAUTILUS_DEFINE_CLASS_BOILERPLATE (NautilusFontFactory, nautilus_font_factory, GTK_TYPE_OBJECT)
+
+/* Return a pointer to the single global font factory. */
+static NautilusFontFactory *
+nautilus_get_current_font_factory (void)
+{
+        static NautilusFontFactory *global_font_factory = NULL;
+
+        if (global_font_factory == NULL) {
+                global_font_factory = nautilus_font_factory_new ();
+        }
+
+        return global_font_factory;
+}
+
+GtkObject *
+nautilus_font_factory_get (void)
+{
+	return GTK_OBJECT (nautilus_get_current_font_factory ());
+}
+
+/* Create the font factory. */
+static NautilusFontFactory *
+nautilus_font_factory_new (void)
+{
+        NautilusFontFactory *factory;
+        
+        factory = (NautilusFontFactory *) gtk_object_new (nautilus_font_factory_get_type (), NULL);
+
+        return factory;
+}
+
+static void
+nautilus_font_factory_initialize (NautilusFontFactory *factory)
+{
+        factory->fonts = g_hash_table_new (g_str_hash, g_str_equal);
+}
+
+static void
+nautilus_font_factory_initialize_class (NautilusFontFactoryClass *class)
+{
+	GtkObjectClass *object_class;
+
+	object_class = GTK_OBJECT_CLASS (class);
+}
+
+static FontHashNode *
+font_hash_node_alloc (const char *name)
+{
+	FontHashNode * node;
+	
+	g_assert (name != NULL);
+
+	node = g_new (FontHashNode, 1);
+
+	node->name = g_strdup (name);
+
+	node->font = NULL;
+
+	return node;
+}
+
+#if 0
+static void
+font_hash_node_free (FontHashNode *node)
+{
+	g_assert (node != NULL);
+
+	g_free (node->name);
+
+	g_free (node);
+}
+#endif
+
+static FontHashNode *
+font_hash_node_lookup (const char *name)
+{
+	static NautilusFontFactory *factory;
+
+	gpointer hash_value;
+	
+	g_assert (name != NULL);
+
+	factory = nautilus_get_current_font_factory ();
+	g_assert (factory != NULL);
+
+	hash_value = g_hash_table_lookup (factory->fonts, (gconstpointer) name);
+	
+	return (FontHashNode *) hash_value;
+}
+
+static FontHashNode *
+font_hash_node_lookup_with_insertion (const char *name)
+{
+	static NautilusFontFactory *factory;
+
+	FontHashNode *node = NULL;
+
+	g_assert (name != NULL);
+
+	factory = nautilus_get_current_font_factory ();
+	g_assert (factory != NULL);
+
+
+	node = font_hash_node_lookup (name);
+
+	if (node == NULL) {
+		GdkFont *font;
+		
+		font = gdk_font_load (name);
+		
+		if (font != NULL) {
+			node = font_hash_node_alloc (name);
+			node->font = font;
+			
+			gdk_font_ref (node->font);
+
+			g_hash_table_insert (factory->fonts, (gpointer) name, (gpointer) node);
+		}
+	}
+	
+	return node;
+}
+
+static char *
+make_font_name_string (const char *foundry,
+		       const char *familiy,
+		       const char *weight,
+		       const char *slant,
+		       const char *set_width,
+		       const char *add_style,
+		       guint size_in_pixels)
+{
+	char *font_name;
+
+        const char *points = "*";
+        const char *hor_res = "*";
+        const char *ver_res = "*";
+        const char *spacing = "*";
+        const char *average_width = "*";
+        const char *char_set_registry = "*";
+        const char *char_set_encoding = "*";
+
+
+	/*                             +---------------------------------------------------- foundry
+	                               |  +------------------------------------------------- family
+				       |  |  +---------------------------------------------- weight
+				       |  |  |  +------------------------------------------- slant 
+				       |  |  |  |  +---------------------------------------- sel_width
+				       |  |  |  |  |  +------------------------------------- add-style
+				       |  |  |  |  |  |  +---------------------------------- pixels   	
+				       |  |  |  |  |  |  |  +------------------------------- points  
+				       |  |  |  |  |  |  |  |  +---------------------------- hor_res        
+				       |  |  |  |  |  |  |  |  |  +------------------------- ver_res        
+				       |  |  |  |  |  |  |  |  |  |  +---------------------- spacing        
+				       |  |  |  |  |  |  |  |  |  |  |  +------------------- average_width        
+				       |  |  |  |  |  |  |  |  |  |  |  |  +---------------- char_set_registry
+				       |  |  |  |  |  |  |  |  |  |  |  |  |  +------------- char_set_encoding */
+	font_name = g_strdup_printf ("-%s-%s-%s-%s-%s-%s-%d-%s-%s-%s-%s-%s-%s-%s",
+				     foundry,
+				     familiy,
+				     weight,
+				     slant,
+				     set_width,
+				     add_style,
+				     size_in_pixels,
+				     points,
+				     hor_res,
+				     ver_res,
+				     spacing,
+				     average_width,
+				     char_set_registry,
+				     char_set_encoding);
+	
+	return font_name;
+}
+
+/* Public functions */
+GdkFont *
+nautilus_font_factory_get_font_by_family (const char *family,
+					  guint       size_in_pixels)
+{
+	static NautilusFontFactory *factory;
+	GdkFont *font = NULL;
+	FontHashNode *node;
+	char *font_name;
+
+	g_return_val_if_fail (family != NULL, NULL);
+	g_return_val_if_fail (size_in_pixels > 0, NULL);
+
+	factory = nautilus_get_current_font_factory ();
+	g_assert (factory != NULL);
+
+	font_name = make_font_name_string ("*", 
+					   family,
+					   "medium",
+					   "r",
+					   "normal",
+					   "*",
+					   size_in_pixels);
+
+	g_assert (font_name != NULL);
+
+	node = font_hash_node_lookup_with_insertion (font_name);
+
+	if (node != NULL) {
+		g_assert (node->font);
+
+		font = node->font;
+
+		gdk_font_ref (font);
+	}
+	else {
+		font = nautilus_font_factory_get_fallback_font ();
+	}
+
+	g_free (font_name);
+
+	return font;
+}
+
+GdkFont *
+nautilus_font_factory_get_font_from_preferences (guint size_in_pixels)
+{
+	char	*family;
+	GdkFont *font;
+
+	family = nautilus_preferences_get (NAUTILUS_PREFERENCES_DIRECTORY_VIEW_FONT_FAMILY, "helvectica");
+
+	font = nautilus_font_factory_get_font_by_family (family, size_in_pixels);
+
+	g_free (family);
+
+	return font;
+}
+
+GdkFont *
+nautilus_font_factory_get_fallback_font (void)
+{
+	static GdkFont *fixed_font;
+
+	if (fixed_font == NULL) {
+		fixed_font = gdk_font_load ("fixed");
+		g_assert (fixed_font != NULL);
+		gdk_font_ref (fixed_font);
+	}
+
+	return fixed_font;
+}