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