ffprobe: make upcase_string() ignore non-ASCII characters
[ffmpeg.git] / ffprobe.c
1 /*
2  * Copyright (c) 2007-2010 Stefano Sabatini
3  *
4  * This file is part of FFmpeg.
5  *
6  * FFmpeg is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * FFmpeg is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with FFmpeg; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
19  */
20
21 /**
22  * @file
23  * simple media prober based on the FFmpeg libraries
24  */
25
26 #include "config.h"
27
28 #include "libavformat/avformat.h"
29 #include "libavcodec/avcodec.h"
30 #include "libavutil/avstring.h"
31 #include "libavutil/opt.h"
32 #include "libavutil/pixdesc.h"
33 #include "libavutil/dict.h"
34 #include "libavdevice/avdevice.h"
35 #include "cmdutils.h"
36
37 const char program_name[] = "ffprobe";
38 const int program_birth_year = 2007;
39
40 static int do_show_error   = 0;
41 static int do_show_format  = 0;
42 static int do_show_frames  = 0;
43 static int do_show_packets = 0;
44 static int do_show_streams = 0;
45
46 static int show_value_unit              = 0;
47 static int use_value_prefix             = 0;
48 static int use_byte_value_binary_prefix = 0;
49 static int use_value_sexagesimal_format = 0;
50 static int show_private_data            = 1;
51
52 static char *print_format;
53
54 static const OptionDef options[];
55
56 /* FFprobe context */
57 static const char *input_filename;
58 static AVInputFormat *iformat = NULL;
59
60 static const char *binary_unit_prefixes [] = { "", "Ki", "Mi", "Gi", "Ti", "Pi" };
61 static const char *decimal_unit_prefixes[] = { "", "K" , "M" , "G" , "T" , "P"  };
62
63 static const char *unit_second_str          = "s"    ;
64 static const char *unit_hertz_str           = "Hz"   ;
65 static const char *unit_byte_str            = "byte" ;
66 static const char *unit_bit_per_second_str  = "bit/s";
67
68 void av_noreturn exit_program(int ret)
69 {
70     exit(ret);
71 }
72
73 struct unit_value {
74     union { double d; int i; } val;
75     const char *unit;
76 };
77
78 static char *value_string(char *buf, int buf_size, struct unit_value uv)
79 {
80     double vald;
81     int show_float = 0;
82
83     if (uv.unit == unit_second_str) {
84         vald = uv.val.d;
85         show_float = 1;
86     } else {
87         vald = uv.val.i;
88     }
89
90     if (uv.unit == unit_second_str && use_value_sexagesimal_format) {
91         double secs;
92         int hours, mins;
93         secs  = vald;
94         mins  = (int)secs / 60;
95         secs  = secs - mins * 60;
96         hours = mins / 60;
97         mins %= 60;
98         snprintf(buf, buf_size, "%d:%02d:%09.6f", hours, mins, secs);
99     } else if (use_value_prefix) {
100         const char *prefix_string;
101         int index, l;
102
103         if (uv.unit == unit_byte_str && use_byte_value_binary_prefix) {
104             index = (int) (log(vald)/log(2)) / 10;
105             index = av_clip(index, 0, FF_ARRAY_ELEMS(binary_unit_prefixes) -1);
106             vald /= pow(2, index*10);
107             prefix_string = binary_unit_prefixes[index];
108         } else {
109             index = (int) (log10(vald)) / 3;
110             index = av_clip(index, 0, FF_ARRAY_ELEMS(decimal_unit_prefixes) -1);
111             vald /= pow(10, index*3);
112             prefix_string = decimal_unit_prefixes[index];
113         }
114
115         if (show_float || vald != (int)vald) l = snprintf(buf, buf_size, "%.3f", vald);
116         else                                 l = snprintf(buf, buf_size, "%d",   (int)vald);
117         snprintf(buf+l, buf_size-l, "%s%s%s", prefix_string || show_value_unit ? " " : "",
118                  prefix_string, show_value_unit ? uv.unit : "");
119     } else {
120         int l;
121
122         if (show_float) l = snprintf(buf, buf_size, "%.3f", vald);
123         else            l = snprintf(buf, buf_size, "%d",   (int)vald);
124         snprintf(buf+l, buf_size-l, "%s%s", show_value_unit ? " " : "",
125                  show_value_unit ? uv.unit : "");
126     }
127
128     return buf;
129 }
130
131 /* WRITERS API */
132
133 typedef struct WriterContext WriterContext;
134
135 #define WRITER_FLAG_DISPLAY_OPTIONAL_FIELDS 1
136 #define WRITER_FLAG_PUT_PACKETS_AND_FRAMES_IN_SAME_CHAPTER 2
137
138 typedef struct Writer {
139     int priv_size;                  ///< private size for the writer context
140     const char *name;
141
142     int  (*init)  (WriterContext *wctx, const char *args, void *opaque);
143     void (*uninit)(WriterContext *wctx);
144
145     void (*print_header)(WriterContext *ctx);
146     void (*print_footer)(WriterContext *ctx);
147
148     void (*print_chapter_header)(WriterContext *wctx, const char *);
149     void (*print_chapter_footer)(WriterContext *wctx, const char *);
150     void (*print_section_header)(WriterContext *wctx, const char *);
151     void (*print_section_footer)(WriterContext *wctx, const char *);
152     void (*print_integer)       (WriterContext *wctx, const char *, long long int);
153     void (*print_string)        (WriterContext *wctx, const char *, const char *);
154     void (*show_tags)           (WriterContext *wctx, AVDictionary *dict);
155     int flags;                  ///< a combination or WRITER_FLAG_*
156 } Writer;
157
158 struct WriterContext {
159     const AVClass *class;           ///< class of the writer
160     const Writer *writer;           ///< the Writer of which this is an instance
161     char *name;                     ///< name of this writer instance
162     void *priv;                     ///< private data for use by the filter
163     unsigned int nb_item;           ///< number of the item printed in the given section, starting at 0
164     unsigned int nb_section;        ///< number of the section printed in the given section sequence, starting at 0
165     unsigned int nb_chapter;        ///< number of the chapter, starting at 0
166 };
167
168 static const char *writer_get_name(void *p)
169 {
170     WriterContext *wctx = p;
171     return wctx->writer->name;
172 }
173
174 static const AVClass writer_class = {
175     "Writer",
176     writer_get_name,
177     NULL,
178     LIBAVUTIL_VERSION_INT,
179 };
180
181 static void writer_close(WriterContext **wctx)
182 {
183     if (!*wctx)
184         return;
185
186     if ((*wctx)->writer->uninit)
187         (*wctx)->writer->uninit(*wctx);
188     av_freep(&((*wctx)->priv));
189     av_freep(wctx);
190 }
191
192 static int writer_open(WriterContext **wctx, const Writer *writer,
193                        const char *args, void *opaque)
194 {
195     int ret = 0;
196
197     if (!(*wctx = av_malloc(sizeof(WriterContext)))) {
198         ret = AVERROR(ENOMEM);
199         goto fail;
200     }
201
202     if (!((*wctx)->priv = av_mallocz(writer->priv_size))) {
203         ret = AVERROR(ENOMEM);
204         goto fail;
205     }
206
207     (*wctx)->class = &writer_class;
208     (*wctx)->writer = writer;
209     if ((*wctx)->writer->init)
210         ret = (*wctx)->writer->init(*wctx, args, opaque);
211     if (ret < 0)
212         goto fail;
213
214     return 0;
215
216 fail:
217     writer_close(wctx);
218     return ret;
219 }
220
221 static inline void writer_print_header(WriterContext *wctx)
222 {
223     if (wctx->writer->print_header)
224         wctx->writer->print_header(wctx);
225     wctx->nb_chapter = 0;
226 }
227
228 static inline void writer_print_footer(WriterContext *wctx)
229 {
230     if (wctx->writer->print_footer)
231         wctx->writer->print_footer(wctx);
232 }
233
234 static inline void writer_print_chapter_header(WriterContext *wctx,
235                                                const char *chapter)
236 {
237     if (wctx->writer->print_chapter_header)
238         wctx->writer->print_chapter_header(wctx, chapter);
239     wctx->nb_section = 0;
240 }
241
242 static inline void writer_print_chapter_footer(WriterContext *wctx,
243                                                const char *chapter)
244 {
245     if (wctx->writer->print_chapter_footer)
246         wctx->writer->print_chapter_footer(wctx, chapter);
247     wctx->nb_chapter++;
248 }
249
250 static inline void writer_print_section_header(WriterContext *wctx,
251                                                const char *section)
252 {
253     if (wctx->writer->print_section_header)
254         wctx->writer->print_section_header(wctx, section);
255     wctx->nb_item = 0;
256 }
257
258 static inline void writer_print_section_footer(WriterContext *wctx,
259                                                const char *section)
260 {
261     if (wctx->writer->print_section_footer)
262         wctx->writer->print_section_footer(wctx, section);
263     wctx->nb_section++;
264 }
265
266 static inline void writer_print_integer(WriterContext *wctx,
267                                         const char *key, long long int val)
268 {
269     wctx->writer->print_integer(wctx, key, val);
270     wctx->nb_item++;
271 }
272
273 static inline void writer_print_string(WriterContext *wctx,
274                                        const char *key, const char *val, int opt)
275 {
276     if (opt && !(wctx->writer->flags & WRITER_FLAG_DISPLAY_OPTIONAL_FIELDS))
277         return;
278     wctx->writer->print_string(wctx, key, val);
279     wctx->nb_item++;
280 }
281
282 static void writer_print_time(WriterContext *wctx, const char *key,
283                               int64_t ts, const AVRational *time_base)
284 {
285     char buf[128];
286
287     if (ts == AV_NOPTS_VALUE) {
288         writer_print_string(wctx, key, "N/A", 1);
289     } else {
290         double d = ts * av_q2d(*time_base);
291         value_string(buf, sizeof(buf), (struct unit_value){.val.d=d, .unit=unit_second_str});
292         writer_print_string(wctx, key, buf, 0);
293     }
294 }
295
296 static void writer_print_ts(WriterContext *wctx, const char *key, int64_t ts)
297 {
298     if (ts == AV_NOPTS_VALUE) {
299         writer_print_string(wctx, key, "N/A", 1);
300     } else {
301         writer_print_integer(wctx, key, ts);
302     }
303 }
304
305 static inline void writer_show_tags(WriterContext *wctx, AVDictionary *dict)
306 {
307     wctx->writer->show_tags(wctx, dict);
308 }
309
310 #define MAX_REGISTERED_WRITERS_NB 64
311
312 static const Writer *registered_writers[MAX_REGISTERED_WRITERS_NB + 1];
313
314 static int writer_register(const Writer *writer)
315 {
316     static int next_registered_writer_idx = 0;
317
318     if (next_registered_writer_idx == MAX_REGISTERED_WRITERS_NB)
319         return AVERROR(ENOMEM);
320
321     registered_writers[next_registered_writer_idx++] = writer;
322     return 0;
323 }
324
325 static const Writer *writer_get_by_name(const char *name)
326 {
327     int i;
328
329     for (i = 0; registered_writers[i]; i++)
330         if (!strcmp(registered_writers[i]->name, name))
331             return registered_writers[i];
332
333     return NULL;
334 }
335
336 /* Print helpers */
337
338 struct print_buf {
339     char *s;
340     int len;
341 };
342
343 static char *fast_asprintf(struct print_buf *pbuf, const char *fmt, ...)
344 {
345     va_list va;
346     int len;
347
348     va_start(va, fmt);
349     len = vsnprintf(NULL, 0, fmt, va);
350     va_end(va);
351     if (len < 0)
352         goto fail;
353
354     if (pbuf->len < len) {
355         char *p = av_realloc(pbuf->s, len + 1);
356         if (!p)
357             goto fail;
358         pbuf->s   = p;
359         pbuf->len = len;
360     }
361
362     va_start(va, fmt);
363     len = vsnprintf(pbuf->s, len + 1, fmt, va);
364     va_end(va);
365     if (len < 0)
366         goto fail;
367     return pbuf->s;
368
369 fail:
370     av_freep(&pbuf->s);
371     pbuf->len = 0;
372     return NULL;
373 }
374
375 #define ESCAPE_INIT_BUF_SIZE 256
376
377 #define ESCAPE_CHECK_SIZE(src, size, max_size)                          \
378     if (size > max_size) {                                              \
379         char buf[64];                                                   \
380         snprintf(buf, sizeof(buf), "%s", src);                          \
381         av_log(log_ctx, AV_LOG_WARNING,                                 \
382                "String '%s...' with is too big\n", buf);                \
383         return "FFPROBE_TOO_BIG_STRING";                                \
384     }
385
386 #define ESCAPE_REALLOC_BUF(dst_size_p, dst_p, src, size)                \
387     if (*dst_size_p < size) {                                           \
388         char *q = av_realloc(*dst_p, size);                             \
389         if (!q) {                                                       \
390             char buf[64];                                               \
391             snprintf(buf, sizeof(buf), "%s", src);                      \
392             av_log(log_ctx, AV_LOG_WARNING,                             \
393                    "String '%s...' could not be escaped\n", buf);       \
394             return "FFPROBE_THIS_STRING_COULD_NOT_BE_ESCAPED";          \
395         }                                                               \
396         *dst_size_p = size;                                             \
397         *dst = q;                                                       \
398     }
399
400 /* WRITERS */
401
402 /* Default output */
403
404 static void default_print_footer(WriterContext *wctx)
405 {
406     printf("\n");
407 }
408
409 static void default_print_chapter_header(WriterContext *wctx, const char *chapter)
410 {
411     if (wctx->nb_chapter)
412         printf("\n");
413 }
414
415 /* lame uppercasing routine, assumes the string is lower case ASCII */
416 static inline char *upcase_string(char *dst, size_t dst_size, const char *src)
417 {
418     int i;
419     for (i = 0; src[i] && i < dst_size-1; i++)
420         if (src[i] >= 'a' && src[i] <= 'z') {
421             dst[i] = src[i]-32;
422         } else {
423             dst[i] = src[i];
424         }
425     dst[i] = 0;
426     return dst;
427 }
428
429 static void default_print_section_header(WriterContext *wctx, const char *section)
430 {
431     char buf[32];
432
433     if (wctx->nb_section)
434         printf("\n");
435     printf("[%s]\n", upcase_string(buf, sizeof(buf), section));
436 }
437
438 static void default_print_section_footer(WriterContext *wctx, const char *section)
439 {
440     char buf[32];
441
442     printf("[/%s]", upcase_string(buf, sizeof(buf), section));
443 }
444
445 static void default_print_str(WriterContext *wctx, const char *key, const char *value)
446 {
447     printf("%s=%s\n", key, value);
448 }
449
450 static void default_print_int(WriterContext *wctx, const char *key, long long int value)
451 {
452     printf("%s=%lld\n", key, value);
453 }
454
455 static void default_show_tags(WriterContext *wctx, AVDictionary *dict)
456 {
457     AVDictionaryEntry *tag = NULL;
458     while ((tag = av_dict_get(dict, "", tag, AV_DICT_IGNORE_SUFFIX))) {
459         printf("TAG:");
460         writer_print_string(wctx, tag->key, tag->value, 0);
461     }
462 }
463
464 static const Writer default_writer = {
465     .name                  = "default",
466     .print_footer          = default_print_footer,
467     .print_chapter_header  = default_print_chapter_header,
468     .print_section_header  = default_print_section_header,
469     .print_section_footer  = default_print_section_footer,
470     .print_integer         = default_print_int,
471     .print_string          = default_print_str,
472     .show_tags             = default_show_tags,
473     .flags = WRITER_FLAG_DISPLAY_OPTIONAL_FIELDS,
474 };
475
476 /* Compact output */
477
478 /**
479  * Escape \n, \r, \\ and sep characters contained in s, and print the
480  * resulting string.
481  */
482 static const char *c_escape_str(char **dst, size_t *dst_size,
483                                 const char *src, const char sep, void *log_ctx)
484 {
485     const char *p;
486     char *q;
487     size_t size = 1;
488
489     /* precompute size */
490     for (p = src; *p; p++, size++) {
491         ESCAPE_CHECK_SIZE(src, size, SIZE_MAX-2);
492         if (*p == '\n' || *p == '\r' || *p == '\\')
493             size++;
494     }
495
496     ESCAPE_REALLOC_BUF(dst_size, dst, src, size);
497
498     q = *dst;
499     for (p = src; *p; p++) {
500         switch (*src) {
501         case '\n': *q++ = '\\'; *q++ = 'n';  break;
502         case '\r': *q++ = '\\'; *q++ = 'r';  break;
503         case '\\': *q++ = '\\'; *q++ = '\\'; break;
504         default:
505             if (*p == sep)
506                 *q++ = '\\';
507             *q++ = *p;
508         }
509     }
510     *q = 0;
511     return *dst;
512 }
513
514 /**
515  * Quote fields containing special characters, check RFC4180.
516  */
517 static const char *csv_escape_str(char **dst, size_t *dst_size,
518                                   const char *src, const char sep, void *log_ctx)
519 {
520     const char *p;
521     char *q;
522     size_t size = 1;
523     int quote = 0;
524
525     /* precompute size */
526     for (p = src; *p; p++, size++) {
527         ESCAPE_CHECK_SIZE(src, size, SIZE_MAX-4);
528         if (*p == '"' || *p == sep || *p == '\n' || *p == '\r')
529             if (!quote) {
530                 quote = 1;
531                 size += 2;
532             }
533         if (*p == '"')
534             size++;
535     }
536
537     ESCAPE_REALLOC_BUF(dst_size, dst, src, size);
538
539     q = *dst;
540     p = src;
541     if (quote)
542         *q++ = '\"';
543     while (*p) {
544         if (*p == '"')
545             *q++ = '\"';
546         *q++ = *p++;
547     }
548     if (quote)
549         *q++ = '\"';
550     *q = 0;
551
552     return *dst;
553 }
554
555 static const char *none_escape_str(char **dst, size_t *dst_size,
556                                    const char *src, const char sep, void *log_ctx)
557 {
558     return src;
559 }
560
561 typedef struct CompactContext {
562     const AVClass *class;
563     char *item_sep_str;
564     char item_sep;
565     int nokey;
566     char  *buf;
567     size_t buf_size;
568     char *escape_mode_str;
569     const char * (*escape_str)(char **dst, size_t *dst_size,
570                                const char *src, const char sep, void *log_ctx);
571 } CompactContext;
572
573 #define OFFSET(x) offsetof(CompactContext, x)
574
575 static const AVOption compact_options[]= {
576     {"item_sep", "set item separator",    OFFSET(item_sep_str),    AV_OPT_TYPE_STRING, {.str="|"},  CHAR_MIN, CHAR_MAX },
577     {"s",        "set item separator",    OFFSET(item_sep_str),    AV_OPT_TYPE_STRING, {.str="|"},  CHAR_MIN, CHAR_MAX },
578     {"nokey",    "force no key printing", OFFSET(nokey),           AV_OPT_TYPE_INT,    {.dbl=0},    0,        1        },
579     {"nk",       "force no key printing", OFFSET(nokey),           AV_OPT_TYPE_INT,    {.dbl=0},    0,        1        },
580     {"escape",   "set escape mode",       OFFSET(escape_mode_str), AV_OPT_TYPE_STRING, {.str="c"},  CHAR_MIN, CHAR_MAX },
581     {"e",        "set escape mode",       OFFSET(escape_mode_str), AV_OPT_TYPE_STRING, {.str="c"},  CHAR_MIN, CHAR_MAX },
582     {NULL},
583 };
584
585 static const char *compact_get_name(void *ctx)
586 {
587     return "compact";
588 }
589
590 static const AVClass compact_class = {
591     "CompactContext",
592     compact_get_name,
593     compact_options
594 };
595
596 static av_cold int compact_init(WriterContext *wctx, const char *args, void *opaque)
597 {
598     CompactContext *compact = wctx->priv;
599     int err;
600
601     compact->class = &compact_class;
602     av_opt_set_defaults(compact);
603
604     if (args &&
605         (err = (av_set_options_string(compact, args, "=", ":"))) < 0) {
606         av_log(wctx, AV_LOG_ERROR, "Error parsing options string: '%s'\n", args);
607         return err;
608     }
609     if (strlen(compact->item_sep_str) != 1) {
610         av_log(wctx, AV_LOG_ERROR, "Item separator '%s' specified, but must contain a single character\n",
611                compact->item_sep_str);
612         return AVERROR(EINVAL);
613     }
614     compact->item_sep = compact->item_sep_str[0];
615
616     compact->buf_size = ESCAPE_INIT_BUF_SIZE;
617     if (!(compact->buf = av_malloc(compact->buf_size)))
618         return AVERROR(ENOMEM);
619
620     if      (!strcmp(compact->escape_mode_str, "none")) compact->escape_str = none_escape_str;
621     else if (!strcmp(compact->escape_mode_str, "c"   )) compact->escape_str = c_escape_str;
622     else if (!strcmp(compact->escape_mode_str, "csv" )) compact->escape_str = csv_escape_str;
623     else {
624         av_log(wctx, AV_LOG_ERROR, "Unknown escape mode '%s'\n", compact->escape_mode_str);
625         return AVERROR(EINVAL);
626     }
627
628     return 0;
629 }
630
631 static av_cold void compact_uninit(WriterContext *wctx)
632 {
633     CompactContext *compact = wctx->priv;
634
635     av_freep(&compact->item_sep_str);
636     av_freep(&compact->buf);
637     av_freep(&compact->escape_mode_str);
638 }
639
640 static void compact_print_section_header(WriterContext *wctx, const char *section)
641 {
642     CompactContext *compact = wctx->priv;
643
644     printf("%s%c", section, compact->item_sep);
645 }
646
647 static void compact_print_section_footer(WriterContext *wctx, const char *section)
648 {
649     printf("\n");
650 }
651
652 static void compact_print_str(WriterContext *wctx, const char *key, const char *value)
653 {
654     CompactContext *compact = wctx->priv;
655
656     if (wctx->nb_item) printf("%c", compact->item_sep);
657     if (!compact->nokey)
658         printf("%s=", key);
659     printf("%s", compact->escape_str(&compact->buf, &compact->buf_size,
660                                      value, compact->item_sep, wctx));
661 }
662
663 static void compact_print_int(WriterContext *wctx, const char *key, long long int value)
664 {
665     CompactContext *compact = wctx->priv;
666
667     if (wctx->nb_item) printf("%c", compact->item_sep);
668     if (!compact->nokey)
669         printf("%s=", key);
670     printf("%lld", value);
671 }
672
673 static void compact_show_tags(WriterContext *wctx, AVDictionary *dict)
674 {
675     CompactContext *compact = wctx->priv;
676     AVDictionaryEntry *tag = NULL;
677
678     while ((tag = av_dict_get(dict, "", tag, AV_DICT_IGNORE_SUFFIX))) {
679         if (wctx->nb_item) printf("%c", compact->item_sep);
680         if (!compact->nokey)
681             printf("tag:%s=", compact->escape_str(&compact->buf, &compact->buf_size,
682                                                   tag->key, compact->item_sep, wctx));
683         printf("%s", compact->escape_str(&compact->buf, &compact->buf_size,
684                                          tag->value, compact->item_sep, wctx));
685     }
686 }
687
688 static const Writer compact_writer = {
689     .name                 = "compact",
690     .priv_size            = sizeof(CompactContext),
691     .init                 = compact_init,
692     .uninit               = compact_uninit,
693     .print_section_header = compact_print_section_header,
694     .print_section_footer = compact_print_section_footer,
695     .print_integer        = compact_print_int,
696     .print_string         = compact_print_str,
697     .show_tags            = compact_show_tags,
698     .flags = WRITER_FLAG_DISPLAY_OPTIONAL_FIELDS,
699 };
700
701 /* CSV output */
702
703 static av_cold int csv_init(WriterContext *wctx, const char *args, void *opaque)
704 {
705     return compact_init(wctx, "item_sep=,:nokey=1:escape=csv", opaque);
706 }
707
708 static const Writer csv_writer = {
709     .name                 = "csv",
710     .priv_size            = sizeof(CompactContext),
711     .init                 = csv_init,
712     .uninit               = compact_uninit,
713     .print_section_header = compact_print_section_header,
714     .print_section_footer = compact_print_section_footer,
715     .print_integer        = compact_print_int,
716     .print_string         = compact_print_str,
717     .show_tags            = compact_show_tags,
718     .flags = WRITER_FLAG_DISPLAY_OPTIONAL_FIELDS,
719 };
720
721 /* JSON output */
722
723 typedef struct {
724     int multiple_entries; ///< tells if the given chapter requires multiple entries
725     char *buf;
726     size_t buf_size;
727     int print_packets_and_frames;
728     int indent_level;
729 } JSONContext;
730
731 static av_cold int json_init(WriterContext *wctx, const char *args, void *opaque)
732 {
733     JSONContext *json = wctx->priv;
734
735     json->buf_size = ESCAPE_INIT_BUF_SIZE;
736     if (!(json->buf = av_malloc(json->buf_size)))
737         return AVERROR(ENOMEM);
738
739     return 0;
740 }
741
742 static av_cold void json_uninit(WriterContext *wctx)
743 {
744     JSONContext *json = wctx->priv;
745     av_freep(&json->buf);
746 }
747
748 static const char *json_escape_str(char **dst, size_t *dst_size, const char *src,
749                                    void *log_ctx)
750 {
751     static const char json_escape[] = {'"', '\\', '\b', '\f', '\n', '\r', '\t', 0};
752     static const char json_subst[]  = {'"', '\\',  'b',  'f',  'n',  'r',  't', 0};
753     const char *p;
754     char *q;
755     size_t size = 1;
756
757     // compute the length of the escaped string
758     for (p = src; *p; p++) {
759         ESCAPE_CHECK_SIZE(src, size, SIZE_MAX-6);
760         if (strchr(json_escape, *p))     size += 2; // simple escape
761         else if ((unsigned char)*p < 32) size += 6; // handle non-printable chars
762         else                             size += 1; // char copy
763     }
764     ESCAPE_REALLOC_BUF(dst_size, dst, src, size);
765
766     q = *dst;
767     for (p = src; *p; p++) {
768         char *s = strchr(json_escape, *p);
769         if (s) {
770             *q++ = '\\';
771             *q++ = json_subst[s - json_escape];
772         } else if ((unsigned char)*p < 32) {
773             snprintf(q, 7, "\\u00%02x", *p & 0xff);
774             q += 6;
775         } else {
776             *q++ = *p;
777         }
778     }
779     *q = 0;
780     return *dst;
781 }
782
783 static void json_print_header(WriterContext *wctx)
784 {
785     JSONContext *json = wctx->priv;
786     printf("{");
787     json->indent_level++;
788 }
789
790 static void json_print_footer(WriterContext *wctx)
791 {
792     JSONContext *json = wctx->priv;
793     json->indent_level--;
794     printf("\n}\n");
795 }
796
797 #define JSON_INDENT() printf("%*c", json->indent_level * 4, ' ')
798
799 static void json_print_chapter_header(WriterContext *wctx, const char *chapter)
800 {
801     JSONContext *json = wctx->priv;
802
803     if (wctx->nb_chapter)
804         printf(",");
805     printf("\n");
806     json->multiple_entries = !strcmp(chapter, "packets") || !strcmp(chapter, "frames" ) ||
807                              !strcmp(chapter, "packets_and_frames") ||
808                              !strcmp(chapter, "streams");
809     if (json->multiple_entries) {
810         JSON_INDENT();
811         printf("\"%s\": [\n", json_escape_str(&json->buf, &json->buf_size, chapter, wctx));
812         json->print_packets_and_frames = !strcmp(chapter, "packets_and_frames");
813         json->indent_level++;
814     }
815 }
816
817 static void json_print_chapter_footer(WriterContext *wctx, const char *chapter)
818 {
819     JSONContext *json = wctx->priv;
820
821     if (json->multiple_entries) {
822         printf("\n");
823         json->indent_level--;
824         JSON_INDENT();
825         printf("]");
826     }
827 }
828
829 static void json_print_section_header(WriterContext *wctx, const char *section)
830 {
831     JSONContext *json = wctx->priv;
832
833     if (wctx->nb_section)
834         printf(",\n");
835     JSON_INDENT();
836     if (!json->multiple_entries)
837         printf("\"%s\": ", section);
838     printf("{\n");
839     json->indent_level++;
840     /* this is required so the parser can distinguish between packets and frames */
841     if (json->print_packets_and_frames) {
842         JSON_INDENT(); printf("\"type\": \"%s\",\n", section);
843     }
844 }
845
846 static void json_print_section_footer(WriterContext *wctx, const char *section)
847 {
848     JSONContext *json = wctx->priv;
849
850     printf("\n");
851     json->indent_level--;
852     JSON_INDENT(); printf("}");
853 }
854
855 static inline void json_print_item_str(WriterContext *wctx,
856                                        const char *key, const char *value)
857 {
858     JSONContext *json = wctx->priv;
859
860     JSON_INDENT();
861     printf("\"%s\":", json_escape_str(&json->buf, &json->buf_size, key,   wctx));
862     printf(" \"%s\"", json_escape_str(&json->buf, &json->buf_size, value, wctx));
863 }
864
865 static void json_print_str(WriterContext *wctx, const char *key, const char *value)
866 {
867     if (wctx->nb_item) printf(",\n");
868     json_print_item_str(wctx, key, value);
869 }
870
871 static void json_print_int(WriterContext *wctx, const char *key, long long int value)
872 {
873     JSONContext *json = wctx->priv;
874
875     if (wctx->nb_item) printf(",\n");
876     JSON_INDENT();
877     printf("\"%s\": %lld",
878            json_escape_str(&json->buf, &json->buf_size, key, wctx), value);
879 }
880
881 static void json_show_tags(WriterContext *wctx, AVDictionary *dict)
882 {
883     JSONContext *json = wctx->priv;
884     AVDictionaryEntry *tag = NULL;
885     int is_first = 1;
886     if (!dict)
887         return;
888     printf(",\n"); JSON_INDENT(); printf("\"tags\": {\n");
889     json->indent_level++;
890     while ((tag = av_dict_get(dict, "", tag, AV_DICT_IGNORE_SUFFIX))) {
891         if (is_first) is_first = 0;
892         else          printf(",\n");
893         json_print_item_str(wctx, tag->key, tag->value);
894     }
895     json->indent_level--;
896     printf("\n"); JSON_INDENT(); printf("}");
897 }
898
899 static const Writer json_writer = {
900     .name                 = "json",
901     .priv_size            = sizeof(JSONContext),
902     .init                 = json_init,
903     .uninit               = json_uninit,
904     .print_header         = json_print_header,
905     .print_footer         = json_print_footer,
906     .print_chapter_header = json_print_chapter_header,
907     .print_chapter_footer = json_print_chapter_footer,
908     .print_section_header = json_print_section_header,
909     .print_section_footer = json_print_section_footer,
910     .print_integer        = json_print_int,
911     .print_string         = json_print_str,
912     .show_tags            = json_show_tags,
913     .flags = WRITER_FLAG_PUT_PACKETS_AND_FRAMES_IN_SAME_CHAPTER,
914 };
915
916 /* XML output */
917
918 typedef struct {
919     const AVClass *class;
920     int within_tag;
921     int multiple_entries; ///< tells if the given chapter requires multiple entries
922     int indent_level;
923     int fully_qualified;
924     int xsd_strict;
925     char *buf;
926     size_t buf_size;
927 } XMLContext;
928
929 #undef OFFSET
930 #define OFFSET(x) offsetof(XMLContext, x)
931
932 static const AVOption xml_options[] = {
933     {"fully_qualified", "specify if the output should be fully qualified", OFFSET(fully_qualified), AV_OPT_TYPE_INT, {.dbl=0},  0, 1 },
934     {"q",               "specify if the output should be fully qualified", OFFSET(fully_qualified), AV_OPT_TYPE_INT, {.dbl=0},  0, 1 },
935     {"xsd_strict",      "ensure that the output is XSD compliant",         OFFSET(xsd_strict),      AV_OPT_TYPE_INT, {.dbl=0},  0, 1 },
936     {"x",               "ensure that the output is XSD compliant",         OFFSET(xsd_strict),      AV_OPT_TYPE_INT, {.dbl=0},  0, 1 },
937     {NULL},
938 };
939
940 static const char *xml_get_name(void *ctx)
941 {
942     return "xml";
943 }
944
945 static const AVClass xml_class = {
946     "XMLContext",
947     xml_get_name,
948     xml_options
949 };
950
951 static av_cold int xml_init(WriterContext *wctx, const char *args, void *opaque)
952 {
953     XMLContext *xml = wctx->priv;
954     int err;
955
956     xml->class = &xml_class;
957     av_opt_set_defaults(xml);
958
959     if (args &&
960         (err = (av_set_options_string(xml, args, "=", ":"))) < 0) {
961         av_log(wctx, AV_LOG_ERROR, "Error parsing options string: '%s'\n", args);
962         return err;
963     }
964
965     if (xml->xsd_strict) {
966         xml->fully_qualified = 1;
967 #define CHECK_COMPLIANCE(opt, opt_name)                                 \
968         if (opt) {                                                      \
969             av_log(wctx, AV_LOG_ERROR,                                  \
970                    "XSD-compliant output selected but option '%s' was selected, XML output may be non-compliant.\n" \
971                    "You need to disable such option with '-no%s'\n", opt_name, opt_name); \
972             return AVERROR(EINVAL);                                     \
973         }
974         CHECK_COMPLIANCE(show_private_data, "private");
975         CHECK_COMPLIANCE(show_value_unit,   "unit");
976         CHECK_COMPLIANCE(use_value_prefix,  "prefix");
977
978         if (do_show_frames && do_show_packets) {
979             av_log(wctx, AV_LOG_ERROR,
980                    "Interleaved frames and packets are not allowed in XSD. "
981                    "Select only one between the -show_frames and the -show_packets options.\n");
982             return AVERROR(EINVAL);
983         }
984     }
985
986     xml->buf_size = ESCAPE_INIT_BUF_SIZE;
987     if (!(xml->buf = av_malloc(xml->buf_size)))
988         return AVERROR(ENOMEM);
989     return 0;
990 }
991
992 static av_cold void xml_uninit(WriterContext *wctx)
993 {
994     XMLContext *xml = wctx->priv;
995     av_freep(&xml->buf);
996 }
997
998 static const char *xml_escape_str(char **dst, size_t *dst_size, const char *src,
999                                   void *log_ctx)
1000 {
1001     const char *p;
1002     char *q;
1003     size_t size = 1;
1004
1005     /* precompute size */
1006     for (p = src; *p; p++, size++) {
1007         ESCAPE_CHECK_SIZE(src, size, SIZE_MAX-10);
1008         switch (*p) {
1009         case '&' : size += strlen("&amp;");  break;
1010         case '<' : size += strlen("&lt;");   break;
1011         case '>' : size += strlen("&gt;");   break;
1012         case '\"': size += strlen("&quot;"); break;
1013         case '\'': size += strlen("&apos;"); break;
1014         default: size++;
1015         }
1016     }
1017     ESCAPE_REALLOC_BUF(dst_size, dst, src, size);
1018
1019 #define COPY_STR(str) {      \
1020         const char *s = str; \
1021         while (*s)           \
1022             *q++ = *s++;     \
1023     }
1024
1025     p = src;
1026     q = *dst;
1027     while (*p) {
1028         switch (*p) {
1029         case '&' : COPY_STR("&amp;");  break;
1030         case '<' : COPY_STR("&lt;");   break;
1031         case '>' : COPY_STR("&gt;");   break;
1032         case '\"': COPY_STR("&quot;"); break;
1033         case '\'': COPY_STR("&apos;"); break;
1034         default: *q++ = *p;
1035         }
1036         p++;
1037     }
1038     *q = 0;
1039
1040     return *dst;
1041 }
1042
1043 static void xml_print_header(WriterContext *wctx)
1044 {
1045     XMLContext *xml = wctx->priv;
1046     const char *qual = " xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance' "
1047         "xmlns:ffprobe='http://www.ffmpeg.org/schema/ffprobe' "
1048         "xsi:schemaLocation='http://www.ffmpeg.org/schema/ffprobe ffprobe.xsd'";
1049
1050     printf("<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n");
1051     printf("<%sffprobe%s>\n",
1052            xml->fully_qualified ? "ffprobe:" : "",
1053            xml->fully_qualified ? qual : "");
1054
1055     xml->indent_level++;
1056 }
1057
1058 static void xml_print_footer(WriterContext *wctx)
1059 {
1060     XMLContext *xml = wctx->priv;
1061
1062     xml->indent_level--;
1063     printf("</%sffprobe>\n", xml->fully_qualified ? "ffprobe:" : "");
1064 }
1065
1066 #define XML_INDENT() printf("%*c", xml->indent_level * 4, ' ')
1067
1068 static void xml_print_chapter_header(WriterContext *wctx, const char *chapter)
1069 {
1070     XMLContext *xml = wctx->priv;
1071
1072     if (wctx->nb_chapter)
1073         printf("\n");
1074     xml->multiple_entries = !strcmp(chapter, "packets") || !strcmp(chapter, "frames") ||
1075                             !strcmp(chapter, "packets_and_frames") ||
1076                             !strcmp(chapter, "streams");
1077
1078     if (xml->multiple_entries) {
1079         XML_INDENT(); printf("<%s>\n", chapter);
1080         xml->indent_level++;
1081     }
1082 }
1083
1084 static void xml_print_chapter_footer(WriterContext *wctx, const char *chapter)
1085 {
1086     XMLContext *xml = wctx->priv;
1087
1088     if (xml->multiple_entries) {
1089         xml->indent_level--;
1090         XML_INDENT(); printf("</%s>\n", chapter);
1091     }
1092 }
1093
1094 static void xml_print_section_header(WriterContext *wctx, const char *section)
1095 {
1096     XMLContext *xml = wctx->priv;
1097
1098     XML_INDENT(); printf("<%s ", section);
1099     xml->within_tag = 1;
1100 }
1101
1102 static void xml_print_section_footer(WriterContext *wctx, const char *section)
1103 {
1104     XMLContext *xml = wctx->priv;
1105
1106     if (xml->within_tag)
1107         printf("/>\n");
1108     else {
1109         XML_INDENT(); printf("</%s>\n", section);
1110     }
1111 }
1112
1113 static void xml_print_str(WriterContext *wctx, const char *key, const char *value)
1114 {
1115     XMLContext *xml = wctx->priv;
1116
1117     if (wctx->nb_item)
1118         printf(" ");
1119     printf("%s=\"%s\"", key, xml_escape_str(&xml->buf, &xml->buf_size, value, wctx));
1120 }
1121
1122 static void xml_print_int(WriterContext *wctx, const char *key, long long int value)
1123 {
1124     if (wctx->nb_item)
1125         printf(" ");
1126     printf("%s=\"%lld\"", key, value);
1127 }
1128
1129 static void xml_show_tags(WriterContext *wctx, AVDictionary *dict)
1130 {
1131     XMLContext *xml = wctx->priv;
1132     AVDictionaryEntry *tag = NULL;
1133     int is_first = 1;
1134
1135     xml->indent_level++;
1136     while ((tag = av_dict_get(dict, "", tag, AV_DICT_IGNORE_SUFFIX))) {
1137         if (is_first) {
1138             /* close section tag */
1139             printf(">\n");
1140             xml->within_tag = 0;
1141             is_first = 0;
1142         }
1143         XML_INDENT();
1144         printf("<tag key=\"%s\"",
1145                xml_escape_str(&xml->buf, &xml->buf_size, tag->key,   wctx));
1146         printf(" value=\"%s\"/>\n",
1147                xml_escape_str(&xml->buf, &xml->buf_size, tag->value, wctx));
1148     }
1149     xml->indent_level--;
1150 }
1151
1152 static Writer xml_writer = {
1153     .name                 = "xml",
1154     .priv_size            = sizeof(XMLContext),
1155     .init                 = xml_init,
1156     .uninit               = xml_uninit,
1157     .print_header         = xml_print_header,
1158     .print_footer         = xml_print_footer,
1159     .print_chapter_header = xml_print_chapter_header,
1160     .print_chapter_footer = xml_print_chapter_footer,
1161     .print_section_header = xml_print_section_header,
1162     .print_section_footer = xml_print_section_footer,
1163     .print_integer        = xml_print_int,
1164     .print_string         = xml_print_str,
1165     .show_tags            = xml_show_tags,
1166     .flags = WRITER_FLAG_PUT_PACKETS_AND_FRAMES_IN_SAME_CHAPTER,
1167 };
1168
1169 static void writer_register_all(void)
1170 {
1171     static int initialized;
1172
1173     if (initialized)
1174         return;
1175     initialized = 1;
1176
1177     writer_register(&default_writer);
1178     writer_register(&compact_writer);
1179     writer_register(&csv_writer);
1180     writer_register(&json_writer);
1181     writer_register(&xml_writer);
1182 }
1183
1184 #define print_fmt(k, f, ...) do {              \
1185     if (fast_asprintf(&pbuf, f, __VA_ARGS__))  \
1186         writer_print_string(w, k, pbuf.s, 0);  \
1187 } while (0)
1188
1189 #define print_fmt_opt(k, f, ...) do {          \
1190     if (fast_asprintf(&pbuf, f, __VA_ARGS__))  \
1191         writer_print_string(w, k, pbuf.s, 1);  \
1192 } while (0)
1193
1194 #define print_int(k, v)         writer_print_integer(w, k, v)
1195 #define print_str(k, v)         writer_print_string(w, k, v, 0)
1196 #define print_str_opt(k, v)     writer_print_string(w, k, v, 1)
1197 #define print_time(k, v, tb)    writer_print_time(w, k, v, tb)
1198 #define print_ts(k, v)          writer_print_ts(w, k, v)
1199 #define print_val(k, v, u)      writer_print_string(w, k, \
1200     value_string(val_str, sizeof(val_str), (struct unit_value){.val.i = v, .unit=u}), 0)
1201 #define print_section_header(s) writer_print_section_header(w, s)
1202 #define print_section_footer(s) writer_print_section_footer(w, s)
1203 #define show_tags(metadata)     writer_show_tags(w, metadata)
1204
1205 static void show_packet(WriterContext *w, AVFormatContext *fmt_ctx, AVPacket *pkt, int packet_idx)
1206 {
1207     char val_str[128];
1208     AVStream *st = fmt_ctx->streams[pkt->stream_index];
1209     struct print_buf pbuf = {.s = NULL};
1210     const char *s;
1211
1212     print_section_header("packet");
1213     s = av_get_media_type_string(st->codec->codec_type);
1214     if (s) print_str    ("codec_type", s);
1215     else   print_str_opt("codec_type", "unknown");
1216     print_int("stream_index",     pkt->stream_index);
1217     print_ts  ("pts",             pkt->pts);
1218     print_time("pts_time",        pkt->pts, &st->time_base);
1219     print_ts  ("dts",             pkt->dts);
1220     print_time("dts_time",        pkt->dts, &st->time_base);
1221     print_ts  ("duration",        pkt->duration);
1222     print_time("duration_time",   pkt->duration, &st->time_base);
1223     print_val("size",             pkt->size, unit_byte_str);
1224     if (pkt->pos != -1) print_fmt    ("pos", "%"PRId64, pkt->pos);
1225     else                print_str_opt("pos", "N/A");
1226     print_fmt("flags", "%c",      pkt->flags & AV_PKT_FLAG_KEY ? 'K' : '_');
1227     print_section_footer("packet");
1228
1229     av_free(pbuf.s);
1230     fflush(stdout);
1231 }
1232
1233 static void show_frame(WriterContext *w, AVFrame *frame, AVStream *stream)
1234 {
1235     struct print_buf pbuf = {.s = NULL};
1236     const char *s;
1237
1238     print_section_header("frame");
1239     print_str("media_type",             "video");
1240     print_int("width",                  frame->width);
1241     print_int("height",                 frame->height);
1242     s = av_get_pix_fmt_name(frame->format);
1243     if (s) print_str    ("pix_fmt", s);
1244     else   print_str_opt("pix_fmt", "unknown");
1245     if (frame->sample_aspect_ratio.num) {
1246         print_fmt("sample_aspect_ratio", "%d:%d",
1247                   frame->sample_aspect_ratio.num,
1248                   frame->sample_aspect_ratio.den);
1249     } else {
1250         print_str_opt("sample_aspect_ratio", "N/A");
1251     }
1252     print_fmt("pict_type",              "%c", av_get_picture_type_char(frame->pict_type));
1253     print_int("coded_picture_number",   frame->coded_picture_number);
1254     print_int("display_picture_number", frame->display_picture_number);
1255     print_int("interlaced_frame",       frame->interlaced_frame);
1256     print_int("top_field_first",        frame->top_field_first);
1257     print_int("repeat_pict",            frame->repeat_pict);
1258     print_int("reference",              frame->reference);
1259     print_int("key_frame",              frame->key_frame);
1260     print_ts  ("pkt_pts",               frame->pkt_pts);
1261     print_time("pkt_pts_time",          frame->pkt_pts, &stream->time_base);
1262     print_ts  ("pkt_dts",               frame->pkt_dts);
1263     print_time("pkt_dts_time",          frame->pkt_dts, &stream->time_base);
1264     if (frame->pkt_pos != -1) print_fmt    ("pkt_pos", "%"PRId64, frame->pkt_pos);
1265     else                      print_str_opt("pkt_pos", "N/A");
1266     print_section_footer("frame");
1267
1268     av_free(pbuf.s);
1269     fflush(stdout);
1270 }
1271
1272 static av_always_inline int get_video_frame(AVFormatContext *fmt_ctx,
1273                                             AVFrame *frame, AVPacket *pkt)
1274 {
1275     AVCodecContext *dec_ctx = fmt_ctx->streams[pkt->stream_index]->codec;
1276     int got_picture = 0;
1277
1278     if (dec_ctx->codec_id   != CODEC_ID_NONE &&
1279         dec_ctx->codec_type == AVMEDIA_TYPE_VIDEO)
1280         avcodec_decode_video2(dec_ctx, frame, &got_picture, pkt);
1281     return got_picture;
1282 }
1283
1284 static void show_packets(WriterContext *w, AVFormatContext *fmt_ctx)
1285 {
1286     AVPacket pkt;
1287     AVFrame frame;
1288     int i = 0;
1289
1290     av_init_packet(&pkt);
1291
1292     while (!av_read_frame(fmt_ctx, &pkt)) {
1293         if (do_show_packets)
1294             show_packet(w, fmt_ctx, &pkt, i++);
1295         if (do_show_frames &&
1296             get_video_frame(fmt_ctx, &frame, &pkt)) {
1297             show_frame(w, &frame, fmt_ctx->streams[pkt.stream_index]);
1298             av_destruct_packet(&pkt);
1299         }
1300     }
1301     av_init_packet(&pkt);
1302     pkt.data = NULL;
1303     pkt.size = 0;
1304     //Flush remaining frames that are cached in the decoder
1305     for (i = 0; i < fmt_ctx->nb_streams; i++) {
1306         pkt.stream_index = i;
1307         while (get_video_frame(fmt_ctx, &frame, &pkt))
1308             show_frame(w, &frame, fmt_ctx->streams[pkt.stream_index]);
1309     }
1310 }
1311
1312 static void show_stream(WriterContext *w, AVFormatContext *fmt_ctx, int stream_idx)
1313 {
1314     AVStream *stream = fmt_ctx->streams[stream_idx];
1315     AVCodecContext *dec_ctx;
1316     AVCodec *dec;
1317     char val_str[128];
1318     const char *s;
1319     AVRational display_aspect_ratio;
1320     struct print_buf pbuf = {.s = NULL};
1321
1322     print_section_header("stream");
1323
1324     print_int("index", stream->index);
1325
1326     if ((dec_ctx = stream->codec)) {
1327         if ((dec = dec_ctx->codec)) {
1328             print_str("codec_name",      dec->name);
1329             print_str("codec_long_name", dec->long_name);
1330         } else {
1331             print_str_opt("codec_name",      "unknown");
1332             print_str_opt("codec_long_name", "unknown");
1333         }
1334
1335         s = av_get_media_type_string(dec_ctx->codec_type);
1336         if (s) print_str    ("codec_type", s);
1337         else   print_str_opt("codec_type", "unknown");
1338         print_fmt("codec_time_base", "%d/%d", dec_ctx->time_base.num, dec_ctx->time_base.den);
1339
1340         /* print AVI/FourCC tag */
1341         av_get_codec_tag_string(val_str, sizeof(val_str), dec_ctx->codec_tag);
1342         print_str("codec_tag_string",    val_str);
1343         print_fmt("codec_tag", "0x%04x", dec_ctx->codec_tag);
1344
1345         switch (dec_ctx->codec_type) {
1346         case AVMEDIA_TYPE_VIDEO:
1347             print_int("width",        dec_ctx->width);
1348             print_int("height",       dec_ctx->height);
1349             print_int("has_b_frames", dec_ctx->has_b_frames);
1350             if (dec_ctx->sample_aspect_ratio.num) {
1351                 print_fmt("sample_aspect_ratio", "%d:%d",
1352                           dec_ctx->sample_aspect_ratio.num,
1353                           dec_ctx->sample_aspect_ratio.den);
1354                 av_reduce(&display_aspect_ratio.num, &display_aspect_ratio.den,
1355                           dec_ctx->width  * dec_ctx->sample_aspect_ratio.num,
1356                           dec_ctx->height * dec_ctx->sample_aspect_ratio.den,
1357                           1024*1024);
1358                 print_fmt("display_aspect_ratio", "%d:%d",
1359                           display_aspect_ratio.num,
1360                           display_aspect_ratio.den);
1361             } else {
1362                 print_str_opt("sample_aspect_ratio", "N/A");
1363                 print_str_opt("display_aspect_ratio", "N/A");
1364             }
1365             s = av_get_pix_fmt_name(dec_ctx->pix_fmt);
1366             if (s) print_str    ("pix_fmt", s);
1367             else   print_str_opt("pix_fmt", "unknown");
1368             print_int("level",   dec_ctx->level);
1369             if (dec_ctx->timecode_frame_start >= 0) {
1370                 uint32_t tc = dec_ctx->timecode_frame_start;
1371                 print_fmt("timecode", "%02d:%02d:%02d%c%02d",
1372                           tc>>19 & 0x1f,              // hours
1373                           tc>>13 & 0x3f,              // minutes
1374                           tc>>6  & 0x3f,              // seconds
1375                           tc     & 1<<24 ? ';' : ':', // drop
1376                           tc     & 0x3f);             // frames
1377             } else {
1378                 print_str_opt("timecode", "N/A");
1379             }
1380             break;
1381
1382         case AVMEDIA_TYPE_AUDIO:
1383             s = av_get_sample_fmt_name(dec_ctx->sample_fmt);
1384             if (s) print_str    ("sample_fmt", s);
1385             else   print_str_opt("sample_fmt", "unknown");
1386             print_val("sample_rate",     dec_ctx->sample_rate, unit_hertz_str);
1387             print_int("channels",        dec_ctx->channels);
1388             print_int("bits_per_sample", av_get_bits_per_sample(dec_ctx->codec_id));
1389             break;
1390         }
1391     } else {
1392         print_str_opt("codec_type", "unknown");
1393     }
1394     if (dec_ctx->codec && dec_ctx->codec->priv_class && show_private_data) {
1395         const AVOption *opt = NULL;
1396         while (opt = av_opt_next(dec_ctx->priv_data,opt)) {
1397             uint8_t *str;
1398             if (opt->flags) continue;
1399             if (av_opt_get(dec_ctx->priv_data, opt->name, 0, &str) >= 0) {
1400                 print_str(opt->name, str);
1401                 av_free(str);
1402             }
1403         }
1404     }
1405
1406     if (fmt_ctx->iformat->flags & AVFMT_SHOW_IDS) print_fmt    ("id", "0x%x", stream->id);
1407     else                                          print_str_opt("id", "N/A");
1408     print_fmt("r_frame_rate",   "%d/%d", stream->r_frame_rate.num,   stream->r_frame_rate.den);
1409     print_fmt("avg_frame_rate", "%d/%d", stream->avg_frame_rate.num, stream->avg_frame_rate.den);
1410     print_fmt("time_base",      "%d/%d", stream->time_base.num,      stream->time_base.den);
1411     print_time("start_time",    stream->start_time, &stream->time_base);
1412     print_time("duration",      stream->duration,   &stream->time_base);
1413     if (stream->nb_frames) print_fmt    ("nb_frames", "%"PRId64, stream->nb_frames);
1414     else                   print_str_opt("nb_frames", "N/A");
1415     show_tags(stream->metadata);
1416
1417     print_section_footer("stream");
1418     av_free(pbuf.s);
1419     fflush(stdout);
1420 }
1421
1422 static void show_streams(WriterContext *w, AVFormatContext *fmt_ctx)
1423 {
1424     int i;
1425     for (i = 0; i < fmt_ctx->nb_streams; i++)
1426         show_stream(w, fmt_ctx, i);
1427 }
1428
1429 static void show_format(WriterContext *w, AVFormatContext *fmt_ctx)
1430 {
1431     char val_str[128];
1432     int64_t size = avio_size(fmt_ctx->pb);
1433
1434     print_section_header("format");
1435     print_str("filename",         fmt_ctx->filename);
1436     print_int("nb_streams",       fmt_ctx->nb_streams);
1437     print_str("format_name",      fmt_ctx->iformat->name);
1438     print_str("format_long_name", fmt_ctx->iformat->long_name);
1439     print_time("start_time",      fmt_ctx->start_time, &AV_TIME_BASE_Q);
1440     print_time("duration",        fmt_ctx->duration,   &AV_TIME_BASE_Q);
1441     if (size >= 0) print_val    ("size", size, unit_byte_str);
1442     else           print_str_opt("size", "N/A");
1443     if (fmt_ctx->bit_rate > 0) print_val    ("bit_rate", fmt_ctx->bit_rate, unit_bit_per_second_str);
1444     else                       print_str_opt("bit_rate", "N/A");
1445     show_tags(fmt_ctx->metadata);
1446     print_section_footer("format");
1447     fflush(stdout);
1448 }
1449
1450 static void show_error(WriterContext *w, int err)
1451 {
1452     char errbuf[128];
1453     const char *errbuf_ptr = errbuf;
1454
1455     if (av_strerror(err, errbuf, sizeof(errbuf)) < 0)
1456         errbuf_ptr = strerror(AVUNERROR(err));
1457
1458     writer_print_chapter_header(w, "error");
1459     print_section_header("error");
1460     print_int("code", err);
1461     print_str("string", errbuf_ptr);
1462     print_section_footer("error");
1463     writer_print_chapter_footer(w, "error");
1464 }
1465
1466 static int open_input_file(AVFormatContext **fmt_ctx_ptr, const char *filename)
1467 {
1468     int err, i;
1469     AVFormatContext *fmt_ctx = NULL;
1470     AVDictionaryEntry *t;
1471
1472     if ((err = avformat_open_input(&fmt_ctx, filename, iformat, &format_opts)) < 0) {
1473         print_error(filename, err);
1474         return err;
1475     }
1476     if ((t = av_dict_get(format_opts, "", NULL, AV_DICT_IGNORE_SUFFIX))) {
1477         av_log(NULL, AV_LOG_ERROR, "Option %s not found.\n", t->key);
1478         return AVERROR_OPTION_NOT_FOUND;
1479     }
1480
1481
1482     /* fill the streams in the format context */
1483     if ((err = avformat_find_stream_info(fmt_ctx, NULL)) < 0) {
1484         print_error(filename, err);
1485         return err;
1486     }
1487
1488     av_dump_format(fmt_ctx, 0, filename, 0);
1489
1490     /* bind a decoder to each input stream */
1491     for (i = 0; i < fmt_ctx->nb_streams; i++) {
1492         AVStream *stream = fmt_ctx->streams[i];
1493         AVCodec *codec;
1494
1495         if (!(codec = avcodec_find_decoder(stream->codec->codec_id))) {
1496             av_log(NULL, AV_LOG_ERROR, "Unsupported codec with id %d for input stream %d\n",
1497                    stream->codec->codec_id, stream->index);
1498         } else if (avcodec_open2(stream->codec, codec, NULL) < 0) {
1499             av_log(NULL, AV_LOG_ERROR, "Error while opening codec for input stream %d\n",
1500                    stream->index);
1501         }
1502     }
1503
1504     *fmt_ctx_ptr = fmt_ctx;
1505     return 0;
1506 }
1507
1508 #define PRINT_CHAPTER(name) do {                                        \
1509     if (do_show_ ## name) {                                             \
1510         writer_print_chapter_header(wctx, #name);                       \
1511         show_ ## name (wctx, fmt_ctx);                                  \
1512         writer_print_chapter_footer(wctx, #name);                       \
1513     }                                                                   \
1514 } while (0)
1515
1516 static int probe_file(WriterContext *wctx, const char *filename)
1517 {
1518     AVFormatContext *fmt_ctx;
1519     int ret, i;
1520
1521     ret = open_input_file(&fmt_ctx, filename);
1522     if (ret >= 0) {
1523         if (do_show_packets || do_show_frames) {
1524             const char *chapter;
1525             if (do_show_frames && do_show_packets &&
1526                 wctx->writer->flags & WRITER_FLAG_PUT_PACKETS_AND_FRAMES_IN_SAME_CHAPTER)
1527                 chapter = "packets_and_frames";
1528             else if (do_show_packets && !do_show_frames)
1529                 chapter = "packets";
1530             else // (!do_show_packets && do_show_frames)
1531                 chapter = "frames";
1532             writer_print_chapter_header(wctx, chapter);
1533             show_packets(wctx, fmt_ctx);
1534             writer_print_chapter_footer(wctx, chapter);
1535         }
1536         PRINT_CHAPTER(streams);
1537         PRINT_CHAPTER(format);
1538         for (i = 0; i < fmt_ctx->nb_streams; i++)
1539             if (fmt_ctx->streams[i]->codec->codec_id != CODEC_ID_NONE)
1540                 avcodec_close(fmt_ctx->streams[i]->codec);
1541         avformat_close_input(&fmt_ctx);
1542     }
1543
1544     return ret;
1545 }
1546
1547 static void show_usage(void)
1548 {
1549     av_log(NULL, AV_LOG_INFO, "Simple multimedia streams analyzer\n");
1550     av_log(NULL, AV_LOG_INFO, "usage: %s [OPTIONS] [INPUT_FILE]\n", program_name);
1551     av_log(NULL, AV_LOG_INFO, "\n");
1552 }
1553
1554 static int opt_format(const char *opt, const char *arg)
1555 {
1556     iformat = av_find_input_format(arg);
1557     if (!iformat) {
1558         av_log(NULL, AV_LOG_ERROR, "Unknown input format: %s\n", arg);
1559         return AVERROR(EINVAL);
1560     }
1561     return 0;
1562 }
1563
1564 static void opt_input_file(void *optctx, const char *arg)
1565 {
1566     if (input_filename) {
1567         av_log(NULL, AV_LOG_ERROR, "Argument '%s' provided as input filename, but '%s' was already specified.\n",
1568                arg, input_filename);
1569         exit(1);
1570     }
1571     if (!strcmp(arg, "-"))
1572         arg = "pipe:";
1573     input_filename = arg;
1574 }
1575
1576 static int opt_help(const char *opt, const char *arg)
1577 {
1578     av_log_set_callback(log_callback_help);
1579     show_usage();
1580     show_help_options(options, "Main options:\n", 0, 0);
1581     printf("\n");
1582
1583     show_help_children(avformat_get_class(), AV_OPT_FLAG_DECODING_PARAM);
1584
1585     return 0;
1586 }
1587
1588 static int opt_pretty(const char *opt, const char *arg)
1589 {
1590     show_value_unit              = 1;
1591     use_value_prefix             = 1;
1592     use_byte_value_binary_prefix = 1;
1593     use_value_sexagesimal_format = 1;
1594     return 0;
1595 }
1596
1597 static const OptionDef options[] = {
1598 #include "cmdutils_common_opts.h"
1599     { "f", HAS_ARG, {(void*)opt_format}, "force format", "format" },
1600     { "unit", OPT_BOOL, {(void*)&show_value_unit}, "show unit of the displayed values" },
1601     { "prefix", OPT_BOOL, {(void*)&use_value_prefix}, "use SI prefixes for the displayed values" },
1602     { "byte_binary_prefix", OPT_BOOL, {(void*)&use_byte_value_binary_prefix},
1603       "use binary prefixes for byte units" },
1604     { "sexagesimal", OPT_BOOL,  {(void*)&use_value_sexagesimal_format},
1605       "use sexagesimal format HOURS:MM:SS.MICROSECONDS for time units" },
1606     { "pretty", 0, {(void*)&opt_pretty},
1607       "prettify the format of displayed values, make it more human readable" },
1608     { "print_format", OPT_STRING | HAS_ARG, {(void*)&print_format},
1609       "set the output printing format (available formats are: default, compact, csv, json, xml)", "format" },
1610     { "show_error",   OPT_BOOL, {(void*)&do_show_error} ,  "show probing error" },
1611     { "show_format",  OPT_BOOL, {(void*)&do_show_format} , "show format/container info" },
1612     { "show_frames",  OPT_BOOL, {(void*)&do_show_frames} , "show frames info" },
1613     { "show_packets", OPT_BOOL, {(void*)&do_show_packets}, "show packets info" },
1614     { "show_streams", OPT_BOOL, {(void*)&do_show_streams}, "show streams info" },
1615     { "show_private_data", OPT_BOOL, {(void*)&show_private_data}, "show private data" },
1616     { "private",           OPT_BOOL, {(void*)&show_private_data}, "same as show_private_data" },
1617     { "default", HAS_ARG | OPT_AUDIO | OPT_VIDEO | OPT_EXPERT, {(void*)opt_default}, "generic catch all option", "" },
1618     { "i", HAS_ARG, {(void *)opt_input_file}, "read specified file", "input_file"},
1619     { NULL, },
1620 };
1621
1622 int main(int argc, char **argv)
1623 {
1624     const Writer *w;
1625     WriterContext *wctx;
1626     char *buf;
1627     char *w_name = NULL, *w_args = NULL;
1628     int ret;
1629
1630     parse_loglevel(argc, argv, options);
1631     av_register_all();
1632     avformat_network_init();
1633     init_opts();
1634 #if CONFIG_AVDEVICE
1635     avdevice_register_all();
1636 #endif
1637
1638     show_banner(argc, argv, options);
1639     parse_options(NULL, argc, argv, options, opt_input_file);
1640
1641     writer_register_all();
1642
1643     if (!print_format)
1644         print_format = av_strdup("default");
1645     w_name = av_strtok(print_format, "=", &buf);
1646     w_args = buf;
1647
1648     w = writer_get_by_name(w_name);
1649     if (!w) {
1650         av_log(NULL, AV_LOG_ERROR, "Unknown output format with name '%s'\n", w_name);
1651         ret = AVERROR(EINVAL);
1652         goto end;
1653     }
1654
1655     if ((ret = writer_open(&wctx, w, w_args, NULL)) >= 0) {
1656         writer_print_header(wctx);
1657
1658         if (!input_filename) {
1659             show_usage();
1660             av_log(NULL, AV_LOG_ERROR, "You have to specify one input file.\n");
1661             av_log(NULL, AV_LOG_ERROR, "Use -h to get full help or, even better, run 'man %s'.\n", program_name);
1662             ret = AVERROR(EINVAL);
1663         } else {
1664             ret = probe_file(wctx, input_filename);
1665             if (ret < 0 && do_show_error)
1666                 show_error(wctx, ret);
1667         }
1668
1669         writer_print_footer(wctx);
1670         writer_close(&wctx);
1671     }
1672
1673 end:
1674     av_freep(&print_format);
1675     avformat_network_deinit();
1676
1677     return ret;
1678 }