]> Pileus Git - ~andy/gtk/blobdiff - gtk/gtktreedatalist.c
added compile time switch to put the tree views into a hpaned for owen to
[~andy/gtk] / gtk / gtktreedatalist.c
index 099e01ee6fbfe729d36e8ada1b16f344fe816b06..a1007c355ab962dd8dc53d3786c41acdd6cb2357 100644 (file)
  * License along with this library; if not, write to the
  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  * Boston, MA 02111-1307, USA.
+ * 
+ * This file contains code shared between GtkTreeStore and GtkListStore.  Please
+ * do not use it.
  */
 
 #include "gtktreedatalist.h"
+#include <string.h>
+static GMemChunk *tree_chunk = NULL;
+#define TREE_CHUNK_PREALLOCS 64
 
 /* node allocation
  */
-struct _GAllocator /* from gmem.c */
-{
-  gchar           *name;
-  guint16          n_preallocs;
-  guint            is_unused : 1;
-  guint            type : 4;
-  GAllocator      *last;
-  GMemChunk       *mem_chunk;
-  GtkTreeDataList *free_nodes;
-};
-
-
-G_LOCK_DEFINE_STATIC (current_allocator);
-static GAllocator *current_allocator = NULL;
-
-/* HOLDS: current_allocator_lock */
-static void
-gtk_tree_data_list_validate_allocator (GAllocator *allocator)
-{
-  g_return_if_fail (allocator != NULL);
-  g_return_if_fail (allocator->is_unused == TRUE);
-
-  if (allocator->type != G_ALLOCATOR_NODE)
-    {
-      allocator->type = G_ALLOCATOR_NODE;
-      if (allocator->mem_chunk)
-       {
-         g_mem_chunk_destroy (allocator->mem_chunk);
-         allocator->mem_chunk = NULL;
-       }
-    }
-
-  if (!allocator->mem_chunk)
-    {
-      allocator->mem_chunk = g_mem_chunk_new (allocator->name,
-                                             sizeof (GtkTreeDataList),
-                                             sizeof (GtkTreeDataList) * allocator->n_preallocs,
-                                             G_ALLOC_ONLY);
-      allocator->free_nodes = NULL;
-    }
-
-  allocator->is_unused = FALSE;
-}
-
-void
-_gtk_tree_data_list_push_allocator (GAllocator *allocator)
-{
-  G_LOCK (current_allocator);
-  gtk_tree_data_list_validate_allocator ( allocator );
-  allocator->last = current_allocator;
-  current_allocator = allocator;
-  G_UNLOCK (current_allocator);
-}
-
-void
-_gtk_tree_data_list_pop_allocator (void)
-{
-  G_LOCK (current_allocator);
-  if (current_allocator)
-    {
-      GAllocator *allocator;
-
-      allocator = current_allocator;
-      current_allocator = allocator->last;
-      allocator->last = NULL;
-      allocator->is_unused = TRUE;
-    }
-  G_UNLOCK (current_allocator);
-}
-
 GtkTreeDataList *
 _gtk_tree_data_list_alloc (void)
 {
   GtkTreeDataList *list;
 
-  G_LOCK (current_allocator);
-  if (!current_allocator)
-    {
-       GAllocator *allocator = g_allocator_new ("GTK+ default GtkTreeDataList allocator",
-                                               128);
-       gtk_tree_data_list_validate_allocator (allocator);
-       allocator->last = NULL;
-       current_allocator = allocator;
-    }
-  if (!current_allocator->free_nodes)
-    list = g_chunk_new (GtkTreeDataList, current_allocator->mem_chunk);
-  else
-    {
-      list = current_allocator->free_nodes;
-      current_allocator->free_nodes = list->next;
-    }
-  G_UNLOCK (current_allocator);
+  if (tree_chunk == NULL)
+    tree_chunk = g_mem_chunk_new ("treedatalist mem chunk",
+                                 sizeof (GtkTreeDataList),
+                                 sizeof (GtkTreeDataList) * TREE_CHUNK_PREALLOCS,
+                                 G_ALLOC_AND_FREE);
+
+  list = g_chunk_new (GtkTreeDataList, tree_chunk);
+  memset (list, 0, sizeof (GtkTreeDataList));
 
   return list;
 }
@@ -121,31 +48,31 @@ void
 _gtk_tree_data_list_free (GtkTreeDataList *list,
                          GType           *column_headers)
 {
-  GtkTreeDataList *tmp;
+  GtkTreeDataList *tmp, *next;
   gint i = 0;
 
-  for (tmp = list; tmp; tmp = tmp->next)
+  tmp = list;
+
+  while (tmp)
     {
+      next = tmp->next;
       if (g_type_is_a (column_headers [i], G_TYPE_STRING))
        g_free ((gchar *) tmp->data.v_pointer);
-      else if (g_type_is_a (column_headers [i], G_TYPE_OBJECT))
+      else if (g_type_is_a (column_headers [i], G_TYPE_OBJECT) && tmp->data.v_pointer != NULL)
        g_object_unref (G_OBJECT (tmp->data.v_pointer));
-      else if (g_type_is_a (column_headers [i], G_TYPE_BOXED))
+      else if (g_type_is_a (column_headers [i], G_TYPE_BOXED) && tmp->data.v_pointer != NULL)
        g_boxed_free (column_headers [i], (gpointer) tmp->data.v_pointer);
+
+      g_mem_chunk_free (tree_chunk, tmp);
       i++;
+      tmp = next;
     }
-
-  G_LOCK (current_allocator);
-  list->next = current_allocator->free_nodes;
-  current_allocator->free_nodes = list;
-  G_UNLOCK (current_allocator);
 }
 
 gboolean
 _gtk_tree_data_list_check_type (GType type)
 {
   gint i = 0;
-
   static GType type_list[] =
   {
     G_TYPE_BOOLEAN,
@@ -164,6 +91,10 @@ _gtk_tree_data_list_check_type (GType type)
     G_TYPE_INVALID
   };
 
+  if (! G_TYPE_IS_VALUE_TYPE (type))
+    return FALSE;
+
+
   while (type_list[i] != G_TYPE_INVALID)
     {
       if (g_type_is_a (type, type_list[i]))
@@ -173,6 +104,7 @@ _gtk_tree_data_list_check_type (GType type)
   return FALSE;
 }
 
+
 void
 _gtk_tree_data_list_node_to_value (GtkTreeDataList *list,
                                   GType            type,
@@ -180,71 +112,111 @@ _gtk_tree_data_list_node_to_value (GtkTreeDataList *list,
 {
   g_value_init (value, type);
 
-  if (g_type_is_a (type, G_TYPE_BOOLEAN))
-    g_value_set_boolean (value, (gboolean) list->data.v_int);
-  else if (g_type_is_a (type, G_TYPE_CHAR))
-    g_value_set_char (value, (gchar) list->data.v_char);
-  else if (g_type_is_a (type, G_TYPE_UCHAR))
-    g_value_set_uchar (value, (guchar) list->data.v_uchar);
-  else if (g_type_is_a (type, G_TYPE_INT))
-    g_value_set_int (value, (gint) list->data.v_int);
-  else if (g_type_is_a (type, G_TYPE_UINT))
-    g_value_set_uint (value, (guint) list->data.v_uint);
-  else if (g_type_is_a (type, G_TYPE_ENUM))
-    g_value_set_enum (value, list->data.v_int);
-  else if (g_type_is_a (type, G_TYPE_FLAGS))
-    g_value_set_flags (value, (int) list->data.v_int);
-  else if (g_type_is_a (type, G_TYPE_FLOAT))
-    g_value_set_float (value, (gfloat) list->data.v_float);
-  else if (g_type_is_a (type, G_TYPE_DOUBLE))
-    g_value_set_double (value, (gdouble) list->data.v_double);
-  else if (g_type_is_a (type, G_TYPE_STRING))
-    g_value_set_string (value, (gchar *) list->data.v_pointer);
-  else if (g_type_is_a (type, G_TYPE_POINTER))
-    g_value_set_pointer (value, (gpointer) list->data.v_pointer);
-  else if (g_type_is_a (type, G_TYPE_BOXED))
-    g_value_set_boxed (value, (gpointer) list->data.v_pointer);
-  else if (g_type_is_a (type, G_TYPE_OBJECT))
-    g_value_set_object (value, (GObject *) list->data.v_pointer);
-  else
-    g_warning ("%s: Unsupported type (%s) retrieved.", G_STRLOC, g_type_name (value->g_type));
+  switch (G_TYPE_FUNDAMENTAL (type))
+    {
+    case G_TYPE_BOOLEAN:
+      g_value_set_boolean (value, (gboolean) list->data.v_int);
+      break;
+    case G_TYPE_CHAR:
+      g_value_set_char (value, (gchar) list->data.v_char);
+      break;
+    case G_TYPE_UCHAR:
+      g_value_set_uchar (value, (guchar) list->data.v_uchar);
+      break;
+    case G_TYPE_INT:
+      g_value_set_int (value, (gint) list->data.v_int);
+      break;
+    case G_TYPE_UINT:
+      g_value_set_uint (value, (guint) list->data.v_uint);
+      break;
+    case G_TYPE_ENUM:
+      g_value_set_enum (value, list->data.v_int);
+      break;
+    case G_TYPE_FLAGS:
+      g_value_set_flags (value, (int) list->data.v_int);
+      break;
+    case G_TYPE_FLOAT:
+      g_value_set_float (value, (gfloat) list->data.v_float);
+      break;
+    case G_TYPE_DOUBLE:
+      g_value_set_double (value, (gdouble) list->data.v_double);
+      break;
+    case G_TYPE_STRING:
+      g_value_set_string (value, (gchar *) list->data.v_pointer);
+      break;
+    case G_TYPE_POINTER:
+      g_value_set_pointer (value, (gpointer) list->data.v_pointer);
+      break;
+    case G_TYPE_BOXED:
+      g_value_set_boxed (value, (gpointer) list->data.v_pointer);
+      break;
+    case G_TYPE_OBJECT:
+      g_value_set_object (value, (GObject *) list->data.v_pointer);
+      break;
+    default:
+      g_warning ("%s: Unsupported type (%s) retrieved.", G_STRLOC, g_type_name (value->g_type));
+      break;
+    }
 }
 
 void
 _gtk_tree_data_list_value_to_node (GtkTreeDataList *list,
                                   GValue          *value)
 {
-  if (g_type_is_a (G_VALUE_TYPE (value), G_TYPE_BOOLEAN))
-    list->data.v_int = g_value_get_boolean (value);
-  else if (g_type_is_a (G_VALUE_TYPE (value), G_TYPE_CHAR))
-    list->data.v_char = g_value_get_char (value);
-  else if (g_type_is_a (G_VALUE_TYPE (value), G_TYPE_UCHAR))
-    list->data.v_uchar = g_value_get_uchar (value);
-  else if (g_type_is_a (G_VALUE_TYPE (value), G_TYPE_INT))
-    list->data.v_int = g_value_get_int (value);
-  else if (g_type_is_a (G_VALUE_TYPE (value), G_TYPE_ENUM))
-    list->data.v_int = g_value_get_enum (value);
-  else if (g_type_is_a (G_VALUE_TYPE (value), G_TYPE_FLAGS))
-    list->data.v_int = g_value_get_flags (value);
-  else if (g_type_is_a (G_VALUE_TYPE (value), G_TYPE_UINT))
-    list->data.v_uint = g_value_get_uint (value);
-  else if (g_type_is_a (G_VALUE_TYPE (value), G_TYPE_POINTER))
-    list->data.v_pointer = g_value_get_pointer (value);
-  else if (g_type_is_a (G_VALUE_TYPE (value), G_TYPE_FLOAT))
-    list->data.v_float = g_value_get_float (value);
-  else if (g_type_is_a (G_VALUE_TYPE (value), G_TYPE_DOUBLE))
-    list->data.v_double = g_value_get_double (value);
-  else if (g_type_is_a (G_VALUE_TYPE (value), G_TYPE_STRING))
-    list->data.v_pointer = g_value_dup_string (value);
-  else if (g_type_is_a (G_VALUE_TYPE (value), G_TYPE_OBJECT))
-    list->data.v_pointer = g_value_dup_object (value);
-  else if (g_type_is_a (G_VALUE_TYPE (value), G_TYPE_BOXED))
-    list->data.v_pointer = g_value_dup_boxed (value);
-  else
-    g_warning ("%s: Unsupported type (%s) stored.", G_STRLOC, g_type_name (G_VALUE_TYPE (value)));
+  switch (G_TYPE_FUNDAMENTAL (G_VALUE_TYPE (value)))
+    {
+    case G_TYPE_BOOLEAN:
+      list->data.v_int = g_value_get_boolean (value);
+      break;
+    case G_TYPE_CHAR:
+      list->data.v_char = g_value_get_char (value);
+      break;
+    case G_TYPE_UCHAR:
+      list->data.v_uchar = g_value_get_uchar (value);
+      break;
+    case G_TYPE_INT:
+      list->data.v_int = g_value_get_int (value);
+      break;
+    case G_TYPE_ENUM:
+      list->data.v_int = g_value_get_enum (value);
+      break;
+    case G_TYPE_FLAGS:
+      list->data.v_int = g_value_get_flags (value);
+      break;
+    case G_TYPE_UINT:
+      list->data.v_uint = g_value_get_uint (value);
+      break;
+    case G_TYPE_POINTER:
+      list->data.v_pointer = g_value_get_pointer (value);
+      break;
+    case G_TYPE_FLOAT:
+      list->data.v_float = g_value_get_float (value);
+      break;
+    case G_TYPE_DOUBLE:
+      list->data.v_double = g_value_get_double (value);
+      break;
+    case G_TYPE_STRING:
+      if (list->data.v_pointer)
+       g_free (list->data.v_pointer);
+      list->data.v_pointer = g_value_dup_string (value);
+      break;
+    case G_TYPE_OBJECT:
+      if (list->data.v_pointer)
+       g_object_unref (list->data.v_pointer);
+      list->data.v_pointer = g_value_dup_object (value);
+      break;
+    case G_TYPE_BOXED:
+      if (list->data.v_pointer)
+       g_boxed_free (G_VALUE_TYPE (value), list->data.v_pointer);
+      list->data.v_pointer = g_value_dup_boxed (value);
+      break;
+    default:
+      g_warning ("%s: Unsupported type (%s) stored.", G_STRLOC, g_type_name (G_VALUE_TYPE (value)));
+      break;
+    }
 }
 
-GtkTreeDataList*
+GtkTreeDataList *
 _gtk_tree_data_list_node_copy (GtkTreeDataList *list,
                                GType            type)
 {
@@ -254,37 +226,212 @@ _gtk_tree_data_list_node_copy (GtkTreeDataList *list,
   
   new_list = _gtk_tree_data_list_alloc ();
   new_list->next = NULL;
-  
-  if ((g_type_is_a (type, G_TYPE_UINT)) ||
-      (g_type_is_a (type, G_TYPE_INT)) ||
-      (g_type_is_a (type, G_TYPE_UCHAR)) ||
-      (g_type_is_a (type, G_TYPE_CHAR)) ||
-      (g_type_is_a (type, G_TYPE_BOOLEAN)) ||
-      (g_type_is_a (type, G_TYPE_POINTER)) ||
-      (g_type_is_a (type, G_TYPE_FLOAT)) ||
-      (g_type_is_a (type, G_TYPE_DOUBLE)))
-    new_list->data = list->data;
-
-  else if (g_type_is_a (type, G_TYPE_STRING))
-    new_list->data.v_pointer = g_strdup (list->data.v_pointer);
-  else if (g_type_is_a (type, G_TYPE_OBJECT))
+
+  switch (G_TYPE_FUNDAMENTAL (type))
     {
+    case G_TYPE_UINT:
+    case G_TYPE_INT:
+    case G_TYPE_UCHAR:
+    case G_TYPE_CHAR:
+    case G_TYPE_BOOLEAN:
+    case G_TYPE_POINTER:
+    case G_TYPE_FLOAT:
+    case G_TYPE_DOUBLE:
+      new_list->data = list->data;
+      break;
+    case G_TYPE_STRING:
+      new_list->data.v_pointer = g_strdup (list->data.v_pointer);
+      break;
+    case G_TYPE_OBJECT:
       new_list->data.v_pointer = list->data.v_pointer;
       if (new_list->data.v_pointer)
        g_object_ref (G_OBJECT (new_list->data.v_pointer));
-    }
-  else if (g_type_is_a (type, G_TYPE_BOXED))
-    {
+      break;
+    case G_TYPE_BOXED:
       if (list->data.v_pointer)
        new_list->data.v_pointer = g_boxed_copy (type, list->data.v_pointer);
       else
        new_list->data.v_pointer = NULL;
+      break;
+    default:
+      g_warning ("Unsupported node type (%s) copied.", g_type_name (type));
+      break;
     }
-  else
-    g_warning ("Unsupported node type (%s) copied.", g_type_name (type));
 
   return new_list;
 }
 
+gint
+gtk_tree_data_list_compare_func (GtkTreeModel *model,
+                                GtkTreeIter  *a,
+                                GtkTreeIter  *b,
+                                gpointer      user_data)
+{
+  gint column = GPOINTER_TO_INT (user_data);
+  GType type = gtk_tree_model_get_column_type (model, column);
+  GValue a_value = {0, };
+  GValue b_value = {0, };
+  gint retval;
+  const gchar *stra, *strb;
+
+  gtk_tree_model_get_value (model, a, column, &a_value);
+  gtk_tree_model_get_value (model, b, column, &b_value);
+
+  switch (G_TYPE_FUNDAMENTAL (type))
+    {
+    case G_TYPE_BOOLEAN:
+      if (g_value_get_int (&a_value) < g_value_get_int (&b_value))
+       retval = -1;
+      else if (g_value_get_int (&a_value) == g_value_get_int (&b_value))
+       retval = 0;
+      else
+       retval = 1;
+      break;
+    case G_TYPE_CHAR:
+      if (g_value_get_char (&a_value) < g_value_get_char (&b_value))
+       retval = -1;
+      else if (g_value_get_char (&a_value) == g_value_get_char (&b_value))
+       retval = 0;
+      else
+       retval = 1;
+      break;
+    case G_TYPE_UCHAR:
+      if (g_value_get_uchar (&a_value) < g_value_get_uchar (&b_value))
+       retval = -1;
+      else if (g_value_get_uchar (&a_value) == g_value_get_uchar (&b_value))
+       retval = 0;
+      else
+       retval = 1;
+      break;
+    case G_TYPE_INT:
+      if (g_value_get_int (&a_value) < g_value_get_int (&b_value))
+       retval = -1;
+      else if (g_value_get_int (&a_value) == g_value_get_int (&b_value))
+       retval = 0;
+      else
+       retval = 1;
+      break;
+    case G_TYPE_UINT:
+      if (g_value_get_uint (&a_value) < g_value_get_uint (&b_value))
+       retval = -1;
+      else if (g_value_get_uint (&a_value) == g_value_get_uint (&b_value))
+       retval = 0;
+      else
+       retval = 1;
+      break;
+    case G_TYPE_ENUM:
+      /* this is somewhat bogus. */
+      if (g_value_get_int (&a_value) < g_value_get_int (&b_value))
+       retval = -1;
+      else if (g_value_get_int (&a_value) == g_value_get_int (&b_value))
+       retval = 0;
+      else
+       retval = 1;
+      break;
+    case G_TYPE_FLAGS:
+      /* this is even more bogus. */
+      if (g_value_get_uint (&a_value) < g_value_get_uint (&b_value))
+       retval = -1;
+      else if (g_value_get_uint (&a_value) == g_value_get_uint (&b_value))
+       retval = 0;
+      else
+       retval = 1;
+      break;
+    case G_TYPE_FLOAT:
+      if (g_value_get_float (&a_value) < g_value_get_float (&b_value))
+       retval = -1;
+      else if (g_value_get_float (&a_value) == g_value_get_float (&b_value))
+       retval = 0;
+      else
+       retval = 1;
+      break;
+    case G_TYPE_DOUBLE:
+      if (g_value_get_double (&a_value) < g_value_get_double (&b_value))
+       retval = -1;
+      else if (g_value_get_double (&a_value) == g_value_get_double (&b_value))
+       retval = 0;
+      else
+       retval = 1;
+      break;
+    case G_TYPE_STRING:
+      stra = g_value_get_string (&a_value);
+      strb = g_value_get_string (&b_value);
+      if (stra == NULL) stra = "";
+      if (strb == NULL) strb = "";
+      retval = g_utf8_collate (stra, strb);
+      break;
+    case G_TYPE_POINTER:
+    case G_TYPE_BOXED:
+    case G_TYPE_OBJECT:
+    default:
+      g_warning ("Attempting to sort on invalid type %s\n", g_type_name (type));
+      retval = FALSE;
+      break;
+    }
+
+  g_value_unset (&a_value);
+  g_value_unset (&b_value);
+
+  return retval;
+}
+
+
+GList *
+_gtk_tree_data_list_header_new (gint   n_columns,
+                               GType *types)
+{
+  GList *retval = NULL;
+
+  gint i;
+
+  for (i = 0; i < n_columns; i ++)
+    {
+      GtkTreeDataSortHeader *header;
+
+      header = g_new (GtkTreeDataSortHeader, 1);
+
+      retval = g_list_prepend (retval, header);
+      header->sort_column_id = i;
+      header->func = gtk_tree_data_list_compare_func;
+      header->destroy = NULL;
+      header->data = GINT_TO_POINTER (i);
+    }
+  return g_list_reverse (retval);
+}
+
+void
+_gtk_tree_data_list_header_free (GList *list)
+{
+  GList *tmp;
 
+  for (tmp = list; tmp; tmp = tmp->next)
+    {
+      GtkTreeDataSortHeader *header = (GtkTreeDataSortHeader *) tmp->data;
 
+      if (header->destroy)
+       {
+         GtkDestroyNotify d = header->destroy;
+
+         header->destroy = NULL;
+         d (header->data);
+       }
+
+      g_free (header);
+    }
+  g_list_free (list);
+}
+
+GtkTreeDataSortHeader *
+_gtk_tree_data_list_get_header (GList *header_list,
+                               gint   sort_column_id)
+{
+  GtkTreeDataSortHeader *header = NULL;
+
+  for (; header_list; header_list = header_list->next)
+    {
+      header = (GtkTreeDataSortHeader*) header_list->data;
+      if (header->sort_column_id == sort_column_id)
+       return header;
+    }
+  return NULL;
+}