xref: /netbsd-src/usr.sbin/btconfig/btconfig.c (revision c2f76ff004a2cb67efe5b12d97bd3ef7fe89e18d)
1 /* $NetBSD: btconfig.c,v 1.24 2010/11/28 20:37:24 plunky Exp $ */
2 
3 /*-
4  * Copyright (c) 2006 Itronix Inc.
5  * All rights reserved.
6  *
7  * Written by Iain Hibbert for Itronix Inc.
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted provided that the following conditions
11  * are met:
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  * 2. Redistributions in binary form must reproduce the above copyright
15  *    notice, this list of conditions and the following disclaimer in the
16  *    documentation and/or other materials provided with the distribution.
17  * 3. The name of Itronix Inc. may not be used to endorse
18  *    or promote products derived from this software without specific
19  *    prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY ITRONIX INC. ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
23  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
24  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL ITRONIX INC. BE LIABLE FOR ANY
25  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
26  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
27  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
28  * ON ANY THEORY OF LIABILITY, WHETHER IN
29  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
30  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
31  * POSSIBILITY OF SUCH DAMAGE.
32  */
33 
34 #include <sys/cdefs.h>
35 __COPYRIGHT("@(#) Copyright (c) 2006 Itronix, Inc.  All rights reserved.");
36 __RCSID("$NetBSD: btconfig.c,v 1.24 2010/11/28 20:37:24 plunky Exp $");
37 
38 #include <sys/ioctl.h>
39 #include <sys/param.h>
40 #include <sys/socket.h>
41 
42 #include <bluetooth.h>
43 #include <err.h>
44 #include <errno.h>
45 #include <stdio.h>
46 #include <stdlib.h>
47 #include <string.h>
48 #include <time.h>
49 #include <unistd.h>
50 #include <util.h>
51 
52 int main(int, char *[]);
53 void badarg(const char *);
54 void badparam(const char *);
55 void badval(const char *, const char *);
56 void usage(void);
57 int set_unit(unsigned long);
58 void config_unit(void);
59 void print_val(const char *, const char **, int);
60 void print_info(int);
61 void print_stats(void);
62 void print_class(const char *, uint8_t *);
63 void print_class0(void);
64 void print_voice(int);
65 void tag(const char *);
66 void print_features0(uint8_t *);
67 void print_features1(uint8_t *);
68 void print_result(int, struct bt_devinquiry *);
69 void do_inquiry(void);
70 
71 void hci_req(uint16_t, uint8_t , void *, size_t, void *, size_t);
72 void save_value(uint16_t, void *, size_t);
73 void load_value(uint16_t, void *, size_t);
74 
75 #define MAX_STR_SIZE	0xff
76 
77 /* print width */
78 int width = 0;
79 #define MAX_WIDTH	70
80 
81 /* global variables */
82 int hci;
83 struct btreq btr;
84 
85 /* command line flags */
86 int verbose = 0;	/* more info */
87 int lflag = 0;		/* list devices */
88 int sflag = 0;		/* get/zero stats */
89 
90 /* device up/down (flag) */
91 int opt_enable = 0;
92 int opt_reset = 0;
93 #define FLAGS_FMT	"\20"			\
94 			"\001UP"		\
95 			"\002RUNNING"		\
96 			"\003XMIT_CMD"		\
97 			"\004XMIT_ACL"		\
98 			"\005XMIT_SCO"		\
99 			"\006INIT_BDADDR"	\
100 			"\007INIT_BUFFER_SIZE"	\
101 			"\010INIT_FEATURES"	\
102 			"\011POWER_UP_NOOP"	\
103 			"\012INIT_COMMANDS"	\
104 			"\013MASTER"		\
105 			""
106 
107 /* authorisation (flag) */
108 int opt_auth = 0;
109 
110 /* encryption (flag) */
111 int opt_encrypt = 0;
112 
113 /* scan enable options (flags) */
114 int opt_pscan = 0;
115 int opt_iscan = 0;
116 
117 /* master role option */
118 int opt_master = 0;
119 
120 /* link policy options (flags) */
121 int opt_switch = 0;
122 int opt_hold = 0;
123 int opt_sniff = 0;
124 int opt_park = 0;
125 
126 /* class of device (hex value) */
127 int opt_class = 0;
128 uint32_t class;
129 
130 /* packet type mask (hex value) */
131 int opt_ptype = 0;
132 uint32_t ptype;
133 
134 /* unit name (string) */
135 int opt_name = 0;
136 char name[MAX_STR_SIZE];
137 
138 /* pin type */
139 int opt_pin = 0;
140 
141 /* Inquiry */
142 int opt_rssi = 0;			/* inquiry_with_rssi (obsolete flag) */
143 int opt_imode = 0;			/* inquiry mode */
144 int opt_inquiry = 0;
145 #define INQUIRY_LENGTH		10	/* seconds */
146 #define INQUIRY_MAX_RESPONSES	10
147 const char *imodes[] = { "std", "rssi", "ext", NULL };
148 
149 /* Voice Settings */
150 int opt_voice = 0;
151 uint32_t voice;
152 
153 /* Page Timeout */
154 int opt_pto = 0;
155 uint32_t pto;
156 
157 /* set SCO mtu */
158 int opt_scomtu;
159 uint32_t scomtu;
160 
161 struct parameter {
162 	const char	*name;
163 	enum { P_SET, P_CLR, P_STR, P_HEX, P_NUM, P_VAL } type;
164 	int		*opt;
165 	void		*val;
166 } parameters[] = {
167 	{ "up",		P_SET,	&opt_enable,	NULL	},
168 	{ "enable",	P_SET,	&opt_enable,	NULL	},
169 	{ "down",	P_CLR,	&opt_enable,	NULL	},
170 	{ "disable",	P_CLR,	&opt_enable,	NULL	},
171 	{ "name",	P_STR,	&opt_name,	name	},
172 	{ "pscan",	P_SET,	&opt_pscan,	NULL	},
173 	{ "-pscan",	P_CLR,	&opt_pscan,	NULL	},
174 	{ "iscan",	P_SET,	&opt_iscan,	NULL	},
175 	{ "-iscan",	P_CLR,	&opt_iscan,	NULL	},
176 	{ "master",	P_SET,	&opt_master,	NULL	},
177 	{ "-master",	P_CLR,	&opt_master,	NULL	},
178 	{ "switch",	P_SET,	&opt_switch,	NULL	},
179 	{ "-switch",	P_CLR,	&opt_switch,	NULL	},
180 	{ "hold",	P_SET,	&opt_hold,	NULL	},
181 	{ "-hold",	P_CLR,	&opt_hold,	NULL	},
182 	{ "sniff",	P_SET,	&opt_sniff,	NULL	},
183 	{ "-sniff",	P_CLR,	&opt_sniff,	NULL	},
184 	{ "park",	P_SET,	&opt_park,	NULL	},
185 	{ "-park",	P_CLR,	&opt_park,	NULL	},
186 	{ "auth",	P_SET,	&opt_auth,	NULL	},
187 	{ "-auth",	P_CLR,	&opt_auth,	NULL	},
188 	{ "encrypt",	P_SET,	&opt_encrypt,	NULL	},
189 	{ "-encrypt",	P_CLR,	&opt_encrypt,	NULL	},
190 	{ "ptype",	P_HEX,	&opt_ptype,	&ptype	},
191 	{ "class",	P_HEX,	&opt_class,	&class	},
192 	{ "fixed",	P_SET,	&opt_pin,	NULL	},
193 	{ "variable",	P_CLR,	&opt_pin,	NULL	},
194 	{ "inq",	P_SET,	&opt_inquiry,	NULL	},
195 	{ "inquiry",	P_SET,	&opt_inquiry,	NULL	},
196 	{ "imode",	P_VAL,	&opt_imode,	imodes	},
197 	{ "rssi",	P_SET,	&opt_rssi,	NULL	},
198 	{ "-rssi",	P_CLR,	&opt_rssi,	NULL	},
199 	{ "reset",	P_SET,	&opt_reset,	NULL	},
200 	{ "voice",	P_HEX,	&opt_voice,	&voice	},
201 	{ "pto",	P_NUM,	&opt_pto,	&pto	},
202 	{ "scomtu",	P_NUM,	&opt_scomtu,	&scomtu	},
203 	{ NULL,		0,	NULL,		NULL	}
204 };
205 
206 int
207 main(int ac, char *av[])
208 {
209 	int ch;
210 	struct parameter *p;
211 
212 	while ((ch = getopt(ac, av, "hlsvz")) != -1) {
213 		switch(ch) {
214 		case 'l':
215 			lflag = 1;
216 			break;
217 
218 		case 's':
219 			sflag = 1;
220 			break;
221 
222 		case 'v':
223 			verbose++;
224 			break;
225 
226 		case 'z':
227 			sflag = 2;
228 			break;
229 
230 		case 'h':
231 		default:
232 			usage();
233 		}
234 	}
235 	av += optind;
236 	ac -= optind;
237 
238 	if (lflag && sflag)
239 		usage();
240 
241 	hci = socket(PF_BLUETOOTH, SOCK_RAW, BTPROTO_HCI);
242 	if (hci == -1)
243 		err(EXIT_FAILURE, "socket");
244 
245 	if (ac == 0) {
246 		verbose++;
247 
248 		memset(&btr, 0, sizeof(btr));
249 		while (set_unit(SIOCNBTINFO) != -1) {
250 			print_info(verbose);
251 			print_stats();
252 		}
253 
254 		tag(NULL);
255 	} else {
256 		strlcpy(btr.btr_name, *av, HCI_DEVNAME_SIZE);
257 		av++, ac--;
258 
259 		if (set_unit(SIOCGBTINFO) < 0)
260 			err(EXIT_FAILURE, "%s", btr.btr_name);
261 
262 		if (ac == 0)
263 			verbose += 2;
264 
265 		while (ac > 0) {
266 			for (p = parameters ; ; p++) {
267 				if (p->name == NULL)
268 					badparam(*av);
269 
270 				if (strcmp(*av, p->name) == 0)
271 					break;
272 			}
273 
274 			switch(p->type) {
275 			case P_SET:
276 				*(p->opt) = 1;
277 				break;
278 
279 			case P_CLR:
280 				*(p->opt) = -1;
281 				break;
282 
283 			case P_STR:
284 				if (--ac < 1) badarg(p->name);
285 				strlcpy((char *)(p->val), *++av, MAX_STR_SIZE);
286 				*(p->opt) = 1;
287 				break;
288 
289 			case P_HEX:
290 				if (--ac < 1) badarg(p->name);
291 				*(uint32_t *)(p->val) = strtoul(*++av, NULL, 16);
292 				*(p->opt) = 1;
293 				break;
294 
295 			case P_NUM:
296 				if (--ac < 1) badarg(p->name);
297 				*(uint32_t *)(p->val) = strtoul(*++av, NULL, 10);
298 				*(p->opt) = 1;
299 				break;
300 
301 			case P_VAL:
302 				if (--ac < 1) badarg(p->name);
303 				++av;
304 				ch = 0;
305 				do {
306 					if (((char **)(p->val))[ch] == NULL)
307 						badval(p->name, *av);
308 				} while (strcmp(((char **)(p->val))[ch++], *av));
309 				*(p->opt) = ch;
310 				break;
311 			}
312 
313 			av++, ac--;
314 		}
315 
316 		config_unit();
317 		print_info(verbose);
318 		print_stats();
319 		do_inquiry();
320 	}
321 
322 	close(hci);
323 	return EXIT_SUCCESS;
324 }
325 
326 void
327 badparam(const char *param)
328 {
329 
330 	fprintf(stderr, "unknown parameter '%s'\n", param);
331 	exit(EXIT_FAILURE);
332 }
333 
334 void
335 badarg(const char *param)
336 {
337 
338 	fprintf(stderr, "parameter '%s' needs argument\n", param);
339 	exit(EXIT_FAILURE);
340 }
341 
342 void
343 badval(const char *param, const char *value)
344 {
345 
346 	fprintf(stderr, "bad value '%s' for parameter '%s'\n", value, param);
347 	exit(EXIT_FAILURE);
348 }
349 
350 void
351 usage(void)
352 {
353 
354 	fprintf(stderr, "usage:	%s [-svz] [device [parameters]]\n", getprogname());
355 	fprintf(stderr, "	%s -l\n", getprogname());
356 	exit(EXIT_FAILURE);
357 }
358 
359 /*
360  * pretty printing feature
361  */
362 void
363 tag(const char *f)
364 {
365 
366 	if (f == NULL) {
367 		if (width > 0)
368 			printf("\n");
369 
370 		width = 0;
371 	} else {
372 		width += printf("%*s%s",
373 				(width == 0 ? (lflag ? 0 : 8) : 1),
374 				"", f);
375 
376 		if (width > MAX_WIDTH) {
377 			printf("\n");
378 			width = 0;
379 		}
380 	}
381 }
382 
383 /*
384  * basic HCI request wrapper with error check
385  */
386 void
387 hci_req(uint16_t opcode, uint8_t event, void *cbuf, size_t clen,
388     void *rbuf, size_t rlen)
389 {
390 	struct bt_devreq req;
391 
392 	req.opcode = opcode;
393 	req.event = event;
394 	req.cparam = cbuf;
395 	req.clen = clen;
396 	req.rparam = rbuf;
397 	req.rlen = rlen;
398 
399 	if (bt_devreq(hci, &req, 10) == -1)
400 		err(EXIT_FAILURE, "cmd (%02x|%03x)",
401 		    HCI_OGF(opcode), HCI_OCF(opcode));
402 
403 	if (event == 0 && rlen > 0 && ((uint8_t *)rbuf)[0] != 0)
404 		errx(EXIT_FAILURE, "cmd (%02x|%03x): status 0x%02x",
405 		    HCI_OGF(opcode), HCI_OCF(opcode), ((uint8_t *)rbuf)[0]);
406 }
407 
408 /*
409  * write value to device with opcode.
410  * provide a small response buffer so that the status can be checked
411  */
412 void
413 save_value(uint16_t opcode, void *cbuf, size_t clen)
414 {
415 	uint8_t buf[1];
416 
417 	hci_req(opcode, 0, cbuf, clen, buf, sizeof(buf));
418 }
419 
420 /*
421  * read value from device with opcode.
422  * use our own buffer and only return the value from the response packet
423  */
424 void
425 load_value(uint16_t opcode, void *rbuf, size_t rlen)
426 {
427 	uint8_t buf[UINT8_MAX];
428 
429 	hci_req(opcode, 0, NULL, 0, buf, sizeof(buf));
430 	memcpy(rbuf, buf + 1, rlen);
431 }
432 
433 int
434 set_unit(unsigned long cmd)
435 {
436 
437 	if (ioctl(hci, cmd, &btr) == -1)
438 		return -1;
439 
440 	if (btr.btr_flags & BTF_UP) {
441 		struct sockaddr_bt sa;
442 
443 		sa.bt_len = sizeof(sa);
444 		sa.bt_family = AF_BLUETOOTH;
445 		bdaddr_copy(&sa.bt_bdaddr, &btr.btr_bdaddr);
446 
447 		if (bind(hci, (struct sockaddr *)&sa, sizeof(sa)) < 0)
448 			err(EXIT_FAILURE, "bind");
449 
450 		if (connect(hci, (struct sockaddr *)&sa, sizeof(sa)) < 0)
451 			err(EXIT_FAILURE, "connect");
452 	}
453 
454 	return 0;
455 }
456 
457 /*
458  * apply configuration parameters to unit
459  */
460 void
461 config_unit(void)
462 {
463 
464 	if (opt_enable) {
465 		if (opt_enable > 0)
466 			btr.btr_flags |= BTF_UP;
467 		else
468 			btr.btr_flags &= ~BTF_UP;
469 
470 		if (ioctl(hci, SIOCSBTFLAGS, &btr) < 0)
471 			err(EXIT_FAILURE, "SIOCSBTFLAGS");
472 
473 		if (set_unit(SIOCGBTINFO) < 0)
474 			err(EXIT_FAILURE, "%s", btr.btr_name);
475 	}
476 
477 	if (opt_reset) {
478 		static const struct timespec ts = { 0, 100000000 }; /* 100ms */
479 
480 		btr.btr_flags |= BTF_INIT;
481 		if (ioctl(hci, SIOCSBTFLAGS, &btr) < 0)
482 			err(EXIT_FAILURE, "SIOCSBTFLAGS");
483 
484 		hci_req(HCI_CMD_RESET, 0, NULL, 0, NULL, 0);
485 
486 		do {
487 			nanosleep(&ts, NULL);
488 			if (ioctl(hci, SIOCGBTINFO, &btr) < 0)
489 				err(EXIT_FAILURE, "%s", btr.btr_name);
490 		} while ((btr.btr_flags & BTF_INIT) != 0);
491 	}
492 
493 	if (opt_master) {
494 		if (opt_master > 0)
495 			btr.btr_flags |= BTF_MASTER;
496 		else
497 			btr.btr_flags &= ~BTF_MASTER;
498 
499 		if (ioctl(hci, SIOCSBTFLAGS, &btr) < 0)
500 			err(EXIT_FAILURE, "SIOCSBTFLAGS");
501 	}
502 
503 	if (opt_switch || opt_hold || opt_sniff || opt_park) {
504 		uint16_t val = btr.btr_link_policy;
505 
506 		if (opt_switch > 0) val |= HCI_LINK_POLICY_ENABLE_ROLE_SWITCH;
507 		if (opt_switch < 0) val &= ~HCI_LINK_POLICY_ENABLE_ROLE_SWITCH;
508 		if (opt_hold > 0)   val |= HCI_LINK_POLICY_ENABLE_HOLD_MODE;
509 		if (opt_hold < 0)   val &= ~HCI_LINK_POLICY_ENABLE_HOLD_MODE;
510 		if (opt_sniff > 0)  val |= HCI_LINK_POLICY_ENABLE_SNIFF_MODE;
511 		if (opt_sniff < 0)  val &= ~HCI_LINK_POLICY_ENABLE_SNIFF_MODE;
512 		if (opt_park > 0)   val |= HCI_LINK_POLICY_ENABLE_PARK_MODE;
513 		if (opt_park < 0)   val &= ~HCI_LINK_POLICY_ENABLE_PARK_MODE;
514 
515 		btr.btr_link_policy = val;
516 		if (ioctl(hci, SIOCSBTPOLICY, &btr) < 0)
517 			err(EXIT_FAILURE, "SIOCSBTPOLICY");
518 	}
519 
520 	if (opt_ptype) {
521 		btr.btr_packet_type = ptype;
522 		if (ioctl(hci, SIOCSBTPTYPE, &btr) < 0)
523 			err(EXIT_FAILURE, "SIOCSBTPTYPE");
524 	}
525 
526 	if (opt_pscan || opt_iscan) {
527 		uint8_t val;
528 
529 		load_value(HCI_CMD_READ_SCAN_ENABLE, &val, sizeof(val));
530 		if (opt_pscan > 0) val |= HCI_PAGE_SCAN_ENABLE;
531 		if (opt_pscan < 0) val &= ~HCI_PAGE_SCAN_ENABLE;
532 		if (opt_iscan > 0) val |= HCI_INQUIRY_SCAN_ENABLE;
533 		if (opt_iscan < 0) val &= ~HCI_INQUIRY_SCAN_ENABLE;
534 		save_value(HCI_CMD_WRITE_SCAN_ENABLE, &val, sizeof(val));
535 	}
536 
537 	if (opt_auth) {
538 		uint8_t val = (opt_auth > 0 ? 1 : 0);
539 
540 		save_value(HCI_CMD_WRITE_AUTH_ENABLE, &val, sizeof(val));
541 	}
542 
543 	if (opt_encrypt) {
544 		uint8_t val = (opt_encrypt > 0 ? 1 : 0);
545 
546 		save_value(HCI_CMD_WRITE_ENCRYPTION_MODE, &val, sizeof(val));
547 	}
548 
549 	if (opt_name)
550 		save_value(HCI_CMD_WRITE_LOCAL_NAME, name, HCI_UNIT_NAME_SIZE);
551 
552 	if (opt_class) {
553 		uint8_t val[HCI_CLASS_SIZE];
554 
555 		val[0] = (class >> 0) & 0xff;
556 		val[1] = (class >> 8) & 0xff;
557 		val[2] = (class >> 16) & 0xff;
558 
559 		save_value(HCI_CMD_WRITE_UNIT_CLASS, val, HCI_CLASS_SIZE);
560 	}
561 
562 	if (opt_pin) {
563 		uint8_t val;
564 
565 		if (opt_pin > 0)	val = 1;
566 		else			val = 0;
567 
568 		save_value(HCI_CMD_WRITE_PIN_TYPE, &val, sizeof(val));
569 	}
570 
571 	if (opt_voice) {
572 		uint16_t val;
573 
574 		val = htole16(voice & 0x03ff);
575 		save_value(HCI_CMD_WRITE_VOICE_SETTING, &val, sizeof(val));
576 	}
577 
578 	if (opt_pto) {
579 		uint16_t val;
580 
581 		val = htole16(pto * 8 / 5);
582 		save_value(HCI_CMD_WRITE_PAGE_TIMEOUT, &val, sizeof(val));
583 	}
584 
585 	if (opt_scomtu) {
586 		if (scomtu > 0xff) {
587 			warnx("Invalid SCO mtu %d", scomtu);
588 		} else {
589 			btr.btr_sco_mtu = scomtu;
590 
591 			if (ioctl(hci, SIOCSBTSCOMTU, &btr) < 0)
592 				warn("SIOCSBTSCOMTU");
593 		}
594 	}
595 
596 	if (opt_imode | opt_rssi) {
597 		uint8_t val = (opt_rssi > 0 ? 1 : 0);
598 
599 		if (opt_imode)
600 			val = opt_imode - 1;
601 
602 		save_value(HCI_CMD_WRITE_INQUIRY_MODE, &val, sizeof(val));
603 	}
604 }
605 
606 /*
607  * print value from NULL terminated array given index
608  */
609 void
610 print_val(const char *hdr, const char **argv, int idx)
611 {
612 	int i = 0;
613 
614 	while (i < idx && *argv != NULL)
615 		i++, argv++;
616 
617 	printf("\t%s: %s\n", hdr, *argv == NULL ? "unknown" : *argv);
618 }
619 
620 /*
621  * Print info for Bluetooth Device with varying verbosity levels
622  */
623 void
624 print_info(int level)
625 {
626 	uint8_t version, val, buf[MAX_STR_SIZE];
627 
628 	if (lflag) {
629 		tag(btr.btr_name);
630 		return;
631 	}
632 
633 	if (level-- < 1)
634 		return;
635 
636 	snprintb((char *)buf, MAX_STR_SIZE, FLAGS_FMT, btr.btr_flags);
637 
638 	printf("%s: bdaddr %s flags %s\n", btr.btr_name,
639 		bt_ntoa(&btr.btr_bdaddr, NULL), buf);
640 
641 	if (level-- < 1)
642 		return;
643 
644 	printf("\tnum_cmd = %d\n"
645 	       "\tnum_acl = %d (max %d), acl_mtu = %d\n"
646 	       "\tnum_sco = %d (max %d), sco_mtu = %d\n",
647 	       btr.btr_num_cmd,
648 	       btr.btr_num_acl, btr.btr_max_acl, btr.btr_acl_mtu,
649 	       btr.btr_num_sco, btr.btr_max_sco, btr.btr_sco_mtu);
650 
651 	if (level-- < 1 || (btr.btr_flags & BTF_UP) == 0)
652 		return;
653 
654 	load_value(HCI_CMD_READ_LOCAL_VER, &version, sizeof(version));
655 	printf("\tHCI version: ");
656 	switch(version) {
657 	case HCI_SPEC_V10:	printf("1.0b\n");	break;
658 	case HCI_SPEC_V11:	printf("1.1\n");	break;
659 	case HCI_SPEC_V12:	printf("1.2\n");	break;
660 	case HCI_SPEC_V20:	printf("2.0 + EDR\n");	break;
661 	case HCI_SPEC_V21:	printf("2.1 + EDR\n");	break;
662 	case HCI_SPEC_V30:	printf("3.0 + HS\n");	break;
663 	default:		printf("unknown\n");	break;
664 	}
665 
666 	load_value(HCI_CMD_READ_UNIT_CLASS, buf, HCI_CLASS_SIZE);
667 	print_class("\tclass:", buf);
668 
669 	load_value(HCI_CMD_READ_LOCAL_NAME, buf, HCI_UNIT_NAME_SIZE);
670 	printf("\tname: \"%s\"\n", buf);
671 
672 	load_value(HCI_CMD_READ_VOICE_SETTING, buf, sizeof(uint16_t));
673 	voice = (buf[1] << 8) | buf[0];
674 	print_voice(level);
675 
676 	load_value(HCI_CMD_READ_PIN_TYPE, &val, sizeof(val));
677 	printf("\tpin: %s\n", val ? "fixed" : "variable");
678 
679 	val = 0;
680 	if (version >= HCI_SPEC_V12)
681 		load_value(HCI_CMD_READ_INQUIRY_MODE, &val, sizeof(val));
682 
683 	print_val("inquiry mode", imodes, val);
684 
685 	width = printf("\toptions:");
686 
687 	load_value(HCI_CMD_READ_SCAN_ENABLE, &val, sizeof(val));
688 	if (val & HCI_INQUIRY_SCAN_ENABLE)	tag("iscan");
689 	else if (level > 0)			tag("-iscan");
690 
691 	if (val & HCI_PAGE_SCAN_ENABLE)		tag("pscan");
692 	else if (level > 0)			tag("-pscan");
693 
694 	load_value(HCI_CMD_READ_AUTH_ENABLE, &val, sizeof(val));
695 	if (val)				tag("auth");
696 	else if (level > 0)			tag("-auth");
697 
698 	load_value(HCI_CMD_READ_ENCRYPTION_MODE, &val, sizeof(val));
699 	if (val)				tag("encrypt");
700 	else if (level > 0)			tag("-encrypt");
701 
702 	val = btr.btr_link_policy;
703 	if (val & HCI_LINK_POLICY_ENABLE_ROLE_SWITCH)	tag("switch");
704 	else if (level > 0)				tag("-switch");
705 	if (val & HCI_LINK_POLICY_ENABLE_HOLD_MODE)	tag("hold");
706 	else if (level > 0)				tag("-hold");
707 	if (val & HCI_LINK_POLICY_ENABLE_SNIFF_MODE)	tag("sniff");
708 	else if (level > 0)				tag("-sniff");
709 	if (val & HCI_LINK_POLICY_ENABLE_PARK_MODE)	tag("park");
710 	else if (level > 0)				tag("-park");
711 
712 	tag(NULL);
713 
714 	if (level-- < 1)
715 		return;
716 
717 	ptype = btr.btr_packet_type;
718 	width = printf("\tptype: [0x%04x]", ptype);
719 	if (ptype & HCI_PKT_DM1)		tag("DM1");
720 	if (ptype & HCI_PKT_DH1)		tag("DH1");
721 	if (ptype & HCI_PKT_DM3)		tag("DM3");
722 	if (ptype & HCI_PKT_DH3)		tag("DH3");
723 	if (ptype & HCI_PKT_DM5)		tag("DM5");
724 	if (ptype & HCI_PKT_DH5)		tag("DH5");
725 	if ((ptype & HCI_PKT_2MBPS_DH1) == 0)	tag("2-DH1");
726 	if ((ptype & HCI_PKT_3MBPS_DH1) == 0)	tag("3-DH1");
727 	if ((ptype & HCI_PKT_2MBPS_DH3) == 0)	tag("2-DH3");
728 	if ((ptype & HCI_PKT_3MBPS_DH3) == 0)	tag("3-DH3");
729 	if ((ptype & HCI_PKT_2MBPS_DH5) == 0)	tag("2-DH5");
730 	if ((ptype & HCI_PKT_3MBPS_DH5) == 0)	tag("3-DH5");
731 	tag(NULL);
732 
733 	load_value(HCI_CMD_READ_PAGE_TIMEOUT, buf, sizeof(uint16_t));
734 	printf("\tpage timeout: %d ms\n", le16dec(buf) * 5 / 8);
735 
736 	if (level-- < 1)
737 		return;
738 
739 	if (ioctl(hci, SIOCGBTFEAT, &btr) < 0)
740 		err(EXIT_FAILURE, "SIOCGBTFEAT");
741 
742 	width = printf("\tfeatures:");
743 	print_features0(btr.btr_features0);
744 	print_features1(btr.btr_features1);
745 	tag(NULL);
746 }
747 
748 void
749 print_stats(void)
750 {
751 
752 	if (sflag == 0)
753 		return;
754 
755 	if (sflag == 1) {
756 		if (ioctl(hci, SIOCGBTSTATS, &btr) < 0)
757 			err(EXIT_FAILURE, "SIOCGBTSTATS");
758 	} else  {
759 		if (ioctl(hci, SIOCZBTSTATS, &btr) < 0)
760 			err(EXIT_FAILURE, "SIOCZBTSTATS");
761 	}
762 
763 	printf( "\tTotal bytes sent %d, recieved %d\n"
764 		"\tCommands sent %d, Events received %d\n"
765 		"\tACL data packets sent %d, received %d\n"
766 		"\tSCO data packets sent %d, received %d\n"
767 		"\tInput errors %d, Output errors %d\n",
768 		btr.btr_stats.byte_tx, btr.btr_stats.byte_rx,
769 		btr.btr_stats.cmd_tx, btr.btr_stats.evt_rx,
770 		btr.btr_stats.acl_tx, btr.btr_stats.acl_rx,
771 		btr.btr_stats.sco_tx, btr.btr_stats.sco_rx,
772 		btr.btr_stats.err_rx, btr.btr_stats.err_tx);
773 }
774 
775 void
776 print_features0(uint8_t *f)
777 {
778 
779 	/* ------------------- byte 0 --------------------*/
780 	if (*f & HCI_LMP_3SLOT)		    tag("<3 slot>");
781 	if (*f & HCI_LMP_5SLOT)		    tag("<5 slot>");
782 	if (*f & HCI_LMP_ENCRYPTION)	    tag("<encryption>");
783 	if (*f & HCI_LMP_SLOT_OFFSET)	    tag("<slot offset>");
784 	if (*f & HCI_LMP_TIMIACCURACY)	    tag("<timing accuracy>");
785 	if (*f & HCI_LMP_ROLE_SWITCH)	    tag("<role switch>");
786 	if (*f & HCI_LMP_HOLD_MODE)	    tag("<hold mode>");
787 	if (*f & HCI_LMP_SNIFF_MODE)	    tag("<sniff mode>");
788 	f++;
789 
790 	/* ------------------- byte 1 --------------------*/
791 	if (*f & HCI_LMP_PARK_MODE)	    tag("<park mode>");
792 	if (*f & HCI_LMP_RSSI)		    tag("<RSSI>");
793 	if (*f & HCI_LMP_CHANNEL_QUALITY)   tag("<channel quality>");
794 	if (*f & HCI_LMP_SCO_LINK)	    tag("<SCO link>");
795 	if (*f & HCI_LMP_HV2_PKT)	    tag("<HV2>");
796 	if (*f & HCI_LMP_HV3_PKT)	    tag("<HV3>");
797 	if (*f & HCI_LMP_ULAW_LOG)	    tag("<u-Law log>");
798 	if (*f & HCI_LMP_ALAW_LOG)	    tag("<A-Law log>");
799 	f++;
800 
801 	/* ------------------- byte 1 --------------------*/
802 	if (*f & HCI_LMP_CVSD)		    tag("<CVSD data>");
803 	if (*f & HCI_LMP_PAGISCHEME)	    tag("<paging parameter>");
804 	if (*f & HCI_LMP_POWER_CONTROL)	    tag("<power control>");
805 	if (*f & HCI_LMP_TRANSPARENT_SCO)   tag("<transparent SCO>");
806 	if (*f & HCI_LMP_FLOW_CONTROL_LAG0) tag("<flow control lag 0>");
807 	if (*f & HCI_LMP_FLOW_CONTROL_LAG1) tag("<flow control lag 1>");
808 	if (*f & HCI_LMP_FLOW_CONTROL_LAG2) tag("<flow control lag 2>");
809 	if (*f & HCI_LMP_BC_ENCRYPTION)	    tag("<broadcast encryption>");
810 	f++;
811 
812 	/* ------------------- byte 3 --------------------*/
813 	if (*f & HCI_LMP_EDR_ACL_2MBPS)	    tag("<EDR ACL 2Mbps>");
814 	if (*f & HCI_LMP_EDR_ACL_3MBPS)	    tag("<EDR ACL 3Mbps>");
815 	if (*f & HCI_LMP_ENHANCED_ISCAN)    tag("<enhanced inquiry scan>");
816 	if (*f & HCI_LMP_INTERLACED_ISCAN)  tag("<interlaced inquiry scan>");
817 	if (*f & HCI_LMP_INTERLACED_PSCAN)  tag("<interlaced page scan>");
818 	if (*f & HCI_LMP_RSSI_INQUIRY)	    tag("<RSSI with inquiry result>");
819 	if (*f & HCI_LMP_EV3_PKT)	    tag("<EV3 packets>");
820 	f++;
821 
822 	/* ------------------- byte 4 --------------------*/
823 	if (*f & HCI_LMP_EV4_PKT)	    tag("<EV4 packets>");
824 	if (*f & HCI_LMP_EV5_PKT)	    tag("<EV5 packets>");
825 	if (*f & HCI_LMP_AFH_CAPABLE_SLAVE) tag("<AFH capable slave>");
826 	if (*f & HCI_LMP_AFH_CLASS_SLAVE)   tag("<AFH class slave>");
827 	if (*f & HCI_LMP_3SLOT_EDR_ACL)	    tag("<3 slot EDR ACL>");
828 	f++;
829 
830 	/* ------------------- byte 5 --------------------*/
831 	if (*f & HCI_LMP_5SLOT_EDR_ACL)	    tag("<5 slot EDR ACL>");
832 	if (*f & HCI_LMP_SNIFF_SUBRATING)   tag("<sniff subrating>");
833 	if (*f & HCI_LMP_PAUSE_ENCRYPTION)  tag("<pause encryption>");
834 	if (*f & HCI_LMP_AFH_CAPABLE_MASTER)tag("<AFH capable master>");
835 	if (*f & HCI_LMP_AFH_CLASS_MASTER)  tag("<AFH class master>");
836 	if (*f & HCI_LMP_EDR_eSCO_2MBPS)    tag("<EDR eSCO 2Mbps>");
837 	if (*f & HCI_LMP_EDR_eSCO_3MBPS)    tag("<EDR eSCO 3Mbps>");
838 	if (*f & HCI_LMP_3SLOT_EDR_eSCO)    tag("<3 slot EDR eSCO>");
839 	f++;
840 
841 	/* ------------------- byte 6 --------------------*/
842 	if (*f & HCI_LMP_EXTENDED_INQUIRY)  tag("<extended inquiry>");
843 	if (*f & HCI_LMP_SIMPLE_PAIRING)    tag("<secure simple pairing>");
844 	if (*f & HCI_LMP_ENCAPSULATED_PDU)  tag("<encapsulated PDU>");
845 	if (*f & HCI_LMP_ERRDATA_REPORTING) tag("<errdata reporting>");
846 	if (*f & HCI_LMP_NOFLUSH_PB_FLAG)   tag("<no flush PB flag>");
847 	f++;
848 
849 	/* ------------------- byte 7 --------------------*/
850 	if (*f & HCI_LMP_LINK_SUPERVISION_TO)tag("<link supervision timeout changed>");
851 	if (*f & HCI_LMP_INQ_RSP_TX_POWER)  tag("<inquiry rsp TX power level>");
852 	if (*f & HCI_LMP_ENHANCED_POWER_CONTROL)tag("<enhanced power control>");
853 	if (*f & HCI_LMP_EXTENDED_FEATURES) tag("<extended features>");
854 }
855 
856 void
857 print_features1(uint8_t *f)
858 {
859 
860 	/* ------------------- byte 0 --------------------*/
861 	if (*f & HCI_LMP_SSP)		    tag("<secure simple pairing>");
862 }
863 
864 void
865 print_class(const char *str, uint8_t *uclass)
866 {
867 
868 	class = (uclass[2] << 16) | (uclass[1] << 8) | uclass[0];
869 	width = printf("%s [0x%06x]", str, class);
870 
871 	switch(__SHIFTOUT(class, __BITS(0, 1))) {
872 	case 0:	print_class0();		break;
873 	default:			break;
874 	}
875 
876 	tag(NULL);
877 }
878 
879 void
880 print_class0(void)
881 {
882 
883 	switch (__SHIFTOUT(class, __BITS(8, 12))) {
884 	case 1:	/* Computer */
885 		switch (__SHIFTOUT(class, __BITS(2, 7))) {
886 		case 1: tag("Desktop workstation");		break;
887 		case 2: tag("Server-class computer");		break;
888 		case 3: tag("Laptop");				break;
889 		case 4: tag("Handheld PC/PDA");			break;
890 		case 5: tag("Palm Sized PC/PDA");		break;
891 		case 6: tag("Wearable computer");		break;
892 		default: tag("Computer");			break;
893 		}
894 		break;
895 
896 	case 2:	/* Phone */
897 		switch (__SHIFTOUT(class, __BITS(2, 7))) {
898 		case 1: tag("Cellular Phone");			break;
899 		case 2: tag("Cordless Phone");			break;
900 		case 3: tag("Smart Phone");			break;
901 		case 4: tag("Wired Modem/Phone Gateway");	break;
902 		case 5: tag("Common ISDN");			break;
903 		default:tag("Phone");				break;
904 		}
905 		break;
906 
907 	case 3:	/* LAN */
908 		tag("LAN");
909 		switch (__SHIFTOUT(class, __BITS(5, 7))) {
910 		case 0: tag("[Fully available]");		break;
911 		case 1: tag("[1-17% utilised]");		break;
912 		case 2: tag("[17-33% utilised]");		break;
913 		case 3: tag("[33-50% utilised]");		break;
914 		case 4: tag("[50-67% utilised]");		break;
915 		case 5: tag("[67-83% utilised]");		break;
916 		case 6: tag("[83-99% utilised]");		break;
917 		case 7: tag("[No service available]");		break;
918 		}
919 		break;
920 
921 	case 4:	/* Audio/Visual */
922 		switch (__SHIFTOUT(class, __BITS(2, 7))) {
923 		case 1: tag("Wearable Headset");		break;
924 		case 2: tag("Hands-free Audio");		break;
925 		case 4: tag("Microphone");			break;
926 		case 5: tag("Loudspeaker");			break;
927 		case 6: tag("Headphones");			break;
928 		case 7: tag("Portable Audio");			break;
929 		case 8: tag("Car Audio");			break;
930 		case 9: tag("Set-top Box");			break;
931 		case 10: tag("HiFi Audio");			break;
932 		case 11: tag("VCR");				break;
933 		case 12: tag("Video Camera");			break;
934 		case 13: tag("Camcorder");			break;
935 		case 14: tag("Video Monitor");			break;
936 		case 15: tag("Video Display and Loudspeaker");	break;
937 		case 16: tag("Video Conferencing");		break;
938 		case 18: tag("A/V [Gaming/Toy]");		break;
939 		default: tag("Audio/Visual");			break;
940 		}
941 		break;
942 
943 	case 5:	/* Peripheral */
944 		switch (__SHIFTOUT(class, __BITS(2, 5))) {
945 		case 1: tag("Joystick");			break;
946 		case 2: tag("Gamepad");				break;
947 		case 3: tag("Remote Control");			break;
948 		case 4: tag("Sensing Device");			break;
949 		case 5: tag("Digitiser Tablet");		break;
950 		case 6: tag("Card Reader");			break;
951 		default: tag("Peripheral");			break;
952 		}
953 
954 		if (class & __BIT(6)) tag("Keyboard");
955 		if (class & __BIT(7)) tag("Mouse");
956 		break;
957 
958 	case 6:	/* Imaging */
959 		if (class & __BIT(4)) tag("Display");
960 		if (class & __BIT(5)) tag("Camera");
961 		if (class & __BIT(6)) tag("Scanner");
962 		if (class & __BIT(7)) tag("Printer");
963 		if ((class & __BITS(4, 7)) == 0) tag("Imaging");
964 		break;
965 
966 	case 7:	/* Wearable */
967 		switch (__SHIFTOUT(class, __BITS(2, 7))) {
968 		case 1: tag("Wrist Watch");			break;
969 		case 2: tag("Pager");				break;
970 		case 3: tag("Jacket");				break;
971 		case 4: tag("Helmet");				break;
972 		case 5: tag("Glasses");				break;
973 		default: tag("Wearable");			break;
974 		}
975 		break;
976 
977 	case 8:	/* Toy */
978 		switch (__SHIFTOUT(class, __BITS(2, 7))) {
979 		case 1: tag("Robot");				break;
980 		case 2: tag("Vehicle");				break;
981 		case 3: tag("Doll / Action Figure");		break;
982 		case 4: tag("Controller");			break;
983 		case 5: tag("Game");				break;
984 		default: tag("Toy");				break;
985 		}
986 		break;
987 
988 	case 9: /* Health */
989 		switch (__SHIFTOUT(class, __BITS(2, 7))) {
990 		case 1:	tag("Blood Pressure Monitor");		break;
991 		case 2:	tag("Thermometer");			break;
992 		case 3:	tag("Weighing Scale");			break;
993 		case 4:	tag("Glucose Meter");			break;
994 		case 5:	tag("Pulse Oximeter");			break;
995 		case 6:	tag("Heart/Pulse Rate Monitor");	break;
996 		case 7:	tag("Health Data Display");		break;
997 		default: tag("Health");				break;
998 		}
999 		break;
1000 
1001 	default:
1002 		break;
1003 	}
1004 
1005 	if (class & __BIT(13))	tag("<Limited Discoverable>");
1006 	if (class & __BIT(16))	tag("<Positioning>");
1007 	if (class & __BIT(17))	tag("<Networking>");
1008 	if (class & __BIT(18))	tag("<Rendering>");
1009 	if (class & __BIT(19))	tag("<Capturing>");
1010 	if (class & __BIT(20))	tag("<Object Transfer>");
1011 	if (class & __BIT(21))	tag("<Audio>");
1012 	if (class & __BIT(22))	tag("<Telephony>");
1013 	if (class & __BIT(23))	tag("<Information>");
1014 }
1015 
1016 void
1017 print_voice(int level)
1018 {
1019 	printf("\tvoice: [0x%4.4x]\n", voice);
1020 
1021 	if (level == 0)
1022 		return;
1023 
1024 	printf("\t\tInput Coding: ");
1025 	switch ((voice & 0x0300) >> 8) {
1026 	case 0x00:	printf("Linear PCM [%d-bit, pos %d]",
1027 			(voice & 0x0020 ? 16 : 8),
1028 			(voice & 0x001c) >> 2);		break;
1029 	case 0x01:	printf("u-Law");		break;
1030 	case 0x02:	printf("A-Law");		break;
1031 	case 0x03:	printf("unknown");		break;
1032 	}
1033 
1034 	switch ((voice & 0x00c0) >> 6) {
1035 	case 0x00:	printf(", 1's complement");	break;
1036 	case 0x01:	printf(", 2's complement");	break;
1037 	case 0x02:	printf(", sign magnitude");	break;
1038 	case 0x03:	printf(", unsigned");		break;
1039 	}
1040 
1041 	printf("\n\t\tAir Coding: ");
1042 	switch (voice & 0x0003) {
1043 	case 0x00:	printf("CVSD");			break;
1044 	case 0x01:	printf("u-Law");		break;
1045 	case 0x02:	printf("A-Law");		break;
1046 	case 0x03:	printf("Transparent");		break;
1047 	}
1048 
1049 	printf("\n");
1050 }
1051 
1052 void
1053 print_result(int num, struct bt_devinquiry *r)
1054 {
1055 	hci_remote_name_req_cp ncp;
1056 	hci_remote_name_req_compl_ep nep;
1057 	struct hostent *hp;
1058 
1059 	printf("%3d: bdaddr %s", num, bt_ntoa(&r->bdaddr, NULL));
1060 
1061 	hp = bt_gethostbyaddr((const char *)&r->bdaddr, sizeof(bdaddr_t), AF_BLUETOOTH);
1062 	if (hp != NULL)
1063 		printf(" (%s)", hp->h_name);
1064 
1065 	printf("\n");
1066 
1067 	memset(&ncp, 0, sizeof(ncp));
1068 	bdaddr_copy(&ncp.bdaddr, &r->bdaddr);
1069 	ncp.page_scan_rep_mode = r->pscan_rep_mode;
1070 	ncp.clock_offset = r->clock_offset;
1071 
1072 	hci_req(HCI_CMD_REMOTE_NAME_REQ,
1073 		HCI_EVENT_REMOTE_NAME_REQ_COMPL,
1074 		&ncp, sizeof(ncp),
1075 		&nep, sizeof(nep));
1076 
1077 	printf("   : name \"%s\"\n", nep.name);
1078 	print_class("   : class", r->dev_class);
1079 	printf("   : page scan rep mode 0x%02x\n", r->pscan_rep_mode);
1080 	printf("   : clock offset %d\n", le16toh(r->clock_offset));
1081 	printf("   : rssi %d\n", r->rssi);
1082 	printf("\n");
1083 }
1084 
1085 void
1086 do_inquiry(void)
1087 {
1088 	struct bt_devinquiry *result;
1089 	int i, num;
1090 
1091 	if (opt_inquiry == 0)
1092 		return;
1093 
1094 	printf("Device Discovery from device: %s ...", btr.btr_name);
1095 	fflush(stdout);
1096 
1097 	num = bt_devinquiry(btr.btr_name, INQUIRY_LENGTH,
1098 	    INQUIRY_MAX_RESPONSES, &result);
1099 
1100 	if (num == -1) {
1101 		printf("failed\n");
1102 		err(EXIT_FAILURE, "%s", btr.btr_name);
1103 	}
1104 
1105 	printf(" %d response%s\n", num, (num == 1 ? "" : "s"));
1106 
1107 	for (i = 0 ; i < num ; i++)
1108 		print_result(i + 1, &result[i]);
1109 
1110 	free(result);
1111 }
1112