path: root/widgets/text/e-table-text-model.c

/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/* ETableTextModel - Text item model for evolution.
 * Copyright (C) 2000 Ximian, Inc.
 *
 * Author: Chris Lahey <clahey@umich.edu>
 *
 * A majority of code taken from:
 *
 * Text item type for GnomeCanvas widget
 *
 * GnomeCanvas is basically a port of the Tk toolkit's most excellent
 * canvas widget.  Tk is copyrighted by the Regents of the University
 * of California, Sun Microsystems, and other parties.
 *
 * Copyright (C) 1998 The Free Software Foundation
 *
 * Author: Federico Mena <federico@nuclecu.unam.mx> */

#include <config.h>
#include <ctype.h>
#include <gtk/gtksignal.h>
#include "e-table-text-model.h"

static void e_table_text_model_class_init (ETableTextModelClass *class);
static void e_table_text_model_init (ETableTextModel *model);
static void e_table_text_model_destroy (GtkObject *object);

static const gchar *e_table_text_model_get_text (ETextModel *model);
static void e_table_text_model_set_text (ETextModel *model, const gchar *text);
static void e_table_text_model_insert (ETextModel *model, gint postion, const gchar *text);
static void e_table_text_model_insert_length (ETextModel *model, gint postion, const gchar *text, gint length);
static void e_table_text_model_delete (ETextModel *model, gint postion, gint length);

static GtkObject *parent_class;



/**
 * e_table_text_model_get_type:
 * @void: 
 * 
 * Registers the &ETableTextModel class if necessary, and returns the type ID
 * associated to it.
 * 
 * Return value: The type ID of the &ETableTextModel class.
 **/
GtkType
e_table_text_model_get_type (void)
{
    static GtkType model_type = 0;

    if (!model_type) {
        GtkTypeInfo model_info = {
            "ETableTextModel",
            sizeof (ETableTextModel),
            sizeof (ETableTextModelClass),
            (GtkClassInitFunc) e_table_text_model_class_init,
            (GtkObjectInitFunc) e_table_text_model_init,
            NULL, /* reserved_1 */
            NULL, /* reserved_2 */
            (GtkClassInitFunc) NULL
        };

        model_type = gtk_type_unique (e_text_model_get_type (), &model_info);
    }

    return model_type;
}

/* Class initialization function for the text item */
static void
e_table_text_model_class_init (ETableTextModelClass *klass)
{
    GtkObjectClass *object_class;
    ETextModelClass *model_class;

    object_class = (GtkObjectClass *) klass;
    model_class = (ETextModelClass *) klass;

    parent_class = gtk_type_class (e_text_model_get_type ());

    model_class->get_text = e_table_text_model_get_text;
    model_class->set_text = e_table_text_model_set_text;
    model_class->insert = e_table_text_model_insert;
    model_class->insert_length = e_table_text_model_insert_length;
    model_class->delete = e_table_text_model_delete;
    
    object_class->destroy = e_table_text_model_destroy;
}

/* Object initialization function for the text item */
static void
e_table_text_model_init (ETableTextModel *model)
{
    model->model = NULL;
    model->row = 0;
    model->model_col = 0;
    model->cell_changed_signal_id = 0;
    model->row_changed_signal_id = 0;
}

/* Destroy handler for the text item */
static void
e_table_text_model_destroy (GtkObject *object)
{
    ETableTextModel *model;

    g_return_if_fail (object != NULL);
    g_return_if_fail (E_IS_TABLE_TEXT_MODEL (object));

    model = E_TABLE_TEXT_MODEL (object);
    
    if (model->model)
        g_assert (GTK_IS_OBJECT (model->model));

    if (model->cell_changed_signal_id)
        gtk_signal_disconnect (GTK_OBJECT(model->model), 
                      model->cell_changed_signal_id);

    if (model->row_changed_signal_id)
        gtk_signal_disconnect (GTK_OBJECT(model->model), 
                      model->row_changed_signal_id);

    if (model->model)
        gtk_object_unref (GTK_OBJECT(model->model));

    if (GTK_OBJECT_CLASS (parent_class)->destroy)
        (* GTK_OBJECT_CLASS (parent_class)->destroy) (object);
}
static const gchar *
e_table_text_model_get_text (ETextModel *text_model)
{
    ETableTextModel *model = E_TABLE_TEXT_MODEL(text_model);
    if (model->model)
        return (gchar *)e_table_model_value_at (model->model, model->model_col, model->row);
    else
        return "";
}

static void
e_table_text_model_set_text (ETextModel *text_model, const gchar *text)
{
    ETableTextModel *model = E_TABLE_TEXT_MODEL(text_model);
    if (model->model)
        e_table_model_set_value_at (model->model, model->model_col, model->row, (void *) text);
}

static void
e_table_text_model_insert (ETextModel *text_model, gint position, const gchar *text)
{
    ETableTextModel *model = E_TABLE_TEXT_MODEL(text_model);
    if (model->model){
        gchar *temp = (gchar *)e_table_model_value_at (model->model, model->model_col, model->row);
        temp = g_strdup_printf ("%.*s%s%s", position, temp, text, temp + position);
        e_table_model_set_value_at (model->model, model->model_col, model->row, temp);
        g_free (temp);
    }
}

static void
e_table_text_model_insert_length (ETextModel *text_model, gint position, const gchar *text, gint length)
{
    ETableTextModel *model = E_TABLE_TEXT_MODEL(text_model);
    if (model->model){
        gchar *temp = (gchar *)e_table_model_value_at (model->model, model->model_col, model->row);
        temp = g_strdup_printf ("%.*s%.*s%s", position, temp, length, text, temp + position);
        e_table_model_set_value_at (model->model, model->model_col, model->row, temp);
        g_free (temp);
    }
}

static void
e_table_text_model_delete (ETextModel *text_model, gint position, gint length)
{
    ETableTextModel *model = E_TABLE_TEXT_MODEL(text_model);
    if (model->model){
        gchar *temp = (gchar *)e_table_model_value_at (model->model, model->model_col, model->row);
        temp = g_strdup_printf ("%.*s%s", position, temp, temp + position + length);
        e_table_model_set_value_at (model->model, model->model_col, model->row, temp);
        g_free (temp);
    }
}

static void
cell_changed (ETableModel *table_model, int model_col, int row, ETableTextModel *model)
{
    if (model->model_col == model_col &&
        model->row == row)
        e_text_model_changed (E_TEXT_MODEL(model));
}

static void
row_changed (ETableModel *table_model, int row, ETableTextModel *model)
{
    if (model->row == row)
        e_text_model_changed (E_TEXT_MODEL(model));
}

ETableTextModel *
e_table_text_model_new (ETableModel *table_model, int row, int model_col)
{
    ETableTextModel *model;

    g_return_val_if_fail(table_model != NULL, NULL);
    g_return_val_if_fail(E_IS_TABLE_MODEL(table_model), NULL);

    model = gtk_type_new (e_table_text_model_get_type ());
    model->model = table_model;
    if (model->model){
        gtk_object_ref (GTK_OBJECT(model->model));
        model->cell_changed_signal_id = 
            gtk_signal_connect (GTK_OBJECT(model->model),
                       "model_cell_changed",
                       GTK_SIGNAL_FUNC(cell_changed),
                       model);
        model->row_changed_signal_id = 
            gtk_signal_connect (GTK_OBJECT(model->model),
                       "model_row_changed",
                       GTK_SIGNAL_FUNC(row_changed),
                       model);
    }
    model->row = row;
    model->model_col = model_col;
    return model;
}