[glade3] Adding missing previewer program from last commit.

[Tristan Van Berkom <tvb src gnome org>]

commit 72be0278492d96e28db455bacda37d36380c936d
Author: Tristan Van Berkom <tristan van berkom gmail com>
Date:   Sun Oct 17 22:23:32 2010 +0900

    Adding missing previewer program from last commit.

 gladeui/glade-previewer.c |  333 +++++++++++++++++++++++++++++++++++++++++++++
 1 files changed, 333 insertions(+), 0 deletions(-)
---
diff --git a/gladeui/glade-previewer.c b/gladeui/glade-previewer.c
new file mode 100644
index 0000000..7b31905
--- /dev/null
+++ b/gladeui/glade-previewer.c
@@ -0,0 +1,333 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
+/*
+ * Copyright (C) 2010 Marco Diego Aurélio Mesquita
+ *
+ * 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+ *
+ * Authors:
+ *   Marco Diego Aurélio Mesquita <marcodiegomesquita gmail com>
+ */
+
+
+#include <config.h>
+
+#include <stdlib.h>
+#include <string.h>
+#include <gtk/gtk.h>
+
+#include <glib/gi18n-lib.h>
+
+static void
+display_help_and_quit (const GOptionEntry *entries)
+{
+	GOptionContext *context;
+	context = g_option_context_new (_("- previews a glade UI definition"));
+	g_option_context_add_main_entries (context, entries, NULL);
+	g_option_context_add_group (context, gtk_get_option_group (TRUE));
+
+	g_print ("%s\n", g_option_context_get_help (context, TRUE, NULL));
+
+	g_option_context_free (context);
+	exit (1);
+}
+
+static void
+parse_arguments (int argc, char **argv, gchar **toplevel_name, gchar **file_name)
+{
+	*toplevel_name = NULL;
+	*file_name = NULL;
+	gboolean listen = FALSE;
+	gboolean version = FALSE;
+	GError *error = NULL;
+
+	GOptionEntry entries[] = 
+	{
+	  { "filename", 'f', G_OPTION_FLAG_FILENAME|G_OPTION_FLAG_OPTIONAL_ARG,
+			     G_OPTION_ARG_FILENAME, file_name, _("Name of the file to preview"), "FILENAME" },
+	  { "toplevel", 't', G_OPTION_FLAG_OPTIONAL_ARG,
+			     G_OPTION_ARG_STRING, toplevel_name, _("Name of the toplevel to preview"), "TOPLEVELNAME" },
+	  { "listen", 'l', 0, G_OPTION_ARG_NONE, &listen, _("Listen standard input"), NULL },
+	  { "version", 'v', 0, G_OPTION_ARG_NONE, &version, _("Display previewer version"), NULL },
+
+	  { NULL }
+	};
+
+	if (!gtk_init_with_args (&argc, &argv, _("- previews a glade UI definition"),
+				 entries, NULL,	&error))
+	{
+		g_printerr (_("%s\nRun '%s --help' to see a full list of available command line"
+			    "options.\n"), error->message, argv[0]);
+		g_error_free (error);
+		exit(1);
+	}
+
+	if (version)
+	{
+		g_print ("glade-previewer " VERSION "\n");
+		exit (0);
+	}
+
+	if (listen && *file_name != NULL)
+	{
+		g_printerr (_("--listen and --filename must not be simultaneously specified.\n"));
+		display_help_and_quit (entries);
+	}
+
+	if (!listen && *file_name == NULL)
+	{
+		g_printerr (_("Either --listen or --filename must be specified.\n"));
+		display_help_and_quit (entries);
+	}
+}
+
+static GtkWidget *
+get_toplevel (gchar *name, gchar *string, gsize length)
+{
+	GError *error = NULL;
+	GtkWidget *toplevel = NULL;
+	GtkWidget *window = NULL;
+	GtkBuilder *builder;
+	GObject *object;
+	GSList *objects;	
+
+	builder = gtk_builder_new ();
+	if (!gtk_builder_add_from_string (builder, string, length, &error))
+	{
+		g_printerr (_("Couldn't load builder definition: %s"), error->message);
+		g_error_free (error);
+		exit (1);
+	}
+
+	if (name == NULL)
+	{
+		objects = gtk_builder_get_objects (builder);
+
+		/* Iterate trough objects and search for a window or widget */
+		while (objects != NULL)
+		{
+			if (GTK_IS_WIDGET (objects->data) && toplevel == NULL)
+			{
+				toplevel = GTK_WIDGET(objects->data);
+			}
+			if (GTK_IS_WINDOW (objects->data))
+			{
+				window = GTK_WIDGET(objects->data);
+				break;
+			}
+			objects = objects->next;
+		}
+
+		if (window != NULL)
+		{
+			toplevel = window;
+		}
+		else if (toplevel == NULL)
+		{
+			g_printerr (_("UI definition has no previewable widgets.\n"));
+			exit (1);
+		}
+	} else {
+		object = gtk_builder_get_object (builder, name);
+
+		if (object == NULL)
+		{
+			g_printerr (_("Object %s not found in UI definition.\n"), name);
+			exit (1);
+		}
+
+		if (!GTK_IS_WIDGET(object))
+		{
+			g_printerr (_("Object is not previewable.\n"));
+			exit (1);
+		}
+
+		toplevel = GTK_WIDGET(object);
+	}
+
+	g_object_unref (builder);
+	return toplevel;
+}
+
+static void
+preview_widget (gchar *name, gchar *buffer, gsize length)
+{
+	GtkWidget *widget;
+	GtkWidget *widget_parent;
+	GtkWidget *window;
+
+	widget = get_toplevel (name, buffer, length);
+
+	if (GTK_IS_WINDOW (widget))
+	{
+		window = widget;
+	} else {
+		window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
+		gtk_window_set_title (GTK_WINDOW (window), _("Preview"));
+
+		/* Reparenting snippet */
+		g_object_ref(widget);
+		widget_parent = gtk_widget_get_parent (widget);
+		if (widget_parent != NULL) gtk_container_remove(GTK_CONTAINER(widget_parent), widget);
+		gtk_container_add(GTK_CONTAINER(window), widget);
+		g_object_unref(widget);
+	}
+
+	g_signal_connect (GTK_OBJECT (window), "destroy", G_CALLBACK (gtk_main_quit), NULL);
+	gtk_widget_show_all (window);	
+}
+
+static GIOChannel *
+channel_from_stream (gint stream)
+{
+	GIOChannel *channel;
+
+	#ifdef WINDOWS
+	channel = g_io_channel_win32_new_fd (stream);
+	#else
+	channel = g_io_channel_unix_new (stream);
+	#endif
+
+	return channel;
+}
+
+static void
+preview_file (gchar *toplevel_name, gchar *file_name)
+{
+	gchar *buffer;
+	gsize length;
+	GError *error = NULL;
+	GIOChannel *input;
+	gint stream;
+
+	stream = fileno (fopen (file_name, "r"));
+	input = channel_from_stream (stream);
+
+	if (g_io_channel_read_to_end (input, &buffer, &length, &error) != G_IO_STATUS_NORMAL)
+	{
+		g_printerr (_("Error: %s.\n"), error->message);
+		g_error_free (error);
+		exit (1);
+	}
+
+	preview_widget (toplevel_name, buffer, length);
+
+	g_free (buffer);
+	g_io_channel_unref (input);
+}
+
+static gchar *
+read_buffer (GIOChannel *source)
+{
+	gchar *buffer;
+	gchar *token;
+	gchar *tmp;
+	GError *error = NULL;
+
+	if (g_io_channel_read_line (source, &token, NULL, NULL, &error) != G_IO_STATUS_NORMAL)
+	{
+		g_printerr (_("Error: %s.\n"), error->message);
+		g_error_free (error);
+		exit (1);
+	}
+
+	/* Check for quit token */
+	if (g_strcmp0 ("<quit>", token) == 0)
+	{
+		g_free (token);
+		return NULL;
+	}
+
+	/* Loop to load the UI */
+	buffer = g_strdup(token);
+	do
+	{
+		g_free (token);
+		if (g_io_channel_read_line (source, &token, NULL, NULL, &error) != G_IO_STATUS_NORMAL)
+		{
+			g_printerr (_("Error: %s.\n"), error->message);
+			g_error_free (error);
+			exit (1);
+		}
+		tmp = buffer;
+		buffer = g_strconcat (buffer, token, NULL);
+		g_free (tmp);
+	} while (g_strcmp0 ("</interface>\n", token) != 0);
+	g_free (token);
+
+	return buffer;
+}
+
+static gboolean
+on_data_incoming (GIOChannel *source, GIOCondition condition, gpointer data)
+{
+	gchar *buffer;
+	gsize length;
+
+	gchar *toplevel_name = (gchar*)data;
+
+	buffer = read_buffer (source);
+	if (buffer == NULL)
+	{
+		gtk_main_quit ();
+		return FALSE;
+	}
+
+	if (condition & G_IO_HUP)
+	{
+		g_printerr (_("Broken pipe!\n"));
+		exit (1);
+	}
+
+	length = strlen (buffer);
+
+	preview_widget (toplevel_name, buffer, length);
+	g_free (buffer);
+
+	return TRUE;
+}
+
+static void
+start_listener (gchar *toplevel_name)
+{
+	GIOChannel *input;
+	gint stream;
+
+	stream = fileno (stdin);
+	input = channel_from_stream (stream);
+
+	g_io_add_watch (input, G_IO_IN|G_IO_HUP, on_data_incoming, toplevel_name);
+}
+
+int main (int argc, char **argv)
+{
+	gchar *file_name;
+	gchar *toplevel_name;
+
+	gtk_set_locale ();
+
+	parse_arguments (argc, argv, &toplevel_name, &file_name);
+
+	if (file_name != NULL)
+	{
+		preview_file (toplevel_name, file_name);
+	} else {
+		start_listener (toplevel_name);
+	}
+
+	gtk_main ();
+
+	return 0;
+}
+