1 /* 2 * hccontrol.c 3 * 4 * Copyright (c) 2001-2002 Maksim Yevmenkin <m_evmenkin@yahoo.com> 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 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 26 * SUCH DAMAGE. 27 * 28 * $Id: hccontrol.c,v 1.5 2003/09/05 00:38:24 max Exp $ 29 * $FreeBSD$ 30 */ 31 32 #define L2CAP_SOCKET_CHECKED 33 #include <bluetooth.h> 34 #include <sys/ioctl.h> 35 #include <sys/sysctl.h> 36 #include <assert.h> 37 #include <err.h> 38 #include <errno.h> 39 #include <netgraph/ng_message.h> 40 #include <stdio.h> 41 #include <stdlib.h> 42 #include <string.h> 43 #include <unistd.h> 44 #include "hccontrol.h" 45 46 /* Prototypes */ 47 static int do_hci_command (char const *, int, char **); 48 static struct hci_command * find_hci_command (char const *, struct hci_command *); 49 static int find_hci_nodes (struct nodeinfo **); 50 static void print_hci_command (struct hci_command *); 51 static void usage (void); 52 53 /* Globals */ 54 int verbose = 0; 55 int timeout; 56 int numeric_bdaddr = 0; 57 58 /* Main */ 59 int 60 main(int argc, char *argv[]) 61 { 62 char *node = NULL; 63 int n; 64 65 /* Process command line arguments */ 66 while ((n = getopt(argc, argv, "n:Nvh")) != -1) { 67 switch (n) { 68 case 'n': 69 node = optarg; 70 break; 71 72 case 'N': 73 numeric_bdaddr = 1; 74 break; 75 76 case 'v': 77 verbose = 1; 78 break; 79 80 case 'h': 81 default: 82 usage(); 83 } 84 } 85 86 argc -= optind; 87 argv += optind; 88 89 if (*argv == NULL) 90 usage(); 91 92 n = do_hci_command(node, argc, argv); 93 94 return (n); 95 } /* main */ 96 97 /* Create socket and bind it */ 98 static int 99 socket_open(char const *node) 100 { 101 struct sockaddr_hci addr; 102 struct ng_btsocket_hci_raw_filter filter; 103 int s, mib[4], num; 104 size_t size; 105 struct nodeinfo *nodes; 106 107 num = find_hci_nodes(&nodes); 108 if (num == 0) 109 errx(7, "Could not find HCI nodes"); 110 111 if (node == NULL) { 112 node = strdup(nodes[0].name); 113 if (num > 1) 114 fprintf(stdout, "Using HCI node: %s\n", node); 115 } 116 117 free(nodes); 118 119 s = socket(PF_BLUETOOTH, SOCK_RAW, BLUETOOTH_PROTO_HCI); 120 if (s < 0) 121 err(1, "Could not create socket"); 122 123 memset(&addr, 0, sizeof(addr)); 124 addr.hci_len = sizeof(addr); 125 addr.hci_family = AF_BLUETOOTH; 126 strncpy(addr.hci_node, node, sizeof(addr.hci_node)); 127 if (bind(s, (struct sockaddr *) &addr, sizeof(addr)) < 0) 128 err(2, "Could not bind socket, node=%s", node); 129 130 if (connect(s, (struct sockaddr *) &addr, sizeof(addr)) < 0) 131 err(3, "Could not connect socket, node=%s", node); 132 133 memset(&filter, 0, sizeof(filter)); 134 bit_set(filter.event_mask, NG_HCI_EVENT_COMMAND_COMPL - 1); 135 bit_set(filter.event_mask, NG_HCI_EVENT_COMMAND_STATUS - 1); 136 bit_set(filter.event_mask, NG_HCI_EVENT_INQUIRY_COMPL - 1); 137 bit_set(filter.event_mask, NG_HCI_EVENT_INQUIRY_RESULT - 1); 138 bit_set(filter.event_mask, NG_HCI_EVENT_CON_COMPL - 1); 139 bit_set(filter.event_mask, NG_HCI_EVENT_DISCON_COMPL - 1); 140 bit_set(filter.event_mask, NG_HCI_EVENT_REMOTE_NAME_REQ_COMPL - 1); 141 bit_set(filter.event_mask, NG_HCI_EVENT_READ_REMOTE_FEATURES_COMPL - 1); 142 bit_set(filter.event_mask, NG_HCI_EVENT_READ_REMOTE_VER_INFO_COMPL - 1); 143 bit_set(filter.event_mask, NG_HCI_EVENT_RETURN_LINK_KEYS - 1); 144 bit_set(filter.event_mask, NG_HCI_EVENT_READ_CLOCK_OFFSET_COMPL - 1); 145 bit_set(filter.event_mask, NG_HCI_EVENT_CON_PKT_TYPE_CHANGED - 1); 146 bit_set(filter.event_mask, NG_HCI_EVENT_ROLE_CHANGE - 1); 147 148 if (setsockopt(s, SOL_HCI_RAW, SO_HCI_RAW_FILTER, 149 (void * const) &filter, sizeof(filter)) < 0) 150 err(4, "Could not setsockopt()"); 151 152 size = (sizeof(mib)/sizeof(mib[0])); 153 if (sysctlnametomib("net.bluetooth.hci.command_timeout",mib,&size) < 0) 154 err(5, "Could not sysctlnametomib()"); 155 156 if (sysctl(mib, sizeof(mib)/sizeof(mib[0]), 157 (void *) &timeout, &size, NULL, 0) < 0) 158 err(6, "Could not sysctl()"); 159 160 timeout ++; 161 162 return (s); 163 } /* socket_open */ 164 165 /* Execute commands */ 166 static int 167 do_hci_command(char const *node, int argc, char **argv) 168 { 169 char *cmd = argv[0]; 170 struct hci_command *c = NULL; 171 int s, e, help; 172 173 help = 0; 174 if (strcasecmp(cmd, "help") == 0) { 175 argc --; 176 argv ++; 177 178 if (argc <= 0) { 179 fprintf(stdout, "Supported commands:\n"); 180 print_hci_command(link_control_commands); 181 print_hci_command(link_policy_commands); 182 print_hci_command(host_controller_baseband_commands); 183 print_hci_command(info_commands); 184 print_hci_command(status_commands); 185 print_hci_command(node_commands); 186 fprintf(stdout, "\nFor more information use " \ 187 "'help command'\n"); 188 189 return (OK); 190 } 191 192 help = 1; 193 cmd = argv[0]; 194 } 195 196 c = find_hci_command(cmd, link_control_commands); 197 if (c != NULL) 198 goto execute; 199 200 c = find_hci_command(cmd, link_policy_commands); 201 if (c != NULL) 202 goto execute; 203 204 c = find_hci_command(cmd, host_controller_baseband_commands); 205 if (c != NULL) 206 goto execute; 207 208 c = find_hci_command(cmd, info_commands); 209 if (c != NULL) 210 goto execute; 211 212 c = find_hci_command(cmd, status_commands); 213 if (c != NULL) 214 goto execute; 215 216 c = find_hci_command(cmd, node_commands); 217 if (c == NULL) { 218 fprintf(stdout, "Unknown command: \"%s\"\n", cmd); 219 return (ERROR); 220 } 221 execute: 222 if (!help) { 223 s = socket_open(node); 224 e = (c->handler)(s, -- argc, ++ argv); 225 close(s); 226 } else 227 e = USAGE; 228 229 switch (e) { 230 case OK: 231 case FAILED: 232 break; 233 234 case ERROR: 235 fprintf(stdout, "Could not execute command \"%s\". %s\n", 236 cmd, strerror(errno)); 237 break; 238 239 case USAGE: 240 fprintf(stdout, "Usage: %s\n%s\n", c->command, c->description); 241 break; 242 243 default: assert(0); break; 244 } 245 246 247 return (e); 248 } /* do_hci_command */ 249 250 /* Try to find command in specified category */ 251 static struct hci_command * 252 find_hci_command(char const *command, struct hci_command *category) 253 { 254 struct hci_command *c = NULL; 255 256 for (c = category; c->command != NULL; c++) { 257 char *c_end = strchr(c->command, ' '); 258 259 if (c_end != NULL) { 260 int len = c_end - c->command; 261 262 if (strncasecmp(command, c->command, len) == 0) 263 return (c); 264 } else if (strcasecmp(command, c->command) == 0) 265 return (c); 266 } 267 268 return (NULL); 269 } /* find_hci_command */ 270 271 /* Find all HCI nodes */ 272 static int 273 find_hci_nodes(struct nodeinfo** nodes) 274 { 275 struct ng_btsocket_hci_raw_node_list_names r; 276 struct sockaddr_hci addr; 277 int s; 278 const char * node = "ubt0hci"; 279 280 r.num_names = MAX_NODE_NUM; 281 r.names = (struct nodeinfo*)calloc(MAX_NODE_NUM, sizeof(struct nodeinfo)); 282 if (r.names == NULL) 283 err(8, "Could not allocate memory"); 284 285 s = socket(PF_BLUETOOTH, SOCK_RAW, BLUETOOTH_PROTO_HCI); 286 if (s < 0) 287 err(9, "Could not create socket"); 288 289 memset(&addr, 0, sizeof(addr)); 290 addr.hci_len = sizeof(addr); 291 addr.hci_family = AF_BLUETOOTH; 292 strncpy(addr.hci_node, node, sizeof(addr.hci_node)); 293 if (bind(s, (struct sockaddr *) &addr, sizeof(addr)) < 0) 294 err(10, "Could not bind socket"); 295 296 if (ioctl(s, SIOC_HCI_RAW_NODE_LIST_NAMES, &r, sizeof(r)) < 0) 297 err(11, "Could not get list of HCI nodes"); 298 299 close(s); 300 301 *nodes = r.names; 302 303 return (r.num_names); 304 } /* find_hci_nodes */ 305 306 /* Print commands in specified category */ 307 static void 308 print_hci_command(struct hci_command *category) 309 { 310 struct hci_command *c = NULL; 311 312 for (c = category; c->command != NULL; c++) 313 fprintf(stdout, "\t%s\n", c->command); 314 } /* print_hci_command */ 315 316 /* Usage */ 317 static void 318 usage(void) 319 { 320 fprintf(stdout, "Usage: hccontrol [-hN] [-n HCI_node_name] cmd [p1] [..]\n"); 321 exit(255); 322 } /* usage */ 323 324