tests/check/gst/gstmessage.c - imx-gstreamer - Git at Google

 /* GStreamer
  *
  * unit test for GstMessage
  *
  * Copyright (C) <2005> Wim Taymans <wim at fluendo dot com>
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Library General Public
  * License as published by the Free Software Foundation; either
  * version 2 of the License, or (at your option) any later version.
  *
  * This library is distributed in the hope that it will be useful,
  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  * Library General Public License for more details.
  *
  * You should have received a copy of the GNU Library General Public
  * License along with this library; if not, write to the
  * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
  * Boston, MA 02110-1301, USA.
  */
 #ifdef HAVE_CONFIG_H
 #include "config.h"
 #endif

 #include <gst/check/gstcheck.h>

 static GQuark domain;

 GST_START_TEST (test_parsing)
 {
   GstMessage *message;

   domain = g_quark_from_static_string ("test");

   /* GST_MESSAGE_EOS */
   {
     GstStructure *s;

     message = gst_message_new_eos (NULL);
     fail_if (message == NULL);
     fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_EOS);
     fail_unless (GST_MESSAGE_SRC (message) == NULL);

     /* Add an extra field */
     s = gst_message_writable_structure (message);
     fail_if (s == NULL);
     gst_structure_set (s, "eos-extra-field", G_TYPE_BOOLEAN, TRUE, NULL);

     gst_message_unref (message);
   }
   /* GST_MESSAGE_ERROR */
   {
     GError *error = NULL;
     gchar *debug;

     error = g_error_new (domain, 10, "test error");
     fail_if (error == NULL);
     message = gst_message_new_error (NULL, error, "error string");
     fail_if (message == NULL);
     fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_ERROR);
     fail_unless (GST_MESSAGE_SRC (message) == NULL);

     g_error_free (error);
     error = NULL;
     debug = NULL;

     gst_message_parse_error (message, NULL, NULL);

     gst_message_parse_error (message, &error, &debug);
     fail_if (error == NULL);
     fail_if (debug == NULL);
     fail_unless (strcmp (error->message, "test error") == 0);
     fail_unless (error->domain == domain);
     fail_unless (error->code == 10);
     fail_unless (strcmp (debug, "error string") == 0);

     gst_message_unref (message);
     g_error_free (error);
     g_free (debug);
   }
   /* GST_MESSAGE_ERROR with details */
   {
     GError *error = NULL;
     gchar *debug;
     GstStructure *d;
     const GstStructure *dc;

     error = g_error_new (domain, 10, "test error");
     fail_if (error == NULL);
     d = gst_structure_new ("title", "test-field", G_TYPE_STRING,
         "test-contents", NULL);
     message =
         gst_message_new_error_with_details (NULL, error, "error string", d);
     fail_if (message == NULL);
     fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_ERROR);
     fail_unless (GST_MESSAGE_SRC (message) == NULL);

     g_error_free (error);
     error = NULL;
     debug = NULL;

     gst_message_parse_error (message, NULL, NULL);

     gst_message_parse_error (message, &error, &debug);
     fail_if (error == NULL);
     fail_if (debug == NULL);
     fail_unless (strcmp (error->message, "test error") == 0);
     fail_unless (error->domain == domain);
     fail_unless (error->code == 10);
     fail_unless (strcmp (debug, "error string") == 0);
     gst_message_parse_error_details (message, &dc);
     fail_unless (dc != NULL);
     fail_unless (gst_structure_has_field_typed (dc, "test-field",
             G_TYPE_STRING));
     fail_unless (gst_structure_get_string (dc, "test-field"), "test-contents");

     gst_message_unref (message);
     g_error_free (error);
     g_free (debug);
   }
   /* GST_MESSAGE_WARNING   */
   {
     GError *warning = NULL;
     gchar *debug;

     warning = g_error_new (domain, 10, "test warning");
     fail_if (warning == NULL);
     message = gst_message_new_warning (NULL, warning, "warning string");
     fail_if (message == NULL);
     fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_WARNING);
     fail_unless (GST_MESSAGE_SRC (message) == NULL);

     g_error_free (warning);
     warning = NULL;
     debug = NULL;

     gst_message_parse_warning (message, NULL, NULL);

     gst_message_parse_warning (message, &warning, &debug);
     fail_if (warning == NULL);
     fail_if (debug == NULL);
     fail_unless (strcmp (warning->message, "test warning") == 0);
     fail_unless (warning->domain == domain);
     fail_unless (warning->code == 10);
     fail_unless (strcmp (debug, "warning string") == 0);

     gst_message_unref (message);
     g_error_free (warning);
     g_free (debug);
   }
   /* GST_MESSAGE_INFO   */
   {
     GError *info = NULL;
     gchar *debug;

     info = g_error_new (domain, 10, "test info");
     fail_if (info == NULL);
     message = gst_message_new_info (NULL, info, "info string");
     fail_if (message == NULL);
     fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_INFO);
     fail_unless (GST_MESSAGE_SRC (message) == NULL);

     g_error_free (info);
     info = NULL;
     debug = NULL;

     gst_message_parse_info (message, NULL, NULL);

     gst_message_parse_info (message, &info, &debug);
     fail_if (info == NULL);
     fail_if (debug == NULL);
     fail_unless (strcmp (info->message, "test info") == 0);
     fail_unless (info->domain == domain);
     fail_unless (info->code == 10);
     fail_unless (strcmp (debug, "info string") == 0);

     gst_message_unref (message);
     g_error_free (info);
     g_free (debug);
   }
   /* GST_MESSAGE_TAG  */
   {
     GstTagList *tag;

     /* FIXME, do some more tag adding */
     tag = gst_tag_list_new_empty ();
     fail_if (tag == NULL);
     message = gst_message_new_tag (NULL, tag);
     fail_if (message == NULL);
     fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_TAG);
     fail_unless (GST_MESSAGE_SRC (message) == NULL);
     tag = NULL;
     gst_message_parse_tag (message, &tag);
     fail_if (tag == NULL);
     /* FIXME, check the actual tags */
     gst_message_unref (message);
     gst_tag_list_unref (tag);
   }
   /* GST_MESSAGE_BUFFERING   */
   {
   }
   /* GST_MESSAGE_STATE_CHANGED   */
   {
     GstState oldstate, newstate, pending;

     oldstate = GST_STATE_PAUSED;
     newstate = GST_STATE_PLAYING;
     pending = GST_STATE_VOID_PENDING;

     message = gst_message_new_state_changed (NULL, oldstate, newstate, pending);
     fail_if (message == NULL);
     fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_STATE_CHANGED);
     fail_unless (GST_MESSAGE_SRC (message) == NULL);

     /* set some wrong values to check if the parse method overwrites them
      * with the good values */
     oldstate = GST_STATE_READY;
     newstate = GST_STATE_READY;
     pending = GST_STATE_READY;
     gst_message_parse_state_changed (message, &oldstate, &newstate, &pending);
     fail_unless (oldstate == GST_STATE_PAUSED);
     fail_unless (newstate == GST_STATE_PLAYING);
     fail_unless (pending == GST_STATE_VOID_PENDING);

     gst_message_unref (message);
   }
   /* GST_MESSAGE_STEP_DONE   */
   {
   }
   /* GST_MESSAGE_NEW_CLOCK  */
   {
   }
   /* GST_MESSAGE_STRUCTURE_CHANGE  */
   {
   }
   /* GST_MESSAGE_STREAM_STATUS  */
   {
   }
   /* GST_MESSAGE_APPLICATION */
   {
     GstStructure *structure;
     const GstStructure *struc;
     gint some_int;
     gdouble a_double;

     structure = gst_structure_new ("test_struct",
         "some_int", G_TYPE_INT, 10,
         "a_double", G_TYPE_DOUBLE, (gdouble) 1.8, NULL);
     fail_if (structure == NULL);
     message = gst_message_new_application (NULL, structure);
     fail_if (message == NULL);
     struc = gst_message_get_structure (message);
     fail_if (struc == NULL);
     fail_unless (gst_structure_get_int (struc, "some_int", &some_int));
     fail_unless (gst_structure_get_double (struc, "a_double", &a_double));
     fail_unless (some_int == 10);
     fail_unless (a_double == 1.8);

     gst_message_unref (message);
   }

   /*
      void            gst_message_parse_tag           (GstMessage *message, GstTagList **tag_list);
      void            gst_message_parse_state_changed (GstMessage *message, GstState *old_state,
      GstState *new_state);
      void            gst_message_parse_error         (GstMessage *message, GError **gerror, gchar **debug);
      void            gst_message_parse_warning       (GstMessage *message, GError **gerror, gchar **debug);
    */

   /* GST_MESSAGE_STREAM_STATUS   */
   {
     GstStreamStatusType type;
     GstTask *task, *task2;
     GValue value = { 0 };
     const GValue *val;

     message =
         gst_message_new_stream_status (NULL, GST_STREAM_STATUS_TYPE_ENTER,
         NULL);
     fail_if (message == NULL);
     fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_STREAM_STATUS);
     fail_unless (GST_MESSAGE_SRC (message) == NULL);

     /* set some wrong values to check if the parse method overwrites them
      * with the good values */
     type = GST_STREAM_STATUS_TYPE_START;
     gst_message_parse_stream_status (message, &type, NULL);
     fail_unless (type == GST_STREAM_STATUS_TYPE_ENTER);

     /* create a task with some dummy function, we're not actually going to run
      * the task here */
     task = gst_task_new ((GstTaskFunction) gst_object_unref, NULL, NULL);

     ASSERT_OBJECT_REFCOUNT (task, "task", 1);

     /* set the task */
     g_value_init (&value, GST_TYPE_TASK);
     g_value_set_object (&value, task);

     ASSERT_OBJECT_REFCOUNT (task, "task", 2);

     gst_message_set_stream_status_object (message, &value);
     ASSERT_OBJECT_REFCOUNT (task, "task", 3);
     g_value_unset (&value);
     ASSERT_OBJECT_REFCOUNT (task, "task", 2);
     gst_object_unref (task);
     ASSERT_OBJECT_REFCOUNT (task, "task", 1);

     /* get the object back, no refcount is changed */
     val = gst_message_get_stream_status_object (message);
     ASSERT_OBJECT_REFCOUNT (task, "task", 1);

     task2 = g_value_get_object (val);

     fail_unless (GST_IS_TASK (task2));
     fail_unless (task2 == task);

     ASSERT_OBJECT_REFCOUNT (task, "task", 1);
     ASSERT_OBJECT_REFCOUNT (task2, "task", 1);

     gst_message_unref (message);
   }

   /* GST_MESSAGE_REQUEST_STATE   */
   {
     GstState state;

     state = GST_STATE_PAUSED;

     message = gst_message_new_request_state (NULL, state);
     fail_if (message == NULL);
     fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_REQUEST_STATE);
     fail_unless (GST_MESSAGE_SRC (message) == NULL);

     /* set some wrong values to check if the parse method overwrites them
      * with the good values */
     state = GST_STATE_READY;
     gst_message_parse_request_state (message, &state);
     fail_unless (state == GST_STATE_PAUSED);

     gst_message_unref (message);
   }
   /* GST_MESSAGE_QOS   */
   {
     gboolean live;
     GstClockTime running_time;
     GstClockTime stream_time;
     GstClockTime timestamp, duration;
     gint64 jitter;
     gdouble proportion;
     gint quality;
     GstFormat format;
     guint64 processed;
     guint64 dropped;

     running_time = 1 * GST_SECOND;
     stream_time = 2 * GST_SECOND;
     timestamp = 3 * GST_SECOND;
     duration = 4 * GST_SECOND;

     message =
         gst_message_new_qos (NULL, TRUE, running_time, stream_time, timestamp,
         duration);
     fail_if (message == NULL);
     fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_QOS);
     fail_unless (GST_MESSAGE_SRC (message) == NULL);

     /* check defaults */
     gst_message_parse_qos_values (message, &jitter, &proportion, &quality);
     fail_unless (jitter == 0);
     fail_unless (proportion == 1.0);
     fail_unless (quality == 1000000);

     gst_message_parse_qos_stats (message, &format, &processed, &dropped);
     fail_unless (format == GST_FORMAT_UNDEFINED);
     fail_unless (processed == -1);
     fail_unless (dropped == -1);

     /* set some wrong values to check if the parse method overwrites them
      * with the good values */
     running_time = stream_time = timestamp = duration = 5 * GST_SECOND;
     live = FALSE;
     gst_message_parse_qos (message, &live, &running_time, &stream_time,
         &timestamp, &duration);
     fail_unless (live == TRUE);
     fail_unless (running_time == 1 * GST_SECOND);
     fail_unless (stream_time == 2 * GST_SECOND);
     fail_unless (timestamp == 3 * GST_SECOND);
     fail_unless (duration == 4 * GST_SECOND);

     /* change some values */
     gst_message_set_qos_values (message, -10, 2.0, 5000);
     gst_message_parse_qos_values (message, &jitter, &proportion, &quality);
     fail_unless (jitter == -10);
     fail_unless (proportion == 2.0);
     fail_unless (quality == 5000);

     gst_message_set_qos_stats (message, GST_FORMAT_DEFAULT, 1030, 65);
     gst_message_parse_qos_stats (message, &format, &processed, &dropped);
     fail_unless (format == GST_FORMAT_DEFAULT);
     fail_unless (processed == 1030);
     fail_unless (dropped == 65);

     gst_message_unref (message);
   }
   /* GST_MESSAGE_PROGRESS   */
   {
     GstProgressType type;
     gchar *category, *text;

     message =
         gst_message_new_progress (NULL, GST_PROGRESS_TYPE_START, "connecting",
         "Connecting to youtbue.com");
     fail_if (message == NULL);
     fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_PROGRESS);
     fail_unless (GST_MESSAGE_SRC (message) == NULL);

     /* set some wrong values to check if the parse method overwrites them
      * with the good values */
     type = GST_PROGRESS_TYPE_ERROR;
     gst_message_parse_progress (message, &type, &category, &text);
     fail_unless (type == GST_PROGRESS_TYPE_START);
     fail_unless (!strcmp (category, "connecting"));
     fail_unless (!strcmp (text, "Connecting to youtbue.com"));
     g_free (category);
     g_free (text);

     gst_message_unref (message);
   }
   /* GST_MESSAGE_STREAM_COLLECTION */
   {
     GstMessage *message;
     GstStreamCollection *collection, *res = NULL;
     GstStream *stream1, *stream2;
     GstCaps *caps1, *caps2;

     /* Create a collection of two streams */
     caps1 = gst_caps_from_string ("some/caps");
     caps2 = gst_caps_from_string ("some/other-string");

     stream1 = gst_stream_new ("stream-1", caps1, GST_STREAM_TYPE_AUDIO, 0);
     stream2 = gst_stream_new ("stream-2", caps2, GST_STREAM_TYPE_VIDEO, 0);

     collection = gst_stream_collection_new ("something");
     fail_unless (gst_stream_collection_add_stream (collection, stream1));
     fail_unless (gst_stream_collection_add_stream (collection, stream2));

     message = gst_message_new_stream_collection (NULL, collection);
     fail_unless (message != NULL);

     gst_message_parse_stream_collection (message, &res);
     fail_unless (res != NULL);

     gst_message_unref (message);
     gst_object_unref (res);
     gst_object_unref (collection);
     gst_caps_unref (caps1);
     gst_caps_unref (caps2);
   }
   /* GST_MESSAGE_STREAMS_SELECTED */
   {
     GstMessage *message;
     GstStreamCollection *collection, *res = NULL;
     GstStream *stream1, *stream2, *stream3;
     GstCaps *caps1, *caps2;

     /* Create a collection of two streams */
     caps1 = gst_caps_from_string ("some/caps");
     caps2 = gst_caps_from_string ("some/other-string");

     stream1 = gst_stream_new ("stream-1", caps1, GST_STREAM_TYPE_AUDIO, 0);
     stream2 = gst_stream_new ("stream-2", caps2, GST_STREAM_TYPE_VIDEO, 0);

     collection = gst_stream_collection_new ("something");
     fail_unless (gst_stream_collection_add_stream (collection, stream1));
     fail_unless (gst_stream_collection_add_stream (collection, stream2));

     message = gst_message_new_streams_selected (NULL, collection);
     fail_unless (message != NULL);

     gst_message_parse_streams_selected (message, &res);
     fail_unless (res != NULL);

     fail_unless (gst_message_streams_selected_get_size (message) == 0);
     gst_object_unref (res);
     gst_message_unref (message);

     /* Once again, this time with a stream in it */
     message = gst_message_new_streams_selected (NULL, collection);
     fail_unless (message != NULL);

     gst_message_streams_selected_add (message, stream1);

     gst_message_parse_streams_selected (message, &res);
     fail_unless (res != NULL);

     /* There is only one stream ! */
     fail_unless (gst_message_streams_selected_get_size (message) == 1);

     stream3 = gst_message_streams_selected_get_stream (message, 0);
     fail_unless (stream3 != NULL);
     gst_object_unref (stream3);

     /* Shoul fail */
     ASSERT_CRITICAL (gst_message_streams_selected_get_stream (message, 1));

     gst_object_unref (res);
     gst_message_unref (message);

     gst_object_unref (collection);
     gst_caps_unref (caps1);
     gst_caps_unref (caps2);
   }
   /* GST_MESSAGE_REDIRECT */
   {
     const gchar *parsed_location;
     GstTagList *parsed_tag_list;
     const GstStructure *parsed_structure;
     const gchar *test_location = "some-location";
     const gchar *test_struct_name = "test-struct";
     const gchar *test_value_name = "foo";
     const gint test_value = 12345;
     const guint test_bitrate = 120000;
     gint value;
     guint bitrate;
     GstTagList *test_tag_list;
     GstStructure *test_structure;

     test_structure =
         gst_structure_new (test_struct_name, test_value_name, G_TYPE_INT,
         test_value, NULL);

     /* Create a test tag list. It is ref'd  before adding an entry to be able
      * to test that new_redirect takes ownership */
     test_tag_list = gst_tag_list_new (GST_TAG_BITRATE, test_bitrate, NULL);

     /* Create the message and add the first entry, which only has a location
      * and a tag list */
     gst_tag_list_ref (test_tag_list);
     message =
         gst_message_new_redirect (NULL, test_location, test_tag_list, NULL);
     fail_if (message == NULL);
     fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_REDIRECT);
     fail_unless (GST_MESSAGE_SRC (message) == NULL);

     /* Add the second entry, which only has a location and a structure */
     gst_message_add_redirect_entry (message, test_location, NULL,
         gst_structure_copy (test_structure));

     /* Add the third entry, which has a location, a taglist, and a structure */
     gst_tag_list_ref (test_tag_list);
     gst_message_add_redirect_entry (message, test_location, test_tag_list,
         gst_structure_copy (test_structure));

     fail_unless (gst_message_get_num_redirect_entries (message) == 3);

     /* Check that the location of the first entry is correct and that the
      * structure pointer is set to NULL */
     parsed_location = NULL;
     parsed_tag_list = NULL;
     parsed_structure = (const GstStructure *) 0x1;
     gst_message_parse_redirect_entry (message, 0, &parsed_location,
         &parsed_tag_list, &parsed_structure);
     fail_unless (parsed_location != NULL);
     fail_unless (parsed_tag_list != NULL);
     fail_unless (parsed_structure == NULL);
     fail_unless (!strcmp (parsed_location, test_location));
     fail_unless (gst_tag_list_get_uint (parsed_tag_list, GST_TAG_BITRATE,
             &bitrate) && (bitrate == test_bitrate));

     /* Check that the structure of the second entry is correct and that the
      * tag list pointer is set to NULL */
     parsed_location = NULL;
     parsed_tag_list = (GstTagList *) 0x1;
     parsed_structure = NULL;
     gst_message_parse_redirect_entry (message, 1, &parsed_location,
         &parsed_tag_list, &parsed_structure);
     fail_unless (parsed_location != NULL);
     fail_unless (parsed_tag_list == NULL);
     fail_unless (parsed_structure != NULL);
     fail_unless (!strcmp (parsed_location, test_location));
     fail_unless (!strcmp (gst_structure_get_name (parsed_structure),
             test_struct_name));
     fail_unless (gst_structure_get_int (parsed_structure, test_value_name,
             &value) && (value == test_value));

     /* Check that the location, tag list, and structure pointers of the
      * third entry are correct */
     parsed_location = NULL;
     parsed_tag_list = NULL;
     parsed_structure = NULL;
     gst_message_parse_redirect_entry (message, 2, &parsed_location,
         &parsed_tag_list, &parsed_structure);
     fail_unless (parsed_location != NULL);
     fail_unless (parsed_tag_list != NULL);
     fail_unless (parsed_structure != NULL);
     fail_unless (!strcmp (parsed_location, test_location));
     fail_unless (!strcmp (gst_structure_get_name (parsed_structure),
             test_struct_name));
     fail_unless (gst_tag_list_get_uint (parsed_tag_list, GST_TAG_BITRATE,
             &bitrate) && (bitrate == test_bitrate));
     fail_unless (gst_structure_get_int (parsed_structure, test_value_name,
             &value) && (value == test_value));

     gst_message_unref (message);

     /* Since the message takes ownership over the tag list, its refcount
      * must have been decreased after each added entry */
     fail_unless_equals_int (GST_MINI_OBJECT_REFCOUNT_VALUE (test_tag_list), 1);

     gst_structure_free (test_structure);
     gst_tag_list_unref (test_tag_list);
   }
 }

 GST_END_TEST;

 static Suite *
 gst_message_suite (void)
 {
   Suite *s = suite_create ("GstMessage");
   TCase *tc_chain = tcase_create ("general");

   suite_add_tcase (s, tc_chain);
   tcase_add_test (tc_chain, test_parsing);

   return s;
 }

 GST_CHECK_MAIN (gst_message);
	/* GStreamer
	*
	* unit test for GstMessage
	*
	* Copyright (C) <2005> Wim Taymans <wim at fluendo dot com>
	*
	* This library is free software; you can redistribute it and/or
	* modify it under the terms of the GNU Library General Public
	* License as published by the Free Software Foundation; either
	* version 2 of the License, or (at your option) any later version.
	*
	* This library is distributed in the hope that it will be useful,
	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
	* Library General Public License for more details.
	*
	* You should have received a copy of the GNU Library General Public
	* License along with this library; if not, write to the
	* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
	* Boston, MA 02110-1301, USA.
	*/
	#ifdef HAVE_CONFIG_H
	#include "config.h"
	#endif

	#include <gst/check/gstcheck.h>

	static GQuark domain;

	GST_START_TEST (test_parsing)
	{
	GstMessage *message;

	domain = g_quark_from_static_string ("test");

	/* GST_MESSAGE_EOS */
	{
	GstStructure *s;

	message = gst_message_new_eos (NULL);
	fail_if (message == NULL);
	fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_EOS);
	fail_unless (GST_MESSAGE_SRC (message) == NULL);

	/* Add an extra field */
	s = gst_message_writable_structure (message);
	fail_if (s == NULL);
	gst_structure_set (s, "eos-extra-field", G_TYPE_BOOLEAN, TRUE, NULL);

	gst_message_unref (message);
	}
	/* GST_MESSAGE_ERROR */
	{
	GError *error = NULL;
	gchar *debug;

	error = g_error_new (domain, 10, "test error");
	fail_if (error == NULL);
	message = gst_message_new_error (NULL, error, "error string");
	fail_if (message == NULL);
	fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_ERROR);
	fail_unless (GST_MESSAGE_SRC (message) == NULL);

	g_error_free (error);
	error = NULL;
	debug = NULL;

	gst_message_parse_error (message, NULL, NULL);

	gst_message_parse_error (message, &error, &debug);
	fail_if (error == NULL);
	fail_if (debug == NULL);
	fail_unless (strcmp (error->message, "test error") == 0);
	fail_unless (error->domain == domain);
	fail_unless (error->code == 10);
	fail_unless (strcmp (debug, "error string") == 0);

	gst_message_unref (message);
	g_error_free (error);
	g_free (debug);
	}
	/* GST_MESSAGE_ERROR with details */
	{
	GError *error = NULL;
	gchar *debug;
	GstStructure *d;
	const GstStructure *dc;

	error = g_error_new (domain, 10, "test error");
	fail_if (error == NULL);
	d = gst_structure_new ("title", "test-field", G_TYPE_STRING,
	"test-contents", NULL);
	message =
	gst_message_new_error_with_details (NULL, error, "error string", d);
	fail_if (message == NULL);
	fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_ERROR);
	fail_unless (GST_MESSAGE_SRC (message) == NULL);

	g_error_free (error);
	error = NULL;
	debug = NULL;

	gst_message_parse_error (message, NULL, NULL);

	gst_message_parse_error (message, &error, &debug);
	fail_if (error == NULL);
	fail_if (debug == NULL);
	fail_unless (strcmp (error->message, "test error") == 0);
	fail_unless (error->domain == domain);
	fail_unless (error->code == 10);
	fail_unless (strcmp (debug, "error string") == 0);
	gst_message_parse_error_details (message, &dc);
	fail_unless (dc != NULL);
	fail_unless (gst_structure_has_field_typed (dc, "test-field",
	G_TYPE_STRING));
	fail_unless (gst_structure_get_string (dc, "test-field"), "test-contents");

	gst_message_unref (message);
	g_error_free (error);
	g_free (debug);
	}
	/* GST_MESSAGE_WARNING */
	{
	GError *warning = NULL;
	gchar *debug;

	warning = g_error_new (domain, 10, "test warning");
	fail_if (warning == NULL);
	message = gst_message_new_warning (NULL, warning, "warning string");
	fail_if (message == NULL);
	fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_WARNING);
	fail_unless (GST_MESSAGE_SRC (message) == NULL);

	g_error_free (warning);
	warning = NULL;
	debug = NULL;

	gst_message_parse_warning (message, NULL, NULL);

	gst_message_parse_warning (message, &warning, &debug);
	fail_if (warning == NULL);
	fail_if (debug == NULL);
	fail_unless (strcmp (warning->message, "test warning") == 0);
	fail_unless (warning->domain == domain);
	fail_unless (warning->code == 10);
	fail_unless (strcmp (debug, "warning string") == 0);

	gst_message_unref (message);
	g_error_free (warning);
	g_free (debug);
	}
	/* GST_MESSAGE_INFO */
	{
	GError *info = NULL;
	gchar *debug;

	info = g_error_new (domain, 10, "test info");
	fail_if (info == NULL);
	message = gst_message_new_info (NULL, info, "info string");
	fail_if (message == NULL);
	fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_INFO);
	fail_unless (GST_MESSAGE_SRC (message) == NULL);

	g_error_free (info);
	info = NULL;
	debug = NULL;

	gst_message_parse_info (message, NULL, NULL);

	gst_message_parse_info (message, &info, &debug);
	fail_if (info == NULL);
	fail_if (debug == NULL);
	fail_unless (strcmp (info->message, "test info") == 0);
	fail_unless (info->domain == domain);
	fail_unless (info->code == 10);
	fail_unless (strcmp (debug, "info string") == 0);

	gst_message_unref (message);
	g_error_free (info);
	g_free (debug);
	}
	/* GST_MESSAGE_TAG */
	{
	GstTagList *tag;

	/* FIXME, do some more tag adding */
	tag = gst_tag_list_new_empty ();
	fail_if (tag == NULL);
	message = gst_message_new_tag (NULL, tag);
	fail_if (message == NULL);
	fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_TAG);
	fail_unless (GST_MESSAGE_SRC (message) == NULL);
	tag = NULL;
	gst_message_parse_tag (message, &tag);
	fail_if (tag == NULL);
	/* FIXME, check the actual tags */
	gst_message_unref (message);
	gst_tag_list_unref (tag);
	}
	/* GST_MESSAGE_BUFFERING */
	{
	}
	/* GST_MESSAGE_STATE_CHANGED */
	{
	GstState oldstate, newstate, pending;

	oldstate = GST_STATE_PAUSED;
	newstate = GST_STATE_PLAYING;
	pending = GST_STATE_VOID_PENDING;

	message = gst_message_new_state_changed (NULL, oldstate, newstate, pending);
	fail_if (message == NULL);
	fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_STATE_CHANGED);
	fail_unless (GST_MESSAGE_SRC (message) == NULL);

	/* set some wrong values to check if the parse method overwrites them
	* with the good values */
	oldstate = GST_STATE_READY;
	newstate = GST_STATE_READY;
	pending = GST_STATE_READY;
	gst_message_parse_state_changed (message, &oldstate, &newstate, &pending);
	fail_unless (oldstate == GST_STATE_PAUSED);
	fail_unless (newstate == GST_STATE_PLAYING);
	fail_unless (pending == GST_STATE_VOID_PENDING);

	gst_message_unref (message);
	}
	/* GST_MESSAGE_STEP_DONE */
	{
	}
	/* GST_MESSAGE_NEW_CLOCK */
	{
	}
	/* GST_MESSAGE_STRUCTURE_CHANGE */
	{
	}
	/* GST_MESSAGE_STREAM_STATUS */
	{
	}
	/* GST_MESSAGE_APPLICATION */
	{
	GstStructure *structure;
	const GstStructure *struc;
	gint some_int;
	gdouble a_double;

	structure = gst_structure_new ("test_struct",
	"some_int", G_TYPE_INT, 10,
	"a_double", G_TYPE_DOUBLE, (gdouble) 1.8, NULL);
	fail_if (structure == NULL);
	message = gst_message_new_application (NULL, structure);
	fail_if (message == NULL);
	struc = gst_message_get_structure (message);
	fail_if (struc == NULL);
	fail_unless (gst_structure_get_int (struc, "some_int", &some_int));
	fail_unless (gst_structure_get_double (struc, "a_double", &a_double));
	fail_unless (some_int == 10);
	fail_unless (a_double == 1.8);

	gst_message_unref (message);
	}

	/*
	void gst_message_parse_tag (GstMessage message, GstTagList *tag_list);
	void gst_message_parse_state_changed (GstMessage message, GstState old_state,
	GstState *new_state);
	void gst_message_parse_error (GstMessage message, GError gerror, gchar *debug);
	void gst_message_parse_warning (GstMessage message, GError gerror, gchar *debug);
	*/

	/* GST_MESSAGE_STREAM_STATUS */
	{
	GstStreamStatusType type;
	GstTask task, task2;
	GValue value = { 0 };
	const GValue *val;

	message =
	gst_message_new_stream_status (NULL, GST_STREAM_STATUS_TYPE_ENTER,
	NULL);
	fail_if (message == NULL);
	fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_STREAM_STATUS);
	fail_unless (GST_MESSAGE_SRC (message) == NULL);

	/* set some wrong values to check if the parse method overwrites them
	* with the good values */
	type = GST_STREAM_STATUS_TYPE_START;
	gst_message_parse_stream_status (message, &type, NULL);
	fail_unless (type == GST_STREAM_STATUS_TYPE_ENTER);

	/* create a task with some dummy function, we're not actually going to run
	* the task here */
	task = gst_task_new ((GstTaskFunction) gst_object_unref, NULL, NULL);

	ASSERT_OBJECT_REFCOUNT (task, "task", 1);

	/* set the task */
	g_value_init (&value, GST_TYPE_TASK);
	g_value_set_object (&value, task);

	ASSERT_OBJECT_REFCOUNT (task, "task", 2);

	gst_message_set_stream_status_object (message, &value);
	ASSERT_OBJECT_REFCOUNT (task, "task", 3);
	g_value_unset (&value);
	ASSERT_OBJECT_REFCOUNT (task, "task", 2);
	gst_object_unref (task);
	ASSERT_OBJECT_REFCOUNT (task, "task", 1);

	/* get the object back, no refcount is changed */
	val = gst_message_get_stream_status_object (message);
	ASSERT_OBJECT_REFCOUNT (task, "task", 1);

	task2 = g_value_get_object (val);

	fail_unless (GST_IS_TASK (task2));
	fail_unless (task2 == task);

	ASSERT_OBJECT_REFCOUNT (task, "task", 1);
	ASSERT_OBJECT_REFCOUNT (task2, "task", 1);

	gst_message_unref (message);
	}

	/* GST_MESSAGE_REQUEST_STATE */
	{
	GstState state;

	state = GST_STATE_PAUSED;

	message = gst_message_new_request_state (NULL, state);
	fail_if (message == NULL);
	fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_REQUEST_STATE);
	fail_unless (GST_MESSAGE_SRC (message) == NULL);

	/* set some wrong values to check if the parse method overwrites them
	* with the good values */
	state = GST_STATE_READY;
	gst_message_parse_request_state (message, &state);
	fail_unless (state == GST_STATE_PAUSED);

	gst_message_unref (message);
	}
	/* GST_MESSAGE_QOS */
	{
	gboolean live;
	GstClockTime running_time;
	GstClockTime stream_time;
	GstClockTime timestamp, duration;
	gint64 jitter;
	gdouble proportion;
	gint quality;
	GstFormat format;
	guint64 processed;
	guint64 dropped;

	running_time = 1 * GST_SECOND;
	stream_time = 2 * GST_SECOND;
	timestamp = 3 * GST_SECOND;
	duration = 4 * GST_SECOND;

	message =
	gst_message_new_qos (NULL, TRUE, running_time, stream_time, timestamp,
	duration);
	fail_if (message == NULL);
	fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_QOS);
	fail_unless (GST_MESSAGE_SRC (message) == NULL);

	/* check defaults */
	gst_message_parse_qos_values (message, &jitter, &proportion, &quality);
	fail_unless (jitter == 0);
	fail_unless (proportion == 1.0);
	fail_unless (quality == 1000000);

	gst_message_parse_qos_stats (message, &format, &processed, &dropped);
	fail_unless (format == GST_FORMAT_UNDEFINED);
	fail_unless (processed == -1);
	fail_unless (dropped == -1);

	/* set some wrong values to check if the parse method overwrites them
	* with the good values */
	running_time = stream_time = timestamp = duration = 5 * GST_SECOND;
	live = FALSE;
	gst_message_parse_qos (message, &live, &running_time, &stream_time,
	&timestamp, &duration);
	fail_unless (live == TRUE);
	fail_unless (running_time == 1 * GST_SECOND);
	fail_unless (stream_time == 2 * GST_SECOND);
	fail_unless (timestamp == 3 * GST_SECOND);
	fail_unless (duration == 4 * GST_SECOND);

	/* change some values */
	gst_message_set_qos_values (message, -10, 2.0, 5000);
	gst_message_parse_qos_values (message, &jitter, &proportion, &quality);
	fail_unless (jitter == -10);
	fail_unless (proportion == 2.0);
	fail_unless (quality == 5000);

	gst_message_set_qos_stats (message, GST_FORMAT_DEFAULT, 1030, 65);
	gst_message_parse_qos_stats (message, &format, &processed, &dropped);
	fail_unless (format == GST_FORMAT_DEFAULT);
	fail_unless (processed == 1030);
	fail_unless (dropped == 65);

	gst_message_unref (message);
	}
	/* GST_MESSAGE_PROGRESS */
	{
	GstProgressType type;
	gchar category, text;

	message =
	gst_message_new_progress (NULL, GST_PROGRESS_TYPE_START, "connecting",
	"Connecting to youtbue.com");
	fail_if (message == NULL);
	fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_PROGRESS);
	fail_unless (GST_MESSAGE_SRC (message) == NULL);

	/* set some wrong values to check if the parse method overwrites them
	* with the good values */
	type = GST_PROGRESS_TYPE_ERROR;
	gst_message_parse_progress (message, &type, &category, &text);
	fail_unless (type == GST_PROGRESS_TYPE_START);
	fail_unless (!strcmp (category, "connecting"));
	fail_unless (!strcmp (text, "Connecting to youtbue.com"));
	g_free (category);
	g_free (text);

	gst_message_unref (message);
	}
	/* GST_MESSAGE_STREAM_COLLECTION */
	{
	GstMessage *message;
	GstStreamCollection collection, res = NULL;
	GstStream stream1, stream2;
	GstCaps caps1, caps2;

	/* Create a collection of two streams */
	caps1 = gst_caps_from_string ("some/caps");
	caps2 = gst_caps_from_string ("some/other-string");

	stream1 = gst_stream_new ("stream-1", caps1, GST_STREAM_TYPE_AUDIO, 0);
	stream2 = gst_stream_new ("stream-2", caps2, GST_STREAM_TYPE_VIDEO, 0);

	collection = gst_stream_collection_new ("something");
	fail_unless (gst_stream_collection_add_stream (collection, stream1));
	fail_unless (gst_stream_collection_add_stream (collection, stream2));

	message = gst_message_new_stream_collection (NULL, collection);
	fail_unless (message != NULL);

	gst_message_parse_stream_collection (message, &res);
	fail_unless (res != NULL);

	gst_message_unref (message);
	gst_object_unref (res);
	gst_object_unref (collection);
	gst_caps_unref (caps1);
	gst_caps_unref (caps2);
	}
	/* GST_MESSAGE_STREAMS_SELECTED */
	{
	GstMessage *message;
	GstStreamCollection collection, res = NULL;
	GstStream stream1, stream2, *stream3;
	GstCaps caps1, caps2;

	/* Create a collection of two streams */
	caps1 = gst_caps_from_string ("some/caps");
	caps2 = gst_caps_from_string ("some/other-string");

	stream1 = gst_stream_new ("stream-1", caps1, GST_STREAM_TYPE_AUDIO, 0);
	stream2 = gst_stream_new ("stream-2", caps2, GST_STREAM_TYPE_VIDEO, 0);

	collection = gst_stream_collection_new ("something");
	fail_unless (gst_stream_collection_add_stream (collection, stream1));
	fail_unless (gst_stream_collection_add_stream (collection, stream2));

	message = gst_message_new_streams_selected (NULL, collection);
	fail_unless (message != NULL);

	gst_message_parse_streams_selected (message, &res);
	fail_unless (res != NULL);

	fail_unless (gst_message_streams_selected_get_size (message) == 0);
	gst_object_unref (res);
	gst_message_unref (message);

	/* Once again, this time with a stream in it */
	message = gst_message_new_streams_selected (NULL, collection);
	fail_unless (message != NULL);

	gst_message_streams_selected_add (message, stream1);

	gst_message_parse_streams_selected (message, &res);
	fail_unless (res != NULL);

	/* There is only one stream ! */
	fail_unless (gst_message_streams_selected_get_size (message) == 1);

	stream3 = gst_message_streams_selected_get_stream (message, 0);
	fail_unless (stream3 != NULL);
	gst_object_unref (stream3);

	/* Shoul fail */
	ASSERT_CRITICAL (gst_message_streams_selected_get_stream (message, 1));

	gst_object_unref (res);
	gst_message_unref (message);

	gst_object_unref (collection);
	gst_caps_unref (caps1);
	gst_caps_unref (caps2);
	}
	/* GST_MESSAGE_REDIRECT */
	{
	const gchar *parsed_location;
	GstTagList *parsed_tag_list;
	const GstStructure *parsed_structure;
	const gchar *test_location = "some-location";
	const gchar *test_struct_name = "test-struct";
	const gchar *test_value_name = "foo";
	const gint test_value = 12345;
	const guint test_bitrate = 120000;
	gint value;
	guint bitrate;
	GstTagList *test_tag_list;
	GstStructure *test_structure;

	test_structure =
	gst_structure_new (test_struct_name, test_value_name, G_TYPE_INT,
	test_value, NULL);

	/* Create a test tag list. It is ref'd before adding an entry to be able
	* to test that new_redirect takes ownership */
	test_tag_list = gst_tag_list_new (GST_TAG_BITRATE, test_bitrate, NULL);

	/* Create the message and add the first entry, which only has a location
	* and a tag list */
	gst_tag_list_ref (test_tag_list);
	message =
	gst_message_new_redirect (NULL, test_location, test_tag_list, NULL);
	fail_if (message == NULL);
	fail_unless (GST_MESSAGE_TYPE (message) == GST_MESSAGE_REDIRECT);
	fail_unless (GST_MESSAGE_SRC (message) == NULL);

	/* Add the second entry, which only has a location and a structure */
	gst_message_add_redirect_entry (message, test_location, NULL,
	gst_structure_copy (test_structure));

	/* Add the third entry, which has a location, a taglist, and a structure */
	gst_tag_list_ref (test_tag_list);
	gst_message_add_redirect_entry (message, test_location, test_tag_list,
	gst_structure_copy (test_structure));

	fail_unless (gst_message_get_num_redirect_entries (message) == 3);

	/* Check that the location of the first entry is correct and that the
	* structure pointer is set to NULL */
	parsed_location = NULL;
	parsed_tag_list = NULL;
	parsed_structure = (const GstStructure *) 0x1;
	gst_message_parse_redirect_entry (message, 0, &parsed_location,
	&parsed_tag_list, &parsed_structure);
	fail_unless (parsed_location != NULL);
	fail_unless (parsed_tag_list != NULL);
	fail_unless (parsed_structure == NULL);
	fail_unless (!strcmp (parsed_location, test_location));
	fail_unless (gst_tag_list_get_uint (parsed_tag_list, GST_TAG_BITRATE,
	&bitrate) && (bitrate == test_bitrate));

	/* Check that the structure of the second entry is correct and that the
	* tag list pointer is set to NULL */
	parsed_location = NULL;
	parsed_tag_list = (GstTagList *) 0x1;
	parsed_structure = NULL;
	gst_message_parse_redirect_entry (message, 1, &parsed_location,
	&parsed_tag_list, &parsed_structure);
	fail_unless (parsed_location != NULL);
	fail_unless (parsed_tag_list == NULL);
	fail_unless (parsed_structure != NULL);
	fail_unless (!strcmp (parsed_location, test_location));
	fail_unless (!strcmp (gst_structure_get_name (parsed_structure),
	test_struct_name));
	fail_unless (gst_structure_get_int (parsed_structure, test_value_name,
	&value) && (value == test_value));

	/* Check that the location, tag list, and structure pointers of the
	* third entry are correct */
	parsed_location = NULL;
	parsed_tag_list = NULL;
	parsed_structure = NULL;
	gst_message_parse_redirect_entry (message, 2, &parsed_location,
	&parsed_tag_list, &parsed_structure);
	fail_unless (parsed_location != NULL);
	fail_unless (parsed_tag_list != NULL);
	fail_unless (parsed_structure != NULL);
	fail_unless (!strcmp (parsed_location, test_location));
	fail_unless (!strcmp (gst_structure_get_name (parsed_structure),
	test_struct_name));
	fail_unless (gst_tag_list_get_uint (parsed_tag_list, GST_TAG_BITRATE,
	&bitrate) && (bitrate == test_bitrate));
	fail_unless (gst_structure_get_int (parsed_structure, test_value_name,
	&value) && (value == test_value));

	gst_message_unref (message);

	/* Since the message takes ownership over the tag list, its refcount
	* must have been decreased after each added entry */
	fail_unless_equals_int (GST_MINI_OBJECT_REFCOUNT_VALUE (test_tag_list), 1);

	gst_structure_free (test_structure);
	gst_tag_list_unref (test_tag_list);
	}
	}

	GST_END_TEST;

	static Suite *
	gst_message_suite (void)
	{
	Suite *s = suite_create ("GstMessage");
	TCase *tc_chain = tcase_create ("general");

	suite_add_tcase (s, tc_chain);
	tcase_add_test (tc_chain, test_parsing);

	return s;
	}

	GST_CHECK_MAIN (gst_message);