ffprobe: avoid potentially lossy long long int -> double cast in value_string()
[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 #include "version.h"
28
29 #include "libavformat/avformat.h"
30 #include "libavcodec/avcodec.h"
31 #include "libavutil/avstring.h"
32 #include "libavutil/bprint.h"
33 #include "libavutil/opt.h"
34 #include "libavutil/pixdesc.h"
35 #include "libavutil/dict.h"
36 #include "libavutil/libm.h"
37 #include "libavutil/timecode.h"
38 #include "libavdevice/avdevice.h"
39 #include "libswscale/swscale.h"
40 #include "libswresample/swresample.h"
41 #include "libpostproc/postprocess.h"
42 #include "cmdutils.h"
43
44 const char program_name[] = "ffprobe";
45 const int program_birth_year = 2007;
46
47 static int do_count_frames = 0;
48 static int do_count_packets = 0;
49 static int do_read_frames  = 0;
50 static int do_read_packets = 0;
51 static int do_show_error   = 0;
52 static int do_show_format  = 0;
53 static int do_show_frames  = 0;
54 static AVDictionary *fmt_entries_to_show = NULL;
55 static int do_show_packets = 0;
56 static int do_show_streams = 0;
57 static int do_show_data    = 0;
58 static int do_show_program_version  = 0;
59 static int do_show_library_versions = 0;
60
61 static int show_value_unit              = 0;
62 static int use_value_prefix             = 0;
63 static int use_byte_value_binary_prefix = 0;
64 static int use_value_sexagesimal_format = 0;
65 static int show_private_data            = 1;
66
67 static char *print_format;
68
69 static const OptionDef *options;
70
71 /* FFprobe context */
72 static const char *input_filename;
73 static AVInputFormat *iformat = NULL;
74
75 static const char *const binary_unit_prefixes [] = { "", "Ki", "Mi", "Gi", "Ti", "Pi" };
76 static const char *const decimal_unit_prefixes[] = { "", "K" , "M" , "G" , "T" , "P"  };
77
78 static const char unit_second_str[]         = "s"    ;
79 static const char unit_hertz_str[]          = "Hz"   ;
80 static const char unit_byte_str[]           = "byte" ;
81 static const char unit_bit_per_second_str[] = "bit/s";
82 static uint64_t *nb_streams_packets;
83 static uint64_t *nb_streams_frames;
84
85 void av_noreturn exit_program(int ret)
86 {
87     av_dict_free(&fmt_entries_to_show);
88     exit(ret);
89 }
90
91 struct unit_value {
92     union { double d; long long int i; } val;
93     const char *unit;
94 };
95
96 static char *value_string(char *buf, int buf_size, struct unit_value uv)
97 {
98     double vald;
99     long long int vali;
100     int show_float = 0;
101
102     if (uv.unit == unit_second_str) {
103         vald = uv.val.d;
104         show_float = 1;
105     } else {
106         vald = vali = uv.val.i;
107     }
108
109     if (uv.unit == unit_second_str && use_value_sexagesimal_format) {
110         double secs;
111         int hours, mins;
112         secs  = vald;
113         mins  = (int)secs / 60;
114         secs  = secs - mins * 60;
115         hours = mins / 60;
116         mins %= 60;
117         snprintf(buf, buf_size, "%d:%02d:%09.6f", hours, mins, secs);
118     } else {
119         const char *prefix_string = "";
120
121         if (use_value_prefix && vald > 1) {
122             long long int index;
123
124             if (uv.unit == unit_byte_str && use_byte_value_binary_prefix) {
125                 index = (long long int) (log2(vald)) / 10;
126                 index = av_clip(index, 0, FF_ARRAY_ELEMS(binary_unit_prefixes) - 1);
127                 vald /= exp2(index * 10);
128                 prefix_string = binary_unit_prefixes[index];
129             } else {
130                 index = (long long int) (log10(vald)) / 3;
131                 index = av_clip(index, 0, FF_ARRAY_ELEMS(decimal_unit_prefixes) - 1);
132                 vald /= pow(10, index * 3);
133                 prefix_string = decimal_unit_prefixes[index];
134             }
135         }
136
137         if (show_float || (use_value_prefix && vald != (long long int)vald))
138             snprintf(buf, buf_size, "%f", vald);
139         else
140             snprintf(buf, buf_size, "%lld", vali);
141         av_strlcatf(buf, buf_size, "%s%s%s", *prefix_string || show_value_unit ? " " : "",
142                  prefix_string, show_value_unit ? uv.unit : "");
143     }
144
145     return buf;
146 }
147
148 /* WRITERS API */
149
150 typedef struct WriterContext WriterContext;
151
152 #define WRITER_FLAG_DISPLAY_OPTIONAL_FIELDS 1
153 #define WRITER_FLAG_PUT_PACKETS_AND_FRAMES_IN_SAME_CHAPTER 2
154
155 typedef struct Writer {
156     const AVClass *priv_class;      ///< private class of the writer, if any
157     int priv_size;                  ///< private size for the writer context
158     const char *name;
159
160     int  (*init)  (WriterContext *wctx, const char *args, void *opaque);
161     void (*uninit)(WriterContext *wctx);
162
163     void (*print_header)(WriterContext *ctx);
164     void (*print_footer)(WriterContext *ctx);
165
166     void (*print_chapter_header)(WriterContext *wctx, const char *);
167     void (*print_chapter_footer)(WriterContext *wctx, const char *);
168     void (*print_section_header)(WriterContext *wctx, const char *);
169     void (*print_section_footer)(WriterContext *wctx, const char *);
170     void (*print_integer)       (WriterContext *wctx, const char *, long long int);
171     void (*print_rational)      (WriterContext *wctx, AVRational *q, char *sep);
172     void (*print_string)        (WriterContext *wctx, const char *, const char *);
173     void (*show_tags)           (WriterContext *wctx, AVDictionary *dict);
174     int flags;                  ///< a combination or WRITER_FLAG_*
175 } Writer;
176
177 struct WriterContext {
178     const AVClass *class;           ///< class of the writer
179     const Writer *writer;           ///< the Writer of which this is an instance
180     char *name;                     ///< name of this writer instance
181     void *priv;                     ///< private data for use by the filter
182     unsigned int nb_item;           ///< number of the item printed in the given section, starting at 0
183     unsigned int nb_section;        ///< number of the section printed in the given section sequence, starting at 0
184     unsigned int nb_section_packet; ///< number of the packet section in case we are in "packets_and_frames" section
185     unsigned int nb_section_frame;  ///< number of the frame  section in case we are in "packets_and_frames" section
186     unsigned int nb_section_packet_frame; ///< nb_section_packet or nb_section_frame according if is_packets_and_frames
187     unsigned int nb_chapter;        ///< number of the chapter, starting at 0
188
189     int multiple_sections;          ///< tells if the current chapter can contain multiple sections
190     int is_fmt_chapter;             ///< tells if the current chapter is "format", required by the print_format_entry option
191     int is_packets_and_frames;      ///< tells if the current section is "packets_and_frames"
192 };
193
194 static const char *writer_get_name(void *p)
195 {
196     WriterContext *wctx = p;
197     return wctx->writer->name;
198 }
199
200 static const AVClass writer_class = {
201     "Writer",
202     writer_get_name,
203     NULL,
204     LIBAVUTIL_VERSION_INT,
205 };
206
207 static void writer_close(WriterContext **wctx)
208 {
209     if (!*wctx)
210         return;
211
212     if ((*wctx)->writer->uninit)
213         (*wctx)->writer->uninit(*wctx);
214     if ((*wctx)->writer->priv_class)
215         av_opt_free((*wctx)->priv);
216     av_freep(&((*wctx)->priv));
217     av_freep(wctx);
218 }
219
220 static int writer_open(WriterContext **wctx, const Writer *writer,
221                        const char *args, void *opaque)
222 {
223     int ret = 0;
224
225     if (!(*wctx = av_malloc(sizeof(WriterContext)))) {
226         ret = AVERROR(ENOMEM);
227         goto fail;
228     }
229
230     if (!((*wctx)->priv = av_mallocz(writer->priv_size))) {
231         ret = AVERROR(ENOMEM);
232         goto fail;
233     }
234
235     (*wctx)->class = &writer_class;
236     (*wctx)->writer = writer;
237
238     if (writer->priv_class) {
239         void *priv_ctx = (*wctx)->priv;
240         *((const AVClass **)priv_ctx) = writer->priv_class;
241         av_opt_set_defaults(priv_ctx);
242
243         if (args &&
244             (ret = av_set_options_string(priv_ctx, args, "=", ":")) < 0)
245             goto fail;
246     }
247     if ((*wctx)->writer->init)
248         ret = (*wctx)->writer->init(*wctx, args, opaque);
249     if (ret < 0)
250         goto fail;
251
252     return 0;
253
254 fail:
255     writer_close(wctx);
256     return ret;
257 }
258
259 static inline void writer_print_header(WriterContext *wctx)
260 {
261     if (wctx->writer->print_header)
262         wctx->writer->print_header(wctx);
263     wctx->nb_chapter = 0;
264 }
265
266 static inline void writer_print_footer(WriterContext *wctx)
267 {
268     if (wctx->writer->print_footer)
269         wctx->writer->print_footer(wctx);
270 }
271
272 static inline void writer_print_chapter_header(WriterContext *wctx,
273                                                const char *chapter)
274 {
275     wctx->nb_section =
276     wctx->nb_section_packet = wctx->nb_section_frame =
277     wctx->nb_section_packet_frame = 0;
278     wctx->is_packets_and_frames = !strcmp(chapter, "packets_and_frames");
279     wctx->multiple_sections = !strcmp(chapter, "packets") || !strcmp(chapter, "frames" ) ||
280                               wctx->is_packets_and_frames ||
281                               !strcmp(chapter, "streams") || !strcmp(chapter, "library_versions");
282     wctx->is_fmt_chapter = !strcmp(chapter, "format");
283
284     if (wctx->writer->print_chapter_header)
285         wctx->writer->print_chapter_header(wctx, chapter);
286 }
287
288 static inline void writer_print_chapter_footer(WriterContext *wctx,
289                                                const char *chapter)
290 {
291     if (wctx->writer->print_chapter_footer)
292         wctx->writer->print_chapter_footer(wctx, chapter);
293     wctx->nb_chapter++;
294 }
295
296 static inline void writer_print_section_header(WriterContext *wctx,
297                                                const char *section)
298 {
299     if (wctx->is_packets_and_frames)
300         wctx->nb_section_packet_frame = !strcmp(section, "packet") ? wctx->nb_section_packet
301                                                                    : wctx->nb_section_frame;
302     if (wctx->writer->print_section_header)
303         wctx->writer->print_section_header(wctx, section);
304     wctx->nb_item = 0;
305 }
306
307 static inline void writer_print_section_footer(WriterContext *wctx,
308                                                const char *section)
309 {
310     if (wctx->writer->print_section_footer)
311         wctx->writer->print_section_footer(wctx, section);
312     if (wctx->is_packets_and_frames) {
313         if (!strcmp(section, "packet")) wctx->nb_section_packet++;
314         else                            wctx->nb_section_frame++;
315     }
316     wctx->nb_section++;
317 }
318
319 static inline void writer_print_integer(WriterContext *wctx,
320                                         const char *key, long long int val)
321 {
322     if (!wctx->is_fmt_chapter || !fmt_entries_to_show || av_dict_get(fmt_entries_to_show, key, NULL, 0)) {
323         wctx->writer->print_integer(wctx, key, val);
324         wctx->nb_item++;
325     }
326 }
327
328 static inline void writer_print_rational(WriterContext *wctx,
329                                          const char *key, AVRational q, char sep)
330 {
331     AVBPrint buf;
332     av_bprint_init(&buf, 0, AV_BPRINT_SIZE_AUTOMATIC);
333     av_bprintf(&buf, "%d%c%d", q.num, sep, q.den);
334     wctx->writer->print_string(wctx, key, buf.str);
335     wctx->nb_item++;
336 }
337
338 static inline void writer_print_string(WriterContext *wctx,
339                                        const char *key, const char *val, int opt)
340 {
341     if (opt && !(wctx->writer->flags & WRITER_FLAG_DISPLAY_OPTIONAL_FIELDS))
342         return;
343     if (!wctx->is_fmt_chapter || !fmt_entries_to_show || av_dict_get(fmt_entries_to_show, key, NULL, 0)) {
344         wctx->writer->print_string(wctx, key, val);
345         wctx->nb_item++;
346     }
347 }
348
349 static void writer_print_time(WriterContext *wctx, const char *key,
350                               int64_t ts, const AVRational *time_base, int is_duration)
351 {
352     char buf[128];
353
354     if (!wctx->is_fmt_chapter || !fmt_entries_to_show || av_dict_get(fmt_entries_to_show, key, NULL, 0)) {
355         if ((!is_duration && ts == AV_NOPTS_VALUE) || (is_duration && ts == 0)) {
356             writer_print_string(wctx, key, "N/A", 1);
357         } else {
358             double d = ts * av_q2d(*time_base);
359             value_string(buf, sizeof(buf), (struct unit_value){.val.d=d, .unit=unit_second_str});
360             writer_print_string(wctx, key, buf, 0);
361         }
362     }
363 }
364
365 static void writer_print_ts(WriterContext *wctx, const char *key, int64_t ts, int is_duration)
366 {
367     if ((!is_duration && ts == AV_NOPTS_VALUE) || (is_duration && ts == 0)) {
368         writer_print_string(wctx, key, "N/A", 1);
369     } else {
370         writer_print_integer(wctx, key, ts);
371     }
372 }
373
374 static inline void writer_show_tags(WriterContext *wctx, AVDictionary *dict)
375 {
376     wctx->writer->show_tags(wctx, dict);
377 }
378
379 static void writer_print_data(WriterContext *wctx, const char *name,
380                               uint8_t *data, int size)
381 {
382     AVBPrint bp;
383     int offset = 0, l, i;
384
385     av_bprint_init(&bp, 0, AV_BPRINT_SIZE_UNLIMITED);
386     av_bprintf(&bp, "\n");
387     while (size) {
388         av_bprintf(&bp, "%08x: ", offset);
389         l = FFMIN(size, 16);
390         for (i = 0; i < l; i++) {
391             av_bprintf(&bp, "%02x", data[i]);
392             if (i & 1)
393                 av_bprintf(&bp, " ");
394         }
395         av_bprint_chars(&bp, ' ', 41 - 2 * i - i / 2);
396         for (i = 0; i < l; i++)
397             av_bprint_chars(&bp, data[i] - 32U < 95 ? data[i] : '.', 1);
398         av_bprintf(&bp, "\n");
399         offset += l;
400         data   += l;
401         size   -= l;
402     }
403     writer_print_string(wctx, name, bp.str, 0);
404     av_bprint_finalize(&bp, NULL);
405 }
406
407 #define MAX_REGISTERED_WRITERS_NB 64
408
409 static const Writer *registered_writers[MAX_REGISTERED_WRITERS_NB + 1];
410
411 static int writer_register(const Writer *writer)
412 {
413     static int next_registered_writer_idx = 0;
414
415     if (next_registered_writer_idx == MAX_REGISTERED_WRITERS_NB)
416         return AVERROR(ENOMEM);
417
418     registered_writers[next_registered_writer_idx++] = writer;
419     return 0;
420 }
421
422 static const Writer *writer_get_by_name(const char *name)
423 {
424     int i;
425
426     for (i = 0; registered_writers[i]; i++)
427         if (!strcmp(registered_writers[i]->name, name))
428             return registered_writers[i];
429
430     return NULL;
431 }
432
433
434 /* WRITERS */
435
436 #define DEFINE_WRITER_CLASS(name)                   \
437 static const char *name##_get_name(void *ctx)       \
438 {                                                   \
439     return #name ;                                  \
440 }                                                   \
441 static const AVClass name##_class = {               \
442     #name,                                          \
443     name##_get_name,                                \
444     name##_options                                  \
445 }
446
447 /* Default output */
448
449 typedef struct DefaultContext {
450     const AVClass *class;
451     int nokey;
452     int noprint_wrappers;
453 } DefaultContext;
454
455 #define OFFSET(x) offsetof(DefaultContext, x)
456
457 static const AVOption default_options[] = {
458     { "noprint_wrappers", "do not print headers and footers", OFFSET(noprint_wrappers), AV_OPT_TYPE_INT, {.i64=0}, 0, 1 },
459     { "nw",               "do not print headers and footers", OFFSET(noprint_wrappers), AV_OPT_TYPE_INT, {.i64=0}, 0, 1 },
460     { "nokey",          "force no key printing",     OFFSET(nokey),          AV_OPT_TYPE_INT, {.i64=0}, 0, 1 },
461     { "nk",             "force no key printing",     OFFSET(nokey),          AV_OPT_TYPE_INT, {.i64=0}, 0, 1 },
462     {NULL},
463 };
464
465 DEFINE_WRITER_CLASS(default);
466
467 /* lame uppercasing routine, assumes the string is lower case ASCII */
468 static inline char *upcase_string(char *dst, size_t dst_size, const char *src)
469 {
470     int i;
471     for (i = 0; src[i] && i < dst_size-1; i++)
472         dst[i] = av_toupper(src[i]);
473     dst[i] = 0;
474     return dst;
475 }
476
477 static void default_print_section_header(WriterContext *wctx, const char *section)
478 {
479     DefaultContext *def = wctx->priv;
480     char buf[32];
481
482     if (!def->noprint_wrappers)
483         printf("[%s]\n", upcase_string(buf, sizeof(buf), section));
484 }
485
486 static void default_print_section_footer(WriterContext *wctx, const char *section)
487 {
488     DefaultContext *def = wctx->priv;
489     char buf[32];
490
491     if (!def->noprint_wrappers)
492         printf("[/%s]\n", upcase_string(buf, sizeof(buf), section));
493 }
494
495 static void default_print_str(WriterContext *wctx, const char *key, const char *value)
496 {
497     DefaultContext *def = wctx->priv;
498     if (!def->nokey)
499         printf("%s=", key);
500     printf("%s\n", value);
501 }
502
503 static void default_print_int(WriterContext *wctx, const char *key, long long int value)
504 {
505     DefaultContext *def = wctx->priv;
506
507     if (!def->nokey)
508         printf("%s=", key);
509     printf("%lld\n", value);
510 }
511
512 static void default_show_tags(WriterContext *wctx, AVDictionary *dict)
513 {
514     AVDictionaryEntry *tag = NULL;
515     while ((tag = av_dict_get(dict, "", tag, AV_DICT_IGNORE_SUFFIX))) {
516         if (!fmt_entries_to_show || (tag->key && av_dict_get(fmt_entries_to_show, tag->key, NULL, 0)))
517             printf("TAG:");
518         writer_print_string(wctx, tag->key, tag->value, 0);
519     }
520 }
521
522 static const Writer default_writer = {
523     .name                  = "default",
524     .priv_size             = sizeof(DefaultContext),
525     .print_section_header  = default_print_section_header,
526     .print_section_footer  = default_print_section_footer,
527     .print_integer         = default_print_int,
528     .print_string          = default_print_str,
529     .show_tags             = default_show_tags,
530     .flags = WRITER_FLAG_DISPLAY_OPTIONAL_FIELDS,
531     .priv_class            = &default_class,
532 };
533
534 /* Compact output */
535
536 /**
537  * Apply C-language-like string escaping.
538  */
539 static const char *c_escape_str(AVBPrint *dst, const char *src, const char sep, void *log_ctx)
540 {
541     const char *p;
542
543     for (p = src; *p; p++) {
544         switch (*p) {
545         case '\b': av_bprintf(dst, "%s", "\\b");  break;
546         case '\f': av_bprintf(dst, "%s", "\\f");  break;
547         case '\n': av_bprintf(dst, "%s", "\\n");  break;
548         case '\r': av_bprintf(dst, "%s", "\\r");  break;
549         case '\\': av_bprintf(dst, "%s", "\\\\"); break;
550         default:
551             if (*p == sep)
552                 av_bprint_chars(dst, '\\', 1);
553             av_bprint_chars(dst, *p, 1);
554         }
555     }
556     return dst->str;
557 }
558
559 /**
560  * Quote fields containing special characters, check RFC4180.
561  */
562 static const char *csv_escape_str(AVBPrint *dst, const char *src, const char sep, void *log_ctx)
563 {
564     const char *p;
565     int quote = 0;
566
567     /* check if input needs quoting */
568     for (p = src; *p; p++)
569         if (*p == '"' || *p == sep || *p == '\n' || *p == '\r')
570             quote = 1;
571
572     if (quote)
573         av_bprint_chars(dst, '\"', 1);
574
575     for (p = src; *p; p++) {
576         if (*p == '"')
577             av_bprint_chars(dst, '\"', 1);
578         av_bprint_chars(dst, *p, 1);
579     }
580     if (quote)
581         av_bprint_chars(dst, '\"', 1);
582     return dst->str;
583 }
584
585 static const char *none_escape_str(AVBPrint *dst, const char *src, const char sep, void *log_ctx)
586 {
587     return src;
588 }
589
590 typedef struct CompactContext {
591     const AVClass *class;
592     char *item_sep_str;
593     char item_sep;
594     int nokey;
595     int print_section;
596     char *escape_mode_str;
597     const char * (*escape_str)(AVBPrint *dst, const char *src, const char sep, void *log_ctx);
598 } CompactContext;
599
600 #undef OFFSET
601 #define OFFSET(x) offsetof(CompactContext, x)
602
603 static const AVOption compact_options[]= {
604     {"item_sep", "set item separator",    OFFSET(item_sep_str),    AV_OPT_TYPE_STRING, {.str="|"},  CHAR_MIN, CHAR_MAX },
605     {"s",        "set item separator",    OFFSET(item_sep_str),    AV_OPT_TYPE_STRING, {.str="|"},  CHAR_MIN, CHAR_MAX },
606     {"nokey",    "force no key printing", OFFSET(nokey),           AV_OPT_TYPE_INT,    {.i64=0},    0,        1        },
607     {"nk",       "force no key printing", OFFSET(nokey),           AV_OPT_TYPE_INT,    {.i64=0},    0,        1        },
608     {"escape",   "set escape mode",       OFFSET(escape_mode_str), AV_OPT_TYPE_STRING, {.str="c"},  CHAR_MIN, CHAR_MAX },
609     {"e",        "set escape mode",       OFFSET(escape_mode_str), AV_OPT_TYPE_STRING, {.str="c"},  CHAR_MIN, CHAR_MAX },
610     {"print_section", "print section name", OFFSET(print_section), AV_OPT_TYPE_INT,    {.i64=1},    0,        1        },
611     {"p",             "print section name", OFFSET(print_section), AV_OPT_TYPE_INT,    {.i64=1},    0,        1        },
612     {NULL},
613 };
614
615 DEFINE_WRITER_CLASS(compact);
616
617 static av_cold int compact_init(WriterContext *wctx, const char *args, void *opaque)
618 {
619     CompactContext *compact = wctx->priv;
620
621     if (strlen(compact->item_sep_str) != 1) {
622         av_log(wctx, AV_LOG_ERROR, "Item separator '%s' specified, but must contain a single character\n",
623                compact->item_sep_str);
624         return AVERROR(EINVAL);
625     }
626     compact->item_sep = compact->item_sep_str[0];
627
628     if      (!strcmp(compact->escape_mode_str, "none")) compact->escape_str = none_escape_str;
629     else if (!strcmp(compact->escape_mode_str, "c"   )) compact->escape_str = c_escape_str;
630     else if (!strcmp(compact->escape_mode_str, "csv" )) compact->escape_str = csv_escape_str;
631     else {
632         av_log(wctx, AV_LOG_ERROR, "Unknown escape mode '%s'\n", compact->escape_mode_str);
633         return AVERROR(EINVAL);
634     }
635
636     return 0;
637 }
638
639 static void compact_print_section_header(WriterContext *wctx, const char *section)
640 {
641     CompactContext *compact = wctx->priv;
642
643     if (compact->print_section)
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     AVBPrint buf;
656
657     if (wctx->nb_item) printf("%c", compact->item_sep);
658     if (!compact->nokey)
659         printf("%s=", key);
660     av_bprint_init(&buf, 1, AV_BPRINT_SIZE_UNLIMITED);
661     printf("%s", compact->escape_str(&buf, value, compact->item_sep, wctx));
662     av_bprint_finalize(&buf, NULL);
663 }
664
665 static void compact_print_int(WriterContext *wctx, const char *key, long long int value)
666 {
667     CompactContext *compact = wctx->priv;
668
669     if (wctx->nb_item) printf("%c", compact->item_sep);
670     if (!compact->nokey)
671         printf("%s=", key);
672     printf("%lld", value);
673 }
674
675 static void compact_show_tags(WriterContext *wctx, AVDictionary *dict)
676 {
677     CompactContext *compact = wctx->priv;
678     AVDictionaryEntry *tag = NULL;
679     AVBPrint buf;
680
681     av_bprint_init(&buf, 1, AV_BPRINT_SIZE_UNLIMITED);
682     while ((tag = av_dict_get(dict, "", tag, AV_DICT_IGNORE_SUFFIX))) {
683         if (wctx->nb_item) printf("%c", compact->item_sep);
684         if (!compact->nokey) {
685             av_bprint_clear(&buf);
686             printf("tag:%s=", compact->escape_str(&buf, tag->key, compact->item_sep, wctx));
687         }
688         av_bprint_clear(&buf);
689         printf("%s", compact->escape_str(&buf, tag->value, compact->item_sep, wctx));
690     }
691     av_bprint_finalize(&buf, NULL);
692 }
693
694 static const Writer compact_writer = {
695     .name                 = "compact",
696     .priv_size            = sizeof(CompactContext),
697     .init                 = compact_init,
698     .print_section_header = compact_print_section_header,
699     .print_section_footer = compact_print_section_footer,
700     .print_integer        = compact_print_int,
701     .print_string         = compact_print_str,
702     .show_tags            = compact_show_tags,
703     .flags = WRITER_FLAG_DISPLAY_OPTIONAL_FIELDS,
704     .priv_class           = &compact_class,
705 };
706
707 /* CSV output */
708
709 static av_cold int csv_init(WriterContext *wctx, const char *args, void *opaque)
710 {
711     return compact_init(wctx, "item_sep=,:nokey=1:escape=csv", opaque);
712 }
713
714 static const Writer csv_writer = {
715     .name                 = "csv",
716     .priv_size            = sizeof(CompactContext),
717     .init                 = csv_init,
718     .print_section_header = compact_print_section_header,
719     .print_section_footer = compact_print_section_footer,
720     .print_integer        = compact_print_int,
721     .print_string         = compact_print_str,
722     .show_tags            = compact_show_tags,
723     .flags = WRITER_FLAG_DISPLAY_OPTIONAL_FIELDS,
724     .priv_class           = &compact_class,
725 };
726
727 /* Flat output */
728
729 typedef struct FlatContext {
730     const AVClass *class;
731     const char *section, *chapter;
732     const char *sep_str;
733     char sep;
734     int hierarchical;
735 } FlatContext;
736
737 #undef OFFSET
738 #define OFFSET(x) offsetof(FlatContext, x)
739
740 static const AVOption flat_options[]= {
741     {"sep_char", "set separator",    OFFSET(sep_str),    AV_OPT_TYPE_STRING, {.str="."},  CHAR_MIN, CHAR_MAX },
742     {"s",        "set separator",    OFFSET(sep_str),    AV_OPT_TYPE_STRING, {.str="."},  CHAR_MIN, CHAR_MAX },
743     {"hierarchical", "specify if the section specification should be hierarchical", OFFSET(hierarchical), AV_OPT_TYPE_INT, {.i64=1}, 0, 1 },
744     {"h",           "specify if the section specification should be hierarchical", OFFSET(hierarchical), AV_OPT_TYPE_INT, {.i64=1}, 0, 1 },
745     {NULL},
746 };
747
748 DEFINE_WRITER_CLASS(flat);
749
750 static av_cold int flat_init(WriterContext *wctx, const char *args, void *opaque)
751 {
752     FlatContext *flat = wctx->priv;
753
754     if (strlen(flat->sep_str) != 1) {
755         av_log(wctx, AV_LOG_ERROR, "Item separator '%s' specified, but must contain a single character\n",
756                flat->sep_str);
757         return AVERROR(EINVAL);
758     }
759     flat->sep = flat->sep_str[0];
760     return 0;
761 }
762
763 static const char *flat_escape_key_str(AVBPrint *dst, const char *src, const char sep)
764 {
765     const char *p;
766
767     for (p = src; *p; p++) {
768         if (!((*p >= '0' && *p <= '9') ||
769               (*p >= 'a' && *p <= 'z') ||
770               (*p >= 'A' && *p <= 'Z')))
771             av_bprint_chars(dst, '_', 1);
772         else
773             av_bprint_chars(dst, *p, 1);
774     }
775     return dst->str;
776 }
777
778 static const char *flat_escape_value_str(AVBPrint *dst, const char *src)
779 {
780     const char *p;
781
782     for (p = src; *p; p++) {
783         switch (*p) {
784         case '\n': av_bprintf(dst, "%s", "\\n");  break;
785         case '\r': av_bprintf(dst, "%s", "\\r");  break;
786         case '\\': av_bprintf(dst, "%s", "\\\\"); break;
787         case '"':  av_bprintf(dst, "%s", "\\\""); break;
788         case '`':  av_bprintf(dst, "%s", "\\`");  break;
789         case '$':  av_bprintf(dst, "%s", "\\$");  break;
790         default:   av_bprint_chars(dst, *p, 1);   break;
791         }
792     }
793     return dst->str;
794 }
795
796 static void flat_print_chapter_header(WriterContext *wctx, const char *chapter)
797 {
798     FlatContext *flat = wctx->priv;
799     flat->chapter = chapter;
800 }
801
802 static void flat_print_section_header(WriterContext *wctx, const char *section)
803 {
804     FlatContext *flat = wctx->priv;
805     flat->section = section;
806 }
807
808 static void flat_print_section(WriterContext *wctx)
809 {
810     FlatContext *flat = wctx->priv;
811     int n = wctx->is_packets_and_frames ? wctx->nb_section_packet_frame
812                                         : wctx->nb_section;
813
814     if (flat->hierarchical && wctx->multiple_sections)
815         printf("%s%c", flat->chapter, flat->sep);
816     printf("%s%c", flat->section, flat->sep);
817     if (wctx->multiple_sections)
818         printf("%d%c", n, flat->sep);
819 }
820
821 static void flat_print_int(WriterContext *wctx, const char *key, long long int value)
822 {
823     flat_print_section(wctx);
824     printf("%s=%lld\n", key, value);
825 }
826
827 static void flat_print_str(WriterContext *wctx, const char *key, const char *value)
828 {
829     FlatContext *flat = wctx->priv;
830     AVBPrint buf;
831
832     flat_print_section(wctx);
833     av_bprint_init(&buf, 1, AV_BPRINT_SIZE_UNLIMITED);
834     printf("%s=", flat_escape_key_str(&buf, key, flat->sep));
835     av_bprint_clear(&buf);
836     printf("\"%s\"\n", flat_escape_value_str(&buf, value));
837     av_bprint_finalize(&buf, NULL);
838 }
839
840 static void flat_show_tags(WriterContext *wctx, AVDictionary *dict)
841 {
842     FlatContext *flat = wctx->priv;
843     AVBPrint buf;
844     AVDictionaryEntry *tag = NULL;
845
846     av_bprint_init(&buf, 1, AV_BPRINT_SIZE_UNLIMITED);
847     while ((tag = av_dict_get(dict, "", tag, AV_DICT_IGNORE_SUFFIX))) {
848         flat_print_section(wctx);
849         av_bprint_clear(&buf);
850         printf("tags%c%s=", flat->sep, flat_escape_key_str(&buf, tag->key, flat->sep));
851         av_bprint_clear(&buf);
852         printf("\"%s\"\n", flat_escape_value_str(&buf, tag->value));
853     }
854     av_bprint_finalize(&buf, NULL);
855 }
856
857 static const Writer flat_writer = {
858     .name                  = "flat",
859     .priv_size             = sizeof(FlatContext),
860     .init                  = flat_init,
861     .print_chapter_header  = flat_print_chapter_header,
862     .print_section_header  = flat_print_section_header,
863     .print_integer         = flat_print_int,
864     .print_string          = flat_print_str,
865     .show_tags             = flat_show_tags,
866     .flags = WRITER_FLAG_DISPLAY_OPTIONAL_FIELDS|WRITER_FLAG_PUT_PACKETS_AND_FRAMES_IN_SAME_CHAPTER,
867     .priv_class            = &flat_class,
868 };
869
870 /* INI format output */
871
872 typedef struct {
873     const AVClass *class;
874     AVBPrint chapter_name, section_name;
875     int hierarchical;
876 } INIContext;
877
878 #undef OFFSET
879 #define OFFSET(x) offsetof(INIContext, x)
880
881 static const AVOption ini_options[] = {
882     {"hierarchical", "specify if the section specification should be hierarchical", OFFSET(hierarchical), AV_OPT_TYPE_INT, {.i64=1}, 0, 1 },
883     {"h",           "specify if the section specification should be hierarchical", OFFSET(hierarchical), AV_OPT_TYPE_INT, {.i64=1}, 0, 1 },
884     {NULL},
885 };
886
887 DEFINE_WRITER_CLASS(ini);
888
889 static av_cold int ini_init(WriterContext *wctx, const char *args, void *opaque)
890 {
891     INIContext *ini = wctx->priv;
892
893     av_bprint_init(&ini->chapter_name, 1, AV_BPRINT_SIZE_UNLIMITED);
894     av_bprint_init(&ini->section_name, 1, AV_BPRINT_SIZE_UNLIMITED);
895
896     return 0;
897 }
898
899 static av_cold void ini_uninit(WriterContext *wctx)
900 {
901     INIContext *ini = wctx->priv;
902     av_bprint_finalize(&ini->chapter_name, NULL);
903     av_bprint_finalize(&ini->section_name, NULL);
904 }
905
906 static void ini_print_header(WriterContext *wctx)
907 {
908     printf("# ffprobe output\n\n");
909 }
910
911 static char *ini_escape_str(AVBPrint *dst, const char *src)
912 {
913     int i = 0;
914     char c = 0;
915
916     while (c = src[i++]) {
917         switch (c) {
918         case '\b': av_bprintf(dst, "%s", "\\b"); break;
919         case '\f': av_bprintf(dst, "%s", "\\f"); break;
920         case '\n': av_bprintf(dst, "%s", "\\n"); break;
921         case '\r': av_bprintf(dst, "%s", "\\r"); break;
922         case '\t': av_bprintf(dst, "%s", "\\t"); break;
923         case '\\':
924         case '#' :
925         case '=' :
926         case ':' : av_bprint_chars(dst, '\\', 1);
927         default:
928             if ((unsigned char)c < 32)
929                 av_bprintf(dst, "\\x00%02x", c & 0xff);
930             else
931                 av_bprint_chars(dst, c, 1);
932             break;
933         }
934     }
935     return dst->str;
936 }
937
938 static void ini_print_chapter_header(WriterContext *wctx, const char *chapter)
939 {
940     INIContext *ini = wctx->priv;
941
942     av_bprint_clear(&ini->chapter_name);
943     av_bprintf(&ini->chapter_name, "%s", chapter);
944
945     if (wctx->nb_chapter)
946         printf("\n");
947 }
948
949 static void ini_print_section_header(WriterContext *wctx, const char *section)
950 {
951     INIContext *ini = wctx->priv;
952     int n = wctx->is_packets_and_frames ? wctx->nb_section_packet_frame
953                                         : wctx->nb_section;
954     if (wctx->nb_section)
955         printf("\n");
956     av_bprint_clear(&ini->section_name);
957
958     if (ini->hierarchical && wctx->multiple_sections)
959         av_bprintf(&ini->section_name, "%s.", ini->chapter_name.str);
960     av_bprintf(&ini->section_name, "%s", section);
961
962     if (wctx->multiple_sections)
963         av_bprintf(&ini->section_name, ".%d", n);
964     printf("[%s]\n", ini->section_name.str);
965 }
966
967 static void ini_print_str(WriterContext *wctx, const char *key, const char *value)
968 {
969     AVBPrint buf;
970
971     av_bprint_init(&buf, 1, AV_BPRINT_SIZE_UNLIMITED);
972     printf("%s=", ini_escape_str(&buf, key));
973     av_bprint_clear(&buf);
974     printf("%s\n", ini_escape_str(&buf, value));
975     av_bprint_finalize(&buf, NULL);
976 }
977
978 static void ini_print_int(WriterContext *wctx, const char *key, long long int value)
979 {
980     printf("%s=%lld\n", key, value);
981 }
982
983 static void ini_show_tags(WriterContext *wctx, AVDictionary *dict)
984 {
985     INIContext *ini = wctx->priv;
986     AVDictionaryEntry *tag = NULL;
987     int is_first = 1;
988
989     while ((tag = av_dict_get(dict, "", tag, AV_DICT_IGNORE_SUFFIX))) {
990         if (is_first) {
991             printf("\n[%s.tags]\n", ini->section_name.str);
992             is_first = 0;
993         }
994         writer_print_string(wctx, tag->key, tag->value, 0);
995     }
996 }
997
998 static const Writer ini_writer = {
999     .name                  = "ini",
1000     .priv_size             = sizeof(INIContext),
1001     .init                  = ini_init,
1002     .uninit                = ini_uninit,
1003     .print_header          = ini_print_header,
1004     .print_chapter_header  = ini_print_chapter_header,
1005     .print_section_header  = ini_print_section_header,
1006     .print_integer         = ini_print_int,
1007     .print_string          = ini_print_str,
1008     .show_tags             = ini_show_tags,
1009     .flags = WRITER_FLAG_DISPLAY_OPTIONAL_FIELDS|WRITER_FLAG_PUT_PACKETS_AND_FRAMES_IN_SAME_CHAPTER,
1010     .priv_class            = &ini_class,
1011 };
1012
1013 /* JSON output */
1014
1015 typedef struct {
1016     const AVClass *class;
1017     int indent_level;
1018     int compact;
1019     const char *item_sep, *item_start_end;
1020 } JSONContext;
1021
1022 #undef OFFSET
1023 #define OFFSET(x) offsetof(JSONContext, x)
1024
1025 static const AVOption json_options[]= {
1026     { "compact", "enable compact output", OFFSET(compact), AV_OPT_TYPE_INT, {.i64=0}, 0, 1 },
1027     { "c",       "enable compact output", OFFSET(compact), AV_OPT_TYPE_INT, {.i64=0}, 0, 1 },
1028     { NULL }
1029 };
1030
1031 DEFINE_WRITER_CLASS(json);
1032
1033 static av_cold int json_init(WriterContext *wctx, const char *args, void *opaque)
1034 {
1035     JSONContext *json = wctx->priv;
1036
1037     json->item_sep       = json->compact ? ", " : ",\n";
1038     json->item_start_end = json->compact ? " "  : "\n";
1039
1040     return 0;
1041 }
1042
1043 static const char *json_escape_str(AVBPrint *dst, const char *src, void *log_ctx)
1044 {
1045     static const char json_escape[] = {'"', '\\', '\b', '\f', '\n', '\r', '\t', 0};
1046     static const char json_subst[]  = {'"', '\\',  'b',  'f',  'n',  'r',  't', 0};
1047     const char *p;
1048
1049     for (p = src; *p; p++) {
1050         char *s = strchr(json_escape, *p);
1051         if (s) {
1052             av_bprint_chars(dst, '\\', 1);
1053             av_bprint_chars(dst, json_subst[s - json_escape], 1);
1054         } else if ((unsigned char)*p < 32) {
1055             av_bprintf(dst, "\\u00%02x", *p & 0xff);
1056         } else {
1057             av_bprint_chars(dst, *p, 1);
1058         }
1059     }
1060     return dst->str;
1061 }
1062
1063 static void json_print_header(WriterContext *wctx)
1064 {
1065     JSONContext *json = wctx->priv;
1066     printf("{");
1067     json->indent_level++;
1068 }
1069
1070 static void json_print_footer(WriterContext *wctx)
1071 {
1072     JSONContext *json = wctx->priv;
1073     json->indent_level--;
1074     printf("\n}\n");
1075 }
1076
1077 #define JSON_INDENT() printf("%*c", json->indent_level * 4, ' ')
1078
1079 static void json_print_chapter_header(WriterContext *wctx, const char *chapter)
1080 {
1081     JSONContext *json = wctx->priv;
1082     AVBPrint buf;
1083
1084     if (wctx->nb_chapter)
1085         printf(",");
1086     printf("\n");
1087     if (wctx->multiple_sections) {
1088         JSON_INDENT();
1089         av_bprint_init(&buf, 1, AV_BPRINT_SIZE_UNLIMITED);
1090         printf("\"%s\": [\n", json_escape_str(&buf, chapter, wctx));
1091         av_bprint_finalize(&buf, NULL);
1092         json->indent_level++;
1093     }
1094 }
1095
1096 static void json_print_chapter_footer(WriterContext *wctx, const char *chapter)
1097 {
1098     JSONContext *json = wctx->priv;
1099
1100     if (wctx->multiple_sections) {
1101         printf("\n");
1102         json->indent_level--;
1103         JSON_INDENT();
1104         printf("]");
1105     }
1106 }
1107
1108 static void json_print_section_header(WriterContext *wctx, const char *section)
1109 {
1110     JSONContext *json = wctx->priv;
1111
1112     if (wctx->nb_section)
1113         printf(",\n");
1114     JSON_INDENT();
1115     if (!wctx->multiple_sections)
1116         printf("\"%s\": ", section);
1117     printf("{%s", json->item_start_end);
1118     json->indent_level++;
1119     /* this is required so the parser can distinguish between packets and frames */
1120     if (wctx->is_packets_and_frames) {
1121         if (!json->compact)
1122             JSON_INDENT();
1123         printf("\"type\": \"%s\"%s", section, json->item_sep);
1124     }
1125 }
1126
1127 static void json_print_section_footer(WriterContext *wctx, const char *section)
1128 {
1129     JSONContext *json = wctx->priv;
1130
1131     printf("%s", json->item_start_end);
1132     json->indent_level--;
1133     if (!json->compact)
1134         JSON_INDENT();
1135     printf("}");
1136 }
1137
1138 static inline void json_print_item_str(WriterContext *wctx,
1139                                        const char *key, const char *value)
1140 {
1141     AVBPrint buf;
1142
1143     av_bprint_init(&buf, 1, AV_BPRINT_SIZE_UNLIMITED);
1144     printf("\"%s\":", json_escape_str(&buf, key,   wctx));
1145     av_bprint_clear(&buf);
1146     printf(" \"%s\"", json_escape_str(&buf, value, wctx));
1147     av_bprint_finalize(&buf, NULL);
1148 }
1149
1150 static void json_print_str(WriterContext *wctx, const char *key, const char *value)
1151 {
1152     JSONContext *json = wctx->priv;
1153
1154     if (wctx->nb_item) printf("%s", json->item_sep);
1155     if (!json->compact)
1156         JSON_INDENT();
1157     json_print_item_str(wctx, key, value);
1158 }
1159
1160 static void json_print_int(WriterContext *wctx, const char *key, long long int value)
1161 {
1162     JSONContext *json = wctx->priv;
1163     AVBPrint buf;
1164
1165     if (wctx->nb_item) printf("%s", json->item_sep);
1166     if (!json->compact)
1167         JSON_INDENT();
1168
1169     av_bprint_init(&buf, 1, AV_BPRINT_SIZE_UNLIMITED);
1170     printf("\"%s\": %lld", json_escape_str(&buf, key, wctx), value);
1171     av_bprint_finalize(&buf, NULL);
1172 }
1173
1174 static void json_show_tags(WriterContext *wctx, AVDictionary *dict)
1175 {
1176     JSONContext *json = wctx->priv;
1177     AVDictionaryEntry *tag = NULL;
1178     int is_first = 1;
1179     if (!dict)
1180         return;
1181     printf("%s", json->item_sep);
1182     if (!json->compact)
1183         JSON_INDENT();
1184     printf("\"tags\": {%s", json->item_start_end);
1185     json->indent_level++;
1186     while ((tag = av_dict_get(dict, "", tag, AV_DICT_IGNORE_SUFFIX))) {
1187         if (is_first) is_first = 0;
1188         else          printf("%s", json->item_sep);
1189         if (!json->compact)
1190             JSON_INDENT();
1191         json_print_item_str(wctx, tag->key, tag->value);
1192     }
1193     json->indent_level--;
1194     printf("%s", json->item_start_end);
1195     if (!json->compact)
1196         JSON_INDENT();
1197     printf("}");
1198 }
1199
1200 static const Writer json_writer = {
1201     .name                 = "json",
1202     .priv_size            = sizeof(JSONContext),
1203     .init                 = json_init,
1204     .print_header         = json_print_header,
1205     .print_footer         = json_print_footer,
1206     .print_chapter_header = json_print_chapter_header,
1207     .print_chapter_footer = json_print_chapter_footer,
1208     .print_section_header = json_print_section_header,
1209     .print_section_footer = json_print_section_footer,
1210     .print_integer        = json_print_int,
1211     .print_string         = json_print_str,
1212     .show_tags            = json_show_tags,
1213     .flags = WRITER_FLAG_PUT_PACKETS_AND_FRAMES_IN_SAME_CHAPTER,
1214     .priv_class           = &json_class,
1215 };
1216
1217 /* XML output */
1218
1219 typedef struct {
1220     const AVClass *class;
1221     int within_tag;
1222     int indent_level;
1223     int fully_qualified;
1224     int xsd_strict;
1225 } XMLContext;
1226
1227 #undef OFFSET
1228 #define OFFSET(x) offsetof(XMLContext, x)
1229
1230 static const AVOption xml_options[] = {
1231     {"fully_qualified", "specify if the output should be fully qualified", OFFSET(fully_qualified), AV_OPT_TYPE_INT, {.i64=0},  0, 1 },
1232     {"q",               "specify if the output should be fully qualified", OFFSET(fully_qualified), AV_OPT_TYPE_INT, {.i64=0},  0, 1 },
1233     {"xsd_strict",      "ensure that the output is XSD compliant",         OFFSET(xsd_strict),      AV_OPT_TYPE_INT, {.i64=0},  0, 1 },
1234     {"x",               "ensure that the output is XSD compliant",         OFFSET(xsd_strict),      AV_OPT_TYPE_INT, {.i64=0},  0, 1 },
1235     {NULL},
1236 };
1237
1238 DEFINE_WRITER_CLASS(xml);
1239
1240 static av_cold int xml_init(WriterContext *wctx, const char *args, void *opaque)
1241 {
1242     XMLContext *xml = wctx->priv;
1243
1244     if (xml->xsd_strict) {
1245         xml->fully_qualified = 1;
1246 #define CHECK_COMPLIANCE(opt, opt_name)                                 \
1247         if (opt) {                                                      \
1248             av_log(wctx, AV_LOG_ERROR,                                  \
1249                    "XSD-compliant output selected but option '%s' was selected, XML output may be non-compliant.\n" \
1250                    "You need to disable such option with '-no%s'\n", opt_name, opt_name); \
1251             return AVERROR(EINVAL);                                     \
1252         }
1253         CHECK_COMPLIANCE(show_private_data, "private");
1254         CHECK_COMPLIANCE(show_value_unit,   "unit");
1255         CHECK_COMPLIANCE(use_value_prefix,  "prefix");
1256
1257         if (do_show_frames && do_show_packets) {
1258             av_log(wctx, AV_LOG_ERROR,
1259                    "Interleaved frames and packets are not allowed in XSD. "
1260                    "Select only one between the -show_frames and the -show_packets options.\n");
1261             return AVERROR(EINVAL);
1262         }
1263     }
1264
1265     return 0;
1266 }
1267
1268 static const char *xml_escape_str(AVBPrint *dst, const char *src, void *log_ctx)
1269 {
1270     const char *p;
1271
1272     for (p = src; *p; p++) {
1273         switch (*p) {
1274         case '&' : av_bprintf(dst, "%s", "&amp;");  break;
1275         case '<' : av_bprintf(dst, "%s", "&lt;");   break;
1276         case '>' : av_bprintf(dst, "%s", "&gt;");   break;
1277         case '\"': av_bprintf(dst, "%s", "&quot;"); break;
1278         case '\'': av_bprintf(dst, "%s", "&apos;"); break;
1279         default: av_bprint_chars(dst, *p, 1);
1280         }
1281     }
1282
1283     return dst->str;
1284 }
1285
1286 static void xml_print_header(WriterContext *wctx)
1287 {
1288     XMLContext *xml = wctx->priv;
1289     const char *qual = " xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance' "
1290         "xmlns:ffprobe='http://www.ffmpeg.org/schema/ffprobe' "
1291         "xsi:schemaLocation='http://www.ffmpeg.org/schema/ffprobe ffprobe.xsd'";
1292
1293     printf("<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n");
1294     printf("<%sffprobe%s>\n",
1295            xml->fully_qualified ? "ffprobe:" : "",
1296            xml->fully_qualified ? qual : "");
1297
1298     xml->indent_level++;
1299 }
1300
1301 static void xml_print_footer(WriterContext *wctx)
1302 {
1303     XMLContext *xml = wctx->priv;
1304
1305     xml->indent_level--;
1306     printf("</%sffprobe>\n", xml->fully_qualified ? "ffprobe:" : "");
1307 }
1308
1309 #define XML_INDENT() printf("%*c", xml->indent_level * 4, ' ')
1310
1311 static void xml_print_chapter_header(WriterContext *wctx, const char *chapter)
1312 {
1313     XMLContext *xml = wctx->priv;
1314
1315     if (wctx->nb_chapter)
1316         printf("\n");
1317     if (wctx->multiple_sections) {
1318         XML_INDENT(); printf("<%s>\n", chapter);
1319         xml->indent_level++;
1320     }
1321 }
1322
1323 static void xml_print_chapter_footer(WriterContext *wctx, const char *chapter)
1324 {
1325     XMLContext *xml = wctx->priv;
1326
1327     if (wctx->multiple_sections) {
1328         xml->indent_level--;
1329         XML_INDENT(); printf("</%s>\n", chapter);
1330     }
1331 }
1332
1333 static void xml_print_section_header(WriterContext *wctx, const char *section)
1334 {
1335     XMLContext *xml = wctx->priv;
1336
1337     XML_INDENT(); printf("<%s ", section);
1338     xml->within_tag = 1;
1339 }
1340
1341 static void xml_print_section_footer(WriterContext *wctx, const char *section)
1342 {
1343     XMLContext *xml = wctx->priv;
1344
1345     if (xml->within_tag)
1346         printf("/>\n");
1347     else {
1348         XML_INDENT(); printf("</%s>\n", section);
1349     }
1350 }
1351
1352 static void xml_print_str(WriterContext *wctx, const char *key, const char *value)
1353 {
1354     AVBPrint buf;
1355
1356     if (wctx->nb_item)
1357         printf(" ");
1358     av_bprint_init(&buf, 1, AV_BPRINT_SIZE_UNLIMITED);
1359     printf("%s=\"%s\"", key, xml_escape_str(&buf, value, wctx));
1360     av_bprint_finalize(&buf, NULL);
1361 }
1362
1363 static void xml_print_int(WriterContext *wctx, const char *key, long long int value)
1364 {
1365     if (wctx->nb_item)
1366         printf(" ");
1367     printf("%s=\"%lld\"", key, value);
1368 }
1369
1370 static void xml_show_tags(WriterContext *wctx, AVDictionary *dict)
1371 {
1372     XMLContext *xml = wctx->priv;
1373     AVDictionaryEntry *tag = NULL;
1374     int is_first = 1;
1375     AVBPrint buf;
1376
1377     av_bprint_init(&buf, 1, AV_BPRINT_SIZE_UNLIMITED);
1378     xml->indent_level++;
1379     while ((tag = av_dict_get(dict, "", tag, AV_DICT_IGNORE_SUFFIX))) {
1380         if (is_first) {
1381             /* close section tag */
1382             printf(">\n");
1383             xml->within_tag = 0;
1384             is_first = 0;
1385         }
1386         XML_INDENT();
1387
1388         av_bprint_clear(&buf);
1389         printf("<tag key=\"%s\"", xml_escape_str(&buf, tag->key, wctx));
1390         av_bprint_clear(&buf);
1391         printf(" value=\"%s\"/>\n", xml_escape_str(&buf, tag->value, wctx));
1392     }
1393     av_bprint_finalize(&buf, NULL);
1394     xml->indent_level--;
1395 }
1396
1397 static Writer xml_writer = {
1398     .name                 = "xml",
1399     .priv_size            = sizeof(XMLContext),
1400     .init                 = xml_init,
1401     .print_header         = xml_print_header,
1402     .print_footer         = xml_print_footer,
1403     .print_chapter_header = xml_print_chapter_header,
1404     .print_chapter_footer = xml_print_chapter_footer,
1405     .print_section_header = xml_print_section_header,
1406     .print_section_footer = xml_print_section_footer,
1407     .print_integer        = xml_print_int,
1408     .print_string         = xml_print_str,
1409     .show_tags            = xml_show_tags,
1410     .flags = WRITER_FLAG_PUT_PACKETS_AND_FRAMES_IN_SAME_CHAPTER,
1411     .priv_class           = &xml_class,
1412 };
1413
1414 static void writer_register_all(void)
1415 {
1416     static int initialized;
1417
1418     if (initialized)
1419         return;
1420     initialized = 1;
1421
1422     writer_register(&default_writer);
1423     writer_register(&compact_writer);
1424     writer_register(&csv_writer);
1425     writer_register(&flat_writer);
1426     writer_register(&ini_writer);
1427     writer_register(&json_writer);
1428     writer_register(&xml_writer);
1429 }
1430
1431 #define print_fmt(k, f, ...) do {              \
1432     av_bprint_clear(&pbuf);                    \
1433     av_bprintf(&pbuf, f, __VA_ARGS__);         \
1434     writer_print_string(w, k, pbuf.str, 0);    \
1435 } while (0)
1436
1437 #define print_int(k, v)         writer_print_integer(w, k, v)
1438 #define print_q(k, v, s)        writer_print_rational(w, k, v, s)
1439 #define print_str(k, v)         writer_print_string(w, k, v, 0)
1440 #define print_str_opt(k, v)     writer_print_string(w, k, v, 1)
1441 #define print_time(k, v, tb)    writer_print_time(w, k, v, tb, 0)
1442 #define print_ts(k, v)          writer_print_ts(w, k, v, 0)
1443 #define print_duration_time(k, v, tb) writer_print_time(w, k, v, tb, 1)
1444 #define print_duration_ts(k, v)       writer_print_ts(w, k, v, 1)
1445 #define print_val(k, v, u)      writer_print_string(w, k, \
1446     value_string(val_str, sizeof(val_str), (struct unit_value){.val.i = v, .unit=u}), 0)
1447 #define print_section_header(s) writer_print_section_header(w, s)
1448 #define print_section_footer(s) writer_print_section_footer(w, s)
1449 #define show_tags(metadata)     writer_show_tags(w, metadata)
1450
1451 static void show_packet(WriterContext *w, AVFormatContext *fmt_ctx, AVPacket *pkt, int packet_idx)
1452 {
1453     char val_str[128];
1454     AVStream *st = fmt_ctx->streams[pkt->stream_index];
1455     AVBPrint pbuf;
1456     const char *s;
1457
1458     av_bprint_init(&pbuf, 1, AV_BPRINT_SIZE_UNLIMITED);
1459
1460     print_section_header("packet");
1461     s = av_get_media_type_string(st->codec->codec_type);
1462     if (s) print_str    ("codec_type", s);
1463     else   print_str_opt("codec_type", "unknown");
1464     print_int("stream_index",     pkt->stream_index);
1465     print_ts  ("pts",             pkt->pts);
1466     print_time("pts_time",        pkt->pts, &st->time_base);
1467     print_ts  ("dts",             pkt->dts);
1468     print_time("dts_time",        pkt->dts, &st->time_base);
1469     print_duration_ts("duration",        pkt->duration);
1470     print_duration_time("duration_time", pkt->duration, &st->time_base);
1471     print_duration_ts("convergence_duration", pkt->convergence_duration);
1472     print_duration_time("convergence_duration_time", pkt->convergence_duration, &st->time_base);
1473     print_val("size",             pkt->size, unit_byte_str);
1474     if (pkt->pos != -1) print_fmt    ("pos", "%"PRId64, pkt->pos);
1475     else                print_str_opt("pos", "N/A");
1476     print_fmt("flags", "%c",      pkt->flags & AV_PKT_FLAG_KEY ? 'K' : '_');
1477     if (do_show_data)
1478         writer_print_data(w, "data", pkt->data, pkt->size);
1479     print_section_footer("packet");
1480
1481     av_bprint_finalize(&pbuf, NULL);
1482     fflush(stdout);
1483 }
1484
1485 static void show_frame(WriterContext *w, AVFrame *frame, AVStream *stream,
1486                        AVFormatContext *fmt_ctx)
1487 {
1488     AVBPrint pbuf;
1489     const char *s;
1490
1491     av_bprint_init(&pbuf, 1, AV_BPRINT_SIZE_UNLIMITED);
1492
1493     print_section_header("frame");
1494
1495     s = av_get_media_type_string(stream->codec->codec_type);
1496     if (s) print_str    ("media_type", s);
1497     else   print_str_opt("media_type", "unknown");
1498     print_int("key_frame",              frame->key_frame);
1499     print_ts  ("pkt_pts",               frame->pkt_pts);
1500     print_time("pkt_pts_time",          frame->pkt_pts, &stream->time_base);
1501     print_ts  ("pkt_dts",               frame->pkt_dts);
1502     print_time("pkt_dts_time",          frame->pkt_dts, &stream->time_base);
1503     print_duration_ts  ("pkt_duration",      frame->pkt_duration);
1504     print_duration_time("pkt_duration_time", frame->pkt_duration, &stream->time_base);
1505     if (frame->pkt_pos != -1) print_fmt    ("pkt_pos", "%"PRId64, frame->pkt_pos);
1506     else                      print_str_opt("pkt_pos", "N/A");
1507
1508     switch (stream->codec->codec_type) {
1509         AVRational sar;
1510
1511     case AVMEDIA_TYPE_VIDEO:
1512         print_int("width",                  frame->width);
1513         print_int("height",                 frame->height);
1514         s = av_get_pix_fmt_name(frame->format);
1515         if (s) print_str    ("pix_fmt", s);
1516         else   print_str_opt("pix_fmt", "unknown");
1517         sar = av_guess_sample_aspect_ratio(fmt_ctx, stream, frame);
1518         if (sar.num) {
1519             print_q("sample_aspect_ratio", sar, ':');
1520         } else {
1521             print_str_opt("sample_aspect_ratio", "N/A");
1522         }
1523         print_fmt("pict_type",              "%c", av_get_picture_type_char(frame->pict_type));
1524         print_int("coded_picture_number",   frame->coded_picture_number);
1525         print_int("display_picture_number", frame->display_picture_number);
1526         print_int("interlaced_frame",       frame->interlaced_frame);
1527         print_int("top_field_first",        frame->top_field_first);
1528         print_int("repeat_pict",            frame->repeat_pict);
1529         print_int("reference",              frame->reference);
1530         break;
1531
1532     case AVMEDIA_TYPE_AUDIO:
1533         s = av_get_sample_fmt_name(frame->format);
1534         if (s) print_str    ("sample_fmt", s);
1535         else   print_str_opt("sample_fmt", "unknown");
1536         print_int("nb_samples",         frame->nb_samples);
1537         print_int("channels", av_frame_get_channels(frame));
1538         if (av_frame_get_channel_layout(frame)) {
1539             av_bprint_clear(&pbuf);
1540             av_bprint_channel_layout(&pbuf, av_frame_get_channels(frame),
1541                                      av_frame_get_channel_layout(frame));
1542             print_str    ("channel_layout", pbuf.str);
1543         } else
1544             print_str_opt("channel_layout", "unknown");
1545         break;
1546     }
1547     show_tags(av_frame_get_metadata(frame));
1548
1549     print_section_footer("frame");
1550
1551     av_bprint_finalize(&pbuf, NULL);
1552     fflush(stdout);
1553 }
1554
1555 static av_always_inline int process_frame(WriterContext *w,
1556                                           AVFormatContext *fmt_ctx,
1557                                           AVFrame *frame, AVPacket *pkt)
1558 {
1559     AVCodecContext *dec_ctx = fmt_ctx->streams[pkt->stream_index]->codec;
1560     int ret = 0, got_frame = 0;
1561
1562     avcodec_get_frame_defaults(frame);
1563     if (dec_ctx->codec) {
1564         switch (dec_ctx->codec_type) {
1565         case AVMEDIA_TYPE_VIDEO:
1566             ret = avcodec_decode_video2(dec_ctx, frame, &got_frame, pkt);
1567             break;
1568
1569         case AVMEDIA_TYPE_AUDIO:
1570             ret = avcodec_decode_audio4(dec_ctx, frame, &got_frame, pkt);
1571             break;
1572         }
1573     }
1574
1575     if (ret < 0)
1576         return ret;
1577     ret = FFMIN(ret, pkt->size); /* guard against bogus return values */
1578     pkt->data += ret;
1579     pkt->size -= ret;
1580     if (got_frame) {
1581         nb_streams_frames[pkt->stream_index]++;
1582         if (do_show_frames)
1583             show_frame(w, frame, fmt_ctx->streams[pkt->stream_index], fmt_ctx);
1584     }
1585     return got_frame;
1586 }
1587
1588 static void read_packets(WriterContext *w, AVFormatContext *fmt_ctx)
1589 {
1590     AVPacket pkt, pkt1;
1591     AVFrame frame;
1592     int i = 0;
1593
1594     av_init_packet(&pkt);
1595
1596     while (!av_read_frame(fmt_ctx, &pkt)) {
1597         if (do_read_packets) {
1598             if (do_show_packets)
1599                 show_packet(w, fmt_ctx, &pkt, i++);
1600             nb_streams_packets[pkt.stream_index]++;
1601         }
1602         if (do_read_frames) {
1603             pkt1 = pkt;
1604             while (pkt1.size && process_frame(w, fmt_ctx, &frame, &pkt1) > 0);
1605         }
1606         av_free_packet(&pkt);
1607     }
1608     av_init_packet(&pkt);
1609     pkt.data = NULL;
1610     pkt.size = 0;
1611     //Flush remaining frames that are cached in the decoder
1612     for (i = 0; i < fmt_ctx->nb_streams; i++) {
1613         pkt.stream_index = i;
1614         if (do_read_frames)
1615             while (process_frame(w, fmt_ctx, &frame, &pkt) > 0);
1616     }
1617 }
1618
1619 static void show_stream(WriterContext *w, AVFormatContext *fmt_ctx, int stream_idx)
1620 {
1621     AVStream *stream = fmt_ctx->streams[stream_idx];
1622     AVCodecContext *dec_ctx;
1623     const AVCodec *dec;
1624     char val_str[128];
1625     const char *s;
1626     AVRational sar, dar;
1627     AVBPrint pbuf;
1628
1629     av_bprint_init(&pbuf, 1, AV_BPRINT_SIZE_UNLIMITED);
1630
1631     print_section_header("stream");
1632
1633     print_int("index", stream->index);
1634
1635     if ((dec_ctx = stream->codec)) {
1636         const char *profile = NULL;
1637         if ((dec = dec_ctx->codec)) {
1638             print_str("codec_name",      dec->name);
1639             print_str("codec_long_name", dec->long_name);
1640         } else {
1641             print_str_opt("codec_name",      "unknown");
1642             print_str_opt("codec_long_name", "unknown");
1643         }
1644
1645         if (dec && (profile = av_get_profile_name(dec, dec_ctx->profile)))
1646             print_str("profile", profile);
1647         else
1648             print_str_opt("profile", "unknown");
1649
1650         s = av_get_media_type_string(dec_ctx->codec_type);
1651         if (s) print_str    ("codec_type", s);
1652         else   print_str_opt("codec_type", "unknown");
1653         print_q("codec_time_base", dec_ctx->time_base, '/');
1654
1655         /* print AVI/FourCC tag */
1656         av_get_codec_tag_string(val_str, sizeof(val_str), dec_ctx->codec_tag);
1657         print_str("codec_tag_string",    val_str);
1658         print_fmt("codec_tag", "0x%04x", dec_ctx->codec_tag);
1659
1660         switch (dec_ctx->codec_type) {
1661         case AVMEDIA_TYPE_VIDEO:
1662             print_int("width",        dec_ctx->width);
1663             print_int("height",       dec_ctx->height);
1664             print_int("has_b_frames", dec_ctx->has_b_frames);
1665             sar = av_guess_sample_aspect_ratio(fmt_ctx, stream, NULL);
1666             if (sar.den) {
1667                 print_q("sample_aspect_ratio", sar, ':');
1668                 av_reduce(&dar.num, &dar.den,
1669                           dec_ctx->width  * sar.num,
1670                           dec_ctx->height * sar.den,
1671                           1024*1024);
1672                 print_q("display_aspect_ratio", dar, ':');
1673             } else {
1674                 print_str_opt("sample_aspect_ratio", "N/A");
1675                 print_str_opt("display_aspect_ratio", "N/A");
1676             }
1677             s = av_get_pix_fmt_name(dec_ctx->pix_fmt);
1678             if (s) print_str    ("pix_fmt", s);
1679             else   print_str_opt("pix_fmt", "unknown");
1680             print_int("level",   dec_ctx->level);
1681             if (dec_ctx->timecode_frame_start >= 0) {
1682                 char tcbuf[AV_TIMECODE_STR_SIZE];
1683                 av_timecode_make_mpeg_tc_string(tcbuf, dec_ctx->timecode_frame_start);
1684                 print_str("timecode", tcbuf);
1685             } else {
1686                 print_str_opt("timecode", "N/A");
1687             }
1688             break;
1689
1690         case AVMEDIA_TYPE_AUDIO:
1691             s = av_get_sample_fmt_name(dec_ctx->sample_fmt);
1692             if (s) print_str    ("sample_fmt", s);
1693             else   print_str_opt("sample_fmt", "unknown");
1694             print_val("sample_rate",     dec_ctx->sample_rate, unit_hertz_str);
1695             print_int("channels",        dec_ctx->channels);
1696             print_int("bits_per_sample", av_get_bits_per_sample(dec_ctx->codec_id));
1697             break;
1698         }
1699     } else {
1700         print_str_opt("codec_type", "unknown");
1701     }
1702     if (dec_ctx->codec && dec_ctx->codec->priv_class && show_private_data) {
1703         const AVOption *opt = NULL;
1704         while (opt = av_opt_next(dec_ctx->priv_data,opt)) {
1705             uint8_t *str;
1706             if (opt->flags) continue;
1707             if (av_opt_get(dec_ctx->priv_data, opt->name, 0, &str) >= 0) {
1708                 print_str(opt->name, str);
1709                 av_free(str);
1710             }
1711         }
1712     }
1713
1714     if (fmt_ctx->iformat->flags & AVFMT_SHOW_IDS) print_fmt    ("id", "0x%x", stream->id);
1715     else                                          print_str_opt("id", "N/A");
1716     print_q("r_frame_rate",   stream->r_frame_rate,   '/');
1717     print_q("avg_frame_rate", stream->avg_frame_rate, '/');
1718     print_q("time_base",      stream->time_base,      '/');
1719     print_ts  ("start_pts",   stream->start_time);
1720     print_time("start_time",  stream->start_time, &stream->time_base);
1721     print_ts  ("duration_ts", stream->duration);
1722     print_time("duration",    stream->duration, &stream->time_base);
1723     if (dec_ctx->bit_rate > 0) print_val    ("bit_rate", dec_ctx->bit_rate, unit_bit_per_second_str);
1724     else                       print_str_opt("bit_rate", "N/A");
1725     if (stream->nb_frames) print_fmt    ("nb_frames", "%"PRId64, stream->nb_frames);
1726     else                   print_str_opt("nb_frames", "N/A");
1727     if (nb_streams_frames[stream_idx])  print_fmt    ("nb_read_frames", "%"PRIu64, nb_streams_frames[stream_idx]);
1728     else                                print_str_opt("nb_read_frames", "N/A");
1729     if (nb_streams_packets[stream_idx]) print_fmt    ("nb_read_packets", "%"PRIu64, nb_streams_packets[stream_idx]);
1730     else                                print_str_opt("nb_read_packets", "N/A");
1731     if (do_show_data)
1732         writer_print_data(w, "extradata", dec_ctx->extradata,
1733                                           dec_ctx->extradata_size);
1734     show_tags(stream->metadata);
1735
1736     print_section_footer("stream");
1737     av_bprint_finalize(&pbuf, NULL);
1738     fflush(stdout);
1739 }
1740
1741 static void show_streams(WriterContext *w, AVFormatContext *fmt_ctx)
1742 {
1743     int i;
1744     for (i = 0; i < fmt_ctx->nb_streams; i++)
1745         show_stream(w, fmt_ctx, i);
1746 }
1747
1748 static void show_format(WriterContext *w, AVFormatContext *fmt_ctx)
1749 {
1750     char val_str[128];
1751     int64_t size = fmt_ctx->pb ? avio_size(fmt_ctx->pb) : -1;
1752
1753     print_section_header("format");
1754     print_str("filename",         fmt_ctx->filename);
1755     print_int("nb_streams",       fmt_ctx->nb_streams);
1756     print_str("format_name",      fmt_ctx->iformat->name);
1757     print_str("format_long_name", fmt_ctx->iformat->long_name);
1758     print_time("start_time",      fmt_ctx->start_time, &AV_TIME_BASE_Q);
1759     print_time("duration",        fmt_ctx->duration,   &AV_TIME_BASE_Q);
1760     if (size >= 0) print_val    ("size", size, unit_byte_str);
1761     else           print_str_opt("size", "N/A");
1762     if (fmt_ctx->bit_rate > 0) print_val    ("bit_rate", fmt_ctx->bit_rate, unit_bit_per_second_str);
1763     else                       print_str_opt("bit_rate", "N/A");
1764     show_tags(fmt_ctx->metadata);
1765     print_section_footer("format");
1766     fflush(stdout);
1767 }
1768
1769 static void show_error(WriterContext *w, int err)
1770 {
1771     char errbuf[128];
1772     const char *errbuf_ptr = errbuf;
1773
1774     if (av_strerror(err, errbuf, sizeof(errbuf)) < 0)
1775         errbuf_ptr = strerror(AVUNERROR(err));
1776
1777     writer_print_chapter_header(w, "error");
1778     print_section_header("error");
1779     print_int("code", err);
1780     print_str("string", errbuf_ptr);
1781     print_section_footer("error");
1782     writer_print_chapter_footer(w, "error");
1783 }
1784
1785 static int open_input_file(AVFormatContext **fmt_ctx_ptr, const char *filename)
1786 {
1787     int err, i;
1788     AVFormatContext *fmt_ctx = NULL;
1789     AVDictionaryEntry *t;
1790
1791     if ((err = avformat_open_input(&fmt_ctx, filename,
1792                                    iformat, &format_opts)) < 0) {
1793         print_error(filename, err);
1794         return err;
1795     }
1796     if ((t = av_dict_get(format_opts, "", NULL, AV_DICT_IGNORE_SUFFIX))) {
1797         av_log(NULL, AV_LOG_ERROR, "Option %s not found.\n", t->key);
1798         return AVERROR_OPTION_NOT_FOUND;
1799     }
1800
1801
1802     /* fill the streams in the format context */
1803     if ((err = avformat_find_stream_info(fmt_ctx, NULL)) < 0) {
1804         print_error(filename, err);
1805         return err;
1806     }
1807
1808     av_dump_format(fmt_ctx, 0, filename, 0);
1809
1810     /* bind a decoder to each input stream */
1811     for (i = 0; i < fmt_ctx->nb_streams; i++) {
1812         AVStream *stream = fmt_ctx->streams[i];
1813         AVCodec *codec;
1814
1815         if (stream->codec->codec_id == AV_CODEC_ID_PROBE) {
1816             av_log(NULL, AV_LOG_ERROR,
1817                    "Failed to probe codec for input stream %d\n",
1818                     stream->index);
1819         } else if (!(codec = avcodec_find_decoder(stream->codec->codec_id))) {
1820             av_log(NULL, AV_LOG_ERROR,
1821                     "Unsupported codec with id %d for input stream %d\n",
1822                     stream->codec->codec_id, stream->index);
1823         } else if (avcodec_open2(stream->codec, codec, NULL) < 0) {
1824             av_log(NULL, AV_LOG_ERROR, "Error while opening codec for input stream %d\n",
1825                    stream->index);
1826         }
1827     }
1828
1829     *fmt_ctx_ptr = fmt_ctx;
1830     return 0;
1831 }
1832
1833 static void close_input_file(AVFormatContext **ctx_ptr)
1834 {
1835     int i;
1836     AVFormatContext *fmt_ctx = *ctx_ptr;
1837
1838     /* close decoder for each stream */
1839     for (i = 0; i < fmt_ctx->nb_streams; i++)
1840         if (fmt_ctx->streams[i]->codec->codec_id != AV_CODEC_ID_NONE)
1841             avcodec_close(fmt_ctx->streams[i]->codec);
1842
1843     avformat_close_input(ctx_ptr);
1844 }
1845
1846 #define PRINT_CHAPTER(name) do {                                        \
1847     if (do_show_ ## name) {                                             \
1848         writer_print_chapter_header(wctx, #name);                       \
1849         show_ ## name (wctx, fmt_ctx);                                  \
1850         writer_print_chapter_footer(wctx, #name);                       \
1851     }                                                                   \
1852 } while (0)
1853
1854 static int probe_file(WriterContext *wctx, const char *filename)
1855 {
1856     AVFormatContext *fmt_ctx;
1857     int ret;
1858
1859     do_read_frames = do_show_frames || do_count_frames;
1860     do_read_packets = do_show_packets || do_count_packets;
1861
1862     ret = open_input_file(&fmt_ctx, filename);
1863     if (ret >= 0) {
1864         nb_streams_frames  = av_calloc(fmt_ctx->nb_streams, sizeof(*nb_streams_frames));
1865         nb_streams_packets = av_calloc(fmt_ctx->nb_streams, sizeof(*nb_streams_packets));
1866         if (do_read_frames || do_read_packets) {
1867             const char *chapter;
1868             if (do_show_frames && do_show_packets &&
1869                 wctx->writer->flags & WRITER_FLAG_PUT_PACKETS_AND_FRAMES_IN_SAME_CHAPTER)
1870                 chapter = "packets_and_frames";
1871             else if (do_show_packets && !do_show_frames)
1872                 chapter = "packets";
1873             else // (!do_show_packets && do_show_frames)
1874                 chapter = "frames";
1875             if (do_show_frames || do_show_packets)
1876                 writer_print_chapter_header(wctx, chapter);
1877             read_packets(wctx, fmt_ctx);
1878             if (do_show_frames || do_show_packets)
1879                 writer_print_chapter_footer(wctx, chapter);
1880         }
1881         PRINT_CHAPTER(streams);
1882         PRINT_CHAPTER(format);
1883         close_input_file(&fmt_ctx);
1884         av_freep(&nb_streams_frames);
1885         av_freep(&nb_streams_packets);
1886     }
1887     return ret;
1888 }
1889
1890 static void show_usage(void)
1891 {
1892     av_log(NULL, AV_LOG_INFO, "Simple multimedia streams analyzer\n");
1893     av_log(NULL, AV_LOG_INFO, "usage: %s [OPTIONS] [INPUT_FILE]\n", program_name);
1894     av_log(NULL, AV_LOG_INFO, "\n");
1895 }
1896
1897 static void ffprobe_show_program_version(WriterContext *w)
1898 {
1899     AVBPrint pbuf;
1900     av_bprint_init(&pbuf, 1, AV_BPRINT_SIZE_UNLIMITED);
1901
1902     writer_print_chapter_header(w, "program_version");
1903     print_section_header("program_version");
1904     print_str("version", FFMPEG_VERSION);
1905     print_fmt("copyright", "Copyright (c) %d-%d the FFmpeg developers",
1906               program_birth_year, this_year);
1907     print_str("build_date", __DATE__);
1908     print_str("build_time", __TIME__);
1909     print_str("compiler_ident", CC_IDENT);
1910     print_str("configuration", FFMPEG_CONFIGURATION);
1911     print_section_footer("program_version");
1912     writer_print_chapter_footer(w, "program_version");
1913
1914     av_bprint_finalize(&pbuf, NULL);
1915 }
1916
1917 #define SHOW_LIB_VERSION(libname, LIBNAME)                              \
1918     do {                                                                \
1919         if (CONFIG_##LIBNAME) {                                         \
1920             unsigned int version = libname##_version();                 \
1921             print_section_header("library_version");                    \
1922             print_str("name",    "lib" #libname);                       \
1923             print_int("major",   LIB##LIBNAME##_VERSION_MAJOR);         \
1924             print_int("minor",   LIB##LIBNAME##_VERSION_MINOR);         \
1925             print_int("micro",   LIB##LIBNAME##_VERSION_MICRO);         \
1926             print_int("version", version);                              \
1927             print_section_footer("library_version");                    \
1928         }                                                               \
1929     } while (0)
1930
1931 static void ffprobe_show_library_versions(WriterContext *w)
1932 {
1933     writer_print_chapter_header(w, "library_versions");
1934     SHOW_LIB_VERSION(avutil,     AVUTIL);
1935     SHOW_LIB_VERSION(avcodec,    AVCODEC);
1936     SHOW_LIB_VERSION(avformat,   AVFORMAT);
1937     SHOW_LIB_VERSION(avdevice,   AVDEVICE);
1938     SHOW_LIB_VERSION(avfilter,   AVFILTER);
1939     SHOW_LIB_VERSION(swscale,    SWSCALE);
1940     SHOW_LIB_VERSION(swresample, SWRESAMPLE);
1941     SHOW_LIB_VERSION(postproc,   POSTPROC);
1942     writer_print_chapter_footer(w, "library_versions");
1943 }
1944
1945 static int opt_format(void *optctx, const char *opt, const char *arg)
1946 {
1947     iformat = av_find_input_format(arg);
1948     if (!iformat) {
1949         av_log(NULL, AV_LOG_ERROR, "Unknown input format: %s\n", arg);
1950         return AVERROR(EINVAL);
1951     }
1952     return 0;
1953 }
1954
1955 static int opt_show_format_entry(void *optctx, const char *opt, const char *arg)
1956 {
1957     do_show_format = 1;
1958     av_dict_set(&fmt_entries_to_show, arg, "", 0);
1959     return 0;
1960 }
1961
1962 static void opt_input_file(void *optctx, const char *arg)
1963 {
1964     if (input_filename) {
1965         av_log(NULL, AV_LOG_ERROR,
1966                 "Argument '%s' provided as input filename, but '%s' was already specified.\n",
1967                 arg, input_filename);
1968         exit(1);
1969     }
1970     if (!strcmp(arg, "-"))
1971         arg = "pipe:";
1972     input_filename = arg;
1973 }
1974
1975 static int opt_input_file_i(void *optctx, const char *opt, const char *arg)
1976 {
1977     opt_input_file(optctx, arg);
1978     return 0;
1979 }
1980
1981 void show_help_default(const char *opt, const char *arg)
1982 {
1983     av_log_set_callback(log_callback_help);
1984     show_usage();
1985     show_help_options(options, "Main options:", 0, 0, 0);
1986     printf("\n");
1987
1988     show_help_children(avformat_get_class(), AV_OPT_FLAG_DECODING_PARAM);
1989 }
1990
1991 static int opt_pretty(void *optctx, const char *opt, const char *arg)
1992 {
1993     show_value_unit              = 1;
1994     use_value_prefix             = 1;
1995     use_byte_value_binary_prefix = 1;
1996     use_value_sexagesimal_format = 1;
1997     return 0;
1998 }
1999
2000 static int opt_show_versions(const char *opt, const char *arg)
2001 {
2002     do_show_program_version  = 1;
2003     do_show_library_versions = 1;
2004     return 0;
2005 }
2006
2007 static const OptionDef real_options[] = {
2008 #include "cmdutils_common_opts.h"
2009     { "f", HAS_ARG, {.func_arg = opt_format}, "force format", "format" },
2010     { "unit", OPT_BOOL, {&show_value_unit}, "show unit of the displayed values" },
2011     { "prefix", OPT_BOOL, {&use_value_prefix}, "use SI prefixes for the displayed values" },
2012     { "byte_binary_prefix", OPT_BOOL, {&use_byte_value_binary_prefix},
2013       "use binary prefixes for byte units" },
2014     { "sexagesimal", OPT_BOOL,  {&use_value_sexagesimal_format},
2015       "use sexagesimal format HOURS:MM:SS.MICROSECONDS for time units" },
2016     { "pretty", 0, {.func_arg = opt_pretty},
2017       "prettify the format of displayed values, make it more human readable" },
2018     { "print_format", OPT_STRING | HAS_ARG, {(void*)&print_format},
2019       "set the output printing format (available formats are: default, compact, csv, flat, ini, json, xml)", "format" },
2020     { "of", OPT_STRING | HAS_ARG, {(void*)&print_format}, "alias for -print_format", "format" },
2021     { "show_data",    OPT_BOOL, {(void*)&do_show_data}, "show packets data" },
2022     { "show_error",   OPT_BOOL, {(void*)&do_show_error} ,  "show probing error" },
2023     { "show_format",  OPT_BOOL, {&do_show_format} , "show format/container info" },
2024     { "show_frames",  OPT_BOOL, {(void*)&do_show_frames} , "show frames info" },
2025     { "show_format_entry", HAS_ARG, {.func_arg = opt_show_format_entry},
2026       "show a particular entry from the format/container info", "entry" },
2027     { "show_packets", OPT_BOOL, {&do_show_packets}, "show packets info" },
2028     { "show_streams", OPT_BOOL, {&do_show_streams}, "show streams info" },
2029     { "count_frames", OPT_BOOL, {(void*)&do_count_frames}, "count the number of frames per stream" },
2030     { "count_packets", OPT_BOOL, {(void*)&do_count_packets}, "count the number of packets per stream" },
2031     { "show_program_version",  OPT_BOOL, {(void*)&do_show_program_version},  "show ffprobe version" },
2032     { "show_library_versions", OPT_BOOL, {(void*)&do_show_library_versions}, "show library versions" },
2033     { "show_versions",         0, {(void*)&opt_show_versions}, "show program and library versions" },
2034     { "show_private_data", OPT_BOOL, {(void*)&show_private_data}, "show private data" },
2035     { "private",           OPT_BOOL, {(void*)&show_private_data}, "same as show_private_data" },
2036     { "default", HAS_ARG | OPT_AUDIO | OPT_VIDEO | OPT_EXPERT, {.func_arg = opt_default}, "generic catch all option", "" },
2037     { "i", HAS_ARG, {.func_arg = opt_input_file_i}, "read specified file", "input_file"},
2038     { NULL, },
2039 };
2040
2041 int main(int argc, char **argv)
2042 {
2043     const Writer *w;
2044     WriterContext *wctx;
2045     char *buf;
2046     char *w_name = NULL, *w_args = NULL;
2047     int ret;
2048
2049     av_log_set_flags(AV_LOG_SKIP_REPEATED);
2050     options = real_options;
2051     parse_loglevel(argc, argv, options);
2052     av_register_all();
2053     avformat_network_init();
2054     init_opts();
2055 #if CONFIG_AVDEVICE
2056     avdevice_register_all();
2057 #endif
2058
2059     show_banner(argc, argv, options);
2060     parse_options(NULL, argc, argv, options, opt_input_file);
2061
2062     writer_register_all();
2063
2064     if (!print_format)
2065         print_format = av_strdup("default");
2066     w_name = av_strtok(print_format, "=", &buf);
2067     w_args = buf;
2068
2069     w = writer_get_by_name(w_name);
2070     if (!w) {
2071         av_log(NULL, AV_LOG_ERROR, "Unknown output format with name '%s'\n", w_name);
2072         ret = AVERROR(EINVAL);
2073         goto end;
2074     }
2075
2076     if ((ret = writer_open(&wctx, w, w_args, NULL)) >= 0) {
2077         writer_print_header(wctx);
2078
2079         if (do_show_program_version)
2080             ffprobe_show_program_version(wctx);
2081         if (do_show_library_versions)
2082             ffprobe_show_library_versions(wctx);
2083
2084         if (!input_filename &&
2085             ((do_show_format || do_show_streams || do_show_packets || do_show_error) ||
2086              (!do_show_program_version && !do_show_library_versions))) {
2087             show_usage();
2088             av_log(NULL, AV_LOG_ERROR, "You have to specify one input file.\n");
2089             av_log(NULL, AV_LOG_ERROR, "Use -h to get full help or, even better, run 'man %s'.\n", program_name);
2090             ret = AVERROR(EINVAL);
2091         } else if (input_filename) {
2092             ret = probe_file(wctx, input_filename);
2093             if (ret < 0 && do_show_error)
2094                 show_error(wctx, ret);
2095         }
2096
2097         writer_print_footer(wctx);
2098         writer_close(&wctx);
2099     }
2100
2101 end:
2102     av_freep(&print_format);
2103
2104     uninit_opts();
2105     av_dict_free(&fmt_entries_to_show);
2106
2107     avformat_network_deinit();
2108
2109     return ret;
2110 }