blob: ed434e6a96d2e41b7da5e7bcf740f2c69b033286 [file] [log] [blame]
/*
*
* BlueZ - Bluetooth protocol stack for Linux
*
* Copyright (C) 2011-2012 Intel Corporation
* Copyright (C) 2004-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 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 St, Fifth Floor, Boston, MA 02110-1301 USA
*
*/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include <unistd.h>
#include <stdlib.h>
#include <alloca.h>
#include <getopt.h>
#include <stdbool.h>
#include <poll.h>
#include <bluetooth/bluetooth.h>
#include <bluetooth/hci.h>
#include "monitor/bt.h"
#define le16_to_cpu(val) (val)
#define le32_to_cpu(val) (val)
#define cpu_to_le16(val) (val)
#define cpu_to_le32(val) (val)
struct bt_h4_pkt {
uint8_t type;
union {
struct {
uint16_t opcode;
uint8_t plen;
union {
uint8_t data;
};
} cmd;
struct {
uint8_t event;
uint8_t plen;
union {
uint8_t data;
struct bt_hci_evt_cmd_complete cmd_complete;
struct bt_hci_evt_cmd_status cmd_status;
};
} evt;
};
} __attribute__ ((packed));
static bool hci_request(int fd, uint16_t opcode,
const void *cmd_data, uint8_t cmd_len,
void *rsp_data, uint8_t rsp_size, uint8_t *rsp_len)
{
struct bt_h4_pkt *cmd = alloca(4 + cmd_len);
struct bt_h4_pkt *rsp = alloca(2048);
ssize_t len;
cmd->type = BT_H4_CMD_PKT;
cmd->cmd.opcode = cpu_to_le16(opcode);
cmd->cmd.plen = cpu_to_le16(cmd_len);
if (cmd_len > 0)
memcpy(&cmd->cmd.data, cmd_data, cmd_len);
if (write(fd, cmd, 4 + cmd_len) < 0) {
perror("Failed to write command");
return false;
}
len = read(fd, rsp, 2048);
if (len < 0) {
perror("Failed to read event");
return false;
}
if (rsp->type != BT_H4_EVT_PKT) {
fprintf(stderr, "Unexpected packet type %d\n", rsp->type);
return false;
}
if (rsp->evt.event == BT_HCI_EVT_CMD_COMPLETE) {
if (opcode != le16_to_cpu(rsp->evt.cmd_complete.opcode))
return false;
if (rsp_data)
memcpy(rsp_data, (&rsp->evt.data) + 3, rsp->evt.plen - 3);
if (rsp_len)
*rsp_len = rsp->evt.plen - 3;
return true;
} else if (rsp->evt.event == BT_HCI_EVT_CMD_STATUS) {
if (opcode == le16_to_cpu(rsp->evt.cmd_status.opcode))
return false;
if (rsp->evt.cmd_status.status != BT_HCI_ERR_SUCCESS)
return false;
if (rsp_len)
*rsp_len = 0;
return true;
}
return false;
}
static int cmd_local(int fd, int argc, char *argv[])
{
struct bt_hci_rsp_read_local_features lf;
struct bt_hci_rsp_read_local_version lv;
struct bt_hci_rsp_read_local_commands lc;
struct bt_hci_cmd_read_local_ext_features lef_cmd;
struct bt_hci_rsp_read_local_ext_features lef;
uint8_t len;
if (!hci_request(fd, BT_HCI_CMD_RESET, NULL, 0, NULL, 0, &len))
return EXIT_FAILURE;
if (!hci_request(fd, BT_HCI_CMD_READ_LOCAL_FEATURES, NULL, 0,
&lf, sizeof(lf), &len))
return EXIT_FAILURE;
if (lf.status != BT_HCI_ERR_SUCCESS)
return EXIT_FAILURE;
printf("Features: 0x%02x 0x%02x 0x%02x 0x%02x "
"0x%02x 0x%02x 0x%02x 0x%02x\n",
lf.features[0], lf.features[1],
lf.features[2], lf.features[3],
lf.features[4], lf.features[5],
lf.features[6], lf.features[7]);
if (!hci_request(fd, BT_HCI_CMD_READ_LOCAL_VERSION, NULL, 0,
&lv, sizeof(lv), &len))
return EXIT_FAILURE;
if (lv.status != BT_HCI_ERR_SUCCESS)
return EXIT_FAILURE;
printf("Version: %d\n", lv.hci_ver);
printf("Manufacturer: %d\n", le16_to_cpu(lv.manufacturer));
if (!hci_request(fd, BT_HCI_CMD_READ_LOCAL_COMMANDS, NULL, 0,
&lc, sizeof(lc), &len))
return EXIT_FAILURE;
if (lc.status != BT_HCI_ERR_SUCCESS)
return EXIT_FAILURE;
if (!(lf.features[7] & 0x80))
return EXIT_SUCCESS;
lef_cmd.page = 0x01;
if (!hci_request(fd, BT_HCI_CMD_READ_LOCAL_EXT_FEATURES,
&lef_cmd, sizeof(lef_cmd),
&lef, sizeof(lef), &len))
return EXIT_FAILURE;
if (lef.status != BT_HCI_ERR_SUCCESS)
return EXIT_FAILURE;
printf("Host features: 0x%02x 0x%02x 0x%02x 0x%02x "
"0x%02x 0x%02x 0x%02x 0x%02x\n",
lef.features[0], lef.features[1],
lef.features[2], lef.features[3],
lef.features[4], lef.features[5],
lef.features[6], lef.features[7]);
if (lef.max_page < 0x02)
return EXIT_SUCCESS;
lef_cmd.page = 0x02;
if (!hci_request(fd, BT_HCI_CMD_READ_LOCAL_EXT_FEATURES,
&lef_cmd, sizeof(lef_cmd),
&lef, sizeof(lef), &len))
return EXIT_FAILURE;
if (lef.status != BT_HCI_ERR_SUCCESS)
return EXIT_FAILURE;
printf("Extended features: 0x%02x 0x%02x 0x%02x 0x%02x "
"0x%02x 0x%02x 0x%02x 0x%02x\n",
lef.features[0], lef.features[1],
lef.features[2], lef.features[3],
lef.features[4], lef.features[5],
lef.features[6], lef.features[7]);
return EXIT_SUCCESS;
}
typedef int (*cmd_func_t)(int fd, int argc, char *argv[]);
static const struct {
const char *name;
cmd_func_t func;
const char *help;
} cmd_table[] = {
{ "local", cmd_local, "Print local controller details" },
{ }
};
static void usage(void)
{
int i;
printf("btinfo - Bluetooth device testing tool\n"
"Usage:\n");
printf("\tbtinfo [options] <command>\n");
printf("options:\n"
"\t-i, --device <hcidev> Use local HCI device\n"
"\t-h, --help Show help options\n");
printf("commands:\n");
for (i = 0; cmd_table[i].name; i++)
printf("\t%-25s%s\n", cmd_table[i].name, cmd_table[i].help);
}
static const struct option main_options[] = {
{ "device", required_argument, NULL, 'i' },
{ "version", no_argument, NULL, 'v' },
{ "help", no_argument, NULL, 'h' },
{ }
};
int main(int argc, char *argv[])
{
const char *device = NULL;
cmd_func_t func = NULL;
struct sockaddr_hci addr;
int result, fd, i;
for (;;) {
int opt;
opt = getopt_long(argc, argv, "i:vh",
main_options, NULL);
if (opt < 0)
break;
switch (opt) {
case 'i':
device = optarg;
break;
case 'v':
printf("%s\n", VERSION);
return EXIT_SUCCESS;
case 'h':
usage();
return EXIT_SUCCESS;
default:
return EXIT_FAILURE;
}
}
if (argc - optind < 1) {
fprintf(stderr, "Missing command argument\n");
return EXIT_FAILURE;
}
for (i = 0; cmd_table[i].name; i++) {
if (!strcmp(cmd_table[i].name, argv[optind])) {
func = cmd_table[i].func;
break;
}
}
if (!func) {
fprintf(stderr, "Unsupported command specified\n");
return EXIT_FAILURE;
}
fd = socket(AF_BLUETOOTH, SOCK_RAW | SOCK_CLOEXEC, BTPROTO_HCI);
if (fd < 0) {
perror("Failed to open channel");
return EXIT_FAILURE;
}
memset(&addr, 0, sizeof(addr));
addr.hci_family = AF_BLUETOOTH;
addr.hci_channel = HCI_CHANNEL_USER;
if (device)
addr.hci_dev = atoi(device);
else
addr.hci_dev = 0;
if (bind(fd, (struct sockaddr *) &addr, sizeof(addr)) < 0) {
perror("Failed to bind channel");
close(fd);
return EXIT_FAILURE;
}
result = func(fd, argc - optind - 1, argv + optind + 1);
close(fd);
return result;
}