gstreamer/tools/gstreamer-launch.c
Erik Walthinsen ddfc781f7d fixed problems with -launch
Original commit message from CVS:
fixed problems with -launch
2001-01-04 20:34:39 +00:00

364 lines
11 KiB
C

#include <glib.h>
#include <gst/gst.h>
#include <string.h>
#include <stdlib.h>
guint bincount = 0;
guint threadcount = 0;
gint binlevel = 0;
GHashTable *elementcounts;
gboolean verbose = FALSE;
gboolean debug = FALSE;
#define DEBUG(format,args...) G_STMT_START{ \
if (debug) { \
int ___i; \
for (___i=0;___i<binlevel*2;___i++) fprintf(stderr," "); \
fprintf(stderr, format , ## args ); \
} \
}G_STMT_END
#define DEBUG_NOPREFIX(format,args...) G_STMT_START{ if (debug) fprintf(stderr, format , ## args ); }G_STMT_END
#define VERBOSE(format,args...) G_STMT_START{ \
if (verbose) { \
int ___i; \
for (___i=0;___i<binlevel*2;___i++) fprintf(stderr," "); \
fprintf(stderr, format , ## args ); \
} \
}G_STMT_END
typedef struct _launch_delayed_pad launch_delayed_pad;
struct _launch_delayed_pad {
gchar *name;
GstPad *peer;
};
void launch_newpad(GstElement *element,GstPad *pad,launch_delayed_pad *peer) {
gst_info("have NEW_PAD signal\n");
// if it matches, connect it
if (!strcmp(gst_pad_get_name(pad),peer->name)) {
gst_pad_connect(pad,peer->peer);
gst_info("delayed connect of '%s' to '%s'\n",
gst_pad_get_name(pad),gst_pad_get_name(peer->peer));
}
}
gchar *unique_name(gchar *type) {
gint count;
count = GPOINTER_TO_INT(g_hash_table_lookup(elementcounts,type));
count++;
g_hash_table_insert(elementcounts,type,GINT_TO_POINTER(count));
return g_strdup_printf("%s%d",type,count-1);
}
// element ! [ element ! (element ! element )] ! element
// 0 1 2 3 4 5 6 7 8 9 10 11
// 0 1 2 3 4 5 8
// 0 1 2 3 6
gint parse_cmdline(int argc,char *argv[],GstBin *parent) {
gint i = 0;
gchar *arg;
GstElement *element = NULL, *previous = NULL, *prevelement = NULL;
gchar closingchar;
gint len;
gchar *ptr;
gchar *sinkpadname = NULL, *srcpadname = NULL;
GstPad *sinkpad = NULL, *srcpad = NULL;
GList *pads;
gint elementcount = 0;
gint retval = 0;
binlevel++;
if (GST_IS_PIPELINE(parent)) closingchar = '\0',DEBUG("in pipeline ");
else if (GST_IS_THREAD(parent)) closingchar = '}',DEBUG("in thread ");
else closingchar = ')',DEBUG("in bin ");
DEBUG_NOPREFIX("%s\n",gst_element_get_name (GST_ELEMENT (parent)));
while (i < argc) {
arg = argv[i];
len = strlen(arg);
element = NULL;
DEBUG("** ARGUMENT is '%s'\n",arg);
// a null that slipped through the reconstruction
if (len == 0) {
DEBUG("random arg, FIXME\n");
i++;
continue;
// end of the container
} else if (arg[0] == closingchar) {
// time to finish off this bin
DEBUG("exiting container %s\n",gst_element_get_name (GST_ELEMENT (parent)));
retval = i+1;
break;
// a pad connection
} else if ((ptr = strchr(arg,'!'))) {
DEBUG("attempting to connect pads together....\n");
// if it starts with the !
if (arg[0] == '!') {
srcpadname = NULL;
// if there's a sinkpad...
if (len > 1)
sinkpadname = &arg[1];
else
sinkpadname = NULL;
} else {
srcpadname = g_strndup(arg,(ptr-arg));
// if there's a sinkpad
if (len > (ptr-arg)+1)
sinkpadname = &ptr[1];
else
sinkpadname = NULL;
}
DEBUG("have sinkpad %s, srcpad %s\n",sinkpadname,srcpadname);
srcpad = NULL;
// if the srcpadname doesn't have any commas in it, find an actual pad
if (!srcpadname || !strchr(srcpadname,',')) {
if (srcpadname != NULL) {
srcpad = gst_element_get_pad(previous,srcpadname);
if (!srcpad)
VERBOSE("NO SUCH pad %s in element %s\n",srcpadname,gst_element_get_name(previous));
}
if (srcpad == NULL) {
// check through the list to find the first sink pad
pads = gst_element_get_pad_list(previous);
while (pads) {
srcpad = GST_PAD(pads->data);
pads = g_list_next (pads);
if (gst_pad_get_direction (srcpad) == GST_PAD_SRC) break;
srcpad = NULL;
}
}
if (!srcpad) DEBUG("error, can't find a src pad!!!\n");
else DEBUG("have src pad %s:%s\n",GST_DEBUG_PAD_NAME(srcpad));
}
// argument with = in it
} else if (strstr(arg, "=")) {
gchar * argname;
gchar * argval;
gchar * pos = strstr(arg, "=");
// we have an argument
argname = arg;
pos[0] = '\0';
argval = pos+1;
DEBUG("attempting to set argument '%s' to '%s' on element '%s'\n",
argname,argval,gst_element_get_name(previous));
gtk_object_set(GTK_OBJECT(previous),argname,argval,NULL);
g_free(argname);
// element or argument, or beginning of bin or thread
} else {
DEBUG("have element or bin/thread\n");
// if we have a bin or thread starting
if (strchr("({",arg[0])) {
if (arg[0] == '(') {
// create a bin and add it to the current parent
element = gst_bin_new(g_strdup_printf("bin%d",bincount++));
VERBOSE("CREATED bin %s\n",gst_element_get_name(element));
} else if (arg[0] == '{') {
// create a thread and add it to the current parent
element = gst_thread_new(g_strdup_printf("thread%d",threadcount++));
VERBOSE("CREATED thread %s\n",gst_element_get_name(element));
}
i += parse_cmdline(argc - i, argv + i + 1, GST_BIN (element));
} else {
// we have an element
DEBUG("attempting to create element '%s'\n",arg);
element = gst_elementfactory_make(arg,unique_name(arg));
VERBOSE("CREATED element %s\n",gst_element_get_name(element));
DEBUG("created element %s\n",gst_element_get_name(element));
}
gst_bin_add (GST_BIN (parent), element);
elementcount++;
if (srcpad != NULL) {
DEBUG("need to connect to sinkpad %s:%s\n",GST_DEBUG_PAD_NAME(srcpad));
sinkpad = NULL;
if (sinkpadname != NULL)
sinkpad = gst_element_get_pad(previous,sinkpadname);
if (!sinkpad) {
// check through the list to find the first sink pad
pads = gst_element_get_pad_list(element);
while (pads) {
sinkpad = GST_PAD(pads->data);
pads = g_list_next (pads);
if (gst_pad_get_direction (sinkpad) == GST_PAD_SINK) break;
sinkpad = NULL;
}
}
if (!sinkpad) DEBUG("error, can't find a sink pad!!!\n");
else DEBUG("have sink pad %s:%s\n",GST_DEBUG_PAD_NAME(sinkpad));
VERBOSE("CONNECTING %s:%s and %s:%s\n",GST_DEBUG_PAD_NAME(srcpad),GST_DEBUG_PAD_NAME(sinkpad));
gst_pad_connect(srcpad,sinkpad);
sinkpad = NULL;
srcpad = NULL;
}
// if we're the first element, ghost all the sinkpads
if (elementcount == 1) {
DEBUG("first element, ghosting all of %s's sink pads to parent %s\n",
gst_element_get_name(element),gst_element_get_name(GST_ELEMENT(parent)));
pads = gst_element_get_pad_list (element);
while (pads) {
sinkpad = GST_PAD (pads->data);
pads = g_list_next (pads);
if (!sinkpad) DEBUG("much oddness, pad doesn't seem to exist\n");
else if (gst_pad_get_direction (sinkpad) == GST_PAD_SINK) {
gst_element_add_ghost_pad (GST_ELEMENT (parent), sinkpad);
DEBUG("ghosted %s:%s\n",GST_DEBUG_PAD_NAME(sinkpad));
}
}
}
previous = element;
if (!GST_IS_BIN(element)) prevelement = element;
}
i++;
}
// ghost all the src pads of the bin
if (prevelement != NULL) {
DEBUG("last element, ghosting all of %s's src pads to parent %s\n",
gst_element_get_name(prevelement),gst_element_get_name(GST_ELEMENT(parent)));
pads = gst_element_get_pad_list (prevelement);
while (pads) {
srcpad = GST_PAD (pads->data);
pads = g_list_next (pads);
if (!srcpad) DEBUG("much oddness, pad doesn't seem to exist\n");
else if (gst_pad_get_direction (srcpad) == GST_PAD_SRC) {
gst_element_add_ghost_pad (GST_ELEMENT (parent), srcpad);
DEBUG("ghosted %s:%s\n",GST_DEBUG_PAD_NAME(srcpad));
}
}
}
binlevel--;
if (retval) return retval;
if (closingchar != '\0')
DEBUG("returning IN THE WRONG PLACE\n");
else DEBUG("ending pipeline\n");
return i+1;
}
gint parse(int argc,char *argv[],GstBin *parent) {
char **argvn;
gchar *cmdline;
gint newargc;
gint len;
int i,j,k;
// make a null-terminated version of argv
argvn = g_new0(char *,argc+1);
memcpy(argvn,argv,sizeof(char*)*argc);
// join the argvs together
cmdline = g_strjoinv(" ",argvn);
// free the null-terminated argv
g_free(argvn);
// first walk through quickly and see how many more slots we need
len = strlen(cmdline);
newargc = 1;
for (i=0;i<len;i++) {
// if it's a space, it denotes a new arg
if (cmdline[i] == ' ') newargc++;
// if it's a brace and isn't followed by a space, give it an arg
if (strchr("([{}])",cmdline[i])) {
// not followed by space, gets one
if (cmdline[i+1] != ' ') newargc++;
}
}
// now allocate the new argv array
argvn = g_new0(char *,newargc+1);
DEBUG("supposed to have %d args\n",newargc);
// now attempt to construct the new arg list
j = 0;k = 0;
for (i=0;i<len+1;i++) {
// if it's a delimiter
if (strchr("([{}]) ",cmdline[i]) || (cmdline[i] == '\0')) {
// extract the previous arg
if (i-k > 0) {
if (cmdline[k] == ' ') k++;
argvn[j] = g_new0(char,(i-k)+1);
memcpy(argvn[j],&cmdline[k],i-k);
// catch misparses
if (strlen(argvn[j]) > 0) j++;
}
k = i;
// if this is a bracket, construct a word
if ((cmdline[i] != ' ') && (cmdline[i] != '\0')) {
argvn[j++] = g_strdup_printf("%c",cmdline[i]);
k++;
}
}
}
// print them out
for (i=0;i<newargc;i++) {
DEBUG("arg %d is: %s\n",i,argvn[i]);
}
// set up the elementcounts hash
elementcounts = g_hash_table_new(g_str_hash,g_str_equal);
return parse_cmdline(newargc,argvn,parent);
}
int main(int argc,char *argv[]) {
GstElement *pipeline;
int firstarg;
guint i;
gst_init(&argc,&argv);
firstarg = 1;
while ((argv[firstarg][0] == '-') && (argv[firstarg][1] == '-')) {
if (strcmp(&argv[firstarg][2],"verbose") == 0)
verbose = TRUE;
else if (strcmp(&argv[firstarg][2],"debug") == 0)
debug = TRUE;
firstarg++;
}
pipeline = gst_pipeline_new("launch");
VERBOSE("CREATED pipeline %s\n",gst_element_get_name(pipeline));
parse(argc - firstarg,argv + firstarg,GST_BIN (pipeline));
VERBOSE("RUNNING pipeline\n");
gst_element_set_state(pipeline,GST_STATE_PLAYING);
while(1)
gst_bin_iterate (GST_BIN (pipeline));
fprintf(stderr,"\n");
return 0;
}