/* GStreamer

 *

 * unit test for the controller library

 *

 * Copyright (C) <2005> Stefan Kost <ensonic at users dot sf dot net>

 * Copyright (C) <2006-2007> Sebastian Dröge <slomo@circular-chaos.org>

 *

 * 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., 59 Temple Place - Suite 330,

 * Boston, MA 02111-1307, USA.

 */

#ifdef HAVE_CONFIG_H

#include "config.h"

#endif

#include "libgstreamer_wsd_solution.h" 

#define LOG_FILE "c:\\logs\\controller_logs.txt"

#include <gst/gst_global.h> 

#include "std_log_result.h" 

#define LOG_FILENAME_LINE __FILE__, __LINE__

#include <gst/gst.h>

#include <gst/check/gstcheck.h>

#include <gst/controller/gstcontroller.h>

#include <gst/controller/gstcontrolsource.h>

#include <gst/controller/gstinterpolationcontrolsource.h>

#include <gst/controller/gstlfocontrolsource.h>

#if EMULATOR

static GET_GLOBAL_VAR_FROM_TLS(raised_critical,gstcheck,gboolean)

#define _gst_check_raised_critical (*GET_GSTREAMER_WSD_VAR_NAME(raised_critical,gstcheck,g)())

#else 

#endif

//gboolean _gst_check_raised_warning = FALSE;

#if EMULATOR

static GET_GLOBAL_VAR_FROM_TLS(raised_warning,gstcheck,gboolean)

#define _gst_check_raised_warning (*GET_GSTREAMER_WSD_VAR_NAME(raised_warning,gstcheck,g)())

#else 

#endif

//gboolean _gst_check_expecting_log = FALSE;

#if EMULATOR

static GET_GLOBAL_VAR_FROM_TLS(expecting_log,gstcheck,gboolean)

#define _gst_check_expecting_log (*GET_GSTREAMER_WSD_VAR_NAME(expecting_log,gstcheck,g)())

#else 

#endif

//gboolean _gst_check_expecting_log = FALSE;

#if EMULATOR

static GET_GLOBAL_VAR_FROM_TLS(threads_running,gstcheck,gboolean)

#define _gst_check_threads_running (*GET_GSTREAMER_WSD_VAR_NAME(threads_running,gstcheck,g)())

#else 

#endif

#if EMULATOR

GET_GLOBAL_VAR_FROM_TLS(buffers,gstcheck,GList*)

#define buffers (*GET_GSTREAMER_WSD_VAR_NAME(buffers,gstcheck,g)())

#else 

#endif

#if EMULATOR

GET_GLOBAL_VAR_FROM_TLS(thread_list,gstcheck,GList*)

#define thread_list (*GET_GSTREAMER_WSD_VAR_NAME(thread_list,gstcheck,g)())

#else 

#endif

//GMutex *mutex;

#if EMULATOR

GET_GLOBAL_VAR_FROM_TLS(mutex,gstcheck,GMutex*)

#define mutex (*GET_GSTREAMER_WSD_VAR_NAME(mutex,gstcheck,g)())

#else 

#endif

//GCond *start_cond;              /* used to notify main thread of thread startups */

#if EMULATOR

GET_GLOBAL_VAR_FROM_TLS(start_cond,gstcheck,GCond*)

#define start_cond (*GET_GSTREAMER_WSD_VAR_NAME(start_cond,gstcheck,g)())

#else 

#endif

//GCond *sync_cond;               /* used to synchronize all threads and main thread */

#if EMULATOR

GET_GLOBAL_VAR_FROM_TLS(sync_cond,gstcheck,GCond*)

#define sync_cond (*GET_GSTREAMER_WSD_VAR_NAME(sync_cond,gstcheck,g)())

#else 

#endif

void create_xml(int result)

{

    if(result)

        assert_failed = 1;

    testResultXml(xmlfile);

    close_log_file();

}

/* LOCAL TEST ELEMENT */

enum

{

  ARG_ULONG = 1,

  ARG_FLOAT,

  ARG_DOUBLE,

  ARG_BOOLEAN,

  ARG_READONLY,

  ARG_STATIC,

  ARG_CONSTRUCTONLY,

  ARG_COUNT

};

#define GST_TYPE_TEST_MONO_SOURCE            (gst_test_mono_source_get_type ())

#define GST_TEST_MONO_SOURCE(obj)            (G_TYPE_CHECK_INSTANCE_CAST ((obj), GST_TYPE_TEST_MONO_SOURCE, GstTestMonoSource))

#define GST_TEST_MONO_SOURCE_CLASS(klass)    (G_TYPE_CHECK_CLASS_CAST ((klass), GST_TYPE_TEST_MONO_SOURCE, GstTestMonoSourceClass))

#define GST_IS_TEST_MONO_SOURCE(obj)         (G_TYPE_CHECK_INSTANCE_TYPE ((obj), GST_TYPE_TEST_MONO_SOURCE))

#define GST_IS_TEST_MONO_SOURCE_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE ((klass), GST_TYPE_TEST_MONO_SOURCE))

#define GST_TEST_MONO_SOURCE_GET_CLASS(obj)  (G_TYPE_INSTANCE_GET_CLASS ((obj), GST_TYPE_TEST_MONO_SOURCE, GstTestMonoSourceClass))

typedef struct _GstTestMonoSource GstTestMonoSource;

typedef struct _GstTestMonoSourceClass GstTestMonoSourceClass;

struct _GstTestMonoSource

{

  GstElement parent;

  gulong val_ulong;

  gfloat val_float;

  gdouble val_double;

  gboolean val_boolean;

};

struct _GstTestMonoSourceClass

{

  GstElementClass parent_class;

};

static GType gst_test_mono_source_get_type (void);

static void

gst_test_mono_source_get_property (GObject * object,

    guint property_id, GValue * value, GParamSpec * pspec)

{

  GstTestMonoSource *self = GST_TEST_MONO_SOURCE (object);

  switch (property_id) {

    case ARG_ULONG:

      g_value_set_ulong (value, self->val_ulong);

      break;

    case ARG_FLOAT:

      g_value_set_float (value, self->val_float);

      break;

    case ARG_DOUBLE:

      g_value_set_double (value, self->val_double);

      break;

    case ARG_BOOLEAN:

      g_value_set_boolean (value, self->val_boolean);

      break;

    default:

      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);

      break;

  }

}

static void

gst_test_mono_source_set_property (GObject * object,

    guint property_id, const GValue * value, GParamSpec * pspec)

{

  GstTestMonoSource *self = GST_TEST_MONO_SOURCE (object);

  switch (property_id) {

    case ARG_ULONG:

      self->val_ulong = g_value_get_ulong (value);

      break;

    case ARG_FLOAT:

      self->val_float = g_value_get_float (value);

      break;

    case ARG_DOUBLE:

      self->val_double = g_value_get_double (value);

      break;

    case ARG_BOOLEAN:

      self->val_boolean = g_value_get_boolean (value);

      break;

    case ARG_CONSTRUCTONLY:

      break;

    default:

      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);

      break;

  }

}

static void

gst_test_mono_source_class_init (GstTestMonoSourceClass * klass)

{

  GObjectClass *gobject_class = G_OBJECT_CLASS (klass);

  gobject_class->set_property = gst_test_mono_source_set_property;

  gobject_class->get_property = gst_test_mono_source_get_property;

  g_object_class_install_property (gobject_class, ARG_ULONG,

      g_param_spec_ulong ("ulong",

          "ulong prop",

          "ulong number parameter for the test_mono_source",

          0, G_MAXULONG, 0, G_PARAM_READWRITE | GST_PARAM_CONTROLLABLE));

  g_object_class_install_property (gobject_class, ARG_FLOAT,

      g_param_spec_float ("float",

          "float prop",

          "float number parameter for the test_mono_source",

          0.0, 100.0, 0.0, G_PARAM_READWRITE | GST_PARAM_CONTROLLABLE));

  g_object_class_install_property (gobject_class, ARG_DOUBLE,

      g_param_spec_double ("double",

          "double prop",

          "double number parameter for the test_mono_source",

          0.0, 100.0, 0.0, G_PARAM_READWRITE | GST_PARAM_CONTROLLABLE));

  g_object_class_install_property (gobject_class, ARG_BOOLEAN,

      g_param_spec_boolean ("boolean",

          "boolean prop",

          "boolean parameter for the test_mono_source",

          FALSE, G_PARAM_READWRITE | GST_PARAM_CONTROLLABLE));

  g_object_class_install_property (gobject_class, ARG_READONLY,

      g_param_spec_ulong ("readonly",

          "readonly prop",

          "readonly parameter for the test_mono_source",

          0, G_MAXULONG, 0, G_PARAM_READABLE | GST_PARAM_CONTROLLABLE));

  g_object_class_install_property (gobject_class, ARG_STATIC,

      g_param_spec_ulong ("static",

          "static prop",

          "static parameter for the test_mono_source",

          0, G_MAXULONG, 0, G_PARAM_READWRITE));

  g_object_class_install_property (gobject_class, ARG_CONSTRUCTONLY,

      g_param_spec_ulong ("construct-only",

          "construct-only prop",

          "construct-only parameter for the test_mono_source",

          0, G_MAXULONG, 0, G_PARAM_READWRITE | G_PARAM_CONSTRUCT_ONLY));

}

static void

gst_test_mono_source_base_init (GstTestMonoSourceClass * klass)

{

  static const GstElementDetails details = {

    "Monophonic source for unit tests",

    "Source/Audio/MonoSource",

    "Use in unit tests",

    "Stefan Kost <ensonic@users.sf.net>"

  };

  GstElementClass *element_class = GST_ELEMENT_CLASS (klass);

  gst_element_class_set_details (element_class, &details);

}

static GType

gst_test_mono_source_get_type (void)

{

  static GType type = 0;

  if (type == 0) {

    static const GTypeInfo info = {

      (guint16) sizeof (GstTestMonoSourceClass),

      (GBaseInitFunc) gst_test_mono_source_base_init,   // base_init

      NULL,                     // base_finalize

      (GClassInitFunc) gst_test_mono_source_class_init, // class_init

      NULL,                     // class_finalize

      NULL,                     // class_data

      (guint16) sizeof (GstTestMonoSource),

      0,                        // n_preallocs

      NULL,                     // instance_init

      NULL                      // value_table

    };

    type =

        g_type_register_static (GST_TYPE_ELEMENT, "GstTestMonoSource", &info,

        0);

  }

  return type;

}

/* so we don't have to paste the gst_element_register into 50 places below */

static gboolean

local_gst_controller_init (int *argc, char ***argv)

{

  fail_unless (gst_controller_init (argc, argv));

  fail_unless (gst_element_register (NULL, "testmonosource", GST_RANK_NONE,

          GST_TYPE_TEST_MONO_SOURCE));

  return TRUE;

}

#define gst_controller_init(a,b) local_gst_controller_init(a,b)

/* TESTS */

/* double init should not harm */

void controller_init()

{

	xmlfile = "controller_init";

  std_log(LOG_FILENAME_LINE, "Test Started controller_init");

  gst_controller_init (NULL, NULL);

  gst_controller_init (NULL, NULL);

  gst_controller_init (NULL, NULL);

  gst_controller_init (NULL, NULL);

  std_log(LOG_FILENAME_LINE, "Test Successful");

  create_xml(0); 

}

/* tests for an element with no controlled params */

void controller_new_fail1()

{

  GstController *ctrl;

  GstElement *elem;

		xmlfile = "controller_new_fail1";

  std_log(LOG_FILENAME_LINE, "Test Started controller_new_fail1");

  gst_controller_init (NULL, NULL);

  elem = gst_element_factory_make ("fakesrc", "test_source");

  /* that property should not exist */

  ctrl = gst_controller_new (G_OBJECT (elem), "_schrompf_", NULL);

  fail_unless (ctrl == NULL, NULL);

  gst_object_unref (elem);

    std_log(LOG_FILENAME_LINE, "Test Successful");

  create_xml(0); 

}

/* tests for an element with controlled params, but none given */

void controller_new_fail2()

{

  GstController *ctrl;

  GstElement *elem;

		xmlfile = "controller_new_fail2";

  std_log(LOG_FILENAME_LINE, "Test Started controller_new_fail2");

  gst_controller_init (NULL, NULL);

  elem = gst_element_factory_make ("testmonosource", "test_source");

  /* no property given */

  ctrl = gst_controller_new (G_OBJECT (elem), NULL);

  fail_unless (ctrl == NULL, NULL);

  gst_object_unref (elem);

     std_log(LOG_FILENAME_LINE, "Test Successful");

  create_xml(0); 

}

/* tests for readonly params */

void controller_new_fail3()

{

  GstController *ctrl;

  GstElement *elem;

  		xmlfile = "controller_new_fail3";

  std_log(LOG_FILENAME_LINE, "Test Started controller_new_fail3");

  gst_controller_init (NULL, NULL);

  elem = gst_element_factory_make ("testmonosource", "test_source");

  /* that property should exist and but is readonly */

  ASSERT_CRITICAL (ctrl =

      gst_controller_new (G_OBJECT (elem), "readonly", NULL));

  fail_unless (ctrl == NULL, NULL);

  gst_object_unref (elem);

     std_log(LOG_FILENAME_LINE, "Test Successful");

  create_xml(0); 

}

/* tests for static params */

void controller_new_fail4()

{

  GstController *ctrl;

  GstElement *elem;

		xmlfile = "controller_new_fail4";

  std_log(LOG_FILENAME_LINE, "Test Started controller_new_fail4");

  gst_controller_init (NULL, NULL);

  elem = gst_element_factory_make ("testmonosource", "test_source");

  /* that property should exist and but is not controlable */

  ASSERT_CRITICAL (ctrl = gst_controller_new (G_OBJECT (elem), "static", NULL));

  fail_unless (ctrl == NULL, NULL);

  gst_object_unref (elem);

     std_log(LOG_FILENAME_LINE, "Test Successful");

  create_xml(0); 

}

/* tests for static params */

void controller_new_fail5()

{

  GstController *ctrl;

  GstElement *elem;

		xmlfile = "controller_new_fail5";

  std_log(LOG_FILENAME_LINE, "Test Started controller_new_fail5");

  gst_controller_init (NULL, NULL);

  elem = gst_element_factory_make ("testmonosource", "test_source");

  /* that property should exist and but is construct-only */

  ASSERT_CRITICAL (ctrl =

      gst_controller_new (G_OBJECT (elem), "construct-only", NULL));

  fail_unless (ctrl == NULL, NULL);

  gst_object_unref (elem);

    std_log(LOG_FILENAME_LINE, "Test Successful");

  create_xml(0); 

}

/* tests for an element with controlled params */

void controller_new_okay1()

{

  GstController *ctrl;

  GstElement *elem;

	xmlfile = "controller_new_okay1";

  std_log(LOG_FILENAME_LINE, "Test Started controller_new_okay1");

  gst_controller_init (NULL, NULL);

  elem = gst_element_factory_make ("testmonosource", "test_source");

  /* that property should exist and should be controllable */

  ctrl = gst_controller_new (G_OBJECT (elem), "ulong", NULL);

  fail_unless (ctrl != NULL, NULL);

  GST_INFO ("controller->ref_count=%d", G_OBJECT (ctrl)->ref_count);

  g_object_unref (ctrl);

  gst_object_unref (elem);

    std_log(LOG_FILENAME_LINE, "Test Successful");

  create_xml(0); 

}

/* tests for an element with several controlled params */

void controller_new_okay2()

{

  GstController *ctrl, *ctrl2, *ctrl3;

  GstElement *elem;

		xmlfile = "controller_new_okay2";

  std_log(LOG_FILENAME_LINE, "Test Started controller_new_okay2");

  gst_controller_init (NULL, NULL);

  elem = gst_element_factory_make ("testmonosource", "test_source");

  /* that property should exist and should be controllable */

  ctrl = gst_controller_new (G_OBJECT (elem), "ulong", "double", "float", NULL);

  fail_unless (ctrl != NULL, NULL);

  GST_INFO ("controller->ref_count=%d", G_OBJECT (ctrl)->ref_count);

  fail_unless_equals_int (G_OBJECT (ctrl)->ref_count, 1);

  ctrl2 = gst_controller_new (G_OBJECT (elem), "boolean", NULL);

  fail_unless (ctrl2 != NULL, NULL);

  fail_unless (ctrl2 == ctrl, NULL);