1 /* $NetBSD: pcap-bt-linux.c,v 1.4 2017/01/24 22:29:28 christos Exp $ */ 2 3 /* 4 * Copyright (c) 2006 Paolo Abeni (Italy) 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 11 * 1. Redistributions of source code must retain the above copyright 12 * notice, this list of conditions and the following disclaimer. 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 3. The name of the author may not be used to endorse or promote 17 * products derived from this software without specific prior written 18 * permission. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 21 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 22 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR 23 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT 24 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 25 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT 26 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 27 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE 30 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 31 * 32 * Bluetooth sniffing API implementation for Linux platform 33 * By Paolo Abeni <paolo.abeni@email.it> 34 * 35 */ 36 #include <sys/cdefs.h> 37 __RCSID("$NetBSD: pcap-bt-linux.c,v 1.4 2017/01/24 22:29:28 christos Exp $"); 38 39 #ifdef HAVE_CONFIG_H 40 #include "config.h" 41 #endif 42 43 #include "pcap-int.h" 44 #include "pcap-bt-linux.h" 45 #include "pcap/bluetooth.h" 46 47 #ifdef NEED_STRERROR_H 48 #include "strerror.h" 49 #endif 50 51 #include <errno.h> 52 #include <stdlib.h> 53 #include <unistd.h> 54 #include <fcntl.h> 55 #include <string.h> 56 #include <sys/ioctl.h> 57 #include <sys/socket.h> 58 #include <arpa/inet.h> 59 60 #include <bluetooth/bluetooth.h> 61 #include <bluetooth/hci.h> 62 63 #define BT_IFACE "bluetooth" 64 #define BT_CTRL_SIZE 128 65 66 /* forward declaration */ 67 static int bt_activate(pcap_t *); 68 static int bt_read_linux(pcap_t *, int , pcap_handler , u_char *); 69 static int bt_inject_linux(pcap_t *, const void *, size_t); 70 static int bt_setdirection_linux(pcap_t *, pcap_direction_t); 71 static int bt_stats_linux(pcap_t *, struct pcap_stat *); 72 73 /* 74 * Private data for capturing on Linux Bluetooth devices. 75 */ 76 struct pcap_bt { 77 int dev_id; /* device ID of device we're bound to */ 78 }; 79 80 int 81 bt_findalldevs(pcap_if_t **alldevsp, char *err_str) 82 { 83 struct hci_dev_list_req *dev_list; 84 struct hci_dev_req *dev_req; 85 int i, sock; 86 int ret = 0; 87 88 sock = socket(AF_BLUETOOTH, SOCK_RAW, BTPROTO_HCI); 89 if (sock < 0) 90 { 91 /* if bluetooth is not supported this this is not fatal*/ 92 if (errno == EAFNOSUPPORT) 93 return 0; 94 pcap_snprintf(err_str, PCAP_ERRBUF_SIZE, 95 "Can't open raw Bluetooth socket: %s", strerror(errno)); 96 return -1; 97 } 98 99 dev_list = malloc(HCI_MAX_DEV * sizeof(*dev_req) + sizeof(*dev_list)); 100 if (!dev_list) 101 { 102 pcap_snprintf(err_str, PCAP_ERRBUF_SIZE, "Can't allocate %zu bytes for Bluetooth device list", 103 HCI_MAX_DEV * sizeof(*dev_req) + sizeof(*dev_list)); 104 ret = -1; 105 goto done; 106 } 107 108 dev_list->dev_num = HCI_MAX_DEV; 109 110 if (ioctl(sock, HCIGETDEVLIST, (void *) dev_list) < 0) 111 { 112 pcap_snprintf(err_str, PCAP_ERRBUF_SIZE, 113 "Can't get Bluetooth device list via ioctl: %s", 114 strerror(errno)); 115 ret = -1; 116 goto free; 117 } 118 119 dev_req = dev_list->dev_req; 120 for (i = 0; i < dev_list->dev_num; i++, dev_req++) { 121 char dev_name[20], dev_descr[30]; 122 123 pcap_snprintf(dev_name, 20, BT_IFACE"%d", dev_req->dev_id); 124 pcap_snprintf(dev_descr, 30, "Bluetooth adapter number %d", i); 125 126 if (pcap_add_if(alldevsp, dev_name, 0, 127 dev_descr, err_str) < 0) 128 { 129 ret = -1; 130 break; 131 } 132 133 } 134 135 free: 136 free(dev_list); 137 138 done: 139 close(sock); 140 return ret; 141 } 142 143 pcap_t * 144 bt_create(const char *device, char *ebuf, int *is_ours) 145 { 146 const char *cp; 147 char *cpend; 148 long devnum; 149 pcap_t *p; 150 151 /* Does this look like a Bluetooth device? */ 152 cp = strrchr(device, '/'); 153 if (cp == NULL) 154 cp = device; 155 /* Does it begin with BT_IFACE? */ 156 if (strncmp(cp, BT_IFACE, sizeof BT_IFACE - 1) != 0) { 157 /* Nope, doesn't begin with BT_IFACE */ 158 *is_ours = 0; 159 return NULL; 160 } 161 /* Yes - is BT_IFACE followed by a number? */ 162 cp += sizeof BT_IFACE - 1; 163 devnum = strtol(cp, &cpend, 10); 164 if (cpend == cp || *cpend != '\0') { 165 /* Not followed by a number. */ 166 *is_ours = 0; 167 return NULL; 168 } 169 if (devnum < 0) { 170 /* Followed by a non-valid number. */ 171 *is_ours = 0; 172 return NULL; 173 } 174 175 /* OK, it's probably ours. */ 176 *is_ours = 1; 177 178 p = pcap_create_common(ebuf, sizeof (struct pcap_bt)); 179 if (p == NULL) 180 return (NULL); 181 182 p->activate_op = bt_activate; 183 return (p); 184 } 185 186 static int 187 bt_activate(pcap_t* handle) 188 { 189 struct pcap_bt *handlep = handle->priv; 190 struct sockaddr_hci addr; 191 int opt; 192 int dev_id; 193 struct hci_filter flt; 194 int err = PCAP_ERROR; 195 196 /* get bt interface id */ 197 if (sscanf(handle->opt.device, BT_IFACE"%d", &dev_id) != 1) 198 { 199 pcap_snprintf(handle->errbuf, PCAP_ERRBUF_SIZE, 200 "Can't get Bluetooth device index from %s", 201 handle->opt.device); 202 return PCAP_ERROR; 203 } 204 205 /* Initialize some components of the pcap structure. */ 206 handle->bufsize = BT_CTRL_SIZE+sizeof(pcap_bluetooth_h4_header)+handle->snapshot; 207 handle->linktype = DLT_BLUETOOTH_HCI_H4_WITH_PHDR; 208 209 handle->read_op = bt_read_linux; 210 handle->inject_op = bt_inject_linux; 211 handle->setfilter_op = install_bpf_program; /* no kernel filtering */ 212 handle->setdirection_op = bt_setdirection_linux; 213 handle->set_datalink_op = NULL; /* can't change data link type */ 214 handle->getnonblock_op = pcap_getnonblock_fd; 215 handle->setnonblock_op = pcap_setnonblock_fd; 216 handle->stats_op = bt_stats_linux; 217 handlep->dev_id = dev_id; 218 219 /* Create HCI socket */ 220 handle->fd = socket(AF_BLUETOOTH, SOCK_RAW, BTPROTO_HCI); 221 if (handle->fd < 0) { 222 pcap_snprintf(handle->errbuf, PCAP_ERRBUF_SIZE, 223 "Can't create raw socket: %s", strerror(errno)); 224 return PCAP_ERROR; 225 } 226 227 handle->buffer = malloc(handle->bufsize); 228 if (!handle->buffer) { 229 pcap_snprintf(handle->errbuf, PCAP_ERRBUF_SIZE, "Can't allocate dump buffer: %s", 230 pcap_strerror(errno)); 231 goto close_fail; 232 } 233 234 opt = 1; 235 if (setsockopt(handle->fd, SOL_HCI, HCI_DATA_DIR, &opt, sizeof(opt)) < 0) { 236 pcap_snprintf(handle->errbuf, PCAP_ERRBUF_SIZE, 237 "Can't enable data direction info: %s", strerror(errno)); 238 goto close_fail; 239 } 240 241 opt = 1; 242 if (setsockopt(handle->fd, SOL_HCI, HCI_TIME_STAMP, &opt, sizeof(opt)) < 0) { 243 pcap_snprintf(handle->errbuf, PCAP_ERRBUF_SIZE, 244 "Can't enable time stamp: %s", strerror(errno)); 245 goto close_fail; 246 } 247 248 /* Setup filter, do not call hci function to avoid dependence on 249 * external libs */ 250 memset(&flt, 0, sizeof(flt)); 251 memset((void *) &flt.type_mask, 0xff, sizeof(flt.type_mask)); 252 memset((void *) &flt.event_mask, 0xff, sizeof(flt.event_mask)); 253 if (setsockopt(handle->fd, SOL_HCI, HCI_FILTER, &flt, sizeof(flt)) < 0) { 254 pcap_snprintf(handle->errbuf, PCAP_ERRBUF_SIZE, 255 "Can't set filter: %s", strerror(errno)); 256 goto close_fail; 257 } 258 259 260 /* Bind socket to the HCI device */ 261 addr.hci_family = AF_BLUETOOTH; 262 addr.hci_dev = handlep->dev_id; 263 #ifdef SOCKADDR_HCI_HAS_HCI_CHANNEL 264 addr.hci_channel = HCI_CHANNEL_RAW; 265 #endif 266 if (bind(handle->fd, (struct sockaddr *) &addr, sizeof(addr)) < 0) { 267 pcap_snprintf(handle->errbuf, PCAP_ERRBUF_SIZE, 268 "Can't attach to device %d: %s", handlep->dev_id, 269 strerror(errno)); 270 goto close_fail; 271 } 272 273 if (handle->opt.rfmon) { 274 /* 275 * Monitor mode doesn't apply to Bluetooth devices. 276 */ 277 err = PCAP_ERROR_RFMON_NOTSUP; 278 goto close_fail; 279 } 280 281 if (handle->opt.buffer_size != 0) { 282 /* 283 * Set the socket buffer size to the specified value. 284 */ 285 if (setsockopt(handle->fd, SOL_SOCKET, SO_RCVBUF, 286 &handle->opt.buffer_size, 287 sizeof(handle->opt.buffer_size)) == -1) { 288 pcap_snprintf(handle->errbuf, PCAP_ERRBUF_SIZE, 289 "SO_RCVBUF: %s", pcap_strerror(errno)); 290 goto close_fail; 291 } 292 } 293 294 handle->selectable_fd = handle->fd; 295 return 0; 296 297 close_fail: 298 pcap_cleanup_live_common(handle); 299 return err; 300 } 301 302 static int 303 bt_read_linux(pcap_t *handle, int max_packets, pcap_handler callback, u_char *user) 304 { 305 struct cmsghdr *cmsg; 306 struct msghdr msg; 307 struct iovec iv; 308 ssize_t ret; 309 struct pcap_pkthdr pkth; 310 pcap_bluetooth_h4_header* bthdr; 311 u_char *pktd; 312 int in = 0; 313 314 pktd = (u_char *)handle->buffer + BT_CTRL_SIZE; 315 bthdr = (pcap_bluetooth_h4_header*)(void *)pktd; 316 iv.iov_base = pktd + sizeof(pcap_bluetooth_h4_header); 317 iv.iov_len = handle->snapshot; 318 319 memset(&msg, 0, sizeof(msg)); 320 msg.msg_iov = &iv; 321 msg.msg_iovlen = 1; 322 msg.msg_control = handle->buffer; 323 msg.msg_controllen = BT_CTRL_SIZE; 324 325 /* ignore interrupt system call error */ 326 do { 327 ret = recvmsg(handle->fd, &msg, 0); 328 if (handle->break_loop) 329 { 330 handle->break_loop = 0; 331 return -2; 332 } 333 } while ((ret == -1) && (errno == EINTR)); 334 335 if (ret < 0) { 336 pcap_snprintf(handle->errbuf, PCAP_ERRBUF_SIZE, 337 "Can't receive packet: %s", strerror(errno)); 338 return -1; 339 } 340 341 pkth.caplen = ret; 342 343 /* get direction and timestamp*/ 344 cmsg = CMSG_FIRSTHDR(&msg); 345 while (cmsg) { 346 switch (cmsg->cmsg_type) { 347 case HCI_CMSG_DIR: 348 memcpy(&in, CMSG_DATA(cmsg), sizeof in); 349 break; 350 case HCI_CMSG_TSTAMP: 351 memcpy(&pkth.ts, CMSG_DATA(cmsg), 352 sizeof pkth.ts); 353 break; 354 } 355 cmsg = CMSG_NXTHDR(&msg, cmsg); 356 } 357 if ((in && (handle->direction == PCAP_D_OUT)) || 358 ((!in) && (handle->direction == PCAP_D_IN))) 359 return 0; 360 361 bthdr->direction = htonl(in != 0); 362 pkth.caplen+=sizeof(pcap_bluetooth_h4_header); 363 pkth.len = pkth.caplen; 364 if (handle->fcode.bf_insns == NULL || 365 bpf_filter(handle->fcode.bf_insns, pktd, pkth.len, pkth.caplen)) { 366 callback(user, &pkth, pktd); 367 return 1; 368 } 369 return 0; /* didn't pass filter */ 370 } 371 372 static int 373 bt_inject_linux(pcap_t *handle, const void *buf, size_t size) 374 { 375 pcap_snprintf(handle->errbuf, PCAP_ERRBUF_SIZE, "inject not supported on " 376 "bluetooth devices"); 377 return (-1); 378 } 379 380 381 static int 382 bt_stats_linux(pcap_t *handle, struct pcap_stat *stats) 383 { 384 struct pcap_bt *handlep = handle->priv; 385 int ret; 386 struct hci_dev_info dev_info; 387 struct hci_dev_stats * s = &dev_info.stat; 388 dev_info.dev_id = handlep->dev_id; 389 390 /* ignore eintr */ 391 do { 392 ret = ioctl(handle->fd, HCIGETDEVINFO, (void *)&dev_info); 393 } while ((ret == -1) && (errno == EINTR)); 394 395 if (ret < 0) { 396 pcap_snprintf(handle->errbuf, PCAP_ERRBUF_SIZE, 397 "Can't get stats via ioctl: %s", strerror(errno)); 398 return (-1); 399 400 } 401 402 /* we receive both rx and tx frames, so comulate all stats */ 403 stats->ps_recv = s->evt_rx + s->acl_rx + s->sco_rx + s->cmd_tx + 404 s->acl_tx +s->sco_tx; 405 stats->ps_drop = s->err_rx + s->err_tx; 406 stats->ps_ifdrop = 0; 407 return 0; 408 } 409 410 static int 411 bt_setdirection_linux(pcap_t *p, pcap_direction_t d) 412 { 413 p->direction = d; 414 return 0; 415 } 416