tools: don't leak the GMainLoop
[platform/upstream/gstreamer.git] / tools / gst-discoverer.c
1 /* GStreamer
2  * Copyright (C) 2009 Edward Hervey <edward.hervey@collabora.co.uk>
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Library General Public
6  * License as published by the Free Software Foundation; either
7  * version 2 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Library General Public License for more details.
13  *
14  * You should have received a copy of the GNU Library General Public
15  * License along with this library; if not, write to the
16  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
17  * Boston, MA 02111-1307, USA.
18  */
19
20 #ifdef HAVE_CONFIG_H
21 #include "config.h"
22 #endif
23
24 #include <stdlib.h>
25 #include <glib.h>
26 #include <gst/gst.h>
27 #include <gst/pbutils/pbutils.h>
28
29 static gboolean async = FALSE;
30 static gboolean silent = FALSE;
31 static gboolean verbose = FALSE;
32
33 typedef struct
34 {
35   GstDiscoverer *dc;
36   int argc;
37   char **argv;
38 } PrivStruct;
39
40 #define my_g_string_append_printf(str, format, ...) \
41   g_string_append_printf (str, "%*s" format, 2*depth, " ", ##__VA_ARGS__)
42
43 static gchar *
44 gst_stream_audio_information_to_string (GstDiscovererStreamInfo * info,
45     gint depth)
46 {
47   GstDiscovererAudioInfo *audio_info;
48   GString *s;
49   gchar *tmp;
50   int len = 400;
51   const GstTagList *tags;
52   GstCaps *caps;
53
54   g_return_val_if_fail (info != NULL, NULL);
55
56   s = g_string_sized_new (len);
57
58   my_g_string_append_printf (s, "Codec:\n");
59   caps = gst_discoverer_stream_info_get_caps (info);
60   tmp = gst_caps_to_string (caps);
61   gst_caps_unref (caps);
62   my_g_string_append_printf (s, "  %s\n", tmp);
63   g_free (tmp);
64
65   my_g_string_append_printf (s, "Additional info:\n");
66   if (gst_discoverer_stream_info_get_misc (info)) {
67     tmp = gst_structure_to_string (gst_discoverer_stream_info_get_misc (info));
68     my_g_string_append_printf (s, "  %s\n", tmp);
69     g_free (tmp);
70   } else {
71     my_g_string_append_printf (s, "  None\n");
72   }
73
74   audio_info = (GstDiscovererAudioInfo *) info;
75   my_g_string_append_printf (s, "Channels: %u\n",
76       gst_discoverer_audio_info_get_channels (audio_info));
77   my_g_string_append_printf (s, "Sample rate: %u\n",
78       gst_discoverer_audio_info_get_sample_rate (audio_info));
79   my_g_string_append_printf (s, "Depth: %u\n",
80       gst_discoverer_audio_info_get_depth (audio_info));
81
82   my_g_string_append_printf (s, "Bitrate: %u\n",
83       gst_discoverer_audio_info_get_bitrate (audio_info));
84   my_g_string_append_printf (s, "Max bitrate: %u\n",
85       gst_discoverer_audio_info_get_max_bitrate (audio_info));
86
87   my_g_string_append_printf (s, "Tags:\n");
88   tags = gst_discoverer_stream_info_get_tags (info);
89   if (tags) {
90     tmp = gst_structure_to_string ((GstStructure *) tags);
91     my_g_string_append_printf (s, "  %s\n", tmp);
92     g_free (tmp);
93   } else {
94     my_g_string_append_printf (s, "  None\n");
95   }
96   if (verbose)
97     my_g_string_append_printf (s, "\n");
98
99   return g_string_free (s, FALSE);
100 }
101
102 static gchar *
103 gst_stream_video_information_to_string (GstDiscovererStreamInfo * info,
104     gint depth)
105 {
106   GstDiscovererVideoInfo *video_info;
107   GString *s;
108   gchar *tmp;
109   int len = 500;
110   const GstStructure *misc;
111   const GstTagList *tags;
112   GstCaps *caps;
113
114   g_return_val_if_fail (info != NULL, NULL);
115
116   s = g_string_sized_new (len);
117
118   my_g_string_append_printf (s, "Codec:\n");
119   caps = gst_discoverer_stream_info_get_caps (info);
120   tmp = gst_caps_to_string (caps);
121   gst_caps_unref (caps);
122   my_g_string_append_printf (s, "  %s\n", tmp);
123   g_free (tmp);
124
125   my_g_string_append_printf (s, "Additional info:\n");
126   misc = gst_discoverer_stream_info_get_misc (info);
127   if (misc) {
128     tmp = gst_structure_to_string (misc);
129     my_g_string_append_printf (s, "  %s\n", tmp);
130     g_free (tmp);
131   } else {
132     my_g_string_append_printf (s, "  None\n");
133   }
134
135   video_info = (GstDiscovererVideoInfo *) info;
136   my_g_string_append_printf (s, "Width: %u\n",
137       gst_discoverer_video_info_get_width (video_info));
138   my_g_string_append_printf (s, "Height: %u\n",
139       gst_discoverer_video_info_get_height (video_info));
140   my_g_string_append_printf (s, "Depth: %u\n",
141       gst_discoverer_video_info_get_depth (video_info));
142
143   my_g_string_append_printf (s, "Frame rate: %u/%u\n",
144       gst_discoverer_video_info_get_framerate_num (video_info),
145       gst_discoverer_video_info_get_framerate_denom (video_info));
146
147   my_g_string_append_printf (s, "Pixel aspect ratio: %u/%u\n",
148       gst_discoverer_video_info_get_par_num (video_info),
149       gst_discoverer_video_info_get_par_denom (video_info));
150
151   my_g_string_append_printf (s, "Interlaced: %s\n",
152       gst_discoverer_video_info_is_interlaced (video_info) ? "true" : "false");
153
154   my_g_string_append_printf (s, "Bitrate: %u\n",
155       gst_discoverer_video_info_get_bitrate (video_info));
156   my_g_string_append_printf (s, "Max bitrate: %u\n",
157       gst_discoverer_video_info_get_max_bitrate (video_info));
158
159   my_g_string_append_printf (s, "Tags:\n");
160   tags = gst_discoverer_stream_info_get_tags (info);
161   if (tags) {
162     tmp = gst_structure_to_string ((GstStructure *) tags);
163     my_g_string_append_printf (s, "  %s\n", tmp);
164     g_free (tmp);
165   } else {
166     my_g_string_append_printf (s, "  None\n");
167   }
168   if (verbose)
169     my_g_string_append_printf (s, "\n");
170
171   return g_string_free (s, FALSE);
172 }
173
174 static void
175 print_stream_info (GstDiscovererStreamInfo * info, void *depth)
176 {
177   gchar *desc = NULL;
178   GstCaps *caps;
179
180   caps = gst_discoverer_stream_info_get_caps (info);
181
182   if (caps) {
183     if (gst_caps_is_fixed (caps) && !verbose)
184       desc = gst_pb_utils_get_codec_description (caps);
185     else
186       desc = gst_caps_to_string (caps);
187     gst_caps_unref (caps);
188   }
189
190   g_print ("%*s%s: %s\n", 2 * GPOINTER_TO_INT (depth), " ",
191       gst_discoverer_stream_info_get_stream_type_nick (info), desc);
192
193   if (desc) {
194     g_free (desc);
195     desc = NULL;
196   }
197
198   if (verbose) {
199     if (GST_IS_DISCOVERER_AUDIO_INFO (info))
200       desc =
201           gst_stream_audio_information_to_string (info,
202           GPOINTER_TO_INT (depth) + 1);
203     else if (GST_IS_DISCOVERER_VIDEO_INFO (info))
204       desc =
205           gst_stream_video_information_to_string (info,
206           GPOINTER_TO_INT (depth) + 1);
207     g_print ("%s", desc);
208     g_free (desc);
209   }
210 }
211
212 static void
213 print_topology (GstDiscovererStreamInfo * info, gint depth)
214 {
215   GstDiscovererStreamInfo *next;
216
217   if (!info)
218     return;
219
220   print_stream_info (info, GINT_TO_POINTER (depth));
221
222   next = gst_discoverer_stream_info_get_next (info);
223   if (next) {
224     print_topology (next, depth + 1);
225     gst_discoverer_stream_info_unref (next);
226   } else if (GST_IS_DISCOVERER_CONTAINER_INFO (info)) {
227     GList *tmp, *streams;
228
229     streams =
230         gst_discoverer_container_info_get_streams (GST_DISCOVERER_CONTAINER_INFO
231         (info));
232     for (tmp = streams; tmp; tmp = tmp->next) {
233       GstDiscovererStreamInfo *tmpinf = (GstDiscovererStreamInfo *) tmp->data;
234       print_topology (tmpinf, depth + 1);
235     }
236     gst_discoverer_stream_info_list_free (streams);
237   }
238 }
239
240 static gboolean
241 print_tag_each (GQuark field_id, const GValue * value, gpointer user_data)
242 {
243   gint tab = GPOINTER_TO_INT (user_data);
244   gchar *ser;
245
246   ser = gst_value_serialize (value);
247
248   g_print ("%*s%s: %s\n", tab, " ",
249       gst_tag_get_nick (g_quark_to_string (field_id)), ser);
250   g_free (ser);
251
252   return TRUE;
253 }
254
255 static void
256 print_properties (GstDiscovererInfo * info, gint tab)
257 {
258   const GstTagList *tags;
259
260   g_print ("%*sDuration: %" GST_TIME_FORMAT "\n", tab + 1, " ",
261       GST_TIME_ARGS (gst_discoverer_info_get_duration (info)));
262   g_print ("%*sSeekable: %s\n", tab + 1, " ",
263       (gst_discoverer_info_get_seekable (info) ? "yes" : "no"));
264   if ((tags = gst_discoverer_info_get_tags (info))) {
265     g_print ("%*sTags: \n", tab + 1, " ");
266     gst_structure_foreach ((const GstStructure *) tags, print_tag_each,
267         GINT_TO_POINTER (tab + 5));
268   }
269 }
270
271 static void
272 print_info (GstDiscovererInfo * info, GError * err)
273 {
274   GstDiscovererResult result = gst_discoverer_info_get_result (info);
275   GstDiscovererStreamInfo *sinfo;
276
277   g_print ("Done discovering %s\n", gst_discoverer_info_get_uri (info));
278   switch (result) {
279     case GST_DISCOVERER_OK:
280     {
281       break;
282     }
283     case GST_DISCOVERER_URI_INVALID:
284     {
285       g_print ("URI is not valid\n");
286       break;
287     }
288     case GST_DISCOVERER_ERROR:
289     {
290       g_print ("An error was encountered while discovering the file\n");
291       g_print (" %s\n", err->message);
292       break;
293     }
294     case GST_DISCOVERER_TIMEOUT:
295     {
296       g_print ("Analyzing URI timed out\n");
297       break;
298     }
299     case GST_DISCOVERER_BUSY:
300     {
301       g_print ("Discoverer was busy\n");
302       break;
303     }
304     case GST_DISCOVERER_MISSING_PLUGINS:
305     {
306       g_print ("Missing plugins\n");
307       if (verbose) {
308         gchar *tmp =
309             gst_structure_to_string (gst_discoverer_info_get_misc (info));
310         g_print (" (%s)\n", tmp);
311         g_free (tmp);
312       }
313       break;
314     }
315   }
316
317   if ((sinfo = gst_discoverer_info_get_stream_info (info))) {
318     g_print ("\nTopology:\n");
319     print_topology (sinfo, 1);
320     g_print ("\nProperties:\n");
321     print_properties (info, 1);
322     gst_discoverer_stream_info_unref (sinfo);
323   }
324
325   g_print ("\n");
326 }
327
328 static void
329 process_file (GstDiscoverer * dc, const gchar * filename)
330 {
331   GError *err = NULL;
332   GDir *dir;
333   gchar *uri, *path;
334   GstDiscovererInfo *info;
335   GstStructure *st = NULL;
336
337   if (!gst_uri_is_valid (filename)) {
338     /* Recurse into directories */
339     if ((dir = g_dir_open (filename, 0, NULL))) {
340       const gchar *entry;
341
342       while ((entry = g_dir_read_name (dir))) {
343         gchar *path;
344         path = g_strconcat (filename, G_DIR_SEPARATOR_S, entry, NULL);
345         process_file (dc, path);
346         g_free (path);
347       }
348
349       g_dir_close (dir);
350       return;
351     }
352
353     if (!g_path_is_absolute (filename)) {
354       gchar *cur_dir;
355
356       cur_dir = g_get_current_dir ();
357       path = g_build_filename (cur_dir, filename, NULL);
358       g_free (cur_dir);
359     } else {
360       path = g_strdup (filename);
361     }
362
363     uri = g_filename_to_uri (path, NULL, &err);
364     g_free (path);
365     path = NULL;
366
367     if (err) {
368       g_warning ("Couldn't convert filename to URI: %s\n", err->message);
369       g_error_free (err);
370       return;
371     }
372   } else {
373     uri = g_strdup (filename);
374   }
375
376   if (async == FALSE) {
377     g_print ("Analyzing %s\n", uri);
378     info = gst_discoverer_discover_uri (dc, uri, &err);
379     print_info (info, err);
380     gst_discoverer_info_unref (info);
381     if (st)
382       gst_structure_free (st);
383   } else {
384     gst_discoverer_discover_uri_async (dc, uri);
385   }
386
387   g_free (uri);
388 }
389
390 static void
391 _new_discovered_uri (GstDiscoverer * dc, GstDiscovererInfo * info, GError * err)
392 {
393   print_info (info, err);
394 }
395
396 static gboolean
397 _run_async (PrivStruct * ps)
398 {
399   gint i;
400
401   for (i = 1; i < ps->argc; i++)
402     process_file (ps->dc, ps->argv[i]);
403
404   return FALSE;
405 }
406
407 static void
408 _discoverer_finished (GstDiscoverer * dc, GMainLoop * ml)
409 {
410   g_main_loop_quit (ml);
411 }
412
413 int
414 main (int argc, char **argv)
415 {
416   GError *err = NULL;
417   GstDiscoverer *dc;
418   gint timeout = 10;
419   GOptionEntry options[] = {
420     {"async", 'a', 0, G_OPTION_ARG_NONE, &async,
421         "Run asynchronously", NULL},
422     {"silent", 's', 0, G_OPTION_ARG_NONE, &silent,
423         "Don't output the information structure", NULL},
424     {"timeout", 't', 0, G_OPTION_ARG_INT, &timeout,
425         "Specify timeout (in seconds, default 10)", "T"},
426     /* {"elem", 'e', 0, G_OPTION_ARG_NONE, &elem_seek, */
427     /*     "Seek on elements instead of pads", NULL}, */
428     {"verbose", 'v', 0, G_OPTION_ARG_NONE, &verbose,
429         "Verbose properties", NULL},
430     {NULL}
431   };
432   GOptionContext *ctx;
433
434   if (!g_thread_supported ())
435     g_thread_init (NULL);
436
437   ctx =
438       g_option_context_new
439       ("- discover files synchronously with GstDiscoverer");
440   g_option_context_add_main_entries (ctx, options, NULL);
441   g_option_context_add_group (ctx, gst_init_get_option_group ());
442
443   if (!g_option_context_parse (ctx, &argc, &argv, &err)) {
444     g_print ("Error initializing: %s\n", err->message);
445     exit (1);
446   }
447
448   g_option_context_free (ctx);
449
450   if (argc < 2) {
451     g_print ("usage: %s <uris>\n", argv[0]);
452     exit (-1);
453   }
454
455   dc = gst_discoverer_new (timeout * GST_SECOND, &err);
456   if (G_UNLIKELY (dc == NULL)) {
457     g_print ("Error initializing: %s\n", err->message);
458     exit (1);
459   }
460
461   if (async == FALSE) {
462     gint i;
463     for (i = 1; i < argc; i++)
464       process_file (dc, argv[i]);
465   } else {
466     PrivStruct *ps = g_new0 (PrivStruct, 1);
467     GMainLoop *ml = g_main_loop_new (NULL, FALSE);
468
469     ps->dc = dc;
470     ps->argc = argc;
471     ps->argv = argv;
472
473     /* adding uris will be started when the mainloop runs */
474     g_idle_add ((GSourceFunc) _run_async, ps);
475
476     /* connect signals */
477     g_signal_connect (dc, "discovered", G_CALLBACK (_new_discovered_uri), NULL);
478     g_signal_connect (dc, "finished", G_CALLBACK (_discoverer_finished), ml);
479
480     gst_discoverer_start (dc);
481     /* run mainloop */
482     g_main_loop_run (ml);
483
484     gst_discoverer_stop (dc);
485     g_free (ps);
486     g_main_loop_unref (ml);
487   }
488   g_object_unref (dc);
489
490   return 0;
491 }