Merge branch 'master' into 0.11
[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     if (desc) {
208       g_print ("%s", desc);
209       g_free (desc);
210     }
211   }
212 }
213
214 static void
215 print_topology (GstDiscovererStreamInfo * info, gint depth)
216 {
217   GstDiscovererStreamInfo *next;
218
219   if (!info)
220     return;
221
222   print_stream_info (info, GINT_TO_POINTER (depth));
223
224   next = gst_discoverer_stream_info_get_next (info);
225   if (next) {
226     print_topology (next, depth + 1);
227     gst_discoverer_stream_info_unref (next);
228   } else if (GST_IS_DISCOVERER_CONTAINER_INFO (info)) {
229     GList *tmp, *streams;
230
231     streams =
232         gst_discoverer_container_info_get_streams (GST_DISCOVERER_CONTAINER_INFO
233         (info));
234     for (tmp = streams; tmp; tmp = tmp->next) {
235       GstDiscovererStreamInfo *tmpinf = (GstDiscovererStreamInfo *) tmp->data;
236       print_topology (tmpinf, depth + 1);
237     }
238     gst_discoverer_stream_info_list_free (streams);
239   }
240 }
241
242 static gboolean
243 print_tag_each (GQuark field_id, const GValue * value, gpointer user_data)
244 {
245   gint tab = GPOINTER_TO_INT (user_data);
246   gchar *ser;
247
248   if (G_VALUE_HOLDS_STRING (value))
249     ser = g_value_dup_string (value);
250   else if (GST_VALUE_HOLDS_BUFFER (value)) {
251     GstBuffer *buf = gst_value_get_buffer (value);
252     ser =
253         g_strdup_printf ("<GstBuffer [%" G_GSIZE_FORMAT " bytes]>",
254         gst_buffer_get_size (buf));
255   } else
256     ser = gst_value_serialize (value);
257
258   g_print ("%*s%s: %s\n", tab, " ",
259       gst_tag_get_nick (g_quark_to_string (field_id)), ser);
260   g_free (ser);
261
262   return TRUE;
263 }
264
265 static void
266 print_properties (GstDiscovererInfo * info, gint tab)
267 {
268   const GstTagList *tags;
269
270   g_print ("%*sDuration: %" GST_TIME_FORMAT "\n", tab + 1, " ",
271       GST_TIME_ARGS (gst_discoverer_info_get_duration (info)));
272   g_print ("%*sSeekable: %s\n", tab + 1, " ",
273       (gst_discoverer_info_get_seekable (info) ? "yes" : "no"));
274   if ((tags = gst_discoverer_info_get_tags (info))) {
275     g_print ("%*sTags: \n", tab + 1, " ");
276     gst_structure_foreach ((const GstStructure *) tags, print_tag_each,
277         GINT_TO_POINTER (tab + 5));
278   }
279 }
280
281 static void
282 print_info (GstDiscovererInfo * info, GError * err)
283 {
284   GstDiscovererResult result = gst_discoverer_info_get_result (info);
285   GstDiscovererStreamInfo *sinfo;
286
287   g_print ("Done discovering %s\n", gst_discoverer_info_get_uri (info));
288   switch (result) {
289     case GST_DISCOVERER_OK:
290     {
291       break;
292     }
293     case GST_DISCOVERER_URI_INVALID:
294     {
295       g_print ("URI is not valid\n");
296       break;
297     }
298     case GST_DISCOVERER_ERROR:
299     {
300       g_print ("An error was encountered while discovering the file\n");
301       g_print (" %s\n", err->message);
302       break;
303     }
304     case GST_DISCOVERER_TIMEOUT:
305     {
306       g_print ("Analyzing URI timed out\n");
307       break;
308     }
309     case GST_DISCOVERER_BUSY:
310     {
311       g_print ("Discoverer was busy\n");
312       break;
313     }
314     case GST_DISCOVERER_MISSING_PLUGINS:
315     {
316       g_print ("Missing plugins\n");
317       if (verbose) {
318         gchar *tmp =
319             gst_structure_to_string (gst_discoverer_info_get_misc (info));
320         g_print (" (%s)\n", tmp);
321         g_free (tmp);
322       }
323       break;
324     }
325   }
326
327   if ((sinfo = gst_discoverer_info_get_stream_info (info))) {
328     g_print ("\nTopology:\n");
329     print_topology (sinfo, 1);
330     g_print ("\nProperties:\n");
331     print_properties (info, 1);
332     gst_discoverer_stream_info_unref (sinfo);
333   }
334
335   g_print ("\n");
336 }
337
338 static void
339 process_file (GstDiscoverer * dc, const gchar * filename)
340 {
341   GError *err = NULL;
342   GDir *dir;
343   gchar *uri, *path;
344   GstDiscovererInfo *info;
345   GstStructure *st = NULL;
346
347   if (!gst_uri_is_valid (filename)) {
348     /* Recurse into directories */
349     if ((dir = g_dir_open (filename, 0, NULL))) {
350       const gchar *entry;
351
352       while ((entry = g_dir_read_name (dir))) {
353         gchar *path;
354         path = g_strconcat (filename, G_DIR_SEPARATOR_S, entry, NULL);
355         process_file (dc, path);
356         g_free (path);
357       }
358
359       g_dir_close (dir);
360       return;
361     }
362
363     if (!g_path_is_absolute (filename)) {
364       gchar *cur_dir;
365
366       cur_dir = g_get_current_dir ();
367       path = g_build_filename (cur_dir, filename, NULL);
368       g_free (cur_dir);
369     } else {
370       path = g_strdup (filename);
371     }
372
373     uri = g_filename_to_uri (path, NULL, &err);
374     g_free (path);
375     path = NULL;
376
377     if (err) {
378       g_warning ("Couldn't convert filename to URI: %s\n", err->message);
379       g_error_free (err);
380       return;
381     }
382   } else {
383     uri = g_strdup (filename);
384   }
385
386   if (async == FALSE) {
387     g_print ("Analyzing %s\n", uri);
388     info = gst_discoverer_discover_uri (dc, uri, &err);
389     print_info (info, err);
390     gst_discoverer_info_unref (info);
391     if (st)
392       gst_structure_free (st);
393   } else {
394     gst_discoverer_discover_uri_async (dc, uri);
395   }
396
397   g_free (uri);
398 }
399
400 static void
401 _new_discovered_uri (GstDiscoverer * dc, GstDiscovererInfo * info, GError * err)
402 {
403   print_info (info, err);
404 }
405
406 static gboolean
407 _run_async (PrivStruct * ps)
408 {
409   gint i;
410
411   for (i = 1; i < ps->argc; i++)
412     process_file (ps->dc, ps->argv[i]);
413
414   return FALSE;
415 }
416
417 static void
418 _discoverer_finished (GstDiscoverer * dc, GMainLoop * ml)
419 {
420   g_main_loop_quit (ml);
421 }
422
423 int
424 main (int argc, char **argv)
425 {
426   GError *err = NULL;
427   GstDiscoverer *dc;
428   gint timeout = 10;
429   GOptionEntry options[] = {
430     {"async", 'a', 0, G_OPTION_ARG_NONE, &async,
431         "Run asynchronously", NULL},
432     {"silent", 's', 0, G_OPTION_ARG_NONE, &silent,
433         "Don't output the information structure", NULL},
434     {"timeout", 't', 0, G_OPTION_ARG_INT, &timeout,
435         "Specify timeout (in seconds, default 10)", "T"},
436     /* {"elem", 'e', 0, G_OPTION_ARG_NONE, &elem_seek, */
437     /*     "Seek on elements instead of pads", NULL}, */
438     {"verbose", 'v', 0, G_OPTION_ARG_NONE, &verbose,
439         "Verbose properties", NULL},
440     {NULL}
441   };
442   GOptionContext *ctx;
443
444   if (!g_thread_supported ())
445     g_thread_init (NULL);
446
447   ctx =
448       g_option_context_new
449       ("- discover files synchronously with GstDiscoverer");
450   g_option_context_add_main_entries (ctx, options, NULL);
451   g_option_context_add_group (ctx, gst_init_get_option_group ());
452
453   if (!g_option_context_parse (ctx, &argc, &argv, &err)) {
454     g_print ("Error initializing: %s\n", err->message);
455     exit (1);
456   }
457
458   g_option_context_free (ctx);
459
460   if (argc < 2) {
461     g_print ("usage: %s <uris>\n", argv[0]);
462     exit (-1);
463   }
464
465   dc = gst_discoverer_new (timeout * GST_SECOND, &err);
466   if (G_UNLIKELY (dc == NULL)) {
467     g_print ("Error initializing: %s\n", err->message);
468     exit (1);
469   }
470
471   if (async == FALSE) {
472     gint i;
473     for (i = 1; i < argc; i++)
474       process_file (dc, argv[i]);
475   } else {
476     PrivStruct *ps = g_new0 (PrivStruct, 1);
477     GMainLoop *ml = g_main_loop_new (NULL, FALSE);
478
479     ps->dc = dc;
480     ps->argc = argc;
481     ps->argv = argv;
482
483     /* adding uris will be started when the mainloop runs */
484     g_idle_add ((GSourceFunc) _run_async, ps);
485
486     /* connect signals */
487     g_signal_connect (dc, "discovered", G_CALLBACK (_new_discovered_uri), NULL);
488     g_signal_connect (dc, "finished", G_CALLBACK (_discoverer_finished), ml);
489
490     gst_discoverer_start (dc);
491     /* run mainloop */
492     g_main_loop_run (ml);
493
494     gst_discoverer_stop (dc);
495     g_free (ps);
496     g_main_loop_unref (ml);
497   }
498   g_object_unref (dc);
499
500   return 0;
501 }