/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/*
* e-minicard-control.c
*
* Copyright (C) 1999, 2000, 2001, 2002, Ximian, Inc.
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of version 2 of the GNU General Public
* License as published by the Free Software Foundation.
*
* 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:
* Chris Lahey <clahey@ximian.com>
*/
#include <config.h>
#include <string.h>
#include <gtk/gtk.h>
#include <bonobo/bonobo-generic-factory.h>
#include <bonobo/bonobo-persist.h>
#include <bonobo/bonobo-persist-stream.h>
#include <bonobo/bonobo-stream-client.h>
#include <gal/util/e-util.h>
#include <addressbook/gui/component/addressbook.h>
#include <addressbook/backend/ebook/e-book.h>
#include <addressbook/backend/ebook/e-book-util.h>
#include <addressbook/backend/ebook/e-card.h>
#include "e-minicard-control.h"
#include "e-minicard-widget.h"
#include "e-card-merging.h"
typedef struct {
EMinicardWidget *minicard;
GList *card_list;
GtkWidget *label;
} EMinicardControl;
#define MINICARD_CONTROL_ID "OAFIID:GNOME_Evolution_Addressbook_MiniCard_Control"
#if 0
enum {
PROP_RUNNING
} MyArgs;
#define RUNNING_KEY "Clock::Running"
static void
get_prop (BonoboPropertyBag *bag,
BonoboArg *arg,
guint arg_id,
CORBA_Environment *ev,
gpointer user_data)
{
GObject *clock = user_data;
switch (arg_id) {
case PROP_RUNNING:
{
gboolean b = GPOINTER_TO_UINT (g_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,
CORBA_Environment *ev,
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);
g_object_set_data (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 char *
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 + 1);
memcpy (data + length, buffer->_buffer, buffer->_length);
length += buffer->_length;
CORBA_free (buffer);
} while (1);
CORBA_free (buffer);
CORBA_exception_free (&ev);
if (data)
data[length] = '\0';
else
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)
{
GList *list;
char *vcard;
EMinicardControl *minicard_control = data;
if (type && g_ascii_strcasecmp (type, "text/vCard") != 0 &&
g_ascii_strcasecmp (type, "text/x-vCard") != 0) {
CORBA_exception_set (ev, CORBA_USER_EXCEPTION,
ex_Bonobo_Persist_WrongDataType, NULL);
return;
}
if ((vcard = stream_read (stream)) == NULL) {
CORBA_exception_set (ev, CORBA_USER_EXCEPTION,
ex_Bonobo_Persist_FileNotFound, NULL);
return;
}
e_free_object_list (minicard_control->card_list);
list = e_card_load_cards_from_string_with_default_charset(vcard, "ISO-8859-1");
g_free(vcard);
minicard_control->card_list = list;
if (list)
g_object_set(minicard_control->minicard,
"card", list->data,
NULL);
if (list && list->next) {
char *message;
int length = g_list_length (list) - 1;
if (length > 1) {
message = g_strdup_printf (_("and %d other cards."), length);
} else {
message = g_strdup_printf (_("and one other card."));
}
gtk_label_set_text (GTK_LABEL (minicard_control->label), message);
g_free (message);
gtk_widget_show (minicard_control->label);
} else {
gtk_widget_hide (minicard_control->label);
}
} /* 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)
{
EMinicardControl *minicard_control = data;
char *vcard;
int length;
if (type && g_ascii_strcasecmp (type, "text/vCard") != 0 &&
g_ascii_strcasecmp (type, "text/x-vCard") != 0) {
CORBA_exception_set (ev, CORBA_USER_EXCEPTION,
ex_Bonobo_Persist_WrongDataType, NULL);
return;
}
vcard = e_card_list_get_vcard(minicard_control->card_list);
length = strlen (vcard);
bonobo_stream_client_write (stream, vcard, length, ev);
g_free (vcard);
} /* pstream_save */
static Bonobo_Persist_ContentTypeList *
pstream_get_content_types (BonoboPersistStream *ps, void *closure,
CORBA_Environment *ev)
{
return bonobo_persist_generate_content_types (2, "text/vCard", "text/x-vCard");
}
static void
book_open_cb (EBook *book, EBookStatus status, gpointer closure)
{
GList *list = closure;
if (status == E_BOOK_STATUS_SUCCESS) {
GList *p;
for (p = list; p; p = p->next) {
e_card_merging_book_add_card(book, p->data, NULL, NULL);
}
}
if (book)
g_object_unref (book);
e_free_object_list (list);
}
static void
save_in_addressbook(GtkWidget *button, gpointer data)
{
EMinicardControl *minicard_control = data;
GList *list, *p;
EBook *book;
book = e_book_new ();
list = g_list_copy (minicard_control->card_list);
for (p = list; p; p = p->next)
g_object_ref (p->data);
addressbook_load_default_book (book, book_open_cb, list);
}
static void
free_struct (gpointer data, GObject *where_object_was)
{
EMinicardControl *minicard_control = data;
e_free_object_list (minicard_control->card_list);
g_free (minicard_control);
}
BonoboControl *
e_minicard_control_new (void)
{
#if 0
BonoboPropertyBag *pb;
#endif
BonoboControl *control;
BonoboPersistStream *stream;
GtkWidget *minicard;
GtkWidget *button;
GtkWidget *label;
GtkWidget *vbox;
EMinicardControl *minicard_control = g_new (EMinicardControl, 1);
minicard_control->card_list = NULL;
minicard_control->minicard = NULL;
minicard_control->label = NULL;
/* Create the control. */
minicard = e_minicard_widget_new ();
gtk_widget_show (minicard);
minicard_control->minicard = E_MINICARD_WIDGET (minicard);
/* This is intentionally not shown. */
label = gtk_label_new ("");
minicard_control->label = label;
button = gtk_button_new_with_label(_("Save in addressbook"));
g_signal_connect (button, "clicked",
G_CALLBACK (save_in_addressbook), minicard_control);
gtk_widget_show (button);
vbox = gtk_vbox_new(FALSE, 0);
gtk_box_pack_start(GTK_BOX(vbox), minicard, TRUE, TRUE, 0);
gtk_box_pack_start(GTK_BOX(vbox), label, FALSE, FALSE, 0);
gtk_box_pack_start(GTK_BOX(vbox), button, FALSE, FALSE, 0);
gtk_widget_show (vbox);
control = bonobo_control_new (vbox);
g_object_weak_ref (G_OBJECT (control), free_struct, minicard_control);
stream = bonobo_persist_stream_new (pstream_load, pstream_save,
pstream_get_content_types,
MINICARD_CONTROL_ID,
minicard_control);
#if 0
/* Create the properties. */
pb = bonobo_property_bag_new (get_prop, set_prop, clock);
bonobo_control_set_properties (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 control;
}
