path: root/widgets/misc/e-selection-model.c

/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/*
 * e-selection-model.c
 * Copyright 2000, 2001, Ximian, Inc.
 *
 * Authors:
 *   Chris Lahey <clahey@ximian.com>
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Library General Public
 * License, version 2, as published by the Free Software Foundation.
 *
 * 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; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
 * 02111-1307, USA.
 */

#include <config.h>

#include <gdk/gdkkeysyms.h>

#include "e-util/e-i18n.h"
#include "e-util/e-util-marshal.h"
#include "e-util/e-util.h"

#include "e-selection-model.h"

#define PARENT_TYPE G_TYPE_OBJECT

static GObjectClass *e_selection_model_parent_class;

enum {
    CURSOR_CHANGED,
    CURSOR_ACTIVATED,
    SELECTION_CHANGED,
    SELECTION_ROW_CHANGED,
    LAST_SIGNAL
};

static guint e_selection_model_signals [LAST_SIGNAL] = { 0, };

enum {
    PROP_0,
    PROP_SORTER,
    PROP_SELECTION_MODE,
    PROP_CURSOR_MODE
};

inline static void
add_sorter(ESelectionModel *esm, ESorter *sorter)
{
    esm->sorter = sorter;
    if (sorter) {
        g_object_ref (sorter);
    }
}

inline static void
drop_sorter(ESelectionModel *esm)
{
    if (esm->sorter) {
        g_object_unref (esm->sorter);
    }
    esm->sorter = NULL;
}

static void
esm_dispose (GObject *object)
{
    ESelectionModel *esm;

    esm = E_SELECTION_MODEL (object);

    drop_sorter(esm);

    if (e_selection_model_parent_class->dispose)
        (* e_selection_model_parent_class->dispose) (object);
}

static void
esm_get_property (GObject *object, guint prop_id, GValue *value, GParamSpec *pspec)
{
    ESelectionModel *esm = E_SELECTION_MODEL (object);

    switch (prop_id){
    case PROP_SORTER:
        g_value_set_object (value, esm->sorter);
        break;

    case PROP_SELECTION_MODE:
        g_value_set_int (value, esm->mode);
        break;

    case PROP_CURSOR_MODE:
        g_value_set_int (value, esm->cursor_mode);
        break;
    }
}

static void
esm_set_property (GObject *object, guint prop_id, const GValue *value, GParamSpec *pspec)
{
    ESelectionModel *esm = E_SELECTION_MODEL (object);
    
    switch (prop_id){
    case PROP_SORTER:
        drop_sorter(esm);
        add_sorter(esm, g_value_get_object (value) ? E_SORTER(g_value_get_object(value)) : NULL);
        break;

    case PROP_SELECTION_MODE:
        esm->mode = g_value_get_int (value);
        if (esm->mode == GTK_SELECTION_SINGLE) {
            int cursor_row = e_selection_model_cursor_row(esm);
            int cursor_col = e_selection_model_cursor_col(esm);
            e_selection_model_do_something(esm, cursor_row, cursor_col, 0);
        }
        break;

    case PROP_CURSOR_MODE:
        esm->cursor_mode = g_value_get_int (value);
        break;
    }
}

static void
e_selection_model_init (ESelectionModel *selection)
{
    selection->mode = GTK_SELECTION_MULTIPLE;
    selection->cursor_mode = E_CURSOR_SIMPLE;
    selection->old_selection = -1;
}

static void
e_selection_model_class_init (ESelectionModelClass *klass)
{
    GObjectClass *object_class;

    e_selection_model_parent_class = g_type_class_ref (PARENT_TYPE);

    object_class = G_OBJECT_CLASS(klass);

    object_class->dispose = esm_dispose;
    object_class->get_property = esm_get_property;
    object_class->set_property = esm_set_property;

    e_selection_model_signals [CURSOR_CHANGED] =
        g_signal_new ("cursor_changed",
                  G_OBJECT_CLASS_TYPE (object_class),
                  G_SIGNAL_RUN_LAST,
                  G_STRUCT_OFFSET (ESelectionModelClass, cursor_changed),
                  NULL, NULL,
                  e_util_marshal_NONE__INT_INT,
                  G_TYPE_NONE, 2, G_TYPE_INT, G_TYPE_INT);

    e_selection_model_signals [CURSOR_ACTIVATED] =
        g_signal_new ("cursor_activated",
                  G_OBJECT_CLASS_TYPE (object_class),
                  G_SIGNAL_RUN_LAST,
                  G_STRUCT_OFFSET (ESelectionModelClass, cursor_activated),
                  NULL, NULL,
                  e_util_marshal_NONE__INT_INT,
                  G_TYPE_NONE, 2, G_TYPE_INT, G_TYPE_INT);

    e_selection_model_signals [SELECTION_CHANGED] =
        g_signal_new ("selection_changed",
                  G_OBJECT_CLASS_TYPE (object_class),
                  G_SIGNAL_RUN_LAST,
                  G_STRUCT_OFFSET (ESelectionModelClass, selection_changed),
                  NULL, NULL,
                  e_util_marshal_NONE__NONE,
                  G_TYPE_NONE, 0);

    e_selection_model_signals [SELECTION_ROW_CHANGED] =
        g_signal_new ("selection_row_changed",
                  G_OBJECT_CLASS_TYPE (object_class),
                  G_SIGNAL_RUN_LAST,
                  G_STRUCT_OFFSET (ESelectionModelClass, selection_row_changed),
                  NULL, NULL,
                  e_util_marshal_NONE__INT,
                  G_TYPE_NONE, 1, G_TYPE_INT);

    klass->cursor_changed        = NULL;
    klass->cursor_activated      = NULL;
    klass->selection_changed     = NULL;
    klass->selection_row_changed = NULL;

    klass->is_row_selected       = NULL;
    klass->foreach               = NULL;
    klass->clear                 = NULL;
    klass->selected_count        = NULL;
    klass->select_all            = NULL;
    klass->invert_selection      = NULL;
    klass->row_count             = NULL;

    klass->change_one_row        = NULL;
    klass->change_cursor         = NULL;
    klass->cursor_row            = NULL;
    klass->cursor_col            = NULL;

    klass->select_single_row     = NULL;
    klass->toggle_single_row     = NULL;
    klass->move_selection_end    = NULL;
    klass->set_selection_end     = NULL;

    g_object_class_install_property (object_class, PROP_SORTER, 
                     g_param_spec_object ("sorter",
                                  _("Sorter"),
                                  /*_( */"XXX blurb" /*)*/,
                                  E_SORTER_TYPE,
                                  G_PARAM_READWRITE));

    g_object_class_install_property (object_class, PROP_SELECTION_MODE, 
                     g_param_spec_int ("selection_mode",
                               _("Selection Mode"),
                               /*_( */"XXX blurb" /*)*/,
                               GTK_SELECTION_NONE, GTK_SELECTION_MULTIPLE,
                               GTK_SELECTION_SINGLE,
                               G_PARAM_READWRITE));

    g_object_class_install_property (object_class, PROP_CURSOR_MODE, 
                     g_param_spec_int ("cursor_mode",
                               _("Cursor Mode"),
                               /*_( */"XXX blurb" /*)*/,
                               E_CURSOR_LINE, E_CURSOR_SPREADSHEET,
                               E_CURSOR_LINE,
                               G_PARAM_READWRITE));
}

E_MAKE_TYPE(e_selection_model, "ESelectionModel", ESelectionModel,
        e_selection_model_class_init, e_selection_model_init, PARENT_TYPE)

/** 
 * e_selection_model_is_row_selected
 * @selection: #ESelectionModel to check
 * @n: The row to check
 *
 * This routine calculates whether the given row is selected.
 *
 * Returns: %TRUE if the given row is selected
 */
gboolean
e_selection_model_is_row_selected (ESelectionModel *selection,
                   gint                 n)
{
    if (E_SELECTION_MODEL_GET_CLASS(selection)->is_row_selected)
        return E_SELECTION_MODEL_GET_CLASS(selection)->is_row_selected (selection, n);
    else
        return FALSE;
}

/** 
 * e_selection_model_foreach
 * @selection: #ESelectionModel to traverse
 * @callback: The callback function to call back.
 * @closure: The closure
 *
 * This routine calls the given callback function once for each
 * selected row, passing closure as the closure.
 */
void 
e_selection_model_foreach     (ESelectionModel *selection,
                   EForeachFunc callback,
                   gpointer closure)
{
    if (E_SELECTION_MODEL_GET_CLASS(selection)->foreach)
        E_SELECTION_MODEL_GET_CLASS(selection)->foreach (selection, callback, closure);
}

/** 
 * e_selection_model_clear
 * @selection: #ESelectionModel to clear
 *
 * This routine clears the selection to no rows selected.
 */
void
e_selection_model_clear(ESelectionModel *selection)
{
    if (E_SELECTION_MODEL_GET_CLASS(selection)->clear)
        E_SELECTION_MODEL_GET_CLASS(selection)->clear (selection);
}

/** 
 * e_selection_model_selected_count
 * @selection: #ESelectionModel to count
 *
 * This routine calculates the number of rows selected.
 *
 * Returns: The number of rows selected in the given model.
 */
gint
e_selection_model_selected_count (ESelectionModel *selection)
{
    if (E_SELECTION_MODEL_GET_CLASS(selection)->selected_count)
        return E_SELECTION_MODEL_GET_CLASS(selection)->selected_count (selection);
    else
        return 0;
}

/** 
 * e_selection_model_select_all
 * @selection: #ESelectionModel to select all
 *
 * This routine selects all the rows in the given
 * #ESelectionModel.
 */
void
e_selection_model_select_all (ESelectionModel *selection)
{
    if (E_SELECTION_MODEL_GET_CLASS(selection)->select_all)
        E_SELECTION_MODEL_GET_CLASS(selection)->select_all (selection);
}

/** 
 * e_selection_model_invert_selection
 * @selection: #ESelectionModel to invert
 *
 * This routine inverts all the rows in the given
 * #ESelectionModel.
 */
void
e_selection_model_invert_selection (ESelectionModel *selection)
{
    if (E_SELECTION_MODEL_GET_CLASS(selection)->invert_selection)
        E_SELECTION_MODEL_GET_CLASS(selection)->invert_selection (selection);
}

int
e_selection_model_row_count (ESelectionModel *selection)
{
    if (E_SELECTION_MODEL_GET_CLASS(selection)->row_count)
        return E_SELECTION_MODEL_GET_CLASS(selection)->row_count (selection);
    else
        return 0;
}

void
e_selection_model_change_one_row(ESelectionModel *selection, int row, gboolean grow)
{
    if (E_SELECTION_MODEL_GET_CLASS(selection)->change_one_row)
        E_SELECTION_MODEL_GET_CLASS(selection)->change_one_row (selection, row, grow);
}

void
e_selection_model_change_cursor (ESelectionModel *selection, int row, int col)
{
    if (E_SELECTION_MODEL_GET_CLASS(selection)->change_cursor)
        E_SELECTION_MODEL_GET_CLASS(selection)->change_cursor (selection, row, col);
}

int
e_selection_model_cursor_row (ESelectionModel *selection)
{
    if (E_SELECTION_MODEL_GET_CLASS(selection)->cursor_row)
        return E_SELECTION_MODEL_GET_CLASS(selection)->cursor_row (selection);
    else
        return -1;
}

int
e_selection_model_cursor_col (ESelectionModel *selection)
{
    if (E_SELECTION_MODEL_GET_CLASS(selection)->cursor_col)
        return E_SELECTION_MODEL_GET_CLASS(selection)->cursor_col (selection);
    else
        return -1;
}

void
e_selection_model_select_single_row (ESelectionModel *selection, int row)
{
    if (E_SELECTION_MODEL_GET_CLASS(selection)->select_single_row)
        E_SELECTION_MODEL_GET_CLASS(selection)->select_single_row (selection, row);
}

void
e_selection_model_toggle_single_row (ESelectionModel *selection, int row)
{
    if (E_SELECTION_MODEL_GET_CLASS(selection)->toggle_single_row)
        E_SELECTION_MODEL_GET_CLASS(selection)->toggle_single_row (selection, row);
}

void
e_selection_model_move_selection_end (ESelectionModel *selection, int row)
{
    if (E_SELECTION_MODEL_GET_CLASS(selection)->move_selection_end)
        E_SELECTION_MODEL_GET_CLASS(selection)->move_selection_end (selection, row);
}

void
e_selection_model_set_selection_end (ESelectionModel *selection, int row)
{
    if (E_SELECTION_MODEL_GET_CLASS(selection)->set_selection_end)
        E_SELECTION_MODEL_GET_CLASS(selection)->set_selection_end (selection, row);
}

/** 
 * e_selection_model_do_something
 * @selection: #ESelectionModel to do something to.
 * @row: The row to do something in.
 * @col: The col to do something in.
 * @state: The state in which to do something.
 *
 * This routine does whatever is appropriate as if the user clicked
 * the mouse in the given row and column.
 */
void
e_selection_model_do_something (ESelectionModel *selection,
                guint                 row,
                guint                 col,
                GdkModifierType       state)
{
    gint shift_p = state & GDK_SHIFT_MASK;
    gint ctrl_p = state & GDK_CONTROL_MASK;
    int row_count;

    selection->old_selection = -1;

    if (row == -1 && col != -1)
        row = 0;
    if (col == -1 && row != -1)
        col = 0;

    row_count = e_selection_model_row_count(selection);
    if (row_count >= 0 && row < row_count) {
        switch (selection->mode) {
        case GTK_SELECTION_SINGLE:
            e_selection_model_select_single_row (selection, row);
            break;
        case GTK_SELECTION_BROWSE:
        case GTK_SELECTION_MULTIPLE:
            if (shift_p) {
                e_selection_model_set_selection_end (selection, row);
            } else {
                if (ctrl_p) {
                    e_selection_model_toggle_single_row (selection, row);
                } else {
                    e_selection_model_select_single_row (selection, row);
                }
            }
            break;
        default:
            g_assert_not_reached ();
            break;
        }
        e_selection_model_change_cursor(selection, row, col);
        g_signal_emit(selection,
                  e_selection_model_signals[CURSOR_CHANGED], 0,
                  row, col);
        g_signal_emit(selection,
                  e_selection_model_signals[CURSOR_ACTIVATED], 0,
                  row, col);
    }
}

/** 
 * e_selection_model_maybe_do_something
 * @selection: #ESelectionModel to do something to.
 * @row: The row to do something in.
 * @col: The col to do something in.
 * @state: The state in which to do something.
 *
 * If this row is selected, this routine just moves the cursor row and
 * column.  Otherwise, it does the same thing as
 * e_selection_model_do_something().  This is for being used on
 * right clicks and other events where if the user hit the selection,
 * they don't want it to change.
 */
gboolean
e_selection_model_maybe_do_something      (ESelectionModel *selection,
                       guint            row,
                       guint            col,
                       GdkModifierType  state)
{
    selection->old_selection = -1;

    if (e_selection_model_is_row_selected(selection, row)) {
        e_selection_model_change_cursor(selection, row, col);
        g_signal_emit(selection,
                  e_selection_model_signals[CURSOR_CHANGED], 0,
                  row, col);
        return FALSE;
    } else {
        e_selection_model_do_something(selection, row, col, state);
        return TRUE;
    }
}

void
e_selection_model_right_click_down (ESelectionModel *selection,
                    guint            row,
                    guint            col,
                    GdkModifierType  state)
{
    if (selection->mode == GTK_SELECTION_SINGLE) {
        selection->old_selection = e_selection_model_cursor_row (selection);
        e_selection_model_select_single_row (selection, row);
    } else {
        e_selection_model_maybe_do_something (selection, row, col, state);
    }
}

void
e_selection_model_right_click_up (ESelectionModel *selection)
{
    if (selection->mode == GTK_SELECTION_SINGLE && selection->old_selection != -1) {
        e_selection_model_select_single_row (selection, selection->old_selection);
    }
}

void
e_selection_model_select_as_key_press (ESelectionModel *selection,
                       guint            row,
                       guint            col,
                       GdkModifierType  state)
{
    int cursor_activated = TRUE;

    gint shift_p = state & GDK_SHIFT_MASK;
    gint ctrl_p = state & GDK_CONTROL_MASK;

    selection->old_selection = -1;

    switch (selection->mode) {
    case GTK_SELECTION_BROWSE:
    case GTK_SELECTION_MULTIPLE:
        if (shift_p) {
            e_selection_model_set_selection_end (selection, row);
        } else if (!ctrl_p) {
            e_selection_model_select_single_row (selection, row);
        } else
            cursor_activated = FALSE;
        break;
    case GTK_SELECTION_SINGLE:
        e_selection_model_select_single_row (selection, row);
        break;
    default:
        g_assert_not_reached ();
        break;
    }
    if (row != -1) {
        e_selection_model_change_cursor(selection, row, col);
        g_signal_emit(selection,
                  e_selection_model_signals[CURSOR_CHANGED], 0,
                  row, col);
        if (cursor_activated)
            g_signal_emit(selection,
                      e_selection_model_signals[CURSOR_ACTIVATED], 0,
                      row, col);
    }
}

static gint
move_selection (ESelectionModel *selection,
        gboolean              up,
        GdkModifierType       state)
{
    int row = e_selection_model_cursor_row(selection);
    int col = e_selection_model_cursor_col(selection);
    int row_count;

    row = e_sorter_model_to_sorted(selection->sorter, row);
    if (up)
        row--;
    else
        row++;
    if (row < 0)
        row = 0;
    row_count = e_selection_model_row_count(selection);
    if (row >= row_count)
        row = row_count - 1;
    row = e_sorter_sorted_to_model(selection->sorter, row);

    e_selection_model_select_as_key_press (selection, row, col, state);
    return TRUE;
}

/** 
 * e_selection_model_key_press
 * @selection: #ESelectionModel to affect.
 * @key: The event.
 *
 * This routine does whatever is appropriate as if the user pressed
 * the given key.
 *
 * Returns: %TRUE if the #ESelectionModel used the key.
 */
gint
e_selection_model_key_press      (ESelectionModel *selection,
                  GdkEventKey          *key)
{
    selection->old_selection = -1;

    switch (key->keyval) {
    case GDK_Up:
    case GDK_KP_Up:
        return move_selection(selection, TRUE, key->state);
        break;
    case GDK_Down:
    case GDK_KP_Down:
        return move_selection(selection, FALSE, key->state);
        break;
    case GDK_space:
    case GDK_KP_Space:
        if (selection->mode != GTK_SELECTION_SINGLE) {
            int row = e_selection_model_cursor_row(selection);
            int col = e_selection_model_cursor_col(selection);
            if (row == -1)
                break;

            e_selection_model_toggle_single_row (selection, row);
            g_signal_emit(selection,
                      e_selection_model_signals[CURSOR_ACTIVATED], 0,
                      row, col);
            return TRUE;
        }
        break;
    case GDK_Return:
    case GDK_KP_Enter:
        if (selection->mode != GTK_SELECTION_SINGLE) {
            int row = e_selection_model_cursor_row(selection);
            int col = e_selection_model_cursor_col(selection);
            e_selection_model_select_single_row (selection, row);
            g_signal_emit(selection,
                      e_selection_model_signals[CURSOR_ACTIVATED], 0,
                      row, col);
            return TRUE;
        }
        break;
    case GDK_Home:
    case GDK_KP_Home:
        if (selection->cursor_mode == E_CURSOR_LINE) {
            int row = 0;
            int cursor_col = e_selection_model_cursor_col(selection);

            row = e_sorter_sorted_to_model(selection->sorter, row);
            e_selection_model_select_as_key_press (selection, row, cursor_col, key->state);
            return TRUE;
        }
        break;
    case GDK_End:
    case GDK_KP_End:
        if (selection->cursor_mode == E_CURSOR_LINE) {
            int row = e_selection_model_row_count(selection) - 1;
            int cursor_col = e_selection_model_cursor_col(selection);

            row = e_sorter_sorted_to_model(selection->sorter, row);
            e_selection_model_select_as_key_press (selection, row, cursor_col, key->state);
            return TRUE;
        }
        break;
    }
    return FALSE;
}

void
e_selection_model_cursor_changed      (ESelectionModel *selection,
                       int              row,
                       int              col)
{
    g_signal_emit(selection,
              e_selection_model_signals[CURSOR_CHANGED], 0,
              row, col);
}

void
e_selection_model_cursor_activated    (ESelectionModel *selection,
                       int              row,
                       int              col)
{
    g_signal_emit(selection,
              e_selection_model_signals[CURSOR_ACTIVATED], 0,
              row, col);
}

void
e_selection_model_selection_changed   (ESelectionModel *selection)
{
    g_signal_emit(selection,
              e_selection_model_signals[SELECTION_CHANGED], 0);
}

void
e_selection_model_selection_row_changed (ESelectionModel *selection,
                     int              row)
{
    g_signal_emit(selection,
              e_selection_model_signals[SELECTION_ROW_CHANGED], 0,
              row);
}