qa-monitor-preload: add functions to allow ld-preload to wrap pipelines

The preload functions wrap functions that can create pipelines and
attaches a runner to them for monitoring

validate/gst/qa/Makefile.am

@@ -7,7 +7,8 @@ c_sources = \
 	gst-qa-element-monitor.c \
 	gst-qa-bin-monitor.c \
 	gst-qa-pad-monitor.c \
-	gst-qa-monitor-factory.c
+	gst-qa-monitor-factory.c \
+	gst-qa-monitor-preload.c
 
 noinst_HEADERS = 
 

validate/gst/qa/gst-qa-monitor-preload.c

@@ -0,0 +1,103 @@
+/* GStreamer
+ * Copyright (C) 2013 Thiago Santos <thiago.sousa.santos@collabora.com>
+ *
+ * gst-qa-monitor-preload.c - QA Element monitors preload functions
+ *
+ * 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.1 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.
+ */
+
+#include <gst/gst.h>
+#include <string.h>
+#include "gst-qa-runner.h"
+
+#define __USE_GNU
+#include <dlfcn.h>
+
+/*
+ * Functions that wrap object creation so gst-qa can be used
+ * to monitor 'standard' applications
+ */
+
+static void
+gst_qa_preload_wrap (GstElement * element)
+{
+  GstQaRunner *runner;
+
+  runner = gst_qa_runner_new (element);
+
+  /* TODO this will actually never unref the runner as it holds a ref
+   * to the element */
+  g_object_set_data_full ((GObject *) element, "qa-runner", runner,
+      g_object_unref);
+}
+
+GstElement *
+gst_element_factory_make (const gchar * element_name, const gchar * name)
+{
+  static GstElement *(*gst_element_factory_make_real) (const gchar *,
+      const gchar *) = NULL;
+  GstElement *element;
+
+  if (!gst_element_factory_make_real)
+    gst_element_factory_make_real =
+        dlsym (RTLD_NEXT, "gst_element_factory_make");
+
+  element = gst_element_factory_make_real (element_name, name);
+
+  if (GST_IS_PIPELINE (element)) {
+    gst_qa_preload_wrap (element);
+  }
+  return element;
+}
+
+gpointer
+g_object_new (GType object_type, const gchar * first_property_name, ...)
+{
+  static gpointer (*g_object_new_real) (GType, const gchar *, ...) = NULL;
+  gpointer obj;
+  va_list var_args;
+
+  if (!g_object_new_real)
+    g_object_new_real = dlsym (RTLD_NEXT, "g_object_new");
+
+  va_start (var_args, first_property_name);
+  obj = g_object_new_valist (object_type, first_property_name, var_args);
+  va_end (var_args);
+
+  if (GST_IS_PIPELINE (obj)) {
+    gst_qa_preload_wrap (obj);
+  }
+
+  return obj;
+}
+
+gpointer
+g_object_newv (GType object_type, guint n_parameters, GParameter * parameters)
+{
+  static gpointer (*g_object_newv_real) (GType, guint, GParameter *) = NULL;
+  gpointer obj;
+
+  if (!g_object_newv_real)
+    g_object_newv_real = dlsym (RTLD_NEXT, "g_object_newv");
+
+  obj = g_object_newv_real (object_type, n_parameters, parameters);
+
+  if (GST_IS_PIPELINE (obj)) {
+    gst_qa_preload_wrap (obj);
+  }
+
+  return obj;
+}