New files for using a minicard as a widget or a bonobo control.

2000-07-18  Christopher James Lahey  <clahey@helixcode.com>

	* gui/minicard/e-minicard-control.c,
	gui/minicard/e-minicard-control.h,
	gui/minicard/e-minicard-widget.c,
	gui/minicard/e-minicard-widget.h: New files for using a minicard
	as a widget or a bonobo control.

svn path=/trunk/; revision=4209

1 files changed, 307 insertions, 0 deletions

diff --git a/addressbook/gui/widgets/e-minicard-control.c b/addressbook/gui/widgets/e-minicard-control.c
new file mode 100644
index 0000000000..8cac2dc15e
--- /dev/null
+++ b/addressbook/gui/widgets/e-minicard-control.c
@@ -0,0 +1,307 @@
+/*
+ * e-minicard-control.c
+ *
+ * Authors:
+ *    Chris Lahey <clahey@helixcode.com>
+ *
+ * Copyright 1999, 2000, Helix Code, Inc.
+ */
+
+#include <config.h>
+#include <gnome.h>
+#include <bonobo.h>
+
+#include "e-minicard-factory.h"
+
+#if 0
+enum {
+	PROP_RUNNING
+} MyArgs;
+
+#define RUNNING_KEY  "Clock::Running"
+
+static void
+get_prop (BonoboPropertyBag *bag,
+	  BonoboArg         *arg,
+	  guint              arg_id,
+	  gpointer           user_data)
+{
+	GtkObject *clock = user_data;
+
+	switch (arg_id) {
+
+	case PROP_RUNNING:
+	{
+		gboolean b = GPOINTER_TO_UINT (gtk_object_get_data (clock, RUNNING_KEY));
+		BONOBO_ARG_SET_BOOLEAN (arg, b);
+		break;
+	}
+
+	default:
+		g_warning ("Unhandled arg %d", arg_id);
+		break;
+	}
+}
+
+static void
+set_prop (BonoboPropertyBag *bag,
+	  const BonoboArg   *arg,
+	  guint              arg_id,
+	  gpointer           user_data)
+{
+	GtkClock *clock = user_data;
+
+	switch (arg_id) {
+
+	case PROP_RUNNING:
+	{
+		guint i;
+
+		i = BONOBO_ARG_GET_BOOLEAN (arg);
+
+		if (i)
+			gtk_clock_start (clock);
+		else
+			gtk_clock_stop (clock);
+
+		gtk_object_set_data (GTK_OBJECT (clock), RUNNING_KEY,
+				     GUINT_TO_POINTER (i));
+		break;
+	}
+
+	default:
+		g_warning ("Unhandled arg %d", arg_id);
+		break;
+	}
+}
+#endif
+
+/*
+ * Bonobo::PersistStream
+ *
+ * These two functions implement the Bonobo::PersistStream load and
+ * save methods which allow data to be loaded into and out of the
+ * BonoboObject.
+ */
+static int
+stream_read (Bonobo_Stream stream)
+{
+	Bonobo_Stream_iobuf *buffer;
+	CORBA_Environment    ev;
+	char *data = NULL;
+	gint length = 0;
+
+	CORBA_exception_init (&ev);
+	do {
+#define READ_CHUNK_SIZE 65536
+		Bonobo_Stream_read (stream, READ_CHUNK_SIZE,
+				    &buffer, &ev);
+
+		if (ev._major != CORBA_NO_EXCEPTION) {
+			CORBA_exception_free (&ev);
+			return NULL;
+		}
+
+		if (buffer->_length <= 0)
+			break;
+
+		data = g_realloc (data,
+				  length + buffer->_length);
+
+		memcpy (data + length,
+			buffer->_buffer, buffer->_length);
+
+		length += buffer->_length;
+
+		CORBA_free (buffer);
+	} while (1);
+
+	CORBA_free (buffer);
+	CORBA_exception_free (&ev);
+
+	if (data == NULL)
+	  data = g_strdup("");
+
+	return data;
+} /* stream_read */
+
+/*
+ * This function implements the Bonobo::PersistStream:load method.
+ */
+static void
+pstream_load (BonoboPersistStream *ps, const Bonobo_Stream stream,
+	      Bonobo_Persist_ContentType type, void *data,
+	      CORBA_Environment *ev)
+{
+	ECard *card;
+	char *vcard;
+	GtkWidget *minicard = data;
+
+	if (*type && g_strcasecmp (type, "text/plain") != 0 && 
+	    g_strcasecmp (type, "text/x-vCard") != 0) {	    
+		CORBA_exception_set (ev, CORBA_USER_EXCEPTION,
+				     ex_Bonobo_Persist_WrongDataType, NULL);
+		return;
+	}
+
+	if ((vcard = stream_read (stream, embeddable_data)) == NULL) {
+		CORBA_exception_set (ev, CORBA_USER_EXCEPTION,
+				     ex_Bonobo_Persist_FileNotFound, NULL);
+		return;
+	}
+
+	card = e_card_new(vcard);
+	g_free(vcard);
+	gtk_object_set(GTK_OBJECT(minicard),
+		       "card", card,
+		       NULL);
+	gtk_object_unref(GTK_OBJECT(card));
+} /* pstream_load */
+
+/*
+ * This function implements the Bonobo::PersistStream:save method.
+ */
+static void
+pstream_save (BonoboPersistStream *ps, const Bonobo_Stream stream,
+	      Bonobo_Persist_ContentType type, void *data,
+	      CORBA_Environment *ev)
+{
+	Bonobo_Stream_iobuf *buffer;
+	size_t               pos;
+	char                *vcard;
+	ECard               *card;
+	EMinicardWidget     *minicard = data;
+	int                  length;
+
+	if (*type && g_strcasecmp (type, "text/plain") != 0 && 
+	    g_strcasecmp (type, "text/x-vCard") != 0) {	    
+		CORBA_exception_set (ev, CORBA_USER_EXCEPTION,
+				     ex_Bonobo_Persist_WrongDataType, NULL);
+		return;
+	}
+
+	buffer = Bonobo_Stream_iobuf__alloc ();
+	
+	gtk_object_get(GTK_OBJECT(minicard),
+		       "card", &card,
+		       NULL);
+	vcard = e_card_get_vcard(card);
+	length = strlen(vcard);
+	data = CORBA_sequence_CORBA_octet_allocbuf (length);
+	memcpy (data, vcard, length);
+
+	buffer->_buffer = data;
+	buffer->_length = length;
+
+	g_free(vcard);
+
+	pos = 0;
+	
+	while (pos < length) {
+		CORBA_long bytes_read;
+
+		bytes_read = Bonobo_Stream_write (stream, buffer, ev);
+
+		if (ev->_major != CORBA_NO_EXCEPTION) {
+			CORBA_free (buffer);
+			CORBA_free (data);
+			return;
+		}
+
+		pos += bytes_read;
+	}
+
+	CORBA_free (buffer);
+	CORBA_free (data);
+} /* pstream_save */
+
+static CORBA_long
+pstream_get_max_size (BonoboPersistStream *ps, void *data,
+		      CORBA_Environment *ev)
+{
+  GtkWidget *minicard = data;
+  ECard *card;
+  char *vcard;
+  
+  gtk_object_get(GTK_OBJECT(minicard),
+		 "card", &card,
+		 NULL);
+  vcard = e_card_get_vcard(card);
+  length = strlen(vcard);
+  g_free(vcard);
+
+  return length;
+}
+
+static Bonobo_Persist_ContentTypeList *
+pstream_get_content_types (BonoboPersistStream *ps, void *closure,
+			   CORBA_Environment *ev)
+{
+	return bonobo_persist_generate_content_types (2, "text/plain", "text/x-vCard");
+}
+
+static BonoboObject *
+e_minicard_factory (BonoboGenericFactory *Factory, void *closure)
+{
+#if 0
+	BonoboPropertyBag  *pb;
+#endif
+	BonoboControl      *control;
+	BonoboPersistStream *stream;
+	GtkWidget	   *minicard;
+
+	/* Create the control. */
+	minicard = e_minicard_widget_new ();
+	gtk_widget_show (minicard);
+
+	control = bonobo_control_new (minicard);
+
+	stream = bonobo_persist_stream_new (pstream_load, pstream_save,
+					    pstream_get_max_size,
+					    pstream_get_content_types,
+					    minicard);
+
+#if 0
+	/* Create the properties. */
+	pb = bonobo_property_bag_new (get_prop, set_prop, clock);
+	bonobo_control_set_property_bag (control, pb);
+
+	bonobo_property_bag_add (pb, "running", PROP_RUNNING,
+				 BONOBO_ARG_BOOLEAN, NULL,
+				 "Whether or not the clock is running", 0);
+#endif
+
+	if (stream == NULL) {
+		bonobo_object_unref (BONOBO_OBJECT (control));
+		return NULL;
+	}
+
+	bonobo_object_add_interface (BONOBO_OBJECT (control),
+				    BONOBO_OBJECT (stream));
+
+	return BONOBO_OBJECT (control);
+}
+
+void
+e_minicard_factory_init (void)
+{
+	static BonoboGenericFactory *e_minicard_factory = NULL;
+
+	if (e_minicard_factory != NULL)
+		return;
+
+#if USING_OAF
+	e_minicard_factory =
+		bonobo_generic_factory_new (
+			"OAFIID:e_minicard_factory:f9542709-fb31-4c6a-bc00-d462ba41e4b9",
+			e_minicard_factory, NULL);
+#else
+	e_minicard_factory =
+		bonobo_generic_factory_new (
+			"control-factory:e-minicard",
+			e_minicard_factory, NULL);
+#endif
+
+	if (e_minicard_factory == NULL)
+		g_error ("I could not register a EMinicard factory.");
+}