Blame tests/prop-editor.c

Packit Service fb6fa5
/* prop-editor.c
Packit Service fb6fa5
 * Copyright (C) 2000  Red Hat, Inc.
Packit Service fb6fa5
 *
Packit Service fb6fa5
 * This library is free software; you can redistribute it and/or
Packit Service fb6fa5
 * modify it under the terms of the GNU Library General Public
Packit Service fb6fa5
 * License as published by the Free Software Foundation; either
Packit Service fb6fa5
 * version 2 of the License, or (at your option) any later version.
Packit Service fb6fa5
 *
Packit Service fb6fa5
 * This library is distributed in the hope that it will be useful,
Packit Service fb6fa5
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit Service fb6fa5
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
Packit Service fb6fa5
 * Library General Public License for more details.
Packit Service fb6fa5
 *
Packit Service fb6fa5
 * You should have received a copy of the GNU Library General Public
Packit Service fb6fa5
 * License along with this library; if not, write to the
Packit Service fb6fa5
 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
Packit Service fb6fa5
 * Boston, MA 02111-1307, USA.
Packit Service fb6fa5
 */
Packit Service fb6fa5
Packit Service fb6fa5
#include <string.h>
Packit Service fb6fa5
Packit Service fb6fa5
#include <gtk/gtk.h>
Packit Service fb6fa5
Packit Service fb6fa5
#include "prop-editor.h"
Packit Service fb6fa5
Packit Service fb6fa5
Packit Service fb6fa5
typedef struct
Packit Service fb6fa5
{
Packit Service fb6fa5
  gpointer instance;
Packit Service fb6fa5
  GObject *alive_object;
Packit Service fb6fa5
  guint id;
Packit Service fb6fa5
} DisconnectData;
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
disconnect_func (gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  DisconnectData *dd = data;
Packit Service fb6fa5
  
Packit Service fb6fa5
  g_signal_handler_disconnect (dd->instance, dd->id);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
signal_removed (gpointer  data,
Packit Service fb6fa5
		GClosure *closure)
Packit Service fb6fa5
{
Packit Service fb6fa5
  DisconnectData *dd = data;
Packit Service fb6fa5
Packit Service fb6fa5
  g_object_steal_data (dd->alive_object, "alive-object-data");
Packit Service fb6fa5
  g_free (dd);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static gboolean
Packit Service fb6fa5
is_child_property (GParamSpec *pspec)
Packit Service fb6fa5
{
Packit Service fb6fa5
  return g_param_spec_get_qdata (pspec, g_quark_from_string ("is-child-prop")) != NULL;
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
mark_child_property (GParamSpec *pspec)
Packit Service fb6fa5
{
Packit Service fb6fa5
  g_param_spec_set_qdata (pspec, g_quark_from_string ("is-child-prop"), 
Packit Service fb6fa5
			  GINT_TO_POINTER (TRUE));
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
g_object_connect_property (GObject     *object,
Packit Service fb6fa5
			   GParamSpec  *spec,
Packit Service fb6fa5
                           GCallback    func,
Packit Service fb6fa5
                           gpointer     data,
Packit Service fb6fa5
                           GObject     *alive_object)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GClosure *closure;
Packit Service fb6fa5
  gchar *with_detail;
Packit Service fb6fa5
  DisconnectData *dd;
Packit Service fb6fa5
Packit Service fb6fa5
  if (is_child_property (spec))
Packit Service fb6fa5
    with_detail = g_strconcat ("child-notify::", spec->name, NULL);
Packit Service fb6fa5
  else
Packit Service fb6fa5
    with_detail = g_strconcat ("notify::", spec->name, NULL);
Packit Service fb6fa5
Packit Service fb6fa5
  dd = g_new (DisconnectData, 1);
Packit Service fb6fa5
Packit Service fb6fa5
  closure = g_cclosure_new (func, data, NULL);
Packit Service fb6fa5
Packit Service fb6fa5
  g_closure_add_invalidate_notifier (closure, dd, signal_removed);
Packit Service fb6fa5
Packit Service fb6fa5
  dd->id = g_signal_connect_closure (object, with_detail,
Packit Service fb6fa5
				     closure, FALSE);
Packit Service fb6fa5
Packit Service fb6fa5
  dd->instance = object;
Packit Service fb6fa5
  dd->alive_object = alive_object;
Packit Service fb6fa5
  
Packit Service fb6fa5
  g_object_set_data_full (G_OBJECT (alive_object),
Packit Service fb6fa5
                          "alive-object-data",
Packit Service fb6fa5
                          dd,
Packit Service fb6fa5
                          disconnect_func);
Packit Service fb6fa5
  
Packit Service fb6fa5
  g_free (with_detail);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
typedef struct 
Packit Service fb6fa5
{
Packit Service fb6fa5
  GObject *obj;
Packit Service fb6fa5
  GParamSpec *spec;
Packit Service fb6fa5
  gint modified_id;
Packit Service fb6fa5
} ObjectProperty;
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
free_object_property (ObjectProperty *p)
Packit Service fb6fa5
{
Packit Service fb6fa5
  g_free (p);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
connect_controller (GObject     *controller,
Packit Service fb6fa5
                    const gchar *signal,
Packit Service fb6fa5
                    GObject     *model,
Packit Service fb6fa5
		    GParamSpec  *spec,
Packit Service fb6fa5
                    GCallback    func)
Packit Service fb6fa5
{
Packit Service fb6fa5
  ObjectProperty *p;
Packit Service fb6fa5
Packit Service fb6fa5
  p = g_new (ObjectProperty, 1);
Packit Service fb6fa5
  p->obj = model;
Packit Service fb6fa5
  p->spec = spec;
Packit Service fb6fa5
Packit Service fb6fa5
  p->modified_id = g_signal_connect_data (controller, signal, func, p,
Packit Service fb6fa5
					  (GClosureNotify)free_object_property,
Packit Service fb6fa5
					  0);
Packit Service fb6fa5
  g_object_set_data (controller, "object-property", p);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
block_controller (GObject *controller)
Packit Service fb6fa5
{
Packit Service fb6fa5
  ObjectProperty *p = g_object_get_data (controller, "object-property");
Packit Service fb6fa5
Packit Service fb6fa5
  if (p)
Packit Service fb6fa5
    g_signal_handler_block (controller, p->modified_id);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
unblock_controller (GObject *controller)
Packit Service fb6fa5
{
Packit Service fb6fa5
  ObjectProperty *p = g_object_get_data (controller, "object-property");
Packit Service fb6fa5
Packit Service fb6fa5
  if (p)
Packit Service fb6fa5
    g_signal_handler_unblock (controller, p->modified_id);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
int_modified (GtkAdjustment *adj, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  ObjectProperty *p = data;
Packit Service fb6fa5
Packit Service fb6fa5
  if (is_child_property (p->spec))
Packit Service fb6fa5
    {
Packit Service fb6fa5
      GtkWidget *widget = GTK_WIDGET (p->obj);
Packit Service fb6fa5
      GtkWidget *parent = gtk_widget_get_parent (widget);
Packit Service fb6fa5
Packit Service fb6fa5
      gtk_container_child_set (GTK_CONTAINER (parent), 
Packit Service fb6fa5
			       widget, p->spec->name, (int) adj->value, NULL);
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else
Packit Service fb6fa5
    g_object_set (p->obj, p->spec->name, (int) adj->value, NULL);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
get_property_value (GObject *object, GParamSpec *pspec, GValue *value)
Packit Service fb6fa5
{
Packit Service fb6fa5
  if (is_child_property (pspec))
Packit Service fb6fa5
    {
Packit Service fb6fa5
      GtkWidget *widget = GTK_WIDGET (object);
Packit Service fb6fa5
      GtkWidget *parent = gtk_widget_get_parent (widget);
Packit Service fb6fa5
Packit Service fb6fa5
      gtk_container_child_get_property (GTK_CONTAINER (parent),
Packit Service fb6fa5
					widget, pspec->name, value);
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else
Packit Service fb6fa5
    g_object_get_property (object, pspec->name, value);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
int_changed (GObject *object, GParamSpec *pspec, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GtkAdjustment *adj = GTK_ADJUSTMENT (data);
Packit Service fb6fa5
  GValue val = { 0, };  
Packit Service fb6fa5
Packit Service fb6fa5
  g_value_init (&val, G_TYPE_INT);
Packit Service fb6fa5
Packit Service fb6fa5
  get_property_value (object, pspec, &val;;
Packit Service fb6fa5
Packit Service fb6fa5
  if (g_value_get_int (&val) != (int)adj->value)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      block_controller (G_OBJECT (adj));
Packit Service fb6fa5
      gtk_adjustment_set_value (adj, g_value_get_int (&val));
Packit Service fb6fa5
      unblock_controller (G_OBJECT (adj));
Packit Service fb6fa5
    }
Packit Service fb6fa5
Packit Service fb6fa5
  g_value_unset (&val;;
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
uint_modified (GtkAdjustment *adj, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  ObjectProperty *p = data;
Packit Service fb6fa5
Packit Service fb6fa5
  if (is_child_property (p->spec))
Packit Service fb6fa5
    {
Packit Service fb6fa5
      GtkWidget *widget = GTK_WIDGET (p->obj);
Packit Service fb6fa5
      GtkWidget *parent = gtk_widget_get_parent (widget);
Packit Service fb6fa5
Packit Service fb6fa5
      gtk_container_child_set (GTK_CONTAINER (parent), 
Packit Service fb6fa5
			       widget, p->spec->name, (guint) adj->value, NULL);
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else
Packit Service fb6fa5
    g_object_set (p->obj, p->spec->name, (guint) adj->value, NULL);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
uint_changed (GObject *object, GParamSpec *pspec, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GtkAdjustment *adj = GTK_ADJUSTMENT (data);
Packit Service fb6fa5
  GValue val = { 0, };  
Packit Service fb6fa5
Packit Service fb6fa5
  g_value_init (&val, G_TYPE_UINT);
Packit Service fb6fa5
  get_property_value (object, pspec, &val;;
Packit Service fb6fa5
Packit Service fb6fa5
  if (g_value_get_uint (&val) != (guint)adj->value)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      block_controller (G_OBJECT (adj));
Packit Service fb6fa5
      gtk_adjustment_set_value (adj, g_value_get_uint (&val));
Packit Service fb6fa5
      unblock_controller (G_OBJECT (adj));
Packit Service fb6fa5
    }
Packit Service fb6fa5
Packit Service fb6fa5
  g_value_unset (&val;;
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
float_modified (GtkAdjustment *adj, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  ObjectProperty *p = data;
Packit Service fb6fa5
Packit Service fb6fa5
  if (is_child_property (p->spec))
Packit Service fb6fa5
    {
Packit Service fb6fa5
      GtkWidget *widget = GTK_WIDGET (p->obj);
Packit Service fb6fa5
      GtkWidget *parent = gtk_widget_get_parent (widget);
Packit Service fb6fa5
Packit Service fb6fa5
      gtk_container_child_set (GTK_CONTAINER (parent), 
Packit Service fb6fa5
			       widget, p->spec->name, (float) adj->value, NULL);
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else
Packit Service fb6fa5
    g_object_set (p->obj, p->spec->name, (float) adj->value, NULL);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
float_changed (GObject *object, GParamSpec *pspec, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GtkAdjustment *adj = GTK_ADJUSTMENT (data);
Packit Service fb6fa5
  GValue val = { 0, };  
Packit Service fb6fa5
Packit Service fb6fa5
  g_value_init (&val, G_TYPE_FLOAT);
Packit Service fb6fa5
  get_property_value (object, pspec, &val;;
Packit Service fb6fa5
Packit Service fb6fa5
  if (g_value_get_float (&val) != (float) adj->value)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      block_controller (G_OBJECT (adj));
Packit Service fb6fa5
      gtk_adjustment_set_value (adj, g_value_get_float (&val));
Packit Service fb6fa5
      unblock_controller (G_OBJECT (adj));
Packit Service fb6fa5
    }
Packit Service fb6fa5
Packit Service fb6fa5
  g_value_unset (&val;;
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
double_modified (GtkAdjustment *adj, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  ObjectProperty *p = data;
Packit Service fb6fa5
Packit Service fb6fa5
  if (is_child_property (p->spec))
Packit Service fb6fa5
    {
Packit Service fb6fa5
      GtkWidget *widget = GTK_WIDGET (p->obj);
Packit Service fb6fa5
      GtkWidget *parent = gtk_widget_get_parent (widget);
Packit Service fb6fa5
Packit Service fb6fa5
      gtk_container_child_set (GTK_CONTAINER (parent), 
Packit Service fb6fa5
			       widget, p->spec->name, (double) adj->value, NULL);
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else
Packit Service fb6fa5
    g_object_set (p->obj, p->spec->name, (double) adj->value, NULL);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
double_changed (GObject *object, GParamSpec *pspec, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GtkAdjustment *adj = GTK_ADJUSTMENT (data);
Packit Service fb6fa5
  GValue val = { 0, };  
Packit Service fb6fa5
Packit Service fb6fa5
  g_value_init (&val, G_TYPE_DOUBLE);
Packit Service fb6fa5
  get_property_value (object, pspec, &val;;
Packit Service fb6fa5
Packit Service fb6fa5
  if (g_value_get_double (&val) != adj->value)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      block_controller (G_OBJECT (adj));
Packit Service fb6fa5
      gtk_adjustment_set_value (adj, g_value_get_double (&val));
Packit Service fb6fa5
      unblock_controller (G_OBJECT (adj));
Packit Service fb6fa5
    }
Packit Service fb6fa5
Packit Service fb6fa5
  g_value_unset (&val;;
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
string_modified (GtkEntry *entry, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  ObjectProperty *p = data;
Packit Service fb6fa5
  const gchar *text;
Packit Service fb6fa5
Packit Service fb6fa5
  text = gtk_entry_get_text (entry);
Packit Service fb6fa5
Packit Service fb6fa5
  if (is_child_property (p->spec))
Packit Service fb6fa5
    {
Packit Service fb6fa5
      GtkWidget *widget = GTK_WIDGET (p->obj);
Packit Service fb6fa5
      GtkWidget *parent = gtk_widget_get_parent (widget);
Packit Service fb6fa5
Packit Service fb6fa5
      gtk_container_child_set (GTK_CONTAINER (parent), 
Packit Service fb6fa5
			       widget, p->spec->name, text, NULL);
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else
Packit Service fb6fa5
    g_object_set (p->obj, p->spec->name, text, NULL);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
string_changed (GObject *object, GParamSpec *pspec, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GtkEntry *entry = GTK_ENTRY (data);
Packit Service fb6fa5
  GValue val = { 0, };  
Packit Service fb6fa5
  const gchar *str;
Packit Service fb6fa5
  const gchar *text;
Packit Service fb6fa5
  
Packit Service fb6fa5
  g_value_init (&val, G_TYPE_STRING);
Packit Service fb6fa5
  get_property_value (object, pspec, &val;;
Packit Service fb6fa5
Packit Service fb6fa5
  str = g_value_get_string (&val;;
Packit Service fb6fa5
  if (str == NULL)
Packit Service fb6fa5
    str = "";
Packit Service fb6fa5
  text = gtk_entry_get_text (entry);
Packit Service fb6fa5
Packit Service fb6fa5
  if (strcmp (str, text) != 0)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      block_controller (G_OBJECT (entry));
Packit Service fb6fa5
      gtk_entry_set_text (entry, str);
Packit Service fb6fa5
      unblock_controller (G_OBJECT (entry));
Packit Service fb6fa5
    }
Packit Service fb6fa5
  
Packit Service fb6fa5
  g_value_unset (&val;;
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
bool_modified (GtkToggleButton *tb, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  ObjectProperty *p = data;
Packit Service fb6fa5
Packit Service fb6fa5
  if (is_child_property (p->spec))
Packit Service fb6fa5
    {
Packit Service fb6fa5
      GtkWidget *widget = GTK_WIDGET (p->obj);
Packit Service fb6fa5
      GtkWidget *parent = gtk_widget_get_parent (widget);
Packit Service fb6fa5
Packit Service fb6fa5
      gtk_container_child_set (GTK_CONTAINER (parent), 
Packit Service fb6fa5
			       widget, p->spec->name, (int) tb->active, NULL);
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else
Packit Service fb6fa5
    g_object_set (p->obj, p->spec->name, (int) tb->active, NULL);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
bool_changed (GObject *object, GParamSpec *pspec, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GtkToggleButton *tb = GTK_TOGGLE_BUTTON (data);
Packit Service fb6fa5
  GValue val = { 0, };  
Packit Service fb6fa5
  
Packit Service fb6fa5
  g_value_init (&val, G_TYPE_BOOLEAN);
Packit Service fb6fa5
  get_property_value (object, pspec, &val;;
Packit Service fb6fa5
Packit Service fb6fa5
  if (g_value_get_boolean (&val) != tb->active)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      block_controller (G_OBJECT (tb));
Packit Service fb6fa5
      gtk_toggle_button_set_active (tb, g_value_get_boolean (&val));
Packit Service fb6fa5
      unblock_controller (G_OBJECT (tb));
Packit Service fb6fa5
    }
Packit Service fb6fa5
Packit Service fb6fa5
  gtk_label_set_text (GTK_LABEL (GTK_BIN (tb)->child), g_value_get_boolean (&val) ?
Packit Service fb6fa5
                      "TRUE" : "FALSE");
Packit Service fb6fa5
  
Packit Service fb6fa5
  g_value_unset (&val;;
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
enum_modified (GtkComboBox *cb, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  ObjectProperty *p = data;
Packit Service fb6fa5
  gint i;
Packit Service fb6fa5
  GEnumClass *eclass;
Packit Service fb6fa5
  
Packit Service fb6fa5
  eclass = G_ENUM_CLASS (g_type_class_peek (p->spec->value_type));
Packit Service fb6fa5
Packit Service fb6fa5
  i = gtk_combo_box_get_active (cb);
Packit Service fb6fa5
Packit Service fb6fa5
  if (is_child_property (p->spec))
Packit Service fb6fa5
    {
Packit Service fb6fa5
      GtkWidget *widget = GTK_WIDGET (p->obj);
Packit Service fb6fa5
      GtkWidget *parent = gtk_widget_get_parent (widget);
Packit Service fb6fa5
Packit Service fb6fa5
      gtk_container_child_set (GTK_CONTAINER (parent), 
Packit Service fb6fa5
			       widget, p->spec->name, eclass->values[i].value, NULL);
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else
Packit Service fb6fa5
    g_object_set (p->obj, p->spec->name, eclass->values[i].value, NULL);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
enum_changed (GObject *object, GParamSpec *pspec, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GtkComboBox *cb = GTK_COMBO_BOX (data);
Packit Service fb6fa5
  GValue val = { 0, };  
Packit Service fb6fa5
  GEnumClass *eclass;
Packit Service fb6fa5
  gint i;
Packit Service fb6fa5
Packit Service fb6fa5
  eclass = G_ENUM_CLASS (g_type_class_peek (pspec->value_type));
Packit Service fb6fa5
  
Packit Service fb6fa5
  g_value_init (&val, pspec->value_type);
Packit Service fb6fa5
  get_property_value (object, pspec, &val;;
Packit Service fb6fa5
Packit Service fb6fa5
  i = 0;
Packit Service fb6fa5
  while (i < eclass->n_values)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      if (eclass->values[i].value == g_value_get_enum (&val))
Packit Service fb6fa5
        break;
Packit Service fb6fa5
      ++i;
Packit Service fb6fa5
    }
Packit Service fb6fa5
  
Packit Service fb6fa5
  if (gtk_combo_box_get_active (cb) != i)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      block_controller (G_OBJECT (cb));
Packit Service fb6fa5
      gtk_combo_box_set_active (cb, i);
Packit Service fb6fa5
      unblock_controller (G_OBJECT (cb));
Packit Service fb6fa5
    }
Packit Service fb6fa5
  
Packit Service fb6fa5
  g_value_unset (&val;;
Packit Service fb6fa5
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
flags_modified (GtkCheckButton *button, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  ObjectProperty *p = data;
Packit Service fb6fa5
  gboolean active;
Packit Service fb6fa5
  GFlagsClass *fclass;
Packit Service fb6fa5
  guint flags;
Packit Service fb6fa5
  gint i;
Packit Service fb6fa5
  
Packit Service fb6fa5
  fclass = G_FLAGS_CLASS (g_type_class_peek (p->spec->value_type));
Packit Service fb6fa5
  
Packit Service fb6fa5
  active = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (button));
Packit Service fb6fa5
  i = GPOINTER_TO_INT (g_object_get_data (G_OBJECT (button), "index"));
Packit Service fb6fa5
Packit Service fb6fa5
  if (is_child_property (p->spec))
Packit Service fb6fa5
    {
Packit Service fb6fa5
      GtkWidget *widget = GTK_WIDGET (p->obj);
Packit Service fb6fa5
      GtkWidget *parent = gtk_widget_get_parent (widget);
Packit Service fb6fa5
Packit Service fb6fa5
      gtk_container_child_get (GTK_CONTAINER (parent), 
Packit Service fb6fa5
			       widget, p->spec->name, &flags, NULL);
Packit Service fb6fa5
      if (active)
Packit Service fb6fa5
        flags |= fclass->values[i].value;
Packit Service fb6fa5
      else
Packit Service fb6fa5
        flags &= ~fclass->values[i].value;
Packit Service fb6fa5
Packit Service fb6fa5
      gtk_container_child_set (GTK_CONTAINER (parent), 
Packit Service fb6fa5
			       widget, p->spec->name, flags, NULL);
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else
Packit Service fb6fa5
    {
Packit Service fb6fa5
      g_object_get (p->obj, p->spec->name, &flags, NULL);
Packit Service fb6fa5
Packit Service fb6fa5
      if (active)
Packit Service fb6fa5
        flags |= fclass->values[i].value;
Packit Service fb6fa5
      else
Packit Service fb6fa5
        flags &= ~fclass->values[i].value;
Packit Service fb6fa5
Packit Service fb6fa5
      g_object_set (p->obj, p->spec->name, flags, NULL);
Packit Service fb6fa5
    }
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
flags_changed (GObject *object, GParamSpec *pspec, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GList *children, *c;
Packit Service fb6fa5
  GValue val = { 0, };  
Packit Service fb6fa5
  GFlagsClass *fclass;
Packit Service fb6fa5
  guint flags;
Packit Service fb6fa5
  gint i;
Packit Service fb6fa5
Packit Service fb6fa5
  fclass = G_FLAGS_CLASS (g_type_class_peek (pspec->value_type));
Packit Service fb6fa5
  
Packit Service fb6fa5
  g_value_init (&val, pspec->value_type);
Packit Service fb6fa5
  get_property_value (object, pspec, &val;;
Packit Service fb6fa5
  flags = g_value_get_flags (&val;;
Packit Service fb6fa5
  g_value_unset (&val;;
Packit Service fb6fa5
Packit Service fb6fa5
  children = gtk_container_get_children (GTK_CONTAINER (data));
Packit Service fb6fa5
Packit Service fb6fa5
  for (c = children, i = 0; c; c = c->next, i++)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      block_controller (G_OBJECT (c->data));
Packit Service fb6fa5
      gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (c->data),
Packit Service fb6fa5
                                    (fclass->values[i].value & flags) != 0);
Packit Service fb6fa5
      unblock_controller (G_OBJECT (c->data));
Packit Service fb6fa5
    }
Packit Service fb6fa5
Packit Service fb6fa5
  g_list_free (children);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static gunichar
Packit Service fb6fa5
unichar_get_value (GtkEntry *entry)
Packit Service fb6fa5
{
Packit Service fb6fa5
  const gchar *text = gtk_entry_get_text (entry);
Packit Service fb6fa5
  
Packit Service fb6fa5
  if (text[0])
Packit Service fb6fa5
    return g_utf8_get_char (text);
Packit Service fb6fa5
  else
Packit Service fb6fa5
    return 0;
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
unichar_modified (GtkEntry *entry, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  ObjectProperty *p = data;
Packit Service fb6fa5
  gunichar val = unichar_get_value (entry);
Packit Service fb6fa5
Packit Service fb6fa5
  if (is_child_property (p->spec))
Packit Service fb6fa5
    {
Packit Service fb6fa5
      GtkWidget *widget = GTK_WIDGET (p->obj);
Packit Service fb6fa5
      GtkWidget *parent = gtk_widget_get_parent (widget);
Packit Service fb6fa5
Packit Service fb6fa5
      gtk_container_child_set (GTK_CONTAINER (parent), 
Packit Service fb6fa5
			       widget, p->spec->name, val, NULL);
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else
Packit Service fb6fa5
    g_object_set (p->obj, p->spec->name, val, NULL);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
unichar_changed (GObject *object, GParamSpec *pspec, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GtkEntry *entry = GTK_ENTRY (data);
Packit Service fb6fa5
  gunichar new_val;
Packit Service fb6fa5
  gunichar old_val = unichar_get_value (entry);
Packit Service fb6fa5
  GValue val = { 0, };
Packit Service fb6fa5
  gchar buf[7];
Packit Service fb6fa5
  gint len;
Packit Service fb6fa5
  
Packit Service fb6fa5
  g_value_init (&val, pspec->value_type);
Packit Service fb6fa5
  get_property_value (object, pspec, &val;;
Packit Service fb6fa5
  new_val = (gunichar)g_value_get_uint (&val;;
Packit Service fb6fa5
Packit Service fb6fa5
  if (new_val != old_val)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      if (!new_val)
Packit Service fb6fa5
	len = 0;
Packit Service fb6fa5
      else
Packit Service fb6fa5
	len = g_unichar_to_utf8 (new_val, buf);
Packit Service fb6fa5
      
Packit Service fb6fa5
      buf[len] = '\0';
Packit Service fb6fa5
      
Packit Service fb6fa5
      block_controller (G_OBJECT (entry));
Packit Service fb6fa5
      gtk_entry_set_text (entry, buf);
Packit Service fb6fa5
      unblock_controller (G_OBJECT (entry));
Packit Service fb6fa5
    }
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
pointer_changed (GObject *object, GParamSpec *pspec, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GtkLabel *label = GTK_LABEL (data);
Packit Service fb6fa5
  gchar *str;
Packit Service fb6fa5
  gpointer ptr;
Packit Service fb6fa5
  
Packit Service fb6fa5
  g_object_get (object, pspec->name, &ptr, NULL);
Packit Service fb6fa5
Packit Service fb6fa5
  str = g_strdup_printf ("Pointer: %p", ptr);
Packit Service fb6fa5
  gtk_label_set_text (label, str);
Packit Service fb6fa5
  g_free (str);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static gchar *
Packit Service fb6fa5
object_label (GObject *obj, GParamSpec *pspec)
Packit Service fb6fa5
{
Packit Service fb6fa5
  const gchar *name;
Packit Service fb6fa5
Packit Service fb6fa5
  if (obj)
Packit Service fb6fa5
    name = g_type_name (G_TYPE_FROM_INSTANCE (obj));
Packit Service fb6fa5
  else if (pspec)
Packit Service fb6fa5
    name = g_type_name (G_PARAM_SPEC_VALUE_TYPE (pspec));
Packit Service fb6fa5
  else
Packit Service fb6fa5
    name = "unknown";
Packit Service fb6fa5
  return g_strdup_printf ("Object: %p (%s)", obj, name);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
object_changed (GObject *object, GParamSpec *pspec, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GtkWidget *label, *button;
Packit Service fb6fa5
  gchar *str;
Packit Service fb6fa5
  GObject *obj;
Packit Service fb6fa5
  
Packit Service fb6fa5
  GList *children = gtk_container_get_children (GTK_CONTAINER (data)); 
Packit Service fb6fa5
  label = GTK_WIDGET (children->data);
Packit Service fb6fa5
  button = GTK_WIDGET (children->next->data);
Packit Service fb6fa5
  g_object_get (object, pspec->name, &obj, NULL);
Packit Service fb6fa5
  g_list_free (children);
Packit Service fb6fa5
Packit Service fb6fa5
  str = object_label (obj, pspec);
Packit Service fb6fa5
  
Packit Service fb6fa5
  gtk_label_set_text (GTK_LABEL (label), str);
Packit Service fb6fa5
  gtk_widget_set_sensitive (button, G_IS_OBJECT (obj));
Packit Service fb6fa5
Packit Service fb6fa5
  if (obj)
Packit Service fb6fa5
    g_object_unref (obj);
Packit Service fb6fa5
Packit Service fb6fa5
  g_free (str);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
model_destroy (gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  g_object_steal_data (data, "model-object");
Packit Service fb6fa5
  gtk_widget_destroy (data);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
window_destroy (gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  g_object_steal_data (data, "prop-editor-win");
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
object_properties (GtkWidget *button, 
Packit Service fb6fa5
		   GObject   *object)
Packit Service fb6fa5
{
Packit Service fb6fa5
  gchar *name;
Packit Service fb6fa5
  GObject *obj;
Packit Service fb6fa5
Packit Service fb6fa5
  name = (gchar *) g_object_get_data (G_OBJECT (button), "property-name");
Packit Service fb6fa5
  g_object_get (object, name, &obj, NULL);
Packit Service fb6fa5
  if (G_IS_OBJECT (obj)) 
Packit Service fb6fa5
    create_prop_editor (obj, 0);
Packit Service fb6fa5
}
Packit Service fb6fa5
 
Packit Service fb6fa5
static void
Packit Service fb6fa5
color_modified (GtkColorButton *cb, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  ObjectProperty *p = data;
Packit Service fb6fa5
  GdkColor color;
Packit Service fb6fa5
Packit Service fb6fa5
  gtk_color_button_get_color (cb, &color;;
Packit Service fb6fa5
Packit Service fb6fa5
  if (is_child_property (p->spec))
Packit Service fb6fa5
    {
Packit Service fb6fa5
      GtkWidget *widget = GTK_WIDGET (p->obj);
Packit Service fb6fa5
      GtkWidget *parent = gtk_widget_get_parent (widget);
Packit Service fb6fa5
Packit Service fb6fa5
      gtk_container_child_set (GTK_CONTAINER (parent),
Packit Service fb6fa5
			       widget, p->spec->name, &color, NULL);
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else
Packit Service fb6fa5
    g_object_set (p->obj, p->spec->name, &color, NULL);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
color_changed (GObject *object, GParamSpec *pspec, gpointer data)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GtkColorButton *cb = GTK_COLOR_BUTTON (data);
Packit Service fb6fa5
  GValue val = { 0, };
Packit Service fb6fa5
  GdkColor *color;
Packit Service fb6fa5
  GdkColor cb_color;
Packit Service fb6fa5
Packit Service fb6fa5
  g_value_init (&val, GDK_TYPE_COLOR);
Packit Service fb6fa5
  get_property_value (object, pspec, &val;;
Packit Service fb6fa5
Packit Service fb6fa5
  color = g_value_get_boxed (&val;;
Packit Service fb6fa5
  gtk_color_button_get_color (cb, &cb_color);
Packit Service fb6fa5
Packit Service fb6fa5
  if (color != NULL && !gdk_color_equal (color, &cb_color))
Packit Service fb6fa5
    {
Packit Service fb6fa5
      block_controller (G_OBJECT (cb));
Packit Service fb6fa5
      gtk_color_button_set_color (cb, color);
Packit Service fb6fa5
      unblock_controller (G_OBJECT (cb));
Packit Service fb6fa5
    }
Packit Service fb6fa5
Packit Service fb6fa5
  g_value_unset (&val;;
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static GtkWidget *
Packit Service fb6fa5
property_widget (GObject    *object, 
Packit Service fb6fa5
		 GParamSpec *spec, 
Packit Service fb6fa5
		 gboolean    can_modify)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GtkWidget *prop_edit;
Packit Service fb6fa5
  GtkAdjustment *adj;
Packit Service fb6fa5
  gchar *msg;
Packit Service fb6fa5
  GType type = G_PARAM_SPEC_TYPE (spec);
Packit Service fb6fa5
Packit Service fb6fa5
  if (type == G_TYPE_PARAM_INT)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      adj = GTK_ADJUSTMENT (gtk_adjustment_new (G_PARAM_SPEC_INT (spec)->default_value,
Packit Service fb6fa5
						G_PARAM_SPEC_INT (spec)->minimum,
Packit Service fb6fa5
						G_PARAM_SPEC_INT (spec)->maximum,
Packit Service fb6fa5
						1,
Packit Service fb6fa5
						MAX ((G_PARAM_SPEC_INT (spec)->maximum -
Packit Service fb6fa5
						      G_PARAM_SPEC_INT (spec)->minimum) / 10, 1),
Packit Service fb6fa5
						0.0));
Packit Service fb6fa5
      
Packit Service fb6fa5
      prop_edit = gtk_spin_button_new (adj, 1.0, 0);
Packit Service fb6fa5
      
Packit Service fb6fa5
      g_object_connect_property (object, spec, 
Packit Service fb6fa5
				 G_CALLBACK (int_changed), 
Packit Service fb6fa5
				 adj, G_OBJECT (adj));
Packit Service fb6fa5
      
Packit Service fb6fa5
      if (can_modify)
Packit Service fb6fa5
	connect_controller (G_OBJECT (adj), "value_changed",
Packit Service fb6fa5
			    object, spec, G_CALLBACK (int_modified));
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else if (type == G_TYPE_PARAM_UINT)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      adj = GTK_ADJUSTMENT (
Packit Service fb6fa5
			    gtk_adjustment_new (G_PARAM_SPEC_UINT (spec)->default_value,
Packit Service fb6fa5
						G_PARAM_SPEC_UINT (spec)->minimum,
Packit Service fb6fa5
						G_PARAM_SPEC_UINT (spec)->maximum,
Packit Service fb6fa5
						1,
Packit Service fb6fa5
						MAX ((G_PARAM_SPEC_UINT (spec)->maximum -
Packit Service fb6fa5
						      G_PARAM_SPEC_UINT (spec)->minimum) / 10, 1),
Packit Service fb6fa5
						0.0));
Packit Service fb6fa5
      
Packit Service fb6fa5
      prop_edit = gtk_spin_button_new (adj, 1.0, 0);
Packit Service fb6fa5
      
Packit Service fb6fa5
      g_object_connect_property (object, spec, 
Packit Service fb6fa5
				 G_CALLBACK (uint_changed), 
Packit Service fb6fa5
				 adj, G_OBJECT (adj));
Packit Service fb6fa5
      
Packit Service fb6fa5
      if (can_modify)
Packit Service fb6fa5
	connect_controller (G_OBJECT (adj), "value_changed",
Packit Service fb6fa5
			    object, spec, G_CALLBACK (uint_modified));
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else if (type == G_TYPE_PARAM_FLOAT)
Packit Service fb6fa5
    {
Packit Service fb6fa5
Packit Service fb6fa5
      adj = GTK_ADJUSTMENT (gtk_adjustment_new (G_PARAM_SPEC_FLOAT (spec)->default_value,
Packit Service fb6fa5
						G_PARAM_SPEC_FLOAT (spec)->minimum,
Packit Service fb6fa5
						G_PARAM_SPEC_FLOAT (spec)->maximum,
Packit Service fb6fa5
						0.1,
Packit Service fb6fa5
						MAX ((G_PARAM_SPEC_FLOAT (spec)->maximum -
Packit Service fb6fa5
						      G_PARAM_SPEC_FLOAT (spec)->minimum) / 10, 0.1),
Packit Service fb6fa5
						0.0));
Packit Service fb6fa5
      
Packit Service fb6fa5
      prop_edit = gtk_spin_button_new (adj, 0.1, 2);
Packit Service fb6fa5
      
Packit Service fb6fa5
      g_object_connect_property (object, spec, 
Packit Service fb6fa5
				 G_CALLBACK (float_changed), 
Packit Service fb6fa5
				 adj, G_OBJECT (adj));
Packit Service fb6fa5
      
Packit Service fb6fa5
      if (can_modify)
Packit Service fb6fa5
	connect_controller (G_OBJECT (adj), "value_changed",
Packit Service fb6fa5
			    object, spec, G_CALLBACK (float_modified));
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else if (type == G_TYPE_PARAM_DOUBLE)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      adj = GTK_ADJUSTMENT (gtk_adjustment_new (G_PARAM_SPEC_DOUBLE (spec)->default_value,
Packit Service fb6fa5
						G_PARAM_SPEC_DOUBLE (spec)->minimum,
Packit Service fb6fa5
						G_PARAM_SPEC_DOUBLE (spec)->maximum,
Packit Service fb6fa5
						0.1,
Packit Service fb6fa5
						MAX ((G_PARAM_SPEC_DOUBLE (spec)->maximum -
Packit Service fb6fa5
						      G_PARAM_SPEC_DOUBLE (spec)->minimum) / 10, 0.1),
Packit Service fb6fa5
						0.0));
Packit Service fb6fa5
      
Packit Service fb6fa5
      prop_edit = gtk_spin_button_new (adj, 0.1, 2);
Packit Service fb6fa5
      
Packit Service fb6fa5
      g_object_connect_property (object, spec, 
Packit Service fb6fa5
				 G_CALLBACK (double_changed), 
Packit Service fb6fa5
				 adj, G_OBJECT (adj));
Packit Service fb6fa5
      
Packit Service fb6fa5
      if (can_modify)
Packit Service fb6fa5
	connect_controller (G_OBJECT (adj), "value_changed",
Packit Service fb6fa5
			    object, spec, G_CALLBACK (double_modified));
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else if (type == G_TYPE_PARAM_STRING)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      prop_edit = gtk_entry_new ();
Packit Service fb6fa5
      
Packit Service fb6fa5
      g_object_connect_property (object, spec, 
Packit Service fb6fa5
				 G_CALLBACK (string_changed),
Packit Service fb6fa5
				 prop_edit, G_OBJECT (prop_edit));
Packit Service fb6fa5
      
Packit Service fb6fa5
      if (can_modify)
Packit Service fb6fa5
	connect_controller (G_OBJECT (prop_edit), "changed",
Packit Service fb6fa5
			    object, spec, G_CALLBACK (string_modified));
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else if (type == G_TYPE_PARAM_BOOLEAN)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      prop_edit = gtk_toggle_button_new_with_label ("");
Packit Service fb6fa5
      
Packit Service fb6fa5
      g_object_connect_property (object, spec, 
Packit Service fb6fa5
				 G_CALLBACK (bool_changed),
Packit Service fb6fa5
				 prop_edit, G_OBJECT (prop_edit));
Packit Service fb6fa5
      
Packit Service fb6fa5
      if (can_modify)
Packit Service fb6fa5
	connect_controller (G_OBJECT (prop_edit), "toggled",
Packit Service fb6fa5
			    object, spec, G_CALLBACK (bool_modified));
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else if (type == G_TYPE_PARAM_ENUM)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      {
Packit Service fb6fa5
	GEnumClass *eclass;
Packit Service fb6fa5
	gint j;
Packit Service fb6fa5
	
Packit Service fb6fa5
	prop_edit = gtk_combo_box_text_new ();
Packit Service fb6fa5
	
Packit Service fb6fa5
	eclass = G_ENUM_CLASS (g_type_class_ref (spec->value_type));
Packit Service fb6fa5
	
Packit Service fb6fa5
	j = 0;
Packit Service fb6fa5
	while (j < eclass->n_values)
Packit Service fb6fa5
	  {
Packit Service fb6fa5
	    gtk_combo_box_text_append_text (GTK_COMBO_BOX_TEXT (prop_edit),
Packit Service fb6fa5
	                                    eclass->values[j].value_name);
Packit Service fb6fa5
	    ++j;
Packit Service fb6fa5
	  }
Packit Service fb6fa5
	
Packit Service fb6fa5
	g_type_class_unref (eclass);
Packit Service fb6fa5
	
Packit Service fb6fa5
	g_object_connect_property (object, spec,
Packit Service fb6fa5
				   G_CALLBACK (enum_changed),
Packit Service fb6fa5
				   prop_edit, G_OBJECT (prop_edit));
Packit Service fb6fa5
	
Packit Service fb6fa5
	if (can_modify)
Packit Service fb6fa5
	  connect_controller (G_OBJECT (prop_edit), "changed",
Packit Service fb6fa5
			      object, spec, G_CALLBACK (enum_modified));
Packit Service fb6fa5
      }
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else if (type == G_TYPE_PARAM_FLAGS)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      {
Packit Service fb6fa5
	GFlagsClass *fclass;
Packit Service fb6fa5
	gint j;
Packit Service fb6fa5
	
Packit Service fb6fa5
	prop_edit = gtk_vbox_new (FALSE, 0);
Packit Service fb6fa5
	
Packit Service fb6fa5
	fclass = G_FLAGS_CLASS (g_type_class_ref (spec->value_type));
Packit Service fb6fa5
	
Packit Service fb6fa5
	for (j = 0; j < fclass->n_values; j++)
Packit Service fb6fa5
	  {
Packit Service fb6fa5
	    GtkWidget *b;
Packit Service fb6fa5
	    
Packit Service fb6fa5
	    b = gtk_check_button_new_with_label (fclass->values[j].value_name);
Packit Service fb6fa5
            g_object_set_data (G_OBJECT (b), "index", GINT_TO_POINTER (j));
Packit Service fb6fa5
	    gtk_widget_show (b);
Packit Service fb6fa5
	    gtk_box_pack_start (GTK_BOX (prop_edit), b, FALSE, FALSE, 0);
Packit Service fb6fa5
	    if (can_modify) 
Packit Service fb6fa5
	      connect_controller (G_OBJECT (b), "toggled",
Packit Service fb6fa5
	     	                  object, spec, G_CALLBACK (flags_modified));
Packit Service fb6fa5
	  }
Packit Service fb6fa5
	
Packit Service fb6fa5
	g_type_class_unref (fclass);
Packit Service fb6fa5
	
Packit Service fb6fa5
	g_object_connect_property (object, spec,
Packit Service fb6fa5
				   G_CALLBACK (flags_changed),
Packit Service fb6fa5
				   prop_edit, G_OBJECT (prop_edit));
Packit Service fb6fa5
      }
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else if (type == G_TYPE_PARAM_UNICHAR)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      prop_edit = gtk_entry_new ();
Packit Service fb6fa5
      gtk_entry_set_max_length (GTK_ENTRY (prop_edit), 1);
Packit Service fb6fa5
      
Packit Service fb6fa5
      g_object_connect_property (object, spec,
Packit Service fb6fa5
				 G_CALLBACK (unichar_changed),
Packit Service fb6fa5
				 prop_edit, G_OBJECT (prop_edit));
Packit Service fb6fa5
      
Packit Service fb6fa5
      if (can_modify)
Packit Service fb6fa5
	connect_controller (G_OBJECT (prop_edit), "changed",
Packit Service fb6fa5
			    object, spec, G_CALLBACK (unichar_modified));
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else if (type == G_TYPE_PARAM_POINTER)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      prop_edit = gtk_label_new ("");
Packit Service fb6fa5
      
Packit Service fb6fa5
      g_object_connect_property (object, spec, 
Packit Service fb6fa5
				 G_CALLBACK (pointer_changed),
Packit Service fb6fa5
				 prop_edit, G_OBJECT (prop_edit));
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else if (type == G_TYPE_PARAM_OBJECT)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      GtkWidget *label, *button;
Packit Service fb6fa5
Packit Service fb6fa5
      prop_edit = gtk_hbox_new (FALSE, 5);
Packit Service fb6fa5
Packit Service fb6fa5
      label = gtk_label_new ("");
Packit Service fb6fa5
      button = gtk_button_new_with_label ("Properties");
Packit Service fb6fa5
      g_object_set_data (G_OBJECT (button), "property-name", spec->name);
Packit Service fb6fa5
      g_signal_connect (button, "clicked", 
Packit Service fb6fa5
			G_CALLBACK (object_properties), 
Packit Service fb6fa5
			object);
Packit Service fb6fa5
Packit Service fb6fa5
      gtk_container_add (GTK_CONTAINER (prop_edit), label);
Packit Service fb6fa5
      gtk_container_add (GTK_CONTAINER (prop_edit), button);
Packit Service fb6fa5
      
Packit Service fb6fa5
      g_object_connect_property (object, spec,
Packit Service fb6fa5
				 G_CALLBACK (object_changed),
Packit Service fb6fa5
				 prop_edit, G_OBJECT (label));
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else if (type == G_TYPE_PARAM_BOXED &&
Packit Service fb6fa5
           G_PARAM_SPEC_VALUE_TYPE (spec) == GDK_TYPE_COLOR)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      prop_edit = gtk_color_button_new ();
Packit Service fb6fa5
Packit Service fb6fa5
      g_object_connect_property (object, spec,
Packit Service fb6fa5
				 G_CALLBACK (color_changed),
Packit Service fb6fa5
				 prop_edit, G_OBJECT (prop_edit));
Packit Service fb6fa5
Packit Service fb6fa5
      if (can_modify)
Packit Service fb6fa5
	connect_controller (G_OBJECT (prop_edit), "color-set",
Packit Service fb6fa5
			    object, spec, G_CALLBACK (color_modified));
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else
Packit Service fb6fa5
    {  
Packit Service fb6fa5
      msg = g_strdup_printf ("uneditable property type: %s",
Packit Service fb6fa5
			     g_type_name (G_PARAM_SPEC_TYPE (spec)));
Packit Service fb6fa5
      prop_edit = gtk_label_new (msg);            
Packit Service fb6fa5
      g_free (msg);
Packit Service fb6fa5
      gtk_misc_set_alignment (GTK_MISC (prop_edit), 0.0, 0.5);
Packit Service fb6fa5
    }
Packit Service fb6fa5
  
Packit Service fb6fa5
  return prop_edit;
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static GtkWidget *
Packit Service fb6fa5
properties_from_type (GObject *object,
Packit Service fb6fa5
		      GType    type)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GtkWidget *prop_edit;
Packit Service fb6fa5
  GtkWidget *label;
Packit Service fb6fa5
  GtkWidget *sw;
Packit Service fb6fa5
  GtkWidget *vbox;
Packit Service fb6fa5
  GtkWidget *table;
Packit Service fb6fa5
  GParamSpec **specs;
Packit Service fb6fa5
  guint n_specs;
Packit Service fb6fa5
  int i;
Packit Service fb6fa5
Packit Service fb6fa5
  if (G_TYPE_IS_INTERFACE (type))
Packit Service fb6fa5
    {
Packit Service fb6fa5
      gpointer vtable = g_type_default_interface_peek (type);
Packit Service fb6fa5
      specs = g_object_interface_list_properties (vtable, &n_specs);
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else
Packit Service fb6fa5
    {
Packit Service fb6fa5
      GObjectClass *class = G_OBJECT_CLASS (g_type_class_peek (type));
Packit Service fb6fa5
      specs = g_object_class_list_properties (class, &n_specs);
Packit Service fb6fa5
    }
Packit Service fb6fa5
        
Packit Service fb6fa5
  if (n_specs == 0) {
Packit Service fb6fa5
    g_free (specs);
Packit Service fb6fa5
    return NULL;
Packit Service fb6fa5
  }
Packit Service fb6fa5
  
Packit Service fb6fa5
  table = gtk_table_new (n_specs, 2, FALSE);
Packit Service fb6fa5
  gtk_table_set_col_spacing (GTK_TABLE (table), 0, 10);
Packit Service fb6fa5
  gtk_table_set_row_spacings (GTK_TABLE (table), 3);
Packit Service fb6fa5
Packit Service fb6fa5
  i = 0;
Packit Service fb6fa5
  while (i < n_specs)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      GParamSpec *spec = specs[i];
Packit Service fb6fa5
      gboolean can_modify;
Packit Service fb6fa5
      
Packit Service fb6fa5
      prop_edit = NULL;
Packit Service fb6fa5
Packit Service fb6fa5
      can_modify = ((spec->flags & G_PARAM_WRITABLE) != 0 &&
Packit Service fb6fa5
                    (spec->flags & G_PARAM_CONSTRUCT_ONLY) == 0);
Packit Service fb6fa5
      
Packit Service fb6fa5
      if ((spec->flags & G_PARAM_READABLE) == 0)
Packit Service fb6fa5
        {
Packit Service fb6fa5
          /* can't display unreadable properties */
Packit Service fb6fa5
          ++i;
Packit Service fb6fa5
          continue;
Packit Service fb6fa5
        }
Packit Service fb6fa5
      
Packit Service fb6fa5
      if (spec->owner_type != type)
Packit Service fb6fa5
	{
Packit Service fb6fa5
	  /* we're only interested in params of type */
Packit Service fb6fa5
	  ++i;
Packit Service fb6fa5
	  continue;
Packit Service fb6fa5
	}
Packit Service fb6fa5
Packit Service fb6fa5
      label = gtk_label_new (g_param_spec_get_nick (spec));
Packit Service fb6fa5
      gtk_misc_set_alignment (GTK_MISC (label), 0.0, 0.5);
Packit Service fb6fa5
      gtk_table_attach_defaults (GTK_TABLE (table), label, 0, 1, i, i + 1);
Packit Service fb6fa5
      
Packit Service fb6fa5
      prop_edit = property_widget (object, spec, can_modify);
Packit Service fb6fa5
      gtk_table_attach_defaults (GTK_TABLE (table), prop_edit, 1, 2, i, i + 1);
Packit Service fb6fa5
Packit Service fb6fa5
      if (prop_edit)
Packit Service fb6fa5
        {
Packit Service fb6fa5
          if (!can_modify)
Packit Service fb6fa5
            gtk_widget_set_sensitive (prop_edit, FALSE);
Packit Service fb6fa5
Packit Service fb6fa5
	  if (g_param_spec_get_blurb (spec))
Packit Service fb6fa5
	    gtk_widget_set_tooltip_text (prop_edit, g_param_spec_get_blurb (spec));
Packit Service fb6fa5
Packit Service fb6fa5
          /* set initial value */
Packit Service fb6fa5
          g_object_notify (object, spec->name);
Packit Service fb6fa5
        }
Packit Service fb6fa5
      
Packit Service fb6fa5
      ++i;
Packit Service fb6fa5
    }
Packit Service fb6fa5
Packit Service fb6fa5
Packit Service fb6fa5
  vbox = gtk_vbox_new (FALSE, 0);
Packit Service fb6fa5
  gtk_box_pack_start (GTK_BOX (vbox), table, FALSE, FALSE, 0);
Packit Service fb6fa5
Packit Service fb6fa5
  sw = gtk_scrolled_window_new (NULL, NULL);
Packit Service fb6fa5
  gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (sw),
Packit Service fb6fa5
                                  GTK_POLICY_NEVER, GTK_POLICY_AUTOMATIC);
Packit Service fb6fa5
  
Packit Service fb6fa5
  gtk_scrolled_window_add_with_viewport (GTK_SCROLLED_WINDOW (sw), vbox);
Packit Service fb6fa5
Packit Service fb6fa5
  g_free (specs);
Packit Service fb6fa5
Packit Service fb6fa5
  return sw;
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static GtkWidget *
Packit Service fb6fa5
child_properties_from_object (GObject *object)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GtkWidget *prop_edit;
Packit Service fb6fa5
  GtkWidget *label;
Packit Service fb6fa5
  GtkWidget *sw;
Packit Service fb6fa5
  GtkWidget *vbox;
Packit Service fb6fa5
  GtkWidget *table;
Packit Service fb6fa5
  GtkWidget *parent;
Packit Service fb6fa5
  GParamSpec **specs;
Packit Service fb6fa5
  guint n_specs;
Packit Service fb6fa5
  gint i;
Packit Service fb6fa5
Packit Service fb6fa5
  if (!GTK_IS_WIDGET (object))
Packit Service fb6fa5
    return NULL;
Packit Service fb6fa5
Packit Service fb6fa5
  parent = gtk_widget_get_parent (GTK_WIDGET (object));
Packit Service fb6fa5
Packit Service fb6fa5
  if (!parent)
Packit Service fb6fa5
    return NULL;
Packit Service fb6fa5
Packit Service fb6fa5
  specs = gtk_container_class_list_child_properties (G_OBJECT_GET_CLASS (parent), &n_specs);
Packit Service fb6fa5
Packit Service fb6fa5
  table = gtk_table_new (n_specs, 2, FALSE);
Packit Service fb6fa5
  gtk_table_set_col_spacing (GTK_TABLE (table), 0, 10);
Packit Service fb6fa5
  gtk_table_set_row_spacings (GTK_TABLE (table), 3);
Packit Service fb6fa5
Packit Service fb6fa5
  i = 0;
Packit Service fb6fa5
  while (i < n_specs)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      GParamSpec *spec = specs[i];
Packit Service fb6fa5
      gboolean can_modify;
Packit Service fb6fa5
      
Packit Service fb6fa5
      prop_edit = NULL;
Packit Service fb6fa5
Packit Service fb6fa5
      can_modify = ((spec->flags & G_PARAM_WRITABLE) != 0 &&
Packit Service fb6fa5
                    (spec->flags & G_PARAM_CONSTRUCT_ONLY) == 0);
Packit Service fb6fa5
      
Packit Service fb6fa5
      if ((spec->flags & G_PARAM_READABLE) == 0)
Packit Service fb6fa5
        {
Packit Service fb6fa5
          /* can't display unreadable properties */
Packit Service fb6fa5
          ++i;
Packit Service fb6fa5
          continue;
Packit Service fb6fa5
        }
Packit Service fb6fa5
      
Packit Service fb6fa5
      label = gtk_label_new (g_param_spec_get_nick (spec));
Packit Service fb6fa5
      gtk_misc_set_alignment (GTK_MISC (label), 0.0, 0.5);
Packit Service fb6fa5
      gtk_table_attach_defaults (GTK_TABLE (table), label, 0, 1, i, i + 1);
Packit Service fb6fa5
      
Packit Service fb6fa5
      mark_child_property (spec);
Packit Service fb6fa5
      prop_edit = property_widget (object, spec, can_modify);
Packit Service fb6fa5
      gtk_table_attach_defaults (GTK_TABLE (table), prop_edit, 1, 2, i, i + 1);
Packit Service fb6fa5
Packit Service fb6fa5
      if (prop_edit)
Packit Service fb6fa5
        {
Packit Service fb6fa5
          if (!can_modify)
Packit Service fb6fa5
            gtk_widget_set_sensitive (prop_edit, FALSE);
Packit Service fb6fa5
Packit Service fb6fa5
	  if (g_param_spec_get_blurb (spec))
Packit Service fb6fa5
	    gtk_widget_set_tooltip_text (prop_edit, g_param_spec_get_blurb (spec));
Packit Service fb6fa5
Packit Service fb6fa5
          /* set initial value */
Packit Service fb6fa5
          gtk_widget_child_notify (GTK_WIDGET (object), spec->name);
Packit Service fb6fa5
        }
Packit Service fb6fa5
      
Packit Service fb6fa5
      ++i;
Packit Service fb6fa5
    }
Packit Service fb6fa5
Packit Service fb6fa5
  vbox = gtk_vbox_new (FALSE, 0);
Packit Service fb6fa5
  gtk_box_pack_start (GTK_BOX (vbox), table, FALSE, FALSE, 0);
Packit Service fb6fa5
Packit Service fb6fa5
  sw = gtk_scrolled_window_new (NULL, NULL);
Packit Service fb6fa5
  gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (sw),
Packit Service fb6fa5
                                  GTK_POLICY_NEVER, GTK_POLICY_AUTOMATIC);
Packit Service fb6fa5
  
Packit Service fb6fa5
  gtk_scrolled_window_add_with_viewport (GTK_SCROLLED_WINDOW (sw), vbox);
Packit Service fb6fa5
Packit Service fb6fa5
  g_free (specs);
Packit Service fb6fa5
Packit Service fb6fa5
  return sw;
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static void
Packit Service fb6fa5
child_properties (GtkWidget *button, 
Packit Service fb6fa5
		  GObject   *object)
Packit Service fb6fa5
{
Packit Service fb6fa5
  create_prop_editor (object, 0);
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static GtkWidget *
Packit Service fb6fa5
children_from_object (GObject *object)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GList *children, *c;
Packit Service fb6fa5
  GtkWidget *table, *label, *prop_edit, *button, *vbox, *sw;
Packit Service fb6fa5
  gchar *str;
Packit Service fb6fa5
  gint i;
Packit Service fb6fa5
Packit Service fb6fa5
  if (!GTK_IS_CONTAINER (object))
Packit Service fb6fa5
    return NULL;
Packit Service fb6fa5
Packit Service fb6fa5
  children = gtk_container_get_children (GTK_CONTAINER (object));
Packit Service fb6fa5
Packit Service fb6fa5
  table = gtk_table_new (g_list_length (children), 2, FALSE);
Packit Service fb6fa5
  gtk_table_set_col_spacing (GTK_TABLE (table), 0, 10);
Packit Service fb6fa5
  gtk_table_set_row_spacings (GTK_TABLE (table), 3);
Packit Service fb6fa5
 
Packit Service fb6fa5
  for (c = children, i = 0; c; c = c->next, i++)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      object = c->data;
Packit Service fb6fa5
Packit Service fb6fa5
      label = gtk_label_new ("Child");
Packit Service fb6fa5
      gtk_misc_set_alignment (GTK_MISC (label), 0.0, 0.5);
Packit Service fb6fa5
      gtk_table_attach_defaults (GTK_TABLE (table), label, 0, 1, i, i + 1);
Packit Service fb6fa5
Packit Service fb6fa5
      prop_edit = gtk_hbox_new (FALSE, 5);
Packit Service fb6fa5
Packit Service fb6fa5
      str = object_label (object, NULL);
Packit Service fb6fa5
      label = gtk_label_new (str);
Packit Service fb6fa5
      g_free (str);
Packit Service fb6fa5
      button = gtk_button_new_with_label ("Properties");
Packit Service fb6fa5
      g_signal_connect (button, "clicked",
Packit Service fb6fa5
                        G_CALLBACK (child_properties),
Packit Service fb6fa5
                        object);
Packit Service fb6fa5
Packit Service fb6fa5
      gtk_container_add (GTK_CONTAINER (prop_edit), label);
Packit Service fb6fa5
      gtk_container_add (GTK_CONTAINER (prop_edit), button);
Packit Service fb6fa5
Packit Service fb6fa5
      gtk_table_attach_defaults (GTK_TABLE (table), prop_edit, 1, 2, i, i + 1);
Packit Service fb6fa5
    }
Packit Service fb6fa5
Packit Service fb6fa5
  vbox = gtk_vbox_new (FALSE, 0);
Packit Service fb6fa5
  gtk_box_pack_start (GTK_BOX (vbox), table, FALSE, FALSE, 0);
Packit Service fb6fa5
Packit Service fb6fa5
  sw = gtk_scrolled_window_new (NULL, NULL);
Packit Service fb6fa5
  gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (sw),
Packit Service fb6fa5
                                  GTK_POLICY_NEVER, GTK_POLICY_AUTOMATIC);
Packit Service fb6fa5
  
Packit Service fb6fa5
  gtk_scrolled_window_add_with_viewport (GTK_SCROLLED_WINDOW (sw), vbox);
Packit Service fb6fa5
Packit Service fb6fa5
  g_list_free (children);
Packit Service fb6fa5
Packit Service fb6fa5
  return sw;
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
static GtkWidget *
Packit Service fb6fa5
cells_from_object (GObject *object)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GList *cells, *c;
Packit Service fb6fa5
  GtkWidget *table, *label, *prop_edit, *button, *vbox, *sw;
Packit Service fb6fa5
  gchar *str;
Packit Service fb6fa5
  gint i;
Packit Service fb6fa5
Packit Service fb6fa5
  if (!GTK_IS_CELL_LAYOUT (object))
Packit Service fb6fa5
    return NULL;
Packit Service fb6fa5
Packit Service fb6fa5
  cells = gtk_cell_layout_get_cells (GTK_CELL_LAYOUT (object));
Packit Service fb6fa5
Packit Service fb6fa5
  table = gtk_table_new (g_list_length (cells), 2, FALSE);
Packit Service fb6fa5
  gtk_table_set_col_spacing (GTK_TABLE (table), 0, 10);
Packit Service fb6fa5
  gtk_table_set_row_spacings (GTK_TABLE (table), 3);
Packit Service fb6fa5
 
Packit Service fb6fa5
  for (c = cells, i = 0; c; c = c->next, i++)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      object = c->data;
Packit Service fb6fa5
Packit Service fb6fa5
      label = gtk_label_new ("Cell");
Packit Service fb6fa5
      gtk_misc_set_alignment (GTK_MISC (label), 0.0, 0.5);
Packit Service fb6fa5
      gtk_table_attach_defaults (GTK_TABLE (table), label, 0, 1, i, i + 1);
Packit Service fb6fa5
Packit Service fb6fa5
      prop_edit = gtk_hbox_new (FALSE, 5);
Packit Service fb6fa5
Packit Service fb6fa5
      str = object_label (object, NULL);
Packit Service fb6fa5
      label = gtk_label_new (str);
Packit Service fb6fa5
      g_free (str);
Packit Service fb6fa5
      button = gtk_button_new_with_label ("Properties");
Packit Service fb6fa5
      g_signal_connect (button, "clicked",
Packit Service fb6fa5
                        G_CALLBACK (child_properties),
Packit Service fb6fa5
                        object);
Packit Service fb6fa5
Packit Service fb6fa5
      gtk_container_add (GTK_CONTAINER (prop_edit), label);
Packit Service fb6fa5
      gtk_container_add (GTK_CONTAINER (prop_edit), button);
Packit Service fb6fa5
Packit Service fb6fa5
      gtk_table_attach_defaults (GTK_TABLE (table), prop_edit, 1, 2, i, i + 1);
Packit Service fb6fa5
    }
Packit Service fb6fa5
Packit Service fb6fa5
  vbox = gtk_vbox_new (FALSE, 0);
Packit Service fb6fa5
  gtk_box_pack_start (GTK_BOX (vbox), table, FALSE, FALSE, 0);
Packit Service fb6fa5
Packit Service fb6fa5
  sw = gtk_scrolled_window_new (NULL, NULL);
Packit Service fb6fa5
  gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (sw),
Packit Service fb6fa5
                                  GTK_POLICY_NEVER, GTK_POLICY_AUTOMATIC);
Packit Service fb6fa5
  
Packit Service fb6fa5
  gtk_scrolled_window_add_with_viewport (GTK_SCROLLED_WINDOW (sw), vbox);
Packit Service fb6fa5
Packit Service fb6fa5
  g_list_free (cells);
Packit Service fb6fa5
Packit Service fb6fa5
  return sw;
Packit Service fb6fa5
}
Packit Service fb6fa5
Packit Service fb6fa5
/* Pass zero for type if you want all properties */
Packit Service fb6fa5
GtkWidget*
Packit Service fb6fa5
create_prop_editor (GObject   *object,
Packit Service fb6fa5
		    GType      type)
Packit Service fb6fa5
{
Packit Service fb6fa5
  GtkWidget *win;
Packit Service fb6fa5
  GtkWidget *notebook;
Packit Service fb6fa5
  GtkWidget *properties;
Packit Service fb6fa5
  GtkWidget *label;
Packit Service fb6fa5
  gchar *title;
Packit Service fb6fa5
  GType *ifaces;
Packit Service fb6fa5
  guint n_ifaces;
Packit Service fb6fa5
  
Packit Service fb6fa5
  if ((win = g_object_get_data (G_OBJECT (object), "prop-editor-win")))
Packit Service fb6fa5
    {
Packit Service fb6fa5
      gtk_window_present (GTK_WINDOW (win));
Packit Service fb6fa5
      return win;
Packit Service fb6fa5
    }
Packit Service fb6fa5
Packit Service fb6fa5
  win = gtk_window_new (GTK_WINDOW_TOPLEVEL);
Packit Service fb6fa5
  if (GTK_IS_WIDGET (object))
Packit Service fb6fa5
    gtk_window_set_screen (GTK_WINDOW (win),
Packit Service fb6fa5
			   gtk_widget_get_screen (GTK_WIDGET (object)));
Packit Service fb6fa5
Packit Service fb6fa5
  /* hold a weak ref to the object we're editing */
Packit Service fb6fa5
  g_object_set_data_full (G_OBJECT (object), "prop-editor-win", win, model_destroy);
Packit Service fb6fa5
  g_object_set_data_full (G_OBJECT (win), "model-object", object, window_destroy);
Packit Service fb6fa5
Packit Service fb6fa5
  if (type == 0)
Packit Service fb6fa5
    {
Packit Service fb6fa5
      notebook = gtk_notebook_new ();
Packit Service fb6fa5
      gtk_notebook_set_tab_pos (GTK_NOTEBOOK (notebook), GTK_POS_LEFT);
Packit Service fb6fa5
      
Packit Service fb6fa5
      gtk_container_add (GTK_CONTAINER (win), notebook);
Packit Service fb6fa5
      
Packit Service fb6fa5
      type = G_TYPE_FROM_INSTANCE (object);
Packit Service fb6fa5
Packit Service fb6fa5
      title = g_strdup_printf ("Properties of %s widget", g_type_name (type));
Packit Service fb6fa5
      gtk_window_set_title (GTK_WINDOW (win), title);
Packit Service fb6fa5
      g_free (title);
Packit Service fb6fa5
      
Packit Service fb6fa5
      while (type)
Packit Service fb6fa5
	{
Packit Service fb6fa5
	  properties = properties_from_type (object, type);
Packit Service fb6fa5
	  if (properties)
Packit Service fb6fa5
	    {
Packit Service fb6fa5
	      label = gtk_label_new (g_type_name (type));
Packit Service fb6fa5
	      gtk_notebook_append_page (GTK_NOTEBOOK (notebook),
Packit Service fb6fa5
					properties, label);
Packit Service fb6fa5
	    }
Packit Service fb6fa5
	  
Packit Service fb6fa5
	  type = g_type_parent (type);
Packit Service fb6fa5
	}
Packit Service fb6fa5
Packit Service fb6fa5
      ifaces = g_type_interfaces (G_TYPE_FROM_INSTANCE (object), &n_ifaces);
Packit Service fb6fa5
      while (n_ifaces--)
Packit Service fb6fa5
	{
Packit Service fb6fa5
	  properties = properties_from_type (object, ifaces[n_ifaces]);
Packit Service fb6fa5
	  if (properties)
Packit Service fb6fa5
	    {
Packit Service fb6fa5
	      label = gtk_label_new (g_type_name (ifaces[n_ifaces]));
Packit Service fb6fa5
	      gtk_notebook_append_page (GTK_NOTEBOOK (notebook),
Packit Service fb6fa5
					properties, label);
Packit Service fb6fa5
	    }
Packit Service fb6fa5
	}
Packit Service fb6fa5
Packit Service fb6fa5
      g_free (ifaces);
Packit Service fb6fa5
Packit Service fb6fa5
      properties = child_properties_from_object (object);
Packit Service fb6fa5
      if (properties)
Packit Service fb6fa5
	{
Packit Service fb6fa5
	  label = gtk_label_new ("Child properties");
Packit Service fb6fa5
	  gtk_notebook_append_page (GTK_NOTEBOOK (notebook),
Packit Service fb6fa5
				    properties, label);
Packit Service fb6fa5
	}
Packit Service fb6fa5
Packit Service fb6fa5
      properties = children_from_object (object);
Packit Service fb6fa5
      if (properties)
Packit Service fb6fa5
	{
Packit Service fb6fa5
	  label = gtk_label_new ("Children");
Packit Service fb6fa5
	  gtk_notebook_append_page (GTK_NOTEBOOK (notebook),
Packit Service fb6fa5
				    properties, label);
Packit Service fb6fa5
	}
Packit Service fb6fa5
Packit Service fb6fa5
      properties = cells_from_object (object);
Packit Service fb6fa5
      if (properties)
Packit Service fb6fa5
	{
Packit Service fb6fa5
	  label = gtk_label_new ("Cell renderers");
Packit Service fb6fa5
	  gtk_notebook_append_page (GTK_NOTEBOOK (notebook),
Packit Service fb6fa5
				    properties, label);
Packit Service fb6fa5
	}
Packit Service fb6fa5
    }
Packit Service fb6fa5
  else
Packit Service fb6fa5
    {
Packit Service fb6fa5
      properties = properties_from_type (object, type);
Packit Service fb6fa5
      gtk_container_add (GTK_CONTAINER (win), properties);
Packit Service fb6fa5
      title = g_strdup_printf ("Properties of %s", g_type_name (type));
Packit Service fb6fa5
      gtk_window_set_title (GTK_WINDOW (win), title);
Packit Service fb6fa5
      g_free (title);
Packit Service fb6fa5
    }
Packit Service fb6fa5
  
Packit Service fb6fa5
  gtk_window_set_default_size (GTK_WINDOW (win), -1, 400);
Packit Service fb6fa5
  
Packit Service fb6fa5
  gtk_widget_show_all (win);
Packit Service fb6fa5
Packit Service fb6fa5
  return win;
Packit Service fb6fa5
}
Packit Service fb6fa5