/* gtktreestore.c

 * Copyright (C) 2000  Red Hat, Inc.,  Jonathan Blandford <jrb@redhat.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; if not, write to the

 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,

 * Boston, MA 02111-1307, USA.

 */

#include "config.h"

#include <string.h>

#include <gobject/gvaluecollector.h>

#include "gtktreemodel.h"

#include "gtktreestore.h"

#include "gtktreedatalist.h"

#include "gtktreednd.h"

#include "gtkbuildable.h"

#include "gtkintl.h"

#include "gtkalias.h"

#define G_NODE(node) ((GNode *)node)

#define GTK_TREE_STORE_IS_SORTED(tree) (((GtkTreeStore*)(tree))->sort_column_id != GTK_TREE_SORTABLE_UNSORTED_SORT_COLUMN_ID)

#define VALID_ITER(iter, tree_store) ((iter)!= NULL && (iter)->user_data != NULL && ((GtkTreeStore*)(tree_store))->stamp == (iter)->stamp)

static void         gtk_tree_store_tree_model_init (GtkTreeModelIface *iface);

static void         gtk_tree_store_drag_source_init(GtkTreeDragSourceIface *iface);

static void         gtk_tree_store_drag_dest_init  (GtkTreeDragDestIface   *iface);

static void         gtk_tree_store_sortable_init   (GtkTreeSortableIface   *iface);

static void         gtk_tree_store_buildable_init  (GtkBuildableIface      *iface);

static void         gtk_tree_store_finalize        (GObject           *object);

static GtkTreeModelFlags gtk_tree_store_get_flags  (GtkTreeModel      *tree_model);

static gint         gtk_tree_store_get_n_columns   (GtkTreeModel      *tree_model);

static GType        gtk_tree_store_get_column_type (GtkTreeModel      *tree_model,

						    gint               index);

static gboolean     gtk_tree_store_get_iter        (GtkTreeModel      *tree_model,

						    GtkTreeIter       *iter,

						    GtkTreePath       *path);

static GtkTreePath *gtk_tree_store_get_path        (GtkTreeModel      *tree_model,

						    GtkTreeIter       *iter);

static void         gtk_tree_store_get_value       (GtkTreeModel      *tree_model,

						    GtkTreeIter       *iter,

						    gint               column,

						    GValue            *value);

static gboolean     gtk_tree_store_iter_next       (GtkTreeModel      *tree_model,

						    GtkTreeIter       *iter);

static gboolean     gtk_tree_store_iter_children   (GtkTreeModel      *tree_model,

						    GtkTreeIter       *iter,

						    GtkTreeIter       *parent);

static gboolean     gtk_tree_store_iter_has_child  (GtkTreeModel      *tree_model,

						    GtkTreeIter       *iter);

static gint         gtk_tree_store_iter_n_children (GtkTreeModel      *tree_model,

						    GtkTreeIter       *iter);

static gboolean     gtk_tree_store_iter_nth_child  (GtkTreeModel      *tree_model,

						    GtkTreeIter       *iter,

						    GtkTreeIter       *parent,

						    gint               n);

static gboolean     gtk_tree_store_iter_parent     (GtkTreeModel      *tree_model,

						    GtkTreeIter       *iter,

						    GtkTreeIter       *child);

static void gtk_tree_store_set_n_columns   (GtkTreeStore *tree_store,

					    gint          n_columns);

static void gtk_tree_store_set_column_type (GtkTreeStore *tree_store,

					    gint          column,

					    GType         type);

static void gtk_tree_store_increment_stamp (GtkTreeStore  *tree_store);

/* DND interfaces */

static gboolean real_gtk_tree_store_row_draggable   (GtkTreeDragSource *drag_source,

						   GtkTreePath       *path);

static gboolean gtk_tree_store_drag_data_delete   (GtkTreeDragSource *drag_source,

						   GtkTreePath       *path);

static gboolean gtk_tree_store_drag_data_get      (GtkTreeDragSource *drag_source,

						   GtkTreePath       *path,

						   GtkSelectionData  *selection_data);

static gboolean gtk_tree_store_drag_data_received (GtkTreeDragDest   *drag_dest,

						   GtkTreePath       *dest,

						   GtkSelectionData  *selection_data);

static gboolean gtk_tree_store_row_drop_possible  (GtkTreeDragDest   *drag_dest,

						   GtkTreePath       *dest_path,

						   GtkSelectionData  *selection_data);

/* Sortable Interfaces */

static void     gtk_tree_store_sort                    (GtkTreeStore           *tree_store);

static void     gtk_tree_store_sort_iter_changed       (GtkTreeStore           *tree_store,

							GtkTreeIter            *iter,

							gint                    column,

							gboolean                emit_signal);

static gboolean gtk_tree_store_get_sort_column_id      (GtkTreeSortable        *sortable,

							gint                   *sort_column_id,

							GtkSortType            *order);

static void     gtk_tree_store_set_sort_column_id      (GtkTreeSortable        *sortable,

							gint                    sort_column_id,

							GtkSortType             order);

static void     gtk_tree_store_set_sort_func           (GtkTreeSortable        *sortable,

							gint                    sort_column_id,

							GtkTreeIterCompareFunc  func,

							gpointer                data,

							GDestroyNotify          destroy);

static void     gtk_tree_store_set_default_sort_func   (GtkTreeSortable        *sortable,

							GtkTreeIterCompareFunc  func,

							gpointer                data,

							GDestroyNotify          destroy);

static gboolean gtk_tree_store_has_default_sort_func   (GtkTreeSortable        *sortable);

/* buildable */

static gboolean gtk_tree_store_buildable_custom_tag_start (GtkBuildable  *buildable,

							   GtkBuilder    *builder,

							   GObject       *child,

							   const gchar   *tagname,

							   GMarkupParser *parser,

							   gpointer      *data);

static void     gtk_tree_store_buildable_custom_finished (GtkBuildable 	 *buildable,

							  GtkBuilder   	 *builder,

							  GObject      	 *child,

							  const gchar  	 *tagname,

							  gpointer     	  user_data);

static void     validate_gnode                         (GNode *node);

static void     gtk_tree_store_move                    (GtkTreeStore           *tree_store,

                                                        GtkTreeIter            *iter,

                                                        GtkTreeIter            *position,

                                                        gboolean                before);

static inline void

validate_tree (GtkTreeStore *tree_store)

{

  if (gtk_debug_flags & GTK_DEBUG_TREE)

    {

      g_assert (G_NODE (tree_store->root)->parent == NULL);

      validate_gnode (G_NODE (tree_store->root));

    }

}

G_DEFINE_TYPE_WITH_CODE (GtkTreeStore, gtk_tree_store, G_TYPE_OBJECT,

			 G_IMPLEMENT_INTERFACE (GTK_TYPE_TREE_MODEL,

						gtk_tree_store_tree_model_init)

			 G_IMPLEMENT_INTERFACE (GTK_TYPE_TREE_DRAG_SOURCE,

						gtk_tree_store_drag_source_init)

			 G_IMPLEMENT_INTERFACE (GTK_TYPE_TREE_DRAG_DEST,

						gtk_tree_store_drag_dest_init)

			 G_IMPLEMENT_INTERFACE (GTK_TYPE_TREE_SORTABLE,

						gtk_tree_store_sortable_init)

			 G_IMPLEMENT_INTERFACE (GTK_TYPE_BUILDABLE,

						gtk_tree_store_buildable_init))

static void

gtk_tree_store_class_init (GtkTreeStoreClass *class)

{

  GObjectClass *object_class;

  object_class = (GObjectClass *) class;

  object_class->finalize = gtk_tree_store_finalize;

}

static void

gtk_tree_store_tree_model_init (GtkTreeModelIface *iface)

{

  iface->get_flags = gtk_tree_store_get_flags;

  iface->get_n_columns = gtk_tree_store_get_n_columns;

  iface->get_column_type = gtk_tree_store_get_column_type;

  iface->get_iter = gtk_tree_store_get_iter;

  iface->get_path = gtk_tree_store_get_path;

  iface->get_value = gtk_tree_store_get_value;

  iface->iter_next = gtk_tree_store_iter_next;

  iface->iter_children = gtk_tree_store_iter_children;

  iface->iter_has_child = gtk_tree_store_iter_has_child;

  iface->iter_n_children = gtk_tree_store_iter_n_children;

  iface->iter_nth_child = gtk_tree_store_iter_nth_child;

  iface->iter_parent = gtk_tree_store_iter_parent;

}

static void

gtk_tree_store_drag_source_init (GtkTreeDragSourceIface *iface)

{

  iface->row_draggable = real_gtk_tree_store_row_draggable;

  iface->drag_data_delete = gtk_tree_store_drag_data_delete;

  iface->drag_data_get = gtk_tree_store_drag_data_get;

}

static void

gtk_tree_store_drag_dest_init (GtkTreeDragDestIface *iface)

{

  iface->drag_data_received = gtk_tree_store_drag_data_received;

  iface->row_drop_possible = gtk_tree_store_row_drop_possible;

}

static void

gtk_tree_store_sortable_init (GtkTreeSortableIface *iface)

{

  iface->get_sort_column_id = gtk_tree_store_get_sort_column_id;

  iface->set_sort_column_id = gtk_tree_store_set_sort_column_id;

  iface->set_sort_func = gtk_tree_store_set_sort_func;

  iface->set_default_sort_func = gtk_tree_store_set_default_sort_func;

  iface->has_default_sort_func = gtk_tree_store_has_default_sort_func;

}

void

gtk_tree_store_buildable_init (GtkBuildableIface *iface)

{

  iface->custom_tag_start = gtk_tree_store_buildable_custom_tag_start;

  iface->custom_finished = gtk_tree_store_buildable_custom_finished;

}

static void

gtk_tree_store_init (GtkTreeStore *tree_store)

{

  tree_store->root = g_node_new (NULL);

  /* While the odds are against us getting 0...

   */

  do

    {

      tree_store->stamp = g_random_int ();

    }

  while (tree_store->stamp == 0);

  tree_store->sort_list = NULL;

  tree_store->sort_column_id = GTK_TREE_SORTABLE_UNSORTED_SORT_COLUMN_ID;

  tree_store->columns_dirty = FALSE;

}

/**

 * gtk_tree_store_new:

 * @n_columns: number of columns in the tree store

 * @Varargs: all #GType types for the columns, from first to last

 *

 * Creates a new tree store as with @n_columns columns each of the types passed

 * in.  Note that only types derived from standard GObject fundamental types 

 * are supported. 

 *

 * As an example, <literal>gtk_tree_store_new (3, G_TYPE_INT, G_TYPE_STRING,

 * GDK_TYPE_PIXBUF);</literal> will create a new #GtkTreeStore with three columns, of type

 * <type>int</type>, <type>string</type> and #GdkPixbuf respectively.

 *

 * Return value: a new #GtkTreeStore

 **/

GtkTreeStore *

gtk_tree_store_new (gint n_columns,

			       ...)

{

  GtkTreeStore *retval;

  va_list args;

  gint i;

  g_return_val_if_fail (n_columns > 0, NULL);

  retval = g_object_new (GTK_TYPE_TREE_STORE, NULL);

  gtk_tree_store_set_n_columns (retval, n_columns);

  va_start (args, n_columns);

  for (i = 0; i < n_columns; i++)

    {

      GType type = va_arg (args, GType);

      if (! _gtk_tree_data_list_check_type (type))

	{

	  g_warning ("%s: Invalid type %s\n", G_STRLOC, g_type_name (type));

	  g_object_unref (retval);

          va_end (args);

	  return NULL;

	}

      gtk_tree_store_set_column_type (retval, i, type);

    }

  va_end (args);

  return retval;

}

/**

 * gtk_tree_store_newv:

 * @n_columns: number of columns in the tree store

 * @types: (array length=n_columns): an array of #GType types for the columns, from first to last

 *

 * Non vararg creation function.  Used primarily by language bindings.

 *

 * Return value: (transfer full): a new #GtkTreeStore

 **/

GtkTreeStore *

gtk_tree_store_newv (gint   n_columns,

		     GType *types)

{

  GtkTreeStore *retval;

  gint i;

  g_return_val_if_fail (n_columns > 0, NULL);

  retval = g_object_new (GTK_TYPE_TREE_STORE, NULL);

  gtk_tree_store_set_n_columns (retval, n_columns);

   for (i = 0; i < n_columns; i++)

    {

      if (! _gtk_tree_data_list_check_type (types[i]))

	{

	  g_warning ("%s: Invalid type %s\n", G_STRLOC, g_type_name (types[i]));

	  g_object_unref (retval);

	  return NULL;

	}

      gtk_tree_store_set_column_type (retval, i, types[i]);

    }

  return retval;

}

/**

 * gtk_tree_store_set_column_types:

 * @tree_store: A #GtkTreeStore

 * @n_columns: Number of columns for the tree store

 * @types: (array length=n_columns): An array of #GType types, one for each column

 * 

 * This function is meant primarily for #GObjects that inherit from 

 * #GtkTreeStore, and should only be used when constructing a new 

 * #GtkTreeStore.  It will not function after a row has been added, 

 * or a method on the #GtkTreeModel interface is called.

 **/

void

gtk_tree_store_set_column_types (GtkTreeStore *tree_store,

				 gint          n_columns,

				 GType        *types)

{

  gint i;

  g_return_if_fail (GTK_IS_TREE_STORE (tree_store));

  g_return_if_fail (tree_store->columns_dirty == 0);

  gtk_tree_store_set_n_columns (tree_store, n_columns);

   for (i = 0; i < n_columns; i++)

    {

      if (! _gtk_tree_data_list_check_type (types[i]))

	{

	  g_warning ("%s: Invalid type %s\n", G_STRLOC, g_type_name (types[i]));

	  continue;

	}

      gtk_tree_store_set_column_type (tree_store, i, types[i]);

    }

}

static void

gtk_tree_store_set_n_columns (GtkTreeStore *tree_store,

			      gint          n_columns)

{

  int i;

  if (tree_store->n_columns == n_columns)

    return;

  tree_store->column_headers = g_renew (GType, tree_store->column_headers, n_columns);

  for (i = tree_store->n_columns; i < n_columns; i++)

    tree_store->column_headers[i] = G_TYPE_INVALID;

  tree_store->n_columns = n_columns;

  if (tree_store->sort_list)

    _gtk_tree_data_list_header_free (tree_store->sort_list);

  tree_store->sort_list = _gtk_tree_data_list_header_new (n_columns, tree_store->column_headers);

}

/**

 * gtk_tree_store_set_column_type:

 * @tree_store: a #GtkTreeStore

 * @column: column number

 * @type: type of the data to be stored in @column

 *

 * Supported types include: %G_TYPE_UINT, %G_TYPE_INT, %G_TYPE_UCHAR,

 * %G_TYPE_CHAR, %G_TYPE_BOOLEAN, %G_TYPE_POINTER, %G_TYPE_FLOAT,

 * %G_TYPE_DOUBLE, %G_TYPE_STRING, %G_TYPE_OBJECT, and %G_TYPE_BOXED, along with

 * subclasses of those types such as %GDK_TYPE_PIXBUF.

 *

 **/

static void

gtk_tree_store_set_column_type (GtkTreeStore *tree_store,

				gint          column,

				GType         type)

{

  if (!_gtk_tree_data_list_check_type (type))

    {

      g_warning ("%s: Invalid type %s\n", G_STRLOC, g_type_name (type));

      return;

    }

  tree_store->column_headers[column] = type;

}

static gboolean

node_free (GNode *node, gpointer data)

{

  if (node->data)

    _gtk_tree_data_list_free (node->data, (GType*)data);

  node->data = NULL;

  return FALSE;

}

static void

gtk_tree_store_finalize (GObject *object)

{

  GtkTreeStore *tree_store = GTK_TREE_STORE (object);

  g_node_traverse (tree_store->root, G_POST_ORDER, G_TRAVERSE_ALL, -1,

		   node_free, tree_store->column_headers);

  g_node_destroy (tree_store->root);

  _gtk_tree_data_list_header_free (tree_store->sort_list);

  g_free (tree_store->column_headers);

  if (tree_store->default_sort_destroy)

    {

      GDestroyNotify d = tree_store->default_sort_destroy;

      tree_store->default_sort_destroy = NULL;

      d (tree_store->default_sort_data);

      tree_store->default_sort_data = NULL;

    }

  /* must chain up */

  G_OBJECT_CLASS (gtk_tree_store_parent_class)->finalize (object);

}

/* fulfill the GtkTreeModel requirements */

/* NOTE: GtkTreeStore::root is a GNode, that acts as the parent node.  However,

 * it is not visible to the tree or to the user., and the path "0" refers to the

 * first child of GtkTreeStore::root.

 */

static GtkTreeModelFlags

gtk_tree_store_get_flags (GtkTreeModel *tree_model)

{

  return GTK_TREE_MODEL_ITERS_PERSIST;

}

static gint

gtk_tree_store_get_n_columns (GtkTreeModel *tree_model)

{

  GtkTreeStore *tree_store = (GtkTreeStore *) tree_model;

  tree_store->columns_dirty = TRUE;

  return tree_store->n_columns;

}

static GType

gtk_tree_store_get_column_type (GtkTreeModel *tree_model,

				gint          index)

{

  GtkTreeStore *tree_store = (GtkTreeStore *) tree_model;

  g_return_val_if_fail (index < tree_store->n_columns, G_TYPE_INVALID);

  tree_store->columns_dirty = TRUE;

  return tree_store->column_headers[index];

}

static gboolean

gtk_tree_store_get_iter (GtkTreeModel *tree_model,

			 GtkTreeIter  *iter,

			 GtkTreePath  *path)

{

  GtkTreeStore *tree_store = (GtkTreeStore *) tree_model;

  GtkTreeIter parent;

  gint *indices;

  gint depth, i;

  tree_store->columns_dirty = TRUE;

  indices = gtk_tree_path_get_indices (path);

  depth = gtk_tree_path_get_depth (path);

  g_return_val_if_fail (depth > 0, FALSE);

  parent.stamp = tree_store->stamp;

  parent.user_data = tree_store->root;

  if (!gtk_tree_store_iter_nth_child (tree_model, iter, &parent, indices[0]))

    return FALSE;

  for (i = 1; i < depth; i++)

    {

      parent = *iter;

      if (!gtk_tree_store_iter_nth_child (tree_model, iter, &parent, indices[i]))

	return FALSE;

    }

  return TRUE;

}

static GtkTreePath *

gtk_tree_store_get_path (GtkTreeModel *tree_model,

			 GtkTreeIter  *iter)

{

  GtkTreeStore *tree_store = (GtkTreeStore *) tree_model;

  GtkTreePath *retval;

  GNode *tmp_node;

  gint i = 0;

  g_return_val_if_fail (iter->user_data != NULL, NULL);

  g_return_val_if_fail (iter->stamp == tree_store->stamp, NULL);

  validate_tree (tree_store);

  if (G_NODE (iter->user_data)->parent == NULL &&

      G_NODE (iter->user_data) == tree_store->root)

    return gtk_tree_path_new ();

  g_assert (G_NODE (iter->user_data)->parent != NULL);

  if (G_NODE (iter->user_data)->parent == G_NODE (tree_store->root))

    {

      retval = gtk_tree_path_new ();

      tmp_node = G_NODE (tree_store->root)->children;

    }

  else

    {

      GtkTreeIter tmp_iter = *iter;

      tmp_iter.user_data = G_NODE (iter->user_data)->parent;

      retval = gtk_tree_store_get_path (tree_model, &tmp_iter);

      tmp_node = G_NODE (iter->user_data)->parent->children;

    }

  if (retval == NULL)

    return NULL;

  if (tmp_node == NULL)

    {

      gtk_tree_path_free (retval);

      return NULL;

    }

  for (; tmp_node; tmp_node = tmp_node->next)

    {

      if (tmp_node == G_NODE (iter->user_data))

	break;

      i++;

    }

  if (tmp_node == NULL)

    {

      /* We couldn't find node, meaning it's prolly not ours */

      /* Perhaps I should do a g_return_if_fail here. */

      gtk_tree_path_free (retval);

      return NULL;

    }

  gtk_tree_path_append_index (retval, i);

  return retval;

}

static void

gtk_tree_store_get_value (GtkTreeModel *tree_model,

			  GtkTreeIter  *iter,

			  gint          column,

			  GValue       *value)

{

  GtkTreeStore *tree_store = (GtkTreeStore *) tree_model;

  GtkTreeDataList *list;

  gint tmp_column = column;

  g_return_if_fail (column < tree_store->n_columns);

  g_return_if_fail (VALID_ITER (iter, tree_store));

  list = G_NODE (iter->user_data)->data;

  while (tmp_column-- > 0 && list)

    list = list->next;

  if (list)

    {

      _gtk_tree_data_list_node_to_value (list,

					 tree_store->column_headers[column],

					 value);

    }

  else

    {

      /* We want to return an initialized but empty (default) value */

      g_value_init (value, tree_store->column_headers[column]);

    }

}

static gboolean

gtk_tree_store_iter_next (GtkTreeModel  *tree_model,

			  GtkTreeIter   *iter)

{

  g_return_val_if_fail (iter->user_data != NULL, FALSE);

  g_return_val_if_fail (iter->stamp == GTK_TREE_STORE (tree_model)->stamp, FALSE);

  if (G_NODE (iter->user_data)->next)

    {

      iter->user_data = G_NODE (iter->user_data)->next;

      return TRUE;

    }

  else

    {

      iter->stamp = 0;

      return FALSE;

    }

}

static gboolean

gtk_tree_store_iter_children (GtkTreeModel *tree_model,

			      GtkTreeIter  *iter,

			      GtkTreeIter  *parent)

{

  GtkTreeStore *tree_store = (GtkTreeStore *) tree_model;

  GNode *children;

  if (parent)

    g_return_val_if_fail (VALID_ITER (parent, tree_store), FALSE);

  if (parent)

    children = G_NODE (parent->user_data)->children;

  else

    children = G_NODE (tree_store->root)->children;

  if (children)

    {

      iter->stamp = tree_store->stamp;

      iter->user_data = children;

      return TRUE;

    }

  else

    {

      iter->stamp = 0;

      return FALSE;

    }

}

static gboolean

gtk_tree_store_iter_has_child (GtkTreeModel *tree_model,

			       GtkTreeIter  *iter)

{

  g_return_val_if_fail (iter->user_data != NULL, FALSE);

  g_return_val_if_fail (VALID_ITER (iter, tree_model), FALSE);

  return G_NODE (iter->user_data)->children != NULL;

}

static gint

gtk_tree_store_iter_n_children (GtkTreeModel *tree_model,

				GtkTreeIter  *iter)

{

  GNode *node;

  gint i = 0;

  g_return_val_if_fail (iter == NULL || iter->user_data != NULL, 0);

  if (iter == NULL)

    node = G_NODE (GTK_TREE_STORE (tree_model)->root)->children;

  else

    node = G_NODE (iter->user_data)->children;

  while (node)

    {

      i++;

      node = node->next;

    }

  return i;

}

static gboolean

gtk_tree_store_iter_nth_child (GtkTreeModel *tree_model,

			       GtkTreeIter  *iter,

			       GtkTreeIter  *parent,

			       gint          n)

{

  GtkTreeStore *tree_store = (GtkTreeStore *) tree_model;

  GNode *parent_node;

  GNode *child;

  g_return_val_if_fail (parent == NULL || parent->user_data != NULL, FALSE);

  if (parent == NULL)

    parent_node = tree_store->root;

  else

    parent_node = parent->user_data;

  child = g_node_nth_child (parent_node, n);

  if (child)

    {

      iter->user_data = child;

      iter->stamp = tree_store->stamp;

      return TRUE;

    }

  else

    {

      iter->stamp = 0;

      return FALSE;

    }

}

static gboolean

gtk_tree_store_iter_parent (GtkTreeModel *tree_model,

			    GtkTreeIter  *iter,

			    GtkTreeIter  *child)

{

  GtkTreeStore *tree_store = (GtkTreeStore *) tree_model;

  GNode *parent;

  g_return_val_if_fail (iter != NULL, FALSE);

  g_return_val_if_fail (VALID_ITER (child, tree_store), FALSE);

  parent = G_NODE (child->user_data)->parent;

  g_assert (parent != NULL);

  if (parent != tree_store->root)

    {

      iter->user_data = parent;

      iter->stamp = tree_store->stamp;

      return TRUE;

    }

  else

    {

      iter->stamp = 0;

      return FALSE;

    }

}

/* Does not emit a signal */

static gboolean

gtk_tree_store_real_set_value (GtkTreeStore *tree_store,

			       GtkTreeIter  *iter,

			       gint          column,

			       GValue       *value,

			       gboolean      sort)

{

  GtkTreeDataList *list;

  GtkTreeDataList *prev;

  gint old_column = column;

  GValue real_value = {0, };

  gboolean converted = FALSE;

  gboolean retval = FALSE;

  if (! g_type_is_a (G_VALUE_TYPE (value), tree_store->column_headers[column]))

    {

      if (! (g_value_type_compatible (G_VALUE_TYPE (value), tree_store->column_headers[column]) &&

	     g_value_type_compatible (tree_store->column_headers[column], G_VALUE_TYPE (value))))

	{

	  g_warning ("%s: Unable to convert from %s to %s\n",

		     G_STRLOC,

		     g_type_name (G_VALUE_TYPE (value)),

		     g_type_name (tree_store->column_headers[column]));

	  return retval;

	}

      if (!g_value_transform (value, &real_value))

	{

	  g_warning ("%s: Unable to make conversion from %s to %s\n",

		     G_STRLOC,

		     g_type_name (G_VALUE_TYPE (value)),

		     g_type_name (tree_store->column_headers[column]));

	  g_value_unset (&real_value);

	  return retval;

	}

      converted = TRUE;

    }

  prev = list = G_NODE (iter->user_data)->data;

  while (list != NULL)

    {

      if (column == 0)

	{

	  if (converted)

	    _gtk_tree_data_list_value_to_node (list, &real_value);

	  else

	    _gtk_tree_data_list_value_to_node (list, value);

	  retval = TRUE;

	  if (converted)

	    g_value_unset (&real_value);

          if (sort && GTK_TREE_STORE_IS_SORTED (tree_store))

            gtk_tree_store_sort_iter_changed (tree_store, iter, old_column, TRUE);

	  return retval;

	}

      column--;

      prev = list;

      list = list->next;

    }

  if (G_NODE (iter->user_data)->data == NULL)

    {

      G_NODE (iter->user_data)->data = list = _gtk_tree_data_list_alloc ();

      list->next = NULL;

    }

  else

    {

      list = prev->next = _gtk_tree_data_list_alloc ();

      list->next = NULL;

    }

  while (column != 0)

    {

      list->next = _gtk_tree_data_list_alloc ();

      list = list->next;

      list->next = NULL;

      column --;

    }

  if (converted)

    _gtk_tree_data_list_value_to_node (list, &real_value);

  else

    _gtk_tree_data_list_value_to_node (list, value);

  retval = TRUE;

  if (converted)

    g_value_unset (&real_value);

  if (sort && GTK_TREE_STORE_IS_SORTED (tree_store))

    gtk_tree_store_sort_iter_changed (tree_store, iter, old_column, TRUE);

  return retval;

}

/**

 * gtk_tree_store_set_value:

 * @tree_store: a #GtkTreeStore

 * @iter: A valid #GtkTreeIter for the row being modified

 * @column: column number to modify

 * @value: new value for the cell

 *

 * Sets the data in the cell specified by @iter and @column.

 * The type of @value must be convertible to the type of the

 * column.

 *

 **/

void

gtk_tree_store_set_value (GtkTreeStore *tree_store,

			  GtkTreeIter  *iter,

			  gint          column,

			  GValue       *value)

{

  g_return_if_fail (GTK_IS_TREE_STORE (tree_store));

  g_return_if_fail (VALID_ITER (iter, tree_store));

  g_return_if_fail (column >= 0 && column < tree_store->n_columns);

  g_return_if_fail (G_IS_VALUE (value));

  if (gtk_tree_store_real_set_value (tree_store, iter, column, value, TRUE))

    {

      GtkTreePath *path;

      path = gtk_tree_store_get_path (GTK_TREE_MODEL (tree_store), iter);

      gtk_tree_model_row_changed (GTK_TREE_MODEL (tree_store), path, iter);

      gtk_tree_path_free (path);

    }

}

static GtkTreeIterCompareFunc

gtk_tree_store_get_compare_func (GtkTreeStore *tree_store)

{

  GtkTreeIterCompareFunc func = NULL;

  if (GTK_TREE_STORE_IS_SORTED (tree_store))

    {

      if (tree_store->sort_column_id != -1)

	{

	  GtkTreeDataSortHeader *header;

	  header = _gtk_tree_data_list_get_header (tree_store->sort_list,