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