build: Define G_THREADS_MANDATORY everywhere
[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  *
28  * GStreamer is a framework for constructing graphs of various filters
29  * (termed elements here) that will handle streaming media.  Any discreet
30  * (packetizable) media type is supported, with provisions for automatically
31  * determining source type.  Formatting/framing information is provided with
32  * a powerful negotiation framework.  Plugins are heavily used to provide for
33  * all elements, allowing one to construct plugins outside of the GST
34  * library, even released binary-only if license require (please don't).
35  * GStreamer covers a wide range of use cases including: playback, recording,
36  * editing, serving streams, voice over ip and video calls.
37  *
38  * The <application>GStreamer</application> library should be initialized with
39  * gst_init() before it can be used. You should pass pointers to the main argc
40  * and argv variables so that GStreamer can process its own command line
41  * options, as shown in the following example.
42  *
43  * <example>
44  * <title>Initializing the gstreamer library</title>
45  * <programlisting language="c">
46  * int
47  * main (int argc, char *argv[])
48  * {
49  *   // initialize the GStreamer library
50  *   gst_init (&amp;argc, &amp;argv);
51  *   ...
52  * }
53  * </programlisting>
54  * </example>
55  *
56  * It's allowed to pass two NULL pointers to gst_init() in case you don't want
57  * to pass the command line args to GStreamer.
58  *
59  * You can also use GOption to initialize your own parameters as shown in
60  * the next code fragment:
61  * <example>
62  * <title>Initializing own parameters when initializing gstreamer</title>
63  * <programlisting>
64  * static gboolean stats = FALSE;
65  * ...
66  * int
67  * main (int argc, char *argv[])
68  * {
69  *  GOptionEntry options[] = {
70  *   {"tags", 't', 0, G_OPTION_ARG_NONE, &amp;tags,
71  *       N_("Output tags (also known as metadata)"), NULL},
72  *   {NULL}
73  *  };
74  *  // must initialise the threading system before using any other GLib funtion
75  *  if (!g_thread_supported ())
76  *    g_thread_init (NULL);
77  *  ctx = g_option_context_new ("[ADDITIONAL ARGUMENTS]");
78  *  g_option_context_add_main_entries (ctx, options, GETTEXT_PACKAGE);
79  *  g_option_context_add_group (ctx, gst_init_get_option_group ());
80  *  if (!g_option_context_parse (ctx, &amp;argc, &amp;argv, &amp;err)) {
81  *    g_print ("Error initializing: &percnt;s\n", GST_STR_NULL (err->message));
82  *    exit (1);
83  *  }
84  *  g_option_context_free (ctx);
85  * ...
86  * }
87  * </programlisting>
88  * </example>
89  *
90  * Use gst_version() to query the library version at runtime or use the
91  * GST_VERSION_* macros to find the version at compile time. Optionally
92  * gst_version_string() returns a printable string.
93  *
94  * The gst_deinit() call is used to clean up all internal resources used
95  * by <application>GStreamer</application>. It is mostly used in unit tests 
96  * to check for leaks.
97  *
98  * Last reviewed on 2006-08-11 (0.10.10)
99  */
100
101 #include "gst_private.h"
102 #include "gstconfig.h"
103 #include <stdlib.h>
104 #include <stdio.h>
105 #include <sys/types.h>
106 #ifdef HAVE_SYS_UTSNAME_H
107 #include <sys/utsname.h>
108 #endif
109 #ifdef HAVE_UNISTD_H
110 #include <unistd.h>
111 #endif
112 #ifdef G_OS_WIN32
113 #define WIN32_LEAN_AND_MEAN     /* prevents from including too many things */
114 #include <windows.h>            /* GetStdHandle, windows console */
115 #endif
116
117 #include "gst-i18n-lib.h"
118 #include <locale.h>             /* for LC_ALL */
119
120 #include "gst.h"
121
122 #define GST_CAT_DEFAULT GST_CAT_GST_INIT
123
124 #define MAX_PATH_SPLIT  16
125 #define GST_PLUGIN_SEPARATOR ","
126
127 static gboolean gst_initialized = FALSE;
128 static gboolean gst_deinitialized = FALSE;
129
130 #ifdef G_OS_WIN32
131 HMODULE _priv_gst_dll_handle = NULL;
132 #endif
133
134 #ifndef GST_DISABLE_REGISTRY
135 GList *_priv_gst_plugin_paths = NULL;   /* for delayed processing in post_init */
136
137 extern gboolean _priv_gst_disable_registry_update;
138 #endif
139
140 #ifndef GST_DISABLE_GST_DEBUG
141 extern const gchar *priv_gst_dump_dot_dir;
142 #endif
143
144 /* defaults */
145
146 /* set to TRUE when segfaults need to be left as is */
147 static gboolean _gst_disable_segtrap = FALSE;
148
149 static gboolean init_pre (GOptionContext * context, GOptionGroup * group,
150     gpointer data, GError ** error);
151 static gboolean init_post (GOptionContext * context, GOptionGroup * group,
152     gpointer data, GError ** error);
153 #ifndef GST_DISABLE_OPTION_PARSING
154 static gboolean parse_goption_arg (const gchar * s_opt,
155     const gchar * arg, gpointer data, GError ** err);
156 #endif
157
158 GSList *_priv_gst_preload_plugins = NULL;
159
160 const gchar g_log_domain_gstreamer[] = "GStreamer";
161
162 static void
163 debug_log_handler (const gchar * log_domain,
164     GLogLevelFlags log_level, const gchar * message, gpointer user_data)
165 {
166   g_log_default_handler (log_domain, log_level, message, user_data);
167   /* FIXME: do we still need this ? fatal errors these days are all
168    * other than core errors */
169   /* g_on_error_query (NULL); */
170 }
171
172 enum
173 {
174   ARG_VERSION = 1,
175   ARG_FATAL_WARNINGS,
176 #ifndef GST_DISABLE_GST_DEBUG
177   ARG_DEBUG_LEVEL,
178   ARG_DEBUG,
179   ARG_DEBUG_DISABLE,
180   ARG_DEBUG_NO_COLOR,
181   ARG_DEBUG_HELP,
182 #endif
183   ARG_PLUGIN_SPEW,
184   ARG_PLUGIN_PATH,
185   ARG_PLUGIN_LOAD,
186   ARG_SEGTRAP_DISABLE,
187   ARG_REGISTRY_UPDATE_DISABLE,
188   ARG_REGISTRY_FORK_DISABLE
189 };
190
191 /* debug-spec ::= category-spec [, category-spec]*
192  * category-spec ::= category:val | val
193  * category ::= [^:]+
194  * val ::= [0-5]
195  */
196
197 #ifndef NUL
198 #define NUL '\0'
199 #endif
200
201 #ifndef GST_DISABLE_GST_DEBUG
202 static gboolean
203 parse_debug_category (gchar * str, const gchar ** category)
204 {
205   if (!str)
206     return FALSE;
207
208   /* works in place */
209   g_strstrip (str);
210
211   if (str[0] != NUL) {
212     *category = str;
213     return TRUE;
214   }
215
216   return FALSE;
217 }
218
219 static gboolean
220 parse_debug_level (gchar * str, gint * level)
221 {
222   if (!str)
223     return FALSE;
224
225   /* works in place */
226   g_strstrip (str);
227
228   if (str[0] != NUL && str[1] == NUL
229       && str[0] >= '0' && str[0] < '0' + GST_LEVEL_COUNT) {
230     *level = str[0] - '0';
231     return TRUE;
232   }
233
234   return FALSE;
235 }
236
237 static void
238 parse_debug_list (const gchar * list)
239 {
240   gchar **split;
241   gchar **walk;
242
243   g_return_if_fail (list != NULL);
244
245   split = g_strsplit (list, ",", 0);
246
247   for (walk = split; *walk; walk++) {
248     if (strchr (*walk, ':')) {
249       gchar **values = g_strsplit (*walk, ":", 2);
250
251       if (values[0] && values[1]) {
252         gint level;
253         const gchar *category;
254
255         if (parse_debug_category (values[0], &category)
256             && parse_debug_level (values[1], &level))
257           gst_debug_set_threshold_for_name (category, level);
258       }
259
260       g_strfreev (values);
261     } else {
262       gint level;
263
264       if (parse_debug_level (*walk, &level))
265         gst_debug_set_default_threshold (level);
266     }
267   }
268
269   g_strfreev (split);
270 }
271 #endif
272
273 #ifdef G_OS_WIN32
274 BOOL WINAPI
275 DllMain (HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved)
276 {
277   if (fdwReason == DLL_PROCESS_ATTACH)
278     _priv_gst_dll_handle = (HMODULE) hinstDLL;
279   return TRUE;
280 }
281
282 #endif
283
284 /**
285  * gst_init_get_option_group:
286  *
287  * Returns a #GOptionGroup with GStreamer's argument specifications. The
288  * group is set up to use standard GOption callbacks, so when using this
289  * group in combination with GOption parsing methods, all argument parsing
290  * and initialization is automated.
291  *
292  * This function is useful if you want to integrate GStreamer with other
293  * libraries that use GOption (see g_option_context_add_group() ).
294  *
295  * If you use this function, you should make sure you initialise the GLib
296  * threading system as one of the very first things in your program
297  * (see the example at the beginning of this section).
298  *
299  * Returns: a pointer to GStreamer's option group.
300  */
301
302 GOptionGroup *
303 gst_init_get_option_group (void)
304 {
305 #ifndef GST_DISABLE_OPTION_PARSING
306   GOptionGroup *group;
307   static const GOptionEntry gst_args[] = {
308     {"gst-version", 0, G_OPTION_FLAG_NO_ARG, G_OPTION_ARG_CALLBACK,
309         (gpointer) parse_goption_arg, N_("Print the GStreamer version"), NULL},
310     {"gst-fatal-warnings", 0, G_OPTION_FLAG_NO_ARG, G_OPTION_ARG_CALLBACK,
311         (gpointer) parse_goption_arg, N_("Make all warnings fatal"), NULL},
312 #ifndef GST_DISABLE_GST_DEBUG
313     {"gst-debug-help", 0, G_OPTION_FLAG_NO_ARG, G_OPTION_ARG_CALLBACK,
314           (gpointer) parse_goption_arg,
315           N_("Print available debug categories and exit"),
316         NULL},
317     {"gst-debug-level", 0, 0, G_OPTION_ARG_CALLBACK,
318           (gpointer) parse_goption_arg,
319           N_("Default debug level from 1 (only error) to 5 (anything) or "
320               "0 for no output"),
321         N_("LEVEL")},
322     {"gst-debug", 0, 0, G_OPTION_ARG_CALLBACK, (gpointer) parse_goption_arg,
323           N_("Comma-separated list of category_name:level pairs to set "
324               "specific levels for the individual categories. Example: "
325               "GST_AUTOPLUG:5,GST_ELEMENT_*:3"),
326         N_("LIST")},
327     {"gst-debug-no-color", 0, G_OPTION_FLAG_NO_ARG, G_OPTION_ARG_CALLBACK,
328           (gpointer) parse_goption_arg, N_("Disable colored debugging output"),
329         NULL},
330     {"gst-debug-disable", 0, G_OPTION_FLAG_NO_ARG, G_OPTION_ARG_CALLBACK,
331         (gpointer) parse_goption_arg, N_("Disable debugging"), NULL},
332 #endif
333     {"gst-plugin-spew", 0, G_OPTION_FLAG_NO_ARG, G_OPTION_ARG_CALLBACK,
334           (gpointer) parse_goption_arg,
335           N_("Enable verbose plugin loading diagnostics"),
336         NULL},
337     {"gst-plugin-path", 0, 0, G_OPTION_ARG_CALLBACK,
338           (gpointer) parse_goption_arg,
339         N_("Colon-separated paths containing plugins"), N_("PATHS")},
340     {"gst-plugin-load", 0, 0, G_OPTION_ARG_CALLBACK,
341           (gpointer) parse_goption_arg,
342           N_("Comma-separated list of plugins to preload in addition to the "
343               "list stored in environment variable GST_PLUGIN_PATH"),
344         N_("PLUGINS")},
345     {"gst-disable-segtrap", 0, G_OPTION_FLAG_NO_ARG, G_OPTION_ARG_CALLBACK,
346           (gpointer) parse_goption_arg,
347           N_("Disable trapping of segmentation faults during plugin loading"),
348         NULL},
349     {"gst-disable-registry-update", 0, G_OPTION_FLAG_NO_ARG,
350           G_OPTION_ARG_CALLBACK,
351           (gpointer) parse_goption_arg,
352           N_("Disable updating the registry"),
353         NULL},
354     {"gst-disable-registry-fork", 0, G_OPTION_FLAG_NO_ARG,
355           G_OPTION_ARG_CALLBACK,
356           (gpointer) parse_goption_arg,
357           N_("Disable spawning a helper process while scanning the registry"),
358         NULL},
359     {NULL}
360   };
361
362   /* The GLib threading system must be initialised before calling any other
363    * GLib function according to the documentation; if the application hasn't
364    * called gst_init() yet or initialised the threading system otherwise, we
365    * better issue a warning here (since chances are high that the application
366    * has already called other GLib functions such as g_option_context_new() */
367 #if GLIB_CHECK_VERSION (2,20,0)
368   if (!g_thread_get_initialized ()) {
369 #else
370   if (!g_thread_supported ()) {
371 #endif
372     g_warning ("The GStreamer function gst_init_get_option_group() was\n"
373         "\tcalled, but the GLib threading system has not been initialised\n"
374         "\tyet, something that must happen before any other GLib function\n"
375         "\tis called. The application needs to be fixed so that it calls\n"
376         "\t   if (!g_thread_supported ()) g_thread_init(NULL);\n"
377         "\tas very first thing in its main() function. Please file a bug\n"
378         "\tagainst this application.");
379     g_thread_init (NULL);
380   }
381
382   group = g_option_group_new ("gst", _("GStreamer Options"),
383       _("Show GStreamer Options"), NULL, NULL);
384   g_option_group_set_parse_hooks (group, (GOptionParseFunc) init_pre,
385       (GOptionParseFunc) init_post);
386
387   g_option_group_add_entries (group, gst_args);
388   g_option_group_set_translation_domain (group, GETTEXT_PACKAGE);
389
390   return group;
391 #else
392   return NULL;
393 #endif
394 }
395
396 /**
397  * gst_init_check:
398  * @argc: (inout): pointer to application's argc
399  * @argv: (inout) (array length=argc) (allow-none): pointer to application's argv
400  * @err: pointer to a #GError to which a message will be posted on error
401  *
402  * Initializes the GStreamer library, setting up internal path lists,
403  * registering built-in elements, and loading standard plugins.
404  *
405  * This function will return %FALSE if GStreamer could not be initialized
406  * for some reason.  If you want your program to fail fatally,
407  * use gst_init() instead.
408  *
409  * This function should be called before calling any other GLib functions. If
410  * this is not an option, your program must initialise the GLib thread system
411  * using g_thread_init() before any other GLib functions are called.
412  *
413  * Returns: %TRUE if GStreamer could be initialized.
414  */
415 gboolean
416 gst_init_check (int *argc, char **argv[], GError ** err)
417 {
418 #ifndef GST_DISABLE_OPTION_PARSING
419   GOptionGroup *group;
420   GOptionContext *ctx;
421 #endif
422   gboolean res;
423
424 #if GLIB_CHECK_VERSION (2,20,0)
425   if (!g_thread_get_initialized ())
426 #else
427   if (!g_thread_supported ())
428 #endif
429     g_thread_init (NULL);
430
431   if (gst_initialized) {
432     GST_DEBUG ("already initialized gst");
433     return TRUE;
434   }
435 #ifndef GST_DISABLE_OPTION_PARSING
436   ctx = g_option_context_new ("- GStreamer initialization");
437   g_option_context_set_ignore_unknown_options (ctx, TRUE);
438   group = gst_init_get_option_group ();
439   g_option_context_add_group (ctx, group);
440   res = g_option_context_parse (ctx, argc, argv, err);
441   g_option_context_free (ctx);
442 #else
443   init_pre (NULL, NULL, NULL, NULL);
444   init_post (NULL, NULL, NULL, NULL);
445   res = TRUE;
446 #endif
447
448   gst_initialized = res;
449
450   if (res) {
451     GST_INFO ("initialized GStreamer successfully");
452   } else {
453     GST_INFO ("failed to initialize GStreamer");
454   }
455
456   return res;
457 }
458
459 /**
460  * gst_init:
461  * @argc: (inout): pointer to application's argc
462  * @argv: (inout) (array length=argc) (allow-none): pointer to application's argv
463  *
464  * Initializes the GStreamer library, setting up internal path lists,
465  * registering built-in elements, and loading standard plugins.
466  *
467  * Unless the plugin registry is disabled at compile time, the registry will be
468  * loaded. By default this will also check if the registry cache needs to be
469  * updated and rescan all plugins if needed. See gst_update_registry() for
470  * details and section
471  * <link linkend="gst-running">Running GStreamer Applications</link>
472  * for how to disable automatic registry updates.
473  *
474  * This function should be called before calling any other GLib functions. If
475  * this is not an option, your program must initialise the GLib thread system
476  * using g_thread_init() before any other GLib functions are called.
477  *
478  * <note><para>
479  * This function will terminate your program if it was unable to initialize
480  * GStreamer for some reason.  If you want your program to fall back,
481  * use gst_init_check() instead.
482  * </para></note>
483  *
484  * WARNING: This function does not work in the same way as corresponding
485  * functions in other glib-style libraries, such as gtk_init().  In
486  * particular, unknown command line options cause this function to
487  * abort program execution.
488  */
489 void
490 gst_init (int *argc, char **argv[])
491 {
492   GError *err = NULL;
493
494   if (!gst_init_check (argc, argv, &err)) {
495     g_print ("Could not initialize GStreamer: %s\n",
496         err ? err->message : "unknown error occurred");
497     if (err) {
498       g_error_free (err);
499     }
500     exit (1);
501   }
502 }
503
504 #ifndef GST_DISABLE_REGISTRY
505 static void
506 add_path_func (gpointer data, gpointer user_data)
507 {
508   GST_INFO ("Adding plugin path: \"%s\", will scan later", (gchar *) data);
509   _priv_gst_plugin_paths =
510       g_list_append (_priv_gst_plugin_paths, g_strdup (data));
511 }
512 #endif
513
514 #ifndef GST_DISABLE_OPTION_PARSING
515 static void
516 prepare_for_load_plugin_func (gpointer data, gpointer user_data)
517 {
518   _priv_gst_preload_plugins =
519       g_slist_prepend (_priv_gst_preload_plugins, g_strdup (data));
520 }
521 #endif
522
523 #ifndef GST_DISABLE_OPTION_PARSING
524 static void
525 split_and_iterate (const gchar * stringlist, gchar * separator,
526     GFunc iterator, gpointer user_data)
527 {
528   gchar **strings;
529   gint j = 0;
530   gchar *lastlist = g_strdup (stringlist);
531
532   while (lastlist) {
533     strings = g_strsplit (lastlist, separator, MAX_PATH_SPLIT);
534     g_free (lastlist);
535     lastlist = NULL;
536
537     while (strings[j]) {
538       iterator (strings[j], user_data);
539       if (++j == MAX_PATH_SPLIT) {
540         lastlist = g_strdup (strings[j]);
541         j = 0;
542         break;
543       }
544     }
545     g_strfreev (strings);
546   }
547 }
548 #endif
549
550 /* we have no fail cases yet, but maybe in the future */
551 static gboolean
552 init_pre (GOptionContext * context, GOptionGroup * group, gpointer data,
553     GError ** error)
554 {
555   if (gst_initialized) {
556     GST_DEBUG ("already initialized");
557     return TRUE;
558   }
559
560   /* GStreamer was built against a GLib >= 2.8 and is therefore not doing
561    * the refcount hack. Check that it isn't being run against an older GLib */
562   if (glib_major_version < 2 ||
563       (glib_major_version == 2 && glib_minor_version < 8)) {
564     g_warning ("GStreamer was compiled against GLib %d.%d.%d but is running"
565         " against %d.%d.%d. This will cause reference counting issues",
566         GLIB_MAJOR_VERSION, GLIB_MINOR_VERSION, GLIB_MICRO_VERSION,
567         glib_major_version, glib_minor_version, glib_micro_version);
568   }
569
570   g_type_init ();
571
572   /* we need threading to be enabled right here */
573 #if GLIB_CHECK_VERSION (2,20,0)
574   g_assert (g_thread_get_initialized ());
575 #else
576   g_assert (g_thread_supported ());
577 #endif
578   _gst_debug_init ();
579
580 #ifdef ENABLE_NLS
581   setlocale (LC_ALL, "");
582   bindtextdomain (GETTEXT_PACKAGE, LOCALEDIR);
583   bind_textdomain_codeset (GETTEXT_PACKAGE, "UTF-8");
584 #endif /* ENABLE_NLS */
585
586 #ifndef GST_DISABLE_GST_DEBUG
587   {
588     const gchar *debug_list;
589
590     if (g_getenv ("GST_DEBUG_NO_COLOR") != NULL)
591       gst_debug_set_colored (FALSE);
592
593     debug_list = g_getenv ("GST_DEBUG");
594     if (debug_list) {
595       parse_debug_list (debug_list);
596     }
597   }
598
599   priv_gst_dump_dot_dir = g_getenv ("GST_DEBUG_DUMP_DOT_DIR");
600 #endif
601   /* This is the earliest we can make stuff show up in the logs.
602    * So give some useful info about GStreamer here */
603   GST_INFO ("Initializing GStreamer Core Library version %s", VERSION);
604   GST_INFO ("Using library installed in %s", LIBDIR);
605
606   /* Print some basic system details if possible (OS/architecture) */
607 #ifdef HAVE_SYS_UTSNAME_H
608   {
609     struct utsname sys_details;
610
611     if (uname (&sys_details) == 0) {
612       GST_INFO ("%s %s %s %s %s", sys_details.sysname,
613           sys_details.nodename, sys_details.release, sys_details.version,
614           sys_details.machine);
615     }
616   }
617 #endif
618
619   return TRUE;
620 }
621
622 static gboolean
623 gst_register_core_elements (GstPlugin * plugin)
624 {
625   /* register some standard builtin types */
626   if (!gst_element_register (plugin, "bin", GST_RANK_PRIMARY,
627           GST_TYPE_BIN) ||
628       !gst_element_register (plugin, "pipeline", GST_RANK_PRIMARY,
629           GST_TYPE_PIPELINE)
630       )
631     g_assert_not_reached ();
632
633   return TRUE;
634 }
635
636 /*
637  * this bit handles:
638  * - initalization of threads if we use them
639  * - log handler
640  * - initial output
641  * - initializes gst_format
642  * - registers a bunch of types for gst_objects
643  *
644  * - we don't have cases yet where this fails, but in the future
645  *   we might and then it's nice to be able to return that
646  */
647 static gboolean
648 init_post (GOptionContext * context, GOptionGroup * group, gpointer data,
649     GError ** error)
650 {
651   GLogLevelFlags llf;
652
653 #ifndef GST_DISABLE_TRACE
654   GstTrace *gst_trace;
655 #endif /* GST_DISABLE_TRACE */
656
657   if (gst_initialized) {
658     GST_DEBUG ("already initialized");
659     return TRUE;
660   }
661
662   llf = G_LOG_LEVEL_CRITICAL | G_LOG_LEVEL_ERROR | G_LOG_FLAG_FATAL;
663   g_log_set_handler (g_log_domain_gstreamer, llf, debug_log_handler, NULL);
664
665   _priv_gst_quarks_initialize ();
666   _gst_format_initialize ();
667   _gst_query_initialize ();
668   g_type_class_ref (gst_object_get_type ());
669   g_type_class_ref (gst_pad_get_type ());
670   g_type_class_ref (gst_element_factory_get_type ());
671   g_type_class_ref (gst_element_get_type ());
672   g_type_class_ref (gst_type_find_factory_get_type ());
673   g_type_class_ref (gst_bin_get_type ());
674   g_type_class_ref (gst_bus_get_type ());
675   g_type_class_ref (gst_task_get_type ());
676   g_type_class_ref (gst_clock_get_type ());
677
678   g_type_class_ref (gst_index_factory_get_type ());
679   gst_uri_handler_get_type ();
680
681   g_type_class_ref (gst_object_flags_get_type ());
682   g_type_class_ref (gst_bin_flags_get_type ());
683   g_type_class_ref (gst_buffer_flag_get_type ());
684   g_type_class_ref (gst_buffer_copy_flags_get_type ());
685   g_type_class_ref (gst_buffer_list_item_get_type ());
686   g_type_class_ref (gst_bus_flags_get_type ());
687   g_type_class_ref (gst_bus_sync_reply_get_type ());
688   g_type_class_ref (gst_caps_flags_get_type ());
689   g_type_class_ref (gst_clock_return_get_type ());
690   g_type_class_ref (gst_clock_entry_type_get_type ());
691   g_type_class_ref (gst_clock_flags_get_type ());
692   g_type_class_ref (gst_clock_type_get_type ());
693   g_type_class_ref (gst_debug_graph_details_get_type ());
694   g_type_class_ref (gst_state_get_type ());
695   g_type_class_ref (gst_state_change_return_get_type ());
696   g_type_class_ref (gst_state_change_get_type ());
697   g_type_class_ref (gst_element_flags_get_type ());
698   g_type_class_ref (gst_core_error_get_type ());
699   g_type_class_ref (gst_library_error_get_type ());
700   g_type_class_ref (gst_resource_error_get_type ());
701   g_type_class_ref (gst_stream_error_get_type ());
702   g_type_class_ref (gst_event_type_flags_get_type ());
703   g_type_class_ref (gst_event_type_get_type ());
704   g_type_class_ref (gst_seek_type_get_type ());
705   g_type_class_ref (gst_seek_flags_get_type ());
706   g_type_class_ref (gst_format_get_type ());
707   g_type_class_ref (gst_index_certainty_get_type ());
708   g_type_class_ref (gst_index_entry_type_get_type ());
709   g_type_class_ref (gst_index_lookup_method_get_type ());
710   g_type_class_ref (gst_assoc_flags_get_type ());
711   g_type_class_ref (gst_index_resolver_method_get_type ());
712   g_type_class_ref (gst_index_flags_get_type ());
713   g_type_class_ref (gst_debug_level_get_type ());
714   g_type_class_ref (gst_debug_color_flags_get_type ());
715   g_type_class_ref (gst_iterator_result_get_type ());
716   g_type_class_ref (gst_iterator_item_get_type ());
717   g_type_class_ref (gst_message_type_get_type ());
718   g_type_class_ref (gst_mini_object_flags_get_type ());
719   g_type_class_ref (gst_pad_link_return_get_type ());
720   g_type_class_ref (gst_flow_return_get_type ());
721   g_type_class_ref (gst_activate_mode_get_type ());
722   g_type_class_ref (gst_pad_direction_get_type ());
723   g_type_class_ref (gst_pad_flags_get_type ());
724   g_type_class_ref (gst_pad_presence_get_type ());
725   g_type_class_ref (gst_pad_template_flags_get_type ());
726   g_type_class_ref (gst_pipeline_flags_get_type ());
727   g_type_class_ref (gst_plugin_error_get_type ());
728   g_type_class_ref (gst_plugin_flags_get_type ());
729   g_type_class_ref (gst_plugin_dependency_flags_get_type ());
730   g_type_class_ref (gst_rank_get_type ());
731   g_type_class_ref (gst_query_type_get_type ());
732   g_type_class_ref (gst_buffering_mode_get_type ());
733   g_type_class_ref (gst_stream_status_type_get_type ());
734   g_type_class_ref (gst_structure_change_type_get_type ());
735   g_type_class_ref (gst_tag_merge_mode_get_type ());
736   g_type_class_ref (gst_tag_flag_get_type ());
737   g_type_class_ref (gst_task_pool_get_type ());
738   g_type_class_ref (gst_task_state_get_type ());
739   g_type_class_ref (gst_alloc_trace_flags_get_type ());
740   g_type_class_ref (gst_type_find_probability_get_type ());
741   g_type_class_ref (gst_uri_type_get_type ());
742   g_type_class_ref (gst_parse_error_get_type ());
743   g_type_class_ref (gst_parse_flags_get_type ());
744   g_type_class_ref (gst_search_mode_get_type ());
745
746   gst_structure_get_type ();
747   _gst_value_initialize ();
748   g_type_class_ref (gst_param_spec_fraction_get_type ());
749   gst_caps_get_type ();
750   _gst_event_initialize ();
751   _gst_buffer_initialize ();
752   _gst_buffer_list_initialize ();
753   _gst_message_initialize ();
754   _gst_tag_initialize ();
755
756   _gst_plugin_initialize ();
757
758   gst_g_error_get_type ();
759
760   /* register core plugins */
761   gst_plugin_register_static (GST_VERSION_MAJOR, GST_VERSION_MINOR,
762       "staticelements", "core elements linked into the GStreamer library",
763       gst_register_core_elements, VERSION, GST_LICENSE, PACKAGE,
764       GST_PACKAGE_NAME, GST_PACKAGE_ORIGIN);
765
766   /*
767    * Any errors happening below this point are non-fatal, we therefore mark
768    * gstreamer as being initialized, since it is the case from a plugin point of
769    * view.
770    *
771    * If anything fails, it will be put back to FALSE in gst_init_check().
772    * This allows some special plugins that would call gst_init() to not cause a
773    * looping effect (i.e. initializing GStreamer twice).
774    */
775   gst_initialized = TRUE;
776
777   if (!gst_update_registry ())
778     return FALSE;
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
805 static void
806 gst_debug_help (void)
807 {
808   GSList *list, *walk;
809   GList *list2, *g;
810
811   /* Need to ensure the registry is loaded to get debug categories */
812   if (!init_post (NULL, NULL, NULL, NULL))
813     exit (1);
814
815   list2 = gst_registry_plugin_filter (gst_registry_get_default (),
816       select_all, FALSE, NULL);
817
818   /* FIXME this is gross.  why don't debug have categories PluginFeatures? */
819   for (g = list2; g; g = g_list_next (g)) {
820     GstPlugin *plugin = GST_PLUGIN_CAST (g->data);
821
822     gst_plugin_load (plugin);
823   }
824   g_list_free (list2);
825
826   list = gst_debug_get_all_categories ();
827   walk = list = g_slist_sort (list, sort_by_category_name);
828
829   g_print ("\n");
830   g_print ("name                  level    description\n");
831   g_print ("---------------------+--------+--------------------------------\n");
832
833   while (walk) {
834     GstDebugCategory *cat = (GstDebugCategory *) walk->data;
835
836     if (gst_debug_is_colored ()) {
837 #ifdef G_OS_WIN32
838       gint color = gst_debug_construct_win_color (cat->color);
839       const gint clear = FOREGROUND_RED | FOREGROUND_GREEN | FOREGROUND_BLUE;
840
841       SetConsoleTextAttribute (GetStdHandle (STD_OUTPUT_HANDLE), color);
842       g_print ("%-20s", gst_debug_category_get_name (cat));
843       SetConsoleTextAttribute (GetStdHandle (STD_OUTPUT_HANDLE), clear);
844       g_print (" %1d %s ", gst_debug_category_get_threshold (cat),
845           gst_debug_level_get_name (gst_debug_category_get_threshold (cat)));
846       SetConsoleTextAttribute (GetStdHandle (STD_OUTPUT_HANDLE), color);
847       g_print ("%s", gst_debug_category_get_description (cat));
848       SetConsoleTextAttribute (GetStdHandle (STD_OUTPUT_HANDLE), clear);
849       g_print ("\n");
850 #else /* G_OS_WIN32 */
851       gchar *color = gst_debug_construct_term_color (cat->color);
852
853       g_print ("%s%-20s\033[00m  %1d %s  %s%s\033[00m\n",
854           color,
855           gst_debug_category_get_name (cat),
856           gst_debug_category_get_threshold (cat),
857           gst_debug_level_get_name (gst_debug_category_get_threshold (cat)),
858           color, gst_debug_category_get_description (cat));
859       g_free (color);
860 #endif /* G_OS_WIN32 */
861     } else {
862       g_print ("%-20s  %1d %s  %s\n", gst_debug_category_get_name (cat),
863           gst_debug_category_get_threshold (cat),
864           gst_debug_level_get_name (gst_debug_category_get_threshold (cat)),
865           gst_debug_category_get_description (cat));
866     }
867     walk = g_slist_next (walk);
868   }
869   g_slist_free (list);
870   g_print ("\n");
871 }
872 #endif
873
874 #ifndef GST_DISABLE_OPTION_PARSING
875 static gboolean
876 parse_one_option (gint opt, const gchar * arg, GError ** err)
877 {
878   switch (opt) {
879     case ARG_VERSION:
880       g_print ("GStreamer Core Library version %s\n", PACKAGE_VERSION);
881       exit (0);
882     case ARG_FATAL_WARNINGS:{
883       GLogLevelFlags fatal_mask;
884
885       fatal_mask = g_log_set_always_fatal (G_LOG_FATAL_MASK);
886       fatal_mask |= G_LOG_LEVEL_WARNING | G_LOG_LEVEL_CRITICAL;
887       g_log_set_always_fatal (fatal_mask);
888       break;
889     }
890 #ifndef GST_DISABLE_GST_DEBUG
891     case ARG_DEBUG_LEVEL:{
892       gint tmp = 0;
893
894       tmp = strtol (arg, NULL, 0);
895       if (tmp >= 0 && tmp < GST_LEVEL_COUNT) {
896         gst_debug_set_default_threshold (tmp);
897       }
898       break;
899     }
900     case ARG_DEBUG:
901       parse_debug_list (arg);
902       break;
903     case ARG_DEBUG_NO_COLOR:
904       gst_debug_set_colored (FALSE);
905       break;
906     case ARG_DEBUG_DISABLE:
907       gst_debug_set_active (FALSE);
908       break;
909     case ARG_DEBUG_HELP:
910       gst_debug_help ();
911       exit (0);
912 #endif
913     case ARG_PLUGIN_SPEW:
914       break;
915     case ARG_PLUGIN_PATH:
916 #ifndef GST_DISABLE_REGISTRY
917       split_and_iterate (arg, G_SEARCHPATH_SEPARATOR_S, add_path_func, NULL);
918 #endif /* GST_DISABLE_REGISTRY */
919       break;
920     case ARG_PLUGIN_LOAD:
921       split_and_iterate (arg, ",", prepare_for_load_plugin_func, NULL);
922       break;
923     case ARG_SEGTRAP_DISABLE:
924       _gst_disable_segtrap = TRUE;
925       break;
926     case ARG_REGISTRY_UPDATE_DISABLE:
927 #ifndef GST_DISABLE_REGISTRY
928       _priv_gst_disable_registry_update = TRUE;
929 #endif
930       break;
931     case ARG_REGISTRY_FORK_DISABLE:
932       gst_registry_fork_set_enabled (FALSE);
933       break;
934     default:
935       g_set_error (err, G_OPTION_ERROR, G_OPTION_ERROR_UNKNOWN_OPTION,
936           _("Unknown option"));
937       return FALSE;
938   }
939
940   return TRUE;
941 }
942
943 static gboolean
944 parse_goption_arg (const gchar * opt,
945     const gchar * arg, gpointer data, GError ** err)
946 {
947   static const struct
948   {
949     gchar *opt;
950     int val;
951   } options[] = {
952     {
953     "--gst-version", ARG_VERSION}, {
954     "--gst-fatal-warnings", ARG_FATAL_WARNINGS},
955 #ifndef GST_DISABLE_GST_DEBUG
956     {
957     "--gst-debug-level", ARG_DEBUG_LEVEL}, {
958     "--gst-debug", ARG_DEBUG}, {
959     "--gst-debug-disable", ARG_DEBUG_DISABLE}, {
960     "--gst-debug-no-color", ARG_DEBUG_NO_COLOR}, {
961     "--gst-debug-help", ARG_DEBUG_HELP},
962 #endif
963     {
964     "--gst-plugin-spew", ARG_PLUGIN_SPEW}, {
965     "--gst-plugin-path", ARG_PLUGIN_PATH}, {
966     "--gst-plugin-load", ARG_PLUGIN_LOAD}, {
967     "--gst-disable-segtrap", ARG_SEGTRAP_DISABLE}, {
968     "--gst-disable-registry-update", ARG_REGISTRY_UPDATE_DISABLE}, {
969     "--gst-disable-registry-fork", ARG_REGISTRY_FORK_DISABLE}, {
970     NULL}
971   };
972   gint val = 0, n;
973
974   for (n = 0; options[n].opt; n++) {
975     if (!strcmp (opt, options[n].opt)) {
976       val = options[n].val;
977       break;
978     }
979   }
980
981   return parse_one_option (val, arg, err);
982 }
983 #endif
984
985 /**
986  * gst_deinit:
987  *
988  * Clean up any resources created by GStreamer in gst_init().
989  *
990  * It is normally not needed to call this function in a normal application
991  * as the resources will automatically be freed when the program terminates.
992  * This function is therefore mostly used by testsuites and other memory
993  * profiling tools.
994  *
995  * After this call GStreamer (including this method) should not be used anymore. 
996  */
997 void
998 gst_deinit (void)
999 {
1000   GstClock *clock;
1001
1002   GST_INFO ("deinitializing GStreamer");
1003
1004   if (gst_deinitialized) {
1005     GST_DEBUG ("already deinitialized");
1006     return;
1007   }
1008
1009   g_slist_foreach (_priv_gst_preload_plugins, (GFunc) g_free, NULL);
1010   g_slist_free (_priv_gst_preload_plugins);
1011   _priv_gst_preload_plugins = NULL;
1012
1013 #ifndef GST_DISABLE_REGISTRY
1014   g_list_foreach (_priv_gst_plugin_paths, (GFunc) g_free, NULL);
1015   g_list_free (_priv_gst_plugin_paths);
1016   _priv_gst_plugin_paths = NULL;
1017 #endif
1018
1019   clock = gst_system_clock_obtain ();
1020   gst_object_unref (clock);
1021   gst_object_unref (clock);
1022
1023   _priv_gst_registry_cleanup ();
1024
1025   g_type_class_unref (g_type_class_peek (gst_object_get_type ()));
1026   g_type_class_unref (g_type_class_peek (gst_pad_get_type ()));
1027   g_type_class_unref (g_type_class_peek (gst_element_factory_get_type ()));
1028   g_type_class_unref (g_type_class_peek (gst_element_get_type ()));
1029   g_type_class_unref (g_type_class_peek (gst_type_find_factory_get_type ()));
1030   g_type_class_unref (g_type_class_peek (gst_bin_get_type ()));
1031   g_type_class_unref (g_type_class_peek (gst_bus_get_type ()));
1032   g_type_class_unref (g_type_class_peek (gst_task_get_type ()));
1033   g_type_class_unref (g_type_class_peek (gst_index_factory_get_type ()));
1034   g_type_class_unref (g_type_class_peek (gst_object_flags_get_type ()));
1035   g_type_class_unref (g_type_class_peek (gst_bin_flags_get_type ()));
1036   g_type_class_unref (g_type_class_peek (gst_buffer_flag_get_type ()));
1037   g_type_class_unref (g_type_class_peek (gst_buffer_copy_flags_get_type ()));
1038   g_type_class_unref (g_type_class_peek (gst_buffer_list_item_get_type ()));
1039   g_type_class_unref (g_type_class_peek (gst_bus_flags_get_type ()));
1040   g_type_class_unref (g_type_class_peek (gst_bus_sync_reply_get_type ()));
1041   g_type_class_unref (g_type_class_peek (gst_caps_flags_get_type ()));
1042   g_type_class_unref (g_type_class_peek (gst_clock_type_get_type ()));
1043   g_type_class_unref (g_type_class_peek (gst_clock_return_get_type ()));
1044   g_type_class_unref (g_type_class_peek (gst_clock_entry_type_get_type ()));
1045   g_type_class_unref (g_type_class_peek (gst_clock_flags_get_type ()));
1046   g_type_class_unref (g_type_class_peek (gst_debug_graph_details_get_type ()));
1047   g_type_class_unref (g_type_class_peek (gst_state_get_type ()));
1048   g_type_class_unref (g_type_class_peek (gst_state_change_return_get_type ()));
1049   g_type_class_unref (g_type_class_peek (gst_state_change_get_type ()));
1050   g_type_class_unref (g_type_class_peek (gst_element_flags_get_type ()));
1051   g_type_class_unref (g_type_class_peek (gst_core_error_get_type ()));
1052   g_type_class_unref (g_type_class_peek (gst_library_error_get_type ()));
1053   g_type_class_unref (g_type_class_peek (gst_plugin_dependency_flags_get_type
1054           ()));
1055   g_type_class_unref (g_type_class_peek (gst_parse_flags_get_type ()));
1056   g_type_class_unref (g_type_class_peek (gst_resource_error_get_type ()));
1057   g_type_class_unref (g_type_class_peek (gst_search_mode_get_type ()));
1058   g_type_class_unref (g_type_class_peek (gst_stream_error_get_type ()));
1059   g_type_class_unref (g_type_class_peek (gst_stream_status_type_get_type ()));
1060   g_type_class_unref (g_type_class_peek (gst_structure_change_type_get_type
1061           ()));
1062   g_type_class_unref (g_type_class_peek (gst_event_type_flags_get_type ()));
1063   g_type_class_unref (g_type_class_peek (gst_event_type_get_type ()));
1064   g_type_class_unref (g_type_class_peek (gst_seek_type_get_type ()));
1065   g_type_class_unref (g_type_class_peek (gst_seek_flags_get_type ()));
1066   g_type_class_unref (g_type_class_peek (gst_format_get_type ()));
1067   g_type_class_unref (g_type_class_peek (gst_index_certainty_get_type ()));
1068   g_type_class_unref (g_type_class_peek (gst_index_entry_type_get_type ()));
1069   g_type_class_unref (g_type_class_peek (gst_index_lookup_method_get_type ()));
1070   g_type_class_unref (g_type_class_peek (gst_assoc_flags_get_type ()));
1071   g_type_class_unref (g_type_class_peek (gst_index_resolver_method_get_type
1072           ()));
1073   g_type_class_unref (g_type_class_peek (gst_index_flags_get_type ()));
1074   g_type_class_unref (g_type_class_peek (gst_debug_level_get_type ()));
1075   g_type_class_unref (g_type_class_peek (gst_debug_color_flags_get_type ()));
1076   g_type_class_unref (g_type_class_peek (gst_iterator_result_get_type ()));
1077   g_type_class_unref (g_type_class_peek (gst_iterator_item_get_type ()));
1078   g_type_class_unref (g_type_class_peek (gst_message_type_get_type ()));
1079   g_type_class_unref (g_type_class_peek (gst_mini_object_flags_get_type ()));
1080   g_type_class_unref (g_type_class_peek (gst_pad_link_return_get_type ()));
1081   g_type_class_unref (g_type_class_peek (gst_flow_return_get_type ()));
1082   g_type_class_unref (g_type_class_peek (gst_activate_mode_get_type ()));
1083   g_type_class_unref (g_type_class_peek (gst_pad_direction_get_type ()));
1084   g_type_class_unref (g_type_class_peek (gst_pad_flags_get_type ()));
1085   g_type_class_unref (g_type_class_peek (gst_pad_presence_get_type ()));
1086   g_type_class_unref (g_type_class_peek (gst_pad_template_flags_get_type ()));
1087   g_type_class_unref (g_type_class_peek (gst_pipeline_flags_get_type ()));
1088   g_type_class_unref (g_type_class_peek (gst_plugin_error_get_type ()));
1089   g_type_class_unref (g_type_class_peek (gst_plugin_flags_get_type ()));
1090   g_type_class_unref (g_type_class_peek (gst_rank_get_type ()));
1091   g_type_class_unref (g_type_class_peek (gst_query_type_get_type ()));
1092   g_type_class_unref (g_type_class_peek (gst_buffering_mode_get_type ()));
1093   g_type_class_unref (g_type_class_peek (gst_tag_merge_mode_get_type ()));
1094   g_type_class_unref (g_type_class_peek (gst_tag_flag_get_type ()));
1095   g_type_class_unref (g_type_class_peek (gst_task_state_get_type ()));
1096   g_type_class_unref (g_type_class_peek (gst_alloc_trace_flags_get_type ()));
1097   g_type_class_unref (g_type_class_peek (gst_type_find_probability_get_type
1098           ()));
1099   g_type_class_unref (g_type_class_peek (gst_uri_type_get_type ()));
1100   g_type_class_unref (g_type_class_peek (gst_parse_error_get_type ()));
1101   g_type_class_unref (g_type_class_peek (gst_param_spec_fraction_get_type ()));
1102
1103   gst_deinitialized = TRUE;
1104   GST_INFO ("deinitialized GStreamer");
1105 }
1106
1107 /**
1108  * gst_version:
1109  * @major: pointer to a guint to store the major version number
1110  * @minor: pointer to a guint to store the minor version number
1111  * @micro: pointer to a guint to store the micro version number
1112  * @nano:  pointer to a guint to store the nano version number
1113  *
1114  * Gets the version number of the GStreamer library.
1115  */
1116 void
1117 gst_version (guint * major, guint * minor, guint * micro, guint * nano)
1118 {
1119   g_return_if_fail (major);
1120   g_return_if_fail (minor);
1121   g_return_if_fail (micro);
1122   g_return_if_fail (nano);
1123
1124   *major = GST_VERSION_MAJOR;
1125   *minor = GST_VERSION_MINOR;
1126   *micro = GST_VERSION_MICRO;
1127   *nano = GST_VERSION_NANO;
1128 }
1129
1130 /**
1131  * gst_version_string:
1132  *
1133  * This function returns a string that is useful for describing this version
1134  * of GStreamer to the outside world: user agent strings, logging, ...
1135  *
1136  * Returns: a newly allocated string describing this version of GStreamer.
1137  */
1138
1139 gchar *
1140 gst_version_string ()
1141 {
1142   guint major, minor, micro, nano;
1143
1144   gst_version (&major, &minor, &micro, &nano);
1145   if (nano == 0)
1146     return g_strdup_printf ("GStreamer %d.%d.%d", major, minor, micro);
1147   else if (nano == 1)
1148     return g_strdup_printf ("GStreamer %d.%d.%d (GIT)", major, minor, micro);
1149   else
1150     return g_strdup_printf ("GStreamer %d.%d.%d (prerelease)", major, minor,
1151         micro);
1152 }
1153
1154 /**
1155  * gst_segtrap_is_enabled:
1156  *
1157  * Some functions in the GStreamer core might install a custom SIGSEGV handler
1158  * to better catch and report errors to the application. Currently this feature
1159  * is enabled by default when loading plugins.
1160  *
1161  * Applications might want to disable this behaviour with the
1162  * gst_segtrap_set_enabled() function. This is typically done if the application
1163  * wants to install its own handler without GStreamer interfering.
1164  *
1165  * Returns: %TRUE if GStreamer is allowed to install a custom SIGSEGV handler.
1166  *
1167  * Since: 0.10.10
1168  */
1169 gboolean
1170 gst_segtrap_is_enabled (void)
1171 {
1172   /* yeps, it's enabled when it's not disabled */
1173   return !_gst_disable_segtrap;
1174 }
1175
1176 /**
1177  * gst_segtrap_set_enabled:
1178  * @enabled: whether a custom SIGSEGV handler should be installed.
1179  *
1180  * Applications might want to disable/enable the SIGSEGV handling of
1181  * the GStreamer core. See gst_segtrap_is_enabled() for more information.
1182  *
1183  * Since: 0.10.10
1184  */
1185 void
1186 gst_segtrap_set_enabled (gboolean enabled)
1187 {
1188   _gst_disable_segtrap = !enabled;
1189 }