Pileus Git - ~andy/gtk/blob - gtk/tests/object.c

   1 /* Gtk+ object tests
   2  * Copyright (C) 2007 Imendio AB
   3  * Authors: Tim Janik
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2 of the License, or (at your option) any later version.
   9  *
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this library; if not, write to the
  17  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  18  * Boston, MA 02111-1307, USA.
  19  */
  20 #include <gtk/gtk.h>
  21 #include <string.h>
  22
  23 /* --- helper macros for property value generation --- */
  24 /* dvalue=+0: generate minimum value
  25  * dvalue=.x: generate value within value range proportional to x.
  26  * dvalue=+1: generate maximum value
  27  * dvalue=-1: generate random value within value range
  28  * dvalue=+2: initialize value from default_value
  29  */
  30 #define ASSIGN_VALUE(__g_value_set_func, __value, PSPECTYPE, __pspec, __default_value, __minimum, __maximum, __dvalue) do { \
  31   PSPECTYPE __p = (PSPECTYPE) __pspec; \
  32   __g_value_set_func (__value, SELECT_VALUE (__dvalue, __p->__default_value, __p->__minimum, __p->__maximum)); \
  33 } while (0)
  34 #define SELECT_VALUE(__dvalue, __default_value, __minimum, __maximum) ( \
  35   __dvalue >= 0 && __dvalue <= 1 ? __minimum * (1 - __dvalue) + __dvalue * __maximum : \
  36     __dvalue <= -1 ? g_test_rand_double_range (__minimum, __maximum) : \
  37       __default_value)
  38 #define SELECT_NAME(__dvalue) ( \
  39   __dvalue == 0 ? "minimum" : \
  40     __dvalue == 1 ? "maximum" : \
  41       __dvalue >= +2 ? "default" : \
  42         __dvalue == 0.5 ? "medium" : \
  43           __dvalue > 0 && __dvalue < 1 ? "fractional" : \
  44             "random")
  45 #define MATCH_ANY_VALUE         ((void*) 0xf1874c23)
  46
  47 /* --- property blacklists --- */
  48 typedef struct {
  49   const char   *type_name;
  50   const char   *name;
  51   gconstpointer value;
  52 } IgnoreProperty;
  53 static const IgnoreProperty*
  54 list_ignore_properties (gboolean buglist)
  55 {
  56   /* currently untestable properties */
  57   static const IgnoreProperty ignore_properties[] = {
  58     { "GtkCurve",               "",                     NULL, },                        /* Just ignore it, not worth fixing */
  59     { "GtkContainer",           "child",                NULL, },                        /* needs working child widget */
  60     { "GtkRadioMenuItem",       "group",                NULL, },                        /* needs working sibling */
  61     { "GtkWidget",              "parent",               NULL, },                        /* needs working parent widget */
  62     { "GtkCList",               "selection-mode",       (void*) GTK_SELECTION_NONE, },
  63     { "GtkWidget",              "has-default",          (void*) TRUE, },                /* conflicts with toplevel-less widgets */
  64     { "GtkWidget",              "screen",               NULL, },
  65     { "GtkWindow",              "type-hint",            (void*) GDK_WINDOW_TYPE_HINT_DND, }, /* conflicts with ::visible=TRUE */
  66     { "GtkCellView",            "background",           (void*) "", },                  /* "" is not a valid background color */
  67     { "GtkColorButton",         "color",                (void*) NULL, },                /* not a valid boxed color */
  68     { "GtkInputDialog",         "has-separator",        (void*) MATCH_ANY_VALUE, },     /* property disabled */
  69     { "GtkMessageDialog",       "has-separator",        (void*) MATCH_ANY_VALUE, },     /* property disabled */
  70     { "GtkFontSelectionDialog", "has-separator",        (void*) MATCH_ANY_VALUE, },     /* property disabled */
  71     { "GtkColorSelectionDialog","has-separator",        (void*) MATCH_ANY_VALUE, },     /* property disabled */
  72     { "GtkColorSelection",      "child",                NULL, },
  73     { "GtkColorSelection",      "current-color",        (void*) NULL, },                /* not a valid boxed color */
  74     { "GtkComboBox",            "row-span-column",      (void*) MATCH_ANY_VALUE },      /* GtkComboBoxEntry needs a tree model for this */
  75     { "GtkComboBox",            "column-span-column",   (void*) MATCH_ANY_VALUE },      /* GtkComboBoxEntry needs a tree model for this */
  76     { "GtkComboBoxEntry",       "text-column",          (void*) MATCH_ANY_VALUE },      /* GtkComboBoxEntry needs a tree model for this */
  77     { "GtkFileChooserButton",   "select-multiple",      (void*) MATCH_ANY_VALUE },      /* property disabled */
  78     { "GtkFileChooserButton",   "action",               (void*) GTK_FILE_CHOOSER_ACTION_SAVE },
  79     { "GtkFileChooserButton",   "action",               (void*) GTK_FILE_CHOOSER_ACTION_CREATE_FOLDER },
  80     { "GtkFileChooserWidget",   "select-multiple",      (void*) 0x1 },                  /* property conflicts */
  81     { "GtkFileChooserDialog",   "select-multiple",      (void*) MATCH_ANY_VALUE },      /* property disabled */
  82     { "GtkMenu",                "accel-path",           (void*) MATCH_ANY_VALUE },      /* has odd restrictions in the setter */
  83     { "GtkMenuItem",            "accel-path",           (void*) MATCH_ANY_VALUE },      /* has odd restrictions in the setter */
  84     { "GtkRecentChooserMenu",   "select-multiple",      (void*) MATCH_ANY_VALUE },      /* property disabled */
  85     { "GtkTextView",            "overwrite",            (void*) MATCH_ANY_VALUE },      /* needs text buffer */
  86     { "GtkToolbar",             "icon-size",            (void*) GTK_ICON_SIZE_INVALID },
  87     { NULL, NULL, NULL }
  88   };
  89   /* properties suspected to be Gdk/Gtk+ bugs */
  90   static const IgnoreProperty bug_properties[] = {
  91     { "GtkComboBox",            "active",               (void*) MATCH_ANY_VALUE },      /* FIXME: triggers NULL model bug */
  92     { "GtkCTree",               "spacing",              (void*) MATCH_ANY_VALUE },      /* FIXME: triggers signedness bug */
  93     { "GtkFileChooserButton",   "local-only",           (void*) MATCH_ANY_VALUE },      /* FIXME: triggers NULL path assertion */
  94     { "GtkFileChooserDialog",   "local-only",           (void*) MATCH_ANY_VALUE },      /* FIXME: triggers NULL path assertion */
  95     { "GtkFileChooserWidget",   "local-only",           (void*) MATCH_ANY_VALUE },      /* FIXME: triggers NULL path assertion */
  96     { "GtkMenu",                "tearoff-state",        (void*) MATCH_ANY_VALUE },      /* FIXME: triggers NULL widget cast */
  97     { "GtkText",                "text-position",        (void*) MATCH_ANY_VALUE },      /* FIXME: segfaults, fix property minimum/maximum */
  98     { NULL, NULL, NULL }
  99   };
 100   if (buglist)
 101     return bug_properties;
 102   else
 103     return ignore_properties;
 104 }
 105
 106 /* --- test functions --- */
 107 static void
 108 pspec_select_value (GParamSpec *pspec,
 109                     GValue     *value,
 110                     double      dvalue)
 111 {
 112   /* generate a value suitable for pspec */
 113   if (G_IS_PARAM_SPEC_CHAR (pspec))
 114     ASSIGN_VALUE (g_value_set_char, value, GParamSpecChar*, pspec, default_value, minimum, maximum, dvalue);
 115   else if (G_IS_PARAM_SPEC_UCHAR (pspec))
 116     ASSIGN_VALUE (g_value_set_uchar, value, GParamSpecUChar*, pspec, default_value, minimum, maximum, dvalue);
 117   else if (G_IS_PARAM_SPEC_INT (pspec))
 118     ASSIGN_VALUE (g_value_set_int, value, GParamSpecInt*, pspec, default_value, minimum, maximum, dvalue);
 119   else if (G_IS_PARAM_SPEC_UINT (pspec))
 120     ASSIGN_VALUE (g_value_set_uint, value, GParamSpecUInt*, pspec, default_value, minimum, maximum, dvalue);
 121   else if (G_IS_PARAM_SPEC_LONG (pspec))
 122     ASSIGN_VALUE (g_value_set_long, value, GParamSpecLong*, pspec, default_value, minimum, maximum, dvalue);
 123   else if (G_IS_PARAM_SPEC_ULONG (pspec))
 124     ASSIGN_VALUE (g_value_set_ulong, value, GParamSpecULong*, pspec, default_value, minimum, maximum, dvalue);
 125   else if (G_IS_PARAM_SPEC_INT64 (pspec))
 126     ASSIGN_VALUE (g_value_set_int64, value, GParamSpecInt64*, pspec, default_value, minimum, maximum, dvalue);
 127   else if (G_IS_PARAM_SPEC_UINT64 (pspec))
 128     ASSIGN_VALUE (g_value_set_uint64, value, GParamSpecUInt64*, pspec, default_value, minimum, maximum, dvalue);
 129   else if (G_IS_PARAM_SPEC_FLOAT (pspec))
 130     ASSIGN_VALUE (g_value_set_float, value, GParamSpecFloat*, pspec, default_value, minimum, maximum, dvalue);
 131   else if (G_IS_PARAM_SPEC_DOUBLE (pspec))
 132     ASSIGN_VALUE (g_value_set_double, value, GParamSpecDouble*, pspec, default_value, minimum, maximum, dvalue);
 133   else if (G_IS_PARAM_SPEC_BOOLEAN (pspec))
 134     g_value_set_boolean (value, SELECT_VALUE (dvalue, ((GParamSpecBoolean*) pspec)->default_value, FALSE, TRUE));
 135   else if (G_IS_PARAM_SPEC_UNICHAR (pspec))
 136     g_value_set_uint (value, SELECT_VALUE (dvalue, ((GParamSpecUnichar*) pspec)->default_value, FALSE, TRUE));
 137   else if (G_IS_PARAM_SPEC_GTYPE (pspec))
 138     g_value_set_gtype (value, SELECT_VALUE ((int) dvalue, ((GParamSpecGType*) pspec)->is_a_type, 0, GTK_TYPE_WIDGET));
 139   else if (G_IS_PARAM_SPEC_STRING (pspec))
 140     {
 141       GParamSpecString *sspec = (GParamSpecString*) pspec;
 142       if (dvalue >= +2)
 143         g_value_set_string (value, sspec->default_value);
 144       if (dvalue > 0 && sspec->cset_first && sspec->cset_nth)
 145         g_value_take_string (value, g_strdup_printf ("%c%c", sspec->cset_first[0], sspec->cset_nth[0]));
 146       else /* if (sspec->ensure_non_null) */
 147         g_value_set_string (value, "");
 148     }
 149   else if (G_IS_PARAM_SPEC_ENUM (pspec))
 150     {
 151       GParamSpecEnum *espec = (GParamSpecEnum*) pspec;
 152       if (dvalue >= +2)
 153         g_value_set_enum (value, espec->default_value);
 154       if (dvalue >= 0 && dvalue <= 1)
 155         g_value_set_enum (value, espec->enum_class->values[(int) ((espec->enum_class->n_values - 1) * dvalue)].value);
 156       else if (dvalue <= -1)
 157         g_value_set_enum (value, espec->enum_class->values[g_test_rand_int_range (0, espec->enum_class->n_values)].value);
 158     }
 159   else if (G_IS_PARAM_SPEC_FLAGS (pspec))
 160     {
 161       GParamSpecFlags *fspec = (GParamSpecFlags*) pspec;
 162       if (dvalue >= +2)
 163         g_value_set_flags (value, fspec->default_value);
 164       if (dvalue >= 0 && dvalue <= 1)
 165         g_value_set_flags (value, fspec->flags_class->values[(int) ((fspec->flags_class->n_values - 1) * dvalue)].value);
 166       else if (dvalue <= -1)
 167         g_value_set_flags (value, fspec->flags_class->values[g_test_rand_int_range (0, fspec->flags_class->n_values)].value);
 168     }
 169   /* unimplemented:
 170    * G_IS_PARAM_SPEC_PARAM
 171    * G_IS_PARAM_SPEC_BOXED
 172    * G_IS_PARAM_SPEC_POINTER
 173    * G_IS_PARAM_SPEC_VALUE_ARRAY
 174    * G_IS_PARAM_SPEC_OBJECT
 175    */
 176 }
 177
 178 static gpointer
 179 value_as_pointer (GValue *value)
 180 {
 181   if (g_value_fits_pointer (value))
 182     return g_value_peek_pointer (value);
 183   if (G_VALUE_HOLDS_BOOLEAN (value))
 184     return (void*) g_value_get_boolean (value);
 185   if (G_VALUE_HOLDS_CHAR (value))
 186     return (void*) (gssize) g_value_get_char (value);
 187   if (G_VALUE_HOLDS_UCHAR (value))
 188     return (void*) (gsize) g_value_get_uchar (value);
 189   if (G_VALUE_HOLDS_INT (value))
 190     return (void*) g_value_get_int (value);
 191   if (G_VALUE_HOLDS_UINT (value))
 192     return (void*) g_value_get_uint (value);
 193   if (G_VALUE_HOLDS_LONG (value))
 194     return (void*) g_value_get_long (value);
 195   if (G_VALUE_HOLDS_ULONG (value))
 196     return (void*) g_value_get_ulong (value);
 197   if (G_VALUE_HOLDS_FLOAT (value))
 198     return (void*) (gssize) g_value_get_float (value);
 199   if (G_VALUE_HOLDS_DOUBLE (value))
 200     return (void*) (gssize) g_value_get_double (value);
 201   if (G_VALUE_HOLDS_ENUM (value))
 202     return (void*) (gssize) g_value_get_enum (value);
 203   if (G_VALUE_HOLDS_FLAGS (value))
 204     return (void*) (gsize) g_value_get_flags (value);
 205   return (void*) 0x1373babe;
 206 }
 207
 208 static void
 209 object_test_property (GObject           *object,
 210                       GParamSpec        *pspec,
 211                       double             dvalue)
 212 {
 213   /* test setting of a normal writable property */
 214   if (pspec->flags & G_PARAM_WRITABLE &&
 215       !(pspec->flags & (G_PARAM_CONSTRUCT | G_PARAM_CONSTRUCT_ONLY)))
 216     {
 217       GValue value = { 0, };
 218       guint i;
 219       const IgnoreProperty *ignore_properties;
 220       /* select value to set */
 221       g_value_init (&value, G_PARAM_SPEC_VALUE_TYPE (pspec));
 222       pspec_select_value (pspec, &value, dvalue);
 223       /* ignore untestable properties */
 224       ignore_properties = list_ignore_properties (FALSE);
 225       for (i = 0; ignore_properties[i].name; i++)
 226         if (g_strcmp0 ("", ignore_properties[i].name) ||
 227             g_type_is_a (G_OBJECT_TYPE (object), g_type_from_name (ignore_properties[i].type_name)) &&
 228             strcmp (pspec->name, ignore_properties[i].name) == 0 &&
 229             (MATCH_ANY_VALUE == ignore_properties[i].value ||
 230              value_as_pointer (&value) == ignore_properties[i].value ||
 231              (G_VALUE_HOLDS_STRING (&value) &&
 232               strcmp (g_value_get_string (&value), ignore_properties[i].value) == 0)))
 233           break;
 234       /* ignore known property bugs if not testing thoroughly */
 235       if (ignore_properties[i].name == NULL && !g_test_thorough ())
 236         {
 237           ignore_properties = list_ignore_properties (TRUE);
 238           for (i = 0; ignore_properties[i].name; i++)
 239             if (g_type_is_a (G_OBJECT_TYPE (object), g_type_from_name (ignore_properties[i].type_name)) &&
 240                 strcmp (pspec->name, ignore_properties[i].name) == 0 &&
 241                 (MATCH_ANY_VALUE == ignore_properties[i].value ||
 242                  value_as_pointer (&value) == ignore_properties[i].value ||
 243                  (G_VALUE_HOLDS_STRING (&value) &&
 244                   strcmp (g_value_get_string (&value), ignore_properties[i].value) == 0)))
 245               break;
 246         }
 247       /* assign unignored properties */
 248       if (ignore_properties[i].name == NULL)
 249         {
 250           if (g_test_verbose ())
 251             g_print ("PropertyTest: %s::%s := (%s value (%s): %p)\n",
 252                      g_type_name (G_OBJECT_TYPE (object)), pspec->name,
 253                      SELECT_NAME (dvalue), g_type_name (G_VALUE_TYPE (&value)),
 254                      value_as_pointer (&value));
 255           g_object_set_property (object, pspec->name, &value);
 256         }
 257       /* cleanups */
 258       g_value_unset (&value);
 259     }
 260 }
 261
 262 static void
 263 widget_test_properties (GtkWidget   *widget,
 264                         double       dvalue)
 265 {
 266   /* try setting all possible properties, according to dvalue */
 267   guint i, n_pspecs = 0;
 268   GParamSpec **pspecs = g_object_class_list_properties (G_OBJECT_GET_CLASS (widget), &n_pspecs);
 269   for (i = 0; i < n_pspecs; i++)
 270     {
 271       GParamSpec *pspec = pspecs[i];
 272       if (pspec->flags & G_PARAM_WRITABLE &&
 273           !(pspec->flags & (G_PARAM_CONSTRUCT | G_PARAM_CONSTRUCT_ONLY)))
 274         object_test_property (G_OBJECT (widget), pspecs[i], dvalue);
 275     }
 276   g_free (pspecs);
 277 }
 278
 279 static void
 280 widget_fixups (GtkWidget *widget)
 281 {
 282   /* post-constructor for widgets that need additional settings to work correctly */
 283   if (GTK_IS_COMBO_BOX_ENTRY (widget))
 284     {
 285       GtkListStore *store = gtk_list_store_new (1, G_TYPE_STRING);
 286       g_object_set (widget, "model", store, "text-column", 0, NULL);
 287       g_object_unref (store);
 288       gtk_combo_box_append_text (GTK_COMBO_BOX (widget), "test text");
 289     }
 290   else if (GTK_IS_COMBO_BOX (widget))
 291     {
 292       GtkListStore *store = gtk_list_store_new (1, G_TYPE_STRING);
 293       g_object_set (widget, "model", store, NULL);
 294       g_object_unref (store);
 295       gtk_combo_box_append_text (GTK_COMBO_BOX (widget), "test text");
 296     }
 297 }
 298
 299 static void
 300 widget_property_tests (gconstpointer test_data)
 301 {
 302   GType wtype = (GType) test_data;
 303   /* create widget */
 304   GtkWidget *widget = gtk_widget_new (wtype, NULL);
 305   g_object_ref_sink (widget);
 306   widget_fixups (widget);
 307   /* test property values */
 308   widget_test_properties (widget,  +2); /* test default_value */
 309   widget_test_properties (widget,   0); /* test minimum */
 310   widget_test_properties (widget, 0.5); /* test medium */
 311   widget_test_properties (widget,   1); /* test maximum */
 312   widget_test_properties (widget,  -1); /* test random value */
 313   /* cleanup */
 314   gtk_widget_destroy (widget);
 315   g_object_unref (widget);
 316 }
 317
 318 extern void pixbuf_init (void);
 319
 320 /* --- main test program --- */
 321 int
 322 main (int   argc,
 323       char *argv[])
 324 {
 325   const GType *otypes;
 326   guint i;
 327   /* initialize test program */
 328   pixbuf_init ();
 329   gtk_test_init (&argc, &argv);
 330   gtk_test_register_all_types ();
 331   /* install a property test for each widget type */
 332   otypes = gtk_test_list_all_types (NULL);
 333   for (i = 0; otypes[i]; i++)
 334     if (g_type_is_a (otypes[i], GTK_TYPE_WIDGET) &&
 335         G_TYPE_IS_OBJECT (otypes[i]) &&
 336         !G_TYPE_IS_ABSTRACT (otypes[i]))
 337       {
 338         gchar *testpath = g_strdup_printf ("/properties/%s", g_type_name (otypes[i]));
 339         g_test_add_data_func (testpath, (void*) otypes[i], widget_property_tests);
 340         g_free (testpath);
 341       }
 342   return g_test_run ();
 343 }