path: root/calendar/gui/itip-control-factory.c

/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/* Evolution calendar - Control for displaying iTIP mail messages
 *
 * Copyright (C) 2000 Ximian, Inc.
 * Copyright (C) 2000 Ximian, Inc.
 *
 * Author: Jesse Pavel <jpavel@ximian.com>
 *
 * 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.
 */

#include <config.h>
#include <glib.h>
#include <gtk/gtkobject.h>
#include <gtk/gtkwidget.h>
#include <bonobo/bonobo-generic-factory.h>
#include <bonobo/bonobo-control.h>
#include <bonobo/bonobo-property-bag.h>
#include <bonobo/bonobo-persist-stream.h>
#include <bonobo/bonobo-stream-client.h>
#include <bonobo/bonobo-context.h>
#include <ical.h>

#include "e-itip-control.h"
#include "itip-control-factory.h"

extern gchar *evolution_dir;

enum E_ITIP_BONOBO_ARGS {
    FROM_ADDRESS_ARG_ID,
};

/*
 * 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;
    gchar *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;
        data[length] = '\0';
        
        CORBA_free (buffer);
#undef READ_CHUNK_SIZE
    } 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)
{
    EItipControl *itip = data;
    gchar *text;
    
    if (type && g_strcasecmp (type, "text/calendar") != 0 &&        
        g_strcasecmp (type, "text/x-calendar") != 0) {      
        CORBA_exception_set (ev, CORBA_USER_EXCEPTION,
                     ex_Bonobo_Persist_WrongDataType, NULL);
        return;
    }

    if ((text = stream_read (stream)) == NULL) {
        CORBA_exception_set (ev, CORBA_USER_EXCEPTION,
                     ex_Bonobo_Persist_FileNotFound, NULL);
        return;
    }

    e_itip_control_set_data (itip, text);
    g_free (text);
}
/*
 * 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)
{
    EItipControl *itip = data;
    gchar *text;
    gint len;

    if (type && g_strcasecmp (type, "text/calendar") != 0 &&        
        g_strcasecmp (type, "text/x-calendar") != 0) {      
        CORBA_exception_set (ev, CORBA_USER_EXCEPTION,
                     ex_Bonobo_Persist_WrongDataType, NULL);
        return;
    }

    text = e_itip_control_get_data (itip);
    len = e_itip_control_get_data_size (itip);

    bonobo_stream_client_write (stream, text, len, ev);
    g_free (text);
} /* pstream_save */

static CORBA_long
pstream_get_max_size (BonoboPersistStream *ps, void *data,
              CORBA_Environment *ev)
{
    EItipControl *itip = data;
    gint len;
    
    len = e_itip_control_get_data_size (itip);
    
    if (len > 0)
        return len;

    return 0L;
}

static Bonobo_Persist_ContentTypeList *
pstream_get_content_types (BonoboPersistStream *ps, void *closure,
               CORBA_Environment *ev)
{
    return bonobo_persist_generate_content_types (2, "text/calendar", "text/x-calendar");
}

static void
get_prop (BonoboPropertyBag *bag, 
       BonoboArg *arg,
       guint arg_id,          
       CORBA_Environment *ev,
       gpointer user_data)
{
    EItipControl *itip = user_data;

    switch (arg_id) {
    case FROM_ADDRESS_ARG_ID:
        BONOBO_ARG_SET_STRING (arg, e_itip_control_get_from_address (itip));
        break;
    }
}

static void
set_prop ( BonoboPropertyBag *bag, 
       const BonoboArg *arg,
       guint arg_id, 
       CORBA_Environment *ev,
       gpointer user_data)
{
    EItipControl *itip = user_data;

    switch (arg_id) {
    case FROM_ADDRESS_ARG_ID:
        e_itip_control_set_from_address (itip, BONOBO_ARG_GET_STRING (arg));
        break;
    }
}


static BonoboObject *
itip_control_factory (BonoboGenericFactory *Factory, void *closure)
{
    BonoboControl      *control;
    BonoboPropertyBag *prop_bag;
    BonoboPersistStream *stream;
    GtkWidget *itip;

    itip = e_itip_control_new ();
    gtk_widget_show (itip);
    control = bonobo_control_new (itip);
    
    /* create a property bag */
    prop_bag = bonobo_property_bag_new (get_prop, set_prop, itip);
    bonobo_property_bag_add (prop_bag, "from_address", FROM_ADDRESS_ARG_ID, BONOBO_ARG_STRING, NULL,
                 "from_address", 0 );

    bonobo_control_set_properties (control, prop_bag);
    bonobo_object_unref (BONOBO_OBJECT (prop_bag));

    bonobo_control_set_automerge (control, TRUE);

    stream = bonobo_persist_stream_new (pstream_load, pstream_save,
                        pstream_get_max_size,
                        pstream_get_content_types,
                        itip);

    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
itip_control_factory_init (void)
{
    static BonoboGenericFactory *factory = NULL;

    if (factory != NULL)
        return;

    factory = bonobo_generic_factory_new (
        "OAFIID:GNOME_Evolution_Calendar_iTip_ControlFactory",
        itip_control_factory, NULL);
    bonobo_running_context_auto_exit_unref (BONOBO_OBJECT (factory));;
    
    if (factory == NULL)
        g_error ("I could not register an iTip control factory.");
}