File: Add BTSNOOP File Format support

BTSNOOP format is supported by libwiretap and this dissector add
ability to open the same file in second mode:
1. Wireshark aka Protocol Viewer (default)
2. Fileshark aka File Viewer

Mode 2 also has feature to dissect protocols contained by this file,
try "Protocol Preferences -> Dissect next layer".

Change-Id: I99f0df5b55d31bf5a7d6e9269bfc054c09022b51
Reviewed-on: https://code.wireshark.org/review/17
Reviewed-by: Evan Huus <eapache@gmail.com>
Petri-Dish: Evan Huus <eapache@gmail.com>
Tested-by: Petri Dish Buildbot <buildbot-no-reply@wireshark.org>
Reviewed-by: Anders Broman <a.broman58@gmail.com>

5 files changed, 350 insertions, 4 deletions

diff --git a/epan/CMakeLists.txt b/epan/CMakeLists.txt
index 36d141bf0d..0c2173f25c 100644
--- a/epan/CMakeLists.txt
+++ b/epan/CMakeLists.txt
@@ -311,6 +311,7 @@ set(DIRTY_CORBA_IDL_DISSECTOR_SRC
 )
 
 set(DISSECTOR_SRC
+	dissectors/file-btsnoop.c
 	dissectors/file-elf.c
 	dissectors/file-file.c
 	dissectors/file-gif.c
diff --git a/epan/dissectors/Makefile.common b/epan/dissectors/Makefile.common
index 6f08a14dd6..1cb115207f 100644
--- a/epan/dissectors/Makefile.common
+++ b/epan/dissectors/Makefile.common
@@ -223,6 +223,7 @@ DIRTY_CORBA_IDL_DISSECTOR_SRC = \
 	packet-tango.c
 
 FILE_DISSECTOR_SRC = \
+	file-btsnoop.c \
 	file-elf.c	\
 	file-file.c	\
 	file-gif.c	\
diff --git a/epan/dissectors/file-btsnoop.c b/epan/dissectors/file-btsnoop.c
new file mode 100644
index 0000000000..84d740cd85
--- /dev/null
+++ b/epan/dissectors/file-btsnoop.c
@@ -0,0 +1,342 @@
+/* file-btsnoop.c
+ * Routines for BTSNOOP File Format
+ *
+ * Copyright 2014, Michal Labedzki for Tieto Corporation
+ *
+ * Wireshark - Network traffic analyzer
+ * By Gerald Combs <gerald@wireshark.org>
+ * Copyright 1998 Gerald Combs
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+ */
+
+#include "config.h"
+
+#include <epan/packet.h>
+#include <epan/prefs.h>
+#include <epan/expert.h>
+#include <epan/wmem/wmem.h>
+
+#include <wiretap/wtap.h>
+
+static dissector_handle_t btsnoop_handle;
+static dissector_handle_t hci_h1_handle;
+static dissector_handle_t hci_h4_handle;
+static dissector_handle_t hci_mon_handle;
+
+static int proto_btsnoop = -1;
+
+static int hf_btsnoop_header = -1;
+static int hf_btsnoop_magic_bytes = -1;
+static int hf_btsnoop_version = -1;
+static int hf_btsnoop_datalink = -1;
+static int hf_btsnoop_frame = -1;
+static int hf_btsnoop_origin_length = -1;
+static int hf_btsnoop_included_length = -1;
+static int hf_btsnoop_flags = -1;
+static int hf_btsnoop_cumulative_dropped_packets = -1;
+static int hf_btsnoop_timestamp_microseconds = -1;
+static int hf_btsnoop_payload = -1;
+static int hf_btsnoop_flags_h1_reserved = -1;
+static int hf_btsnoop_flags_h1_channel_type = -1;
+static int hf_btsnoop_flags_h1_direction = -1;
+static int hf_btsnoop_flags_h4_reserved = -1;
+static int hf_btsnoop_flags_h4_direction = -1;
+static int hf_btsnoop_flags_linux_monitor_opcode = -1;
+static int hf_btsnoop_flags_linux_monitor_adapter_id = -1;
+
+static expert_field ei_malformed_frame = EI_INIT;
+
+static gint ett_btsnoop = -1;
+static gint ett_btsnoop_header = -1;
+static gint ett_btsnoop_frame = -1;
+static gint ett_btsnoop_flags = -1;
+
+extern value_string_ext hci_mon_opcode_vals_ext;
+
+static const value_string datalink_vals[] = {
+    { 1001,  "H1" },
+    { 1002,  "H4 (UART)" },
+    { 1003,  "BCSP" },
+    { 1004,  "H5 (3 Wire)" },
+    { 2001,  "Linux Monitor" },
+    { 2002,  "Simulator" },
+    { 0, NULL }
+};
+
+static const value_string flags_direction_vals[] = {
+    { 0x00,  "Received" },
+    { 0x01,  "Sent" },
+    { 0, NULL }
+};
+
+static const value_string flags_h1_channel_type_vals[] = {
+    { 0x00,  "ACL" },
+    { 0x01,  "HCI" },
+    { 0, NULL }
+};
+
+void proto_register_btsnoop(void);
+void proto_reg_handoff_btsnoop(void);
+
+static int
+dissect_btsnoop(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree, void *data _U_)
+{
+    static const guint8 magic[] = { 'b', 't', 's', 'n', 'o', 'o', 'p', 0};
+    gint             offset = 0;
+    guint32          datalink;
+    guint32          length;
+    proto_tree      *main_tree;
+    proto_item      *main_item;
+    proto_tree      *header_tree;
+    proto_item      *header_item;
+    proto_tree      *frame_tree;
+    proto_item      *frame_item;
+    proto_tree      *flags_tree;
+    proto_item      *flags_item;
+    static guint32   frame_number = 1;
+    nstime_t         timestamp;
+    guint64          ts;
+
+    if (tvb_memeql(tvb, 0, magic, sizeof(magic)) != 0)
+        return 0;
+
+    if (offset == 0) frame_number = 1;
+
+    main_item = proto_tree_add_item(tree, proto_btsnoop, tvb, offset, -1, ENC_NA);
+    main_tree = proto_item_add_subtree(main_item, ett_btsnoop);
+
+    header_item = proto_tree_add_item(main_tree, hf_btsnoop_header, tvb, offset, sizeof(magic) + 4 + 4, ENC_NA);
+    header_tree = proto_item_add_subtree(header_item, ett_btsnoop_header);
+
+    proto_tree_add_item(header_tree, hf_btsnoop_magic_bytes, tvb, offset, sizeof(magic), ENC_ASCII | ENC_NA);
+    offset += sizeof(magic);
+
+    proto_tree_add_item(header_tree, hf_btsnoop_version, tvb, offset, 4, ENC_BIG_ENDIAN);
+    offset += 4;
+
+    proto_tree_add_item(header_tree, hf_btsnoop_datalink, tvb, offset, 4, ENC_BIG_ENDIAN);
+    datalink = tvb_get_ntohl(tvb, offset);
+    offset += 4;
+
+    while (tvb_reported_length_remaining(tvb, offset) > 0) {
+        frame_item = proto_tree_add_item(main_tree, hf_btsnoop_frame, tvb, offset, 0, ENC_NA);
+        frame_tree = proto_item_add_subtree(frame_item, ett_btsnoop_frame);
+
+        if (tvb_reported_length_remaining(tvb, offset) < 4 * 4 + 8) {
+            expert_add_info(pinfo, frame_item, &ei_malformed_frame);
+        }
+
+        proto_item_append_text(frame_item, " %u", frame_number);
+
+        proto_tree_add_item(frame_tree, hf_btsnoop_origin_length, tvb, offset, 4, ENC_BIG_ENDIAN);
+        offset += 4;
+
+        proto_tree_add_item(frame_tree, hf_btsnoop_included_length, tvb, offset, 4, ENC_BIG_ENDIAN);
+        length = tvb_get_ntohl(tvb, offset);
+        offset += 4;
+
+        flags_item = proto_tree_add_item(frame_tree, hf_btsnoop_flags, tvb, offset, 4, ENC_BIG_ENDIAN);
+        flags_tree = proto_item_add_subtree(flags_item, ett_btsnoop_flags);
+        switch (datalink) {
+        case 1001: /* H1 */
+            proto_tree_add_item(flags_tree, hf_btsnoop_flags_h1_reserved, tvb, offset, 4, ENC_BIG_ENDIAN);
+            proto_tree_add_item(flags_tree, hf_btsnoop_flags_h1_channel_type, tvb, offset, 4, ENC_BIG_ENDIAN);
+            proto_tree_add_item(flags_tree, hf_btsnoop_flags_h1_direction, tvb, offset, 4, ENC_BIG_ENDIAN);
+            break;
+        case 1002: /* H4 */
+            proto_tree_add_item(flags_tree, hf_btsnoop_flags_h4_reserved, tvb, offset, 4, ENC_BIG_ENDIAN);
+            proto_tree_add_item(flags_tree, hf_btsnoop_flags_h4_direction, tvb, offset, 4, ENC_BIG_ENDIAN);
+            break;
+        case 2001: /* Linux Monitor */
+            proto_tree_add_item(flags_tree, hf_btsnoop_flags_linux_monitor_adapter_id, tvb, offset , 2, ENC_BIG_ENDIAN);
+            proto_tree_add_item(flags_tree, hf_btsnoop_flags_linux_monitor_opcode, tvb, offset + 2, 2, ENC_BIG_ENDIAN);
+            break;
+        }
+        offset += 4;
+
+        proto_tree_add_item(frame_tree, hf_btsnoop_cumulative_dropped_packets, tvb, offset, 4, ENC_BIG_ENDIAN);
+        offset += 4;
+
+        ts =  tvb_get_ntoh64(tvb, offset) - G_GINT64_CONSTANT(0x00dcddb30f2f8000);
+        timestamp.secs = (guint)(ts / 1000000);
+        timestamp.nsecs =(guint)((ts % 1000000) * 1000);
+
+        proto_tree_add_time(frame_tree, hf_btsnoop_timestamp_microseconds, tvb, offset, 8, &timestamp);
+        offset += 8;
+
+        proto_tree_add_item(frame_tree, hf_btsnoop_payload, tvb, offset, length, ENC_NA);
+        offset += length;
+
+        proto_item_set_len(frame_item, 4 * 4 + 8 + length);
+        frame_number += 1;
+    }
+
+    return offset;
+}
+
+static gboolean
+dissect_btsnoop_heur(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree, void *data _U_)
+{
+    return dissect_btsnoop(tvb, pinfo, tree, NULL) > 0;
+}
+
+void
+proto_register_btsnoop(void)
+{
+    module_t         *module;
+    expert_module_t  *expert_module;
+
+    static hf_register_info hf[] = {
+        { &hf_btsnoop_header,
+            { "Header",                                    "btsnoop.header",
+            FT_NONE, BASE_NONE, NULL, 0x00,
+            NULL, HFILL }
+        },
+        { &hf_btsnoop_magic_bytes,
+            { "Magic Bytes",                               "btsnoop.header.magic_bytes",
+            FT_STRINGZ, BASE_NONE, NULL, 0x00,
+            NULL, HFILL }
+        },
+        { &hf_btsnoop_version,
+            { "Version",                                   "btsnoop.header.version",
+            FT_UINT32, BASE_DEC, NULL, 0x00,
+            NULL, HFILL }
+        },
+        { &hf_btsnoop_datalink,
+            { "Datalink",                                  "btsnoop.header.datalink",
+            FT_UINT32, BASE_DEC_HEX, VALS(datalink_vals), 0x00,
+            NULL, HFILL }
+        },
+        { &hf_btsnoop_frame,
+            { "Frame",                                     "btsnoop.frame",
+            FT_NONE, BASE_NONE, NULL, 0x00,
+            NULL, HFILL }
+        },
+        { &hf_btsnoop_origin_length,
+            { "Origin Length",                             "btsnoop.frame.origin_length",
+            FT_UINT32, BASE_DEC, NULL, 0x00,
+            NULL, HFILL }
+        },
+        { &hf_btsnoop_included_length,
+            { "Included Length",                           "btsnoop.frame.included_length",
+            FT_UINT32, BASE_DEC, NULL, 0x00,
+            NULL, HFILL }
+        },
+        { &hf_btsnoop_flags,
+            { "Flags",                                     "btsnoop.frame.flags",
+            FT_UINT32, BASE_HEX, NULL, 0x00,
+            NULL, HFILL }
+        },
+        { &hf_btsnoop_cumulative_dropped_packets,
+            { "Cumulative Dropped Packets",                "btsnoop.frame.cumulative_dropped_packets",
+            FT_UINT32, BASE_DEC, NULL, 0x00,
+            NULL, HFILL }
+        },
+        { &hf_btsnoop_timestamp_microseconds,
+            { "Timestamp Microseconds",                    "btsnoop.frame.timestamp_microseconds",
+            FT_ABSOLUTE_TIME, ABSOLUTE_TIME_LOCAL, NULL, 0x00,
+            NULL, HFILL }
+        },
+        { &hf_btsnoop_payload,
+            { "Payload",                                   "btsnoop.frame.payload",
+            FT_NONE, BASE_NONE, NULL, 0x00,
+            NULL, HFILL }
+        },
+        { &hf_btsnoop_flags_h1_reserved,
+            { "Reserved",                                  "btsnoop.frame.flags.h1.reserved",
+            FT_UINT32, BASE_HEX, NULL, 0xFFFFFFFC,
+            NULL, HFILL }
+        },
+        { &hf_btsnoop_flags_h1_channel_type,
+            { "Channel Type",                              "btsnoop.frame.flags.h1.channel_type",
+            FT_UINT32, BASE_DEC, VALS(flags_h1_channel_type_vals), 0x02,
+            NULL, HFILL }
+        },
+        { &hf_btsnoop_flags_h1_direction,
+            { "Direction",                                 "btsnoop.frame.flags.h1.direction",
+            FT_UINT32, BASE_DEC, VALS(flags_direction_vals), 0x01,
+            NULL, HFILL }
+        },
+        { &hf_btsnoop_flags_h4_reserved,
+            { "Reserved",                                  "btsnoop.frame.flags.h4.reserved",
+            FT_UINT32, BASE_HEX, NULL, 0xFFFFFFFE,
+            NULL, HFILL }
+        },
+        { &hf_btsnoop_flags_h4_direction,
+            { "Direction",                                 "btsnoop.frame.flags.h4.direction",
+            FT_UINT32, BASE_DEC, VALS(flags_direction_vals), 0x01,
+            NULL, HFILL }
+        },
+        { &hf_btsnoop_flags_linux_monitor_opcode,
+            { "Opcode",                                    "btsnoop.frame.flags.linux_monitor.opcode",
+            FT_UINT16, BASE_HEX | BASE_EXT_STRING, &hci_mon_opcode_vals_ext, 0x00,
+            NULL, HFILL }
+        },
+        { &hf_btsnoop_flags_linux_monitor_adapter_id,
+            { "Adapter ID",                                "btsnoop.frame.flags.linux_monitor.adapter_id",
+            FT_UINT16, BASE_DEC, NULL, 0x00,
+            NULL, HFILL }
+        }
+    };
+
+    static ei_register_info ei[] = {
+        { &ei_malformed_frame,       { "btsnoop.malformed_frame", PI_PROTOCOL, PI_WARN, "Malformed Frame", EXPFILL }},
+    };
+
+    static gint *ett[] = {
+        &ett_btsnoop,
+        &ett_btsnoop_header,
+        &ett_btsnoop_frame,
+        &ett_btsnoop_flags,
+    };
+
+    proto_btsnoop = proto_register_protocol("Symbian OS BTSNOOP File Format", "BTSNOOP", "btsnoop");
+    proto_register_field_array(proto_btsnoop, hf, array_length(hf));
+    proto_register_subtree_array(ett, array_length(ett));
+
+    btsnoop_handle = new_register_dissector("btsnoop", dissect_btsnoop, proto_btsnoop);
+
+    module = prefs_register_protocol(proto_btsnoop, NULL);
+    prefs_register_static_text_preference(module, "version",
+            "BTSNOOP version: 1",
+            "Version of file-format supported by this dissector.");
+
+    expert_module = expert_register_protocol(proto_btsnoop);
+    expert_register_field_array(expert_module, ei, array_length(ei));
+}
+
+void
+proto_reg_handoff_btsnoop(void)
+{
+    hci_h1_handle = find_dissector("hci_h1");
+    hci_h4_handle = find_dissector("hci_h4");
+    hci_mon_handle = find_dissector("hci_mon");
+
+    heur_dissector_add("wtap_file", dissect_btsnoop_heur, proto_btsnoop);
+}
+
+/*
+ * Editor modelines  -  http://www.wireshark.org/tools/modelines.html
+ *
+ * Local variables:
+ * c-basic-offset: 4
+ * tab-width: 8
+ * indent-tabs-mode: nil
+ * End:
+ *
+ * vi: set shiftwidth=4 tabstop=8 expandtab:
+ * :indentSize=4:tabSize=8:noTabs=true:
+ */
diff --git a/epan/dissectors/packet-hci_mon.c b/epan/dissectors/packet-hci_mon.c
index ab9af58214..78262629f9 100644
--- a/epan/dissectors/packet-hci_mon.c
+++ b/epan/dissectors/packet-hci_mon.c
@@ -63,7 +63,7 @@ static const value_string opcode_vals[] = {
     { 0x07,  "SCO Rx Packet" },
     { 0x00, NULL }
 };
-static value_string_ext(opcode_vals_ext) = VALUE_STRING_EXT_INIT(opcode_vals);
+value_string_ext(hci_mon_opcode_vals_ext) = VALUE_STRING_EXT_INIT(opcode_vals);
 
 static const value_string type_vals[] = {
     { 0x00,  "Virtual" },
@@ -147,7 +147,7 @@ dissect_hci_mon(tvbuff_t *tvb, packet_info *pinfo, proto_tree *tree, void *data)
     PROTO_ITEM_SET_GENERATED(sub_item);
 
     col_append_fstr(pinfo->cinfo, COL_INFO, "Adapter Id: %u, Opcode: %s",
-            adapter_id, val_to_str_ext_const(opcode, &opcode_vals_ext, "Unknown"));
+            adapter_id, val_to_str_ext_const(opcode, &hci_mon_opcode_vals_ext, "Unknown"));
 
     bluetooth_data->adapter_id = adapter_id;
 
@@ -261,7 +261,7 @@ proto_register_hci_mon(void)
         },
         {  &hf_opcode,
             { "Opcode",                          "hci_mon.opcode",
-            FT_UINT16, BASE_HEX | BASE_EXT_STRING, &opcode_vals_ext, 0x00,
+            FT_UINT16, BASE_HEX | BASE_EXT_STRING, &hci_mon_opcode_vals_ext, 0x00,
             NULL, HFILL }
         },
         {  &hf_type,
diff --git a/wiretap/mime_file.c b/wiretap/mime_file.c
index b4a28d6a8c..933846a538 100644
--- a/wiretap/mime_file.c
+++ b/wiretap/mime_file.c
@@ -70,6 +70,7 @@ static const guint8 png_magic[]    = { 0x89, 'P', 'N', 'G', '\r', '\n', 0x1A, '\
 static const guint8 gif87a_magic[] = { 'G', 'I', 'F', '8', '7', 'a'};
 static const guint8 gif89a_magic[] = { 'G', 'I', 'F', '8', '9', 'a'};
 static const guint8 elf_magic[]    = { 0x7F, 'E', 'L', 'F'};
+static const guint8 btsnoop_magic[]    = { 'b', 't', 's', 'n', 'o', 'o', 'p', 0};
 
 static const mime_files_t magic_files[] = {
 	{ jpeg_jfif_magic, sizeof(jpeg_jfif_magic) },
@@ -77,7 +78,8 @@ static const mime_files_t magic_files[] = {
 	{ png_magic, sizeof(png_magic) },
 	{ gif87a_magic, sizeof(gif87a_magic) },
 	{ gif89a_magic, sizeof(gif89a_magic) },
-	{ elf_magic, sizeof(elf_magic) }
+	{ elf_magic, sizeof(elf_magic) },
+	{ btsnoop_magic, sizeof(btsnoop_magic) }
 };
 
 #define	N_MAGIC_TYPES	(sizeof(magic_files) / sizeof(magic_files[0]))