gst/gstvalue.c

   1 /* GStreamer
   2  * Copyright (C) <2003> David A. Schleef <ds@schleef.org>
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Library General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Library General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Library General Public
  15  * License along with this library; if not, write to the
  16  * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
  17  * Boston, MA 02110-1301, USA.
  18  */
  19
  20 /**
  21  * SECTION:gstvalue
  22  * @short_description: GValue implementations specific
  23  * to GStreamer
  24  *
  25  * GValue implementations specific to GStreamer.
  26  *
  27  * Note that operations on the same #GValue from multiple threads may lead to
  28  * undefined behaviour.
  29  */
  30
  31 #ifdef HAVE_CONFIG_H
  32 #include "config.h"
  33 #endif
  34 #include <math.h>
  35 #include <stdio.h>
  36 #include <stdlib.h>
  37 #include <string.h>
  38 #include <ctype.h>
  39
  40 #include "gst_private.h"
  41 #include "glib-compat-private.h"
  42 #include <gst/gst.h>
  43 #include <gobject/gvaluecollector.h>
  44 #include "gstutils.h"
  45
  46 /* GstValueUnionFunc:
  47  * @dest: a #GValue for the result
  48  * @value1: a #GValue operand
  49  * @value2: a #GValue operand
  50  *
  51  * Used by gst_value_union() to perform unification for a specific #GValue
  52  * type. Register a new implementation with gst_value_register_union_func().
  53  *
  54  * Returns: %TRUE if a union was successful
  55  */
  56 typedef gboolean (*GstValueUnionFunc) (GValue * dest,
  57     const GValue * value1, const GValue * value2);
  58
  59 /* GstValueIntersectFunc:
  60  * @dest: (out caller-allocates): a #GValue for the result
  61  * @value1: a #GValue operand
  62  * @value2: a #GValue operand
  63  *
  64  * Used by gst_value_intersect() to perform intersection for a specific #GValue
  65  * type. If the intersection is non-empty, the result is
  66  * placed in @dest and %TRUE is returned.  If the intersection is
  67  * empty, @dest is unmodified and %FALSE is returned.
  68  * Register a new implementation with gst_value_register_intersect_func().
  69  *
  70  * Returns: %TRUE if the values can intersect
  71  */
  72 typedef gboolean (*GstValueIntersectFunc) (GValue * dest,
  73     const GValue * value1, const GValue * value2);
  74
  75 /* GstValueSubtractFunc:
  76  * @dest: (out caller-allocates): a #GValue for the result
  77  * @minuend: a #GValue operand
  78  * @subtrahend: a #GValue operand
  79  *
  80  * Used by gst_value_subtract() to perform subtraction for a specific #GValue
  81  * type. Register a new implementation with gst_value_register_subtract_func().
  82  *
  83  * Returns: %TRUE if the subtraction is not empty
  84  */
  85 typedef gboolean (*GstValueSubtractFunc) (GValue * dest,
  86     const GValue * minuend, const GValue * subtrahend);
  87
  88 static void gst_value_register_union_func (GType type1,
  89     GType type2, GstValueUnionFunc func);
  90 static void gst_value_register_intersect_func (GType type1,
  91     GType type2, GstValueIntersectFunc func);
  92 static void gst_value_register_subtract_func (GType minuend_type,
  93     GType subtrahend_type, GstValueSubtractFunc func);
  94
  95 typedef struct _GstValueUnionInfo GstValueUnionInfo;
  96 struct _GstValueUnionInfo
  97 {
  98   GType type1;
  99   GType type2;
 100   GstValueUnionFunc func;
 101 };
 102
 103 typedef struct _GstValueIntersectInfo GstValueIntersectInfo;
 104 struct _GstValueIntersectInfo
 105 {
 106   GType type1;
 107   GType type2;
 108   GstValueIntersectFunc func;
 109 };
 110
 111 typedef struct _GstValueSubtractInfo GstValueSubtractInfo;
 112 struct _GstValueSubtractInfo
 113 {
 114   GType minuend;
 115   GType subtrahend;
 116   GstValueSubtractFunc func;
 117 };
 118
 119 #define FUNDAMENTAL_TYPE_ID_MAX \
 120     (G_TYPE_FUNDAMENTAL_MAX >> G_TYPE_FUNDAMENTAL_SHIFT)
 121 #define FUNDAMENTAL_TYPE_ID(type) \
 122     ((type) >> G_TYPE_FUNDAMENTAL_SHIFT)
 123
 124 #define VALUE_LIST_ARRAY(v) ((GArray *) (v)->data[0].v_pointer)
 125 #define VALUE_LIST_SIZE(v) (VALUE_LIST_ARRAY(v)->len)
 126 #define VALUE_LIST_GET_VALUE(v, index) ((const GValue *) &g_array_index (VALUE_LIST_ARRAY(v), GValue, (index)))
 127
 128 static GArray *gst_value_table;
 129 static GHashTable *gst_value_hash;
 130 static GstValueTable *gst_value_tables_fundamental[FUNDAMENTAL_TYPE_ID_MAX + 1];
 131 static GArray *gst_value_union_funcs;
 132 static GArray *gst_value_intersect_funcs;
 133 static GArray *gst_value_subtract_funcs;
 134
 135 /* Forward declarations */
 136 static gchar *gst_value_serialize_fraction (const GValue * value);
 137
 138 static GstValueCompareFunc gst_value_get_compare_func (const GValue * value1);
 139 static gint gst_value_compare_with_func (const GValue * value1,
 140     const GValue * value2, GstValueCompareFunc compare);
 141
 142 static gchar *gst_string_wrap (const gchar * s);
 143 static gchar *gst_string_take_and_wrap (gchar * s);
 144 static gchar *gst_string_unwrap (const gchar * s);
 145
 146 static void gst_value_move (GValue * dest, GValue * src);
 147 static void _gst_value_list_append_and_take_value (GValue * value,
 148     GValue * append_value);
 149 static void _gst_value_array_append_and_take_value (GValue * value,
 150     GValue * append_value);
 151
 152 static inline GstValueTable *
 153 gst_value_hash_lookup_type (GType type)
 154 {
 155   if (G_LIKELY (G_TYPE_IS_FUNDAMENTAL (type)))
 156     return gst_value_tables_fundamental[FUNDAMENTAL_TYPE_ID (type)];
 157   else
 158     return g_hash_table_lookup (gst_value_hash, (gpointer) type);
 159 }
 160
 161 static void
 162 gst_value_hash_add_type (GType type, const GstValueTable * table)
 163 {
 164   if (G_TYPE_IS_FUNDAMENTAL (type))
 165     gst_value_tables_fundamental[FUNDAMENTAL_TYPE_ID (type)] = (gpointer) table;
 166
 167   g_hash_table_insert (gst_value_hash, (gpointer) type, (gpointer) table);
 168 }
 169
 170 /********
 171  * list *
 172  ********/
 173
 174 /* two helper functions to serialize/stringify any type of list
 175  * regular lists are done with { }, arrays with < >
 176  */
 177 static gchar *
 178 gst_value_serialize_any_list (const GValue * value, const gchar * begin,
 179     const gchar * end)
 180 {
 181   guint i;
 182   GArray *array = value->data[0].v_pointer;
 183   GString *s;
 184   GValue *v;
 185   gchar *s_val;
 186   guint alen = array->len;
 187
 188   /* estimate minimum string length to minimise re-allocs in GString */
 189   s = g_string_sized_new (2 + (6 * alen) + 2);
 190   g_string_append (s, begin);
 191   for (i = 0; i < alen; i++) {
 192     v = &g_array_index (array, GValue, i);
 193     s_val = gst_value_serialize (v);
 194     if (s_val != NULL) {
 195       g_string_append (s, s_val);
 196       g_free (s_val);
 197       if (i < alen - 1) {
 198         g_string_append_len (s, ", ", 2);
 199       }
 200     } else {
 201       GST_WARNING ("Could not serialize list/array value of type '%s'",
 202           G_VALUE_TYPE_NAME (v));
 203     }
 204   }
 205   g_string_append (s, end);
 206   return g_string_free (s, FALSE);
 207 }
 208
 209 static void
 210 gst_value_transform_any_list_string (const GValue * src_value,
 211     GValue * dest_value, const gchar * begin, const gchar * end)
 212 {
 213   GValue *list_value;
 214   GArray *array;
 215   GString *s;
 216   guint i;
 217   gchar *list_s;
 218   guint alen;
 219
 220   array = src_value->data[0].v_pointer;
 221   alen = array->len;
 222
 223   /* estimate minimum string length to minimise re-allocs in GString */
 224   s = g_string_sized_new (2 + (10 * alen) + 2);
 225   g_string_append (s, begin);
 226   for (i = 0; i < alen; i++) {
 227     list_value = &g_array_index (array, GValue, i);
 228
 229     if (i != 0) {
 230       g_string_append_len (s, ", ", 2);
 231     }
 232     list_s = g_strdup_value_contents (list_value);
 233     g_string_append (s, list_s);
 234     g_free (list_s);
 235   }
 236   g_string_append (s, end);
 237
 238   dest_value->data[0].v_pointer = g_string_free (s, FALSE);
 239 }
 240
 241 /*
 242  * helper function to see if a type is fixed. Is used internally here and
 243  * there. Do not export, since it doesn't work for types where the content
 244  * decides the fixedness (e.g. GST_TYPE_ARRAY).
 245  */
 246 static gboolean
 247 gst_type_is_fixed (GType type)
 248 {
 249   /* the basic int, string, double types */
 250   if (type <= G_TYPE_MAKE_FUNDAMENTAL (G_TYPE_RESERVED_GLIB_LAST)) {
 251     return TRUE;
 252   }
 253   /* our fundamental types that are certainly not fixed */
 254   if (type == GST_TYPE_INT_RANGE || type == GST_TYPE_DOUBLE_RANGE ||
 255       type == GST_TYPE_INT64_RANGE ||
 256       type == GST_TYPE_LIST || type == GST_TYPE_FRACTION_RANGE) {
 257     return FALSE;
 258   }
 259   /* other (boxed) types that are fixed */
 260   if (type == GST_TYPE_BUFFER) {
 261     return TRUE;
 262   }
 263   /* heavy checks */
 264   if (G_TYPE_IS_FUNDAMENTAL (type) || G_TYPE_FUNDAMENTAL (type) <=
 265       G_TYPE_MAKE_FUNDAMENTAL (G_TYPE_RESERVED_GLIB_LAST)) {
 266     return TRUE;
 267   }
 268
 269   return FALSE;
 270 }
 271
 272 /* GValue functions usable for both regular lists and arrays */
 273 static void
 274 gst_value_init_list_or_array (GValue * value)
 275 {
 276   value->data[0].v_pointer = g_array_new (FALSE, TRUE, sizeof (GValue));
 277 }
 278
 279 static GArray *
 280 copy_garray_of_gstvalue (const GArray * src)
 281 {
 282   GArray *dest;
 283   guint i, len;
 284
 285   len = src->len;
 286   dest = g_array_sized_new (FALSE, TRUE, sizeof (GValue), len);
 287   g_array_set_size (dest, len);
 288   for (i = 0; i < len; i++) {
 289     gst_value_init_and_copy (&g_array_index (dest, GValue, i),
 290         &g_array_index (src, GValue, i));
 291   }
 292
 293   return dest;
 294 }
 295
 296 static void
 297 gst_value_copy_list_or_array (const GValue * src_value, GValue * dest_value)
 298 {
 299   dest_value->data[0].v_pointer =
 300       copy_garray_of_gstvalue ((GArray *) src_value->data[0].v_pointer);
 301 }
 302
 303 static void
 304 gst_value_free_list_or_array (GValue * value)
 305 {
 306   guint i, len;
 307   GArray *src = (GArray *) value->data[0].v_pointer;
 308   len = src->len;
 309
 310   if ((value->data[1].v_uint & G_VALUE_NOCOPY_CONTENTS) == 0) {
 311     for (i = 0; i < len; i++) {
 312       g_value_unset (&g_array_index (src, GValue, i));
 313     }
 314     g_array_free (src, TRUE);
 315   }
 316 }
 317
 318 static gpointer
 319 gst_value_list_or_array_peek_pointer (const GValue * value)
 320 {
 321   return value->data[0].v_pointer;
 322 }
 323
 324 static gchar *
 325 gst_value_collect_list_or_array (GValue * value, guint n_collect_values,
 326     GTypeCValue * collect_values, guint collect_flags)
 327 {
 328   if (collect_flags & G_VALUE_NOCOPY_CONTENTS) {
 329     value->data[0].v_pointer = collect_values[0].v_pointer;
 330     value->data[1].v_uint = G_VALUE_NOCOPY_CONTENTS;
 331   } else {
 332     value->data[0].v_pointer =
 333         copy_garray_of_gstvalue ((GArray *) collect_values[0].v_pointer);
 334   }
 335   return NULL;
 336 }
 337
 338 static gchar *
 339 gst_value_lcopy_list_or_array (const GValue * value, guint n_collect_values,
 340     GTypeCValue * collect_values, guint collect_flags)
 341 {
 342   GArray **dest = collect_values[0].v_pointer;
 343
 344   if (!dest)
 345     return g_strdup_printf ("value location for `%s' passed as NULL",
 346         G_VALUE_TYPE_NAME (value));
 347   if (!value->data[0].v_pointer)
 348     return g_strdup_printf ("invalid value given for `%s'",
 349         G_VALUE_TYPE_NAME (value));
 350   if (collect_flags & G_VALUE_NOCOPY_CONTENTS) {
 351     *dest = (GArray *) value->data[0].v_pointer;
 352   } else {
 353     *dest = copy_garray_of_gstvalue ((GArray *) value->data[0].v_pointer);
 354   }
 355   return NULL;
 356 }
 357
 358 static gboolean
 359 gst_value_list_or_array_get_basic_type (const GValue * value, GType * type)
 360 {
 361   if (G_UNLIKELY (value == NULL))
 362     return FALSE;
 363
 364   if (GST_VALUE_HOLDS_LIST (value)) {
 365     if (VALUE_LIST_SIZE (value) == 0)
 366       return FALSE;
 367     return gst_value_list_or_array_get_basic_type (VALUE_LIST_GET_VALUE (value,
 368             0), type);
 369   }
 370   if (GST_VALUE_HOLDS_ARRAY (value)) {
 371     const GArray *array = (const GArray *) value->data[0].v_pointer;
 372     if (array->len == 0)
 373       return FALSE;
 374     return gst_value_list_or_array_get_basic_type (&g_array_index (array,
 375             GValue, 0), type);
 376   }
 377
 378   *type = G_VALUE_TYPE (value);
 379
 380   return TRUE;
 381 }
 382
 383 #define IS_RANGE_COMPAT(type1,type2,t1,t2) \
 384   (((t1) == (type1) && (t2) == (type2)) || ((t2) == (type1) && (t1) == (type2)))
 385
 386 static gboolean
 387 gst_value_list_or_array_are_compatible (const GValue * value1,
 388     const GValue * value2)
 389 {
 390   GType basic_type1, basic_type2;
 391
 392   /* empty or same type is OK */
 393   if (!gst_value_list_or_array_get_basic_type (value1, &basic_type1) ||
 394       !gst_value_list_or_array_get_basic_type (value2, &basic_type2) ||
 395       basic_type1 == basic_type2)
 396     return TRUE;
 397
 398   /* ranges are distinct types for each bound type... */
 399   if (IS_RANGE_COMPAT (G_TYPE_INT, GST_TYPE_INT_RANGE, basic_type1,
 400           basic_type2))
 401     return TRUE;
 402   if (IS_RANGE_COMPAT (G_TYPE_INT64, GST_TYPE_INT64_RANGE, basic_type1,
 403           basic_type2))
 404     return TRUE;
 405   if (IS_RANGE_COMPAT (G_TYPE_DOUBLE, GST_TYPE_DOUBLE_RANGE, basic_type1,
 406           basic_type2))
 407     return TRUE;
 408   if (IS_RANGE_COMPAT (GST_TYPE_FRACTION, GST_TYPE_FRACTION_RANGE, basic_type1,
 409           basic_type2))
 410     return TRUE;
 411
 412   return FALSE;
 413 }
 414
 415 static inline void
 416 _gst_value_list_append_and_take_value (GValue * value, GValue * append_value)
 417 {
 418   g_array_append_vals ((GArray *) value->data[0].v_pointer, append_value, 1);
 419   memset (append_value, 0, sizeof (GValue));
 420 }
 421
 422 /**
 423  * gst_value_list_append_and_take_value:
 424  * @value: a #GValue of type #GST_TYPE_LIST
 425  * @append_value: (transfer full): the value to append
 426  *
 427  * Appends @append_value to the GstValueList in @value.
 428  *
 429  * Since: 1.2
 430  */
 431 void
 432 gst_value_list_append_and_take_value (GValue * value, GValue * append_value)
 433 {
 434   g_return_if_fail (GST_VALUE_HOLDS_LIST (value));
 435   g_return_if_fail (G_IS_VALUE (append_value));
 436   g_return_if_fail (gst_value_list_or_array_are_compatible (value,
 437           append_value));
 438
 439   _gst_value_list_append_and_take_value (value, append_value);
 440 }
 441
 442 /**
 443  * gst_value_list_append_value:
 444  * @value: a #GValue of type #GST_TYPE_LIST
 445  * @append_value: (transfer none): the value to append
 446  *
 447  * Appends @append_value to the GstValueList in @value.
 448  */
 449 void
 450 gst_value_list_append_value (GValue * value, const GValue * append_value)
 451 {
 452   GValue val = { 0, };
 453
 454   g_return_if_fail (GST_VALUE_HOLDS_LIST (value));
 455   g_return_if_fail (G_IS_VALUE (append_value));
 456   g_return_if_fail (gst_value_list_or_array_are_compatible (value,
 457           append_value));
 458
 459   gst_value_init_and_copy (&val, append_value);
 460   g_array_append_vals ((GArray *) value->data[0].v_pointer, &val, 1);
 461 }
 462
 463 /**
 464  * gst_value_list_prepend_value:
 465  * @value: a #GValue of type #GST_TYPE_LIST
 466  * @prepend_value: the value to prepend
 467  *
 468  * Prepends @prepend_value to the GstValueList in @value.
 469  */
 470 void
 471 gst_value_list_prepend_value (GValue * value, const GValue * prepend_value)
 472 {
 473   GValue val = { 0, };
 474
 475   g_return_if_fail (GST_VALUE_HOLDS_LIST (value));
 476   g_return_if_fail (G_IS_VALUE (prepend_value));
 477   g_return_if_fail (gst_value_list_or_array_are_compatible (value,
 478           prepend_value));
 479
 480   gst_value_init_and_copy (&val, prepend_value);
 481   g_array_prepend_vals ((GArray *) value->data[0].v_pointer, &val, 1);
 482 }
 483
 484 /**
 485  * gst_value_list_concat:
 486  * @dest: (out caller-allocates): an uninitialized #GValue to take the result
 487  * @value1: a #GValue
 488  * @value2: a #GValue
 489  *
 490  * Concatenates copies of @value1 and @value2 into a list.  Values that are not
 491  * of type #GST_TYPE_LIST are treated as if they were lists of length 1.
 492  * @dest will be initialized to the type #GST_TYPE_LIST.
 493  */
 494 void
 495 gst_value_list_concat (GValue * dest, const GValue * value1,
 496     const GValue * value2)
 497 {
 498   guint i, value1_length, value2_length;
 499   GArray *array;
 500
 501   g_return_if_fail (dest != NULL);
 502   g_return_if_fail (G_VALUE_TYPE (dest) == 0);
 503   g_return_if_fail (G_IS_VALUE (value1));
 504   g_return_if_fail (G_IS_VALUE (value2));
 505   g_return_if_fail (gst_value_list_or_array_are_compatible (value1, value2));
 506
 507   value1_length =
 508       (GST_VALUE_HOLDS_LIST (value1) ? VALUE_LIST_SIZE (value1) : 1);
 509   value2_length =
 510       (GST_VALUE_HOLDS_LIST (value2) ? VALUE_LIST_SIZE (value2) : 1);
 511   g_value_init (dest, GST_TYPE_LIST);
 512   array = (GArray *) dest->data[0].v_pointer;
 513   g_array_set_size (array, value1_length + value2_length);
 514
 515   if (GST_VALUE_HOLDS_LIST (value1)) {
 516     for (i = 0; i < value1_length; i++) {
 517       gst_value_init_and_copy (&g_array_index (array, GValue, i),
 518           VALUE_LIST_GET_VALUE (value1, i));
 519     }
 520   } else {
 521     gst_value_init_and_copy (&g_array_index (array, GValue, 0), value1);
 522   }
 523
 524   if (GST_VALUE_HOLDS_LIST (value2)) {
 525     for (i = 0; i < value2_length; i++) {
 526       gst_value_init_and_copy (&g_array_index (array, GValue,
 527               i + value1_length), VALUE_LIST_GET_VALUE (value2, i));
 528     }
 529   } else {
 530     gst_value_init_and_copy (&g_array_index (array, GValue, value1_length),
 531         value2);
 532   }
 533 }
 534
 535 /* same as gst_value_list_concat() but takes ownership of GValues */
 536 static void
 537 gst_value_list_concat_and_take_values (GValue * dest, GValue * val1,
 538     GValue * val2)
 539 {
 540   guint i, val1_length, val2_length;
 541   gboolean val1_is_list;
 542   gboolean val2_is_list;
 543   GArray *array;
 544
 545   g_assert (dest != NULL);
 546   g_assert (G_VALUE_TYPE (dest) == 0);
 547   g_assert (G_IS_VALUE (val1));
 548   g_assert (G_IS_VALUE (val2));
 549   g_assert (gst_value_list_or_array_are_compatible (val1, val2));
 550
 551   val1_is_list = GST_VALUE_HOLDS_LIST (val1);
 552   val1_length = (val1_is_list ? VALUE_LIST_SIZE (val1) : 1);
 553
 554   val2_is_list = GST_VALUE_HOLDS_LIST (val2);
 555   val2_length = (val2_is_list ? VALUE_LIST_SIZE (val2) : 1);
 556
 557   g_value_init (dest, GST_TYPE_LIST);
 558   array = (GArray *) dest->data[0].v_pointer;
 559   g_array_set_size (array, val1_length + val2_length);
 560
 561   if (val1_is_list) {
 562     for (i = 0; i < val1_length; i++) {
 563       g_array_index (array, GValue, i) = *VALUE_LIST_GET_VALUE (val1, i);
 564     }
 565     g_array_set_size (VALUE_LIST_ARRAY (val1), 0);
 566     g_value_unset (val1);
 567   } else {
 568     g_array_index (array, GValue, 0) = *val1;
 569     G_VALUE_TYPE (val1) = G_TYPE_INVALID;
 570   }
 571
 572   if (val2_is_list) {
 573     for (i = 0; i < val2_length; i++) {
 574       const GValue *v2 = VALUE_LIST_GET_VALUE (val2, i);
 575       g_array_index (array, GValue, i + val1_length) = *v2;
 576     }
 577     g_array_set_size (VALUE_LIST_ARRAY (val2), 0);
 578     g_value_unset (val2);
 579   } else {
 580     g_array_index (array, GValue, val1_length) = *val2;
 581     G_VALUE_TYPE (val2) = G_TYPE_INVALID;
 582   }
 583 }
 584
 585 /**
 586  * gst_value_list_merge:
 587  * @dest: (out caller-allocates): an uninitialized #GValue to take the result
 588  * @value1: a #GValue
 589  * @value2: a #GValue
 590  *
 591  * Merges copies of @value1 and @value2.  Values that are not
 592  * of type #GST_TYPE_LIST are treated as if they were lists of length 1.
 593  *
 594  * The result will be put into @dest and will either be a list that will not
 595  * contain any duplicates, or a non-list type (if @value1 and @value2
 596  * were equal).
 597  */
 598 void
 599 gst_value_list_merge (GValue * dest, const GValue * value1,
 600     const GValue * value2)
 601 {
 602   guint i, j, k, value1_length, value2_length, skipped;
 603   const GValue *src;
 604   gboolean skip;
 605   GArray *array;
 606
 607   g_return_if_fail (dest != NULL);
 608   g_return_if_fail (G_VALUE_TYPE (dest) == 0);
 609   g_return_if_fail (G_IS_VALUE (value1));
 610   g_return_if_fail (G_IS_VALUE (value2));
 611   g_return_if_fail (gst_value_list_or_array_are_compatible (value1, value2));
 612
 613   value1_length =
 614       (GST_VALUE_HOLDS_LIST (value1) ? VALUE_LIST_SIZE (value1) : 1);
 615   value2_length =
 616       (GST_VALUE_HOLDS_LIST (value2) ? VALUE_LIST_SIZE (value2) : 1);
 617   g_value_init (dest, GST_TYPE_LIST);
 618   array = (GArray *) dest->data[0].v_pointer;
 619   g_array_set_size (array, value1_length + value2_length);
 620
 621   if (GST_VALUE_HOLDS_LIST (value1)) {
 622     for (i = 0; i < value1_length; i++) {
 623       gst_value_init_and_copy (&g_array_index (array, GValue, i),
 624           VALUE_LIST_GET_VALUE (value1, i));
 625     }
 626   } else {
 627     gst_value_init_and_copy (&g_array_index (array, GValue, 0), value1);
 628   }
 629
 630   j = value1_length;
 631   skipped = 0;
 632   if (GST_VALUE_HOLDS_LIST (value2)) {
 633     for (i = 0; i < value2_length; i++) {
 634       skip = FALSE;
 635       src = VALUE_LIST_GET_VALUE (value2, i);
 636       for (k = 0; k < value1_length; k++) {
 637         if (gst_value_compare (&g_array_index (array, GValue, k),
 638                 src) == GST_VALUE_EQUAL) {
 639           skip = TRUE;
 640           skipped++;
 641           break;
 642         }
 643       }
 644       if (!skip) {
 645         gst_value_init_and_copy (&g_array_index (array, GValue, j), src);
 646         j++;
 647       }
 648     }
 649   } else {
 650     skip = FALSE;
 651     for (k = 0; k < value1_length; k++) {
 652       if (gst_value_compare (&g_array_index (array, GValue, k),
 653               value2) == GST_VALUE_EQUAL) {
 654         skip = TRUE;
 655         skipped++;
 656         break;
 657       }
 658     }
 659     if (!skip) {
 660       gst_value_init_and_copy (&g_array_index (array, GValue, j), value2);
 661     }
 662   }
 663   if (skipped) {
 664     guint new_size = value1_length + (value2_length - skipped);
 665
 666     if (new_size > 1) {
 667       /* shrink list */
 668       g_array_set_size (array, new_size);
 669     } else {
 670       GValue single_dest;
 671
 672       /* size is 1, take single value in list and make it new dest */
 673       single_dest = g_array_index (array, GValue, 0);
 674
 675       /* clean up old value allocations: must set array size to 0, because
 676        * allocated values are not inited meaning g_value_unset() will not
 677        * work on them */
 678       g_array_set_size (array, 0);
 679       g_value_unset (dest);
 680
 681       /* the single value is our new result */
 682       *dest = single_dest;
 683     }
 684   }
 685 }
 686
 687 /**
 688  * gst_value_list_get_size:
 689  * @value: a #GValue of type #GST_TYPE_LIST
 690  *
 691  * Gets the number of values contained in @value.
 692  *
 693  * Returns: the number of values
 694  */
 695 guint
 696 gst_value_list_get_size (const GValue * value)
 697 {
 698   g_return_val_if_fail (GST_VALUE_HOLDS_LIST (value), 0);
 699
 700   return ((GArray *) value->data[0].v_pointer)->len;
 701 }
 702
 703 /**
 704  * gst_value_list_get_value:
 705  * @value: a #GValue of type #GST_TYPE_LIST
 706  * @index: index of value to get from the list
 707  *
 708  * Gets the value that is a member of the list contained in @value and
 709  * has the index @index.
 710  *
 711  * Returns: (transfer none): the value at the given index
 712  */
 713 const GValue *
 714 gst_value_list_get_value (const GValue * value, guint index)
 715 {
 716   g_return_val_if_fail (GST_VALUE_HOLDS_LIST (value), NULL);
 717   g_return_val_if_fail (index < VALUE_LIST_SIZE (value), NULL);
 718
 719   return (const GValue *) &g_array_index ((GArray *) value->data[0].v_pointer,
 720       GValue, index);
 721 }
 722
 723 /**
 724  * gst_value_array_append_value:
 725  * @value: a #GValue of type #GST_TYPE_ARRAY
 726  * @append_value: the value to append
 727  *
 728  * Appends @append_value to the GstValueArray in @value.
 729  */
 730 void
 731 gst_value_array_append_value (GValue * value, const GValue * append_value)
 732 {
 733   GValue val = { 0, };
 734
 735   g_return_if_fail (GST_VALUE_HOLDS_ARRAY (value));
 736   g_return_if_fail (G_IS_VALUE (append_value));
 737   g_return_if_fail (gst_value_list_or_array_are_compatible (value,
 738           append_value));
 739
 740   gst_value_init_and_copy (&val, append_value);
 741   g_array_append_vals ((GArray *) value->data[0].v_pointer, &val, 1);
 742 }
 743
 744 static inline void
 745 _gst_value_array_append_and_take_value (GValue * value, GValue * append_value)
 746 {
 747   g_array_append_vals ((GArray *) value->data[0].v_pointer, append_value, 1);
 748   memset (append_value, 0, sizeof (GValue));
 749 }
 750
 751 /**
 752  * gst_value_array_append_and_take_value:
 753  * @value: a #GValue of type #GST_TYPE_ARRAY
 754  * @append_value: (transfer full): the value to append
 755  *
 756  * Appends @append_value to the GstValueArray in @value.
 757  *
 758  * Since: 1.2
 759  */
 760 void
 761 gst_value_array_append_and_take_value (GValue * value, GValue * append_value)
 762 {
 763   g_return_if_fail (GST_VALUE_HOLDS_ARRAY (value));
 764   g_return_if_fail (G_IS_VALUE (append_value));
 765   g_return_if_fail (gst_value_list_or_array_are_compatible (value,
 766           append_value));
 767
 768   _gst_value_array_append_and_take_value (value, append_value);
 769 }
 770
 771 /**
 772  * gst_value_array_prepend_value:
 773  * @value: a #GValue of type #GST_TYPE_ARRAY
 774  * @prepend_value: the value to prepend
 775  *
 776  * Prepends @prepend_value to the GstValueArray in @value.
 777  */
 778 void
 779 gst_value_array_prepend_value (GValue * value, const GValue * prepend_value)
 780 {
 781   GValue val = { 0, };
 782
 783   g_return_if_fail (GST_VALUE_HOLDS_ARRAY (value));
 784   g_return_if_fail (G_IS_VALUE (prepend_value));
 785   g_return_if_fail (gst_value_list_or_array_are_compatible (value,
 786           prepend_value));
 787
 788   gst_value_init_and_copy (&val, prepend_value);
 789   g_array_prepend_vals ((GArray *) value->data[0].v_pointer, &val, 1);
 790 }
 791
 792 /**
 793  * gst_value_array_get_size:
 794  * @value: a #GValue of type #GST_TYPE_ARRAY
 795  *
 796  * Gets the number of values contained in @value.
 797  *
 798  * Returns: the number of values
 799  */
 800 guint
 801 gst_value_array_get_size (const GValue * value)
 802 {
 803   g_return_val_if_fail (GST_VALUE_HOLDS_ARRAY (value), 0);
 804
 805   return ((GArray *) value->data[0].v_pointer)->len;
 806 }
 807
 808 /**
 809  * gst_value_array_get_value:
 810  * @value: a #GValue of type #GST_TYPE_ARRAY
 811  * @index: index of value to get from the array
 812  *
 813  * Gets the value that is a member of the array contained in @value and
 814  * has the index @index.
 815  *
 816  * Returns: (transfer none): the value at the given index
 817  */
 818 const GValue *
 819 gst_value_array_get_value (const GValue * value, guint index)
 820 {
 821   g_return_val_if_fail (GST_VALUE_HOLDS_ARRAY (value), NULL);
 822   g_return_val_if_fail (index < gst_value_array_get_size (value), NULL);
 823
 824   return (const GValue *) &g_array_index ((GArray *) value->data[0].v_pointer,
 825       GValue, index);
 826 }
 827
 828 static void
 829 gst_value_transform_list_string (const GValue * src_value, GValue * dest_value)
 830 {
 831   gst_value_transform_any_list_string (src_value, dest_value, "{ ", " }");
 832 }
 833
 834 static void
 835 gst_value_transform_array_string (const GValue * src_value, GValue * dest_value)
 836 {
 837   gst_value_transform_any_list_string (src_value, dest_value, "< ", " >");
 838 }
 839
 840 /* Do an unordered compare of the contents of a list */
 841 static gint
 842 gst_value_compare_list (const GValue * value1, const GValue * value2)
 843 {
 844   guint i, j;
 845   GArray *array1 = value1->data[0].v_pointer;
 846   GArray *array2 = value2->data[0].v_pointer;
 847   GValue *v1;
 848   GValue *v2;
 849   gint len, to_remove;
 850   guint8 *removed;
 851   GstValueCompareFunc compare;
 852
 853   /* get length and do initial length check. */
 854   len = array1->len;
 855   if (len != array2->len)
 856     return GST_VALUE_UNORDERED;
 857
 858   /* place to mark removed value indices of array2 */
 859   removed = g_newa (guint8, len);
 860   memset (removed, 0, len);
 861   to_remove = len;
 862
 863   /* loop over array1, all items should be in array2. When we find an
 864    * item in array2, remove it from array2 by marking it as removed */
 865   for (i = 0; i < len; i++) {
 866     v1 = &g_array_index (array1, GValue, i);
 867     if ((compare = gst_value_get_compare_func (v1))) {
 868       for (j = 0; j < len; j++) {
 869         /* item is removed, we can skip it */
 870         if (removed[j])
 871           continue;
 872         v2 = &g_array_index (array2, GValue, j);
 873         if (gst_value_compare_with_func (v1, v2, compare) == GST_VALUE_EQUAL) {
 874           /* mark item as removed now that we found it in array2 and
 875            * decrement the number of remaining items in array2. */
 876           removed[j] = 1;
 877           to_remove--;
 878           break;
 879         }
 880       }
 881       /* item in array1 and not in array2, UNORDERED */
 882       if (j == len)
 883         return GST_VALUE_UNORDERED;
 884     } else
 885       return GST_VALUE_UNORDERED;
 886   }
 887   /* if not all items were removed, array2 contained something not in array1 */
 888   if (to_remove != 0)
 889     return GST_VALUE_UNORDERED;
 890
 891   /* arrays are equal */
 892   return GST_VALUE_EQUAL;
 893 }
 894
 895 /* Perform an ordered comparison of the contents of an array */
 896 static gint
 897 gst_value_compare_array (const GValue * value1, const GValue * value2)
 898 {
 899   guint i;
 900   GArray *array1 = value1->data[0].v_pointer;
 901   GArray *array2 = value2->data[0].v_pointer;
 902   guint len = array1->len;
 903   GValue *v1;
 904   GValue *v2;
 905
 906   if (len != array2->len)
 907     return GST_VALUE_UNORDERED;
 908
 909   for (i = 0; i < len; i++) {
 910     v1 = &g_array_index (array1, GValue, i);
 911     v2 = &g_array_index (array2, GValue, i);
 912     if (gst_value_compare (v1, v2) != GST_VALUE_EQUAL)
 913       return GST_VALUE_UNORDERED;
 914   }
 915
 916   return GST_VALUE_EQUAL;
 917 }
 918
 919 static gchar *
 920 gst_value_serialize_list (const GValue * value)
 921 {
 922   return gst_value_serialize_any_list (value, "{ ", " }");
 923 }
 924
 925 static gboolean
 926 gst_value_deserialize_list (GValue * dest, const gchar * s)
 927 {
 928   g_warning ("gst_value_deserialize_list: unimplemented");
 929   return FALSE;
 930 }
 931
 932 static gchar *
 933 gst_value_serialize_array (const GValue * value)
 934 {
 935   return gst_value_serialize_any_list (value, "< ", " >");
 936 }
 937
 938 static gboolean
 939 gst_value_deserialize_array (GValue * dest, const gchar * s)
 940 {
 941   g_warning ("gst_value_deserialize_array: unimplemented");
 942   return FALSE;
 943 }
 944
 945 /*************
 946  * int range *
 947  *
 948  * Values in the range are defined as any value greater or equal
 949  * to min*step, AND lesser or equal to max*step.
 950  * For step == 1, this falls back to the traditional range semantics.
 951  *
 952  * data[0] = (min << 32) | (max)
 953  * data[1] = step
 954  *
 955  *************/
 956
 957 #define INT_RANGE_MIN(v) ((gint) (((v)->data[0].v_uint64) >> 32))
 958 #define INT_RANGE_MAX(v) ((gint) (((v)->data[0].v_uint64) & 0xffffffff))
 959 #define INT_RANGE_STEP(v) ((v)->data[1].v_int)
 960
 961 static void
 962 gst_value_init_int_range (GValue * value)
 963 {
 964   G_STATIC_ASSERT (sizeof (gint) <= 2 * sizeof (guint64));
 965
 966   value->data[0].v_uint64 = 0;
 967   value->data[1].v_int = 1;
 968 }
 969
 970 static void
 971 gst_value_copy_int_range (const GValue * src_value, GValue * dest_value)
 972 {
 973   dest_value->data[0].v_uint64 = src_value->data[0].v_uint64;
 974   dest_value->data[1].v_int = src_value->data[1].v_int;
 975 }
 976
 977 static gchar *
 978 gst_value_collect_int_range (GValue * value, guint n_collect_values,
 979     GTypeCValue * collect_values, guint collect_flags)
 980 {
 981   if (n_collect_values != 2)
 982     return g_strdup_printf ("not enough value locations for `%s' passed",
 983         G_VALUE_TYPE_NAME (value));
 984   if (collect_values[0].v_int >= collect_values[1].v_int)
 985     return g_strdup_printf ("range start is not smaller than end for `%s'",
 986         G_VALUE_TYPE_NAME (value));
 987
 988   gst_value_set_int_range_step (value, collect_values[0].v_int,
 989       collect_values[1].v_int, 1);
 990
 991   return NULL;
 992 }
 993
 994 static gchar *
 995 gst_value_lcopy_int_range (const GValue * value, guint n_collect_values,
 996     GTypeCValue * collect_values, guint collect_flags)
 997 {
 998   guint32 *int_range_start = collect_values[0].v_pointer;
 999   guint32 *int_range_end = collect_values[1].v_pointer;
1000
1001   if (!int_range_start)
1002     return g_strdup_printf ("start value location for `%s' passed as NULL",
1003         G_VALUE_TYPE_NAME (value));
1004   if (!int_range_end)
1005     return g_strdup_printf ("end value location for `%s' passed as NULL",
1006         G_VALUE_TYPE_NAME (value));
1007
1008   *int_range_start = INT_RANGE_MIN (value);
1009   *int_range_end = INT_RANGE_MAX (value);
1010
1011   return NULL;
1012 }
1013
1014 /**
1015  * gst_value_set_int_range_step:
1016  * @value: a GValue initialized to GST_TYPE_INT_RANGE
1017  * @start: the start of the range
1018  * @end: the end of the range
1019  * @step: the step of the range
1020  *
1021  * Sets @value to the range specified by @start, @end and @step.
1022  */
1023 void
1024 gst_value_set_int_range_step (GValue * value, gint start, gint end, gint step)
1025 {
1026   guint64 sstart, sstop;
1027
1028   g_return_if_fail (GST_VALUE_HOLDS_INT_RANGE (value));
1029   g_return_if_fail (start < end);
1030   g_return_if_fail (step > 0);
1031   g_return_if_fail (start % step == 0);
1032   g_return_if_fail (end % step == 0);
1033
1034   sstart = (guint) (start / step);
1035   sstop = (guint) (end / step);
1036   value->data[0].v_uint64 = (sstart << 32) | sstop;
1037   value->data[1].v_int = step;
1038 }
1039
1040 /**
1041  * gst_value_set_int_range:
1042  * @value: a GValue initialized to GST_TYPE_INT_RANGE
1043  * @start: the start of the range
1044  * @end: the end of the range
1045  *
1046  * Sets @value to the range specified by @start and @end.
1047  */
1048 void
1049 gst_value_set_int_range (GValue * value, gint start, gint end)
1050 {
1051   gst_value_set_int_range_step (value, start, end, 1);
1052 }
1053
1054 /**
1055  * gst_value_get_int_range_min:
1056  * @value: a GValue initialized to GST_TYPE_INT_RANGE
1057  *
1058  * Gets the minimum of the range specified by @value.
1059  *
1060  * Returns: the minimum of the range
1061  */
1062 gint
1063 gst_value_get_int_range_min (const GValue * value)
1064 {
1065   g_return_val_if_fail (GST_VALUE_HOLDS_INT_RANGE (value), 0);
1066
1067   return INT_RANGE_MIN (value) * INT_RANGE_STEP (value);
1068 }
1069
1070 /**
1071  * gst_value_get_int_range_max:
1072  * @value: a GValue initialized to GST_TYPE_INT_RANGE
1073  *
1074  * Gets the maximum of the range specified by @value.
1075  *
1076  * Returns: the maximum of the range
1077  */
1078 gint
1079 gst_value_get_int_range_max (const GValue * value)
1080 {
1081   g_return_val_if_fail (GST_VALUE_HOLDS_INT_RANGE (value), 0);
1082
1083   return INT_RANGE_MAX (value) * INT_RANGE_STEP (value);
1084 }
1085
1086 /**
1087  * gst_value_get_int_range_step:
1088  * @value: a GValue initialized to GST_TYPE_INT_RANGE
1089  *
1090  * Gets the step of the range specified by @value.
1091  *
1092  * Returns: the step of the range
1093  */
1094 gint
1095 gst_value_get_int_range_step (const GValue * value)
1096 {
1097   g_return_val_if_fail (GST_VALUE_HOLDS_INT_RANGE (value), 0);
1098
1099   return INT_RANGE_STEP (value);
1100 }
1101
1102 static void
1103 gst_value_transform_int_range_string (const GValue * src_value,
1104     GValue * dest_value)
1105 {
1106   if (INT_RANGE_STEP (src_value) == 1)
1107     dest_value->data[0].v_pointer = g_strdup_printf ("[%d,%d]",
1108         INT_RANGE_MIN (src_value), INT_RANGE_MAX (src_value));
1109   else
1110     dest_value->data[0].v_pointer = g_strdup_printf ("[%d,%d,%d]",
1111         INT_RANGE_MIN (src_value) * INT_RANGE_STEP (src_value),
1112         INT_RANGE_MAX (src_value) * INT_RANGE_STEP (src_value),
1113         INT_RANGE_STEP (src_value));
1114 }
1115
1116 static gint
1117 gst_value_compare_int_range (const GValue * value1, const GValue * value2)
1118 {
1119   /* calculate the number of values in each range */
1120   gint n1 = INT_RANGE_MAX (value1) - INT_RANGE_MIN (value1) + 1;
1121   gint n2 = INT_RANGE_MAX (value2) - INT_RANGE_MIN (value2) + 1;
1122
1123   /* they must be equal */
1124   if (n1 != n2)
1125     return GST_VALUE_UNORDERED;
1126
1127   /* if empty, equal */
1128   if (n1 == 0)
1129     return GST_VALUE_EQUAL;
1130
1131   /* if more than one value, then it is only equal if the step is equal
1132      and bounds lie on the same value */
1133   if (n1 > 1) {
1134     if (INT_RANGE_STEP (value1) == INT_RANGE_STEP (value2) &&
1135         INT_RANGE_MIN (value1) == INT_RANGE_MIN (value2) &&
1136         INT_RANGE_MAX (value1) == INT_RANGE_MAX (value2)) {
1137       return GST_VALUE_EQUAL;
1138     }
1139     return GST_VALUE_UNORDERED;
1140   } else {
1141     /* if just one, only if the value is equal */
1142     if (INT_RANGE_MIN (value1) == INT_RANGE_MIN (value2))
1143       return GST_VALUE_EQUAL;
1144     return GST_VALUE_UNORDERED;
1145   }
1146 }
1147
1148 static gchar *
1149 gst_value_serialize_int_range (const GValue * value)
1150 {
1151   if (INT_RANGE_STEP (value) == 1)
1152     return g_strdup_printf ("[ %d, %d ]", INT_RANGE_MIN (value),
1153         INT_RANGE_MAX (value));
1154   else
1155     return g_strdup_printf ("[ %d, %d, %d ]",
1156         INT_RANGE_MIN (value) * INT_RANGE_STEP (value),
1157         INT_RANGE_MAX (value) * INT_RANGE_STEP (value), INT_RANGE_STEP (value));
1158 }
1159
1160 static gboolean
1161 gst_value_deserialize_int_range (GValue * dest, const gchar * s)
1162 {
1163   g_warning ("unimplemented");
1164   return FALSE;
1165 }
1166
1167 /***************
1168  * int64 range *
1169  *
1170  * Values in the range are defined as any value greater or equal
1171  * to min*step, AND lesser or equal to max*step.
1172  * For step == 1, this falls back to the traditional range semantics.
1173  ***************/
1174
1175 #define INT64_RANGE_MIN(v) (((gint64 *)((v)->data[0].v_pointer))[0])
1176 #define INT64_RANGE_MAX(v) (((gint64 *)((v)->data[0].v_pointer))[1])
1177 #define INT64_RANGE_STEP(v) (((gint64 *)((v)->data[0].v_pointer))[2])
1178
1179 static void
1180 gst_value_init_int64_range (GValue * value)
1181 {
1182   gint64 *vals = g_slice_alloc0 (3 * sizeof (gint64));
1183   value->data[0].v_pointer = vals;
1184   INT64_RANGE_MIN (value) = 0;
1185   INT64_RANGE_MAX (value) = 0;
1186   INT64_RANGE_STEP (value) = 1;
1187 }
1188
1189 static void
1190 gst_value_free_int64_range (GValue * value)
1191 {
1192   g_return_if_fail (GST_VALUE_HOLDS_INT64_RANGE (value));
1193   g_slice_free1 (3 * sizeof (gint64), value->data[0].v_pointer);
1194   value->data[0].v_pointer = NULL;
1195 }
1196
1197 static void
1198 gst_value_copy_int64_range (const GValue * src_value, GValue * dest_value)
1199 {
1200   gint64 *vals = (gint64 *) dest_value->data[0].v_pointer;
1201   gint64 *src_vals = (gint64 *) src_value->data[0].v_pointer;
1202
1203   if (vals == NULL) {
1204     gst_value_init_int64_range (dest_value);
1205   }
1206
1207   if (src_vals != NULL) {
1208     INT64_RANGE_MIN (dest_value) = INT64_RANGE_MIN (src_value);
1209     INT64_RANGE_MAX (dest_value) = INT64_RANGE_MAX (src_value);
1210     INT64_RANGE_STEP (dest_value) = INT64_RANGE_STEP (src_value);
1211   }
1212 }
1213
1214 static gchar *
1215 gst_value_collect_int64_range (GValue * value, guint n_collect_values,
1216     GTypeCValue * collect_values, guint collect_flags)
1217 {
1218   gint64 *vals = value->data[0].v_pointer;
1219
1220   if (n_collect_values != 2)
1221     return g_strdup_printf ("not enough value locations for `%s' passed",
1222         G_VALUE_TYPE_NAME (value));
1223   if (collect_values[0].v_int64 >= collect_values[1].v_int64)
1224     return g_strdup_printf ("range start is not smaller than end for `%s'",
1225         G_VALUE_TYPE_NAME (value));
1226
1227   if (vals == NULL) {
1228     gst_value_init_int64_range (value);
1229   }
1230
1231   gst_value_set_int64_range_step (value, collect_values[0].v_int64,
1232       collect_values[1].v_int64, 1);
1233
1234   return NULL;
1235 }
1236
1237 static gchar *
1238 gst_value_lcopy_int64_range (const GValue * value, guint n_collect_values,
1239     GTypeCValue * collect_values, guint collect_flags)
1240 {
1241   guint64 *int_range_start = collect_values[0].v_pointer;
1242   guint64 *int_range_end = collect_values[1].v_pointer;
1243   guint64 *int_range_step = collect_values[2].v_pointer;
1244   gint64 *vals = (gint64 *) value->data[0].v_pointer;
1245
1246   if (!int_range_start)
1247     return g_strdup_printf ("start value location for `%s' passed as NULL",
1248         G_VALUE_TYPE_NAME (value));
1249   if (!int_range_end)
1250     return g_strdup_printf ("end value location for `%s' passed as NULL",
1251         G_VALUE_TYPE_NAME (value));
1252   if (!int_range_step)
1253     return g_strdup_printf ("step value location for `%s' passed as NULL",
1254         G_VALUE_TYPE_NAME (value));
1255
1256   if (G_UNLIKELY (vals == NULL)) {
1257     return g_strdup_printf ("Uninitialised `%s' passed",
1258         G_VALUE_TYPE_NAME (value));
1259   }
1260
1261   *int_range_start = INT64_RANGE_MIN (value);
1262   *int_range_end = INT64_RANGE_MAX (value);
1263   *int_range_step = INT64_RANGE_STEP (value);
1264
1265   return NULL;
1266 }
1267
1268 /**
1269  * gst_value_set_int64_range_step:
1270  * @value: a GValue initialized to GST_TYPE_INT64_RANGE
1271  * @start: the start of the range
1272  * @end: the end of the range
1273  * @step: the step of the range
1274  *
1275  * Sets @value to the range specified by @start, @end and @step.
1276  */
1277 void
1278 gst_value_set_int64_range_step (GValue * value, gint64 start, gint64 end,
1279     gint64 step)
1280 {
1281   g_return_if_fail (GST_VALUE_HOLDS_INT64_RANGE (value));
1282   g_return_if_fail (start < end);
1283   g_return_if_fail (step > 0);
1284   g_return_if_fail (start % step == 0);
1285   g_return_if_fail (end % step == 0);
1286
1287   INT64_RANGE_MIN (value) = start / step;
1288   INT64_RANGE_MAX (value) = end / step;
1289   INT64_RANGE_STEP (value) = step;
1290 }
1291
1292 /**
1293  * gst_value_set_int64_range:
1294  * @value: a GValue initialized to GST_TYPE_INT64_RANGE
1295  * @start: the start of the range
1296  * @end: the end of the range
1297  *
1298  * Sets @value to the range specified by @start and @end.
1299  */
1300 void
1301 gst_value_set_int64_range (GValue * value, gint64 start, gint64 end)
1302 {
1303   gst_value_set_int64_range_step (value, start, end, 1);
1304 }
1305
1306 /**
1307  * gst_value_get_int64_range_min:
1308  * @value: a GValue initialized to GST_TYPE_INT64_RANGE
1309  *
1310  * Gets the minimum of the range specified by @value.
1311  *
1312  * Returns: the minimum of the range
1313  */
1314 gint64
1315 gst_value_get_int64_range_min (const GValue * value)
1316 {
1317   g_return_val_if_fail (GST_VALUE_HOLDS_INT64_RANGE (value), 0);
1318
1319   return INT64_RANGE_MIN (value) * INT64_RANGE_STEP (value);
1320 }
1321
1322 /**
1323  * gst_value_get_int64_range_max:
1324  * @value: a GValue initialized to GST_TYPE_INT64_RANGE
1325  *
1326  * Gets the maximum of the range specified by @value.
1327  *
1328  * Returns: the maximum of the range
1329  */
1330 gint64
1331 gst_value_get_int64_range_max (const GValue * value)
1332 {
1333   g_return_val_if_fail (GST_VALUE_HOLDS_INT64_RANGE (value), 0);
1334
1335   return INT64_RANGE_MAX (value) * INT64_RANGE_STEP (value);
1336 }
1337
1338 /**
1339  * gst_value_get_int64_range_step:
1340  * @value: a GValue initialized to GST_TYPE_INT64_RANGE
1341  *
1342  * Gets the step of the range specified by @value.
1343  *
1344  * Returns: the step of the range
1345  */
1346 gint64
1347 gst_value_get_int64_range_step (const GValue * value)
1348 {
1349   g_return_val_if_fail (GST_VALUE_HOLDS_INT64_RANGE (value), 0);
1350
1351   return INT64_RANGE_STEP (value);
1352 }
1353
1354 static void
1355 gst_value_transform_int64_range_string (const GValue * src_value,
1356     GValue * dest_value)
1357 {
1358   if (INT64_RANGE_STEP (src_value) == 1)
1359     dest_value->data[0].v_pointer =
1360         g_strdup_printf ("(gint64)[%" G_GINT64_FORMAT ",%" G_GINT64_FORMAT "]",
1361         INT64_RANGE_MIN (src_value), INT64_RANGE_MAX (src_value));
1362   else
1363     dest_value->data[0].v_pointer =
1364         g_strdup_printf ("(gint64)[%" G_GINT64_FORMAT ",%" G_GINT64_FORMAT
1365         ",%" G_GINT64_FORMAT "]",
1366         INT64_RANGE_MIN (src_value) * INT64_RANGE_STEP (src_value),
1367         INT64_RANGE_MAX (src_value) * INT64_RANGE_STEP (src_value),
1368         INT64_RANGE_STEP (src_value));
1369 }
1370
1371 static gint
1372 gst_value_compare_int64_range (const GValue * value1, const GValue * value2)
1373 {
1374   /* calculate the number of values in each range */
1375   gint64 n1 = INT64_RANGE_MAX (value1) - INT64_RANGE_MIN (value1) + 1;
1376   gint64 n2 = INT64_RANGE_MAX (value2) - INT64_RANGE_MIN (value2) + 1;
1377
1378   /* they must be equal */
1379   if (n1 != n2)
1380     return GST_VALUE_UNORDERED;
1381
1382   /* if empty, equal */
1383   if (n1 == 0)
1384     return GST_VALUE_EQUAL;
1385
1386   /* if more than one value, then it is only equal if the step is equal
1387      and bounds lie on the same value */
1388   if (n1 > 1) {
1389     if (INT64_RANGE_STEP (value1) == INT64_RANGE_STEP (value2) &&
1390         INT64_RANGE_MIN (value1) == INT64_RANGE_MIN (value2) &&
1391         INT64_RANGE_MAX (value1) == INT64_RANGE_MAX (value2)) {
1392       return GST_VALUE_EQUAL;
1393     }
1394     return GST_VALUE_UNORDERED;
1395   } else {
1396     /* if just one, only if the value is equal */
1397     if (INT64_RANGE_MIN (value1) == INT64_RANGE_MIN (value2))
1398       return GST_VALUE_EQUAL;
1399     return GST_VALUE_UNORDERED;
1400   }
1401 }
1402
1403 static gchar *
1404 gst_value_serialize_int64_range (const GValue * value)
1405 {
1406   if (INT64_RANGE_STEP (value) == 1)
1407     return g_strdup_printf ("[ %" G_GINT64_FORMAT ", %" G_GINT64_FORMAT " ]",
1408         INT64_RANGE_MIN (value), INT64_RANGE_MAX (value));
1409   else
1410     return g_strdup_printf ("[ %" G_GINT64_FORMAT ", %" G_GINT64_FORMAT ", %"
1411         G_GINT64_FORMAT " ]",
1412         INT64_RANGE_MIN (value) * INT64_RANGE_STEP (value),
1413         INT64_RANGE_MAX (value) * INT64_RANGE_STEP (value),
1414         INT64_RANGE_STEP (value));
1415 }
1416
1417 static gboolean
1418 gst_value_deserialize_int64_range (GValue * dest, const gchar * s)
1419 {
1420   g_warning ("unimplemented");
1421   return FALSE;
1422 }
1423
1424 /****************
1425  * double range *
1426  ****************/
1427
1428 static void
1429 gst_value_init_double_range (GValue * value)
1430 {
1431   value->data[0].v_double = 0;
1432   value->data[1].v_double = 0;
1433 }
1434
1435 static void
1436 gst_value_copy_double_range (const GValue * src_value, GValue * dest_value)
1437 {
1438   dest_value->data[0].v_double = src_value->data[0].v_double;
1439   dest_value->data[1].v_double = src_value->data[1].v_double;
1440 }
1441
1442 static gchar *
1443 gst_value_collect_double_range (GValue * value, guint n_collect_values,
1444     GTypeCValue * collect_values, guint collect_flags)
1445 {
1446   if (n_collect_values != 2)
1447     return g_strdup_printf ("not enough value locations for `%s' passed",
1448         G_VALUE_TYPE_NAME (value));
1449   if (collect_values[0].v_double >= collect_values[1].v_double)
1450     return g_strdup_printf ("range start is not smaller than end for `%s'",
1451         G_VALUE_TYPE_NAME (value));
1452
1453   value->data[0].v_double = collect_values[0].v_double;
1454   value->data[1].v_double = collect_values[1].v_double;
1455
1456   return NULL;
1457 }
1458
1459 static gchar *
1460 gst_value_lcopy_double_range (const GValue * value, guint n_collect_values,
1461     GTypeCValue * collect_values, guint collect_flags)
1462 {
1463   gdouble *double_range_start = collect_values[0].v_pointer;
1464   gdouble *double_range_end = collect_values[1].v_pointer;
1465
1466   if (!double_range_start)
1467     return g_strdup_printf ("start value location for `%s' passed as NULL",
1468         G_VALUE_TYPE_NAME (value));
1469   if (!double_range_end)
1470     return g_strdup_printf ("end value location for `%s' passed as NULL",
1471         G_VALUE_TYPE_NAME (value));
1472
1473   *double_range_start = value->data[0].v_double;
1474   *double_range_end = value->data[1].v_double;
1475
1476   return NULL;
1477 }
1478
1479 /**
1480  * gst_value_set_double_range:
1481  * @value: a GValue initialized to GST_TYPE_DOUBLE_RANGE
1482  * @start: the start of the range
1483  * @end: the end of the range
1484  *
1485  * Sets @value to the range specified by @start and @end.
1486  */
1487 void
1488 gst_value_set_double_range (GValue * value, gdouble start, gdouble end)
1489 {
1490   g_return_if_fail (GST_VALUE_HOLDS_DOUBLE_RANGE (value));
1491   g_return_if_fail (start < end);
1492
1493   value->data[0].v_double = start;
1494   value->data[1].v_double = end;
1495 }
1496
1497 /**
1498  * gst_value_get_double_range_min:
1499  * @value: a GValue initialized to GST_TYPE_DOUBLE_RANGE
1500  *
1501  * Gets the minimum of the range specified by @value.
1502  *
1503  * Returns: the minimum of the range
1504  */
1505 gdouble
1506 gst_value_get_double_range_min (const GValue * value)
1507 {
1508   g_return_val_if_fail (GST_VALUE_HOLDS_DOUBLE_RANGE (value), 0);
1509
1510   return value->data[0].v_double;
1511 }
1512
1513 /**
1514  * gst_value_get_double_range_max:
1515  * @value: a GValue initialized to GST_TYPE_DOUBLE_RANGE
1516  *
1517  * Gets the maximum of the range specified by @value.
1518  *
1519  * Returns: the maximum of the range
1520  */
1521 gdouble
1522 gst_value_get_double_range_max (const GValue * value)
1523 {
1524   g_return_val_if_fail (GST_VALUE_HOLDS_DOUBLE_RANGE (value), 0);
1525
1526   return value->data[1].v_double;
1527 }
1528
1529 static void
1530 gst_value_transform_double_range_string (const GValue * src_value,
1531     GValue * dest_value)
1532 {
1533   gchar s1[G_ASCII_DTOSTR_BUF_SIZE], s2[G_ASCII_DTOSTR_BUF_SIZE];
1534
1535   dest_value->data[0].v_pointer = g_strdup_printf ("[%s,%s]",
1536       g_ascii_dtostr (s1, G_ASCII_DTOSTR_BUF_SIZE,
1537           src_value->data[0].v_double),
1538       g_ascii_dtostr (s2, G_ASCII_DTOSTR_BUF_SIZE,
1539           src_value->data[1].v_double));
1540 }
1541
1542 static gint
1543 gst_value_compare_double_range (const GValue * value1, const GValue * value2)
1544 {
1545   if (value2->data[0].v_double == value1->data[0].v_double &&
1546       value2->data[1].v_double == value1->data[1].v_double)
1547     return GST_VALUE_EQUAL;
1548   return GST_VALUE_UNORDERED;
1549 }
1550
1551 static gchar *
1552 gst_value_serialize_double_range (const GValue * value)
1553 {
1554   gchar d1[G_ASCII_DTOSTR_BUF_SIZE];
1555   gchar d2[G_ASCII_DTOSTR_BUF_SIZE];
1556
1557   g_ascii_dtostr (d1, G_ASCII_DTOSTR_BUF_SIZE, value->data[0].v_double);
1558   g_ascii_dtostr (d2, G_ASCII_DTOSTR_BUF_SIZE, value->data[1].v_double);
1559   return g_strdup_printf ("[ %s, %s ]", d1, d2);
1560 }
1561
1562 static gboolean
1563 gst_value_deserialize_double_range (GValue * dest, const gchar * s)
1564 {
1565   g_warning ("unimplemented");
1566   return FALSE;
1567 }
1568
1569 /****************
1570  * fraction range *
1571  ****************/
1572
1573 static void
1574 gst_value_init_fraction_range (GValue * value)
1575 {
1576   GValue *vals;
1577   GType ftype;
1578
1579   ftype = GST_TYPE_FRACTION;
1580
1581   value->data[0].v_pointer = vals = g_slice_alloc0 (2 * sizeof (GValue));
1582   g_value_init (&vals[0], ftype);
1583   g_value_init (&vals[1], ftype);
1584 }
1585
1586 static void
1587 gst_value_free_fraction_range (GValue * value)
1588 {
1589   GValue *vals = (GValue *) value->data[0].v_pointer;
1590
1591   if (vals != NULL) {
1592     /* we know the two values contain fractions without internal allocs */
1593     /* g_value_unset (&vals[0]); */
1594     /* g_value_unset (&vals[1]); */
1595     g_slice_free1 (2 * sizeof (GValue), vals);
1596     value->data[0].v_pointer = NULL;
1597   }
1598 }
1599
1600 static void
1601 gst_value_copy_fraction_range (const GValue * src_value, GValue * dest_value)
1602 {
1603   GValue *vals = (GValue *) dest_value->data[0].v_pointer;
1604   GValue *src_vals = (GValue *) src_value->data[0].v_pointer;
1605
1606   if (vals == NULL) {
1607     gst_value_init_fraction_range (dest_value);
1608     vals = dest_value->data[0].v_pointer;
1609   }
1610   if (src_vals != NULL) {
1611     g_value_copy (&src_vals[0], &vals[0]);
1612     g_value_copy (&src_vals[1], &vals[1]);
1613   }
1614 }
1615
1616 static gchar *
1617 gst_value_collect_fraction_range (GValue * value, guint n_collect_values,
1618     GTypeCValue * collect_values, guint collect_flags)
1619 {
1620   GValue *vals = (GValue *) value->data[0].v_pointer;
1621
1622   if (n_collect_values != 4)
1623     return g_strdup_printf ("not enough value locations for `%s' passed",
1624         G_VALUE_TYPE_NAME (value));
1625   if (collect_values[1].v_int == 0)
1626     return g_strdup_printf ("passed '0' as first denominator for `%s'",
1627         G_VALUE_TYPE_NAME (value));
1628   if (collect_values[3].v_int == 0)
1629     return g_strdup_printf ("passed '0' as second denominator for `%s'",
1630         G_VALUE_TYPE_NAME (value));
1631   if (gst_util_fraction_compare (collect_values[0].v_int,
1632           collect_values[1].v_int, collect_values[2].v_int,
1633           collect_values[3].v_int) >= 0)
1634     return g_strdup_printf ("range start is not smaller than end for `%s'",
1635         G_VALUE_TYPE_NAME (value));
1636
1637   if (vals == NULL) {
1638     gst_value_init_fraction_range (value);
1639     vals = value->data[0].v_pointer;
1640   }
1641
1642   gst_value_set_fraction (&vals[0], collect_values[0].v_int,
1643       collect_values[1].v_int);
1644   gst_value_set_fraction (&vals[1], collect_values[2].v_int,
1645       collect_values[3].v_int);
1646
1647   return NULL;
1648 }
1649
1650 static gchar *
1651 gst_value_lcopy_fraction_range (const GValue * value, guint n_collect_values,
1652     GTypeCValue * collect_values, guint collect_flags)
1653 {
1654   gint i;
1655   gint *dest_values[4];
1656   GValue *vals = (GValue *) value->data[0].v_pointer;
1657
1658   if (G_UNLIKELY (n_collect_values != 4))
1659     return g_strdup_printf ("not enough value locations for `%s' passed",
1660         G_VALUE_TYPE_NAME (value));
1661
1662   for (i = 0; i < 4; i++) {
1663     if (G_UNLIKELY (collect_values[i].v_pointer == NULL)) {
1664       return g_strdup_printf ("value location for `%s' passed as NULL",
1665           G_VALUE_TYPE_NAME (value));
1666     }
1667     dest_values[i] = collect_values[i].v_pointer;
1668   }
1669
1670   if (G_UNLIKELY (vals == NULL)) {
1671     return g_strdup_printf ("Uninitialised `%s' passed",
1672         G_VALUE_TYPE_NAME (value));
1673   }
1674
1675   dest_values[0][0] = gst_value_get_fraction_numerator (&vals[0]);
1676   dest_values[1][0] = gst_value_get_fraction_denominator (&vals[0]);
1677   dest_values[2][0] = gst_value_get_fraction_numerator (&vals[1]);
1678   dest_values[3][0] = gst_value_get_fraction_denominator (&vals[1]);
1679   return NULL;
1680 }
1681
1682 /**
1683  * gst_value_set_fraction_range:
1684  * @value: a GValue initialized to GST_TYPE_FRACTION_RANGE
1685  * @start: the start of the range (a GST_TYPE_FRACTION GValue)
1686  * @end: the end of the range (a GST_TYPE_FRACTION GValue)
1687  *
1688  * Sets @value to the range specified by @start and @end.
1689  */
1690 void
1691 gst_value_set_fraction_range (GValue * value, const GValue * start,
1692     const GValue * end)
1693 {
1694   GValue *vals;
1695
1696   g_return_if_fail (GST_VALUE_HOLDS_FRACTION_RANGE (value));
1697   g_return_if_fail (GST_VALUE_HOLDS_FRACTION (start));
1698   g_return_if_fail (GST_VALUE_HOLDS_FRACTION (end));
1699   g_return_if_fail (gst_util_fraction_compare (start->data[0].v_int,
1700           start->data[1].v_int, end->data[0].v_int, end->data[1].v_int) < 0);
1701
1702   vals = (GValue *) value->data[0].v_pointer;
1703   if (vals == NULL) {
1704     gst_value_init_fraction_range (value);
1705     vals = value->data[0].v_pointer;
1706   }
1707   g_value_copy (start, &vals[0]);
1708   g_value_copy (end, &vals[1]);
1709 }
1710
1711 /**
1712  * gst_value_set_fraction_range_full:
1713  * @value: a GValue initialized to GST_TYPE_FRACTION_RANGE
1714  * @numerator_start: the numerator start of the range
1715  * @denominator_start: the denominator start of the range
1716  * @numerator_end: the numerator end of the range
1717  * @denominator_end: the denominator end of the range
1718  *
1719  * Sets @value to the range specified by @numerator_start/@denominator_start
1720  * and @numerator_end/@denominator_end.
1721  */
1722 void
1723 gst_value_set_fraction_range_full (GValue * value,
1724     gint numerator_start, gint denominator_start,
1725     gint numerator_end, gint denominator_end)
1726 {
1727   GValue start = { 0 };
1728   GValue end = { 0 };
1729
1730   g_return_if_fail (value != NULL);
1731   g_return_if_fail (denominator_start != 0);
1732   g_return_if_fail (denominator_end != 0);
1733   g_return_if_fail (gst_util_fraction_compare (numerator_start,
1734           denominator_start, numerator_end, denominator_end) < 0);
1735
1736   g_value_init (&start, GST_TYPE_FRACTION);
1737   g_value_init (&end, GST_TYPE_FRACTION);
1738
1739   gst_value_set_fraction (&start, numerator_start, denominator_start);
1740   gst_value_set_fraction (&end, numerator_end, denominator_end);
1741   gst_value_set_fraction_range (value, &start, &end);
1742
1743   /* we know the two values contain fractions without internal allocs */
1744   /* g_value_unset (&start); */
1745   /* g_value_unset (&end);   */
1746 }
1747
1748 /* FIXME 2.0: Don't leak the internal representation of fraction
1749  * ranges but instead return the numerator and denominator
1750  * separately.
1751  * This would allow to store fraction ranges as
1752  *  data[0] = (min_n << 32) | (min_d)
1753  *  data[1] = (max_n << 32) | (max_d)
1754  * without requiring an additional allocation for each value.
1755  */
1756
1757 /**
1758  * gst_value_get_fraction_range_min:
1759  * @value: a GValue initialized to GST_TYPE_FRACTION_RANGE
1760  *
1761  * Gets the minimum of the range specified by @value.
1762  *
1763  * Returns: the minimum of the range
1764  */
1765 const GValue *
1766 gst_value_get_fraction_range_min (const GValue * value)
1767 {
1768   GValue *vals;
1769
1770   g_return_val_if_fail (GST_VALUE_HOLDS_FRACTION_RANGE (value), NULL);
1771
1772   vals = (GValue *) value->data[0].v_pointer;
1773   if (vals != NULL) {
1774     return &vals[0];
1775   }
1776
1777   return NULL;
1778 }
1779
1780 /**
1781  * gst_value_get_fraction_range_max:
1782  * @value: a GValue initialized to GST_TYPE_FRACTION_RANGE
1783  *
1784  * Gets the maximum of the range specified by @value.
1785  *
1786  * Returns: the maximum of the range
1787  */
1788 const GValue *
1789 gst_value_get_fraction_range_max (const GValue * value)
1790 {
1791   GValue *vals;
1792
1793   g_return_val_if_fail (GST_VALUE_HOLDS_FRACTION_RANGE (value), NULL);
1794
1795   vals = (GValue *) value->data[0].v_pointer;
1796   if (vals != NULL) {
1797     return &vals[1];
1798   }
1799
1800   return NULL;
1801 }
1802
1803 static gchar *
1804 gst_value_serialize_fraction_range (const GValue * value)
1805 {
1806   GValue *vals = (GValue *) value->data[0].v_pointer;
1807   gchar *retval;
1808
1809   if (vals == NULL) {
1810     retval = g_strdup ("[ 0/1, 0/1 ]");
1811   } else {
1812     gchar *start, *end;
1813
1814     start = gst_value_serialize_fraction (&vals[0]);
1815     end = gst_value_serialize_fraction (&vals[1]);
1816
1817     retval = g_strdup_printf ("[ %s, %s ]", start, end);
1818     g_free (start);
1819     g_free (end);
1820   }
1821
1822   return retval;
1823 }
1824
1825 static void
1826 gst_value_transform_fraction_range_string (const GValue * src_value,
1827     GValue * dest_value)
1828 {
1829   dest_value->data[0].v_pointer =
1830       gst_value_serialize_fraction_range (src_value);
1831 }
1832
1833 static gint
1834 gst_value_compare_fraction_range (const GValue * value1, const GValue * value2)
1835 {
1836   GValue *vals1, *vals2;
1837   GstValueCompareFunc compare;
1838
1839   if (value2->data[0].v_pointer == value1->data[0].v_pointer)
1840     return GST_VALUE_EQUAL;     /* Only possible if both are NULL */
1841
1842   if (value2->data[0].v_pointer == NULL || value1->data[0].v_pointer == NULL)
1843     return GST_VALUE_UNORDERED;
1844
1845   vals1 = (GValue *) value1->data[0].v_pointer;
1846   vals2 = (GValue *) value2->data[0].v_pointer;
1847   if ((compare = gst_value_get_compare_func (&vals1[0]))) {
1848     if (gst_value_compare_with_func (&vals1[0], &vals2[0], compare) ==
1849         GST_VALUE_EQUAL &&
1850         gst_value_compare_with_func (&vals1[1], &vals2[1], compare) ==
1851         GST_VALUE_EQUAL)
1852       return GST_VALUE_EQUAL;
1853   }
1854   return GST_VALUE_UNORDERED;
1855 }
1856
1857 static gboolean
1858 gst_value_deserialize_fraction_range (GValue * dest, const gchar * s)
1859 {
1860   g_warning ("unimplemented");
1861   return FALSE;
1862 }
1863
1864 /***********
1865  * GstCaps *
1866  ***********/
1867
1868 /**
1869  * gst_value_set_caps:
1870  * @value: a GValue initialized to GST_TYPE_CAPS
1871  * @caps: (transfer none): the caps to set the value to
1872  *
1873  * Sets the contents of @value to @caps. A reference to the
1874  * provided @caps will be taken by the @value.
1875  */
1876 void
1877 gst_value_set_caps (GValue * value, const GstCaps * caps)
1878 {
1879   g_return_if_fail (G_IS_VALUE (value));
1880   g_return_if_fail (G_VALUE_TYPE (value) == GST_TYPE_CAPS);
1881   g_return_if_fail (caps == NULL || GST_IS_CAPS (caps));
1882
1883   g_value_set_boxed (value, caps);
1884 }
1885
1886 /**
1887  * gst_value_get_caps:
1888  * @value: a GValue initialized to GST_TYPE_CAPS
1889  *
1890  * Gets the contents of @value. The reference count of the returned
1891  * #GstCaps will not be modified, therefore the caller must take one
1892  * before getting rid of the @value.
1893  *
1894  * Returns: (transfer none): the contents of @value
1895  */
1896 const GstCaps *
1897 gst_value_get_caps (const GValue * value)
1898 {
1899   g_return_val_if_fail (G_IS_VALUE (value), NULL);
1900   g_return_val_if_fail (G_VALUE_TYPE (value) == GST_TYPE_CAPS, NULL);
1901
1902   return (GstCaps *) g_value_get_boxed (value);
1903 }
1904
1905 static gint
1906 gst_value_compare_caps (const GValue * value1, const GValue * value2)
1907 {
1908   GstCaps *caps1 = GST_CAPS (gst_value_get_caps (value1));
1909   GstCaps *caps2 = GST_CAPS (gst_value_get_caps (value2));
1910
1911   if (gst_caps_is_equal (caps1, caps2))
1912     return GST_VALUE_EQUAL;
1913   return GST_VALUE_UNORDERED;
1914 }
1915
1916 static gchar *
1917 gst_value_serialize_caps (const GValue * value)
1918 {
1919   GstCaps *caps = g_value_get_boxed (value);
1920   return gst_string_take_and_wrap (gst_caps_to_string (caps));
1921 }
1922
1923 static gboolean
1924 gst_value_deserialize_caps (GValue * dest, const gchar * s)
1925 {
1926   GstCaps *caps;
1927
1928   if (*s != '"') {
1929     caps = gst_caps_from_string (s);
1930   } else {
1931     gchar *str = gst_string_unwrap (s);
1932
1933     if (G_UNLIKELY (!str))
1934       return FALSE;
1935
1936     caps = gst_caps_from_string (str);
1937     g_free (str);
1938   }
1939
1940   if (caps) {
1941     g_value_take_boxed (dest, caps);
1942     return TRUE;
1943   }
1944   return FALSE;
1945 }
1946
1947 /**************
1948  * GstSegment *
1949  **************/
1950
1951 static gchar *
1952 gst_value_serialize_segment_internal (const GValue * value, gboolean escape)
1953 {
1954   GstSegment *seg = g_value_get_boxed (value);
1955   gchar *t, *res;
1956   GstStructure *s;
1957
1958   s = gst_structure_new ("GstSegment",
1959       "flags", GST_TYPE_SEGMENT_FLAGS, seg->flags,
1960       "rate", G_TYPE_DOUBLE, seg->rate,
1961       "applied-rate", G_TYPE_DOUBLE, seg->applied_rate,
1962       "format", GST_TYPE_FORMAT, seg->format,
1963       "base", G_TYPE_UINT64, seg->base,
1964       "offset", G_TYPE_UINT64, seg->offset,
1965       "start", G_TYPE_UINT64, seg->start,
1966       "stop", G_TYPE_UINT64, seg->stop,
1967       "time", G_TYPE_UINT64, seg->time,
1968       "position", G_TYPE_UINT64, seg->position,
1969       "duration", G_TYPE_UINT64, seg->duration, NULL);
1970   t = gst_structure_to_string (s);
1971   if (escape) {
1972     res = g_strdup_printf ("\"%s\"", t);
1973     g_free (t);
1974   } else {
1975     res = t;
1976   }
1977   gst_structure_free (s);
1978
1979   return res;
1980 }
1981
1982 static gchar *
1983 gst_value_serialize_segment (const GValue * value)
1984 {
1985   return gst_value_serialize_segment_internal (value, TRUE);
1986 }
1987
1988 static gboolean
1989 gst_value_deserialize_segment (GValue * dest, const gchar * s)
1990 {
1991   GstStructure *str;
1992   GstSegment seg;
1993   gboolean res;
1994
1995   str = gst_structure_from_string (s, NULL);
1996   if (str == NULL)
1997     return FALSE;
1998
1999   res = gst_structure_get (str,
2000       "flags", GST_TYPE_SEGMENT_FLAGS, &seg.flags,
2001       "rate", G_TYPE_DOUBLE, &seg.rate,
2002       "applied-rate", G_TYPE_DOUBLE, &seg.applied_rate,
2003       "format", GST_TYPE_FORMAT, &seg.format,
2004       "base", G_TYPE_UINT64, &seg.base,
2005       "offset", G_TYPE_UINT64, &seg.offset,
2006       "start", G_TYPE_UINT64, &seg.start,
2007       "stop", G_TYPE_UINT64, &seg.stop,
2008       "time", G_TYPE_UINT64, &seg.time,
2009       "position", G_TYPE_UINT64, &seg.position,
2010       "duration", G_TYPE_UINT64, &seg.duration, NULL);
2011   gst_structure_free (str);
2012
2013   if (res)
2014     g_value_set_boxed (dest, &seg);
2015
2016   return res;
2017 }
2018
2019 /****************
2020  * GstStructure *
2021  ****************/
2022
2023 /**
2024  * gst_value_set_structure:
2025  * @value: a GValue initialized to GST_TYPE_STRUCTURE
2026  * @structure: the structure to set the value to
2027  *
2028  * Sets the contents of @value to @structure.  The actual
2029  */
2030 void
2031 gst_value_set_structure (GValue * value, const GstStructure * structure)
2032 {
2033   g_return_if_fail (G_IS_VALUE (value));
2034   g_return_if_fail (G_VALUE_TYPE (value) == GST_TYPE_STRUCTURE);
2035   g_return_if_fail (structure == NULL || GST_IS_STRUCTURE (structure));
2036
2037   g_value_set_boxed (value, structure);
2038 }
2039
2040 /**
2041  * gst_value_get_structure:
2042  * @value: a GValue initialized to GST_TYPE_STRUCTURE
2043  *
2044  * Gets the contents of @value.
2045  *
2046  * Returns: (transfer none): the contents of @value
2047  */
2048 const GstStructure *
2049 gst_value_get_structure (const GValue * value)
2050 {
2051   g_return_val_if_fail (G_IS_VALUE (value), NULL);
2052   g_return_val_if_fail (G_VALUE_TYPE (value) == GST_TYPE_STRUCTURE, NULL);
2053
2054   return (GstStructure *) g_value_get_boxed (value);
2055 }
2056
2057 static gchar *
2058 gst_value_serialize_structure (const GValue * value)
2059 {
2060   GstStructure *structure = g_value_get_boxed (value);
2061
2062   return gst_string_take_and_wrap (gst_structure_to_string (structure));
2063 }
2064
2065 static gboolean
2066 gst_value_deserialize_structure (GValue * dest, const gchar * s)
2067 {
2068   GstStructure *structure;
2069
2070   if (*s != '"') {
2071     structure = gst_structure_from_string (s, NULL);
2072   } else {
2073     gchar *str = gst_string_unwrap (s);
2074
2075     if (G_UNLIKELY (!str))
2076       return FALSE;
2077
2078     structure = gst_structure_from_string (str, NULL);
2079     g_free (str);
2080   }
2081
2082   if (G_LIKELY (structure)) {
2083     g_value_take_boxed (dest, structure);
2084     return TRUE;
2085   }
2086   return FALSE;
2087 }
2088
2089 /*******************
2090  * GstCapsFeatures *
2091  *******************/
2092
2093 /**
2094  * gst_value_set_caps_features:
2095  * @value: a GValue initialized to GST_TYPE_CAPS_FEATURES
2096  * @features: the features to set the value to
2097  *
2098  * Sets the contents of @value to @features.
2099  */
2100 void
2101 gst_value_set_caps_features (GValue * value, const GstCapsFeatures * features)
2102 {
2103   g_return_if_fail (G_IS_VALUE (value));
2104   g_return_if_fail (G_VALUE_TYPE (value) == GST_TYPE_CAPS_FEATURES);
2105   g_return_if_fail (features == NULL || GST_IS_CAPS_FEATURES (features));
2106
2107   g_value_set_boxed (value, features);
2108 }
2109
2110 /**
2111  * gst_value_get_caps_features:
2112  * @value: a GValue initialized to GST_TYPE_CAPS_FEATURES
2113  *
2114  * Gets the contents of @value.
2115  *
2116  * Returns: (transfer none): the contents of @value
2117  */
2118 const GstCapsFeatures *
2119 gst_value_get_caps_features (const GValue * value)
2120 {
2121   g_return_val_if_fail (G_IS_VALUE (value), NULL);
2122   g_return_val_if_fail (G_VALUE_TYPE (value) == GST_TYPE_CAPS_FEATURES, NULL);
2123
2124   return (GstCapsFeatures *) g_value_get_boxed (value);
2125 }
2126
2127 static gchar *
2128 gst_value_serialize_caps_features (const GValue * value)
2129 {
2130   GstCapsFeatures *features = g_value_get_boxed (value);
2131
2132   return gst_string_take_and_wrap (gst_caps_features_to_string (features));
2133 }
2134
2135 static gboolean
2136 gst_value_deserialize_caps_features (GValue * dest, const gchar * s)
2137 {
2138   GstCapsFeatures *features;
2139
2140   if (*s != '"') {
2141     features = gst_caps_features_from_string (s);
2142   } else {
2143     gchar *str = gst_string_unwrap (s);
2144
2145     if (G_UNLIKELY (!str))
2146       return FALSE;
2147
2148     features = gst_caps_features_from_string (str);
2149     g_free (str);
2150   }
2151
2152   if (G_LIKELY (features)) {
2153     g_value_take_boxed (dest, features);
2154     return TRUE;
2155   }
2156   return FALSE;
2157 }
2158
2159 /**************
2160  * GstTagList *
2161  **************/
2162 static gint
2163 gst_value_compare_tag_list (const GValue * value1, const GValue * value2)
2164 {
2165   GstTagList *taglist1 = GST_TAG_LIST (g_value_get_boxed (value1));
2166   GstTagList *taglist2 = GST_TAG_LIST (g_value_get_boxed (value2));
2167
2168   if (gst_tag_list_is_equal (taglist1, taglist2))
2169     return GST_VALUE_EQUAL;
2170   return GST_VALUE_UNORDERED;
2171 }
2172
2173 static gboolean
2174 gst_value_deserialize_tag_list (GValue * dest, const gchar * s)
2175 {
2176   GstTagList *taglist;
2177
2178   if (*s != '"') {
2179     taglist = gst_tag_list_new_from_string (s);
2180   } else {
2181     gchar *str = gst_string_unwrap (s);
2182
2183     if (G_UNLIKELY (!str))
2184       return FALSE;
2185
2186     taglist = gst_tag_list_new_from_string (str);
2187     g_free (str);
2188   }
2189
2190   if (G_LIKELY (taglist != NULL)) {
2191     g_value_take_boxed (dest, taglist);
2192     return TRUE;
2193   }
2194   return FALSE;
2195 }
2196
2197 static gchar *
2198 gst_value_serialize_tag_list (const GValue * value)
2199 {
2200   GstTagList *taglist = g_value_get_boxed (value);
2201
2202   return gst_string_take_and_wrap (gst_tag_list_to_string (taglist));
2203 }
2204
2205
2206 /*************
2207  * GstBuffer *
2208  *************/
2209
2210 static gint
2211 compare_buffer (GstBuffer * buf1, GstBuffer * buf2)
2212 {
2213   gsize size1, size2;
2214   GstMapInfo info1, info2;
2215   gint result, mret;
2216
2217   if (buf1 == buf2)
2218     return GST_VALUE_EQUAL;
2219
2220   size1 = gst_buffer_get_size (buf1);
2221   size2 = gst_buffer_get_size (buf2);
2222
2223   if (size1 != size2)
2224     return GST_VALUE_UNORDERED;
2225
2226   if (size1 == 0)
2227     return GST_VALUE_EQUAL;
2228
2229   if (!gst_buffer_map (buf1, &info1, GST_MAP_READ))
2230     return GST_VALUE_UNORDERED;
2231
2232   if (!gst_buffer_map (buf2, &info2, GST_MAP_READ)) {
2233     gst_buffer_unmap (buf1, &info1);
2234     return GST_VALUE_UNORDERED;
2235   }
2236
2237   mret = memcmp (info1.data, info2.data, info1.size);
2238   if (mret == 0)
2239     result = GST_VALUE_EQUAL;
2240   else if (mret < 0)
2241     result = GST_VALUE_LESS_THAN;
2242   else
2243     result = GST_VALUE_GREATER_THAN;
2244
2245   gst_buffer_unmap (buf1, &info1);
2246   gst_buffer_unmap (buf2, &info2);
2247
2248   return result;
2249 }
2250
2251 static gint
2252 gst_value_compare_buffer (const GValue * value1, const GValue * value2)
2253 {
2254   GstBuffer *buf1 = gst_value_get_buffer (value1);
2255   GstBuffer *buf2 = gst_value_get_buffer (value2);
2256
2257   return compare_buffer (buf1, buf2);
2258 }
2259
2260 static gchar *
2261 gst_value_serialize_buffer (const GValue * value)
2262 {
2263   GstMapInfo info;
2264   guint8 *data;
2265   gint i;
2266   gchar *string;
2267   GstBuffer *buffer;
2268
2269   buffer = gst_value_get_buffer (value);
2270   if (buffer == NULL)
2271     return NULL;
2272
2273   if (!gst_buffer_map (buffer, &info, GST_MAP_READ))
2274     return NULL;
2275
2276   data = info.data;
2277
2278   string = g_malloc (info.size * 2 + 1);
2279   for (i = 0; i < info.size; i++) {
2280     sprintf (string + i * 2, "%02x", data[i]);
2281   }
2282   string[info.size * 2] = 0;
2283
2284   gst_buffer_unmap (buffer, &info);
2285
2286   return string;
2287 }
2288
2289 static gboolean
2290 gst_value_deserialize_buffer (GValue * dest, const gchar * s)
2291 {
2292   GstBuffer *buffer;
2293   gint len;
2294   gchar ts[3];
2295   GstMapInfo info;
2296   guint8 *data;
2297   gint i;
2298
2299   len = strlen (s);
2300   if (len & 1)
2301     goto wrong_length;
2302
2303   buffer = gst_buffer_new_allocate (NULL, len / 2, NULL);
2304   if (!gst_buffer_map (buffer, &info, GST_MAP_WRITE))
2305     goto map_failed;
2306   data = info.data;
2307
2308   for (i = 0; i < len / 2; i++) {
2309     if (!isxdigit ((int) s[i * 2]) || !isxdigit ((int) s[i * 2 + 1]))
2310       goto wrong_char;
2311
2312     ts[0] = s[i * 2 + 0];
2313     ts[1] = s[i * 2 + 1];
2314     ts[2] = 0;
2315
2316     data[i] = (guint8) strtoul (ts, NULL, 16);
2317   }
2318   gst_buffer_unmap (buffer, &info);
2319
2320   gst_value_take_buffer (dest, buffer);
2321
2322   return TRUE;
2323
2324   /* ERRORS */
2325 wrong_length:
2326   {
2327     return FALSE;
2328   }
2329 map_failed:
2330   {
2331     return FALSE;
2332   }
2333 wrong_char:
2334   {
2335     gst_buffer_unref (buffer);
2336     gst_buffer_unmap (buffer, &info);
2337     return FALSE;
2338   }
2339 }
2340
2341 /*************
2342  * GstSample *
2343  *************/
2344
2345 /* This function is mostly used for comparing image/buffer tags in taglists */
2346 static gint
2347 gst_value_compare_sample (const GValue * value1, const GValue * value2)
2348 {
2349   GstBuffer *buf1 = gst_sample_get_buffer (gst_value_get_sample (value1));
2350   GstBuffer *buf2 = gst_sample_get_buffer (gst_value_get_sample (value2));
2351
2352   /* FIXME: should we take into account anything else such as caps? */
2353   return compare_buffer (buf1, buf2);
2354 }
2355
2356 static gchar *
2357 gst_value_serialize_sample (const GValue * value)
2358 {
2359   const GstStructure *info_structure;
2360   GstSegment *segment;
2361   GstBuffer *buffer;
2362   GstCaps *caps;
2363   GstSample *sample;
2364   GValue val = { 0, };
2365   gchar *info_str, *caps_str, *tmp;
2366   gchar *buf_str, *seg_str, *s;
2367
2368   sample = g_value_get_boxed (value);
2369
2370   buffer = gst_sample_get_buffer (sample);
2371   if (buffer) {
2372     g_value_init (&val, GST_TYPE_BUFFER);
2373     g_value_set_boxed (&val, buffer);
2374     buf_str = gst_value_serialize_buffer (&val);
2375     g_value_unset (&val);
2376   } else {
2377     buf_str = g_strdup ("None");
2378   }
2379
2380   caps = gst_sample_get_caps (sample);
2381   if (caps) {
2382     tmp = gst_caps_to_string (caps);
2383     caps_str = g_base64_encode ((guchar *) tmp, strlen (tmp) + 1);
2384     g_strdelimit (caps_str, "=", '_');
2385     g_free (tmp);
2386   } else {
2387     caps_str = g_strdup ("None");
2388   }
2389
2390   segment = gst_sample_get_segment (sample);
2391   if (segment) {
2392     g_value_init (&val, GST_TYPE_SEGMENT);
2393     g_value_set_boxed (&val, segment);
2394     tmp = gst_value_serialize_segment_internal (&val, FALSE);
2395     seg_str = g_base64_encode ((guchar *) tmp, strlen (tmp) + 1);
2396     g_strdelimit (seg_str, "=", '_');
2397     g_free (tmp);
2398     g_value_unset (&val);
2399   } else {
2400     seg_str = g_strdup ("None");
2401   }
2402
2403   info_structure = gst_sample_get_info (sample);
2404   if (info_structure) {
2405     tmp = gst_structure_to_string (info_structure);
2406     info_str = g_base64_encode ((guchar *) tmp, strlen (tmp) + 1);
2407     g_strdelimit (info_str, "=", '_');
2408     g_free (tmp);
2409   } else {
2410     info_str = g_strdup ("None");
2411   }
2412
2413   s = g_strconcat (buf_str, ":", caps_str, ":", seg_str, ":", info_str, NULL);
2414   g_free (buf_str);
2415   g_free (caps_str);
2416   g_free (seg_str);
2417   g_free (info_str);
2418
2419   return s;
2420 }
2421
2422 static gboolean
2423 gst_value_deserialize_sample (GValue * dest, const gchar * s)
2424 {
2425   GValue bval = G_VALUE_INIT, sval = G_VALUE_INIT;
2426   GstStructure *info;
2427   GstSample *sample;
2428   GstCaps *caps;
2429   gboolean ret = FALSE;
2430   gchar **fields;
2431   gsize outlen;
2432   gint len;
2433
2434   GST_TRACE ("deserialize '%s'", s);
2435
2436   fields = g_strsplit (s, ":", -1);
2437   len = g_strv_length (fields);
2438   if (len != 4)
2439     goto wrong_length;
2440
2441   g_value_init (&bval, GST_TYPE_BUFFER);
2442   g_value_init (&sval, GST_TYPE_SEGMENT);
2443
2444   if (!gst_value_deserialize_buffer (&bval, fields[0]))
2445     goto fail;
2446
2447   if (strcmp (fields[1], "None") != 0) {
2448     g_strdelimit (fields[1], "_", '=');
2449     g_base64_decode_inplace (fields[1], &outlen);
2450     GST_TRACE ("caps    : %s", fields[1]);
2451     caps = gst_caps_from_string (fields[1]);
2452     if (caps == NULL)
2453       goto fail;
2454   } else {
2455     caps = NULL;
2456   }
2457
2458   if (strcmp (fields[2], "None") != 0) {
2459     g_strdelimit (fields[2], "_", '=');
2460     g_base64_decode_inplace (fields[2], &outlen);
2461     GST_TRACE ("segment : %s", fields[2]);
2462     if (!gst_value_deserialize_segment (&sval, fields[2]))
2463       goto fail;
2464   }
2465
2466   if (strcmp (fields[3], "None") != 0) {
2467     g_strdelimit (fields[3], "_", '=');
2468     g_base64_decode_inplace (fields[3], &outlen);
2469     GST_TRACE ("info    : %s", fields[3]);
2470     info = gst_structure_from_string (fields[3], NULL);
2471     if (info == NULL)
2472       goto fail;
2473   } else {
2474     info = NULL;
2475   }
2476
2477   sample = gst_sample_new (gst_value_get_buffer (&bval), caps,
2478       g_value_get_boxed (&sval), info);
2479
2480   g_value_take_boxed (dest, sample);
2481
2482   if (caps)
2483     gst_caps_unref (caps);
2484
2485   ret = TRUE;
2486
2487 fail:
2488
2489   g_value_unset (&bval);
2490   g_value_unset (&sval);
2491
2492 wrong_length:
2493
2494   g_strfreev (fields);
2495
2496   return ret;
2497 }
2498
2499 /***********
2500  * boolean *
2501  ***********/
2502
2503 static gint
2504 gst_value_compare_boolean (const GValue * value1, const GValue * value2)
2505 {
2506   if ((value1->data[0].v_int != 0) == (value2->data[0].v_int != 0))
2507     return GST_VALUE_EQUAL;
2508   return GST_VALUE_UNORDERED;
2509 }
2510
2511 static gchar *
2512 gst_value_serialize_boolean (const GValue * value)
2513 {
2514   if (value->data[0].v_int) {
2515     return g_strdup ("true");
2516   }
2517   return g_strdup ("false");
2518 }
2519
2520 static gboolean
2521 gst_value_deserialize_boolean (GValue * dest, const gchar * s)
2522 {
2523   gboolean ret = FALSE;
2524
2525   if (g_ascii_strcasecmp (s, "true") == 0 ||
2526       g_ascii_strcasecmp (s, "yes") == 0 ||
2527       g_ascii_strcasecmp (s, "t") == 0 || strcmp (s, "1") == 0) {
2528     g_value_set_boolean (dest, TRUE);
2529     ret = TRUE;
2530   } else if (g_ascii_strcasecmp (s, "false") == 0 ||
2531       g_ascii_strcasecmp (s, "no") == 0 ||
2532       g_ascii_strcasecmp (s, "f") == 0 || strcmp (s, "0") == 0) {
2533     g_value_set_boolean (dest, FALSE);
2534     ret = TRUE;
2535   }
2536
2537   return ret;
2538 }
2539
2540 #define CREATE_SERIALIZATION_START(_type,_macro)                        \
2541 static gint                                                             \
2542 gst_value_compare_ ## _type                                             \
2543 (const GValue * value1, const GValue * value2)                          \
2544 {                                                                       \
2545   g ## _type val1 = g_value_get_ ## _type (value1);                     \
2546   g ## _type val2 = g_value_get_ ## _type (value2);                     \
2547   if (val1 > val2)                                                      \
2548     return GST_VALUE_GREATER_THAN;                                      \
2549   if (val1 < val2)                                                      \
2550     return GST_VALUE_LESS_THAN;                                         \
2551   return GST_VALUE_EQUAL;                                               \
2552 }                                                                       \
2553                                                                         \
2554 static gchar *                                                          \
2555 gst_value_serialize_ ## _type (const GValue * value)                    \
2556 {                                                                       \
2557   GValue val = { 0, };                                                  \
2558   g_value_init (&val, G_TYPE_STRING);                                   \
2559   if (!g_value_transform (value, &val))                                 \
2560     g_assert_not_reached ();                                            \
2561   /* NO_COPY_MADNESS!!! */                                              \
2562   return (char *) g_value_get_string (&val);                            \
2563 }
2564
2565 /* deserialize the given s into to as a gint64.
2566  * check if the result is actually storeable in the given size number of
2567  * bytes.
2568  */
2569 static gboolean
2570 gst_value_deserialize_int_helper (gint64 * to, const gchar * s,
2571     gint64 min, gint64 max, gint size)
2572 {
2573   gboolean ret = FALSE;
2574   gchar *end;
2575   guint64 mask = ~0;
2576
2577   errno = 0;
2578   *to = g_ascii_strtoull (s, &end, 0);
2579   /* a range error is a definitive no-no */
2580   if (errno == ERANGE) {
2581     return FALSE;
2582   }
2583
2584   if (*end == 0) {
2585     ret = TRUE;
2586   } else {
2587     if (g_ascii_strcasecmp (s, "little_endian") == 0) {
2588       *to = G_LITTLE_ENDIAN;
2589       ret = TRUE;
2590     } else if (g_ascii_strcasecmp (s, "big_endian") == 0) {
2591       *to = G_BIG_ENDIAN;
2592       ret = TRUE;
2593     } else if (g_ascii_strcasecmp (s, "byte_order") == 0) {
2594       *to = G_BYTE_ORDER;
2595       ret = TRUE;
2596     } else if (g_ascii_strcasecmp (s, "min") == 0) {
2597       *to = min;
2598       ret = TRUE;
2599     } else if (g_ascii_strcasecmp (s, "max") == 0) {
2600       *to = max;
2601       ret = TRUE;
2602     }
2603   }
2604   if (ret) {
2605     /* by definition, a gint64 fits into a gint64; so ignore those */
2606     if (size != sizeof (mask)) {
2607       if (*to >= 0) {
2608         /* for positive numbers, we create a mask of 1's outside of the range
2609          * and 0's inside the range.  An and will thus keep only 1 bits
2610          * outside of the range */
2611         mask <<= (size * 8);
2612         if ((mask & *to) != 0) {
2613           ret = FALSE;
2614         }
2615       } else {
2616         /* for negative numbers, we do a 2's complement version */
2617         mask <<= ((size * 8) - 1);
2618         if ((mask & *to) != mask) {
2619           ret = FALSE;
2620         }
2621       }
2622     }
2623   }
2624   return ret;
2625 }
2626
2627 #define CREATE_SERIALIZATION(_type,_macro)                              \
2628 CREATE_SERIALIZATION_START(_type,_macro)                                \
2629                                                                         \
2630 static gboolean                                                         \
2631 gst_value_deserialize_ ## _type (GValue * dest, const gchar *s)         \
2632 {                                                                       \
2633   gint64 x;                                                             \
2634                                                                         \
2635   if (gst_value_deserialize_int_helper (&x, s, G_MIN ## _macro,         \
2636       G_MAX ## _macro, sizeof (g ## _type))) {                          \
2637     g_value_set_ ## _type (dest, /*(g ## _type)*/ x);                   \
2638     return TRUE;                                                        \
2639   } else {                                                              \
2640     return FALSE;                                                       \
2641   }                                                                     \
2642 }
2643
2644 #define CREATE_USERIALIZATION(_type,_macro)                             \
2645 CREATE_SERIALIZATION_START(_type,_macro)                                \
2646                                                                         \
2647 static gboolean                                                         \
2648 gst_value_deserialize_ ## _type (GValue * dest, const gchar *s)         \
2649 {                                                                       \
2650   gint64 x;                                                             \
2651   gchar *end;                                                           \
2652   gboolean ret = FALSE;                                                 \
2653                                                                         \
2654   errno = 0;                                                            \
2655   x = g_ascii_strtoull (s, &end, 0);                                    \
2656   /* a range error is a definitive no-no */                             \
2657   if (errno == ERANGE) {                                                \
2658     return FALSE;                                                       \
2659   }                                                                     \
2660   /* the cast ensures the range check later on makes sense */           \
2661   x = (g ## _type) x;                                                   \
2662   if (*end == 0) {                                                      \
2663     ret = TRUE;                                                         \
2664   } else {                                                              \
2665     if (g_ascii_strcasecmp (s, "little_endian") == 0) {                 \
2666       x = G_LITTLE_ENDIAN;                                              \
2667       ret = TRUE;                                                       \
2668     } else if (g_ascii_strcasecmp (s, "big_endian") == 0) {             \
2669       x = G_BIG_ENDIAN;                                                 \
2670       ret = TRUE;                                                       \
2671     } else if (g_ascii_strcasecmp (s, "byte_order") == 0) {             \
2672       x = G_BYTE_ORDER;                                                 \
2673       ret = TRUE;                                                       \
2674     } else if (g_ascii_strcasecmp (s, "min") == 0) {                    \
2675       x = 0;                                                            \
2676       ret = TRUE;                                                       \
2677     } else if (g_ascii_strcasecmp (s, "max") == 0) {                    \
2678       x = G_MAX ## _macro;                                              \
2679       ret = TRUE;                                                       \
2680     }                                                                   \
2681   }                                                                     \
2682   if (ret) {                                                            \
2683     if (x > G_MAX ## _macro) {                                          \
2684       ret = FALSE;                                                      \
2685     } else {                                                            \
2686       g_value_set_ ## _type (dest, x);                                  \
2687     }                                                                   \
2688   }                                                                     \
2689   return ret;                                                           \
2690 }
2691
2692 #define REGISTER_SERIALIZATION(_gtype, _type)                           \
2693 G_STMT_START {                                                          \
2694   static const GstValueTable gst_value = {                              \
2695     _gtype,                                                             \
2696     gst_value_compare_ ## _type,                                        \
2697     gst_value_serialize_ ## _type,                                      \
2698     gst_value_deserialize_ ## _type,                                    \
2699   };                                                                    \
2700                                                                         \
2701   gst_value_register (&gst_value);                                      \
2702 } G_STMT_END
2703
2704 CREATE_SERIALIZATION (int, INT);
2705 CREATE_SERIALIZATION (int64, INT64);
2706 CREATE_SERIALIZATION (long, LONG);
2707
2708 CREATE_USERIALIZATION (uint, UINT);
2709 CREATE_USERIALIZATION (uint64, UINT64);
2710 CREATE_USERIALIZATION (ulong, ULONG);
2711
2712 /* FIXME 2.0: remove this again, plugins shouldn't have uchar properties */
2713 #ifndef G_MAXUCHAR
2714 #define G_MAXUCHAR 255
2715 #endif
2716 CREATE_USERIALIZATION (uchar, UCHAR);
2717
2718 /**********
2719  * double *
2720  **********/
2721 static gint
2722 gst_value_compare_double (const GValue * value1, const GValue * value2)
2723 {
2724   if (value1->data[0].v_double > value2->data[0].v_double)
2725     return GST_VALUE_GREATER_THAN;
2726   if (value1->data[0].v_double < value2->data[0].v_double)
2727     return GST_VALUE_LESS_THAN;
2728   if (value1->data[0].v_double == value2->data[0].v_double)
2729     return GST_VALUE_EQUAL;
2730   return GST_VALUE_UNORDERED;
2731 }
2732
2733 static gchar *
2734 gst_value_serialize_double (const GValue * value)
2735 {
2736   gchar d[G_ASCII_DTOSTR_BUF_SIZE];
2737
2738   g_ascii_dtostr (d, G_ASCII_DTOSTR_BUF_SIZE, value->data[0].v_double);
2739   return g_strdup (d);
2740 }
2741
2742 static gboolean
2743 gst_value_deserialize_double (GValue * dest, const gchar * s)
2744 {
2745   gdouble x;
2746   gboolean ret = FALSE;
2747   gchar *end;
2748
2749   x = g_ascii_strtod (s, &end);
2750   if (*end == 0) {
2751     ret = TRUE;
2752   } else {
2753     if (g_ascii_strcasecmp (s, "min") == 0) {
2754       x = -G_MAXDOUBLE;
2755       ret = TRUE;
2756     } else if (g_ascii_strcasecmp (s, "max") == 0) {
2757       x = G_MAXDOUBLE;
2758       ret = TRUE;
2759     }
2760   }
2761   if (ret) {
2762     g_value_set_double (dest, x);
2763   }
2764   return ret;
2765 }
2766
2767 /*********
2768  * float *
2769  *********/
2770
2771 static gint
2772 gst_value_compare_float (const GValue * value1, const GValue * value2)
2773 {
2774   if (value1->data[0].v_float > value2->data[0].v_float)
2775     return GST_VALUE_GREATER_THAN;
2776   if (value1->data[0].v_float < value2->data[0].v_float)
2777     return GST_VALUE_LESS_THAN;
2778   if (value1->data[0].v_float == value2->data[0].v_float)
2779     return GST_VALUE_EQUAL;
2780   return GST_VALUE_UNORDERED;
2781 }
2782
2783 static gchar *
2784 gst_value_serialize_float (const GValue * value)
2785 {
2786   gchar d[G_ASCII_DTOSTR_BUF_SIZE];
2787
2788   g_ascii_dtostr (d, G_ASCII_DTOSTR_BUF_SIZE, value->data[0].v_float);
2789   return g_strdup (d);
2790 }
2791
2792 static gboolean
2793 gst_value_deserialize_float (GValue * dest, const gchar * s)
2794 {
2795   gdouble x;
2796   gboolean ret = FALSE;
2797   gchar *end;
2798
2799   x = g_ascii_strtod (s, &end);
2800   if (*end == 0) {
2801     ret = TRUE;
2802   } else {
2803     if (g_ascii_strcasecmp (s, "min") == 0) {
2804       x = -G_MAXFLOAT;
2805       ret = TRUE;
2806     } else if (g_ascii_strcasecmp (s, "max") == 0) {
2807       x = G_MAXFLOAT;
2808       ret = TRUE;
2809     }
2810   }
2811   if (x > G_MAXFLOAT || x < -G_MAXFLOAT)
2812     ret = FALSE;
2813   if (ret) {
2814     g_value_set_float (dest, (float) x);
2815   }
2816   return ret;
2817 }
2818
2819 /**********
2820  * string *
2821  **********/
2822
2823 static gint
2824 gst_value_compare_string (const GValue * value1, const GValue * value2)
2825 {
2826   if (G_UNLIKELY (!value1->data[0].v_pointer || !value2->data[0].v_pointer)) {
2827     /* if only one is NULL, no match - otherwise both NULL == EQUAL */
2828     if (value1->data[0].v_pointer != value2->data[0].v_pointer)
2829       return GST_VALUE_UNORDERED;
2830   } else {
2831     gint x = strcmp (value1->data[0].v_pointer, value2->data[0].v_pointer);
2832
2833     if (x < 0)
2834       return GST_VALUE_LESS_THAN;
2835     if (x > 0)
2836       return GST_VALUE_GREATER_THAN;
2837   }
2838
2839   return GST_VALUE_EQUAL;
2840 }
2841
2842 static gint
2843 gst_string_measure_wrapping (const gchar * s)
2844 {
2845   gint len;
2846   gboolean wrap = FALSE;
2847
2848   if (G_UNLIKELY (s == NULL))
2849     return -1;
2850
2851   /* Special case: the actual string NULL needs wrapping */
2852   if (G_UNLIKELY (strcmp (s, "NULL") == 0))
2853     return 4;
2854
2855   len = 0;
2856   while (*s) {
2857     if (GST_ASCII_IS_STRING (*s)) {
2858       len++;
2859     } else if (*s < 0x20 || *s >= 0x7f) {
2860       wrap = TRUE;
2861       len += 4;
2862     } else {
2863       wrap = TRUE;
2864       len += 2;
2865     }
2866     s++;
2867   }
2868
2869   /* Wrap the string if we found something that needs
2870    * wrapping, or the empty string (len == 0) */
2871   return (wrap || len == 0) ? len : -1;
2872 }
2873
2874 static gchar *
2875 gst_string_wrap_inner (const gchar * s, gint len)
2876 {
2877   gchar *d, *e;
2878
2879   e = d = g_malloc (len + 3);
2880
2881   *e++ = '\"';
2882   while (*s) {
2883     if (GST_ASCII_IS_STRING (*s)) {
2884       *e++ = *s++;
2885     } else if (*s < 0x20 || *s >= 0x7f) {
2886       *e++ = '\\';
2887       *e++ = '0' + ((*(guchar *) s) >> 6);
2888       *e++ = '0' + (((*s) >> 3) & 0x7);
2889       *e++ = '0' + ((*s++) & 0x7);
2890     } else {
2891       *e++ = '\\';
2892       *e++ = *s++;
2893     }
2894   }
2895   *e++ = '\"';
2896   *e = 0;
2897
2898   g_assert (e - d <= len + 3);
2899   return d;
2900 }
2901
2902 /* Do string wrapping/escaping */
2903 static gchar *
2904 gst_string_wrap (const gchar * s)
2905 {
2906   gint len = gst_string_measure_wrapping (s);
2907
2908   if (G_LIKELY (len < 0))
2909     return g_strdup (s);
2910
2911   return gst_string_wrap_inner (s, len);
2912 }
2913
2914 /* Same as above, but take ownership of the string */
2915 static gchar *
2916 gst_string_take_and_wrap (gchar * s)
2917 {
2918   gchar *out;
2919   gint len = gst_string_measure_wrapping (s);
2920
2921   if (G_LIKELY (len < 0))
2922     return s;
2923
2924   out = gst_string_wrap_inner (s, len);
2925   g_free (s);
2926
2927   return out;
2928 }
2929
2930 /*
2931  * This function takes a string delimited with double quotes (")
2932  * and unescapes any \xxx octal numbers.
2933  *
2934  * If sequences of \y are found where y is not in the range of
2935  * 0->3, y is copied unescaped.
2936  *
2937  * If \xyy is found where x is an octal number but y is not, an
2938  * error is encountered and %NULL is returned.
2939  *
2940  * the input string must be \0 terminated.
2941  */
2942 static gchar *
2943 gst_string_unwrap (const gchar * s)
2944 {
2945   gchar *ret;
2946   gchar *read, *write;
2947
2948   /* NULL string returns NULL */
2949   if (s == NULL)
2950     return NULL;
2951
2952   /* strings not starting with " are invalid */
2953   if (*s != '"')
2954     return NULL;
2955
2956   /* make copy of original string to hold the result. This
2957    * string will always be smaller than the original */
2958   ret = g_strdup (s);
2959   read = ret;
2960   write = ret;
2961
2962   /* need to move to the next position as we parsed the " */
2963   read++;
2964
2965   while (*read) {
2966     if (GST_ASCII_IS_STRING (*read)) {
2967       /* normal chars are just copied */
2968       *write++ = *read++;
2969     } else if (*read == '"') {
2970       /* quote marks end of string */
2971       break;
2972     } else if (*read == '\\') {
2973       /* got an escape char, move to next position to read a tripplet
2974        * of octal numbers */
2975       read++;
2976       /* is the next char a possible first octal number? */
2977       if (*read >= '0' && *read <= '3') {
2978         /* parse other 2 numbers, if one of them is not in the range of
2979          * an octal number, we error. We also catch the case where a zero
2980          * byte is found here. */
2981         if (read[1] < '0' || read[1] > '7' || read[2] < '0' || read[2] > '7')
2982           goto beach;
2983
2984         /* now convert the octal number to a byte again. */
2985         *write++ = ((read[0] - '0') << 6) +
2986             ((read[1] - '0') << 3) + (read[2] - '0');
2987
2988         read += 3;
2989       } else {
2990         /* if we run into a \0 here, we definitely won't get a quote later */
2991         if (*read == 0)
2992           goto beach;
2993
2994         /* else copy \X sequence */
2995         *write++ = *read++;
2996       }
2997     } else {
2998       /* weird character, error */
2999       goto beach;
3000     }
3001   }
3002   /* if the string is not ending in " and zero terminated, we error */
3003   if (*read != '"' || read[1] != '\0')
3004     goto beach;
3005
3006   /* null terminate result string and return */
3007   *write = '\0';
3008   return ret;
3009
3010 beach:
3011   g_free (ret);
3012   return NULL;
3013 }
3014
3015 static gchar *
3016 gst_value_serialize_string (const GValue * value)
3017 {
3018   return gst_string_wrap (value->data[0].v_pointer);
3019 }
3020
3021 static gboolean
3022 gst_value_deserialize_string (GValue * dest, const gchar * s)
3023 {
3024   if (G_UNLIKELY (strcmp (s, "NULL") == 0)) {
3025     g_value_set_string (dest, NULL);
3026     return TRUE;
3027   } else if (G_LIKELY (*s != '"')) {
3028     if (!g_utf8_validate (s, -1, NULL))
3029       return FALSE;
3030     g_value_set_string (dest, s);
3031     return TRUE;
3032   } else {
3033     gchar *str = gst_string_unwrap (s);
3034     if (G_UNLIKELY (!str))
3035       return FALSE;
3036     g_value_take_string (dest, str);
3037   }
3038
3039   return TRUE;
3040 }
3041
3042 /********
3043  * enum *
3044  ********/
3045
3046 static gint
3047 gst_value_compare_enum (const GValue * value1, const GValue * value2)
3048 {
3049   GEnumValue *en1, *en2;
3050   GEnumClass *klass1 = (GEnumClass *) g_type_class_ref (G_VALUE_TYPE (value1));
3051   GEnumClass *klass2 = (GEnumClass *) g_type_class_ref (G_VALUE_TYPE (value2));
3052
3053   g_return_val_if_fail (klass1, GST_VALUE_UNORDERED);
3054   g_return_val_if_fail (klass2, GST_VALUE_UNORDERED);
3055   en1 = g_enum_get_value (klass1, g_value_get_enum (value1));
3056   en2 = g_enum_get_value (klass2, g_value_get_enum (value2));
3057   g_type_class_unref (klass1);
3058   g_type_class_unref (klass2);
3059   g_return_val_if_fail (en1, GST_VALUE_UNORDERED);
3060   g_return_val_if_fail (en2, GST_VALUE_UNORDERED);
3061   if (en1->value < en2->value)
3062     return GST_VALUE_LESS_THAN;
3063   if (en1->value > en2->value)
3064     return GST_VALUE_GREATER_THAN;
3065
3066   return GST_VALUE_EQUAL;
3067 }
3068
3069 static gchar *
3070 gst_value_serialize_enum (const GValue * value)
3071 {
3072   GEnumValue *en;
3073   GEnumClass *klass = (GEnumClass *) g_type_class_ref (G_VALUE_TYPE (value));
3074
3075   g_return_val_if_fail (klass, NULL);
3076   en = g_enum_get_value (klass, g_value_get_enum (value));
3077   g_type_class_unref (klass);
3078
3079   /* might be one of the custom formats registered later */
3080   if (G_UNLIKELY (en == NULL && G_VALUE_TYPE (value) == GST_TYPE_FORMAT)) {
3081     const GstFormatDefinition *format_def;
3082
3083     format_def = gst_format_get_details ((GstFormat) g_value_get_enum (value));
3084     g_return_val_if_fail (format_def != NULL, NULL);
3085     return g_strdup (format_def->description);
3086   }
3087
3088   g_return_val_if_fail (en, NULL);
3089   return g_strdup (en->value_name);
3090 }
3091
3092 static gint
3093 gst_value_deserialize_enum_iter_cmp (const GValue * format_def_value,
3094     const gchar * s)
3095 {
3096   const GstFormatDefinition *format_def =
3097       g_value_get_pointer (format_def_value);
3098
3099   if (g_ascii_strcasecmp (s, format_def->nick) == 0)
3100     return 0;
3101
3102   return g_ascii_strcasecmp (s, format_def->description);
3103 }
3104
3105 static gboolean
3106 gst_value_deserialize_enum (GValue * dest, const gchar * s)
3107 {
3108   GEnumValue *en;
3109   gchar *endptr = NULL;
3110   GEnumClass *klass = (GEnumClass *) g_type_class_ref (G_VALUE_TYPE (dest));
3111
3112   g_return_val_if_fail (klass, FALSE);
3113   if (!(en = g_enum_get_value_by_name (klass, s))) {
3114     if (!(en = g_enum_get_value_by_nick (klass, s))) {
3115       gint i = strtol (s, &endptr, 0);
3116
3117       if (endptr && *endptr == '\0') {
3118         en = g_enum_get_value (klass, i);
3119       }
3120     }
3121   }
3122   g_type_class_unref (klass);
3123
3124   /* might be one of the custom formats registered later */
3125   if (G_UNLIKELY (en == NULL && G_VALUE_TYPE (dest) == GST_TYPE_FORMAT)) {
3126     GValue res = { 0, };
3127     const GstFormatDefinition *format_def;
3128     GstIterator *iter;
3129     gboolean found;
3130
3131     iter = gst_format_iterate_definitions ();
3132
3133     found = gst_iterator_find_custom (iter,
3134         (GCompareFunc) gst_value_deserialize_enum_iter_cmp, &res, (gpointer) s);
3135
3136     if (found) {
3137       format_def = g_value_get_pointer (&res);
3138       g_return_val_if_fail (format_def != NULL, FALSE);
3139       g_value_set_enum (dest, (gint) format_def->value);
3140       g_value_unset (&res);
3141     }
3142     gst_iterator_free (iter);
3143     return found;
3144   }
3145
3146   /* enum name/nick not found */
3147   if (en == NULL)
3148     return FALSE;
3149
3150   g_value_set_enum (dest, en->value);
3151   return TRUE;
3152 }
3153
3154 /********
3155  * flags *
3156  ********/
3157
3158 /* we just compare the value here */
3159 static gint
3160 gst_value_compare_flags (const GValue * value1, const GValue * value2)
3161 {
3162   guint fl1, fl2;
3163   GFlagsClass *klass1 =
3164       (GFlagsClass *) g_type_class_ref (G_VALUE_TYPE (value1));
3165   GFlagsClass *klass2 =
3166       (GFlagsClass *) g_type_class_ref (G_VALUE_TYPE (value2));
3167
3168   g_return_val_if_fail (klass1, GST_VALUE_UNORDERED);
3169   g_return_val_if_fail (klass2, GST_VALUE_UNORDERED);
3170   fl1 = g_value_get_flags (value1);
3171   fl2 = g_value_get_flags (value2);
3172   g_type_class_unref (klass1);
3173   g_type_class_unref (klass2);
3174   if (fl1 < fl2)
3175     return GST_VALUE_LESS_THAN;
3176   if (fl1 > fl2)
3177     return GST_VALUE_GREATER_THAN;
3178
3179   return GST_VALUE_EQUAL;
3180 }
3181
3182 /* the different flags are serialized separated with a + */
3183 static gchar *
3184 gst_value_serialize_flags (const GValue * value)
3185 {
3186   guint flags;
3187   GFlagsValue *fl;
3188   GFlagsClass *klass = (GFlagsClass *) g_type_class_ref (G_VALUE_TYPE (value));
3189   gchar *result, *tmp;
3190   gboolean first = TRUE;
3191
3192   g_return_val_if_fail (klass, NULL);
3193
3194   flags = g_value_get_flags (value);
3195
3196   /* if no flags are set, try to serialize to the _NONE string */
3197   if (!flags) {
3198     fl = g_flags_get_first_value (klass, flags);
3199     if (fl)
3200       return g_strdup (fl->value_name);
3201     else
3202       return g_strdup ("0");
3203   }
3204
3205   /* some flags are set, so serialize one by one */
3206   result = g_strdup ("");
3207   while (flags) {
3208     fl = g_flags_get_first_value (klass, flags);
3209     if (fl != NULL) {
3210       tmp = g_strconcat (result, (first ? "" : "+"), fl->value_name, NULL);
3211       g_free (result);
3212       result = tmp;
3213       first = FALSE;
3214
3215       /* clear flag */
3216       flags &= ~fl->value;
3217     }
3218   }
3219   g_type_class_unref (klass);
3220
3221   return result;
3222 }
3223
3224 static gboolean
3225 gst_value_deserialize_flags (GValue * dest, const gchar * s)
3226 {
3227   GFlagsValue *fl;
3228   gchar *endptr = NULL;
3229   GFlagsClass *klass = (GFlagsClass *) g_type_class_ref (G_VALUE_TYPE (dest));
3230   gchar **split;
3231   guint flags;
3232   gint i;
3233
3234   g_return_val_if_fail (klass, FALSE);
3235
3236   /* split into parts delimited with + */
3237   split = g_strsplit (s, "+", 0);
3238
3239   flags = 0;
3240   i = 0;
3241   /* loop over each part */
3242   while (split[i]) {
3243     if (!(fl = g_flags_get_value_by_name (klass, split[i]))) {
3244       if (!(fl = g_flags_get_value_by_nick (klass, split[i]))) {
3245         gint val = strtol (split[i], &endptr, 0);
3246
3247         /* just or numeric value */
3248         if (endptr && *endptr == '\0') {
3249           flags |= val;
3250         }
3251       }
3252     }
3253     if (fl) {
3254       flags |= fl->value;
3255     }
3256     i++;
3257   }
3258   g_strfreev (split);
3259   g_type_class_unref (klass);
3260   g_value_set_flags (dest, flags);
3261
3262   return TRUE;
3263 }
3264
3265 /****************
3266  * subset *
3267  ****************/
3268
3269 static gboolean
3270 gst_value_is_subset_int_range_int_range (const GValue * value1,
3271     const GValue * value2)
3272 {
3273   gint gcd;
3274
3275   g_return_val_if_fail (GST_VALUE_HOLDS_INT_RANGE (value1), FALSE);
3276   g_return_val_if_fail (GST_VALUE_HOLDS_INT_RANGE (value2), FALSE);
3277
3278   if (INT_RANGE_MIN (value1) * INT_RANGE_STEP (value1) <
3279       INT_RANGE_MIN (value2) * INT_RANGE_STEP (value2))
3280     return FALSE;
3281   if (INT_RANGE_MAX (value1) * INT_RANGE_STEP (value1) >
3282       INT_RANGE_MAX (value2) * INT_RANGE_STEP (value2))
3283     return FALSE;
3284
3285   if (INT_RANGE_MIN (value2) == INT_RANGE_MAX (value2)) {
3286     if ((INT_RANGE_MIN (value2) * INT_RANGE_STEP (value2)) %
3287         INT_RANGE_STEP (value1))
3288       return FALSE;
3289     return TRUE;
3290   }
3291
3292   gcd =
3293       gst_util_greatest_common_divisor (INT_RANGE_STEP (value1),
3294       INT_RANGE_STEP (value2));
3295   if (gcd != MIN (INT_RANGE_STEP (value1), INT_RANGE_STEP (value2)))
3296     return FALSE;
3297
3298   return TRUE;
3299 }
3300
3301 static gboolean
3302 gst_value_is_subset_int64_range_int64_range (const GValue * value1,
3303     const GValue * value2)
3304 {
3305   gint64 gcd;
3306
3307   g_return_val_if_fail (GST_VALUE_HOLDS_INT64_RANGE (value1), FALSE);
3308   g_return_val_if_fail (GST_VALUE_HOLDS_INT64_RANGE (value2), FALSE);
3309
3310   if (INT64_RANGE_MIN (value1) < INT64_RANGE_MIN (value2))
3311     return FALSE;
3312   if (INT64_RANGE_MAX (value1) > INT64_RANGE_MAX (value2))
3313     return FALSE;
3314
3315   if (INT64_RANGE_MIN (value2) == INT64_RANGE_MAX (value2)) {
3316     if ((INT64_RANGE_MIN (value2) * INT64_RANGE_STEP (value2)) %
3317         INT64_RANGE_STEP (value1))
3318       return FALSE;
3319     return TRUE;
3320   }
3321
3322   gcd =
3323       gst_util_greatest_common_divisor_int64 (INT64_RANGE_STEP (value1),
3324       INT64_RANGE_STEP (value2));
3325   if (gcd != MIN (INT64_RANGE_STEP (value1), INT64_RANGE_STEP (value2)))
3326     return FALSE;
3327
3328   return TRUE;
3329 }
3330
3331 /**
3332  * gst_value_is_subset:
3333  * @value1: a #GValue
3334  * @value2: a #GValue
3335  *
3336  * Check that @value1 is a subset of @value2.
3337  *
3338  * Return: %TRUE is @value1 is a subset of @value2
3339  */
3340 gboolean
3341 gst_value_is_subset (const GValue * value1, const GValue * value2)
3342 {
3343   /* special case for int/int64 ranges, since we cannot compute
3344      the difference for those when they have different steps,
3345      and it's actually a lot simpler to compute whether a range
3346      is a subset of another. */
3347   if (GST_VALUE_HOLDS_INT_RANGE (value1) && GST_VALUE_HOLDS_INT_RANGE (value2)) {
3348     return gst_value_is_subset_int_range_int_range (value1, value2);
3349   } else if (GST_VALUE_HOLDS_INT64_RANGE (value1)
3350       && GST_VALUE_HOLDS_INT64_RANGE (value2)) {
3351     return gst_value_is_subset_int64_range_int64_range (value1, value2);
3352   }
3353
3354   /*
3355    * 1 - [1,2] = empty
3356    * -> !subset
3357    *
3358    * [1,2] - 1 = 2
3359    *  -> 1 - [1,2] = empty
3360    *  -> subset
3361    *
3362    * [1,3] - [1,2] = 3
3363    * -> [1,2] - [1,3] = empty
3364    * -> subset
3365    *
3366    * {1,2} - {1,3} = 2
3367    * -> {1,3} - {1,2} = 3
3368    * -> !subset
3369    *
3370    *  First caps subtraction needs to return a non-empty set, second
3371    *  subtractions needs to give en empty set.
3372    *  Both substractions are switched below, as it's faster that way.
3373    */
3374   if (!gst_value_subtract (NULL, value1, value2)) {
3375     if (gst_value_subtract (NULL, value2, value1)) {
3376       return TRUE;
3377     }
3378   }
3379   return FALSE;
3380 }
3381
3382 /*********
3383  * union *
3384  *********/
3385
3386 static gboolean
3387 gst_value_union_int_int_range (GValue * dest, const GValue * src1,
3388     const GValue * src2)
3389 {
3390   gint v = src1->data[0].v_int;
3391
3392   /* check if it's already in the range */
3393   if (INT_RANGE_MIN (src2) * INT_RANGE_STEP (src2) <= v &&
3394       INT_RANGE_MAX (src2) * INT_RANGE_STEP (src2) >= v &&
3395       v % INT_RANGE_STEP (src2) == 0) {
3396     if (dest)
3397       gst_value_init_and_copy (dest, src2);
3398     return TRUE;
3399   }
3400
3401   /* check if it extends the range */
3402   if (v == (INT_RANGE_MIN (src2) - 1) * INT_RANGE_STEP (src2)) {
3403     if (dest) {
3404       guint64 new_min =
3405           (guint) ((INT_RANGE_MIN (src2) - 1) * INT_RANGE_STEP (src2));
3406       guint64 new_max = (guint) (INT_RANGE_MAX (src2) * INT_RANGE_STEP (src2));
3407
3408       gst_value_init_and_copy (dest, src2);
3409       dest->data[0].v_uint64 = (new_min << 32) | (new_max);
3410     }
3411     return TRUE;
3412   }
3413   if (v == (INT_RANGE_MAX (src2) + 1) * INT_RANGE_STEP (src2)) {
3414     if (dest) {
3415       guint64 new_min = (guint) (INT_RANGE_MIN (src2) * INT_RANGE_STEP (src2));
3416       guint64 new_max =
3417           (guint) ((INT_RANGE_MAX (src2) + 1) * INT_RANGE_STEP (src2));
3418
3419       gst_value_init_and_copy (dest, src2);
3420       dest->data[0].v_uint64 = (new_min << 32) | (new_max);
3421     }
3422     return TRUE;
3423   }
3424
3425   return FALSE;
3426 }
3427
3428 static gboolean
3429 gst_value_union_int_range_int_range (GValue * dest, const GValue * src1,
3430     const GValue * src2)
3431 {
3432   /* We can union in several special cases:
3433      1 - one is a subset of another
3434      2 - same step and not disjoint
3435      3 - different step, at least one with one value which matches a 'next' or 'previous'
3436      - anything else ?
3437    */
3438
3439   /* 1 - subset */
3440   if (gst_value_is_subset_int_range_int_range (src1, src2)) {
3441     if (dest)
3442       gst_value_init_and_copy (dest, src2);
3443     return TRUE;
3444   }
3445   if (gst_value_is_subset_int_range_int_range (src2, src1)) {
3446     if (dest)
3447       gst_value_init_and_copy (dest, src1);
3448     return TRUE;
3449   }
3450
3451   /* 2 - same step and not disjoint */
3452   if (INT_RANGE_STEP (src1) == INT_RANGE_STEP (src2)) {
3453     if ((INT_RANGE_MIN (src1) <= INT_RANGE_MAX (src2) + 1 &&
3454             INT_RANGE_MAX (src1) >= INT_RANGE_MIN (src2) - 1) ||
3455         (INT_RANGE_MIN (src2) <= INT_RANGE_MAX (src1) + 1 &&
3456             INT_RANGE_MAX (src2) >= INT_RANGE_MIN (src1) - 1)) {
3457       if (dest) {
3458         gint step = INT_RANGE_STEP (src1);
3459         gint min = step * MIN (INT_RANGE_MIN (src1), INT_RANGE_MIN (src2));
3460         gint max = step * MAX (INT_RANGE_MAX (src1), INT_RANGE_MAX (src2));
3461         g_value_init (dest, GST_TYPE_INT_RANGE);
3462         gst_value_set_int_range_step (dest, min, max, step);
3463       }
3464       return TRUE;
3465     }
3466   }
3467
3468   /* 3 - single value matches next or previous */
3469   if (INT_RANGE_STEP (src1) != INT_RANGE_STEP (src2)) {
3470     gint n1 = INT_RANGE_MAX (src1) - INT_RANGE_MIN (src1) + 1;
3471     gint n2 = INT_RANGE_MAX (src2) - INT_RANGE_MIN (src2) + 1;
3472     if (n1 == 1 || n2 == 1) {
3473       const GValue *range_value = NULL;
3474       gint scalar = 0;
3475       if (n1 == 1) {
3476         range_value = src2;
3477         scalar = INT_RANGE_MIN (src1) * INT_RANGE_STEP (src1);
3478       } else if (n2 == 1) {
3479         range_value = src1;
3480         scalar = INT_RANGE_MIN (src2) * INT_RANGE_STEP (src2);
3481       }
3482
3483       if (scalar ==
3484           (INT_RANGE_MIN (range_value) - 1) * INT_RANGE_STEP (range_value)) {
3485         if (dest) {
3486           guint64 new_min = (guint)
3487               ((INT_RANGE_MIN (range_value) -
3488                   1) * INT_RANGE_STEP (range_value));
3489           guint64 new_max = (guint)
3490               (INT_RANGE_MAX (range_value) * INT_RANGE_STEP (range_value));
3491
3492           gst_value_init_and_copy (dest, range_value);
3493           dest->data[0].v_uint64 = (new_min << 32) | (new_max);
3494         }
3495         return TRUE;
3496       } else if (scalar ==
3497           (INT_RANGE_MAX (range_value) + 1) * INT_RANGE_STEP (range_value)) {
3498         if (dest) {
3499           guint64 new_min = (guint)
3500               (INT_RANGE_MIN (range_value) * INT_RANGE_STEP (range_value));
3501           guint64 new_max = (guint)
3502               ((INT_RANGE_MAX (range_value) +
3503                   1) * INT_RANGE_STEP (range_value));
3504           gst_value_init_and_copy (dest, range_value);
3505           dest->data[0].v_uint64 = (new_min << 32) | (new_max);
3506         }
3507         return TRUE;
3508       }
3509     }
3510   }
3511
3512   /* If we get there, we did not find a way to make a union that can be
3513      represented with our simplistic model. */
3514   return FALSE;
3515 }
3516
3517 /****************
3518  * intersection *
3519  ****************/
3520
3521 static gboolean
3522 gst_value_intersect_int_int_range (GValue * dest, const GValue * src1,
3523     const GValue * src2)
3524 {
3525   if (INT_RANGE_MIN (src2) * INT_RANGE_STEP (src2) <= src1->data[0].v_int &&
3526       INT_RANGE_MAX (src2) * INT_RANGE_STEP (src2) >= src1->data[0].v_int &&
3527       src1->data[0].v_int % INT_RANGE_STEP (src2) == 0) {
3528     if (dest)
3529       gst_value_init_and_copy (dest, src1);
3530     return TRUE;
3531   }
3532
3533   return FALSE;
3534 }
3535
3536 static gboolean
3537 gst_value_intersect_int_range_int_range (GValue * dest, const GValue * src1,
3538     const GValue * src2)
3539 {
3540   gint min;
3541   gint max;
3542   gint step;
3543
3544   step =
3545       INT_RANGE_STEP (src1) /
3546       gst_util_greatest_common_divisor (INT_RANGE_STEP (src1),
3547       INT_RANGE_STEP (src2));
3548   if (G_MAXINT32 / INT_RANGE_STEP (src2) < step)
3549     return FALSE;
3550   step *= INT_RANGE_STEP (src2);
3551
3552   min =
3553       MAX (INT_RANGE_MIN (src1) * INT_RANGE_STEP (src1),
3554       INT_RANGE_MIN (src2) * INT_RANGE_STEP (src2));
3555   min = (min + step - 1) / step * step;
3556   max =
3557       MIN (INT_RANGE_MAX (src1) * INT_RANGE_STEP (src1),
3558       INT_RANGE_MAX (src2) * INT_RANGE_STEP (src2));
3559   max = max / step * step;
3560
3561   if (min < max) {
3562     if (dest) {
3563       g_value_init (dest, GST_TYPE_INT_RANGE);
3564       gst_value_set_int_range_step (dest, min, max, step);
3565     }
3566     return TRUE;
3567   }
3568   if (min == max) {
3569     if (dest) {
3570       g_value_init (dest, G_TYPE_INT);
3571       g_value_set_int (dest, min);
3572     }
3573     return TRUE;
3574   }
3575
3576   return FALSE;
3577 }
3578
3579 #define INT64_RANGE_MIN_VAL(v) (INT64_RANGE_MIN (v) * INT64_RANGE_STEP (v))
3580 #define INT64_RANGE_MAX_VAL(v) (INT64_RANGE_MAX (v) * INT64_RANGE_STEP (v))
3581
3582 static gboolean
3583 gst_value_intersect_int64_int64_range (GValue * dest, const GValue * src1,
3584     const GValue * src2)
3585 {
3586   if (INT64_RANGE_MIN_VAL (src2) <= src1->data[0].v_int64 &&
3587       INT64_RANGE_MAX_VAL (src2) >= src1->data[0].v_int64 &&
3588       src1->data[0].v_int64 % INT64_RANGE_STEP (src2) == 0) {
3589     if (dest)
3590       gst_value_init_and_copy (dest, src1);
3591     return TRUE;
3592   }
3593
3594   return FALSE;
3595 }
3596
3597 static gboolean
3598 gst_value_intersect_int64_range_int64_range (GValue * dest, const GValue * src1,
3599     const GValue * src2)
3600 {
3601   gint64 min;
3602   gint64 max;
3603   gint64 step;
3604
3605   step =
3606       INT64_RANGE_STEP (src1) /
3607       gst_util_greatest_common_divisor_int64 (INT64_RANGE_STEP (src1),
3608       INT64_RANGE_STEP (src2));
3609   if (G_MAXINT64 / INT64_RANGE_STEP (src2) < step)
3610     return FALSE;
3611   step *= INT64_RANGE_STEP (src2);
3612
3613   min =
3614       MAX (INT64_RANGE_MIN (src1) * INT64_RANGE_STEP (src1),
3615       INT64_RANGE_MIN (src2) * INT64_RANGE_STEP (src2));
3616   min = (min + step - 1) / step * step;
3617   max =
3618       MIN (INT64_RANGE_MAX (src1) * INT64_RANGE_STEP (src1),
3619       INT64_RANGE_MAX (src2) * INT64_RANGE_STEP (src2));
3620   max = max / step * step;
3621
3622   if (min < max) {
3623     if (dest) {
3624       g_value_init (dest, GST_TYPE_INT64_RANGE);
3625       gst_value_set_int64_range_step (dest, min, max, step);
3626     }
3627     return TRUE;
3628   }
3629   if (min == max) {
3630     if (dest) {
3631       g_value_init (dest, G_TYPE_INT64);
3632       g_value_set_int64 (dest, min);
3633     }
3634     return TRUE;
3635   }
3636
3637   return FALSE;
3638 }
3639
3640 static gboolean
3641 gst_value_intersect_double_double_range (GValue * dest, const GValue * src1,
3642     const GValue * src2)
3643 {
3644   if (src2->data[0].v_double <= src1->data[0].v_double &&
3645       src2->data[1].v_double >= src1->data[0].v_double) {
3646     if (dest)
3647       gst_value_init_and_copy (dest, src1);
3648     return TRUE;
3649   }
3650
3651   return FALSE;
3652 }
3653
3654 static gboolean
3655 gst_value_intersect_double_range_double_range (GValue * dest,
3656     const GValue * src1, const GValue * src2)
3657 {
3658   gdouble min;
3659   gdouble max;
3660
3661   min = MAX (src1->data[0].v_double, src2->data[0].v_double);
3662   max = MIN (src1->data[1].v_double, src2->data[1].v_double);
3663
3664   if (min < max) {
3665     if (dest) {
3666       g_value_init (dest, GST_TYPE_DOUBLE_RANGE);
3667       gst_value_set_double_range (dest, min, max);
3668     }
3669     return TRUE;
3670   }
3671   if (min == max) {
3672     if (dest) {
3673       g_value_init (dest, G_TYPE_DOUBLE);
3674       g_value_set_int (dest, (int) min);
3675     }
3676     return TRUE;
3677   }
3678
3679   return FALSE;
3680 }
3681
3682 static gboolean
3683 gst_value_intersect_list (GValue * dest, const GValue * value1,
3684     const GValue * value2)
3685 {
3686   guint i, size;
3687   GValue intersection = { 0, };
3688   gboolean ret = FALSE;
3689
3690   size = VALUE_LIST_SIZE (value1);
3691   for (i = 0; i < size; i++) {
3692     const GValue *cur = VALUE_LIST_GET_VALUE (value1, i);
3693
3694     /* quicker version when we don't need the resulting set */
3695     if (!dest) {
3696       if (gst_value_intersect (NULL, cur, value2)) {
3697         ret = TRUE;
3698         break;
3699       }
3700       continue;
3701     }
3702
3703     if (gst_value_intersect (&intersection, cur, value2)) {
3704       /* append value */
3705       if (!ret) {
3706         gst_value_move (dest, &intersection);
3707         ret = TRUE;
3708       } else if (GST_VALUE_HOLDS_LIST (dest)) {
3709         _gst_value_list_append_and_take_value (dest, &intersection);
3710       } else {
3711         GValue temp;
3712
3713         gst_value_move (&temp, dest);
3714         gst_value_list_merge (dest, &temp, &intersection);
3715         g_value_unset (&temp);
3716         g_value_unset (&intersection);
3717       }
3718     }
3719   }
3720
3721   return ret;
3722 }
3723
3724 static gboolean
3725 gst_value_intersect_array (GValue * dest, const GValue * src1,
3726     const GValue * src2)
3727 {
3728   guint size;
3729   guint n;
3730   GValue val = { 0 };
3731
3732   /* only works on similar-sized arrays */
3733   size = gst_value_array_get_size (src1);
3734   if (size != gst_value_array_get_size (src2))
3735     return FALSE;
3736
3737   /* quicker value when we don't need the resulting set */
3738   if (!dest) {
3739     for (n = 0; n < size; n++) {
3740       if (!gst_value_intersect (NULL, gst_value_array_get_value (src1, n),
3741               gst_value_array_get_value (src2, n))) {
3742         return FALSE;
3743       }
3744     }
3745     return TRUE;
3746   }
3747
3748   g_value_init (dest, GST_TYPE_ARRAY);
3749
3750   for (n = 0; n < size; n++) {
3751     if (!gst_value_intersect (&val, gst_value_array_get_value (src1, n),
3752             gst_value_array_get_value (src2, n))) {
3753       g_value_unset (dest);
3754       return FALSE;
3755     }
3756     _gst_value_array_append_and_take_value (dest, &val);
3757   }
3758
3759   return TRUE;
3760 }
3761
3762 static gboolean
3763 gst_value_intersect_fraction_fraction_range (GValue * dest, const GValue * src1,
3764     const GValue * src2)
3765 {
3766   gint res1, res2;
3767   GValue *vals;
3768   GstValueCompareFunc compare;
3769
3770   vals = src2->data[0].v_pointer;
3771
3772   if (vals == NULL)
3773     return FALSE;
3774
3775   if ((compare = gst_value_get_compare_func (src1))) {
3776     res1 = gst_value_compare_with_func (&vals[0], src1, compare);
3777     res2 = gst_value_compare_with_func (&vals[1], src1, compare);
3778
3779     if ((res1 == GST_VALUE_EQUAL || res1 == GST_VALUE_LESS_THAN) &&
3780         (res2 == GST_VALUE_EQUAL || res2 == GST_VALUE_GREATER_THAN)) {
3781       if (dest)
3782         gst_value_init_and_copy (dest, src1);
3783       return TRUE;
3784     }
3785   }
3786
3787   return FALSE;
3788 }
3789
3790 static gboolean
3791 gst_value_intersect_fraction_range_fraction_range (GValue * dest,
3792     const GValue * src1, const GValue * src2)
3793 {
3794   GValue *min;
3795   GValue *max;
3796   gint res;
3797   GValue *vals1, *vals2;
3798   GstValueCompareFunc compare;
3799
3800   vals1 = src1->data[0].v_pointer;
3801   vals2 = src2->data[0].v_pointer;
3802   g_return_val_if_fail (vals1 != NULL && vals2 != NULL, FALSE);
3803
3804   if ((compare = gst_value_get_compare_func (&vals1[0]))) {
3805     /* min = MAX (src1.start, src2.start) */
3806     res = gst_value_compare_with_func (&vals1[0], &vals2[0], compare);
3807     g_return_val_if_fail (res != GST_VALUE_UNORDERED, FALSE);
3808     if (res == GST_VALUE_LESS_THAN)
3809       min = &vals2[0];          /* Take the max of the 2 */
3810     else
3811       min = &vals1[0];
3812
3813     /* max = MIN (src1.end, src2.end) */
3814     res = gst_value_compare_with_func (&vals1[1], &vals2[1], compare);
3815     g_return_val_if_fail (res != GST_VALUE_UNORDERED, FALSE);
3816     if (res == GST_VALUE_GREATER_THAN)
3817       max = &vals2[1];          /* Take the min of the 2 */
3818     else
3819       max = &vals1[1];
3820
3821     res = gst_value_compare_with_func (min, max, compare);
3822     g_return_val_if_fail (res != GST_VALUE_UNORDERED, FALSE);
3823     if (res == GST_VALUE_LESS_THAN) {
3824       if (dest) {
3825         g_value_init (dest, GST_TYPE_FRACTION_RANGE);
3826         vals1 = dest->data[0].v_pointer;
3827         g_value_copy (min, &vals1[0]);
3828         g_value_copy (max, &vals1[1]);
3829       }
3830       return TRUE;
3831     }
3832     if (res == GST_VALUE_EQUAL) {
3833       if (dest)
3834         gst_value_init_and_copy (dest, min);
3835       return TRUE;
3836     }
3837   }
3838
3839   return FALSE;
3840 }
3841
3842 /***************
3843  * subtraction *
3844  ***************/
3845
3846 static gboolean
3847 gst_value_subtract_int_int_range (GValue * dest, const GValue * minuend,
3848     const GValue * subtrahend)
3849 {
3850   gint min = gst_value_get_int_range_min (subtrahend);
3851   gint max = gst_value_get_int_range_max (subtrahend);
3852   gint step = gst_value_get_int_range_step (subtrahend);
3853   gint val = g_value_get_int (minuend);
3854
3855   if (step == 0)
3856     return FALSE;
3857
3858   /* subtracting a range from an int only works if the int is not in the
3859    * range */
3860   if (val < min || val > max || val % step) {
3861     /* and the result is the int */
3862     if (dest)
3863       gst_value_init_and_copy (dest, minuend);
3864     return TRUE;
3865   }
3866   return FALSE;
3867 }
3868
3869 /* creates a new int range based on input values.
3870  */
3871 static gboolean
3872 gst_value_create_new_range (GValue * dest, gint min1, gint max1, gint min2,
3873     gint max2, gint step)
3874 {
3875   GValue v1 = { 0, };
3876   GValue v2 = { 0, };
3877   GValue *pv1, *pv2;            /* yeah, hungarian! */
3878
3879   g_return_val_if_fail (step > 0, FALSE);
3880   g_return_val_if_fail (min1 % step == 0, FALSE);
3881   g_return_val_if_fail (max1 % step == 0, FALSE);
3882   g_return_val_if_fail (min2 % step == 0, FALSE);
3883   g_return_val_if_fail (max2 % step == 0, FALSE);
3884
3885   if (min1 <= max1 && min2 <= max2) {
3886     pv1 = &v1;
3887     pv2 = &v2;
3888   } else if (min1 <= max1) {
3889     pv1 = dest;
3890     pv2 = NULL;
3891   } else if (min2 <= max2) {
3892     pv1 = NULL;
3893     pv2 = dest;
3894   } else {
3895     return FALSE;
3896   }
3897
3898   if (!dest)
3899     return TRUE;
3900
3901   if (min1 < max1) {
3902     g_value_init (pv1, GST_TYPE_INT_RANGE);
3903     gst_value_set_int_range_step (pv1, min1, max1, step);
3904   } else if (min1 == max1) {
3905     g_value_init (pv1, G_TYPE_INT);
3906     g_value_set_int (pv1, min1);
3907   }
3908   if (min2 < max2) {
3909     g_value_init (pv2, GST_TYPE_INT_RANGE);
3910     gst_value_set_int_range_step (pv2, min2, max2, step);
3911   } else if (min2 == max2) {
3912     g_value_init (pv2, G_TYPE_INT);
3913     g_value_set_int (pv2, min2);
3914   }
3915
3916   if (min1 <= max1 && min2 <= max2) {
3917     gst_value_list_concat_and_take_values (dest, pv1, pv2);
3918   }
3919   return TRUE;
3920 }
3921
3922 static gboolean
3923 gst_value_subtract_int_range_int (GValue * dest, const GValue * minuend,
3924     const GValue * subtrahend)
3925 {
3926   gint min = gst_value_get_int_range_min (minuend);
3927   gint max = gst_value_get_int_range_max (minuend);
3928   gint step = gst_value_get_int_range_step (minuend);
3929   gint val = g_value_get_int (subtrahend);
3930
3931   g_return_val_if_fail (min < max, FALSE);
3932
3933   if (step == 0)
3934     return FALSE;
3935
3936   /* value is outside of the range, return range unchanged */
3937   if (val < min || val > max || val % step) {
3938     if (dest)
3939       gst_value_init_and_copy (dest, minuend);
3940     return TRUE;
3941   } else {
3942     /* max must be MAXINT too as val <= max */
3943     if (val >= G_MAXINT - step + 1) {
3944       max -= step;
3945       val -= step;
3946     }
3947     /* min must be MININT too as val >= max */
3948     if (val <= G_MININT + step - 1) {
3949       min += step;
3950       val += step;
3951     }
3952     if (dest)
3953       gst_value_create_new_range (dest, min, val - step, val + step, max, step);
3954   }
3955   return TRUE;
3956 }
3957
3958 static gboolean
3959 gst_value_subtract_int_range_int_range (GValue * dest, const GValue * minuend,
3960     const GValue * subtrahend)
3961 {
3962   gint min1 = gst_value_get_int_range_min (minuend);
3963   gint max1 = gst_value_get_int_range_max (minuend);
3964   gint step1 = gst_value_get_int_range_step (minuend);
3965   gint min2 = gst_value_get_int_range_min (subtrahend);
3966   gint max2 = gst_value_get_int_range_max (subtrahend);
3967   gint step2 = gst_value_get_int_range_step (subtrahend);
3968   gint step;
3969
3970   if (step1 != step2) {
3971     /* ENOIMPL */
3972     g_assert (FALSE);
3973     return FALSE;
3974   }
3975   step = step1;
3976
3977   if (step == 0)
3978     return FALSE;
3979
3980   if (max2 >= max1 && min2 <= min1) {
3981     return FALSE;
3982   } else if (max2 >= max1) {
3983     return gst_value_create_new_range (dest, min1, MIN (min2 - step, max1),
3984         step, 0, step);
3985   } else if (min2 <= min1) {
3986     return gst_value_create_new_range (dest, MAX (max2 + step, min1), max1,
3987         step, 0, step);
3988   } else {
3989     return gst_value_create_new_range (dest, min1, MIN (min2 - step, max1),
3990         MAX (max2 + step, min1), max1, step);
3991   }
3992 }
3993
3994 static gboolean
3995 gst_value_subtract_int64_int64_range (GValue * dest, const GValue * minuend,
3996     const GValue * subtrahend)
3997 {
3998   gint64 min = gst_value_get_int64_range_min (subtrahend);
3999   gint64 max = gst_value_get_int64_range_max (subtrahend);
4000   gint64 step = gst_value_get_int64_range_step (subtrahend);
4001   gint64 val = g_value_get_int64 (minuend);
4002
4003   if (step == 0)
4004     return FALSE;
4005   /* subtracting a range from an int64 only works if the int64 is not in the
4006    * range */
4007   if (val < min || val > max || val % step) {
4008     /* and the result is the int64 */
4009     if (dest)
4010       gst_value_init_and_copy (dest, minuend);
4011     return TRUE;
4012   }
4013   return FALSE;
4014 }
4015
4016 /* creates a new int64 range based on input values.
4017  */
4018 static gboolean
4019 gst_value_create_new_int64_range (GValue * dest, gint64 min1, gint64 max1,
4020     gint64 min2, gint64 max2, gint64 step)
4021 {
4022   GValue v1 = { 0, };
4023   GValue v2 = { 0, };
4024   GValue *pv1, *pv2;            /* yeah, hungarian! */
4025
4026   g_return_val_if_fail (step > 0, FALSE);
4027   g_return_val_if_fail (min1 % step == 0, FALSE);
4028   g_return_val_if_fail (max1 % step == 0, FALSE);
4029   g_return_val_if_fail (min2 % step == 0, FALSE);
4030   g_return_val_if_fail (max2 % step == 0, FALSE);
4031
4032   if (min1 <= max1 && min2 <= max2) {
4033     pv1 = &v1;
4034     pv2 = &v2;
4035   } else if (min1 <= max1) {
4036     pv1 = dest;
4037     pv2 = NULL;
4038   } else if (min2 <= max2) {
4039     pv1 = NULL;
4040     pv2 = dest;
4041   } else {
4042     return FALSE;
4043   }
4044
4045   if (!dest)
4046     return TRUE;
4047
4048   if (min1 < max1) {
4049     g_value_init (pv1, GST_TYPE_INT64_RANGE);
4050     gst_value_set_int64_range_step (pv1, min1, max1, step);
4051   } else if (min1 == max1) {
4052     g_value_init (pv1, G_TYPE_INT64);
4053     g_value_set_int64 (pv1, min1);
4054   }
4055   if (min2 < max2) {
4056     g_value_init (pv2, GST_TYPE_INT64_RANGE);
4057     gst_value_set_int64_range_step (pv2, min2, max2, step);
4058   } else if (min2 == max2) {
4059     g_value_init (pv2, G_TYPE_INT64);
4060     g_value_set_int64 (pv2, min2);
4061   }
4062
4063   if (min1 <= max1 && min2 <= max2) {
4064     gst_value_list_concat_and_take_values (dest, pv1, pv2);
4065   }
4066   return TRUE;
4067 }
4068
4069 static gboolean
4070 gst_value_subtract_int64_range_int64 (GValue * dest, const GValue * minuend,
4071     const GValue * subtrahend)
4072 {
4073   gint64 min = gst_value_get_int64_range_min (minuend);
4074   gint64 max = gst_value_get_int64_range_max (minuend);
4075   gint64 step = gst_value_get_int64_range_step (minuend);
4076   gint64 val = g_value_get_int64 (subtrahend);
4077
4078   g_return_val_if_fail (min < max, FALSE);
4079
4080   if (step == 0)
4081     return FALSE;
4082
4083   /* value is outside of the range, return range unchanged */
4084   if (val < min || val > max || val % step) {
4085     if (dest)
4086       gst_value_init_and_copy (dest, minuend);
4087     return TRUE;
4088   } else {
4089     /* max must be MAXINT64 too as val <= max */
4090     if (val >= G_MAXINT64 - step + 1) {
4091       max -= step;
4092       val -= step;
4093     }
4094     /* min must be MININT64 too as val >= max */
4095     if (val <= G_MININT64 + step - 1) {
4096       min += step;
4097       val += step;
4098     }
4099     if (dest)
4100       gst_value_create_new_int64_range (dest, min, val - step, val + step, max,
4101           step);
4102   }
4103   return TRUE;
4104 }
4105
4106 static gboolean
4107 gst_value_subtract_int64_range_int64_range (GValue * dest,
4108     const GValue * minuend, const GValue * subtrahend)
4109 {
4110   gint64 min1 = gst_value_get_int64_range_min (minuend);
4111   gint64 max1 = gst_value_get_int64_range_max (minuend);
4112   gint64 step1 = gst_value_get_int64_range_step (minuend);
4113   gint64 min2 = gst_value_get_int64_range_min (subtrahend);
4114   gint64 max2 = gst_value_get_int64_range_max (subtrahend);
4115   gint64 step2 = gst_value_get_int64_range_step (subtrahend);
4116   gint64 step;
4117
4118   if (step1 != step2) {
4119     /* ENOIMPL */
4120     g_assert (FALSE);
4121     return FALSE;
4122   }
4123
4124   if (step1 == 0)
4125     return FALSE;
4126
4127   step = step1;
4128
4129   if (max2 >= max1 && min2 <= min1) {
4130     return FALSE;
4131   } else if (max2 >= max1) {
4132     return gst_value_create_new_int64_range (dest, min1, MIN (min2 - step,
4133             max1), step, 0, step);
4134   } else if (min2 <= min1) {
4135     return gst_value_create_new_int64_range (dest, MAX (max2 + step, min1),
4136         max1, step, 0, step);
4137   } else {
4138     return gst_value_create_new_int64_range (dest, min1, MIN (min2 - step,
4139             max1), MAX (max2 + step, min1), max1, step);
4140   }
4141 }
4142
4143 static gboolean
4144 gst_value_subtract_double_double_range (GValue * dest, const GValue * minuend,
4145     const GValue * subtrahend)
4146 {
4147   gdouble min = gst_value_get_double_range_min (subtrahend);
4148   gdouble max = gst_value_get_double_range_max (subtrahend);
4149   gdouble val = g_value_get_double (minuend);
4150
4151   if (val < min || val > max) {
4152     if (dest)
4153       gst_value_init_and_copy (dest, minuend);
4154     return TRUE;
4155   }
4156   return FALSE;
4157 }
4158
4159 static gboolean
4160 gst_value_subtract_double_range_double (GValue * dest, const GValue * minuend,
4161     const GValue * subtrahend)
4162 {
4163   /* since we don't have open ranges, we cannot create a hole in
4164    * a double range. We return the original range */
4165   if (dest)
4166     gst_value_init_and_copy (dest, minuend);
4167   return TRUE;
4168 }
4169
4170 static gboolean
4171 gst_value_subtract_double_range_double_range (GValue * dest,
4172     const GValue * minuend, const GValue * subtrahend)
4173 {
4174   /* since we don't have open ranges, we have to approximate */
4175   /* done like with ints */
4176   gdouble min1 = gst_value_get_double_range_min (minuend);
4177   gdouble max2 = gst_value_get_double_range_max (minuend);
4178   gdouble max1 = MIN (gst_value_get_double_range_min (subtrahend), max2);
4179   gdouble min2 = MAX (gst_value_get_double_range_max (subtrahend), min1);
4180   GValue v1 = { 0, };
4181   GValue v2 = { 0, };
4182   GValue *pv1, *pv2;            /* yeah, hungarian! */
4183
4184   if (min1 < max1 && min2 < max2) {
4185     pv1 = &v1;
4186     pv2 = &v2;
4187   } else if (min1 < max1) {
4188     pv1 = dest;
4189     pv2 = NULL;
4190   } else if (min2 < max2) {
4191     pv1 = NULL;
4192     pv2 = dest;
4193   } else {
4194     return FALSE;
4195   }
4196
4197   if (!dest)
4198     return TRUE;
4199
4200   if (min1 < max1) {
4201     g_value_init (pv1, GST_TYPE_DOUBLE_RANGE);
4202     gst_value_set_double_range (pv1, min1, max1);
4203   }
4204   if (min2 < max2) {
4205     g_value_init (pv2, GST_TYPE_DOUBLE_RANGE);
4206     gst_value_set_double_range (pv2, min2, max2);
4207   }
4208
4209   if (min1 < max1 && min2 < max2) {
4210     gst_value_list_concat_and_take_values (dest, pv1, pv2);
4211   }
4212   return TRUE;
4213 }
4214
4215 static gboolean
4216 gst_value_subtract_from_list (GValue * dest, const GValue * minuend,
4217     const GValue * subtrahend)
4218 {
4219   guint i, size;
4220   GValue subtraction = { 0, };
4221   gboolean ret = FALSE;
4222
4223   size = VALUE_LIST_SIZE (minuend);
4224   for (i = 0; i < size; i++) {
4225     const GValue *cur = VALUE_LIST_GET_VALUE (minuend, i);
4226
4227     /* quicker version when we can discard the result */
4228     if (!dest) {
4229       if (gst_value_subtract (NULL, cur, subtrahend)) {
4230         ret = TRUE;
4231         break;
4232       }
4233       continue;
4234     }
4235
4236     if (gst_value_subtract (&subtraction, cur, subtrahend)) {
4237       if (!ret) {
4238         gst_value_move (dest, &subtraction);
4239         ret = TRUE;
4240       } else if (G_VALUE_TYPE (dest) == GST_TYPE_LIST
4241           && G_VALUE_TYPE (&subtraction) != GST_TYPE_LIST) {
4242         _gst_value_list_append_and_take_value (dest, &subtraction);
4243       } else {
4244         GValue temp;
4245
4246         gst_value_move (&temp, dest);
4247         gst_value_list_concat_and_take_values (dest, &temp, &subtraction);
4248       }
4249     }
4250   }
4251   return ret;
4252 }
4253
4254 static gboolean
4255 gst_value_subtract_list (GValue * dest, const GValue * minuend,
4256     const GValue * subtrahend)
4257 {
4258   guint i, size;
4259   GValue data[2] = { {0,}, {0,} };
4260   GValue *subtraction = &data[0], *result = &data[1];
4261
4262   gst_value_init_and_copy (result, minuend);
4263   size = VALUE_LIST_SIZE (subtrahend);
4264   for (i = 0; i < size; i++) {
4265     const GValue *cur = VALUE_LIST_GET_VALUE (subtrahend, i);
4266
4267     if (gst_value_subtract (subtraction, result, cur)) {
4268       GValue *temp = result;
4269
4270       result = subtraction;
4271       subtraction = temp;
4272       g_value_unset (subtraction);
4273     } else {
4274       g_value_unset (result);
4275       return FALSE;
4276     }
4277   }
4278   if (dest) {
4279     gst_value_move (dest, result);
4280   } else {
4281     g_value_unset (result);
4282   }
4283   return TRUE;
4284 }
4285
4286 static gboolean
4287 gst_value_subtract_fraction_fraction_range (GValue * dest,
4288     const GValue * minuend, const GValue * subtrahend)
4289 {
4290   const GValue *min = gst_value_get_fraction_range_min (subtrahend);
4291   const GValue *max = gst_value_get_fraction_range_max (subtrahend);
4292   GstValueCompareFunc compare;
4293
4294   if ((compare = gst_value_get_compare_func (minuend))) {
4295     /* subtracting a range from an fraction only works if the fraction
4296      * is not in the range */
4297     if (gst_value_compare_with_func (minuend, min, compare) ==
4298         GST_VALUE_LESS_THAN ||
4299         gst_value_compare_with_func (minuend, max, compare) ==
4300         GST_VALUE_GREATER_THAN) {
4301       /* and the result is the value */
4302       if (dest)
4303         gst_value_init_and_copy (dest, minuend);
4304       return TRUE;
4305     }
4306   }
4307   return FALSE;
4308 }
4309
4310 static gboolean
4311 gst_value_subtract_fraction_range_fraction (GValue * dest,
4312     const GValue * minuend, const GValue * subtrahend)
4313 {
4314   /* since we don't have open ranges, we cannot create a hole in
4315    * a range. We return the original range */
4316   if (dest)
4317     gst_value_init_and_copy (dest, minuend);
4318   return TRUE;
4319 }
4320
4321 static gboolean
4322 gst_value_subtract_fraction_range_fraction_range (GValue * dest,
4323     const GValue * minuend, const GValue * subtrahend)
4324 {
4325   /* since we don't have open ranges, we have to approximate */
4326   /* done like with ints and doubles. Creates a list of 2 fraction ranges */
4327   const GValue *min1 = gst_value_get_fraction_range_min (minuend);
4328   const GValue *max2 = gst_value_get_fraction_range_max (minuend);
4329   const GValue *max1 = gst_value_get_fraction_range_min (subtrahend);
4330   const GValue *min2 = gst_value_get_fraction_range_max (subtrahend);
4331   gint cmp1, cmp2;
4332   GValue v1 = { 0, };
4333   GValue v2 = { 0, };
4334   GValue *pv1, *pv2;            /* yeah, hungarian! */
4335   GstValueCompareFunc compare;
4336
4337   g_return_val_if_fail (min1 != NULL && max1 != NULL, FALSE);
4338   g_return_val_if_fail (min2 != NULL && max2 != NULL, FALSE);
4339
4340   compare = gst_value_get_compare_func (min1);
4341   g_return_val_if_fail (compare, FALSE);
4342
4343   cmp1 = gst_value_compare_with_func (max2, max1, compare);
4344   g_return_val_if_fail (cmp1 != GST_VALUE_UNORDERED, FALSE);
4345   if (cmp1 == GST_VALUE_LESS_THAN)
4346     max1 = max2;
4347   cmp1 = gst_value_compare_with_func (min1, min2, compare);
4348   g_return_val_if_fail (cmp1 != GST_VALUE_UNORDERED, FALSE);
4349   if (cmp1 == GST_VALUE_GREATER_THAN)
4350     min2 = min1;
4351
4352   cmp1 = gst_value_compare_with_func (min1, max1, compare);
4353   cmp2 = gst_value_compare_with_func (min2, max2, compare);
4354
4355   if (cmp1 == GST_VALUE_LESS_THAN && cmp2 == GST_VALUE_LESS_THAN) {
4356     pv1 = &v1;
4357     pv2 = &v2;
4358   } else if (cmp1 == GST_VALUE_LESS_THAN) {
4359     pv1 = dest;
4360     pv2 = NULL;
4361   } else if (cmp2 == GST_VALUE_LESS_THAN) {
4362     pv1 = NULL;
4363     pv2 = dest;
4364   } else {
4365     return FALSE;
4366   }
4367
4368   if (!dest)
4369     return TRUE;
4370
4371   if (cmp1 == GST_VALUE_LESS_THAN) {
4372     g_value_init (pv1, GST_TYPE_FRACTION_RANGE);
4373     gst_value_set_fraction_range (pv1, min1, max1);
4374   }
4375   if (cmp2 == GST_VALUE_LESS_THAN) {
4376     g_value_init (pv2, GST_TYPE_FRACTION_RANGE);
4377     gst_value_set_fraction_range (pv2, min2, max2);
4378   }
4379
4380   if (cmp1 == GST_VALUE_LESS_THAN && cmp2 == GST_VALUE_LESS_THAN) {
4381     gst_value_list_concat_and_take_values (dest, pv1, pv2);
4382   }
4383   return TRUE;
4384 }
4385
4386
4387 /**************
4388  * comparison *
4389  **************/
4390
4391 /*
4392  * gst_value_get_compare_func:
4393  * @value1: a value to get the compare function for
4394  *
4395  * Determines the compare function to be used with values of the same type as
4396  * @value1. The function can be given to gst_value_compare_with_func().
4397  *
4398  * Returns: A #GstValueCompareFunc value
4399  */
4400 static GstValueCompareFunc
4401 gst_value_get_compare_func (const GValue * value1)
4402 {
4403   GstValueTable *table, *best = NULL;
4404   guint i;
4405   GType type1;
4406
4407   type1 = G_VALUE_TYPE (value1);
4408
4409   /* this is a fast check */
4410   best = gst_value_hash_lookup_type (type1);
4411
4412   /* slower checks */
4413   if (G_UNLIKELY (!best || !best->compare)) {
4414     guint len = gst_value_table->len;
4415
4416     best = NULL;
4417     for (i = 0; i < len; i++) {
4418       table = &g_array_index (gst_value_table, GstValueTable, i);
4419       if (table->compare && g_type_is_a (type1, table->type)) {
4420         if (!best || g_type_is_a (table->type, best->type))
4421           best = table;
4422       }
4423     }
4424   }
4425   if (G_LIKELY (best))
4426     return best->compare;
4427
4428   return NULL;
4429 }
4430
4431 static inline gboolean
4432 gst_value_can_compare_unchecked (const GValue * value1, const GValue * value2)
4433 {
4434   if (G_VALUE_TYPE (value1) != G_VALUE_TYPE (value2))
4435     return FALSE;
4436
4437   return gst_value_get_compare_func (value1) != NULL;
4438 }
4439
4440 /**
4441  * gst_value_can_compare:
4442  * @value1: a value to compare
4443  * @value2: another value to compare
4444  *
4445  * Determines if @value1 and @value2 can be compared.
4446  *
4447  * Returns: %TRUE if the values can be compared
4448  */
4449 gboolean
4450 gst_value_can_compare (const GValue * value1, const GValue * value2)
4451 {
4452   g_return_val_if_fail (G_IS_VALUE (value1), FALSE);
4453   g_return_val_if_fail (G_IS_VALUE (value2), FALSE);
4454
4455   return gst_value_can_compare_unchecked (value1, value2);
4456 }
4457
4458 static gboolean
4459 gst_value_list_equals_range (const GValue * list, const GValue * value)
4460 {
4461   const GValue *first;
4462   guint list_size, n;
4463
4464   g_assert (G_IS_VALUE (list));
4465   g_assert (G_IS_VALUE (value));
4466   g_assert (GST_VALUE_HOLDS_LIST (list));
4467
4468   /* TODO: compare against an empty list ? No type though... */
4469   list_size = VALUE_LIST_SIZE (list);
4470   if (list_size == 0)
4471     return FALSE;
4472
4473   /* compare the basic types - they have to match */
4474   first = VALUE_LIST_GET_VALUE (list, 0);
4475 #define CHECK_TYPES(type,prefix) \
4476   (prefix##_VALUE_HOLDS_##type(first) && GST_VALUE_HOLDS_##type##_RANGE (value))
4477   if (CHECK_TYPES (INT, G)) {
4478     const gint rmin = gst_value_get_int_range_min (value);
4479     const gint rmax = gst_value_get_int_range_max (value);
4480     const gint rstep = gst_value_get_int_range_step (value);
4481     if (rstep == 0)
4482       return FALSE;
4483     /* note: this will overflow for min 0 and max INT_MAX, but this
4484        would only be equal to a list of INT_MAX elements, which seems
4485        very unlikely */
4486     if (list_size != rmax / rstep - rmin / rstep + 1)
4487       return FALSE;
4488     for (n = 0; n < list_size; ++n) {
4489       gint v = g_value_get_int (VALUE_LIST_GET_VALUE (list, n));
4490       if (v < rmin || v > rmax || v % rstep) {
4491         return FALSE;
4492       }
4493     }
4494     return TRUE;
4495   } else if (CHECK_TYPES (INT64, G)) {
4496     const gint64 rmin = gst_value_get_int64_range_min (value);
4497     const gint64 rmax = gst_value_get_int64_range_max (value);
4498     const gint64 rstep = gst_value_get_int64_range_step (value);
4499     GST_DEBUG ("List/range of int64s");
4500     if (rstep == 0)
4501       return FALSE;
4502     if (list_size != rmax / rstep - rmin / rstep + 1)
4503       return FALSE;
4504     for (n = 0; n < list_size; ++n) {
4505       gint64 v = g_value_get_int64 (VALUE_LIST_GET_VALUE (list, n));
4506       if (v < rmin || v > rmax || v % rstep)
4507         return FALSE;
4508     }
4509     return TRUE;
4510   }
4511 #undef CHECK_TYPES
4512
4513   /* other combinations don't make sense for equality */
4514   return FALSE;
4515 }
4516
4517 /* "Pure" variant of gst_value_compare which is guaranteed to
4518  * not have list arguments and therefore does basic comparisions
4519  */
4520 static inline gint
4521 _gst_value_compare_nolist (const GValue * value1, const GValue * value2)
4522 {
4523   GstValueCompareFunc compare;
4524
4525   if (G_VALUE_TYPE (value1) != G_VALUE_TYPE (value2))
4526     return GST_VALUE_UNORDERED;
4527
4528   compare = gst_value_get_compare_func (value1);
4529   if (compare) {
4530     return compare (value1, value2);
4531   }
4532
4533   g_critical ("unable to compare values of type %s\n",
4534       g_type_name (G_VALUE_TYPE (value1)));
4535   return GST_VALUE_UNORDERED;
4536 }
4537
4538 /**
4539  * gst_value_compare:
4540  * @value1: a value to compare
4541  * @value2: another value to compare
4542  *
4543  * Compares @value1 and @value2.  If @value1 and @value2 cannot be
4544  * compared, the function returns GST_VALUE_UNORDERED.  Otherwise,
4545  * if @value1 is greater than @value2, GST_VALUE_GREATER_THAN is returned.
4546  * If @value1 is less than @value2, GST_VALUE_LESS_THAN is returned.
4547  * If the values are equal, GST_VALUE_EQUAL is returned.
4548  *
4549  * Returns: comparison result
4550  */
4551 gint
4552 gst_value_compare (const GValue * value1, const GValue * value2)
4553 {
4554   gboolean value1_is_list;
4555   gboolean value2_is_list;
4556
4557   g_return_val_if_fail (G_IS_VALUE (value1), GST_VALUE_LESS_THAN);
4558   g_return_val_if_fail (G_IS_VALUE (value2), GST_VALUE_GREATER_THAN);
4559
4560   value1_is_list = G_VALUE_TYPE (value1) == GST_TYPE_LIST;
4561   value2_is_list = G_VALUE_TYPE (value2) == GST_TYPE_LIST;
4562
4563   /* Special cases: lists and scalar values ("{ 1 }" and "1" are equal),
4564      as well as lists and ranges ("{ 1, 2 }" and "[ 1, 2 ]" are equal) */
4565   if (value1_is_list && !value2_is_list) {
4566     gint i, n, ret;
4567
4568     if (gst_value_list_equals_range (value1, value2)) {
4569       return GST_VALUE_EQUAL;
4570     }
4571
4572     n = gst_value_list_get_size (value1);
4573     if (n == 0)
4574       return GST_VALUE_UNORDERED;
4575
4576     for (i = 0; i < n; i++) {
4577       const GValue *elt;
4578
4579       elt = gst_value_list_get_value (value1, i);
4580       ret = gst_value_compare (elt, value2);
4581       if (ret != GST_VALUE_EQUAL && n == 1)
4582         return ret;
4583       else if (ret != GST_VALUE_EQUAL)
4584         return GST_VALUE_UNORDERED;
4585     }
4586
4587     return GST_VALUE_EQUAL;
4588   } else if (value2_is_list && !value1_is_list) {
4589     gint i, n, ret;
4590
4591     if (gst_value_list_equals_range (value2, value1)) {
4592       return GST_VALUE_EQUAL;
4593     }
4594
4595     n = gst_value_list_get_size (value2);
4596     if (n == 0)
4597       return GST_VALUE_UNORDERED;
4598
4599     for (i = 0; i < n; i++) {
4600       const GValue *elt;
4601
4602       elt = gst_value_list_get_value (value2, i);
4603       ret = gst_value_compare (elt, value1);
4604       if (ret != GST_VALUE_EQUAL && n == 1)
4605         return ret;
4606       else if (ret != GST_VALUE_EQUAL)
4607         return GST_VALUE_UNORDERED;
4608     }
4609
4610     return GST_VALUE_EQUAL;
4611   }
4612
4613   /* And now handle the generic case */
4614   return _gst_value_compare_nolist (value1, value2);
4615 }
4616
4617 /*
4618  * gst_value_compare_with_func:
4619  * @value1: a value to compare
4620  * @value2: another value to compare
4621  * @compare: compare function
4622  *
4623  * Compares @value1 and @value2 using the @compare function. Works like
4624  * gst_value_compare() but allows to save time determining the compare function
4625  * a multiple times.
4626  *
4627  * Returns: comparison result
4628  */
4629 static gint
4630 gst_value_compare_with_func (const GValue * value1, const GValue * value2,
4631     GstValueCompareFunc compare)
4632 {
4633   g_assert (compare);
4634
4635   if (G_VALUE_TYPE (value1) != G_VALUE_TYPE (value2))
4636     return GST_VALUE_UNORDERED;
4637
4638   return compare (value1, value2);
4639 }
4640
4641 /* union */
4642
4643 /**
4644  * gst_value_can_union:
4645  * @value1: a value to union
4646  * @value2: another value to union
4647  *
4648  * Determines if @value1 and @value2 can be non-trivially unioned.
4649  * Any two values can be trivially unioned by adding both of them
4650  * to a GstValueList.  However, certain types have the possibility
4651  * to be unioned in a simpler way.  For example, an integer range
4652  * and an integer can be unioned if the integer is a subset of the
4653  * integer range.  If there is the possibility that two values can
4654  * be unioned, this function returns %TRUE.
4655  *
4656  * Returns: %TRUE if there is a function allowing the two values to
4657  * be unioned.
4658  */
4659 gboolean
4660 gst_value_can_union (const GValue * value1, const GValue * value2)
4661 {
4662   GstValueUnionInfo *union_info;
4663   guint i, len;
4664
4665   g_return_val_if_fail (G_IS_VALUE (value1), FALSE);
4666   g_return_val_if_fail (G_IS_VALUE (value2), FALSE);
4667
4668   len = gst_value_union_funcs->len;
4669
4670   for (i = 0; i < len; i++) {
4671     union_info = &g_array_index (gst_value_union_funcs, GstValueUnionInfo, i);
4672     if (union_info->type1 == G_VALUE_TYPE (value1) &&
4673         union_info->type2 == G_VALUE_TYPE (value2))
4674       return TRUE;
4675     if (union_info->type1 == G_VALUE_TYPE (value2) &&
4676         union_info->type2 == G_VALUE_TYPE (value1))
4677       return TRUE;
4678   }
4679
4680   return FALSE;
4681 }
4682
4683 /**
4684  * gst_value_union:
4685  * @dest: (out caller-allocates): the destination value
4686  * @value1: a value to union
4687  * @value2: another value to union
4688  *
4689  * Creates a GValue corresponding to the union of @value1 and @value2.
4690  *
4691  * Returns: %TRUE if the union succeeded.
4692  */
4693 gboolean
4694 gst_value_union (GValue * dest, const GValue * value1, const GValue * value2)
4695 {
4696   const GstValueUnionInfo *union_info;
4697   guint i, len;
4698   GType type1, type2;
4699
4700   g_return_val_if_fail (dest != NULL, FALSE);
4701   g_return_val_if_fail (G_IS_VALUE (value1), FALSE);
4702   g_return_val_if_fail (G_IS_VALUE (value2), FALSE);
4703   g_return_val_if_fail (gst_value_list_or_array_are_compatible (value1, value2),
4704       FALSE);
4705
4706   len = gst_value_union_funcs->len;
4707   type1 = G_VALUE_TYPE (value1);
4708   type2 = G_VALUE_TYPE (value2);
4709
4710   for (i = 0; i < len; i++) {
4711     union_info = &g_array_index (gst_value_union_funcs, GstValueUnionInfo, i);
4712     if (union_info->type1 == type1 && union_info->type2 == type2) {
4713       return union_info->func (dest, value1, value2);
4714     }
4715     if (union_info->type1 == type2 && union_info->type2 == type1) {
4716       return union_info->func (dest, value2, value1);
4717     }
4718   }
4719
4720   gst_value_list_concat (dest, value1, value2);
4721   return TRUE;
4722 }
4723
4724 /* gst_value_register_union_func: (skip)
4725  * @type1: a type to union
4726  * @type2: another type to union
4727  * @func: a function that implements creating a union between the two types
4728  *
4729  * Registers a union function that can create a union between #GValue items
4730  * of the type @type1 and @type2.
4731  *
4732  * Union functions should be registered at startup before any pipelines are
4733  * started, as gst_value_register_union_func() is not thread-safe and cannot
4734  * be used at the same time as gst_value_union() or gst_value_can_union().
4735  */
4736 static void
4737 gst_value_register_union_func (GType type1, GType type2, GstValueUnionFunc func)
4738 {
4739   GstValueUnionInfo union_info;
4740
4741   union_info.type1 = type1;
4742   union_info.type2 = type2;
4743   union_info.func = func;
4744
4745   g_array_append_val (gst_value_union_funcs, union_info);
4746 }
4747
4748 /* intersection */
4749
4750 /**
4751  * gst_value_can_intersect:
4752  * @value1: a value to intersect
4753  * @value2: another value to intersect
4754  *
4755  * Determines if intersecting two values will produce a valid result.
4756  * Two values will produce a valid intersection if they have the same
4757  * type.
4758  *
4759  * Returns: %TRUE if the values can intersect
4760  */
4761 gboolean
4762 gst_value_can_intersect (const GValue * value1, const GValue * value2)
4763 {
4764   GstValueIntersectInfo *intersect_info;
4765   guint i, len;
4766   GType type1, type2;
4767
4768   g_return_val_if_fail (G_IS_VALUE (value1), FALSE);
4769   g_return_val_if_fail (G_IS_VALUE (value2), FALSE);
4770
4771   type1 = G_VALUE_TYPE (value1);
4772   type2 = G_VALUE_TYPE (value2);
4773
4774   /* practically all GstValue types have a compare function (_can_compare=TRUE)
4775    * GstStructure and GstCaps have not, but are intersectable */
4776   if (type1 == type2)
4777     return TRUE;
4778
4779   /* special cases */
4780   if (type1 == GST_TYPE_LIST || type2 == GST_TYPE_LIST)
4781     return TRUE;
4782
4783   /* check registered intersect functions */
4784   len = gst_value_intersect_funcs->len;
4785   for (i = 0; i < len; i++) {
4786     intersect_info = &g_array_index (gst_value_intersect_funcs,
4787         GstValueIntersectInfo, i);
4788     if ((intersect_info->type1 == type1 && intersect_info->type2 == type2) ||
4789         (intersect_info->type1 == type2 && intersect_info->type2 == type1))
4790       return TRUE;
4791   }
4792
4793   return gst_value_can_compare_unchecked (value1, value2);
4794 }
4795
4796 /**
4797  * gst_value_intersect:
4798  * @dest: (out caller-allocates) (transfer full) (allow-none):
4799  *   a uninitialized #GValue that will hold the calculated
4800  *   intersection value. May be %NULL if the resulting set if not
4801  *   needed.
4802  * @value1: a value to intersect
4803  * @value2: another value to intersect
4804  *
4805  * Calculates the intersection of two values.  If the values have
4806  * a non-empty intersection, the value representing the intersection
4807  * is placed in @dest, unless %NULL.  If the intersection is non-empty,
4808  * @dest is not modified.
4809  *
4810  * Returns: %TRUE if the intersection is non-empty
4811  */
4812 gboolean
4813 gst_value_intersect (GValue * dest, const GValue * value1,
4814     const GValue * value2)
4815 {
4816   GstValueIntersectInfo *intersect_info;
4817   guint i, len;
4818   GType type1, type2;
4819
4820   g_return_val_if_fail (G_IS_VALUE (value1), FALSE);
4821   g_return_val_if_fail (G_IS_VALUE (value2), FALSE);
4822
4823   type1 = G_VALUE_TYPE (value1);
4824   type2 = G_VALUE_TYPE (value2);
4825
4826   /* special cases first */
4827   if (type1 == GST_TYPE_LIST)
4828     return gst_value_intersect_list (dest, value1, value2);
4829   if (type2 == GST_TYPE_LIST)
4830     return gst_value_intersect_list (dest, value2, value1);
4831
4832   if (_gst_value_compare_nolist (value1, value2) == GST_VALUE_EQUAL) {
4833     if (dest)
4834       gst_value_init_and_copy (dest, value1);
4835     return TRUE;
4836   }
4837
4838   len = gst_value_intersect_funcs->len;
4839   for (i = 0; i < len; i++) {
4840     intersect_info = &g_array_index (gst_value_intersect_funcs,
4841         GstValueIntersectInfo, i);
4842     if (intersect_info->type1 == type1 && intersect_info->type2 == type2) {
4843       return intersect_info->func (dest, value1, value2);
4844     }
4845     if (intersect_info->type1 == type2 && intersect_info->type2 == type1) {
4846       return intersect_info->func (dest, value2, value1);
4847     }
4848   }
4849   return FALSE;
4850 }
4851
4852
4853
4854 /* gst_value_register_intersect_func: (skip)
4855  * @type1: the first type to intersect
4856  * @type2: the second type to intersect
4857  * @func: the intersection function
4858  *
4859  * Registers a function that is called to calculate the intersection
4860  * of the values having the types @type1 and @type2.
4861  *
4862  * Intersect functions should be registered at startup before any pipelines are
4863  * started, as gst_value_register_intersect_func() is not thread-safe and
4864  * cannot be used at the same time as gst_value_intersect() or
4865  * gst_value_can_intersect().
4866  */
4867 static void
4868 gst_value_register_intersect_func (GType type1, GType type2,
4869     GstValueIntersectFunc func)
4870 {
4871   GstValueIntersectInfo intersect_info;
4872
4873   intersect_info.type1 = type1;
4874   intersect_info.type2 = type2;
4875   intersect_info.func = func;
4876
4877   g_array_append_val (gst_value_intersect_funcs, intersect_info);
4878 }
4879
4880
4881 /* subtraction */
4882
4883 /**
4884  * gst_value_subtract:
4885  * @dest: (out caller-allocates) (allow-none): the destination value
4886  *     for the result if the subtraction is not empty. May be %NULL,
4887  *     in which case the resulting set will not be computed, which can
4888  *     give a fair speedup.
4889  * @minuend: the value to subtract from
4890  * @subtrahend: the value to subtract
4891  *
4892  * Subtracts @subtrahend from @minuend and stores the result in @dest.
4893  * Note that this means subtraction as in sets, not as in mathematics.
4894  *
4895  * Returns: %TRUE if the subtraction is not empty
4896  */
4897 gboolean
4898 gst_value_subtract (GValue * dest, const GValue * minuend,
4899     const GValue * subtrahend)
4900 {
4901   GstValueSubtractInfo *info;
4902   guint i, len;
4903   GType mtype, stype;
4904
4905   g_return_val_if_fail (G_IS_VALUE (minuend), FALSE);
4906   g_return_val_if_fail (G_IS_VALUE (subtrahend), FALSE);
4907
4908   mtype = G_VALUE_TYPE (minuend);
4909   stype = G_VALUE_TYPE (subtrahend);
4910
4911   /* special cases first */
4912   if (mtype == GST_TYPE_LIST)
4913     return gst_value_subtract_from_list (dest, minuend, subtrahend);
4914   if (stype == GST_TYPE_LIST)
4915     return gst_value_subtract_list (dest, minuend, subtrahend);
4916
4917   len = gst_value_subtract_funcs->len;
4918   for (i = 0; i < len; i++) {
4919     info = &g_array_index (gst_value_subtract_funcs, GstValueSubtractInfo, i);
4920     if (info->minuend == mtype && info->subtrahend == stype) {
4921       return info->func (dest, minuend, subtrahend);
4922     }
4923   }
4924
4925   if (_gst_value_compare_nolist (minuend, subtrahend) != GST_VALUE_EQUAL) {
4926     if (dest)
4927       gst_value_init_and_copy (dest, minuend);
4928     return TRUE;
4929   }
4930
4931   return FALSE;
4932 }
4933
4934 #if 0
4935 gboolean
4936 gst_value_subtract (GValue * dest, const GValue * minuend,
4937     const GValue * subtrahend)
4938 {
4939   gboolean ret = gst_value_subtract2 (dest, minuend, subtrahend);
4940
4941   g_printerr ("\"%s\"  -  \"%s\"  =  \"%s\"\n", gst_value_serialize (minuend),
4942       gst_value_serialize (subtrahend),
4943       ret ? gst_value_serialize (dest) : "---");
4944   return ret;
4945 }
4946 #endif
4947
4948 /**
4949  * gst_value_can_subtract:
4950  * @minuend: the value to subtract from
4951  * @subtrahend: the value to subtract
4952  *
4953  * Checks if it's possible to subtract @subtrahend from @minuend.
4954  *
4955  * Returns: %TRUE if a subtraction is possible
4956  */
4957 gboolean
4958 gst_value_can_subtract (const GValue * minuend, const GValue * subtrahend)
4959 {
4960   GstValueSubtractInfo *info;
4961   guint i, len;
4962   GType mtype, stype;
4963
4964   g_return_val_if_fail (G_IS_VALUE (minuend), FALSE);
4965   g_return_val_if_fail (G_IS_VALUE (subtrahend), FALSE);
4966
4967   mtype = G_VALUE_TYPE (minuend);
4968   stype = G_VALUE_TYPE (subtrahend);
4969
4970   /* special cases */
4971   if (mtype == GST_TYPE_LIST || stype == GST_TYPE_LIST)
4972     return TRUE;
4973
4974   len = gst_value_subtract_funcs->len;
4975   for (i = 0; i < len; i++) {
4976     info = &g_array_index (gst_value_subtract_funcs, GstValueSubtractInfo, i);
4977     if (info->minuend == mtype && info->subtrahend == stype)
4978       return TRUE;
4979   }
4980
4981   return gst_value_can_compare_unchecked (minuend, subtrahend);
4982 }
4983
4984 /* gst_value_register_subtract_func: (skip)
4985  * @minuend_type: type of the minuend
4986  * @subtrahend_type: type of the subtrahend
4987  * @func: function to use
4988  *
4989  * Registers @func as a function capable of subtracting the values of
4990  * @subtrahend_type from values of @minuend_type.
4991  *
4992  * Subtract functions should be registered at startup before any pipelines are
4993  * started, as gst_value_register_subtract_func() is not thread-safe and
4994  * cannot be used at the same time as gst_value_subtract().
4995  */
4996 static void
4997 gst_value_register_subtract_func (GType minuend_type, GType subtrahend_type,
4998     GstValueSubtractFunc func)
4999 {
5000   GstValueSubtractInfo info;
5001
5002   g_return_if_fail (!gst_type_is_fixed (minuend_type)
5003       || !gst_type_is_fixed (subtrahend_type));
5004
5005   info.minuend = minuend_type;
5006   info.subtrahend = subtrahend_type;
5007   info.func = func;
5008
5009   g_array_append_val (gst_value_subtract_funcs, info);
5010 }
5011
5012 /**
5013  * gst_value_register:
5014  * @table: structure containing functions to register
5015  *
5016  * Registers functions to perform calculations on #GValue items of a given
5017  * type. Each type can only be added once.
5018  */
5019 void
5020 gst_value_register (const GstValueTable * table)
5021 {
5022   GstValueTable *found;
5023
5024   g_return_if_fail (table != NULL);
5025
5026   g_array_append_val (gst_value_table, *table);
5027
5028   found = gst_value_hash_lookup_type (table->type);
5029   if (found)
5030     g_warning ("adding type %s multiple times", g_type_name (table->type));
5031
5032   /* FIXME: we're not really doing the const justice, we assume the table is
5033    * static */
5034   gst_value_hash_add_type (table->type, table);
5035 }
5036
5037 /**
5038  * gst_value_init_and_copy:
5039  * @dest: (out caller-allocates): the target value
5040  * @src: the source value
5041  *
5042  * Initialises the target value to be of the same type as source and then copies
5043  * the contents from source to target.
5044  */
5045 void
5046 gst_value_init_and_copy (GValue * dest, const GValue * src)
5047 {
5048   g_return_if_fail (G_IS_VALUE (src));
5049   g_return_if_fail (dest != NULL);
5050
5051   g_value_init (dest, G_VALUE_TYPE (src));
5052   g_value_copy (src, dest);
5053 }
5054
5055 /* move src into dest and clear src */
5056 static void
5057 gst_value_move (GValue * dest, GValue * src)
5058 {
5059   g_assert (G_IS_VALUE (src));
5060   g_assert (dest != NULL);
5061
5062   *dest = *src;
5063   memset (src, 0, sizeof (GValue));
5064 }
5065
5066 /**
5067  * gst_value_serialize:
5068  * @value: a #GValue to serialize
5069  *
5070  * tries to transform the given @value into a string representation that allows
5071  * getting back this string later on using gst_value_deserialize().
5072  *
5073  * Free-function: g_free
5074  *
5075  * Returns: (transfer full) (nullable): the serialization for @value
5076  * or %NULL if none exists
5077  */
5078 gchar *
5079 gst_value_serialize (const GValue * value)
5080 {
5081   guint i, len;
5082   GValue s_val = { 0 };
5083   GstValueTable *table, *best;
5084   gchar *s;
5085   GType type;
5086
5087   g_return_val_if_fail (G_IS_VALUE (value), NULL);
5088
5089   type = G_VALUE_TYPE (value);
5090
5091   best = gst_value_hash_lookup_type (type);
5092
5093   if (G_UNLIKELY (!best || !best->serialize)) {
5094     len = gst_value_table->len;
5095     best = NULL;
5096     for (i = 0; i < len; i++) {
5097       table = &g_array_index (gst_value_table, GstValueTable, i);
5098       if (table->serialize && g_type_is_a (type, table->type)) {
5099         if (!best || g_type_is_a (table->type, best->type))
5100           best = table;
5101       }
5102     }
5103   }
5104   if (G_LIKELY (best))
5105     return best->serialize (value);
5106
5107   g_value_init (&s_val, G_TYPE_STRING);
5108   if (g_value_transform (value, &s_val)) {
5109     s = gst_string_wrap (g_value_get_string (&s_val));
5110   } else {
5111     s = NULL;
5112   }
5113   g_value_unset (&s_val);
5114
5115   return s;
5116 }
5117
5118 /**
5119  * gst_value_deserialize:
5120  * @dest: (out caller-allocates): #GValue to fill with contents of
5121  *     deserialization
5122  * @src: string to deserialize
5123  *
5124  * Tries to deserialize a string into the type specified by the given GValue.
5125  * If the operation succeeds, %TRUE is returned, %FALSE otherwise.
5126  *
5127  * Returns: %TRUE on success
5128  */
5129 gboolean
5130 gst_value_deserialize (GValue * dest, const gchar * src)
5131 {
5132   GstValueTable *table, *best;
5133   guint i, len;
5134   GType type;
5135
5136   g_return_val_if_fail (src != NULL, FALSE);
5137   g_return_val_if_fail (G_IS_VALUE (dest), FALSE);
5138
5139   type = G_VALUE_TYPE (dest);
5140
5141   best = gst_value_hash_lookup_type (type);
5142   if (G_UNLIKELY (!best || !best->deserialize)) {
5143     len = gst_value_table->len;
5144     best = NULL;
5145     for (i = 0; i < len; i++) {
5146       table = &g_array_index (gst_value_table, GstValueTable, i);
5147       if (table->deserialize && g_type_is_a (type, table->type)) {
5148         if (!best || g_type_is_a (table->type, best->type))
5149           best = table;
5150       }
5151     }
5152   }
5153   if (G_LIKELY (best))
5154     return best->deserialize (dest, src);
5155
5156   return FALSE;
5157 }
5158
5159 /**
5160  * gst_value_is_fixed:
5161  * @value: the #GValue to check
5162  *
5163  * Tests if the given GValue, if available in a GstStructure (or any other
5164  * container) contains a "fixed" (which means: one value) or an "unfixed"
5165  * (which means: multiple possible values, such as data lists or data
5166  * ranges) value.
5167  *
5168  * Returns: true if the value is "fixed".
5169  */
5170
5171 gboolean
5172 gst_value_is_fixed (const GValue * value)
5173 {
5174   GType type;
5175
5176   g_return_val_if_fail (G_IS_VALUE (value), FALSE);
5177
5178   type = G_VALUE_TYPE (value);
5179
5180   /* the most common types are just basic plain glib types */
5181   if (type <= G_TYPE_MAKE_FUNDAMENTAL (G_TYPE_RESERVED_GLIB_LAST)) {
5182     return TRUE;
5183   }
5184
5185   if (type == GST_TYPE_ARRAY) {
5186     gint size, n;
5187     const GValue *kid;
5188
5189     /* check recursively */
5190     size = gst_value_array_get_size (value);
5191     for (n = 0; n < size; n++) {
5192       kid = gst_value_array_get_value (value, n);
5193       if (!gst_value_is_fixed (kid))
5194         return FALSE;
5195     }
5196     return TRUE;
5197   }
5198   return gst_type_is_fixed (type);
5199 }
5200
5201 /**
5202  * gst_value_fixate:
5203  * @dest: the #GValue destination
5204  * @src: the #GValue to fixate
5205  *
5206  * Fixate @src into a new value @dest.
5207  * For ranges, the first element is taken. For lists and arrays, the
5208  * first item is fixated and returned.
5209  * If @src is already fixed, this function returns %FALSE.
5210  *
5211  * Returns: %TRUE if @dest contains a fixated version of @src.
5212  */
5213 gboolean
5214 gst_value_fixate (GValue * dest, const GValue * src)
5215 {
5216   g_return_val_if_fail (G_IS_VALUE (src), FALSE);
5217   g_return_val_if_fail (dest != NULL, FALSE);
5218
5219   if (G_VALUE_TYPE (src) == GST_TYPE_INT_RANGE) {
5220     g_value_init (dest, G_TYPE_INT);
5221     g_value_set_int (dest, gst_value_get_int_range_min (src));
5222   } else if (G_VALUE_TYPE (src) == GST_TYPE_DOUBLE_RANGE) {
5223     g_value_init (dest, G_TYPE_DOUBLE);
5224     g_value_set_double (dest, gst_value_get_double_range_min (src));
5225   } else if (G_VALUE_TYPE (src) == GST_TYPE_FRACTION_RANGE) {
5226     gst_value_init_and_copy (dest, gst_value_get_fraction_range_min (src));
5227   } else if (G_VALUE_TYPE (src) == GST_TYPE_LIST) {
5228     GValue temp = { 0 };
5229
5230     /* list could be empty */
5231     if (gst_value_list_get_size (src) <= 0)
5232       return FALSE;
5233
5234     gst_value_init_and_copy (&temp, gst_value_list_get_value (src, 0));
5235
5236     if (!gst_value_fixate (dest, &temp)) {
5237       gst_value_move (dest, &temp);
5238     } else {
5239       g_value_unset (&temp);
5240     }
5241   } else if (G_VALUE_TYPE (src) == GST_TYPE_ARRAY) {
5242     gboolean res = FALSE;
5243     guint n, len;
5244
5245     len = gst_value_array_get_size (src);
5246     g_value_init (dest, GST_TYPE_ARRAY);
5247     for (n = 0; n < len; n++) {
5248       GValue kid = { 0 };
5249       const GValue *orig_kid = gst_value_array_get_value (src, n);
5250
5251       if (!gst_value_fixate (&kid, orig_kid))
5252         gst_value_init_and_copy (&kid, orig_kid);
5253       else
5254         res = TRUE;
5255       _gst_value_array_append_and_take_value (dest, &kid);
5256     }
5257
5258     if (!res)
5259       g_value_unset (dest);
5260
5261     return res;
5262   } else {
5263     return FALSE;
5264   }
5265   return TRUE;
5266 }
5267
5268
5269 /************
5270  * fraction *
5271  ************/
5272
5273 /* helper functions */
5274 static void
5275 gst_value_init_fraction (GValue * value)
5276 {
5277   value->data[0].v_int = 0;
5278   value->data[1].v_int = 1;
5279 }
5280
5281 static void
5282 gst_value_copy_fraction (const GValue * src_value, GValue * dest_value)
5283 {
5284   dest_value->data[0].v_int = src_value->data[0].v_int;
5285   dest_value->data[1].v_int = src_value->data[1].v_int;
5286 }
5287
5288 static gchar *
5289 gst_value_collect_fraction (GValue * value, guint n_collect_values,
5290     GTypeCValue * collect_values, guint collect_flags)
5291 {
5292   if (n_collect_values != 2)
5293     return g_strdup_printf ("not enough value locations for `%s' passed",
5294         G_VALUE_TYPE_NAME (value));
5295   if (collect_values[1].v_int == 0)
5296     return g_strdup_printf ("passed '0' as denominator for `%s'",
5297         G_VALUE_TYPE_NAME (value));
5298   if (collect_values[0].v_int < -G_MAXINT)
5299     return
5300         g_strdup_printf
5301         ("passed value smaller than -G_MAXINT as numerator for `%s'",
5302         G_VALUE_TYPE_NAME (value));
5303   if (collect_values[1].v_int < -G_MAXINT)
5304     return
5305         g_strdup_printf
5306         ("passed value smaller than -G_MAXINT as denominator for `%s'",
5307         G_VALUE_TYPE_NAME (value));
5308
5309   gst_value_set_fraction (value,
5310       collect_values[0].v_int, collect_values[1].v_int);
5311
5312   return NULL;
5313 }
5314
5315 static gchar *
5316 gst_value_lcopy_fraction (const GValue * value, guint n_collect_values,
5317     GTypeCValue * collect_values, guint collect_flags)
5318 {
5319   gint *numerator = collect_values[0].v_pointer;
5320   gint *denominator = collect_values[1].v_pointer;
5321
5322   if (!numerator)
5323     return g_strdup_printf ("numerator for `%s' passed as NULL",
5324         G_VALUE_TYPE_NAME (value));
5325   if (!denominator)
5326     return g_strdup_printf ("denominator for `%s' passed as NULL",
5327         G_VALUE_TYPE_NAME (value));
5328
5329   *numerator = value->data[0].v_int;
5330   *denominator = value->data[1].v_int;
5331
5332   return NULL;
5333 }
5334
5335 /**
5336  * gst_value_set_fraction:
5337  * @value: a GValue initialized to #GST_TYPE_FRACTION
5338  * @numerator: the numerator of the fraction
5339  * @denominator: the denominator of the fraction
5340  *
5341  * Sets @value to the fraction specified by @numerator over @denominator.
5342  * The fraction gets reduced to the smallest numerator and denominator,
5343  * and if necessary the sign is moved to the numerator.
5344  */
5345 void
5346 gst_value_set_fraction (GValue * value, gint numerator, gint denominator)
5347 {
5348   gint gcd = 0;
5349
5350   g_return_if_fail (GST_VALUE_HOLDS_FRACTION (value));
5351   g_return_if_fail (denominator != 0);
5352   g_return_if_fail (denominator >= -G_MAXINT);
5353   g_return_if_fail (numerator >= -G_MAXINT);
5354
5355   /* normalize sign */
5356   if (denominator < 0) {
5357     numerator = -numerator;
5358     denominator = -denominator;
5359   }
5360
5361   /* check for reduction */
5362   gcd = gst_util_greatest_common_divisor (numerator, denominator);
5363   if (gcd) {
5364     numerator /= gcd;
5365     denominator /= gcd;
5366   }
5367
5368   g_assert (denominator > 0);
5369
5370   value->data[0].v_int = numerator;
5371   value->data[1].v_int = denominator;
5372 }
5373
5374 /**
5375  * gst_value_get_fraction_numerator:
5376  * @value: a GValue initialized to #GST_TYPE_FRACTION
5377  *
5378  * Gets the numerator of the fraction specified by @value.
5379  *
5380  * Returns: the numerator of the fraction.
5381  */
5382 gint
5383 gst_value_get_fraction_numerator (const GValue * value)
5384 {
5385   g_return_val_if_fail (GST_VALUE_HOLDS_FRACTION (value), 0);
5386
5387   return value->data[0].v_int;
5388 }
5389
5390 /**
5391  * gst_value_get_fraction_denominator:
5392  * @value: a GValue initialized to #GST_TYPE_FRACTION
5393  *
5394  * Gets the denominator of the fraction specified by @value.
5395  *
5396  * Returns: the denominator of the fraction.
5397  */
5398 gint
5399 gst_value_get_fraction_denominator (const GValue * value)
5400 {
5401   g_return_val_if_fail (GST_VALUE_HOLDS_FRACTION (value), 1);
5402
5403   return value->data[1].v_int;
5404 }
5405
5406 /**
5407  * gst_value_fraction_multiply:
5408  * @product: a GValue initialized to #GST_TYPE_FRACTION
5409  * @factor1: a GValue initialized to #GST_TYPE_FRACTION
5410  * @factor2: a GValue initialized to #GST_TYPE_FRACTION
5411  *
5412  * Multiplies the two #GValue items containing a #GST_TYPE_FRACTION and sets
5413  * @product to the product of the two fractions.
5414  *
5415  * Returns: %FALSE in case of an error (like integer overflow), %TRUE otherwise.
5416  */
5417 gboolean
5418 gst_value_fraction_multiply (GValue * product, const GValue * factor1,
5419     const GValue * factor2)
5420 {
5421   gint n1, n2, d1, d2;
5422   gint res_n, res_d;
5423
5424   g_return_val_if_fail (product != NULL, FALSE);
5425   g_return_val_if_fail (GST_VALUE_HOLDS_FRACTION (factor1), FALSE);
5426   g_return_val_if_fail (GST_VALUE_HOLDS_FRACTION (factor2), FALSE);
5427
5428   n1 = factor1->data[0].v_int;
5429   n2 = factor2->data[0].v_int;
5430   d1 = factor1->data[1].v_int;
5431   d2 = factor2->data[1].v_int;
5432
5433   if (!gst_util_fraction_multiply (n1, d1, n2, d2, &res_n, &res_d))
5434     return FALSE;
5435
5436   gst_value_set_fraction (product, res_n, res_d);
5437
5438   return TRUE;
5439 }
5440
5441 /**
5442  * gst_value_fraction_subtract:
5443  * @dest: a GValue initialized to #GST_TYPE_FRACTION
5444  * @minuend: a GValue initialized to #GST_TYPE_FRACTION
5445  * @subtrahend: a GValue initialized to #GST_TYPE_FRACTION
5446  *
5447  * Subtracts the @subtrahend from the @minuend and sets @dest to the result.
5448  *
5449  * Returns: %FALSE in case of an error (like integer overflow), %TRUE otherwise.
5450  */
5451 gboolean
5452 gst_value_fraction_subtract (GValue * dest,
5453     const GValue * minuend, const GValue * subtrahend)
5454 {
5455   gint n1, n2, d1, d2;
5456   gint res_n, res_d;
5457
5458   g_return_val_if_fail (dest != NULL, FALSE);
5459   g_return_val_if_fail (GST_VALUE_HOLDS_FRACTION (minuend), FALSE);
5460   g_return_val_if_fail (GST_VALUE_HOLDS_FRACTION (subtrahend), FALSE);
5461
5462   n1 = minuend->data[0].v_int;
5463   n2 = subtrahend->data[0].v_int;
5464   d1 = minuend->data[1].v_int;
5465   d2 = subtrahend->data[1].v_int;
5466
5467   if (!gst_util_fraction_add (n1, d1, -n2, d2, &res_n, &res_d))
5468     return FALSE;
5469   gst_value_set_fraction (dest, res_n, res_d);
5470
5471   return TRUE;
5472 }
5473
5474 static gchar *
5475 gst_value_serialize_fraction (const GValue * value)
5476 {
5477   gint32 numerator = value->data[0].v_int;
5478   gint32 denominator = value->data[1].v_int;
5479   gboolean positive = TRUE;
5480
5481   /* get the sign and make components absolute */
5482   if (numerator < 0) {
5483     numerator = -numerator;
5484     positive = !positive;
5485   }
5486   if (denominator < 0) {
5487     denominator = -denominator;
5488     positive = !positive;
5489   }
5490
5491   return g_strdup_printf ("%s%d/%d",
5492       positive ? "" : "-", numerator, denominator);
5493 }
5494
5495 static gboolean
5496 gst_value_deserialize_fraction (GValue * dest, const gchar * s)
5497 {
5498   gint num, den;
5499   gint num_chars;
5500
5501   if (G_UNLIKELY (s == NULL))
5502     return FALSE;
5503
5504   if (G_UNLIKELY (dest == NULL || !GST_VALUE_HOLDS_FRACTION (dest)))
5505     return FALSE;
5506
5507   if (sscanf (s, "%d/%d%n", &num, &den, &num_chars) >= 2) {
5508     if (s[num_chars] != 0)
5509       return FALSE;
5510     if (den == 0)
5511       return FALSE;
5512
5513     gst_value_set_fraction (dest, num, den);
5514     return TRUE;
5515   } else if (g_ascii_strcasecmp (s, "1/max") == 0) {
5516     gst_value_set_fraction (dest, 1, G_MAXINT);
5517     return TRUE;
5518   } else if (sscanf (s, "%d%n", &num, &num_chars) >= 1) {
5519     if (s[num_chars] != 0)
5520       return FALSE;
5521     gst_value_set_fraction (dest, num, 1);
5522     return TRUE;
5523   } else if (g_ascii_strcasecmp (s, "min") == 0) {
5524     gst_value_set_fraction (dest, -G_MAXINT, 1);
5525     return TRUE;
5526   } else if (g_ascii_strcasecmp (s, "max") == 0) {
5527     gst_value_set_fraction (dest, G_MAXINT, 1);
5528     return TRUE;
5529   }
5530
5531   return FALSE;
5532 }
5533
5534 static void
5535 gst_value_transform_fraction_string (const GValue * src_value,
5536     GValue * dest_value)
5537 {
5538   dest_value->data[0].v_pointer = gst_value_serialize_fraction (src_value);
5539 }
5540
5541 static void
5542 gst_value_transform_string_fraction (const GValue * src_value,
5543     GValue * dest_value)
5544 {
5545   if (!gst_value_deserialize_fraction (dest_value,
5546           src_value->data[0].v_pointer))
5547     /* If the deserialize fails, ensure we leave the fraction in a
5548      * valid, if incorrect, state */
5549     gst_value_set_fraction (dest_value, 0, 1);
5550 }
5551
5552 static void
5553 gst_value_transform_double_fraction (const GValue * src_value,
5554     GValue * dest_value)
5555 {
5556   gdouble src = g_value_get_double (src_value);
5557   gint n, d;
5558
5559   gst_util_double_to_fraction (src, &n, &d);
5560   gst_value_set_fraction (dest_value, n, d);
5561 }
5562
5563 static void
5564 gst_value_transform_float_fraction (const GValue * src_value,
5565     GValue * dest_value)
5566 {
5567   gfloat src = g_value_get_float (src_value);
5568   gint n, d;
5569
5570   gst_util_double_to_fraction (src, &n, &d);
5571   gst_value_set_fraction (dest_value, n, d);
5572 }
5573
5574 static void
5575 gst_value_transform_fraction_double (const GValue * src_value,
5576     GValue * dest_value)
5577 {
5578   dest_value->data[0].v_double = ((double) src_value->data[0].v_int) /
5579       ((double) src_value->data[1].v_int);
5580 }
5581
5582 static void
5583 gst_value_transform_fraction_float (const GValue * src_value,
5584     GValue * dest_value)
5585 {
5586   dest_value->data[0].v_float = ((float) src_value->data[0].v_int) /
5587       ((float) src_value->data[1].v_int);
5588 }
5589
5590 static gint
5591 gst_value_compare_fraction (const GValue * value1, const GValue * value2)
5592 {
5593   gint n1, n2;
5594   gint d1, d2;
5595   gint ret;
5596
5597   n1 = value1->data[0].v_int;
5598   n2 = value2->data[0].v_int;
5599   d1 = value1->data[1].v_int;
5600   d2 = value2->data[1].v_int;
5601
5602   /* fractions are reduced when set, so we can quickly see if they're equal */
5603   if (n1 == n2 && d1 == d2)
5604     return GST_VALUE_EQUAL;
5605
5606   if (d1 == 0 && d2 == 0)
5607     return GST_VALUE_UNORDERED;
5608   else if (d1 == 0)
5609     return GST_VALUE_GREATER_THAN;
5610   else if (d2 == 0)
5611     return GST_VALUE_LESS_THAN;
5612
5613   ret = gst_util_fraction_compare (n1, d1, n2, d2);
5614   if (ret == -1)
5615     return GST_VALUE_LESS_THAN;
5616   else if (ret == 1)
5617     return GST_VALUE_GREATER_THAN;
5618
5619   /* Equality can't happen here because we check for that
5620    * first already */
5621   g_return_val_if_reached (GST_VALUE_UNORDERED);
5622 }
5623
5624 /*********
5625  * GDate *
5626  *********/
5627
5628 static gint
5629 gst_value_compare_date (const GValue * value1, const GValue * value2)
5630 {
5631   const GDate *date1 = (const GDate *) g_value_get_boxed (value1);
5632   const GDate *date2 = (const GDate *) g_value_get_boxed (value2);
5633   guint32 j1, j2;
5634
5635   if (date1 == date2)
5636     return GST_VALUE_EQUAL;
5637
5638   if ((date1 == NULL || !g_date_valid (date1))
5639       && (date2 != NULL && g_date_valid (date2))) {
5640     return GST_VALUE_LESS_THAN;
5641   }
5642
5643   if ((date2 == NULL || !g_date_valid (date2))
5644       && (date1 != NULL && g_date_valid (date1))) {
5645     return GST_VALUE_GREATER_THAN;
5646   }
5647
5648   if (date1 == NULL || date2 == NULL || !g_date_valid (date1)
5649       || !g_date_valid (date2)) {
5650     return GST_VALUE_UNORDERED;
5651   }
5652
5653   j1 = g_date_get_julian (date1);
5654   j2 = g_date_get_julian (date2);
5655
5656   if (j1 == j2)
5657     return GST_VALUE_EQUAL;
5658   else if (j1 < j2)
5659     return GST_VALUE_LESS_THAN;
5660   else
5661     return GST_VALUE_GREATER_THAN;
5662 }
5663
5664 static gchar *
5665 gst_value_serialize_date (const GValue * val)
5666 {
5667   const GDate *date = (const GDate *) g_value_get_boxed (val);
5668
5669   if (date == NULL || !g_date_valid (date))
5670     return g_strdup ("9999-99-99");
5671
5672   return g_strdup_printf ("%04u-%02u-%02u", g_date_get_year (date),
5673       g_date_get_month (date), g_date_get_day (date));
5674 }
5675
5676 static gboolean
5677 gst_value_deserialize_date (GValue * dest, const gchar * s)
5678 {
5679   guint year, month, day;
5680
5681   if (!s || sscanf (s, "%04u-%02u-%02u", &year, &month, &day) != 3)
5682     return FALSE;
5683
5684   if (!g_date_valid_dmy (day, month, year))
5685     return FALSE;
5686
5687   g_value_take_boxed (dest, g_date_new_dmy (day, month, year));
5688   return TRUE;
5689 }
5690
5691 /*************
5692  * GstDateTime *
5693  *************/
5694
5695 static gint
5696 gst_value_compare_date_time (const GValue * value1, const GValue * value2)
5697 {
5698   const GstDateTime *date1 = (const GstDateTime *) g_value_get_boxed (value1);
5699   const GstDateTime *date2 = (const GstDateTime *) g_value_get_boxed (value2);
5700
5701   if (date1 == date2)
5702     return GST_VALUE_EQUAL;
5703
5704   if ((date1 == NULL) && (date2 != NULL)) {
5705     return GST_VALUE_LESS_THAN;
5706   }
5707   if ((date2 == NULL) && (date1 != NULL)) {
5708     return GST_VALUE_LESS_THAN;
5709   }
5710
5711   /* returns GST_VALUE_* */
5712   return __gst_date_time_compare (date1, date2);
5713 }
5714
5715 static gchar *
5716 gst_value_serialize_date_time (const GValue * val)
5717 {
5718   GstDateTime *date = (GstDateTime *) g_value_get_boxed (val);
5719
5720   if (date == NULL)
5721     return g_strdup ("null");
5722
5723   return __gst_date_time_serialize (date, TRUE);
5724 }
5725
5726 static gboolean
5727 gst_value_deserialize_date_time (GValue * dest, const gchar * s)
5728 {
5729   GstDateTime *datetime;
5730
5731   if (!s || strcmp (s, "null") == 0) {
5732     return FALSE;
5733   }
5734
5735   datetime = gst_date_time_new_from_iso8601_string (s);
5736   if (datetime != NULL) {
5737     g_value_take_boxed (dest, datetime);
5738     return TRUE;
5739   }
5740   GST_WARNING ("Failed to deserialize date time string '%s'", s);
5741   return FALSE;
5742 }
5743
5744 static void
5745 gst_value_transform_date_string (const GValue * src_value, GValue * dest_value)
5746 {
5747   dest_value->data[0].v_pointer = gst_value_serialize_date (src_value);
5748 }
5749
5750 static void
5751 gst_value_transform_string_date (const GValue * src_value, GValue * dest_value)
5752 {
5753   gst_value_deserialize_date (dest_value, src_value->data[0].v_pointer);
5754 }
5755
5756
5757 /************
5758  * bitmask *
5759  ************/
5760
5761 /* helper functions */
5762 static void
5763 gst_value_init_bitmask (GValue * value)
5764 {
5765   value->data[0].v_uint64 = 0;
5766 }
5767
5768 static void
5769 gst_value_copy_bitmask (const GValue * src_value, GValue * dest_value)
5770 {
5771   dest_value->data[0].v_uint64 = src_value->data[0].v_uint64;
5772 }
5773
5774 static gchar *
5775 gst_value_collect_bitmask (GValue * value, guint n_collect_values,
5776     GTypeCValue * collect_values, guint collect_flags)
5777 {
5778   if (n_collect_values != 1)
5779     return g_strdup_printf ("not enough value locations for `%s' passed",
5780         G_VALUE_TYPE_NAME (value));
5781
5782   gst_value_set_bitmask (value, (guint64) collect_values[0].v_int64);
5783
5784   return NULL;
5785 }
5786
5787 static gchar *
5788 gst_value_lcopy_bitmask (const GValue * value, guint n_collect_values,
5789     GTypeCValue * collect_values, guint collect_flags)
5790 {
5791   guint64 *bitmask = collect_values[0].v_pointer;
5792
5793   if (!bitmask)
5794     return g_strdup_printf ("value for `%s' passed as NULL",
5795         G_VALUE_TYPE_NAME (value));
5796
5797   *bitmask = value->data[0].v_uint64;
5798
5799   return NULL;
5800 }
5801
5802 /**
5803  * gst_value_set_bitmask:
5804  * @value: a GValue initialized to #GST_TYPE_BITMASK
5805  * @bitmask: the bitmask
5806  *
5807  * Sets @value to the bitmask specified by @bitmask.
5808  */
5809 void
5810 gst_value_set_bitmask (GValue * value, guint64 bitmask)
5811 {
5812   g_return_if_fail (GST_VALUE_HOLDS_BITMASK (value));
5813
5814   value->data[0].v_uint64 = bitmask;
5815 }
5816
5817 /**
5818  * gst_value_get_bitmask:
5819  * @value: a GValue initialized to #GST_TYPE_BITMASK
5820  *
5821  * Gets the bitmask specified by @value.
5822  *
5823  * Returns: the bitmask.
5824  */
5825 guint64
5826 gst_value_get_bitmask (const GValue * value)
5827 {
5828   g_return_val_if_fail (GST_VALUE_HOLDS_BITMASK (value), 0);
5829
5830   return value->data[0].v_uint64;
5831 }
5832
5833 static gchar *
5834 gst_value_serialize_bitmask (const GValue * value)
5835 {
5836   guint64 bitmask = value->data[0].v_uint64;
5837
5838   return g_strdup_printf ("0x%016" G_GINT64_MODIFIER "x", bitmask);
5839 }
5840
5841 static gboolean
5842 gst_value_deserialize_bitmask (GValue * dest, const gchar * s)
5843 {
5844   gchar *endptr = NULL;
5845   guint64 val;
5846
5847   if (G_UNLIKELY (s == NULL))
5848     return FALSE;
5849
5850   if (G_UNLIKELY (dest == NULL || !GST_VALUE_HOLDS_BITMASK (dest)))
5851     return FALSE;
5852
5853   val = g_ascii_strtoull (s, &endptr, 16);
5854   if (val == G_MAXUINT64 && (errno == ERANGE || errno == EINVAL))
5855     return FALSE;
5856   if (val == 0 && endptr == s)
5857     return FALSE;
5858
5859   gst_value_set_bitmask (dest, val);
5860
5861   return TRUE;
5862 }
5863
5864 static void
5865 gst_value_transform_bitmask_string (const GValue * src_value,
5866     GValue * dest_value)
5867 {
5868   dest_value->data[0].v_pointer = gst_value_serialize_bitmask (src_value);
5869 }
5870
5871 static void
5872 gst_value_transform_string_bitmask (const GValue * src_value,
5873     GValue * dest_value)
5874 {
5875   if (!gst_value_deserialize_bitmask (dest_value, src_value->data[0].v_pointer))
5876     gst_value_set_bitmask (dest_value, 0);
5877 }
5878
5879 static void
5880 gst_value_transform_uint64_bitmask (const GValue * src_value,
5881     GValue * dest_value)
5882 {
5883   dest_value->data[0].v_uint64 = src_value->data[0].v_uint64;
5884 }
5885
5886 static void
5887 gst_value_transform_bitmask_uint64 (const GValue * src_value,
5888     GValue * dest_value)
5889 {
5890   dest_value->data[0].v_uint64 = src_value->data[0].v_uint64;
5891 }
5892
5893 static gint
5894 gst_value_compare_bitmask (const GValue * value1, const GValue * value2)
5895 {
5896   guint64 v1, v2;
5897
5898   v1 = value1->data[0].v_uint64;
5899   v2 = value2->data[0].v_uint64;
5900
5901   if (v1 == v2)
5902     return GST_VALUE_EQUAL;
5903
5904   return GST_VALUE_UNORDERED;
5905 }
5906
5907
5908 /***********************
5909  * GstAllocationParams *
5910  ***********************/
5911 static gint
5912 gst_value_compare_allocation_params (const GValue * value1,
5913     const GValue * value2)
5914 {
5915   GstAllocationParams *v1, *v2;
5916
5917   v1 = value1->data[0].v_pointer;
5918   v2 = value2->data[0].v_pointer;
5919
5920   if (v1 == NULL && v1 == v2)
5921     return GST_VALUE_EQUAL;
5922
5923   if (v1 == NULL || v2 == NULL)
5924     return GST_VALUE_UNORDERED;
5925
5926   if (v1->flags == v2->flags && v1->align == v2->align &&
5927       v1->prefix == v2->prefix && v1->padding == v2->padding)
5928     return GST_VALUE_EQUAL;
5929
5930   return GST_VALUE_UNORDERED;
5931 }
5932
5933
5934 /************
5935  * GObject *
5936  ************/
5937
5938 static gint
5939 gst_value_compare_object (const GValue * value1, const GValue * value2)
5940 {
5941   gpointer v1, v2;
5942
5943   v1 = value1->data[0].v_pointer;
5944   v2 = value2->data[0].v_pointer;
5945
5946   if (v1 == v2)
5947     return GST_VALUE_EQUAL;
5948
5949   return GST_VALUE_UNORDERED;
5950 }
5951
5952 static void
5953 gst_value_transform_object_string (const GValue * src_value,
5954     GValue * dest_value)
5955 {
5956   GstObject *obj;
5957   gchar *str;
5958
5959   obj = g_value_get_object (src_value);
5960   if (obj) {
5961     str =
5962         g_strdup_printf ("(%s) %s", G_OBJECT_TYPE_NAME (obj),
5963         GST_OBJECT_NAME (obj));
5964   } else {
5965     str = g_strdup ("NULL");
5966   }
5967
5968   dest_value->data[0].v_pointer = str;
5969 }
5970
5971 static GTypeInfo _info = {
5972   0,
5973   NULL,
5974   NULL,
5975   NULL,
5976   NULL,
5977   NULL,
5978   0,
5979   0,
5980   NULL,
5981   NULL,
5982 };
5983
5984 static GTypeFundamentalInfo _finfo = {
5985   0
5986 };
5987
5988 #define FUNC_VALUE_GET_TYPE(type, name)                         \
5989 GType _gst_ ## type ## _type = 0;                               \
5990                                                                 \
5991 GType gst_ ## type ## _get_type (void)                          \
5992 {                                                               \
5993   static volatile GType gst_ ## type ## _type = 0;              \
5994                                                                 \
5995   if (g_once_init_enter (&gst_ ## type ## _type)) {             \
5996     GType _type;                                                \
5997     _info.value_table = & _gst_ ## type ## _value_table;        \
5998     _type = g_type_register_fundamental (                       \
5999         g_type_fundamental_next (),                             \
6000         name, &_info, &_finfo, 0);                              \
6001     _gst_ ## type ## _type = _type;                              \
6002     g_once_init_leave(&gst_ ## type ## _type, _type);           \
6003   }                                                             \
6004                                                                 \
6005   return gst_ ## type ## _type;                                 \
6006 }
6007
6008 static const GTypeValueTable _gst_int_range_value_table = {
6009   gst_value_init_int_range,
6010   NULL,
6011   gst_value_copy_int_range,
6012   NULL,
6013   (char *) "ii",
6014   gst_value_collect_int_range,
6015   (char *) "pp",
6016   gst_value_lcopy_int_range
6017 };
6018
6019 FUNC_VALUE_GET_TYPE (int_range, "GstIntRange");
6020
6021 static const GTypeValueTable _gst_int64_range_value_table = {
6022   gst_value_init_int64_range,
6023   gst_value_free_int64_range,
6024   gst_value_copy_int64_range,
6025   NULL,
6026   (char *) "qq",
6027   gst_value_collect_int64_range,
6028   (char *) "pp",
6029   gst_value_lcopy_int64_range
6030 };
6031
6032 FUNC_VALUE_GET_TYPE (int64_range, "GstInt64Range");
6033
6034 static const GTypeValueTable _gst_double_range_value_table = {
6035   gst_value_init_double_range,
6036   NULL,
6037   gst_value_copy_double_range,
6038   NULL,
6039   (char *) "dd",
6040   gst_value_collect_double_range,
6041   (char *) "pp",
6042   gst_value_lcopy_double_range
6043 };
6044
6045 FUNC_VALUE_GET_TYPE (double_range, "GstDoubleRange");
6046
6047 static const GTypeValueTable _gst_fraction_range_value_table = {
6048   gst_value_init_fraction_range,
6049   gst_value_free_fraction_range,
6050   gst_value_copy_fraction_range,
6051   NULL,
6052   (char *) "iiii",
6053   gst_value_collect_fraction_range,
6054   (char *) "pppp",
6055   gst_value_lcopy_fraction_range
6056 };
6057
6058 FUNC_VALUE_GET_TYPE (fraction_range, "GstFractionRange");
6059
6060 static const GTypeValueTable _gst_value_list_value_table = {
6061   gst_value_init_list_or_array,
6062   gst_value_free_list_or_array,
6063   gst_value_copy_list_or_array,
6064   gst_value_list_or_array_peek_pointer,
6065   (char *) "p",
6066   gst_value_collect_list_or_array,
6067   (char *) "p",
6068   gst_value_lcopy_list_or_array
6069 };
6070
6071 FUNC_VALUE_GET_TYPE (value_list, "GstValueList");
6072
6073 static const GTypeValueTable _gst_value_array_value_table = {
6074   gst_value_init_list_or_array,
6075   gst_value_free_list_or_array,
6076   gst_value_copy_list_or_array,
6077   gst_value_list_or_array_peek_pointer,
6078   (char *) "p",
6079   gst_value_collect_list_or_array,
6080   (char *) "p",
6081   gst_value_lcopy_list_or_array
6082 };
6083
6084 FUNC_VALUE_GET_TYPE (value_array, "GstValueArray");
6085
6086 static const GTypeValueTable _gst_fraction_value_table = {
6087   gst_value_init_fraction,
6088   NULL,
6089   gst_value_copy_fraction,
6090   NULL,
6091   (char *) "ii",
6092   gst_value_collect_fraction,
6093   (char *) "pp",
6094   gst_value_lcopy_fraction
6095 };
6096
6097 FUNC_VALUE_GET_TYPE (fraction, "GstFraction");
6098
6099 static const GTypeValueTable _gst_bitmask_value_table = {
6100   gst_value_init_bitmask,
6101   NULL,
6102   gst_value_copy_bitmask,
6103   NULL,
6104   (char *) "q",
6105   gst_value_collect_bitmask,
6106   (char *) "p",
6107   gst_value_lcopy_bitmask
6108 };
6109
6110 FUNC_VALUE_GET_TYPE (bitmask, "GstBitmask");
6111
6112 GType
6113 gst_g_thread_get_type (void)
6114 {
6115 #if GLIB_CHECK_VERSION(2,35,3)
6116   return G_TYPE_THREAD;
6117 #else
6118   static volatile gsize type_id = 0;
6119
6120   if (g_once_init_enter (&type_id)) {
6121     GType tmp =
6122         g_boxed_type_register_static (g_intern_static_string ("GstGThread"),
6123         (GBoxedCopyFunc) g_thread_ref,
6124         (GBoxedFreeFunc) g_thread_unref);
6125     g_once_init_leave (&type_id, tmp);
6126   }
6127
6128   return type_id;
6129 #endif
6130 }
6131
6132 void
6133 _priv_gst_value_initialize (void)
6134 {
6135   gst_value_table = g_array_new (FALSE, FALSE, sizeof (GstValueTable));
6136   gst_value_hash = g_hash_table_new (NULL, NULL);
6137   gst_value_union_funcs = g_array_new (FALSE, FALSE,
6138       sizeof (GstValueUnionInfo));
6139   gst_value_intersect_funcs = g_array_new (FALSE, FALSE,
6140       sizeof (GstValueIntersectInfo));
6141   gst_value_subtract_funcs = g_array_new (FALSE, FALSE,
6142       sizeof (GstValueSubtractInfo));
6143
6144   {
6145     static GstValueTable gst_value = {
6146       0,
6147       gst_value_compare_int_range,
6148       gst_value_serialize_int_range,
6149       gst_value_deserialize_int_range,
6150     };
6151
6152     gst_value.type = gst_int_range_get_type ();
6153     gst_value_register (&gst_value);
6154   }
6155
6156   {
6157     static GstValueTable gst_value = {
6158       0,
6159       gst_value_compare_int64_range,
6160       gst_value_serialize_int64_range,
6161       gst_value_deserialize_int64_range,
6162     };
6163
6164     gst_value.type = gst_int64_range_get_type ();
6165     gst_value_register (&gst_value);
6166   }
6167
6168   {
6169     static GstValueTable gst_value = {
6170       0,
6171       gst_value_compare_double_range,
6172       gst_value_serialize_double_range,
6173       gst_value_deserialize_double_range,
6174     };
6175
6176     gst_value.type = gst_double_range_get_type ();
6177     gst_value_register (&gst_value);
6178   }
6179
6180   {
6181     static GstValueTable gst_value = {
6182       0,
6183       gst_value_compare_fraction_range,
6184       gst_value_serialize_fraction_range,
6185       gst_value_deserialize_fraction_range,
6186     };
6187
6188     gst_value.type = gst_fraction_range_get_type ();
6189     gst_value_register (&gst_value);
6190   }
6191
6192   {
6193     static GstValueTable gst_value = {
6194       0,
6195       gst_value_compare_list,
6196       gst_value_serialize_list,
6197       gst_value_deserialize_list,
6198     };
6199
6200     gst_value.type = gst_value_list_get_type ();
6201     gst_value_register (&gst_value);
6202   }
6203
6204   {
6205     static GstValueTable gst_value = {
6206       0,
6207       gst_value_compare_array,
6208       gst_value_serialize_array,
6209       gst_value_deserialize_array,
6210     };
6211
6212     gst_value.type = gst_value_array_get_type ();
6213     gst_value_register (&gst_value);
6214   }
6215
6216   {
6217 #if 0
6218     static const GTypeValueTable value_table = {
6219       gst_value_init_buffer,
6220       NULL,
6221       gst_value_copy_buffer,
6222       NULL,
6223       "i",
6224       NULL,                     /*gst_value_collect_buffer, */
6225       "p",
6226       NULL                      /*gst_value_lcopy_buffer */
6227     };
6228 #endif
6229     static GstValueTable gst_value = {
6230       0,
6231       gst_value_compare_buffer,
6232       gst_value_serialize_buffer,
6233       gst_value_deserialize_buffer,
6234     };
6235
6236     gst_value.type = GST_TYPE_BUFFER;
6237     gst_value_register (&gst_value);
6238   }
6239   {
6240     static GstValueTable gst_value = {
6241       0,
6242       gst_value_compare_sample,
6243       gst_value_serialize_sample,
6244       gst_value_deserialize_sample,
6245     };
6246
6247     gst_value.type = GST_TYPE_SAMPLE;
6248     gst_value_register (&gst_value);
6249   }
6250   {
6251     static GstValueTable gst_value = {
6252       0,
6253       gst_value_compare_fraction,
6254       gst_value_serialize_fraction,
6255       gst_value_deserialize_fraction,
6256     };
6257
6258     gst_value.type = gst_fraction_get_type ();
6259     gst_value_register (&gst_value);
6260   }
6261   {
6262     static GstValueTable gst_value = {
6263       0,
6264       gst_value_compare_caps,
6265       gst_value_serialize_caps,
6266       gst_value_deserialize_caps,
6267     };
6268
6269     gst_value.type = GST_TYPE_CAPS;
6270     gst_value_register (&gst_value);
6271   }
6272   {
6273     static GstValueTable gst_value = {
6274       0,
6275       NULL,
6276       gst_value_serialize_segment,
6277       gst_value_deserialize_segment,
6278     };
6279
6280     gst_value.type = GST_TYPE_SEGMENT;
6281     gst_value_register (&gst_value);
6282   }
6283   {
6284     static GstValueTable gst_value = {
6285       0,
6286       NULL,
6287       gst_value_serialize_structure,
6288       gst_value_deserialize_structure,
6289     };
6290
6291     gst_value.type = GST_TYPE_STRUCTURE;
6292     gst_value_register (&gst_value);
6293   }
6294   {
6295     static GstValueTable gst_value = {
6296       0,
6297       NULL,
6298       gst_value_serialize_caps_features,
6299       gst_value_deserialize_caps_features,
6300     };
6301
6302     gst_value.type = GST_TYPE_CAPS_FEATURES;
6303     gst_value_register (&gst_value);
6304   }
6305   {
6306     static GstValueTable gst_value = {
6307       0,
6308       gst_value_compare_tag_list,
6309       gst_value_serialize_tag_list,
6310       gst_value_deserialize_tag_list,
6311     };
6312
6313     gst_value.type = GST_TYPE_TAG_LIST;
6314     gst_value_register (&gst_value);
6315   }
6316   {
6317     static GstValueTable gst_value = {
6318       0,
6319       gst_value_compare_date,
6320       gst_value_serialize_date,
6321       gst_value_deserialize_date,
6322     };
6323
6324     gst_value.type = G_TYPE_DATE;
6325     gst_value_register (&gst_value);
6326   }
6327   {
6328     static GstValueTable gst_value = {
6329       0,
6330       gst_value_compare_date_time,
6331       gst_value_serialize_date_time,
6332       gst_value_deserialize_date_time,
6333     };
6334
6335     gst_value.type = gst_date_time_get_type ();
6336     gst_value_register (&gst_value);
6337   }
6338
6339   {
6340     static GstValueTable gst_value = {
6341       0,
6342       gst_value_compare_bitmask,
6343       gst_value_serialize_bitmask,
6344       gst_value_deserialize_bitmask,
6345     };
6346
6347     gst_value.type = gst_bitmask_get_type ();
6348     gst_value_register (&gst_value);
6349   }
6350
6351   {
6352     static GstValueTable gst_value = {
6353       0,
6354       gst_value_compare_allocation_params,
6355       NULL,
6356       NULL,
6357     };
6358
6359     gst_value.type = gst_allocation_params_get_type ();
6360     gst_value_register (&gst_value);
6361   }
6362
6363   {
6364     static GstValueTable gst_value = {
6365       0,
6366       gst_value_compare_object,
6367       NULL,
6368       NULL,
6369     };
6370
6371     gst_value.type = G_TYPE_OBJECT;
6372     gst_value_register (&gst_value);
6373   }
6374
6375   REGISTER_SERIALIZATION (G_TYPE_DOUBLE, double);
6376   REGISTER_SERIALIZATION (G_TYPE_FLOAT, float);
6377
6378   REGISTER_SERIALIZATION (G_TYPE_STRING, string);
6379   REGISTER_SERIALIZATION (G_TYPE_BOOLEAN, boolean);
6380   REGISTER_SERIALIZATION (G_TYPE_ENUM, enum);
6381
6382   REGISTER_SERIALIZATION (G_TYPE_FLAGS, flags);
6383
6384   REGISTER_SERIALIZATION (G_TYPE_INT, int);
6385
6386   REGISTER_SERIALIZATION (G_TYPE_INT64, int64);
6387   REGISTER_SERIALIZATION (G_TYPE_LONG, long);
6388
6389   REGISTER_SERIALIZATION (G_TYPE_UINT, uint);
6390   REGISTER_SERIALIZATION (G_TYPE_UINT64, uint64);
6391   REGISTER_SERIALIZATION (G_TYPE_ULONG, ulong);
6392
6393   REGISTER_SERIALIZATION (G_TYPE_UCHAR, uchar);
6394
6395   g_value_register_transform_func (GST_TYPE_INT_RANGE, G_TYPE_STRING,
6396       gst_value_transform_int_range_string);
6397   g_value_register_transform_func (GST_TYPE_INT64_RANGE, G_TYPE_STRING,
6398       gst_value_transform_int64_range_string);
6399   g_value_register_transform_func (GST_TYPE_DOUBLE_RANGE, G_TYPE_STRING,
6400       gst_value_transform_double_range_string);
6401   g_value_register_transform_func (GST_TYPE_FRACTION_RANGE, G_TYPE_STRING,
6402       gst_value_transform_fraction_range_string);
6403   g_value_register_transform_func (GST_TYPE_LIST, G_TYPE_STRING,
6404       gst_value_transform_list_string);
6405   g_value_register_transform_func (GST_TYPE_ARRAY, G_TYPE_STRING,
6406       gst_value_transform_array_string);
6407   g_value_register_transform_func (GST_TYPE_FRACTION, G_TYPE_STRING,
6408       gst_value_transform_fraction_string);
6409   g_value_register_transform_func (G_TYPE_STRING, GST_TYPE_FRACTION,
6410       gst_value_transform_string_fraction);
6411   g_value_register_transform_func (GST_TYPE_FRACTION, G_TYPE_DOUBLE,
6412       gst_value_transform_fraction_double);
6413   g_value_register_transform_func (GST_TYPE_FRACTION, G_TYPE_FLOAT,
6414       gst_value_transform_fraction_float);
6415   g_value_register_transform_func (G_TYPE_DOUBLE, GST_TYPE_FRACTION,
6416       gst_value_transform_double_fraction);
6417   g_value_register_transform_func (G_TYPE_FLOAT, GST_TYPE_FRACTION,
6418       gst_value_transform_float_fraction);
6419   g_value_register_transform_func (G_TYPE_DATE, G_TYPE_STRING,
6420       gst_value_transform_date_string);
6421   g_value_register_transform_func (G_TYPE_STRING, G_TYPE_DATE,
6422       gst_value_transform_string_date);
6423   g_value_register_transform_func (GST_TYPE_OBJECT, G_TYPE_STRING,
6424       gst_value_transform_object_string);
6425   g_value_register_transform_func (GST_TYPE_BITMASK, G_TYPE_UINT64,
6426       gst_value_transform_bitmask_uint64);
6427   g_value_register_transform_func (GST_TYPE_BITMASK, G_TYPE_STRING,
6428       gst_value_transform_bitmask_string);
6429   g_value_register_transform_func (G_TYPE_UINT64, GST_TYPE_BITMASK,
6430       gst_value_transform_uint64_bitmask);
6431   g_value_register_transform_func (G_TYPE_STRING, GST_TYPE_BITMASK,
6432       gst_value_transform_string_bitmask);
6433
6434   gst_value_register_intersect_func (G_TYPE_INT, GST_TYPE_INT_RANGE,
6435       gst_value_intersect_int_int_range);
6436   gst_value_register_intersect_func (GST_TYPE_INT_RANGE, GST_TYPE_INT_RANGE,
6437       gst_value_intersect_int_range_int_range);
6438   gst_value_register_intersect_func (G_TYPE_INT64, GST_TYPE_INT64_RANGE,
6439       gst_value_intersect_int64_int64_range);
6440   gst_value_register_intersect_func (GST_TYPE_INT64_RANGE, GST_TYPE_INT64_RANGE,
6441       gst_value_intersect_int64_range_int64_range);
6442   gst_value_register_intersect_func (G_TYPE_DOUBLE, GST_TYPE_DOUBLE_RANGE,
6443       gst_value_intersect_double_double_range);
6444   gst_value_register_intersect_func (GST_TYPE_DOUBLE_RANGE,
6445       GST_TYPE_DOUBLE_RANGE, gst_value_intersect_double_range_double_range);
6446   gst_value_register_intersect_func (GST_TYPE_ARRAY,
6447       GST_TYPE_ARRAY, gst_value_intersect_array);
6448   gst_value_register_intersect_func (GST_TYPE_FRACTION, GST_TYPE_FRACTION_RANGE,
6449       gst_value_intersect_fraction_fraction_range);
6450   gst_value_register_intersect_func (GST_TYPE_FRACTION_RANGE,
6451       GST_TYPE_FRACTION_RANGE,
6452       gst_value_intersect_fraction_range_fraction_range);
6453
6454   gst_value_register_subtract_func (G_TYPE_INT, GST_TYPE_INT_RANGE,
6455       gst_value_subtract_int_int_range);
6456   gst_value_register_subtract_func (GST_TYPE_INT_RANGE, G_TYPE_INT,
6457       gst_value_subtract_int_range_int);
6458   gst_value_register_subtract_func (GST_TYPE_INT_RANGE, GST_TYPE_INT_RANGE,
6459       gst_value_subtract_int_range_int_range);
6460   gst_value_register_subtract_func (G_TYPE_INT64, GST_TYPE_INT64_RANGE,
6461       gst_value_subtract_int64_int64_range);
6462   gst_value_register_subtract_func (GST_TYPE_INT64_RANGE, G_TYPE_INT64,
6463       gst_value_subtract_int64_range_int64);
6464   gst_value_register_subtract_func (GST_TYPE_INT64_RANGE, GST_TYPE_INT64_RANGE,
6465       gst_value_subtract_int64_range_int64_range);
6466   gst_value_register_subtract_func (G_TYPE_DOUBLE, GST_TYPE_DOUBLE_RANGE,
6467       gst_value_subtract_double_double_range);
6468   gst_value_register_subtract_func (GST_TYPE_DOUBLE_RANGE, G_TYPE_DOUBLE,
6469       gst_value_subtract_double_range_double);
6470   gst_value_register_subtract_func (GST_TYPE_DOUBLE_RANGE,
6471       GST_TYPE_DOUBLE_RANGE, gst_value_subtract_double_range_double_range);
6472   gst_value_register_subtract_func (GST_TYPE_FRACTION, GST_TYPE_FRACTION_RANGE,
6473       gst_value_subtract_fraction_fraction_range);
6474   gst_value_register_subtract_func (GST_TYPE_FRACTION_RANGE, GST_TYPE_FRACTION,
6475       gst_value_subtract_fraction_range_fraction);
6476   gst_value_register_subtract_func (GST_TYPE_FRACTION_RANGE,
6477       GST_TYPE_FRACTION_RANGE,
6478       gst_value_subtract_fraction_range_fraction_range);
6479
6480   /* see bug #317246, #64994, #65041 */
6481   {
6482     volatile GType date_type = G_TYPE_DATE;
6483
6484     g_type_name (date_type);
6485   }
6486
6487   gst_value_register_union_func (G_TYPE_INT, GST_TYPE_INT_RANGE,
6488       gst_value_union_int_int_range);
6489   gst_value_register_union_func (GST_TYPE_INT_RANGE, GST_TYPE_INT_RANGE,
6490       gst_value_union_int_range_int_range);
6491
6492 #if 0
6493   /* Implement these if needed */
6494   gst_value_register_union_func (GST_TYPE_FRACTION, GST_TYPE_FRACTION_RANGE,
6495       gst_value_union_fraction_fraction_range);
6496   gst_value_register_union_func (GST_TYPE_FRACTION_RANGE,
6497       GST_TYPE_FRACTION_RANGE, gst_value_union_fraction_range_fraction_range);
6498 #endif
6499 }