*
* BlueZ - Bluetooth protocol stack for Linux
*
- * Copyright (C) 2011-2012 Intel Corporation
- * Copyright (C) 2004-2010 Marcel Holtmann <marcel@holtmann.org>
+ * Copyright (C) 2011-2014 Intel Corporation
+ * Copyright (C) 2002-2010 Marcel Holtmann <marcel@holtmann.org>
*
*
- * 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 library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
*
- * This program is distributed in the hope that it will be useful,
+ * This library 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.
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser 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
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
*
*/
#include <sys/stat.h>
#include <arpa/inet.h>
-#include "btsnoop.h"
-
-static inline uint64_t ntoh64(uint64_t n)
-{
- uint64_t h;
- uint64_t tmp = ntohl(n & 0x00000000ffffffff);
-
- h = ntohl(n >> 32);
- h |= tmp << 32;
+#include "lib/bluetooth.h"
+#include "lib/hci.h"
- return h;
-}
-
-#define hton64(x) ntoh64(x)
+#include "btsnoop.h"
struct btsnoop_hdr {
uint8_t id[8]; /* Identification Pattern */
0x6f, 0x6f, 0x70, 0x00 };
static const uint32_t btsnoop_version = 1;
-static const uint32_t btsnoop_type = 1001;
+static uint32_t btsnoop_type = 0;
static int btsnoop_fd = -1;
static uint16_t btsnoop_index = 0xffff;
-void btsnoop_open(const char *path)
+void btsnoop_create(const char *path, uint32_t type)
{
+ struct btsnoop_hdr hdr;
+ ssize_t written;
+
if (btsnoop_fd >= 0)
return;
- btsnoop_fd = open(path, O_WRONLY | O_CREAT | O_TRUNC,
+ btsnoop_fd = open(path, O_WRONLY | O_CREAT | O_TRUNC | O_CLOEXEC,
S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH);
+ if (btsnoop_fd < 0)
+ return;
+
+ btsnoop_type = type;
+
+ memcpy(hdr.id, btsnoop_id, sizeof(btsnoop_id));
+ hdr.version = htobe32(btsnoop_version);
+ hdr.type = htobe32(btsnoop_type);
+
+ written = write(btsnoop_fd, &hdr, BTSNOOP_HDR_SIZE);
+ if (written < 0) {
+ close(btsnoop_fd);
+ btsnoop_fd = -1;
+ return;
+ }
}
-void btsnoop_write(struct timeval *tv, uint16_t index, uint32_t flags,
+void btsnoop_write(struct timeval *tv, uint32_t flags,
const void *data, uint16_t size)
{
- struct btsnoop_hdr hdr;
struct btsnoop_pkt pkt;
uint64_t ts;
ssize_t written;
+ ts = (tv->tv_sec - 946684800ll) * 1000000ll + tv->tv_usec;
+
+ pkt.size = htobe32(size);
+ pkt.len = htobe32(size);
+ pkt.flags = htobe32(flags);
+ pkt.drops = htobe32(0);
+ pkt.ts = htobe64(ts + 0x00E03AB44A676000ll);
+
+ written = write(btsnoop_fd, &pkt, BTSNOOP_PKT_SIZE);
+ if (written < 0)
+ return;
+
+ if (data && size > 0) {
+ written = write(btsnoop_fd, data, size);
+ if (written < 0)
+ return;
+ }
+}
+
+static uint32_t get_flags_from_opcode(uint16_t opcode)
+{
+ switch (opcode) {
+ case BTSNOOP_OPCODE_NEW_INDEX:
+ case BTSNOOP_OPCODE_DEL_INDEX:
+ break;
+ case BTSNOOP_OPCODE_COMMAND_PKT:
+ return 0x02;
+ case BTSNOOP_OPCODE_EVENT_PKT:
+ return 0x03;
+ case BTSNOOP_OPCODE_ACL_TX_PKT:
+ return 0x00;
+ case BTSNOOP_OPCODE_ACL_RX_PKT:
+ return 0x01;
+ case BTSNOOP_OPCODE_SCO_TX_PKT:
+ case BTSNOOP_OPCODE_SCO_RX_PKT:
+ break;
+ }
+
+ return 0xff;
+}
+
+void btsnoop_write_hci(struct timeval *tv, uint16_t index, uint16_t opcode,
+ const void *data, uint16_t size)
+{
+ uint32_t flags;
+
if (!tv)
return;
if (btsnoop_fd < 0)
return;
- if (btsnoop_index == 0xffff) {
- memcpy(hdr.id, btsnoop_id, sizeof(btsnoop_id));
- hdr.version = htonl(btsnoop_version);
- hdr.type = htonl(btsnoop_type);
+ switch (btsnoop_type) {
+ case BTSNOOP_TYPE_HCI:
+ if (btsnoop_index == 0xffff)
+ btsnoop_index = index;
- written = write(btsnoop_fd, &hdr, BTSNOOP_HDR_SIZE);
- if (written < 0)
+ if (index != btsnoop_index)
+ return;
+
+ flags = get_flags_from_opcode(opcode);
+ if (flags == 0xff)
return;
+ break;
+
+ case BTSNOOP_TYPE_MONITOR:
+ flags = (index << 16) | opcode;
+ break;
- btsnoop_index = index;
+ default:
+ return;
}
- if (index != btsnoop_index)
+ btsnoop_write(tv, flags, data, size);
+}
+
+void btsnoop_write_phy(struct timeval *tv, uint16_t frequency,
+ const void *data, uint16_t size)
+{
+ uint32_t flags;
+
+ if (!tv)
return;
- ts = (tv->tv_sec - 946684800ll) * 1000000ll + tv->tv_usec;
+ if (btsnoop_fd < 0)
+ return;
- pkt.size = htonl(size);
- pkt.len = htonl(size);
- pkt.flags = htonl(flags);
- pkt.drops = htonl(0);
- pkt.ts = hton64(ts + 0x00E03AB44A676000ll);
+ switch (btsnoop_type) {
+ case BTSNOOP_TYPE_SIMULATOR:
+ flags = (1 << 16) | frequency;
+ break;
- written = write(btsnoop_fd, &pkt, BTSNOOP_PKT_SIZE);
- if (written < 0)
+ default:
return;
+ }
- if (data && size > 0) {
- written = write(btsnoop_fd, data, size);
- if (written < 0)
- return;
+ btsnoop_write(tv, flags, data, size);
+}
+
+int btsnoop_open(const char *path, uint32_t *type)
+{
+ struct btsnoop_hdr hdr;
+ ssize_t len;
+
+ if (btsnoop_fd >= 0) {
+ fprintf(stderr, "Too many open files\n");
+ return -1;
+ }
+
+ btsnoop_fd = open(path, O_RDONLY | O_CLOEXEC);
+ if (btsnoop_fd < 0) {
+ perror("Failed to open file");
+ return -1;
+ }
+
+ len = read(btsnoop_fd, &hdr, BTSNOOP_HDR_SIZE);
+ if (len < 0 || len != BTSNOOP_HDR_SIZE) {
+ perror("Failed to read header");
+ close(btsnoop_fd);
+ btsnoop_fd = -1;
+ return -1;
+ }
+
+ if (memcmp(hdr.id, btsnoop_id, sizeof(btsnoop_id))) {
+ fprintf(stderr, "Invalid btsnoop header\n");
+ close(btsnoop_fd);
+ btsnoop_fd = -1;
+ return -1;
+ }
+
+ if (be32toh(hdr.version) != btsnoop_version) {
+ fprintf(stderr, "Invalid btsnoop version\n");
+ close(btsnoop_fd);
+ btsnoop_fd = -1;
+ return -1;
+ }
+
+ btsnoop_type = be32toh(hdr.type);
+
+ if (type)
+ *type = btsnoop_type;
+
+ return 0;
+}
+
+static uint16_t get_opcode_from_flags(uint8_t type, uint32_t flags)
+{
+ switch (type) {
+ case HCI_COMMAND_PKT:
+ return BTSNOOP_OPCODE_COMMAND_PKT;
+ case HCI_ACLDATA_PKT:
+ if (flags & 0x01)
+ return BTSNOOP_OPCODE_ACL_RX_PKT;
+ else
+ return BTSNOOP_OPCODE_ACL_TX_PKT;
+ case HCI_SCODATA_PKT:
+ if (flags & 0x01)
+ return BTSNOOP_OPCODE_SCO_RX_PKT;
+ else
+ return BTSNOOP_OPCODE_SCO_TX_PKT;
+ case HCI_EVENT_PKT:
+ return BTSNOOP_OPCODE_EVENT_PKT;
+ case 0xff:
+ if (flags & 0x02) {
+ if (flags & 0x01)
+ return BTSNOOP_OPCODE_EVENT_PKT;
+ else
+ return BTSNOOP_OPCODE_COMMAND_PKT;
+ } else {
+ if (flags & 0x01)
+ return BTSNOOP_OPCODE_ACL_RX_PKT;
+ else
+ return BTSNOOP_OPCODE_ACL_TX_PKT;
+ }
+ break;
+ }
+
+ return 0xff;
+}
+
+int btsnoop_read_hci(struct timeval *tv, uint16_t *index, uint16_t *opcode,
+ void *data, uint16_t *size)
+{
+ struct btsnoop_pkt pkt;
+ uint32_t toread, flags;
+ uint64_t ts;
+ uint8_t pkt_type;
+ ssize_t len;
+
+ if (btsnoop_fd < 0)
+ return -1;
+
+ len = read(btsnoop_fd, &pkt, BTSNOOP_PKT_SIZE);
+ if (len == 0)
+ return -1;
+
+ if (len < 0 || len != BTSNOOP_PKT_SIZE) {
+ perror("Failed to read packet");
+ close(btsnoop_fd);
+ btsnoop_fd = -1;
+ return -1;
+ }
+
+ toread = be32toh(pkt.size);
+ if (toread > BTSNOOP_MAX_PACKET_SIZE) {
+ perror("Packet len suspicially big: %u", toread);
+ close(btsnoop_fd);
+ btsnoop_fd = -1;
+ return -1;
}
+
+ flags = be32toh(pkt.flags);
+
+ ts = be64toh(pkt.ts) - 0x00E03AB44A676000ll;
+ tv->tv_sec = (ts / 1000000ll) + 946684800ll;
+ tv->tv_usec = ts % 1000000ll;
+
+ switch (btsnoop_type) {
+ case BTSNOOP_TYPE_HCI:
+ *index = 0;
+ *opcode = get_opcode_from_flags(0xff, flags);
+ break;
+
+ case BTSNOOP_TYPE_UART:
+ len = read(btsnoop_fd, &pkt_type, 1);
+ if (len < 0) {
+ perror("Failed to read packet type");
+ close(btsnoop_fd);
+ btsnoop_fd = -1;
+ return -1;
+ }
+ toread--;
+
+ *index = 0;
+ *opcode = get_opcode_from_flags(pkt_type, flags);
+ break;
+
+ case BTSNOOP_TYPE_MONITOR:
+ *index = flags >> 16;
+ *opcode = flags & 0xffff;
+ break;
+
+ default:
+ fprintf(stderr, "Unknown packet type\n");
+ close(btsnoop_fd);
+ btsnoop_fd = -1;
+ return -1;
+ }
+
+ len = read(btsnoop_fd, data, toread);
+ if (len < 0) {
+ perror("Failed to read data");
+ close(btsnoop_fd);
+ btsnoop_fd = -1;
+ return -1;
+ }
+
+ *size = toread;
+
+ return 0;
+}
+
+int btsnoop_read_phy(struct timeval *tv, uint16_t *frequency,
+ void *data, uint16_t *size)
+{
+ struct btsnoop_pkt pkt;
+ uint32_t toread, flags;
+ uint64_t ts;
+ ssize_t len;
+
+ if (btsnoop_fd < 0)
+ return -1;
+
+ len = read(btsnoop_fd, &pkt, BTSNOOP_PKT_SIZE);
+ if (len == 0)
+ return -1;
+
+ if (len < 0 || len != BTSNOOP_PKT_SIZE) {
+ perror("Failed to read packet");
+ close(btsnoop_fd);
+ btsnoop_fd = -1;
+ return -1;
+ }
+
+ toread = be32toh(pkt.size);
+ flags = be32toh(pkt.flags);
+
+ ts = be64toh(pkt.ts) - 0x00E03AB44A676000ll;
+ tv->tv_sec = (ts / 1000000ll) + 946684800ll;
+ tv->tv_usec = ts % 1000000ll;
+
+ switch (btsnoop_type) {
+ case BTSNOOP_TYPE_SIMULATOR:
+ if ((flags >> 16) != 1)
+ break;
+ *frequency = flags & 0xffff;
+ break;
+
+ default:
+ fprintf(stderr, "Unknown packet type\n");
+ close(btsnoop_fd);
+ btsnoop_fd = -1;
+ return -1;
+ }
+
+ len = read(btsnoop_fd, data, toread);
+ if (len < 0) {
+ perror("Failed to read data");
+ close(btsnoop_fd);
+ btsnoop_fd = -1;
+ return -1;
+ }
+
+ *size = toread;
+
+ return 0;
}
void btsnoop_close(void)