Make Libgcrypt a mandatory dependency
[metze/wireshark/wip.git] / capinfos.c
1 /* capinfos.c
2  * Reports capture file information including # of packets, duration, others
3  *
4  * Copyright 2004 Ian Schorr
5  *
6  * Wireshark - Network traffic analyzer
7  * By Gerald Combs <gerald@wireshark.org>
8  * Copyright 1998 Gerald Combs
9  *
10  * This program is free software; you can redistribute it and/or
11  * modify it under the terms of the GNU General Public License
12  * as published by the Free Software Foundation; either version 2
13  * of the License, or (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public License
21  * along with this program; if not, write to the Free Software
22  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
23  */
24
25 /*
26  * 2009-09-19: jyoung
27  *
28  * New capinfos features
29  *
30  * Continue processing additional files after
31  * a wiretap open failure.  The new -C option
32  * reverts to capinfos' original behavior which
33  * is to cancel any further file processing at
34  * first file open failure.
35  *
36  * Change the behavior of how the default display
37  * of all infos is initiated.  This gets rid of a
38  * special post getopt() argument count test.
39  *
40  * Add new table output format (with related options)
41  * This feature allows outputting the various infos
42  * into a tab delimited text file, or to a comma
43  * separated variables file (*.csv) instead of the
44  * original "long" format.
45  *
46  * 2011-04-05: wmeier
47  * behaviour changed: Upon exit capinfos will return
48  *  an error status if an error occurred at any
49  *  point during "continuous" file processing.
50  *  (Previously a success status was always
51  *   returned if the -C option was not used).
52  *
53
54  */
55
56
57 #include <config.h>
58
59 #include <stdio.h>
60 #include <stdlib.h>
61 #include <string.h>
62 #include <stdarg.h>
63 #include <locale.h>
64 #include <errno.h>
65
66 #ifdef HAVE_GETOPT_H
67 #include <getopt.h>
68 #endif
69
70 #include <glib.h>
71
72 #include <wiretap/wtap.h>
73
74 #include <wsutil/crash_info.h>
75 #include <wsutil/filesystem.h>
76 #include <wsutil/privileges.h>
77 #include <ws_version_info.h>
78 #include <wiretap/wtap_opttypes.h>
79
80 #ifdef HAVE_PLUGINS
81 #include <wsutil/plugins.h>
82 #endif
83
84 #include <wsutil/report_err.h>
85 #include <wsutil/str_util.h>
86 #include <wsutil/file_util.h>
87
88 #include <wsutil/wsgcrypt.h>
89
90 #ifndef HAVE_GETOPT_LONG
91 #include "wsutil/wsgetopt.h"
92 #endif
93
94 #ifdef _WIN32
95 #include <wsutil/unicode-utils.h>
96 #endif /* _WIN32 */
97
98 /*
99  * By default capinfos now continues processing
100  * the next filename if and when wiretap detects
101  * a problem opening a file.
102  * Use the '-C' option to revert back to original
103  * capinfos behavior which is to abort any
104  * additional file processing at first open file
105  * failure.
106  */
107
108 static gboolean continue_after_wtap_open_offline_failure = TRUE;
109
110 /*
111  * table report variables
112  */
113
114 static gboolean long_report        = TRUE;  /* By default generate long report       */
115 static gchar table_report_header   = TRUE;  /* Generate column header by default     */
116 static gchar field_separator       = '\t';  /* Use TAB as field separator by default */
117 static gchar quote_char            = '\0';  /* Do NOT quote fields by default        */
118 static gboolean machine_readable   = FALSE; /* Display machine-readable numbers      */
119
120 /*
121  * capinfos has the ability to report on a number of
122  * various characteristics ("infos") for each input file.
123  *
124  * By default reporting of all info fields is enabled.
125  *
126  * Optionally the reporting of any specific info field
127  * or combination of info fields can be enabled with
128  * individual options.
129  */
130
131 static gboolean report_all_infos   = TRUE;  /* Report all infos           */
132
133 static gboolean cap_file_type      = TRUE;  /* Report capture type        */
134 static gboolean cap_file_encap     = TRUE;  /* Report encapsulation       */
135 static gboolean cap_snaplen        = TRUE;  /* Packet size limit (snaplen)*/
136 static gboolean cap_packet_count   = TRUE;  /* Report packet count        */
137 static gboolean cap_file_size      = TRUE;  /* Report file size           */
138 static gboolean cap_comment        = TRUE;  /* Display the capture comment */
139 static gboolean cap_file_more_info = TRUE;  /* Report more file info      */
140 static gboolean cap_file_idb       = TRUE;  /* Report Interface info      */
141
142 static gboolean cap_data_size      = TRUE;  /* Report packet byte size    */
143 static gboolean cap_duration       = TRUE;  /* Report capture duration    */
144 static gboolean cap_start_time     = TRUE;  /* Report capture start time  */
145 static gboolean cap_end_time       = TRUE;  /* Report capture end time    */
146 static gboolean time_as_secs       = FALSE; /* Report time values as raw seconds */
147
148 static gboolean cap_data_rate_byte = TRUE;  /* Report data rate bytes/sec */
149 static gboolean cap_data_rate_bit  = TRUE;  /* Report data rate bites/sec */
150 static gboolean cap_packet_size    = TRUE;  /* Report average packet size */
151 static gboolean cap_packet_rate    = TRUE;  /* Report average packet rate */
152 static gboolean cap_order          = TRUE;  /* Report if packets are in chronological order (True/False) */
153
154 static gboolean cap_file_hashes    = TRUE;  /* Calculate file hashes */
155
156 #define HASH_SIZE_SHA1   20
157 #define HASH_SIZE_RMD160 20
158 #define HASH_SIZE_MD5    16
159
160 #define HASH_STR_SIZE (41) /* Max hash size * 2 + '\0' */
161 #define HASH_BUF_SIZE (1024 * 1024)
162
163
164 static gchar file_sha1[HASH_STR_SIZE];
165 static gchar file_rmd160[HASH_STR_SIZE];
166 static gchar file_md5[HASH_STR_SIZE];
167
168 /*
169  * If we have at least two packets with time stamps, and they're not in
170  * order - i.e., the later packet has a time stamp older than the earlier
171  * packet - the time stamps are known not to be in order.
172  *
173  * If every packet has a time stamp, and they're all in order, the time
174  * stamp is known to be in order.
175  *
176  * Otherwise, we have no idea.
177  */
178 typedef enum {
179   IN_ORDER,
180   NOT_IN_ORDER,
181   ORDER_UNKNOWN
182 } order_t;
183
184 typedef struct _capture_info {
185   const char    *filename;
186   guint16        file_type;
187   gboolean       iscompressed;
188   int            file_encap;
189   int            file_tsprec;
190   gint64         filesize;
191   wtap_block_t   shb;
192   guint64        packet_bytes;
193   gboolean       times_known;
194   nstime_t       start_time;
195   int            start_time_tsprec;
196   nstime_t       stop_time;
197   int            stop_time_tsprec;
198   guint32        packet_count;
199   gboolean       snap_set;                /* If set in capture file header      */
200   guint32        snaplen;                 /* value from the capture file header */
201   guint32        snaplen_min_inferred;    /* If caplen < len for 1 or more rcds */
202   guint32        snaplen_max_inferred;    /*  ...                               */
203   gboolean       drops_known;
204   guint32        drop_count;
205
206   nstime_t       duration;
207   int            duration_tsprec;
208   double         packet_rate;
209   double         packet_size;
210   double         data_rate;              /* in bytes */
211   gboolean       know_order;
212   order_t        order;
213
214   int           *encap_counts;           /* array of per_packet encap counts; array has one entry per wtap_encap type */
215
216   guint          num_interfaces;         /* number of IDBs, and thus size of interface_packet_counts array */
217   GArray        *interface_packet_counts;  /* array of per_packet interface_id counts; one entry per file IDB */
218   guint32        pkt_interface_id_unknown; /* counts if packet interface_id didn't match a known one */
219   GArray        *idb_info_strings;       /* array of IDB info strings */
220 } capture_info;
221
222 static char *decimal_point;
223
224 static void
225 enable_all_infos(void)
226 {
227   report_all_infos   = TRUE;
228
229   cap_file_type      = TRUE;
230   cap_file_encap     = TRUE;
231   cap_snaplen        = TRUE;
232   cap_packet_count   = TRUE;
233   cap_file_size      = TRUE;
234   cap_comment        = TRUE;
235   cap_file_more_info = TRUE;
236   cap_file_idb       = TRUE;
237
238   cap_data_size      = TRUE;
239   cap_duration       = TRUE;
240   cap_start_time     = TRUE;
241   cap_end_time       = TRUE;
242   cap_order          = TRUE;
243
244   cap_data_rate_byte = TRUE;
245   cap_data_rate_bit  = TRUE;
246   cap_packet_size    = TRUE;
247   cap_packet_rate    = TRUE;
248
249   cap_file_hashes    = TRUE;
250 }
251
252 static void
253 disable_all_infos(void)
254 {
255   report_all_infos   = FALSE;
256
257   cap_file_type      = FALSE;
258   cap_file_encap     = FALSE;
259   cap_snaplen        = FALSE;
260   cap_packet_count   = FALSE;
261   cap_file_size      = FALSE;
262   cap_comment        = FALSE;
263   cap_file_more_info = FALSE;
264   cap_file_idb       = FALSE;
265
266   cap_data_size      = FALSE;
267   cap_duration       = FALSE;
268   cap_start_time     = FALSE;
269   cap_end_time       = FALSE;
270   cap_order          = FALSE;
271
272   cap_data_rate_byte = FALSE;
273   cap_data_rate_bit  = FALSE;
274   cap_packet_size    = FALSE;
275   cap_packet_rate    = FALSE;
276
277   cap_file_hashes    = FALSE;
278 }
279
280 static const gchar *
281 order_string(order_t order)
282 {
283   switch (order) {
284
285     case IN_ORDER:
286       return "True";
287
288     case NOT_IN_ORDER:
289       return "False";
290
291     case ORDER_UNKNOWN:
292       return "Unknown";
293
294     default:
295       return "???";  /* "cannot happen" (the next step is "Profit!") */
296   }
297 }
298
299 static gchar *
300 absolute_time_string(nstime_t *timer, int tsprecision, capture_info *cf_info)
301 {
302   static gchar  time_string_buf[4+1+2+1+2+1+2+1+2+1+2+1+9+1+1];
303   struct tm *ti_tm;
304
305   if (cf_info->times_known && cf_info->packet_count > 0) {
306     if (time_as_secs) {
307       switch (tsprecision) {
308
309       case WTAP_TSPREC_SEC:
310         g_snprintf(time_string_buf, sizeof time_string_buf,
311                    "%lu",
312                    (unsigned long)timer->secs);
313         break;
314
315       case WTAP_TSPREC_DSEC:
316         g_snprintf(time_string_buf, sizeof time_string_buf,
317                    "%lu%s%01d",
318                    (unsigned long)timer->secs,
319                    decimal_point,
320                    timer->nsecs / 100000000);
321         break;
322
323       case WTAP_TSPREC_CSEC:
324         g_snprintf(time_string_buf, sizeof time_string_buf,
325                    "%lu%s%02d",
326                    (unsigned long)timer->secs,
327                    decimal_point,
328                    timer->nsecs / 10000000);
329         break;
330
331       case WTAP_TSPREC_MSEC:
332         g_snprintf(time_string_buf, sizeof time_string_buf,
333                    "%lu%s%03d",
334                    (unsigned long)timer->secs,
335                    decimal_point,
336                    timer->nsecs / 1000000);
337         break;
338
339       case WTAP_TSPREC_USEC:
340         g_snprintf(time_string_buf, sizeof time_string_buf,
341                    "%lu%s%06d",
342                    (unsigned long)timer->secs,
343                    decimal_point,
344                    timer->nsecs / 1000);
345         break;
346
347       case WTAP_TSPREC_NSEC:
348         g_snprintf(time_string_buf, sizeof time_string_buf,
349                    "%lu%s%09d",
350                    (unsigned long)timer->secs,
351                    decimal_point,
352                    timer->nsecs);
353         break;
354
355       default:
356         g_snprintf(time_string_buf, sizeof time_string_buf,
357                    "Unknown precision %d",
358                    tsprecision);
359         break;
360       }
361       return time_string_buf;
362     } else {
363       ti_tm = localtime(&timer->secs);
364       if (ti_tm == NULL) {
365         g_snprintf(time_string_buf, sizeof time_string_buf, "Not representable");
366         return time_string_buf;
367       }
368       switch (tsprecision) {
369
370       case WTAP_TSPREC_SEC:
371         g_snprintf(time_string_buf, sizeof time_string_buf,
372                    "%04d-%02d-%02d %02d:%02d:%02d",
373                    ti_tm->tm_year + 1900,
374                    ti_tm->tm_mon + 1,
375                    ti_tm->tm_mday,
376                    ti_tm->tm_hour,
377                    ti_tm->tm_min,
378                    ti_tm->tm_sec);
379         break;
380
381       case WTAP_TSPREC_DSEC:
382         g_snprintf(time_string_buf, sizeof time_string_buf,
383                    "%04d-%02d-%02d %02d:%02d:%02d%s%01d",
384                    ti_tm->tm_year + 1900,
385                    ti_tm->tm_mon + 1,
386                    ti_tm->tm_mday,
387                    ti_tm->tm_hour,
388                    ti_tm->tm_min,
389                    ti_tm->tm_sec,
390                    decimal_point,
391                    timer->nsecs / 100000000);
392         break;
393
394       case WTAP_TSPREC_CSEC:
395         g_snprintf(time_string_buf, sizeof time_string_buf,
396                    "%04d-%02d-%02d %02d:%02d:%02d%s%02d",
397                    ti_tm->tm_year + 1900,
398                    ti_tm->tm_mon + 1,
399                    ti_tm->tm_mday,
400                    ti_tm->tm_hour,
401                    ti_tm->tm_min,
402                    ti_tm->tm_sec,
403                    decimal_point,
404                    timer->nsecs / 10000000);
405         break;
406
407       case WTAP_TSPREC_MSEC:
408         g_snprintf(time_string_buf, sizeof time_string_buf,
409                    "%04d-%02d-%02d %02d:%02d:%02d%s%03d",
410                    ti_tm->tm_year + 1900,
411                    ti_tm->tm_mon + 1,
412                    ti_tm->tm_mday,
413                    ti_tm->tm_hour,
414                    ti_tm->tm_min,
415                    ti_tm->tm_sec,
416                    decimal_point,
417                    timer->nsecs / 1000000);
418         break;
419
420       case WTAP_TSPREC_USEC:
421         g_snprintf(time_string_buf, sizeof time_string_buf,
422                    "%04d-%02d-%02d %02d:%02d:%02d%s%06d",
423                    ti_tm->tm_year + 1900,
424                    ti_tm->tm_mon + 1,
425                    ti_tm->tm_mday,
426                    ti_tm->tm_hour,
427                    ti_tm->tm_min,
428                    ti_tm->tm_sec,
429                    decimal_point,
430                    timer->nsecs / 1000);
431         break;
432
433       case WTAP_TSPREC_NSEC:
434         g_snprintf(time_string_buf, sizeof time_string_buf,
435                    "%04d-%02d-%02d %02d:%02d:%02d%s%09d",
436                    ti_tm->tm_year + 1900,
437                    ti_tm->tm_mon + 1,
438                    ti_tm->tm_mday,
439                    ti_tm->tm_hour,
440                    ti_tm->tm_min,
441                    ti_tm->tm_sec,
442                    decimal_point,
443                    timer->nsecs);
444         break;
445
446       default:
447         g_snprintf(time_string_buf, sizeof time_string_buf,
448                    "Unknown precision %d",
449                    tsprecision);
450         break;
451       }
452       return time_string_buf;
453     }
454   }
455
456   g_snprintf(time_string_buf, sizeof time_string_buf, "n/a");
457   return time_string_buf;
458 }
459
460 static gchar *
461 relative_time_string(nstime_t *timer, int tsprecision, capture_info *cf_info, gboolean want_seconds)
462 {
463   const gchar  *second = want_seconds ? " second" : "";
464   const gchar  *plural = want_seconds ? "s" : "";
465   static gchar  time_string_buf[4+1+2+1+2+1+2+1+2+1+2+1+1];
466
467   if (cf_info->times_known && cf_info->packet_count > 0) {
468     switch (tsprecision) {
469
470     case WTAP_TSPREC_SEC:
471       g_snprintf(time_string_buf, sizeof time_string_buf,
472                  "%lu%s%s",
473                  (unsigned long)timer->secs,
474                  second,
475                  timer->secs == 1 ? "" : plural);
476       break;
477
478     case WTAP_TSPREC_DSEC:
479       g_snprintf(time_string_buf, sizeof time_string_buf,
480                  "%lu%s%01d%s%s",
481                  (unsigned long)timer->secs,
482                  decimal_point,
483                  timer->nsecs / 100000000,
484                  second,
485                  (timer->secs == 1 && timer->nsecs == 0) ? "" : plural);
486       break;
487
488     case WTAP_TSPREC_CSEC:
489       g_snprintf(time_string_buf, sizeof time_string_buf,
490                  "%lu%s%02d%s%s",
491                  (unsigned long)timer->secs,
492                  decimal_point,
493                  timer->nsecs / 10000000,
494                  second,
495                  (timer->secs == 1 && timer->nsecs == 0) ? "" : plural);
496       break;
497
498     case WTAP_TSPREC_MSEC:
499       g_snprintf(time_string_buf, sizeof time_string_buf,
500                  "%lu%s%03d%s%s",
501                  (unsigned long)timer->secs,
502                  decimal_point,
503                  timer->nsecs / 1000000,
504                  second,
505                  (timer->secs == 1 && timer->nsecs == 0) ? "" : plural);
506       break;
507
508     case WTAP_TSPREC_USEC:
509       g_snprintf(time_string_buf, sizeof time_string_buf,
510                  "%lu%s%06d%s%s",
511                  (unsigned long)timer->secs,
512                  decimal_point,
513                  timer->nsecs / 1000,
514                  second,
515                  (timer->secs == 1 && timer->nsecs == 0) ? "" : plural);
516       break;
517
518     case WTAP_TSPREC_NSEC:
519       g_snprintf(time_string_buf, sizeof time_string_buf,
520                  "%lu%s%09d%s%s",
521                  (unsigned long)timer->secs,
522                  decimal_point,
523                  timer->nsecs,
524                  second,
525                  (timer->secs == 1 && timer->nsecs == 0) ? "" : plural);
526       break;
527
528     default:
529       g_snprintf(time_string_buf, sizeof time_string_buf,
530                  "Unknown precision %d",
531                  tsprecision);
532       break;
533     }
534     return time_string_buf;
535   }
536
537   g_snprintf(time_string_buf, sizeof time_string_buf, "n/a");
538   return time_string_buf;
539 }
540
541 static void print_value(const gchar *text_p1, gint width, const gchar *text_p2, double value) {
542   if (value > 0.0)
543     printf("%s%.*f%s\n", text_p1, width, value, text_p2);
544   else
545     printf("%sn/a\n", text_p1);
546 }
547
548 /* multi-line comments would conflict with the formatting that capinfos uses
549    we replace linefeeds with spaces */
550 static void
551 string_replace_newlines(gchar *str)
552 {
553   gchar *p;
554
555   if (str) {
556     p = str;
557     while (*p != '\0') {
558       if (*p == '\n')
559         *p = ' ';
560       if (*p == '\r')
561         *p = ' ';
562       p++;
563     }
564   }
565 }
566
567 static void
568 show_option_string(const char *prefix, const char *option_str)
569 {
570   char *str;
571
572   if (option_str != NULL && option_str[0] != '\0') {
573     str = g_strdup(option_str);
574     string_replace_newlines(str);
575     printf("%s%s\n", prefix, str);
576     g_free(str);
577   }
578 }
579
580 static void
581 print_stats(const gchar *filename, capture_info *cf_info)
582 {
583   const gchar           *file_type_string, *file_encap_string;
584   gchar                 *size_string;
585
586   /* Build printable strings for various stats */
587   file_type_string = wtap_file_type_subtype_string(cf_info->file_type);
588   file_encap_string = wtap_encap_string(cf_info->file_encap);
589
590   if (filename)           printf     ("File name:           %s\n", filename);
591   if (cap_file_type)      printf     ("File type:           %s%s\n",
592       file_type_string,
593       cf_info->iscompressed ? " (gzip compressed)" : "");
594
595   if (cap_file_encap) {
596     printf      ("File encapsulation:  %s\n", file_encap_string);
597     if (cf_info->file_encap == WTAP_ENCAP_PER_PACKET) {
598       int i;
599       printf    ("Encapsulation in use by packets (# of pkts):\n");
600       for (i=0; i<WTAP_NUM_ENCAP_TYPES; i++) {
601         if (cf_info->encap_counts[i] > 0)
602           printf("                     %s (%d)\n",
603                  wtap_encap_string(i), cf_info->encap_counts[i]);
604       }
605     }
606   }
607   if (cap_file_more_info) {
608     printf      ("File timestamp precision:  %s (%d)\n",
609       wtap_tsprec_string(cf_info->file_tsprec), cf_info->file_tsprec);
610   }
611
612   if (cap_snaplen && cf_info->snap_set)
613     printf     ("Packet size limit:   file hdr: %u bytes\n", cf_info->snaplen);
614   else if (cap_snaplen && !cf_info->snap_set)
615     printf     ("Packet size limit:   file hdr: (not set)\n");
616   if (cf_info->snaplen_max_inferred > 0) {
617     if (cf_info->snaplen_min_inferred == cf_info->snaplen_max_inferred)
618       printf     ("Packet size limit:   inferred: %u bytes\n", cf_info->snaplen_min_inferred);
619     else
620       printf     ("Packet size limit:   inferred: %u bytes - %u bytes (range)\n",
621           cf_info->snaplen_min_inferred, cf_info->snaplen_max_inferred);
622   }
623   if (cap_packet_count) {
624     printf     ("Number of packets:   ");
625     if (machine_readable) {
626       printf ("%u\n", cf_info->packet_count);
627     } else {
628       size_string = format_size(cf_info->packet_count, format_size_unit_none);
629       printf ("%s\n", size_string);
630       g_free(size_string);
631     }
632   }
633   if (cap_file_size) {
634     printf     ("File size:           ");
635     if (machine_readable) {
636       printf     ("%" G_GINT64_MODIFIER "d bytes\n", cf_info->filesize);
637     } else {
638       size_string = format_size(cf_info->filesize, format_size_unit_bytes);
639       printf ("%s\n", size_string);
640       g_free(size_string);
641     }
642   }
643   if (cap_data_size) {
644     printf     ("Data size:           ");
645     if (machine_readable) {
646       printf     ("%" G_GINT64_MODIFIER "u bytes\n", cf_info->packet_bytes);
647     } else {
648       size_string = format_size(cf_info->packet_bytes, format_size_unit_bytes);
649       printf ("%s\n", size_string);
650       g_free(size_string);
651     }
652   }
653   if (cf_info->times_known) {
654     if (cap_duration) /* XXX - shorten to hh:mm:ss */
655                           printf("Capture duration:    %s\n", relative_time_string(&cf_info->duration, cf_info->duration_tsprec, cf_info, TRUE));
656     if (cap_start_time)
657                           printf("First packet time:   %s\n", absolute_time_string(&cf_info->start_time, cf_info->start_time_tsprec, cf_info));
658     if (cap_end_time)
659                           printf("Last packet time:    %s\n", absolute_time_string(&cf_info->stop_time, cf_info->stop_time_tsprec, cf_info));
660     if (cap_data_rate_byte) {
661                           printf("Data byte rate:      ");
662       if (machine_readable) {
663         print_value("", 2, " bytes/sec",   cf_info->data_rate);
664       } else {
665         size_string = format_size((gint64)cf_info->data_rate, format_size_unit_bytes_s);
666         printf ("%s\n", size_string);
667         g_free(size_string);
668       }
669     }
670     if (cap_data_rate_bit) {
671                           printf("Data bit rate:       ");
672       if (machine_readable) {
673         print_value("", 2, " bits/sec",    cf_info->data_rate*8);
674       } else {
675         size_string = format_size((gint64)(cf_info->data_rate*8), format_size_unit_bits_s);
676         printf ("%s\n", size_string);
677         g_free(size_string);
678       }
679     }
680   }
681   if (cap_packet_size)    printf("Average packet size: %.2f bytes\n",        cf_info->packet_size);
682   if (cf_info->times_known) {
683     if (cap_packet_rate) {
684                           printf("Average packet rate: ");
685       if (machine_readable) {
686         print_value("", 2, " packets/sec", cf_info->packet_rate);
687       } else {
688         size_string = format_size((gint64)cf_info->packet_rate, format_size_unit_packets_s);
689         printf ("%s\n", size_string);
690         g_free(size_string);
691       }
692     }
693   }
694   if (cap_file_hashes) {
695     printf     ("SHA1:                %s\n", file_sha1);
696     printf     ("RIPEMD160:           %s\n", file_rmd160);
697     printf     ("MD5:                 %s\n", file_md5);
698   }
699   if (cap_order)          printf     ("Strict time order:   %s\n", order_string(cf_info->order));
700
701   if (cf_info->shb != NULL) {
702     if (cap_comment) {
703       unsigned int i;
704       char *str;
705
706       for (i = 0; wtap_block_get_nth_string_option_value(cf_info->shb, OPT_COMMENT, i, &str) == WTAP_OPTTYPE_SUCCESS; i++) {
707         show_option_string("Capture comment:     ", str);
708       }
709     }
710     if (cap_file_more_info) {
711       char *str;
712
713       if (wtap_block_get_string_option_value(cf_info->shb, OPT_SHB_HARDWARE, &str) == WTAP_OPTTYPE_SUCCESS)
714         show_option_string("Capture hardware:    ", str);
715       if (wtap_block_get_string_option_value(cf_info->shb, OPT_SHB_OS, &str) == WTAP_OPTTYPE_SUCCESS)
716         show_option_string("Capture oper-sys:    ", str);
717       if (wtap_block_get_string_option_value(cf_info->shb, OPT_SHB_USERAPPL, &str) == WTAP_OPTTYPE_SUCCESS)
718         show_option_string("Capture application: ", str);
719     }
720
721     if (cap_file_idb && cf_info->num_interfaces != 0) {
722       guint i;
723       g_assert(cf_info->num_interfaces == cf_info->idb_info_strings->len);
724       printf     ("Number of interfaces in file: %u\n", cf_info->num_interfaces);
725       for (i = 0; i < cf_info->idb_info_strings->len; i++) {
726         gchar *s = g_array_index(cf_info->idb_info_strings, gchar*, i);
727         guint32 packet_count = 0;
728         if (i < cf_info->interface_packet_counts->len)
729           packet_count = g_array_index(cf_info->interface_packet_counts, guint32, i);
730         printf   ("Interface #%u info:\n", i);
731         printf   ("%s", s);
732         printf   ("                     Number of packets = %u\n", packet_count);
733       }
734     }
735   }
736 }
737
738 static void
739 putsep(void)
740 {
741   if (field_separator) putchar(field_separator);
742 }
743
744 static void
745 putquote(void)
746 {
747   if (quote_char) putchar(quote_char);
748 }
749
750 static void
751 print_stats_table_header_label(const gchar *label)
752 {
753   putsep();
754   putquote();
755   printf("%s", label);
756   putquote();
757 }
758
759 static void
760 print_stats_table_header(void)
761 {
762   putquote();
763   printf("File name");
764   putquote();
765
766   if (cap_file_type)      print_stats_table_header_label("File type");
767   if (cap_file_encap)     print_stats_table_header_label("File encapsulation");
768   if (cap_file_more_info) print_stats_table_header_label("File time precision");
769   if (cap_snaplen)        print_stats_table_header_label("Packet size limit");
770   if (cap_snaplen)        print_stats_table_header_label("Packet size limit min (inferred)");
771   if (cap_snaplen)        print_stats_table_header_label("Packet size limit max (inferred)");
772   if (cap_packet_count)   print_stats_table_header_label("Number of packets");
773   if (cap_file_size)      print_stats_table_header_label("File size (bytes)");
774   if (cap_data_size)      print_stats_table_header_label("Data size (bytes)");
775   if (cap_duration)       print_stats_table_header_label("Capture duration (seconds)");
776   if (cap_start_time)     print_stats_table_header_label("Start time");
777   if (cap_end_time)       print_stats_table_header_label("End time");
778   if (cap_data_rate_byte) print_stats_table_header_label("Data byte rate (bytes/sec)");
779   if (cap_data_rate_bit)  print_stats_table_header_label("Data bit rate (bits/sec)");
780   if (cap_packet_size)    print_stats_table_header_label("Average packet size (bytes)");
781   if (cap_packet_rate)    print_stats_table_header_label("Average packet rate (packets/sec)");
782   if (cap_file_hashes) {
783     print_stats_table_header_label("SHA1");
784     print_stats_table_header_label("RIPEMD160");
785     print_stats_table_header_label("MD5");
786   }
787   if (cap_order)          print_stats_table_header_label("Strict time order");
788   if (cap_comment)        print_stats_table_header_label("Capture comment");
789   if (cap_file_more_info) {
790     print_stats_table_header_label("Capture hardware");
791     print_stats_table_header_label("Capture oper-sys");
792     print_stats_table_header_label("Capture application");
793   }
794
795   printf("\n");
796 }
797
798 static void
799 print_stats_table(const gchar *filename, capture_info *cf_info)
800 {
801   const gchar           *file_type_string, *file_encap_string;
802
803   /* Build printable strings for various stats */
804   file_type_string = wtap_file_type_subtype_string(cf_info->file_type);
805   file_encap_string = wtap_encap_string(cf_info->file_encap);
806
807   if (filename) {
808     putquote();
809     printf("%s", filename);
810     putquote();
811   }
812
813   if (cap_file_type) {
814     putsep();
815     putquote();
816     printf("%s", file_type_string);
817     putquote();
818   }
819
820   /* ToDo: If WTAP_ENCAP_PER_PACKET, show the list of encapsulations encountered;
821    *       Output a line for each different encap with all fields repeated except
822    *        the encapsulation field which has "Per Packet: ..." for each
823    *        encapsulation type seen ?
824    */
825   if (cap_file_encap) {
826     putsep();
827     putquote();
828     printf("%s", file_encap_string);
829     putquote();
830   }
831
832   if (cap_file_more_info) {
833     putsep();
834     putquote();
835     printf("%s", wtap_tsprec_string(cf_info->file_tsprec));
836     putquote();
837   }
838
839   if (cap_snaplen) {
840     putsep();
841     putquote();
842     if (cf_info->snap_set)
843       printf("%u", cf_info->snaplen);
844     else
845       printf("(not set)");
846     putquote();
847     if (cf_info->snaplen_max_inferred > 0) {
848       putsep();
849       putquote();
850       printf("%u", cf_info->snaplen_min_inferred);
851       putquote();
852       putsep();
853       putquote();
854       printf("%u", cf_info->snaplen_max_inferred);
855       putquote();
856     }
857     else {
858       putsep();
859       putquote();
860       printf("n/a");
861       putquote();
862       putsep();
863       putquote();
864       printf("n/a");
865       putquote();
866     }
867   }
868
869   if (cap_packet_count) {
870     putsep();
871     putquote();
872     printf("%u", cf_info->packet_count);
873     putquote();
874   }
875
876   if (cap_file_size) {
877     putsep();
878     putquote();
879     printf("%" G_GINT64_MODIFIER "d", cf_info->filesize);
880     putquote();
881   }
882
883   if (cap_data_size) {
884     putsep();
885     putquote();
886     printf("%" G_GINT64_MODIFIER "u", cf_info->packet_bytes);
887     putquote();
888   }
889
890   if (cap_duration) {
891     putsep();
892     putquote();
893     printf("%s", relative_time_string(&cf_info->duration, cf_info->duration_tsprec, cf_info, FALSE));
894     putquote();
895   }
896
897   if (cap_start_time) {
898     putsep();
899     putquote();
900     printf("%s", absolute_time_string(&cf_info->start_time, cf_info->start_time_tsprec, cf_info));
901     putquote();
902   }
903
904   if (cap_end_time) {
905     putsep();
906     putquote();
907     printf("%s", absolute_time_string(&cf_info->stop_time, cf_info->stop_time_tsprec, cf_info));
908     putquote();
909   }
910
911   if (cap_data_rate_byte) {
912     putsep();
913     putquote();
914     if (cf_info->times_known)
915       printf("%.2f", cf_info->data_rate);
916     else
917       printf("n/a");
918     putquote();
919   }
920
921   if (cap_data_rate_bit) {
922     putsep();
923     putquote();
924     if (cf_info->times_known)
925       printf("%.2f", cf_info->data_rate*8);
926     else
927       printf("n/a");
928     putquote();
929   }
930
931   if (cap_packet_size) {
932     putsep();
933     putquote();
934     printf("%.2f", cf_info->packet_size);
935     putquote();
936   }
937
938   if (cap_packet_rate) {
939     putsep();
940     putquote();
941     if (cf_info->times_known)
942       printf("%.2f", cf_info->packet_rate);
943     else
944       printf("n/a");
945     putquote();
946   }
947
948   if (cap_file_hashes) {
949     putsep();
950     putquote();
951     printf("%s", file_sha1);
952     putquote();
953
954     putsep();
955     putquote();
956     printf("%s", file_rmd160);
957     putquote();
958
959     putsep();
960     putquote();
961     printf("%s", file_md5);
962     putquote();
963   }
964
965   if (cap_order) {
966     putsep();
967     putquote();
968     printf("%s", order_string(cf_info->order));
969     putquote();
970   }
971
972   if (cf_info->shb != NULL) {
973     /*
974      * this is silly to put into a table format, but oh well
975      * note that there may be *more than one* of each of these types
976      * of options
977      */
978     if (cap_comment) {
979       unsigned int i;
980       char *opt_comment;
981
982       for (i = 0; wtap_block_get_nth_string_option_value(cf_info->shb, OPT_COMMENT, i, &opt_comment) == WTAP_OPTTYPE_SUCCESS; i++) {
983         putsep();
984         putquote();
985         printf("%s", opt_comment);
986         putquote();
987       }
988     }
989
990     if (cap_file_more_info) {
991       char *str;
992
993       if (wtap_block_get_string_option_value(cf_info->shb, OPT_SHB_HARDWARE, &str) == WTAP_OPTTYPE_SUCCESS) {
994         putsep();
995         putquote();
996         printf("%s", str);
997         putquote();
998       }
999       if (wtap_block_get_string_option_value(cf_info->shb, OPT_SHB_OS, &str) == WTAP_OPTTYPE_SUCCESS) {
1000         putsep();
1001         putquote();
1002         printf("%s", str);
1003         putquote();
1004       }
1005       if (wtap_block_get_string_option_value(cf_info->shb, OPT_SHB_USERAPPL, &str) == WTAP_OPTTYPE_SUCCESS) {
1006         putsep();
1007         putquote();
1008         printf("%s", str);
1009         putquote();
1010       }
1011     }
1012   }
1013
1014   printf("\n");
1015 }
1016
1017 static void
1018 cleanup_capture_info(capture_info *cf_info)
1019 {
1020   guint i;
1021   g_assert(cf_info != NULL);
1022
1023   g_free(cf_info->encap_counts);
1024   cf_info->encap_counts = NULL;
1025
1026   g_array_free(cf_info->interface_packet_counts, TRUE);
1027   cf_info->interface_packet_counts = NULL;
1028
1029   if (cf_info->idb_info_strings) {
1030     for (i = 0; i < cf_info->idb_info_strings->len; i++) {
1031       gchar *s = g_array_index(cf_info->idb_info_strings, gchar*, i);
1032       g_free(s);
1033     }
1034     g_array_free(cf_info->idb_info_strings, TRUE);
1035   }
1036   cf_info->idb_info_strings = NULL;
1037 }
1038
1039 static int
1040 process_cap_file(wtap *wth, const char *filename)
1041 {
1042   int                   status = 0;
1043   int                   err;
1044   gchar                *err_info;
1045   gint64                size;
1046   gint64                data_offset;
1047
1048   guint32               packet = 0;
1049   gint64                bytes  = 0;
1050   guint32               snaplen_min_inferred = 0xffffffff;
1051   guint32               snaplen_max_inferred =          0;
1052   const struct wtap_pkthdr *phdr;
1053   capture_info          cf_info;
1054   gboolean              have_times = TRUE;
1055   nstime_t              start_time;
1056   int                   start_time_tsprec;
1057   nstime_t              stop_time;
1058   int                   stop_time_tsprec;
1059   nstime_t              cur_time;
1060   nstime_t              prev_time;
1061   gboolean              know_order = FALSE;
1062   order_t               order = IN_ORDER;
1063   guint                 i;
1064   wtapng_iface_descriptions_t *idb_info;
1065
1066   g_assert(wth != NULL);
1067   g_assert(filename != NULL);
1068
1069   nstime_set_zero(&start_time);
1070   start_time_tsprec = WTAP_TSPREC_UNKNOWN;
1071   nstime_set_zero(&stop_time);
1072   stop_time_tsprec = WTAP_TSPREC_UNKNOWN;
1073   nstime_set_zero(&cur_time);
1074   nstime_set_zero(&prev_time);
1075
1076   cf_info.shb = wtap_file_get_shb(wth);
1077
1078   cf_info.encap_counts = g_new0(int,WTAP_NUM_ENCAP_TYPES);
1079
1080   idb_info = wtap_file_get_idb_info(wth);
1081
1082   g_assert(idb_info->interface_data != NULL);
1083
1084   cf_info.num_interfaces = idb_info->interface_data->len;
1085   cf_info.interface_packet_counts  = g_array_sized_new(FALSE, TRUE, sizeof(guint32), cf_info.num_interfaces);
1086   g_array_set_size(cf_info.interface_packet_counts, cf_info.num_interfaces);
1087   cf_info.pkt_interface_id_unknown = 0;
1088
1089   g_free(idb_info);
1090   idb_info = NULL;
1091
1092   /* Tally up data that we need to parse through the file to find */
1093   while (wtap_read(wth, &err, &err_info, &data_offset))  {
1094     phdr = wtap_phdr(wth);
1095     if (phdr->presence_flags & WTAP_HAS_TS) {
1096       prev_time = cur_time;
1097       cur_time = phdr->ts;
1098       if (packet == 0) {
1099         start_time = phdr->ts;
1100         start_time_tsprec = phdr->pkt_tsprec;
1101         stop_time  = phdr->ts;
1102         stop_time_tsprec = phdr->pkt_tsprec;
1103         prev_time  = phdr->ts;
1104       }
1105       if (nstime_cmp(&cur_time, &prev_time) < 0) {
1106         order = NOT_IN_ORDER;
1107       }
1108       if (nstime_cmp(&cur_time, &start_time) < 0) {
1109         start_time = cur_time;
1110         start_time_tsprec = phdr->pkt_tsprec;
1111       }
1112       if (nstime_cmp(&cur_time, &stop_time) > 0) {
1113         stop_time = cur_time;
1114         stop_time_tsprec = phdr->pkt_tsprec;
1115       }
1116     } else {
1117       have_times = FALSE; /* at least one packet has no time stamp */
1118       if (order != NOT_IN_ORDER)
1119         order = ORDER_UNKNOWN;
1120     }
1121
1122     if (phdr->rec_type == REC_TYPE_PACKET) {
1123       bytes+=phdr->len;
1124       packet++;
1125
1126       /* If caplen < len for a rcd, then presumably           */
1127       /* 'Limit packet capture length' was done for this rcd. */
1128       /* Keep track as to the min/max actual snapshot lengths */
1129       /*  seen for this file.                                 */
1130       if (phdr->caplen < phdr->len) {
1131         if (phdr->caplen < snaplen_min_inferred)
1132           snaplen_min_inferred = phdr->caplen;
1133         if (phdr->caplen > snaplen_max_inferred)
1134           snaplen_max_inferred = phdr->caplen;
1135       }
1136
1137       if ((phdr->pkt_encap > 0) && (phdr->pkt_encap < WTAP_NUM_ENCAP_TYPES)) {
1138         cf_info.encap_counts[phdr->pkt_encap] += 1;
1139       } else {
1140         fprintf(stderr, "capinfos: Unknown packet encapsulation %d in frame %u of file \"%s\"\n",
1141                 phdr->pkt_encap, packet, filename);
1142       }
1143
1144       /* Packet interface_id info */
1145       if (phdr->presence_flags & WTAP_HAS_INTERFACE_ID) {
1146         /* cf_info.num_interfaces is size, not index, so it's one more than max index */
1147         if (phdr->interface_id >= cf_info.num_interfaces) {
1148           /*
1149            * OK, re-fetch the number of interfaces, as there might have
1150            * been an interface that was in the middle of packets, and
1151            * grow the array to be big enough for the new number of
1152            * interfaces.
1153            */
1154           idb_info = wtap_file_get_idb_info(wth);
1155
1156           cf_info.num_interfaces = idb_info->interface_data->len;
1157           g_array_set_size(cf_info.interface_packet_counts, cf_info.num_interfaces);
1158
1159           g_free(idb_info);
1160           idb_info = NULL;
1161         }
1162         if (phdr->interface_id < cf_info.num_interfaces) {
1163           g_array_index(cf_info.interface_packet_counts, guint32, phdr->interface_id) += 1;
1164         }
1165         else {
1166           cf_info.pkt_interface_id_unknown += 1;
1167         }
1168       }
1169       else {
1170         /* it's for interface_id 0 */
1171         if (cf_info.num_interfaces != 0) {
1172           g_array_index(cf_info.interface_packet_counts, guint32, 0) += 1;
1173         }
1174         else {
1175           cf_info.pkt_interface_id_unknown += 1;
1176         }
1177       }
1178     }
1179
1180   } /* while */
1181
1182   /*
1183    * Get IDB info strings.
1184    * We do this at the end, so we can get information for all IDBs in
1185    * the file, even those that come after packet records.
1186    */
1187   idb_info = wtap_file_get_idb_info(wth);
1188
1189   cf_info.idb_info_strings = g_array_sized_new(FALSE, FALSE, sizeof(gchar*), cf_info.num_interfaces);
1190   cf_info.num_interfaces = idb_info->interface_data->len;
1191   for (i = 0; i < cf_info.num_interfaces; i++) {
1192     const wtap_block_t if_descr = g_array_index(idb_info->interface_data, wtap_block_t, i);
1193     gchar *s = wtap_get_debug_if_descr(if_descr, 21, "\n");
1194     g_array_append_val(cf_info.idb_info_strings, s);
1195   }
1196
1197   g_free(idb_info);
1198   idb_info = NULL;
1199
1200   if (err != 0) {
1201     fprintf(stderr,
1202         "capinfos: An error occurred after reading %u packets from \"%s\": %s.\n",
1203         packet, filename, wtap_strerror(err));
1204     if (err == WTAP_ERR_SHORT_READ) {
1205         /* Don't give up completely with this one. */
1206         status = 1;
1207         fprintf(stderr,
1208           "  (will continue anyway, checksums might be incorrect)\n");
1209     } else {
1210         if (err_info != NULL) {
1211             fprintf(stderr, "(%s)\n", err_info);
1212             g_free(err_info);
1213         }
1214
1215         cleanup_capture_info(&cf_info);
1216         return 1;
1217     }
1218   }
1219
1220   /* File size */
1221   size = wtap_file_size(wth, &err);
1222   if (size == -1) {
1223     fprintf(stderr,
1224         "capinfos: Can't get size of \"%s\": %s.\n",
1225         filename, g_strerror(err));
1226     cleanup_capture_info(&cf_info);
1227     return 1;
1228   }
1229
1230   cf_info.filesize = size;
1231
1232   /* File Type */
1233   cf_info.file_type = wtap_file_type_subtype(wth);
1234   cf_info.iscompressed = wtap_iscompressed(wth);
1235
1236   /* File Encapsulation */
1237   cf_info.file_encap = wtap_file_encap(wth);
1238
1239   cf_info.file_tsprec = wtap_file_tsprec(wth);
1240
1241   /* Packet size limit (snaplen) */
1242   cf_info.snaplen = wtap_snapshot_length(wth);
1243   if (cf_info.snaplen > 0)
1244     cf_info.snap_set = TRUE;
1245   else
1246     cf_info.snap_set = FALSE;
1247
1248   cf_info.snaplen_min_inferred = snaplen_min_inferred;
1249   cf_info.snaplen_max_inferred = snaplen_max_inferred;
1250
1251   /* # of packets */
1252   cf_info.packet_count = packet;
1253
1254   /* File Times */
1255   cf_info.times_known = have_times;
1256   cf_info.start_time = start_time;
1257   cf_info.start_time_tsprec = start_time_tsprec;
1258   cf_info.stop_time = stop_time;
1259   cf_info.stop_time_tsprec = stop_time_tsprec;
1260   nstime_delta(&cf_info.duration, &stop_time, &start_time);
1261   /* Duration precision is the higher of the start and stop time precisions. */
1262   if (cf_info.stop_time_tsprec > cf_info.start_time_tsprec)
1263     cf_info.duration_tsprec = cf_info.stop_time_tsprec;
1264   else
1265     cf_info.duration_tsprec = cf_info.start_time_tsprec;
1266   cf_info.know_order = know_order;
1267   cf_info.order = order;
1268
1269   /* Number of packet bytes */
1270   cf_info.packet_bytes = bytes;
1271
1272   cf_info.data_rate   = 0.0;
1273   cf_info.packet_rate = 0.0;
1274   cf_info.packet_size = 0.0;
1275
1276   if (packet > 0) {
1277     double delta_time = nstime_to_sec(&stop_time) - nstime_to_sec(&start_time);
1278     if (delta_time > 0.0) {
1279       cf_info.data_rate   = (double)bytes  / delta_time; /* Data rate per second */
1280       cf_info.packet_rate = (double)packet / delta_time; /* packet rate per second */
1281     }
1282     cf_info.packet_size = (double)bytes / packet;                  /* Avg packet size      */
1283   }
1284
1285   if (long_report) {
1286     print_stats(filename, &cf_info);
1287   } else {
1288     print_stats_table(filename, &cf_info);
1289   }
1290
1291   cleanup_capture_info(&cf_info);
1292
1293   return status;
1294 }
1295
1296 static void
1297 print_usage(FILE *output)
1298 {
1299   fprintf(output, "\n");
1300   fprintf(output, "Usage: capinfos [options] <infile> ...\n");
1301   fprintf(output, "\n");
1302   fprintf(output, "General infos:\n");
1303   fprintf(output, "  -t display the capture file type\n");
1304   fprintf(output, "  -E display the capture file encapsulation\n");
1305   fprintf(output, "  -I display the capture file interface information\n");
1306   fprintf(output, "  -F display additional capture file information\n");
1307   fprintf(output, "  -H display the SHA1, RMD160, and MD5 hashes of the file\n");
1308   fprintf(output, "  -k display the capture comment\n");
1309   fprintf(output, "\n");
1310   fprintf(output, "Size infos:\n");
1311   fprintf(output, "  -c display the number of packets\n");
1312   fprintf(output, "  -s display the size of the file (in bytes)\n");
1313   fprintf(output, "  -d display the total length of all packets (in bytes)\n");
1314   fprintf(output, "  -l display the packet size limit (snapshot length)\n");
1315   fprintf(output, "\n");
1316   fprintf(output, "Time infos:\n");
1317   fprintf(output, "  -u display the capture duration (in seconds)\n");
1318   fprintf(output, "  -a display the capture start time\n");
1319   fprintf(output, "  -e display the capture end time\n");
1320   fprintf(output, "  -o display the capture file chronological status (True/False)\n");
1321   fprintf(output, "  -S display start and end times as seconds\n");
1322   fprintf(output, "\n");
1323   fprintf(output, "Statistic infos:\n");
1324   fprintf(output, "  -y display average data rate (in bytes/sec)\n");
1325   fprintf(output, "  -i display average data rate (in bits/sec)\n");
1326   fprintf(output, "  -z display average packet size (in bytes)\n");
1327   fprintf(output, "  -x display average packet rate (in packets/sec)\n");
1328   fprintf(output, "\n");
1329   fprintf(output, "Output format:\n");
1330   fprintf(output, "  -L generate long report (default)\n");
1331   fprintf(output, "  -T generate table report\n");
1332   fprintf(output, "  -M display machine-readable values in long reports\n");
1333   fprintf(output, "\n");
1334   fprintf(output, "Table report options:\n");
1335   fprintf(output, "  -R generate header record (default)\n");
1336   fprintf(output, "  -r do not generate header record\n");
1337   fprintf(output, "\n");
1338   fprintf(output, "  -B separate infos with TAB character (default)\n");
1339   fprintf(output, "  -m separate infos with comma (,) character\n");
1340   fprintf(output, "  -b separate infos with SPACE character\n");
1341   fprintf(output, "\n");
1342   fprintf(output, "  -N do not quote infos (default)\n");
1343   fprintf(output, "  -q quote infos with single quotes (')\n");
1344   fprintf(output, "  -Q quote infos with double quotes (\")\n");
1345   fprintf(output, "\n");
1346   fprintf(output, "Miscellaneous:\n");
1347   fprintf(output, "  -h display this help and exit\n");
1348   fprintf(output, "  -C cancel processing if file open fails (default is to continue)\n");
1349   fprintf(output, "  -A generate all infos (default)\n");
1350   fprintf(output, "\n");
1351   fprintf(output, "Options are processed from left to right order with later options superceding\n");
1352   fprintf(output, "or adding to earlier options.\n");
1353   fprintf(output, "\n");
1354   fprintf(output, "If no options are given the default is to display all infos in long report\n");
1355   fprintf(output, "output format.\n");
1356   fprintf(output, "\nFile hashing support (-H) is not present.\n");
1357 }
1358
1359 #ifdef HAVE_PLUGINS
1360 /*
1361  * General errors are reported with an console message in capinfos.
1362  */
1363 static void
1364 failure_message(const char *msg_format, va_list ap)
1365 {
1366   fprintf(stderr, "capinfos: ");
1367   vfprintf(stderr, msg_format, ap);
1368   fprintf(stderr, "\n");
1369 }
1370 #endif
1371
1372 static void
1373 hash_to_str(const unsigned char *hash, size_t length, char *str) {
1374   int i;
1375
1376   for (i = 0; i < (int) length; i++) {
1377     g_snprintf(str+(i*2), 3, "%02x", hash[i]);
1378   }
1379 }
1380
1381 int
1382 main(int argc, char *argv[])
1383 {
1384   GString *comp_info_str;
1385   GString *runtime_info_str;
1386   char  *init_progfile_dir_error;
1387   wtap  *wth;
1388   int    err;
1389   gchar *err_info;
1390   int    opt;
1391   int    overall_error_status;
1392   static const struct option long_options[] = {
1393       {"help", no_argument, NULL, 'h'},
1394       {"version", no_argument, NULL, 'v'},
1395       {0, 0, 0, 0 }
1396   };
1397
1398   int status = 0;
1399   FILE  *fh;
1400   char  *hash_buf = NULL;
1401   gcry_md_hd_t hd = NULL;
1402   size_t hash_bytes;
1403
1404   /* Set the C-language locale to the native environment. */
1405   setlocale(LC_ALL, "");
1406
1407   /* Get the decimal point. */
1408   decimal_point = g_strdup(localeconv()->decimal_point);
1409
1410   /* Get the compile-time version information string */
1411   comp_info_str = get_compiled_version_info(NULL, NULL);
1412
1413   /* Get the run-time version information string */
1414   runtime_info_str = get_runtime_version_info(NULL);
1415
1416   /* Add it to the information to be reported on a crash. */
1417   ws_add_crash_info("Capinfos (Wireshark) %s\n"
1418          "\n"
1419          "%s"
1420          "\n"
1421          "%s",
1422       get_ws_vcs_version_info(), comp_info_str->str, runtime_info_str->str);
1423   g_string_free(comp_info_str, TRUE);
1424   g_string_free(runtime_info_str, TRUE);
1425
1426 #ifdef _WIN32
1427   arg_list_utf_16to8(argc, argv);
1428   create_app_running_mutex();
1429 #endif /* _WIN32 */
1430
1431   /*
1432    * Get credential information for later use.
1433    */
1434   init_process_policies();
1435
1436   /*
1437    * Attempt to get the pathname of the directory containing the
1438    * executable file.
1439    */
1440   init_progfile_dir_error = init_progfile_dir(argv[0], main);
1441   if (init_progfile_dir_error != NULL) {
1442     fprintf(stderr,
1443             "capinfos: Can't get pathname of directory containing the capinfos program: %s.\n",
1444             init_progfile_dir_error);
1445     g_free(init_progfile_dir_error);
1446   }
1447
1448   wtap_init();
1449
1450 #ifdef HAVE_PLUGINS
1451   init_report_err(failure_message, NULL, NULL, NULL);
1452
1453   /* Scan for plugins.  This does *not* call their registration routines;
1454      that's done later.
1455
1456      Don't report failures to load plugins because most (non-wiretap)
1457      plugins *should* fail to load (because we're not linked against
1458      libwireshark and dissector plugins need libwireshark). */
1459   scan_plugins(DONT_REPORT_LOAD_FAILURE);
1460
1461   /* Register all libwiretap plugin modules. */
1462   register_all_wiretap_modules();
1463 #endif
1464
1465   /* Process the options */
1466   while ((opt = getopt_long(argc, argv, "abcdehiklmoqrstuvxyzABCEFHILMNQRST", long_options, NULL)) !=-1) {
1467
1468     switch (opt) {
1469
1470       case 't':
1471         if (report_all_infos) disable_all_infos();
1472         cap_file_type = TRUE;
1473         break;
1474
1475       case 'E':
1476         if (report_all_infos) disable_all_infos();
1477         cap_file_encap = TRUE;
1478         break;
1479
1480       case 'l':
1481         if (report_all_infos) disable_all_infos();
1482         cap_snaplen = TRUE;
1483         break;
1484
1485       case 'c':
1486         if (report_all_infos) disable_all_infos();
1487         cap_packet_count = TRUE;
1488         break;
1489
1490       case 's':
1491         if (report_all_infos) disable_all_infos();
1492         cap_file_size = TRUE;
1493         break;
1494
1495       case 'd':
1496         if (report_all_infos) disable_all_infos();
1497         cap_data_size = TRUE;
1498         break;
1499
1500       case 'u':
1501         if (report_all_infos) disable_all_infos();
1502         cap_duration = TRUE;
1503         break;
1504
1505       case 'a':
1506         if (report_all_infos) disable_all_infos();
1507         cap_start_time = TRUE;
1508         break;
1509
1510       case 'e':
1511         if (report_all_infos) disable_all_infos();
1512         cap_end_time = TRUE;
1513         break;
1514
1515       case 'S':
1516         time_as_secs = TRUE;
1517         break;
1518
1519       case 'y':
1520         if (report_all_infos) disable_all_infos();
1521         cap_data_rate_byte = TRUE;
1522         break;
1523
1524       case 'i':
1525         if (report_all_infos) disable_all_infos();
1526         cap_data_rate_bit = TRUE;
1527         break;
1528
1529       case 'z':
1530         if (report_all_infos) disable_all_infos();
1531         cap_packet_size = TRUE;
1532         break;
1533
1534       case 'x':
1535         if (report_all_infos) disable_all_infos();
1536         cap_packet_rate = TRUE;
1537         break;
1538
1539       case 'H':
1540         if (report_all_infos) disable_all_infos();
1541         cap_file_hashes = TRUE;
1542         break;
1543
1544       case 'o':
1545         if (report_all_infos) disable_all_infos();
1546         cap_order = TRUE;
1547         break;
1548
1549       case 'k':
1550         if (report_all_infos) disable_all_infos();
1551         cap_comment = TRUE;
1552         break;
1553
1554       case 'F':
1555         if (report_all_infos) disable_all_infos();
1556         cap_file_more_info = TRUE;
1557         break;
1558
1559       case 'I':
1560         if (report_all_infos) disable_all_infos();
1561         cap_file_idb = TRUE;
1562         break;
1563
1564       case 'C':
1565         continue_after_wtap_open_offline_failure = FALSE;
1566         break;
1567
1568       case 'A':
1569         enable_all_infos();
1570         break;
1571
1572       case 'L':
1573         long_report = TRUE;
1574         break;
1575
1576       case 'T':
1577         long_report = FALSE;
1578         break;
1579
1580       case 'M':
1581         machine_readable = TRUE;
1582         break;
1583
1584       case 'R':
1585         table_report_header = TRUE;
1586         break;
1587
1588       case 'r':
1589         table_report_header = FALSE;
1590         break;
1591
1592       case 'N':
1593         quote_char = '\0';
1594         break;
1595
1596       case 'q':
1597         quote_char = '\'';
1598         break;
1599
1600       case 'Q':
1601         quote_char = '"';
1602         break;
1603
1604       case 'B':
1605         field_separator = '\t';
1606         break;
1607
1608       case 'm':
1609         field_separator = ',';
1610         break;
1611
1612       case 'b':
1613         field_separator = ' ';
1614         break;
1615
1616       case 'h':
1617         printf("Capinfos (Wireshark) %s\n"
1618                "Print various information (infos) about capture files.\n"
1619                "See https://www.wireshark.org for more information.\n",
1620                get_ws_vcs_version_info());
1621         print_usage(stdout);
1622         exit(0);
1623         break;
1624
1625       case 'v':
1626         comp_info_str = get_compiled_version_info(NULL, NULL);
1627         runtime_info_str = get_runtime_version_info(NULL);
1628         show_version("Capinfos (Wireshark)", comp_info_str, runtime_info_str);
1629         g_string_free(comp_info_str, TRUE);
1630         g_string_free(runtime_info_str, TRUE);
1631         exit(0);
1632         break;
1633
1634       case '?':              /* Bad flag - print usage message */
1635         print_usage(stderr);
1636         exit(1);
1637         break;
1638     }
1639   }
1640
1641   if ((argc - optind) < 1) {
1642     print_usage(stderr);
1643     exit(1);
1644   }
1645
1646   if (!long_report && table_report_header) {
1647     print_stats_table_header();
1648   }
1649
1650   if (cap_file_hashes) {
1651     gcry_check_version(NULL);
1652     gcry_md_open(&hd, GCRY_MD_SHA1, 0);
1653     if (hd) {
1654       gcry_md_enable(hd, GCRY_MD_RMD160);
1655       gcry_md_enable(hd, GCRY_MD_MD5);
1656     }
1657     hash_buf = (char *)g_malloc(HASH_BUF_SIZE);
1658   }
1659
1660   overall_error_status = 0;
1661
1662   for (opt = optind; opt < argc; opt++) {
1663
1664     g_strlcpy(file_sha1, "<unknown>", HASH_STR_SIZE);
1665     g_strlcpy(file_rmd160, "<unknown>", HASH_STR_SIZE);
1666     g_strlcpy(file_md5, "<unknown>", HASH_STR_SIZE);
1667
1668     if (cap_file_hashes) {
1669       fh = ws_fopen(argv[opt], "rb");
1670       if (fh && hd) {
1671         while((hash_bytes = fread(hash_buf, 1, HASH_BUF_SIZE, fh)) > 0) {
1672           gcry_md_write(hd, hash_buf, hash_bytes);
1673         }
1674         gcry_md_final(hd);
1675         hash_to_str(gcry_md_read(hd, GCRY_MD_SHA1), HASH_SIZE_SHA1, file_sha1);
1676         hash_to_str(gcry_md_read(hd, GCRY_MD_RMD160), HASH_SIZE_RMD160, file_rmd160);
1677         hash_to_str(gcry_md_read(hd, GCRY_MD_MD5), HASH_SIZE_MD5, file_md5);
1678       }
1679       if (fh) fclose(fh);
1680       if (hd) gcry_md_reset(hd);
1681     }
1682
1683     wth = wtap_open_offline(argv[opt], WTAP_TYPE_AUTO, &err, &err_info, FALSE);
1684
1685     if (!wth) {
1686       fprintf(stderr, "capinfos: Can't open %s: %s\n", argv[opt],
1687           wtap_strerror(err));
1688       if (err_info != NULL) {
1689         fprintf(stderr, "(%s)\n", err_info);
1690         g_free(err_info);
1691       }
1692       overall_error_status = 2; /* remember that an error has occurred */
1693       if (!continue_after_wtap_open_offline_failure)
1694         goto exit;
1695     }
1696
1697     if (wth) {
1698       if ((opt > optind) && (long_report))
1699         printf("\n");
1700       status = process_cap_file(wth, argv[opt]);
1701
1702       wtap_close(wth);
1703       if (status) {
1704         overall_error_status = status;
1705         goto exit;
1706       }
1707     }
1708   }
1709
1710 exit:
1711   g_free(hash_buf);
1712   return overall_error_status;
1713 }
1714
1715 /*
1716  * Editor modelines  -  http://www.wireshark.org/tools/modelines.html
1717  *
1718  * Local variables:
1719  * c-basic-offset: 2
1720  * tab-width: 8
1721  * indent-tabs-mode: nil
1722  * End:
1723  *
1724  * vi: set shiftwidth=2 tabstop=8 expandtab:
1725  * :indentSize=2:tabSize=8:noTabs=true:
1726  */