2 * Copyright (C) 1999,2000 Erik Walthinsen <omega@cse.ogi.edu>
3 * 2000 Wim Taymans <wtay@chello.be>
4 * 2002 Andy Wingo <wingo@pobox.com>
6 * gstparse.c: get a pipeline from a text pipeline description
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Library General Public
10 * License as published by the Free Software Foundation; either
11 * version 2 of the License, or (at your option) any later version.
13 * This library is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Library General Public License for more details.
18 * You should have received a copy of the GNU Library General Public
19 * License along with this library; if not, write to the
20 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
21 * Boston, MA 02111-1307, USA.
28 #include "parse/types.h"
30 typedef struct _gst_parse_delayed_pad gst_parse_delayed_pad;
31 struct _gst_parse_delayed_pad
41 GstElement *target_element;
48 gst_parse_error_quark (void)
50 static GQuark quark = 0;
52 quark = g_quark_from_static_string ("gst_parse_error");
56 G_GNUC_UNUSED static void
57 dynamic_connect (GstElement * element, GstPad * newpad, gpointer data)
59 dynamic_connection_t *dc = (dynamic_connection_t *) data;
62 /* do we know the exact srcpadname? */
64 /* see if this is the one */
65 if (strcmp (gst_pad_get_name (newpad), dc->srcpadname)) {
70 /* try to find a target pad if we don't know it yet */
71 if (!dc->target_pad) {
72 if (!GST_PAD_IS_CONNECTED (newpad)) {
73 dc->target_pad = gst_element_get_compatible_pad (dc->target_element, newpad);
80 if (!GST_PAD_IS_CONNECTED (dc->target_pad) && !GST_PAD_IS_CONNECTED (newpad)) {
81 gst_element_set_state (dc->pipeline, GST_STATE_PAUSED);
82 if (!gst_pad_connect (newpad, dc->target_pad) && warn) {
83 g_warning ("could not connect %s:%s to %s:%s", GST_DEBUG_PAD_NAME (newpad),
84 GST_DEBUG_PAD_NAME (dc->target_pad));
86 gst_element_set_state (dc->pipeline, GST_STATE_PLAYING);
91 make_elements (graph_t *g, GError **error)
97 if (!(g->bins || g->elements)) {
100 GST_PARSE_ERROR_SYNTAX,
105 if (g->current_bin_type)
106 bin_type = g->current_bin_type;
108 bin_type = "pipeline";
110 if (!(g->bin = gst_element_factory_make (bin_type, NULL))) {
113 GST_PARSE_ERROR_NO_SUCH_ELEMENT,
114 "No such bin type %s", bin_type);
120 e = (element_t*)l->data;
121 if (!(e->element = gst_element_factory_make (e->type, NULL))) {
124 GST_PARSE_ERROR_NO_SUCH_ELEMENT,
125 "No such element %s", e->type);
128 gst_bin_add (GST_BIN (g->bin), e->element);
134 if (!make_elements ((graph_t*)l->data, error))
136 gst_bin_add (GST_BIN (g->bin), ((graph_t*)l->data)->bin);
144 set_properties (graph_t *g, GError **error)
153 e = (element_t*)l->data;
154 l2 = e->property_values;
156 p = (property_t*)l2->data;
157 if ((pspec = g_object_class_find_property (G_OBJECT_GET_CLASS (e->element), p->name))) {
158 g_object_set_property (G_OBJECT (e->element), p->name, p->value);
162 GST_PARSE_ERROR_NO_SUCH_PROPERTY,
163 "No such property '%s' in element '%s'",
164 p->name, GST_OBJECT_NAME (GST_OBJECT (e->element)));
167 l2 = g_list_next (l2);
174 if (!set_properties ((graph_t*)l->data, error))
183 find_element_by_index_recurse (graph_t *g, gint i)
191 e = (element_t*)l->data;
200 if ((element = find_element_by_index_recurse ((graph_t*)l->data, i)))
209 find_element_by_index (graph_t *g, gint i)
214 return find_element_by_index_recurse (g, i);
218 make_connections (graph_t *g, GError **error)
222 dynamic_connection_t *dc;
223 GstElement *src, *sink;
225 GstPadTemplate *pt1, *pt2;
229 c = (connection_t*)l->data;
231 if (!(src = gst_bin_get_by_name (GST_BIN (g->bin), c->src_name))) {
234 GST_PARSE_ERROR_NO_SUCH_ELEMENT,
235 "No such element '%s'",
240 src = find_element_by_index (g, c->src_index);
244 if (!(sink = gst_bin_get_by_name (GST_BIN (g->bin), c->sink_name))) {
247 GST_PARSE_ERROR_NO_SUCH_ELEMENT,
248 "No such element '%s'",
253 sink = find_element_by_index (g, c->sink_index);
259 /* g_print ("a: %p, b: %p\n", a, b); */
261 /* balanced multipad connection */
263 p1 = gst_element_get_pad (src, (gchar*)a->data);
264 p2 = gst_element_get_pad (sink, (gchar*)b->data);
267 goto could_not_get_pad_b;
269 if (!p1 && p2 && (pt1 = gst_element_get_pad_template (src, (gchar*)a->data)) &&
270 pt1->presence == GST_PAD_SOMETIMES) {
271 dc = g_new0 (dynamic_connection_t, 1);
272 dc->srcpadname = (gchar*)a->data;
274 dc->target_element = sink;
275 dc->pipeline = g->bin;
277 GST_DEBUG (GST_CAT_PIPELINE, "setting up dynamic connection %s:%s and %s:%s",
278 GST_OBJECT_NAME (GST_OBJECT (src)),
279 (gchar*)a->data, GST_DEBUG_PAD_NAME (p2));
281 g_signal_connect (G_OBJECT (src), "new_pad", G_CALLBACK (dynamic_connect), dc);
283 goto could_not_get_pad_a;
284 } else if (!gst_pad_connect (p1, p2)) {
285 goto could_not_connect_pads;
291 if ((pt1 = gst_element_get_pad_template (src, (gchar*)a->data))) {
292 if ((p1 = gst_element_get_pad (src, (gchar*)a->data)) || pt1->presence == GST_PAD_SOMETIMES) {
294 /* sigh, a hack until i fix the gstelement api... */
295 if ((pt2 = gst_element_get_compatible_pad_template (sink, pt1))) {
296 if ((p2 = gst_element_get_pad (sink, pt2->name_template))) {
297 dc = g_new0 (dynamic_connection_t, 1);
298 dc->srcpadname = (gchar*)a->data;
300 dc->target_element = NULL;
301 dc->pipeline = g->bin;
303 GST_DEBUG (GST_CAT_PIPELINE, "setting up dynamic connection %s:%s and %s:%s",
304 GST_OBJECT_NAME (GST_OBJECT (src)),
305 (gchar*)a->data, GST_DEBUG_PAD_NAME (p2));
307 g_signal_connect (G_OBJECT (src), "new_pad", G_CALLBACK (dynamic_connect), dc);
310 /* both pt1 and pt2 are sometimes templates. sheesh. */
311 goto both_templates_have_sometimes_presence;
314 /* if the target pad has no padtemplate we will figure out a target
316 dc = g_new0 (dynamic_connection_t, 1);
317 dc->srcpadname = NULL;
318 dc->target_pad = NULL;
319 dc->target_element = sink;
320 dc->pipeline = g->bin;
322 GST_DEBUG (GST_CAT_PIPELINE, "setting up dynamic connection %s:%s, and some pad in %s",
323 GST_OBJECT_NAME (GST_OBJECT (src)),
324 (gchar*)a->data, GST_OBJECT_NAME (sink));
326 g_signal_connect (G_OBJECT (src), "new_pad", G_CALLBACK (dynamic_connect), dc);
330 goto could_not_get_compatible_to_a;
333 goto could_not_get_pad_a;
336 goto could_not_get_pad_a;
339 if (!gst_pad_connect (p1, p2)) {
340 goto could_not_connect_pads;
343 /* we don't support dynamic connections on this side yet, if ever */
344 if (!(p2 = gst_element_get_pad (sink, (gchar*)b->data))) {
345 goto could_not_get_pad_b;
347 if (!(p1 = gst_element_get_compatible_pad (src, p2))) {
348 goto could_not_get_compatible_to_b;
350 if (!gst_pad_connect (p1, p2)) {
351 goto could_not_connect_pads;
354 if (!gst_element_connect (src, sink)) {
355 goto could_not_connect_elements;
364 if (!make_connections ((graph_t*)l->data, error))
374 GST_PARSE_ERROR_CONNECT,
375 "Could not get a pad %s from element %s",
376 (gchar*)a->data, GST_OBJECT_NAME (src));
381 GST_PARSE_ERROR_CONNECT,
382 "Could not get a pad %s from element %s",
383 (gchar*)b->data, GST_OBJECT_NAME (sink));
385 could_not_get_compatible_to_a:
388 GST_PARSE_ERROR_CONNECT,
389 "Could not find a compatible pad in element %s to for %s:%s",
390 GST_OBJECT_NAME (sink), GST_OBJECT_NAME (src), (gchar*)a->data);
392 could_not_get_compatible_to_b:
395 GST_PARSE_ERROR_CONNECT,
396 "Could not find a compatible pad in element %s to for %s:%s",
397 GST_OBJECT_NAME (src), GST_OBJECT_NAME (sink), (gchar*)b->data);
399 both_templates_have_sometimes_presence:
402 GST_PARSE_ERROR_CONNECT,
403 "Both %s:%s and %s:%s have GST_PAD_SOMETIMES presence, operation not supported",
404 GST_OBJECT_NAME (src), pt1->name_template, GST_OBJECT_NAME (sink), pt2->name_template);
406 could_not_connect_pads:
409 GST_PARSE_ERROR_CONNECT,
410 "Could not connect %s:%s to %s:%s",
411 GST_DEBUG_PAD_NAME (p1),
412 GST_DEBUG_PAD_NAME (p2));
414 could_not_connect_elements:
417 GST_PARSE_ERROR_CONNECT,
418 "Could not connect element %s to %s",
419 GST_OBJECT_NAME (src),
420 GST_OBJECT_NAME (sink));
425 pipeline_from_graph (graph_t *g, GError **error)
427 if (!make_elements (g, error))
430 if (!set_properties (g, error))
433 if (!make_connections (g, error))
436 return (GstBin*)g->bin;
441 * @argv: null-terminated array of arguments
442 * @error: pointer to GError
444 * Create a new pipeline based on command line syntax.
446 * Returns: a new pipeline on success, NULL on failure and error
447 * will contain the error message.
450 gst_parse_launchv (const gchar **argv, GError **error)
454 const gchar **argvp, *arg;
457 /* let's give it a nice size. */
458 str = g_string_sized_new (1024);
463 tmp = _gst_parse_escape (arg);
464 g_string_append (str, tmp);
466 g_string_append (str, " ");
470 pipeline = gst_parse_launch (str->str, error);
472 g_string_free (str, TRUE);
477 gchar *_gst_parse_escape (const gchar *str)
479 GString *gstr = NULL;
481 g_return_val_if_fail (str != NULL, NULL);
483 gstr = g_string_sized_new (strlen (str));
487 g_string_append_c (gstr, '\\');
488 g_string_append_c (gstr, *str);
495 void _gst_parse_unescape (gchar *str)
499 g_return_if_fail (str != NULL);
515 * @pipeline_description: the command line describing the pipeline
516 * @error: the error message in case of a failure
518 * Create a new pipeline based on command line syntax.
520 * Returns: a new bin on success, NULL on failure. By default the bin is
521 * a GstPipeline, but it depends on the pipeline_description.
524 gst_parse_launch (const gchar * pipeline_description, GError **error)
527 static GStaticMutex flex_lock = G_STATIC_MUTEX_INIT;
529 g_return_val_if_fail (pipeline_description != NULL, NULL);
531 GST_INFO (GST_CAT_PIPELINE, "parsing pipeline description %s",
532 pipeline_description);
534 /* the need for the mutex will go away with flex 2.5.6 */
535 g_static_mutex_lock (&flex_lock);
536 graph = _gst_parse_launch (pipeline_description, error);
537 g_static_mutex_unlock (&flex_lock);
542 return pipeline_from_graph (graph, error);