gst/gst.c: Fix missing g_strdup() and double free when using the
[platform/upstream/gstreamer.git] / gst / gst.c
1 /* GStreamer
2  * Copyright (C) 1999,2000 Erik Walthinsen <omega@cse.ogi.edu>
3  *                    2000 Wim Taymans <wtay@chello.be>
4  *
5  * gst.c: Initialization and non-pipeline operations
6  *
7  * This library is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Library General Public
9  * License as published by the Free Software Foundation; either
10  * version 2 of the License, or (at your option) any later version.
11  *
12  * This library is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Library General Public License for more details.
16  *
17  * You should have received a copy of the GNU Library General Public
18  * License along with this library; if not, write to the
19  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
20  * Boston, MA 02111-1307, USA.
21  */
22
23 /**
24  * SECTION:gst
25  * @short_description: Media library supporting arbitrary formats and filter
26  *                     graphs.
27  * @see_also: Check out both <ulink url="http://www.cse.ogi.edu/sysl/">OGI's
28  *            pipeline</ulink> and Microsoft's DirectShow for some background.
29  *
30  * GStreamer is a framework for constructing graphs of various filters
31  * (termed elements here) that will handle streaming media.  Any discreet
32  * (packetizable) media type is supported, with provisions for automatically
33  * determining source type.  Formatting/framing information is provided with
34  * a powerful negotiation framework.  Plugins are heavily used to provide for
35  * all elements, allowing one to construct plugins outside of the GST
36  * library, even released binary-only if license require (please don't).
37  *
38  * GStreamer borrows heavily from both the <ulink
39  * url="http://www.cse.ogi.edu/sysl/">OGI media pipeline</ulink> and
40  * Microsoft's DirectShow, hopefully taking the best of both and leaving the
41  * cruft behind.  Its interface is still very fluid and thus can be changed
42  * to increase the sanity/noise ratio.
43  *
44  * The <application>GStreamer</application> library should be initialized with
45  * gst_init() before it can be used. You should pass pointers to the main argc
46  * and argv variables so that GStreamer can process its own command line
47  * options, as shown in the following example.
48  *
49  * <example>
50  * <title>Initializing the gstreamer library</title>
51  * <programlisting language="c">
52  * int
53  * main (int argc, char *argv[])
54  * {
55  *   // initialize the GStreamer library
56  *   gst_init (&amp;argc, &amp;argv);
57  *   ...
58  * }
59  * </programlisting>
60  * </example>
61  *
62  * It's allowed to pass two NULL pointers to gst_init() in case you don't want
63  * to pass the command line args to GStreamer.
64  *
65  * You can also use GOption to initialize your own parameters as shown in
66  * the next code fragment:
67  * <example>
68  * <title>Initializing own parameters when initializing gstreamer</title>
69  * <programlisting>
70  * static gboolean stats = FALSE;
71  * ...
72  * int
73  * main (int argc, char *argv[])
74  * {
75  *  GOptionEntry options[] = {
76  *   {"tags", 't', 0, G_OPTION_ARG_NONE, &amp;tags,
77  *       N_("Output tags (also known as metadata)"), NULL},
78  *   {NULL}
79  *  };
80  *  ctx = g_option_context_new ("gst-launch");
81  *  g_option_context_add_main_entries (ctx, options, GETTEXT_PACKAGE);
82  *  g_option_context_add_group (ctx, gst_init_get_option_group ());
83  *  if (!g_option_context_parse (ctx, &amp;argc, &amp;argv, &amp;err)) {
84  *    g_print ("Error initializing: &percnt;s\n", GST_STR_NULL (err->message));
85  *    exit (1);
86  *  }
87  *  g_option_context_free (ctx);
88  * ...
89  * }
90  * </programlisting>
91  * </example>
92  *
93  * Use gst_version() to query the library version at runtime or use the
94  * GST_VERSION_* macros to find the version at compile time. Optionally
95  * gst_version_string() returns a printable string.
96  *
97  * The gst_deinit() call is used to clean up all internal resources used
98  * by <application>GStreamer</application>. It is mostly used in unit tests 
99  * to check for leaks.
100  *
101  * Last reviewed on 2005-11-23 (0.9.5)
102  */
103
104 #include "gst_private.h"
105 #include <stdlib.h>
106 #include <stdio.h>
107 #include <sys/types.h>
108 #ifdef HAVE_FORK
109 #include <sys/wait.h>
110 #endif //HAVE_FORK
111 #include <unistd.h>
112
113 #include "gst-i18n-lib.h"
114 #include <locale.h>             /* for LC_ALL */
115
116 #include "gst.h"
117
118 #define GST_CAT_DEFAULT GST_CAT_GST_INIT
119
120 #define MAX_PATH_SPLIT  16
121 #define GST_PLUGIN_SEPARATOR ","
122
123 static gboolean gst_initialized = FALSE;
124
125 #ifndef GST_DISABLE_REGISTRY
126 static GList *plugin_paths = NULL;      /* for delayed processing in post_init */
127 #endif
128
129 extern gint _gst_trace_on;
130
131 /* set to TRUE when segfaults need to be left as is */
132 gboolean _gst_disable_segtrap = FALSE;
133
134
135 static void load_plugin_func (gpointer data, gpointer user_data);
136 static gboolean init_pre (void);
137 static gboolean init_post (void);
138 static gboolean parse_goption_arg (const gchar * s_opt,
139     const gchar * arg, gpointer data, GError ** err);
140
141 static GSList *preload_plugins = NULL;
142
143 const gchar g_log_domain_gstreamer[] = "GStreamer";
144
145 static void
146 debug_log_handler (const gchar * log_domain,
147     GLogLevelFlags log_level, const gchar * message, gpointer user_data)
148 {
149   g_log_default_handler (log_domain, log_level, message, user_data);
150   /* FIXME: do we still need this ? fatal errors these days are all
151    * other than core errors */
152   /* g_on_error_query (NULL); */
153 }
154
155 enum
156 {
157   ARG_VERSION = 1,
158   ARG_FATAL_WARNINGS,
159 #ifndef GST_DISABLE_GST_DEBUG
160   ARG_DEBUG_LEVEL,
161   ARG_DEBUG,
162   ARG_DEBUG_DISABLE,
163   ARG_DEBUG_NO_COLOR,
164   ARG_DEBUG_HELP,
165 #endif
166   ARG_PLUGIN_SPEW,
167   ARG_PLUGIN_PATH,
168   ARG_PLUGIN_LOAD,
169   ARG_SEGTRAP_DISABLE
170 };
171
172 /* debug-spec ::= category-spec [, category-spec]*
173  * category-spec ::= category:val | val
174  * category ::= [^:]+
175  * val ::= [0-5]
176  */
177
178 #ifndef NUL
179 #define NUL '\0'
180 #endif
181
182 #ifndef GST_DISABLE_GST_DEBUG
183 static gboolean
184 parse_debug_category (gchar * str, const gchar ** category)
185 {
186   if (!str)
187     return FALSE;
188
189   /* works in place */
190   g_strstrip (str);
191
192   if (str[0] != NUL) {
193     *category = str;
194     return TRUE;
195   }
196
197   return FALSE;
198 }
199
200 static gboolean
201 parse_debug_level (gchar * str, gint * level)
202 {
203   if (!str)
204     return FALSE;
205
206   /* works in place */
207   g_strstrip (str);
208
209   if (str[0] != NUL && str[1] == NUL
210       && str[0] >= '0' && str[0] < '0' + GST_LEVEL_COUNT) {
211     *level = str[0] - '0';
212     return TRUE;
213   }
214
215   return FALSE;
216 }
217
218 static void
219 parse_debug_list (const gchar * list)
220 {
221   gchar **split;
222   gchar **walk;
223
224   g_return_if_fail (list != NULL);
225
226   split = g_strsplit (list, ",", 0);
227
228   for (walk = split; *walk; walk++) {
229     if (strchr (*walk, ':')) {
230       gchar **values = g_strsplit (*walk, ":", 2);
231
232       if (values[0] && values[1]) {
233         gint level;
234         const gchar *category;
235
236         if (parse_debug_category (values[0], &category)
237             && parse_debug_level (values[1], &level))
238           gst_debug_set_threshold_for_name (category, level);
239       }
240
241       g_strfreev (values);
242     } else {
243       gint level;
244
245       if (parse_debug_level (*walk, &level))
246         gst_debug_set_default_threshold (level);
247     }
248   }
249
250   g_strfreev (split);
251 }
252 #endif
253
254 /**
255  * gst_init_get_option_group:
256  *
257  * Returns a #GOptionGroup with GStreamer's argument specifications. The
258  * group is set up to use standard GOption callbacks, so when using this
259  * group in combination with GOption parsing methods, all argument parsing
260  * and initialization is automated.
261  *
262  * This function is useful if you want to integrate GStreamer with other
263  * libraries that use GOption (see g_option_context_add_group() ).
264  *
265  * Returns: a pointer to GStreamer's option group. Should be dereferenced
266  * after use.
267  */
268
269 GOptionGroup *
270 gst_init_get_option_group (void)
271 {
272   GOptionGroup *group;
273   static GOptionEntry gst_args[] = {
274     {"gst-version", 0, G_OPTION_FLAG_NO_ARG, G_OPTION_ARG_CALLBACK,
275         parse_goption_arg, N_("Print the GStreamer version"), NULL},
276     {"gst-fatal-warnings", 0, G_OPTION_FLAG_NO_ARG, G_OPTION_ARG_CALLBACK,
277         parse_goption_arg, N_("Make all warnings fatal"), NULL},
278 #ifndef GST_DISABLE_GST_DEBUG
279     {"gst-debug-help", 0, G_OPTION_FLAG_NO_ARG, G_OPTION_ARG_CALLBACK,
280           parse_goption_arg, N_("Print available debug categories and exit"),
281         NULL},
282     {"gst-debug-level", 0, 0, G_OPTION_ARG_CALLBACK, parse_goption_arg,
283           N_("Default debug level from 1 (only error) to 5 (anything) or "
284               "0 for no output"),
285         N_("LEVEL")},
286     {"gst-debug", 0, 0, G_OPTION_ARG_CALLBACK, parse_goption_arg,
287           N_("Comma-separated list of category_name:level pairs to set "
288               "specific levels for the individual categories. Example: "
289               "GST_AUTOPLUG:5,GST_ELEMENT_*:3"),
290         N_("LIST")},
291     {"gst-debug-no-color", 0, G_OPTION_FLAG_NO_ARG, G_OPTION_ARG_CALLBACK,
292         parse_goption_arg, N_("Disable colored debugging output"), NULL},
293     {"gst-debug-disable", 0, G_OPTION_FLAG_NO_ARG, G_OPTION_ARG_CALLBACK,
294         parse_goption_arg, N_("Disable debugging"), NULL},
295 #endif
296     {"gst-plugin-spew", 0, G_OPTION_FLAG_NO_ARG, G_OPTION_ARG_CALLBACK,
297           parse_goption_arg, N_("Enable verbose plugin loading diagnostics"),
298         NULL},
299     {"gst-plugin-path", 0, 0, G_OPTION_ARG_CALLBACK, parse_goption_arg,
300         N_("Colon-separated paths containing plugins"), N_("PATHS")},
301     {"gst-plugin-load", 0, 0, G_OPTION_ARG_CALLBACK, parse_goption_arg,
302           N_("Comma-separated list of plugins to preload in addition to the "
303               "list stored in environment variable GST_PLUGIN_PATH"),
304         N_("PLUGINS")},
305     {"gst-disable-segtrap", 0, G_OPTION_FLAG_NO_ARG, G_OPTION_ARG_CALLBACK,
306           parse_goption_arg,
307           N_("Disable trapping of segmentation faults during plugin loading"),
308         NULL},
309     {NULL}
310   };
311
312   group = g_option_group_new ("gst", _("GStreamer Options"),
313       _("Show GStreamer Options"), NULL, NULL);
314   g_option_group_set_parse_hooks (group, (GOptionParseFunc) init_pre,
315       (GOptionParseFunc) init_post);
316
317   g_option_group_add_entries (group, gst_args);
318   g_option_group_set_translation_domain (group, GETTEXT_PACKAGE);
319
320   return group;
321 }
322
323 /**
324  * gst_init_check:
325  * @argc: pointer to application's argc
326  * @argv: pointer to application's argv
327  * @err: pointer to a #GError to which a message will be posted on error
328  *
329  * Initializes the GStreamer library, setting up internal path lists,
330  * registering built-in elements, and loading standard plugins.
331  *
332  * This function will return %FALSE if GStreamer could not be initialized
333  * for some reason.  If you want your program to fail fatally,
334  * use gst_init() instead.
335  *
336  * Returns: %TRUE if GStreamer could be initialized.
337  */
338 gboolean
339 gst_init_check (int *argc, char **argv[], GError ** err)
340 {
341   GOptionGroup *group;
342   GOptionContext *ctx;
343   gboolean res;
344
345   if (gst_initialized) {
346     GST_DEBUG ("already initialized gst");
347     return TRUE;
348   }
349
350   ctx = g_option_context_new ("- GStreamer initialization");
351   g_option_context_set_ignore_unknown_options (ctx, TRUE);
352   group = gst_init_get_option_group ();
353   g_option_context_add_group (ctx, group);
354   res = g_option_context_parse (ctx, argc, argv, err);
355   g_option_context_free (ctx);
356
357   if (res) {
358     gst_initialized = TRUE;
359   }
360
361   return res;
362 }
363
364 /**
365  * gst_init:
366  * @argc: pointer to application's argc
367  * @argv: pointer to application's argv
368  *
369  * Initializes the GStreamer library, setting up internal path lists,
370  * registering built-in elements, and loading standard plugins.
371  *
372  * <note><para>
373  * This function will terminate your program if it was unable to initialize
374  * GStreamer for some reason.  If you want your program to fall back,
375  * use gst_init_check() instead.
376  * </para></note>
377  *
378  * WARNING: This function does not work in the same way as corresponding
379  * functions in other glib-style libraries, such as gtk_init().  In
380  * particular, unknown command line options cause this function to
381  * abort program execution.
382  */
383 void
384 gst_init (int *argc, char **argv[])
385 {
386   GError *err = NULL;
387
388   if (!gst_init_check (argc, argv, &err)) {
389     g_print ("Could not initialized GStreamer: %s\n",
390         err ? err->message : "unknown error occurred");
391     if (err) {
392       g_error_free (err);
393     }
394     exit (1);
395   }
396 }
397
398 #ifndef GST_DISABLE_REGISTRY
399 static void
400 add_path_func (gpointer data, gpointer user_data)
401 {
402   GST_INFO ("Adding plugin path: \"%s\", will scan later", (gchar *) data);
403   plugin_paths = g_list_append (plugin_paths, g_strdup (data));
404 }
405 #endif
406
407 static void
408 prepare_for_load_plugin_func (gpointer data, gpointer user_data)
409 {
410   preload_plugins = g_slist_prepend (preload_plugins, g_strdup (data));
411 }
412
413 static void
414 load_plugin_func (gpointer data, gpointer user_data)
415 {
416   GstPlugin *plugin;
417   const gchar *filename;
418   GError *err = NULL;
419
420   filename = (const gchar *) data;
421
422   plugin = gst_plugin_load_file (filename, &err);
423
424   if (plugin) {
425     GST_INFO ("Loaded plugin: \"%s\"", filename);
426
427     gst_default_registry_add_plugin (plugin);
428   } else {
429     if (err) {
430       /* Report error to user, and free error */
431       GST_ERROR ("Failed to load plugin: %s\n", err->message);
432       g_error_free (err);
433     } else {
434       GST_WARNING ("Failed to load plugin: \"%s\"", filename);
435     }
436   }
437
438   g_free (data);
439 }
440
441 static void
442 split_and_iterate (const gchar * stringlist, gchar * separator, GFunc iterator,
443     gpointer user_data)
444 {
445   gchar **strings;
446   gint j = 0;
447   gchar *lastlist = g_strdup (stringlist);
448
449   while (lastlist) {
450     strings = g_strsplit (lastlist, separator, MAX_PATH_SPLIT);
451     g_free (lastlist);
452     lastlist = NULL;
453
454     while (strings[j]) {
455       iterator (strings[j], user_data);
456       if (++j == MAX_PATH_SPLIT) {
457         lastlist = g_strdup (strings[j]);
458         j = 0;
459         break;
460       }
461     }
462     g_strfreev (strings);
463   }
464 }
465
466 /* we have no fail cases yet, but maybe in the future */
467 static gboolean
468 init_pre (void)
469 {
470   /* GStreamer was built against a GLib >= 2.8 and is therefore not doing
471    * the refcount hack. Check that it isn't being run against an older GLib */
472   if (glib_major_version < 2 ||
473       (glib_major_version == 2 && glib_minor_version < 8)) {
474     g_warning ("GStreamer was compiled against GLib %d.%d.%d but is running"
475         " against %d.%d.%d. This will cause reference counting issues",
476         GLIB_MAJOR_VERSION, GLIB_MINOR_VERSION, GLIB_MICRO_VERSION,
477         glib_major_version, glib_minor_version, glib_micro_version);
478   }
479
480   g_type_init ();
481
482   if (g_thread_supported ()) {
483     /* somebody already initialized threading */
484   } else {
485     g_thread_init (NULL);
486   }
487   /* we need threading to be enabled right here */
488   _gst_debug_init ();
489
490 #ifdef ENABLE_NLS
491   setlocale (LC_ALL, "");
492   bindtextdomain (GETTEXT_PACKAGE, LOCALEDIR);
493 #endif /* ENABLE_NLS */
494
495 #ifndef GST_DISABLE_GST_DEBUG
496   {
497     const gchar *debug_list;
498
499     if (g_getenv ("GST_DEBUG_NO_COLOR") != NULL)
500       gst_debug_set_colored (FALSE);
501
502     debug_list = g_getenv ("GST_DEBUG");
503     if (debug_list) {
504       parse_debug_list (debug_list);
505     }
506   }
507 #endif
508   /* This is the earliest we can make stuff show up in the logs.
509    * So give some useful info about GStreamer here */
510   GST_INFO ("Initializing GStreamer Core Library version %s", VERSION);
511   GST_INFO ("Using library installed in %s", LIBDIR);
512
513   return TRUE;
514 }
515
516 static gboolean
517 gst_register_core_elements (GstPlugin * plugin)
518 {
519   /* register some standard builtin types */
520   if (!gst_element_register (plugin, "bin", GST_RANK_PRIMARY,
521           GST_TYPE_BIN) ||
522       !gst_element_register (plugin, "pipeline", GST_RANK_PRIMARY,
523           GST_TYPE_PIPELINE)
524       )
525     g_assert_not_reached ();
526
527   return TRUE;
528 }
529
530 static GstPluginDesc plugin_desc = {
531   GST_VERSION_MAJOR,
532   GST_VERSION_MINOR,
533   "staticelements",
534   "core elements linked into the GStreamer library",
535   gst_register_core_elements,
536   VERSION,
537   GST_LICENSE,
538   PACKAGE,
539   GST_PACKAGE_NAME,
540   GST_PACKAGE_ORIGIN,
541
542   GST_PADDING_INIT
543 };
544
545 #ifndef GST_DISABLE_REGISTRY
546
547 static gboolean
548 scan_and_update_registry (GstRegistry * default_registry,
549     const gchar * registry_file, gboolean write_changes)
550 {
551   const gchar *plugin_path;
552   gboolean changed = FALSE;
553   GList *l;
554
555   GST_DEBUG ("reading registry cache: %s", registry_file);
556   gst_registry_xml_read_cache (default_registry, registry_file);
557
558   /* scan paths specified via --gst-plugin-path */
559   GST_DEBUG ("scanning paths added via --gst-plugin-path");
560   for (l = plugin_paths; l != NULL; l = l->next) {
561     GST_INFO ("Scanning plugin path: \"%s\"", (gchar *) l->data);
562     /* CHECKME: add changed |= here as well? */
563     gst_registry_scan_path (default_registry, (gchar *) l->data);
564     g_free (l->data);
565   }
566   g_list_free (plugin_paths);
567   plugin_paths = NULL;
568
569   /* GST_PLUGIN_PATH specifies a list of directories to scan for
570    * additional plugins.  These take precedence over the system plugins */
571   plugin_path = g_getenv ("GST_PLUGIN_PATH");
572   if (plugin_path) {
573     char **list;
574     int i;
575
576     GST_DEBUG ("GST_PLUGIN_PATH set to %s", plugin_path);
577     list = g_strsplit (plugin_path, G_SEARCHPATH_SEPARATOR_S, 0);
578     for (i = 0; list[i]; i++) {
579       changed |= gst_registry_scan_path (default_registry, list[i]);
580     }
581     g_strfreev (list);
582   } else {
583     GST_DEBUG ("GST_PLUGIN_PATH not set");
584   }
585
586   /* GST_PLUGIN_SYSTEM_PATH specifies a list of plugins that are always
587    * loaded by default.  If not set, this defaults to the system-installed
588    * path, and the plugins installed in the user's home directory */
589   plugin_path = g_getenv ("GST_PLUGIN_SYSTEM_PATH");
590   if (plugin_path == NULL) {
591     char *home_plugins;
592
593     GST_DEBUG ("GST_PLUGIN_SYSTEM_PATH not set");
594
595     /* plugins in the user's home directory take precedence over
596      * system-installed ones */
597     home_plugins = g_build_filename (g_get_home_dir (),
598         ".gstreamer-" GST_MAJORMINOR, "plugins", NULL);
599     changed |= gst_registry_scan_path (default_registry, home_plugins);
600     g_free (home_plugins);
601
602     /* add the main (installed) library path */
603     changed |= gst_registry_scan_path (default_registry, PLUGINDIR);
604   } else {
605     gchar **list;
606     gint i;
607
608     GST_DEBUG ("GST_PLUGIN_SYSTEM_PATH set to %s", plugin_path);
609     list = g_strsplit (plugin_path, G_SEARCHPATH_SEPARATOR_S, 0);
610     for (i = 0; list[i]; i++) {
611       changed |= gst_registry_scan_path (default_registry, list[i]);
612     }
613     g_strfreev (list);
614   }
615
616   if (!changed) {
617     GST_DEBUG ("registry cache has not changed");
618     return TRUE;
619   }
620
621   if (!write_changes) {
622     GST_DEBUG ("not trying to write registry cache changes to file");
623     return TRUE;
624   }
625
626   GST_DEBUG ("writing registry cache");
627   if (!gst_registry_xml_write_cache (default_registry, registry_file)) {
628     g_warning ("Problem writing registry cache to %s: %s", registry_file,
629         g_strerror (errno));
630     return FALSE;
631   }
632
633   GST_DEBUG ("registry cache written successfully");
634   return TRUE;
635 }
636
637 #endif /* GST_DISABLE_REGISTRY */
638
639 /*
640  * this bit handles:
641  * - initalization of threads if we use them
642  * - log handler
643  * - initial output
644  * - initializes gst_format
645  * - registers a bunch of types for gst_objects
646  *
647  * - we don't have cases yet where this fails, but in the future
648  *   we might and then it's nice to be able to return that
649  */
650 static gboolean
651 init_post (void)
652 {
653   GLogLevelFlags llf;
654
655 #ifndef GST_DISABLE_TRACE
656   GstTrace *gst_trace;
657 #endif /* GST_DISABLE_TRACE */
658
659   llf = G_LOG_LEVEL_CRITICAL | G_LOG_LEVEL_ERROR | G_LOG_FLAG_FATAL;
660   g_log_set_handler (g_log_domain_gstreamer, llf, debug_log_handler, NULL);
661
662   _gst_format_initialize ();
663   _gst_query_initialize ();
664   gst_object_get_type ();
665   gst_pad_get_type ();
666   gst_element_factory_get_type ();
667   gst_element_get_type ();
668   gst_type_find_factory_get_type ();
669   gst_bin_get_type ();
670
671 #ifndef GST_DISABLE_INDEX
672   gst_index_factory_get_type ();
673 #endif /* GST_DISABLE_INDEX */
674 #ifndef GST_DISABLE_URI
675   gst_uri_handler_get_type ();
676 #endif /* GST_DISABLE_URI */
677
678   gst_structure_get_type ();
679   _gst_value_initialize ();
680   gst_caps_get_type ();
681   _gst_event_initialize ();
682   _gst_buffer_initialize ();
683   _gst_message_initialize ();
684   _gst_tag_initialize ();
685
686   /* register core plugins */
687   _gst_plugin_register_static (&plugin_desc);
688
689   _gst_plugin_initialize ();
690
691 #ifndef GST_DISABLE_REGISTRY
692   {
693     char *registry_file;
694     GstRegistry *default_registry;
695
696 #ifdef HAVE_FORK
697     pid_t pid;
698 #endif
699
700     default_registry = gst_registry_get_default ();
701     registry_file = g_strdup (g_getenv ("GST_REGISTRY"));
702     if (registry_file == NULL) {
703       registry_file = g_build_filename (g_get_home_dir (),
704           ".gstreamer-" GST_MAJORMINOR, "registry." HOST_CPU ".xml", NULL);
705     }
706 #ifdef HAVE_FORK
707     /* We fork here, and let the child read and possibly rebuild the registry.
708      * After that, the parent will re-read the freshly generated registry. */
709
710     GST_DEBUG ("forking");
711     pid = fork ();
712     if (pid == -1) {
713       GST_ERROR ("Failed to fork()");
714       g_free (registry_file);
715       return FALSE;
716     }
717
718     if (pid == 0) {
719       gboolean res;
720
721       /* this is the child */
722       GST_DEBUG ("child reading registry cache");
723       res = scan_and_update_registry (default_registry, registry_file, TRUE);
724       _gst_registry_remove_cache_plugins (default_registry);
725       g_free (registry_file);
726
727       /* need to use _exit, so that any exit handlers registered don't
728        * bring down the main program */
729       GST_DEBUG ("child exiting: %s", (res) ? "SUCCESS" : "FAILURE");
730       _exit ((res) ? EXIT_SUCCESS : EXIT_FAILURE);
731     } else {
732       /* parent */
733       int status;
734       pid_t ret;
735
736       GST_DEBUG ("parent waiting on child");
737       ret = waitpid (pid, &status, 0);
738       GST_DEBUG ("parent done waiting on child");
739       if (ret == -1) {
740         GST_ERROR ("error during waitpid: %s", g_strerror (errno));
741         return FALSE;
742       }
743
744       if (!WIFEXITED (status)) {
745         GST_ERROR ("child did not exit normally, status: %d", status);
746         return FALSE;
747       }
748
749       GST_DEBUG ("child exited normally with return value %d",
750           WEXITSTATUS (status));
751
752       if (WEXITSTATUS (status) == EXIT_SUCCESS) {
753         GST_DEBUG ("parent reading registry cache");
754         gst_registry_xml_read_cache (default_registry, registry_file);
755       } else {
756         GST_DEBUG ("parent re-scanning registry");
757         scan_and_update_registry (default_registry, registry_file, FALSE);
758       }
759     }
760
761 #else /* HAVE_FORK */
762
763     /* fork() not available */
764     GST_DEBUG ("updating registry cache");
765     scan_and_update_registry (default_registry, registry_file, TRUE);
766
767 #endif /* HAVE_FORK */
768
769     g_free (registry_file);
770   }
771
772 #endif /* GST_DISABLE_REGISTRY */
773
774   /* if we need to preload plugins */
775   if (preload_plugins) {
776     g_slist_foreach (preload_plugins, load_plugin_func, NULL);
777     g_slist_free (preload_plugins);
778     preload_plugins = NULL;
779   }
780 #ifndef GST_DISABLE_TRACE
781   _gst_trace_on = 0;
782   if (_gst_trace_on) {
783     gst_trace = gst_trace_new ("gst.trace", 1024);
784     gst_trace_set_default (gst_trace);
785   }
786 #endif /* GST_DISABLE_TRACE */
787
788   return TRUE;
789 }
790
791 #ifndef GST_DISABLE_GST_DEBUG
792 static gboolean
793 select_all (GstPlugin * plugin, gpointer user_data)
794 {
795   return TRUE;
796 }
797
798 static gint
799 sort_by_category_name (gconstpointer a, gconstpointer b)
800 {
801   return strcmp (gst_debug_category_get_name ((GstDebugCategory *) a),
802       gst_debug_category_get_name ((GstDebugCategory *) b));
803 }
804 static void
805 gst_debug_help (void)
806 {
807   GSList *list, *walk;
808   GList *list2, *g;
809
810   if (!init_post ())
811     exit (1);
812
813   list2 = gst_registry_plugin_filter (gst_registry_get_default (),
814       select_all, FALSE, NULL);
815
816   /* FIXME this is gross.  why don't debug have categories PluginFeatures? */
817   for (g = list2; g; g = g_list_next (g)) {
818     GstPlugin *plugin = GST_PLUGIN_CAST (g->data);
819
820     gst_plugin_load (plugin);
821   }
822   g_list_free (list2);
823
824   list = gst_debug_get_all_categories ();
825   walk = list = g_slist_sort (list, sort_by_category_name);
826
827   g_print ("\n");
828   g_print ("name                  level    description\n");
829   g_print ("---------------------+--------+--------------------------------\n");
830
831   while (walk) {
832     GstDebugCategory *cat = (GstDebugCategory *) walk->data;
833
834     if (gst_debug_is_colored ()) {
835       gchar *color = gst_debug_construct_term_color (cat->color);
836
837       g_print ("%s%-20s\033[00m  %1d %s  %s%s\033[00m\n",
838           color,
839           gst_debug_category_get_name (cat),
840           gst_debug_category_get_threshold (cat),
841           gst_debug_level_get_name (gst_debug_category_get_threshold (cat)),
842           color, gst_debug_category_get_description (cat));
843       g_free (color);
844     } else {
845       g_print ("%-20s  %1d %s  %s\n", gst_debug_category_get_name (cat),
846           gst_debug_category_get_threshold (cat),
847           gst_debug_level_get_name (gst_debug_category_get_threshold (cat)),
848           gst_debug_category_get_description (cat));
849     }
850     walk = g_slist_next (walk);
851   }
852   g_slist_free (list);
853   g_print ("\n");
854 }
855 #endif
856
857 static gboolean
858 parse_one_option (gint opt, const gchar * arg, GError ** err)
859 {
860   switch (opt) {
861     case ARG_VERSION:
862       g_print ("GStreamer Core Library version %s\n", PACKAGE_VERSION);
863       exit (0);
864     case ARG_FATAL_WARNINGS:{
865       GLogLevelFlags fatal_mask;
866
867       fatal_mask = g_log_set_always_fatal (G_LOG_FATAL_MASK);
868       fatal_mask |= G_LOG_LEVEL_WARNING | G_LOG_LEVEL_CRITICAL;
869       g_log_set_always_fatal (fatal_mask);
870       break;
871     }
872 #ifndef GST_DISABLE_GST_DEBUG
873     case ARG_DEBUG_LEVEL:{
874       gint tmp = 0;
875
876       tmp = strtol (arg, NULL, 0);
877       if (tmp >= 0 && tmp < GST_LEVEL_COUNT) {
878         gst_debug_set_default_threshold (tmp);
879       }
880       break;
881     }
882     case ARG_DEBUG:
883       parse_debug_list (arg);
884       break;
885     case ARG_DEBUG_NO_COLOR:
886       gst_debug_set_colored (FALSE);
887       break;
888     case ARG_DEBUG_DISABLE:
889       gst_debug_set_active (FALSE);
890       break;
891     case ARG_DEBUG_HELP:
892       gst_debug_help ();
893       exit (0);
894 #endif
895     case ARG_PLUGIN_SPEW:
896       break;
897     case ARG_PLUGIN_PATH:
898 #ifndef GST_DISABLE_REGISTRY
899       split_and_iterate (arg, G_SEARCHPATH_SEPARATOR_S, add_path_func, NULL);
900 #endif /* GST_DISABLE_REGISTRY */
901       break;
902     case ARG_PLUGIN_LOAD:
903       split_and_iterate (arg, ",", prepare_for_load_plugin_func, NULL);
904       break;
905     case ARG_SEGTRAP_DISABLE:
906       _gst_disable_segtrap = TRUE;
907       break;
908     default:
909       g_set_error (err, G_OPTION_ERROR, G_OPTION_ERROR_UNKNOWN_OPTION,
910           _("Unknown option"));
911       return FALSE;
912   }
913
914   return TRUE;
915 }
916
917 static gboolean
918 parse_goption_arg (const gchar * opt,
919     const gchar * arg, gpointer data, GError ** err)
920 {
921   const struct
922   {
923     gchar *opt;
924     int val;
925   } options[] = {
926     {
927     "--gst-version", ARG_VERSION}, {
928     "--gst-fatal-warnings", ARG_FATAL_WARNINGS},
929 #ifndef GST_DISABLE_GST_DEBUG
930     {
931     "--gst-debug-level", ARG_DEBUG_LEVEL}, {
932     "--gst-debug", ARG_DEBUG}, {
933     "--gst-debug-disable", ARG_DEBUG_DISABLE}, {
934     "--gst-debug-no-color", ARG_DEBUG_NO_COLOR}, {
935     "--gst-debug-help", ARG_DEBUG_HELP},
936 #endif
937     {
938     "--gst-plugin-spew", ARG_PLUGIN_SPEW}, {
939     "--gst-plugin-path", ARG_PLUGIN_PATH}, {
940     "--gst-plugin-load", ARG_PLUGIN_LOAD}, {
941     "--gst-disable-segtrap", ARG_SEGTRAP_DISABLE}, {
942     NULL}
943   };
944   gint val = 0, n;
945
946   for (n = 0; options[n].opt; n++) {
947     if (!strcmp (opt, options[n].opt)) {
948       val = options[n].val;
949       break;
950     }
951   }
952
953   return parse_one_option (val, arg, err);
954 }
955
956 /**
957  * gst_deinit:
958  *
959  * Clean up.
960  * Call only once, before exiting.
961  * After this call GStreamer should not be used anymore.
962  */
963
964 extern GstRegistry *_gst_registry_default;
965 void
966 gst_deinit (void)
967 {
968   GstClock *clock;
969
970   GST_INFO ("deinitializing GStreamer");
971   clock = gst_system_clock_obtain ();
972   gst_object_unref (clock);
973   gst_object_unref (clock);
974
975   _gst_registry_cleanup ();
976
977   gst_initialized = FALSE;
978   GST_INFO ("deinitialized GStreamer");
979 }
980
981 /**
982  * gst_version:
983  * @major: pointer to a guint to store the major version number
984  * @minor: pointer to a guint to store the minor version number
985  * @micro: pointer to a guint to store the micro version number
986  * @nano:  pointer to a guint to store the nano version number
987  *
988  * Gets the version number of the GStreamer library.
989  */
990 void
991 gst_version (guint * major, guint * minor, guint * micro, guint * nano)
992 {
993   g_return_if_fail (major);
994   g_return_if_fail (minor);
995   g_return_if_fail (micro);
996   g_return_if_fail (nano);
997
998   *major = GST_VERSION_MAJOR;
999   *minor = GST_VERSION_MINOR;
1000   *micro = GST_VERSION_MICRO;
1001   *nano = GST_VERSION_NANO;
1002 }
1003
1004 /**
1005  * gst_version_string:
1006  *
1007  * This function returns a string that is useful for describing this version
1008  * of GStreamer to the outside world: user agent strings, logging, ...
1009  *
1010  * Returns: a newly allocated string describing this version of GStreamer.
1011  */
1012
1013 gchar *
1014 gst_version_string ()
1015 {
1016   guint major, minor, micro, nano;
1017
1018   gst_version (&major, &minor, &micro, &nano);
1019   if (nano == 0)
1020     return g_strdup_printf ("GStreamer %d.%d.%d", major, minor, micro);
1021   else if (nano == 1)
1022     return g_strdup_printf ("GStreamer %d.%d.%d (CVS)", major, minor, micro);
1023   else
1024     return g_strdup_printf ("GStreamer %d.%d.%d (prerelease)", major, minor,
1025         micro);
1026 }