From Xiao Xiangquan:
[obnox/wireshark/wip.git] / capinfos.c
index 00ed9dc38be9d3f94f4d968e168c6eeb81319df8..c2f2e8ed4c04da18cc7eb57256684514bc7fbf98 100644 (file)
  *
  * New capinfos features
  *
- * Continue processing additional files after 
- * a wiretap open failure.  The new -C option 
- * reverts to capinfos' original behavior which 
- * is to cancels any further file processing at 
+ * Continue processing additional files after
+ * a wiretap open failure.  The new -C option
+ * reverts to capinfos' original behavior which
+ * is to cancel any further file processing at
  * first file open failure.
  *
- * Change the behavior of how the default display 
- * of all infos is initiated.  This gets rid of a 
+ * Change the behavior of how the default display
+ * of all infos is initiated.  This gets rid of a
  * special post getopt() argument count test.
  *
  * Add new table output format (with related options)
- * This feature allows outputting the various infos 
- * into a tab delimited text file, or to a comma 
+ * This feature allows outputting the various infos
+ * into a tab delimited text file, or to a comma
  * separated variables file (*.csv) instead of the
  * original "long" format.
+ *
+ * 2011-04-05: wmeier
+ * behaviour changed: Upon exit capinfos will return
+ *  an error status if an error occurred at any
+ *  point during "continuous" file processing.
+ *  (Previously a success status was always
+ *   returned if the -C option was not used).
+ *
+
  */
 
 
 #include "wtap.h"
 #include <wsutil/privileges.h>
 
-#ifdef HAVE_GETOPT_H
-#include <getopt.h>
-#else
-#include "wsgetopt.h"
+#ifdef HAVE_LIBGCRYPT
+#include <gcrypt.h>
+#include <wsutil/file_util.h>
 #endif
 
+#ifndef HAVE_GETOPT
+#include "wsutil/wsgetopt.h"
+#endif
+
+#ifdef _WIN32
+#include <wsutil/unicode-utils.h>
+#endif /* _WIN32 */
+
+#include "svnversion.h"
+
 /*
  * By default capinfos now continues processing
- * the next filename if and when wiretap detects 
- * a problem opening a file.  
+ * the next filename if and when wiretap detects
+ * a problem opening a file.
  * Use the '-C' option to revert back to original
- * capinfos behavior which is to abort any 
- * additional file processing at first open file 
+ * capinfos behavior which is to abort any
+ * additional file processing at first open file
  * failure.
  */
 
@@ -102,13 +120,13 @@ static gchar field_separator = '\t';        /* Use TAB as field separator by def
 static gchar quote_char = '\0';             /* Do NOT quote fields by default        */
 
 /*
- * capinfos has the ability to report on a number of 
- * various characteristics ("infos") for each input file.  
- * 
- * By default reporting of all info fields is enabled. 
+ * capinfos has the ability to report on a number of
+ * various characteristics ("infos") for each input file.
+ *
+ * By default reporting of all info fields is enabled.
  *
- * Optionally the reporting of any specific info field 
- * or combination of info fields can be enabled with 
+ * Optionally the reporting of any specific info field
+ * or combination of info fields can be enabled with
  * individual options.
  */
 
@@ -116,6 +134,7 @@ static gboolean report_all_infos = TRUE;    /* Report all infos           */
 
 static gboolean cap_file_type = TRUE;       /* Report capture type        */
 static gboolean cap_file_encap = TRUE;      /* Report encapsulation       */
+static gboolean cap_snaplen = TRUE;         /* Packet size limit (snaplen)*/
 static gboolean cap_packet_count = TRUE;    /* Report packet count        */
 static gboolean cap_file_size = TRUE;       /* Report file size           */
 
@@ -123,30 +142,60 @@ static gboolean cap_data_size = TRUE;       /* Report packet byte size    */
 static gboolean cap_duration = TRUE;        /* Report capture duration    */
 static gboolean cap_start_time = TRUE;      /* Report capture start time  */
 static gboolean cap_end_time = TRUE;        /* Report capture end time    */
+static gboolean time_as_secs = FALSE;       /* Report time values as raw seconds */
 
 static gboolean cap_data_rate_byte = TRUE;  /* Report data rate bytes/sec */
 static gboolean cap_data_rate_bit = TRUE;   /* Report data rate bites/sec */
 static gboolean cap_packet_size = TRUE;     /* Report average packet size */
 static gboolean cap_packet_rate = TRUE;     /* Report average packet rate */
+static gboolean cap_in_order = TRUE;        /* Report if packets are in chronological order (True/False) */
+
+#ifdef HAVE_LIBGCRYPT
+static gboolean cap_file_hashes = TRUE;     /* Calculate file hashes */
+#endif
+
+#ifdef HAVE_LIBGCRYPT
+#define HASH_SIZE_SHA1 20
+#define HASH_SIZE_RMD160 20
+#define HASH_SIZE_MD5 16
+
+#define HASH_STR_SIZE (41) /* Max hash size * 2 + '\0' */
+#define HASH_BUF_SIZE (1024 * 1024)
+
+
+static gchar file_sha1[HASH_STR_SIZE];
+static gchar file_rmd160[HASH_STR_SIZE];
+static gchar file_md5[HASH_STR_SIZE];
+
+#define FILE_HASH_OPT "H"
+#else
+#define FILE_HASH_OPT ""
+#endif /* HAVE_LIBGCRYPT */
 
 typedef struct _capture_info {
-       const char              *filename;
-       guint16                 file_type;
-       int                     file_encap;
-       gint64                  filesize;
-       guint64                 packet_bytes;
-       double                  start_time;
-       double                  stop_time;
-       guint32                 packet_count;
-       gboolean                snap_set;
-       guint32                 snaplen;
-       gboolean                drops_known;
-       guint32                 drop_count;
-
-       double                  duration;
-       double                  packet_rate;
-       double                  packet_size;
-       double                  data_rate;              /* in bytes */
+  const char    *filename;
+  guint16       file_type;
+  int           file_encap;
+  gint64        filesize;
+
+  guint64       packet_bytes;
+  double        start_time;
+  double        stop_time;
+  guint32       packet_count;
+  gboolean      snap_set;                /* If set in capture file header      */
+  guint32       snaplen;                 /* value from the capture file header */
+  guint32       snaplen_min_inferred;    /* If caplen < len for 1 or more rcds */
+  guint32       snaplen_max_inferred;    /*  ...                               */
+  gboolean      drops_known;
+  guint32       drop_count;
+
+  double        duration;
+  double        packet_rate;
+  double        packet_size;
+  double        data_rate;              /* in bytes */
+  gboolean      in_order;
+
+  int          *encap_counts;           /* array of per_packet encap counts; array has one entry per wtap_encap type */
 } capture_info;
 
 static void
@@ -156,6 +205,7 @@ enable_all_infos(void)
 
   cap_file_type = TRUE;
   cap_file_encap = TRUE;
+  cap_snaplen = TRUE;
   cap_packet_count = TRUE;
   cap_file_size = TRUE;
 
@@ -163,53 +213,85 @@ enable_all_infos(void)
   cap_duration = TRUE;
   cap_start_time = TRUE;
   cap_end_time = TRUE;
+  cap_in_order = TRUE;
 
   cap_data_rate_byte = TRUE;
   cap_data_rate_bit = TRUE;
   cap_packet_size = TRUE;
   cap_packet_rate = TRUE;
+
+#ifdef HAVE_LIBGCRYPT
+  cap_file_hashes = TRUE;
+#endif /* HAVE_LIBGCRYPT */
 }
 
 static void
 disable_all_infos(void)
 {
-  report_all_infos = FALSE;
+  report_all_infos   = FALSE;
 
-  cap_file_type = FALSE;
-  cap_file_encap = FALSE;
-  cap_packet_count = FALSE;
-  cap_file_size = FALSE;
+  cap_file_type      = FALSE;
+  cap_file_encap     = FALSE;
+  cap_snaplen        = FALSE;
+  cap_packet_count   = FALSE;
+  cap_file_size      = FALSE;
 
-  cap_data_size = FALSE;
-  cap_duration = FALSE;
-  cap_start_time = FALSE;
-  cap_end_time = FALSE;
+  cap_data_size      = FALSE;
+  cap_duration       = FALSE;
+  cap_start_time     = FALSE;
+  cap_end_time       = FALSE;
+  cap_in_order       = FALSE;
 
   cap_data_rate_byte = FALSE;
-  cap_data_rate_bit = FALSE;
-  cap_packet_size = FALSE;
-  cap_packet_rate = FALSE;
-}
+  cap_data_rate_bit  = FALSE;
+  cap_packet_size    = FALSE;
+  cap_packet_rate    = FALSE;
 
-/*
- * ctime_no_lf()
- *
- * This function simply truncates the string returned 
- * from the ctime() function to remove the trailing 
- * '\n' character.
- *
- * The ctime() function returns a string formatted as:
- *   "Www Mmm dd hh:mm:ss yyyy\n"
- * The unwanted '\n' is the 24th character.
- */
+#ifdef HAVE_LIBGCRYPT
+  cap_file_hashes = FALSE;
+#endif /* HAVE_LIBGCRYPT */
+}
 
 static gchar *
-ctime_no_lf(const time_t* timer)
+time_string(time_t timer, capture_info *cf_info, gboolean want_lf)
 {
-  gchar *time_string;
-  time_string = ctime(timer);
-  time_string[24] = '\0';
-  return(time_string);  
+  const gchar *lf = want_lf ? "\n" : "";
+  static gchar time_string_buf[20];
+  char *time_string_ctime;
+
+  if (cf_info->packet_count > 0) {
+    if (time_as_secs) {
+      /* XXX - Would it be useful to show sub-second precision? */
+      g_snprintf(time_string_buf, 20, "%lu%s", (unsigned long)timer, lf);
+      return time_string_buf;
+    } else {
+#ifdef _MSC_VER
+      /* calling localtime(), and thus ctime(), on MSVC 2005 with huge values causes it to crash */
+      /* XXX - find the exact value that still does work */
+      /* XXX - using _USE_32BIT_TIME_T might be another way to circumvent this problem */
+      if (timer > 2000000000) {
+        time_string_ctime = NULL;
+      } else
+#endif
+      time_string_ctime = ctime(&timer);
+      if (time_string_ctime == NULL) {
+       g_snprintf(time_string_buf, 20, "Not representable%s", lf);
+        return time_string_buf;
+      }
+      if (!want_lf) {
+        /*
+         * The ctime() function returns a string formatted as:
+         *   "Www Mmm dd hh:mm:ss yyyy\n"
+         * The unwanted '\n' is the 24th character.
+         */
+        time_string_ctime[24] = '\0';
+      }
+      return time_string_ctime;
+    }
+  }
+
+  g_snprintf(time_string_buf, 15, "n/a%s", lf);
+  return time_string_buf;
 }
 
 static double
@@ -218,7 +300,7 @@ secs_nsecs(const struct wtap_nstime * nstime)
   return (nstime->nsecs / 1000000000.0) + (double)nstime->secs;
 }
 
-static void print_value(gchar *text_p1, gint width, gchar *text_p2, double value) {
+static void print_value(const gchar *text_p1, gint width, const gchar *text_p2, double value) {
   if (value > 0.0)
     printf("%s%.*f%s\n", text_p1, width, value, text_p2);
   else
@@ -228,9 +310,9 @@ static void print_value(gchar *text_p1, gint width, gchar *text_p2, double value
 static void
 print_stats(const gchar *filename, capture_info *cf_info)
 {
-  const gchar          *file_type_string, *file_encap_string;
-  time_t               start_time_t;
-  time_t               stop_time_t;
+  const gchar           *file_type_string, *file_encap_string;
+  time_t                start_time_t;
+  time_t                stop_time_t;
 
   /* Build printable strings for various stats */
   file_type_string = wtap_file_type_string(cf_info->file_type);
@@ -241,16 +323,42 @@ print_stats(const gchar *filename, capture_info *cf_info)
   if (filename)           printf     ("File name:           %s\n", filename);
   if (cap_file_type)      printf     ("File type:           %s\n", file_type_string);
   if (cap_file_encap)     printf     ("File encapsulation:  %s\n", file_encap_string);
+  if (cap_file_encap && (cf_info->file_encap == WTAP_ENCAP_PER_PACKET)) {
+    int i;
+    for (i=0; i<WTAP_NUM_ENCAP_TYPES; i++) {
+      if (cf_info->encap_counts[i] > 0)
+        printf("                       %s\n", wtap_encap_string(i));
+    }
+  }
+  if (cap_snaplen && cf_info->snap_set)
+                          printf     ("Packet size limit:   file hdr: %u bytes\n", cf_info->snaplen);
+  else if(cap_snaplen && !cf_info->snap_set)
+                          printf     ("Packet size limit:   file hdr: (not set)\n");
+  if (cf_info->snaplen_max_inferred > 0) {
+    if (cf_info->snaplen_min_inferred == cf_info->snaplen_max_inferred)
+                          printf     ("Packet size limit:   inferred: %u bytes\n", cf_info->snaplen_min_inferred);
+    else
+                          printf     ("Packet size limit:   inferred: %u bytes - %u bytes (range)\n",
+                                      cf_info->snaplen_min_inferred, cf_info->snaplen_max_inferred);
+  }
   if (cap_packet_count)   printf     ("Number of packets:   %u\n", cf_info->packet_count);
   if (cap_file_size)      printf     ("File size:           %" G_GINT64_MODIFIER "d bytes\n", cf_info->filesize);
   if (cap_data_size)      printf     ("Data size:           %" G_GINT64_MODIFIER "u bytes\n", cf_info->packet_bytes);
-  if (cap_duration)       print_value("Capture duration:    ", 0, " seconds",   cf_info->duration); 
-  if (cap_start_time)     printf     ("Start time:          %s", (cf_info->packet_count>0) ? ctime (&start_time_t) : "n/a\n");
-  if (cap_end_time)       printf     ("End time:            %s", (cf_info->packet_count>0) ? ctime (&stop_time_t)  : "n/a\n");
+  if (cap_duration)       print_value("Capture duration:    ", 0, " seconds",   cf_info->duration);
+  if (cap_start_time)     printf     ("Start time:          %s", time_string(start_time_t, cf_info, TRUE));
+  if (cap_end_time)       printf     ("End time:            %s", time_string(stop_time_t, cf_info, TRUE));
   if (cap_data_rate_byte) print_value("Data byte rate:      ", 2, " bytes/sec",   cf_info->data_rate);
   if (cap_data_rate_bit)  print_value("Data bit rate:       ", 2, " bits/sec",    cf_info->data_rate*8);
   if (cap_packet_size)    printf     ("Average packet size: %.2f bytes\n",        cf_info->packet_size);
   if (cap_packet_rate)    print_value("Average packet rate: ", 2, " packets/sec", cf_info->packet_rate);
+#ifdef HAVE_LIBGCRYPT
+  if (cap_file_hashes) {
+                          printf     ("SHA1:                %s\n", file_sha1);
+                          printf     ("RIPEMD160:           %s\n", file_rmd160);
+                          printf     ("MD5:                 %s\n", file_md5);
+  }
+#endif /* HAVE_LIBGCRYPT */
+  if (cap_in_order)       printf     ("Strict time order:   %s\n", (cf_info->in_order) ? "True" : "False");
 }
 
 static void
@@ -266,7 +374,7 @@ putquote(void)
 }
 
 static void
-print_stats_table_header_label(gchar *label)
+print_stats_table_header_label(const gchar *label)
 {
   putsep();
   putquote();
@@ -283,6 +391,9 @@ print_stats_table_header(void)
 
   if (cap_file_type)      print_stats_table_header_label("File type");
   if (cap_file_encap)     print_stats_table_header_label("File encapsulation");
+  if (cap_snaplen)        print_stats_table_header_label("Packet size limit");
+  if (cap_snaplen)        print_stats_table_header_label("Packet size limit min (inferred)");
+  if (cap_snaplen)        print_stats_table_header_label("Packet size limit max (inferred)");
   if (cap_packet_count)   print_stats_table_header_label("Number of packets");
   if (cap_file_size)      print_stats_table_header_label("File size (bytes)");
   if (cap_data_size)      print_stats_table_header_label("Data size (bytes)");
@@ -293,6 +404,14 @@ print_stats_table_header(void)
   if (cap_data_rate_bit)  print_stats_table_header_label("Data bit rate (bits/sec)");
   if (cap_packet_size)    print_stats_table_header_label("Average packet size (bytes)");
   if (cap_packet_rate)    print_stats_table_header_label("Average packet rate (packets/sec)");
+#ifdef HAVE_LIBGCRYPT
+  if (cap_file_hashes) {
+                          print_stats_table_header_label("SHA1");
+                          print_stats_table_header_label("RIPEMD160");
+                          print_stats_table_header_label("MD5");
+  }
+#endif /* HAVE_LIBGCRYPT */
+  if (cap_in_order)       print_stats_table_header_label("Strict time order");
 
   printf("\n");
 }
@@ -300,9 +419,9 @@ print_stats_table_header(void)
 static void
 print_stats_table(const gchar *filename, capture_info *cf_info)
 {
-  const gchar          *file_type_string, *file_encap_string;
-  time_t               start_time_t;
-  time_t               stop_time_t;
+  const gchar           *file_type_string, *file_encap_string;
+  time_t                start_time_t;
+  time_t                stop_time_t;
 
   /* Build printable strings for various stats */
   file_type_string = wtap_file_type_string(cf_info->file_type);
@@ -323,6 +442,11 @@ print_stats_table(const gchar *filename, capture_info *cf_info)
     putquote();
   }
 
+  /* ToDo: If WTAP_ENCAP_PER_PACKET, show the list of encapsulations encountered;
+   *       Output a line for each different encap with all fields repeated except
+   *        the encapsulation field which has "Per Packet: ..." for each
+   *        encapsulation type seen ?
+   */
   if (cap_file_encap) {
     putsep();
     putquote();
@@ -330,6 +454,36 @@ print_stats_table(const gchar *filename, capture_info *cf_info)
     putquote();
   }
 
+  if (cap_snaplen) {
+    putsep();
+    putquote();
+    if(cf_info->snap_set)
+      printf("%u", cf_info->snaplen);
+    else
+      printf("(not set)");
+    putquote();
+    if (cf_info->snaplen_max_inferred > 0) {
+      putsep();
+      putquote();
+      printf("%u", cf_info->snaplen_min_inferred);
+      putquote();
+      putsep();
+      putquote();
+      printf("%u", cf_info->snaplen_max_inferred);
+      putquote();
+    }
+    else {
+      putsep();
+      putquote();
+      printf("n/a");
+      putquote();
+      putsep();
+      putquote();
+      printf("n/a");
+      putquote();
+    }
+  }
+
   if (cap_packet_count) {
     putsep();
     putquote();
@@ -361,14 +515,14 @@ print_stats_table(const gchar *filename, capture_info *cf_info)
   if (cap_start_time) {
     putsep();
     putquote();
-    printf("%s", (cf_info->packet_count>0) ? ctime_no_lf (&start_time_t) : "n/a");
+    printf("%s", time_string(start_time_t, cf_info, FALSE));
     putquote();
   }
 
   if (cap_end_time) {
     putsep();
     putquote();
-    printf("%s", (cf_info->packet_count>0) ? ctime_no_lf (&stop_time_t) : "n/a");
+    printf("%s", time_string(stop_time_t, cf_info, FALSE));
     putquote();
   }
 
@@ -400,32 +554,69 @@ print_stats_table(const gchar *filename, capture_info *cf_info)
     putquote();
   }
 
+#ifdef HAVE_LIBGCRYPT
+  if (cap_file_hashes) {
+    putsep();
+    putquote();
+    printf("%s", file_sha1);
+    putquote();
+
+    putsep();
+    putquote();
+    printf("%s", file_rmd160);
+    putquote();
+
+    putsep();
+    putquote();
+    printf("%s", file_md5);
+    putquote();
+  }
+#endif /* HAVE_LIBGCRYPT */
+
+  if (cap_in_order) {
+    putsep();
+    putquote();
+    printf("%s", (cf_info->in_order) ? "True" : "False");
+    putquote();
+  }
+
   printf("\n");
 }
 
 static int
 process_cap_file(wtap *wth, const char *filename)
 {
-  int                  err;
-  gchar                        *err_info;
-  gint64               size;
-  gint64               data_offset;
-
-  guint32              packet = 0;
-  gint64               bytes = 0;
+  int                   err;
+  gchar                 *err_info;
+  gint64                size;
+  gint64                data_offset;
+
+  guint32               packet = 0;
+  gint64                bytes  = 0;
+  guint32               snaplen_min_inferred = 0xffffffff;
+  guint32               snaplen_max_inferred =          0;
   const struct wtap_pkthdr *phdr;
-  capture_info         cf_info;
-  double               start_time = 0;
-  double               stop_time = 0;
-  double               cur_time = 0;
+  capture_info          cf_info;
+  double                start_time = 0;
+  double                stop_time  = 0;
+  double                cur_time   = 0;
+  double               prev_time = 0;
+  gboolean             in_order = TRUE;
+
+  cf_info.encap_counts = g_malloc0(WTAP_NUM_ENCAP_TYPES * sizeof(int));
 
   /* Tally up data that we need to parse through the file to find */
   while (wtap_read(wth, &err, &err_info, &data_offset))  {
     phdr = wtap_phdr(wth);
+    prev_time = cur_time;
     cur_time = secs_nsecs(&phdr->ts);
     if(packet==0) {
       start_time = cur_time;
       stop_time = cur_time;
+      prev_time = cur_time;
+    }
+    if (cur_time < prev_time) {
+      in_order = FALSE;
     }
     if (cur_time < start_time) {
       start_time = cur_time;
@@ -433,23 +624,47 @@ process_cap_file(wtap *wth, const char *filename)
     if (cur_time > stop_time) {
       stop_time = cur_time;
     }
+
     bytes+=phdr->len;
     packet++;
-  }
+
+    /* If caplen < len for a rcd, then presumably           */
+    /* 'Limit packet capture length' was done for this rcd. */
+    /* Keep track as to the min/max actual snapshot lengths */
+    /*  seen for this file.                                 */
+    if (phdr->caplen < phdr->len) {
+      if (phdr->caplen < snaplen_min_inferred)
+        snaplen_min_inferred = phdr->caplen;
+      if (phdr->caplen > snaplen_max_inferred)
+        snaplen_max_inferred = phdr->caplen;
+    }
+
+    /* Per-packet encapsulation */
+    if (wtap_file_encap(wth) == WTAP_ENCAP_PER_PACKET) {
+        if ((phdr->pkt_encap > 0) && (phdr->pkt_encap < WTAP_NUM_ENCAP_TYPES)) {
+            cf_info.encap_counts[phdr->pkt_encap] += 1;
+        } else {
+            fprintf(stderr, "capinfos: Unknown per-packet encapsulation: %d [frame number: %d]\n", phdr->pkt_encap, packet);
+        }
+    }
+
+  } /* while */
 
   if (err != 0) {
     fprintf(stderr,
             "capinfos: An error occurred after reading %u packets from \"%s\": %s.\n",
-           packet, filename, wtap_strerror(err));
+            packet, filename, wtap_strerror(err));
     switch (err) {
 
     case WTAP_ERR_UNSUPPORTED:
     case WTAP_ERR_UNSUPPORTED_ENCAP:
-    case WTAP_ERR_BAD_RECORD:
+    case WTAP_ERR_BAD_FILE:
+    case WTAP_ERR_DECOMPRESS:
       fprintf(stderr, "(%s)\n", err_info);
       g_free(err_info);
       break;
     }
+    g_free(cf_info.encap_counts);
     return 1;
   }
 
@@ -458,7 +673,8 @@ process_cap_file(wtap *wth, const char *filename)
   if (size == -1) {
     fprintf(stderr,
             "capinfos: Can't get size of \"%s\": %s.\n",
-           filename, strerror(err));
+            filename, g_strerror(err));
+    g_free(cf_info.encap_counts);
     return 1;
   }
 
@@ -470,6 +686,16 @@ process_cap_file(wtap *wth, const char *filename)
   /* File Encapsulation */
   cf_info.file_encap = wtap_file_encap(wth);
 
+  /* Packet size limit (snaplen) */
+  cf_info.snaplen = wtap_snapshot_length(wth);
+  if(cf_info.snaplen > 0)
+    cf_info.snap_set = TRUE;
+  else
+    cf_info.snap_set = FALSE;
+
+  cf_info.snaplen_min_inferred = snaplen_min_inferred;
+  cf_info.snaplen_max_inferred = snaplen_max_inferred;
+
   /* # of packets */
   cf_info.packet_count = packet;
 
@@ -477,6 +703,7 @@ process_cap_file(wtap *wth, const char *filename)
   cf_info.start_time = start_time;
   cf_info.stop_time = stop_time;
   cf_info.duration = stop_time-start_time;
+  cf_info.in_order = in_order;
 
   /* Number of packet bytes */
   cf_info.packet_bytes = bytes;
@@ -486,7 +713,7 @@ process_cap_file(wtap *wth, const char *filename)
   cf_info.packet_size = 0.0;
 
   if (packet > 0) {
-    if (cf_info.duration > 0.0) { 
+    if (cf_info.duration > 0.0) {
       cf_info.data_rate   = (double)bytes  / (stop_time-start_time); /* Data rate per second */
       cf_info.packet_rate = (double)packet / (stop_time-start_time); /* packet rate per second */
     }
@@ -499,6 +726,8 @@ process_cap_file(wtap *wth, const char *filename)
     print_stats_table(filename, &cf_info);
   }
 
+  g_free(cf_info.encap_counts);
+
   return 0;
 }
 
@@ -517,9 +746,9 @@ usage(gboolean is_error)
 
   fprintf(output, "Capinfos %s"
 #ifdef SVNVERSION
-         " (" SVNVERSION " from " SVNPATH ")"
+          " (" SVNVERSION " from " SVNPATH ")"
 #endif
-         "\n", VERSION);
+          "\n", VERSION);
   fprintf(output, "Prints various information (infos) about capture files.\n");
   fprintf(output, "See http://www.wireshark.org for more information.\n");
   fprintf(output, "\n");
@@ -528,16 +757,22 @@ usage(gboolean is_error)
   fprintf(output, "General infos:\n");
   fprintf(output, "  -t display the capture file type\n");
   fprintf(output, "  -E display the capture file encapsulation\n");
+#ifdef HAVE_LIBGCRYPT
+  fprintf(output, "  -H display the SHA1, RMD160, and MD5 hashes of the file\n");
+#endif
   fprintf(output, "\n");
   fprintf(output, "Size infos:\n");
   fprintf(output, "  -c display the number of packets\n");
   fprintf(output, "  -s display the size of the file (in bytes)\n");
   fprintf(output, "  -d display the total length of all packets (in bytes)\n");
+  fprintf(output, "  -l display the packet size limit (snapshot length)\n");
   fprintf(output, "\n");
   fprintf(output, "Time infos:\n");
   fprintf(output, "  -u display the capture duration (in seconds)\n");
   fprintf(output, "  -a display the capture start time\n");
   fprintf(output, "  -e display the capture end time\n");
+  fprintf(output, "  -o display the capture file chronological status (True/False)\n");
+  fprintf(output, "  -S display start and end times as seconds\n");
   fprintf(output, "\n");
   fprintf(output, "Statistic infos:\n");
   fprintf(output, "  -y display average data rate (in bytes/sec)\n");
@@ -571,6 +806,9 @@ usage(gboolean is_error)
   fprintf(output, "\n");
   fprintf(output, "If no options are given the default is to display all infos in long report\n");
   fprintf(output, "output format.\n");
+#ifndef HAVE_LIBGCRYPT
+  fprintf(output, "\nFile hashing support (-H) is not present.\n");
+#endif
 }
 
 #ifdef HAVE_PLUGINS
@@ -582,43 +820,65 @@ usage(gboolean is_error)
 static void
 failure_message(const char *msg_format _U_, va_list ap _U_)
 {
-       return;
+  return;
 }
 #endif
 
+#ifdef HAVE_LIBGCRYPT
+static void
+hash_to_str(const unsigned char *hash, size_t length, char *str) {
+  int i;
+
+  for (i = 0; i < (int) length; i++) {
+    g_snprintf(str+(i*2), 3, "%02x", hash[i]);
+  }
+}
+#endif /* HAVE_LIBGCRYPT */
 
 int
 main(int argc, char *argv[])
 {
-  wtap *wth;
-  int err;
+  wtap  *wth;
+  int    err;
   gchar *err_info;
-  int opt;
+  int    opt;
+  int    overall_error_status;
+
   int status = 0;
 #ifdef HAVE_PLUGINS
-  char* init_progfile_dir_error;
+  char  *init_progfile_dir_error;
+#endif
+#ifdef HAVE_LIBGCRYPT
+  FILE  *fh;
+  char  *hash_buf = NULL;
+  gcry_md_hd_t hd = NULL;
+  size_t hash_bytes;
 #endif
 
+#ifdef _WIN32
+  arg_list_utf_16to8(argc, argv);
+#endif /* _WIN32 */
+
   /*
    * Get credential information for later use.
    */
-  get_credential_info();
+  init_process_policies();
 
 #ifdef HAVE_PLUGINS
   /* Register wiretap plugins */
 
-    if ((init_progfile_dir_error = init_progfile_dir(argv[0], main))) {
-               g_warning("capinfos: init_progfile_dir(): %s", init_progfile_dir_error);
-               g_free(init_progfile_dir_error);
-    } else {
-               init_report_err(failure_message,NULL,NULL,NULL);
-               init_plugins();
-    }
+  if ((init_progfile_dir_error = init_progfile_dir(argv[0], main))) {
+    g_warning("capinfos: init_progfile_dir(): %s", init_progfile_dir_error);
+    g_free(init_progfile_dir_error);
+  } else {
+    init_report_err(failure_message,NULL,NULL,NULL);
+    init_plugins();
+  }
 #endif
 
   /* Process the options */
 
-  while ((opt = getopt(argc, argv, "tEcsduaeyizvhxCALTRrNqQBmb")) !=-1) {
+  while ((opt = getopt(argc, argv, "tEcs" FILE_HASH_OPT "dluaeyizvhxoCALTRrSNqQBmb")) !=-1) {
 
     switch (opt) {
 
@@ -632,6 +892,11 @@ main(int argc, char *argv[])
       cap_file_encap = TRUE;
       break;
 
+    case 'l':
+      if (report_all_infos) disable_all_infos();
+      cap_snaplen = TRUE;
+      break;
+
     case 'c':
       if (report_all_infos) disable_all_infos();
       cap_packet_count = TRUE;
@@ -662,6 +927,10 @@ main(int argc, char *argv[])
       cap_end_time = TRUE;
       break;
 
+    case 'S':
+      time_as_secs = TRUE;
+      break;
+
     case 'y':
       if (report_all_infos) disable_all_infos();
       cap_data_rate_byte = TRUE;
@@ -682,6 +951,18 @@ main(int argc, char *argv[])
       cap_packet_rate = TRUE;
       break;
 
+#ifdef HAVE_LIBGCRYPT
+    case 'H':
+      if (report_all_infos) disable_all_infos();
+      cap_file_hashes = TRUE;
+      break;
+#endif
+
+    case 'o':
+      if (report_all_infos) disable_all_infos();
+      cap_in_order = TRUE;
+      break;
+
     case 'C':
       continue_after_wtap_open_offline_failure = FALSE;
       break;
@@ -751,24 +1032,60 @@ main(int argc, char *argv[])
     print_stats_table_header();
   }
 
+#ifdef HAVE_LIBGCRYPT
+  if (cap_file_hashes) {
+    gcry_check_version(NULL);
+    gcry_md_open(&hd, GCRY_MD_SHA1, 0);
+    if (hd) {
+      gcry_md_enable(hd, GCRY_MD_RMD160);
+      gcry_md_enable(hd, GCRY_MD_MD5);
+    }
+    hash_buf = (char *)g_malloc(HASH_BUF_SIZE);
+  }
+#endif
+
+  overall_error_status = 0;
+
   for (opt = optind; opt < argc; opt++) {
 
+#ifdef HAVE_LIBGCRYPT
+    g_strlcpy(file_sha1, "<unknown>", HASH_STR_SIZE);
+    g_strlcpy(file_rmd160, "<unknown>", HASH_STR_SIZE);
+    g_strlcpy(file_md5, "<unknown>", HASH_STR_SIZE);
+
+    if (cap_file_hashes) {
+      fh = ws_fopen(argv[opt], "rb");
+      if (fh && hd) {
+        while((hash_bytes = fread(hash_buf, 1, HASH_BUF_SIZE, fh)) > 0) {
+          gcry_md_write(hd, hash_buf, hash_bytes);
+        }
+        gcry_md_final(hd);
+        hash_to_str(gcry_md_read(hd, GCRY_MD_SHA1), HASH_SIZE_SHA1, file_sha1);
+        hash_to_str(gcry_md_read(hd, GCRY_MD_RMD160), HASH_SIZE_RMD160, file_rmd160);
+        hash_to_str(gcry_md_read(hd, GCRY_MD_MD5), HASH_SIZE_MD5, file_md5);
+      }
+      if (fh) fclose(fh);
+      if (hd) gcry_md_reset(hd);
+    }
+#endif /* HAVE_LIBGCRYPT */
+
     wth = wtap_open_offline(argv[opt], &err, &err_info, FALSE);
 
     if (!wth) {
       fprintf(stderr, "capinfos: Can't open %s: %s\n", argv[opt],
-       wtap_strerror(err));
+        wtap_strerror(err));
       switch (err) {
 
       case WTAP_ERR_UNSUPPORTED:
       case WTAP_ERR_UNSUPPORTED_ENCAP:
-      case WTAP_ERR_BAD_RECORD:
+      case WTAP_ERR_BAD_FILE:
         fprintf(stderr, "(%s)\n", err_info);
         g_free(err_info);
         break;
       }
+      overall_error_status = 1; /* remember that an error has occurred */
       if(!continue_after_wtap_open_offline_failure)
-        exit(1);
+        exit(1); /* error status */
     }
 
     if(wth) {
@@ -781,6 +1098,5 @@ main(int argc, char *argv[])
         exit(status);
     }
   }
-  return 0;
+  return overall_error_status;
 }
-