path: root/composer/listener.c

/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/*  This file is part of gnome-spell bonobo component

    Copyright (C) 2000 Helix Code, Inc.
    Authors:           Radek Doulik <rodo@helixcode.com>

    This library is free software; you can redistribute it and/or
    modify it under the terms of the GNU Library General Public
    License as published by the Free Software Foundation; either
    version 2 of the License, or (at your option) any later version.

    This library 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
    Library General Public License for more details.

    You should have received a copy of the GNU Library General Public License
    along with this library; see the file COPYING.LIB.  If not, write to
    the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
    Boston, MA 02111-1307, USA.
*/

#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

#include <bonobo/bonobo-arg.h>
#include <bonobo/bonobo-object.h>

#include "listener.h"

static BonoboObjectClass *listener_parent_class;
static POA_GNOME_GtkHTML_Editor_Listener__vepv listener_vepv;

inline static EditorListener *
listener_from_servant (PortableServer_Servant servant)
{
    return EDITOR_LISTENER (bonobo_object_from_servant (servant));
}

static CORBA_any *
get_any_null ()
{
    CORBA_any *rv;

    rv = CORBA_any__alloc ();
    rv->_type = TC_null;

    return rv;
}

static gchar *
resolve_image_url (EditorListener *l, gchar *url)
{
    gchar *cid = NULL;

    printf ("resolve_image_url %s\n", url);

    if (!strncmp (url, "file:", 5)) {
        gchar *id;

        id = (gchar *) g_hash_table_lookup (l->composer->inline_images, url + 5);
        if (!id) {
            id = header_msgid_generate ();
            g_hash_table_insert (l->composer->inline_images, g_strdup (url + 5), id);
        }
        cid = g_strconcat ("cid:", id, NULL);
        printf ("resolved to %s\n", cid);
    }

    return cid;
}

static void
reply_indent (EditorListener *l, CORBA_Environment * ev)
{
    if (!GNOME_GtkHTML_Editor_Engine_isParagraphEmpty (l->composer->editor_engine, ev)) {
        if (GNOME_GtkHTML_Editor_Engine_isPreviousParagraphEmpty (l->composer->editor_engine, ev))
            GNOME_GtkHTML_Editor_Engine_runCommand (l->composer->editor_engine, "cursor-backward", ev);
        else {
            GNOME_GtkHTML_Editor_Engine_runCommand (l->composer->editor_engine, "insert-paragraph", ev);
            return;
        }
            
    }

    GNOME_GtkHTML_Editor_Engine_runCommand (l->composer->editor_engine, "style-normal", ev);
    GNOME_GtkHTML_Editor_Engine_runCommand (l->composer->editor_engine, "indent-zero", ev);
    GNOME_GtkHTML_Editor_Engine_runCommand (l->composer->editor_engine, "cursor-position-save", ev);
    GNOME_GtkHTML_Editor_Engine_runCommand (l->composer->editor_engine, "select-paragraph-extended", ev);
    GNOME_GtkHTML_Editor_Engine_runCommand (l->composer->editor_engine, "text-default-color", ev);
    GNOME_GtkHTML_Editor_Engine_runCommand (l->composer->editor_engine, "italic-off", ev);
    GNOME_GtkHTML_Editor_Engine_runCommand (l->composer->editor_engine, "disable-selection", ev);
    GNOME_GtkHTML_Editor_Engine_runCommand (l->composer->editor_engine, "cursor-position-restore", ev);
}

static void
clear_signature (GNOME_GtkHTML_Editor_Engine e, CORBA_Environment * ev)
{
    if (GNOME_GtkHTML_Editor_Engine_isParagraphEmpty (e, ev))
        GNOME_GtkHTML_Editor_Engine_setParagraphData (e, "signature", "0", ev);
    else if (GNOME_GtkHTML_Editor_Engine_isPreviousParagraphEmpty (e, ev)
         && GNOME_GtkHTML_Editor_Engine_runCommand (e, "cursor-backward", ev)) {
        GNOME_GtkHTML_Editor_Engine_setParagraphData (e, "signature", "0", ev);
        GNOME_GtkHTML_Editor_Engine_runCommand (e, "cursor-forward", ev);
    }
}

static CORBA_any *
impl_event (PortableServer_Servant _servant,
        const CORBA_char * name, const CORBA_any * arg,
        CORBA_Environment * ev)
{
    EditorListener *l = listener_from_servant (_servant);
    CORBA_any  *rv = NULL;

    /* printf ("impl_event\n"); */

    if (!strcmp (name, "command")) {
        if (!l->composer->in_signature_insert) {
            CORBA_char *orig, *signature;
            /* FIXME check for insert-paragraph command */
            orig = GNOME_GtkHTML_Editor_Engine_getParagraphData (l->composer->editor_engine, "orig", ev);
            if (ev->_major == CORBA_NO_EXCEPTION) {
                if (orig && *orig == '1')
                    reply_indent (l, ev);
                GNOME_GtkHTML_Editor_Engine_setParagraphData (l->composer->editor_engine, "orig", "0", ev);
            }
            signature = GNOME_GtkHTML_Editor_Engine_getParagraphData (l->composer->editor_engine, "signature", ev);
            if (ev->_major == CORBA_NO_EXCEPTION) {
                if (signature && *signature == '1')
                    clear_signature (l->composer->editor_engine, ev);
            }
        }
    } else if (!strcmp (name, "image_url")) {
        gchar *url;

        if ((url = resolve_image_url (l, BONOBO_ARG_GET_STRING (arg)))) {
            rv = bonobo_arg_new (TC_string);
            BONOBO_ARG_SET_STRING (rv, url);
            /* printf ("new url: %s\n", url); */
            g_free (url);
        }
    }

    return rv ? rv : get_any_null ();
}

POA_GNOME_GtkHTML_Editor_Listener__epv *
listener_get_epv (void)
{
    POA_GNOME_GtkHTML_Editor_Listener__epv *epv;

    epv = g_new0 (POA_GNOME_GtkHTML_Editor_Listener__epv, 1);

    epv->event = impl_event;

    return epv;
}

static void
init_listener_corba_class (void)
{
    listener_vepv.Bonobo_Unknown_epv            = bonobo_object_get_epv ();
    listener_vepv.GNOME_GtkHTML_Editor_Listener_epv = listener_get_epv ();
}

static void
listener_class_init (EditorListenerClass *klass)
{
    listener_parent_class = gtk_type_class (bonobo_object_get_type ());

    init_listener_corba_class ();
}

GtkType
listener_get_type (void)
{
    static GtkType type = 0;

    if (!type){
        GtkTypeInfo info = {
            "EditorListener",
            sizeof (EditorListener),
            sizeof (EditorListenerClass),
            (GtkClassInitFunc) listener_class_init,
            (GtkObjectInitFunc) NULL,
            NULL, /* reserved 1 */
            NULL, /* reserved 2 */
            (GtkClassInitFunc) NULL
        };

        type = gtk_type_unique (bonobo_object_get_type (), &info);
    }

    return type;
}

EditorListener *
listener_construct (EditorListener *listener, GNOME_GtkHTML_Editor_Listener corba_listener)
{
    g_return_val_if_fail (listener != NULL, NULL);
    g_return_val_if_fail (IS_EDITOR_LISTENER (listener), NULL);
    g_return_val_if_fail (corba_listener != CORBA_OBJECT_NIL, NULL);

    if (!bonobo_object_construct (BONOBO_OBJECT (listener), (CORBA_Object) corba_listener))
        return NULL;

    return listener;
}

static GNOME_GtkHTML_Editor_Listener
create_listener (BonoboObject *listener)
{
    POA_GNOME_GtkHTML_Editor_Listener *servant;
    CORBA_Environment ev;

    servant = (POA_GNOME_GtkHTML_Editor_Listener *) g_new0 (BonoboObjectServant, 1);
    servant->vepv = &listener_vepv;

    CORBA_exception_init (&ev);
    POA_GNOME_GtkHTML_Editor_Listener__init ((PortableServer_Servant) servant, &ev);
    ORBIT_OBJECT_KEY(servant->_private)->object = NULL;

    if (ev._major != CORBA_NO_EXCEPTION){
        g_free (servant);
        CORBA_exception_free (&ev);
        return CORBA_OBJECT_NIL;
    }

    CORBA_exception_free (&ev);

    return (GNOME_GtkHTML_Editor_Listener) bonobo_object_activate_servant (listener, servant);
}

EditorListener *
listener_new (EMsgComposer *composer)
{
    EditorListener *listener;
    GNOME_GtkHTML_Editor_Listener corba_listener;

    listener = gtk_type_new (EDITOR_LISTENER_TYPE);
    listener->composer = composer;

    corba_listener = create_listener (BONOBO_OBJECT (listener));

    if (corba_listener == CORBA_OBJECT_NIL) {
        bonobo_object_unref (BONOBO_OBJECT (listener));
        return NULL;
    }
    
    return listener_construct (listener, corba_listener);
}