rfcomm_sppd.c revision 1.13 1 1.13 plunky /* $NetBSD: rfcomm_sppd.c,v 1.13 2010/11/03 08:27:27 plunky Exp $ */
2 1.1 gdamore
3 1.1 gdamore /*-
4 1.1 gdamore * Copyright (c) 2006 Itronix Inc.
5 1.1 gdamore * All rights reserved.
6 1.1 gdamore *
7 1.1 gdamore * Redistribution and use in source and binary forms, with or without
8 1.1 gdamore * modification, are permitted provided that the following conditions
9 1.1 gdamore * are met:
10 1.1 gdamore * 1. Redistributions of source code must retain the above copyright
11 1.1 gdamore * notice, this list of conditions and the following disclaimer.
12 1.1 gdamore * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 gdamore * notice, this list of conditions and the following disclaimer in the
14 1.1 gdamore * documentation and/or other materials provided with the distribution.
15 1.1 gdamore * 3. The name of Itronix Inc. may not be used to endorse
16 1.1 gdamore * or promote products derived from this software without specific
17 1.1 gdamore * prior written permission.
18 1.1 gdamore *
19 1.1 gdamore * THIS SOFTWARE IS PROVIDED BY ITRONIX INC. ``AS IS'' AND
20 1.1 gdamore * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 1.1 gdamore * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 1.1 gdamore * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL ITRONIX INC. BE LIABLE FOR ANY
23 1.1 gdamore * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
24 1.1 gdamore * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
25 1.1 gdamore * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
26 1.1 gdamore * ON ANY THEORY OF LIABILITY, WHETHER IN
27 1.1 gdamore * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 1.1 gdamore * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 1.1 gdamore * POSSIBILITY OF SUCH DAMAGE.
30 1.1 gdamore */
31 1.1 gdamore /*
32 1.10 plunky * Copyright (c) 2009 The NetBSD Foundation, Inc.
33 1.2 plunky * Copyright (c) 2007 Iain Hibbert
34 1.1 gdamore * Copyright (c) 2003 Maksim Yevmenkin <m_evmenkin (at) yahoo.com>
35 1.1 gdamore * All rights reserved.
36 1.1 gdamore *
37 1.1 gdamore * Redistribution and use in source and binary forms, with or without
38 1.1 gdamore * modification, are permitted provided that the following conditions
39 1.1 gdamore * are met:
40 1.1 gdamore * 1. Redistributions of source code must retain the above copyright
41 1.1 gdamore * notice, this list of conditions and the following disclaimer.
42 1.1 gdamore * 2. Redistributions in binary form must reproduce the above copyright
43 1.1 gdamore * notice, this list of conditions and the following disclaimer in the
44 1.1 gdamore * documentation and/or other materials provided with the distribution.
45 1.1 gdamore *
46 1.1 gdamore * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
47 1.1 gdamore * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
48 1.1 gdamore * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
49 1.1 gdamore * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
50 1.1 gdamore * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
51 1.1 gdamore * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
52 1.1 gdamore * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
53 1.1 gdamore * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
54 1.1 gdamore * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
55 1.1 gdamore * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
56 1.1 gdamore * SUCH DAMAGE.
57 1.1 gdamore */
58 1.1 gdamore
59 1.1 gdamore #include <sys/cdefs.h>
60 1.10 plunky __COPYRIGHT("@(#) Copyright (c) 2009 The NetBSD Foundation, Inc.\
61 1.10 plunky Copyright (c) 2007 Iain Hibbert.\
62 1.9 lukem Copyright (c) 2006 Itronix, Inc.\
63 1.9 lukem Copyright (c) 2003 Maksim Yevmenkin m_evmenkin (at) yahoo.com.\
64 1.9 lukem All rights reserved.");
65 1.13 plunky __RCSID("$NetBSD: rfcomm_sppd.c,v 1.13 2010/11/03 08:27:27 plunky Exp $");
66 1.11 plunky
67 1.11 plunky #include <sys/param.h>
68 1.1 gdamore
69 1.1 gdamore #include <bluetooth.h>
70 1.1 gdamore #include <ctype.h>
71 1.1 gdamore #include <err.h>
72 1.1 gdamore #include <errno.h>
73 1.1 gdamore #include <fcntl.h>
74 1.1 gdamore #include <grp.h>
75 1.1 gdamore #include <limits.h>
76 1.1 gdamore #include <paths.h>
77 1.1 gdamore #include <sdp.h>
78 1.1 gdamore #include <signal.h>
79 1.1 gdamore #include <stdarg.h>
80 1.1 gdamore #include <stdio.h>
81 1.1 gdamore #include <stdlib.h>
82 1.1 gdamore #include <string.h>
83 1.1 gdamore #include <syslog.h>
84 1.1 gdamore #include <termios.h>
85 1.1 gdamore #include <unistd.h>
86 1.1 gdamore
87 1.7 plunky #include <netbt/rfcomm.h>
88 1.7 plunky
89 1.2 plunky int open_tty(const char *);
90 1.12 plunky int open_client(bdaddr_t *, bdaddr_t *, int, uintmax_t, const char *);
91 1.12 plunky int open_server(bdaddr_t *, uint16_t, uint8_t, int, const char *);
92 1.2 plunky void copy_data(int, int);
93 1.12 plunky int service_search(const bdaddr_t *, const bdaddr_t *, uint16_t, uintmax_t *, uintmax_t *);
94 1.2 plunky void sighandler(int);
95 1.2 plunky void usage(void);
96 1.2 plunky void reset_tio(void);
97 1.2 plunky
98 1.2 plunky int done; /* got a signal */
99 1.2 plunky struct termios tio; /* stored termios for reset on exit */
100 1.2 plunky
101 1.2 plunky struct service {
102 1.10 plunky const char * name;
103 1.10 plunky const char * description;
104 1.2 plunky uint16_t class;
105 1.2 plunky } services[] = {
106 1.2 plunky { "DUN", "Dialup Networking",
107 1.10 plunky SDP_SERVICE_CLASS_DIALUP_NETWORKING },
108 1.10 plunky { "LAN", "LAN access using PPP",
109 1.10 plunky SDP_SERVICE_CLASS_LAN_ACCESS_USING_PPP },
110 1.2 plunky { "SP", "Serial Port",
111 1.10 plunky SDP_SERVICE_CLASS_SERIAL_PORT },
112 1.10 plunky { NULL, NULL, 0 }
113 1.2 plunky };
114 1.1 gdamore
115 1.1 gdamore int
116 1.1 gdamore main(int argc, char *argv[])
117 1.1 gdamore {
118 1.2 plunky struct termios t;
119 1.2 plunky bdaddr_t laddr, raddr;
120 1.2 plunky fd_set rdset;
121 1.6 plunky const char *service;
122 1.6 plunky char *ep, *tty;
123 1.7 plunky int lm, n, rfcomm, tty_in, tty_out;
124 1.12 plunky uint16_t psm;
125 1.2 plunky uint8_t channel;
126 1.1 gdamore
127 1.1 gdamore bdaddr_copy(&laddr, BDADDR_ANY);
128 1.1 gdamore bdaddr_copy(&raddr, BDADDR_ANY);
129 1.3 plunky service = "SP";
130 1.3 plunky tty = NULL;
131 1.13 plunky channel = RFCOMM_CHANNEL_ANY;
132 1.12 plunky psm = L2CAP_PSM_RFCOMM;
133 1.7 plunky lm = 0;
134 1.1 gdamore
135 1.1 gdamore /* Parse command line options */
136 1.12 plunky while ((n = getopt(argc, argv, "a:c:d:hm:p:s:t:")) != -1) {
137 1.1 gdamore switch (n) {
138 1.2 plunky case 'a': /* remote device address */
139 1.1 gdamore if (!bt_aton(optarg, &raddr)) {
140 1.1 gdamore struct hostent *he = NULL;
141 1.1 gdamore
142 1.1 gdamore if ((he = bt_gethostbyname(optarg)) == NULL)
143 1.2 plunky errx(EXIT_FAILURE, "%s: %s", optarg,
144 1.2 plunky hstrerror(h_errno));
145 1.1 gdamore
146 1.1 gdamore bdaddr_copy(&raddr, (bdaddr_t *)he->h_addr);
147 1.1 gdamore }
148 1.1 gdamore break;
149 1.1 gdamore
150 1.1 gdamore case 'c': /* RFCOMM channel */
151 1.1 gdamore channel = strtoul(optarg, &ep, 10);
152 1.13 plunky if (*ep != '\0'
153 1.13 plunky || channel < RFCOMM_CHANNEL_MIN
154 1.13 plunky || channel > RFCOMM_CHANNEL_MAX)
155 1.3 plunky errx(EXIT_FAILURE, "Invalid channel: %s", optarg);
156 1.3 plunky
157 1.1 gdamore break;
158 1.1 gdamore
159 1.2 plunky case 'd': /* local device address */
160 1.2 plunky if (!bt_devaddr(optarg, &laddr))
161 1.2 plunky err(EXIT_FAILURE, "%s", optarg);
162 1.2 plunky
163 1.1 gdamore break;
164 1.1 gdamore
165 1.7 plunky case 'm': /* Link Mode */
166 1.7 plunky if (strcasecmp(optarg, "auth") == 0)
167 1.7 plunky lm = RFCOMM_LM_AUTH;
168 1.7 plunky else if (strcasecmp(optarg, "encrypt") == 0)
169 1.7 plunky lm = RFCOMM_LM_ENCRYPT;
170 1.7 plunky else if (strcasecmp(optarg, "secure") == 0)
171 1.7 plunky lm = RFCOMM_LM_SECURE;
172 1.7 plunky else
173 1.7 plunky errx(EXIT_FAILURE, "%s: unknown mode", optarg);
174 1.7 plunky
175 1.7 plunky break;
176 1.7 plunky
177 1.12 plunky case 'p': /* PSM */
178 1.12 plunky psm = strtoul(optarg, &ep, 0);
179 1.12 plunky if (*ep != '\0' || L2CAP_PSM_INVALID(psm))
180 1.12 plunky errx(EXIT_FAILURE, "Invalid PSM: %s", optarg);
181 1.12 plunky
182 1.12 plunky break;
183 1.12 plunky
184 1.3 plunky case 's': /* service class */
185 1.2 plunky service = optarg;
186 1.1 gdamore break;
187 1.1 gdamore
188 1.1 gdamore case 't': /* Slave TTY name */
189 1.1 gdamore if (optarg[0] != '/')
190 1.1 gdamore asprintf(&tty, "%s%s", _PATH_DEV, optarg);
191 1.1 gdamore else
192 1.1 gdamore tty = optarg;
193 1.2 plunky
194 1.1 gdamore break;
195 1.1 gdamore
196 1.1 gdamore case 'h':
197 1.1 gdamore default:
198 1.1 gdamore usage();
199 1.1 gdamore /* NOT REACHED */
200 1.1 gdamore }
201 1.1 gdamore }
202 1.1 gdamore
203 1.2 plunky /*
204 1.2 plunky * validate options:
205 1.13 plunky * cannot have remote address if channel was given
206 1.2 plunky */
207 1.13 plunky if (channel != RFCOMM_CHANNEL_ANY && !bdaddr_any(&raddr))
208 1.1 gdamore usage();
209 1.1 gdamore
210 1.2 plunky /*
211 1.2 plunky * grab ttys before we start the bluetooth
212 1.2 plunky */
213 1.1 gdamore if (tty == NULL) {
214 1.2 plunky tty_in = STDIN_FILENO;
215 1.2 plunky tty_out = STDOUT_FILENO;
216 1.2 plunky } else {
217 1.2 plunky tty_in = open_tty(tty);
218 1.2 plunky tty_out = tty_in;
219 1.2 plunky }
220 1.1 gdamore
221 1.2 plunky /* open RFCOMM */
222 1.13 plunky if (!bdaddr_any(&raddr))
223 1.12 plunky rfcomm = open_client(&laddr, &raddr, lm, psm, service);
224 1.2 plunky else
225 1.12 plunky rfcomm = open_server(&laddr, psm, channel, lm, service);
226 1.1 gdamore
227 1.2 plunky /*
228 1.4 plunky * now we are ready to go, so either detach or maybe turn
229 1.2 plunky * off some input processing, so that rfcomm_sppd can
230 1.2 plunky * be used directly with stdio
231 1.2 plunky */
232 1.2 plunky if (tty == NULL) {
233 1.2 plunky if (tcgetattr(tty_in, &t) < 0)
234 1.2 plunky err(EXIT_FAILURE, "tcgetattr");
235 1.1 gdamore
236 1.2 plunky memcpy(&tio, &t, sizeof(tio));
237 1.2 plunky t.c_lflag &= ~(ECHO | ICANON);
238 1.2 plunky t.c_iflag &= ~(ICRNL);
239 1.1 gdamore
240 1.4 plunky if (memcmp(&tio, &t, sizeof(tio))) {
241 1.4 plunky if (tcsetattr(tty_in, TCSANOW, &t) < 0)
242 1.4 plunky err(EXIT_FAILURE, "tcsetattr");
243 1.1 gdamore
244 1.4 plunky atexit(reset_tio);
245 1.4 plunky }
246 1.2 plunky } else {
247 1.2 plunky if (daemon(0, 0) < 0)
248 1.2 plunky err(EXIT_FAILURE, "daemon() failed");
249 1.1 gdamore }
250 1.1 gdamore
251 1.2 plunky /* catch signals */
252 1.2 plunky done = 0;
253 1.2 plunky (void)signal(SIGHUP, sighandler);
254 1.2 plunky (void)signal(SIGINT, sighandler);
255 1.2 plunky (void)signal(SIGPIPE, sighandler);
256 1.2 plunky (void)signal(SIGTERM, sighandler);
257 1.2 plunky
258 1.2 plunky openlog(getprogname(), LOG_PERROR | LOG_PID, LOG_DAEMON);
259 1.2 plunky syslog(LOG_INFO, "Starting on %s...", (tty ? tty : "stdio"));
260 1.2 plunky
261 1.11 plunky n = MAX(tty_in, rfcomm) + 1;
262 1.2 plunky while (!done) {
263 1.2 plunky FD_ZERO(&rdset);
264 1.2 plunky FD_SET(tty_in, &rdset);
265 1.2 plunky FD_SET(rfcomm, &rdset);
266 1.1 gdamore
267 1.2 plunky if (select(n, &rdset, NULL, NULL, NULL) < 0) {
268 1.1 gdamore if (errno == EINTR)
269 1.1 gdamore continue;
270 1.1 gdamore
271 1.2 plunky syslog(LOG_ERR, "select error: %m");
272 1.1 gdamore exit(EXIT_FAILURE);
273 1.1 gdamore }
274 1.1 gdamore
275 1.2 plunky if (FD_ISSET(tty_in, &rdset))
276 1.2 plunky copy_data(tty_in, rfcomm);
277 1.1 gdamore
278 1.2 plunky if (FD_ISSET(rfcomm, &rdset))
279 1.2 plunky copy_data(rfcomm, tty_out);
280 1.2 plunky }
281 1.1 gdamore
282 1.2 plunky syslog(LOG_INFO, "Completed on %s", (tty ? tty : "stdio"));
283 1.2 plunky exit(EXIT_SUCCESS);
284 1.2 plunky }
285 1.1 gdamore
286 1.2 plunky int
287 1.2 plunky open_tty(const char *tty)
288 1.1 gdamore {
289 1.1 gdamore char pty[PATH_MAX], *slash;
290 1.1 gdamore struct group *gr = NULL;
291 1.1 gdamore gid_t ttygid;
292 1.2 plunky int master;
293 1.1 gdamore
294 1.1 gdamore /*
295 1.1 gdamore * Construct master PTY name. The slave tty name must be less then
296 1.1 gdamore * PATH_MAX characters in length, must contain '/' character and
297 1.1 gdamore * must not end with '/'.
298 1.1 gdamore */
299 1.2 plunky if (strlen(tty) >= sizeof(pty))
300 1.2 plunky errx(EXIT_FAILURE, ": tty name too long");
301 1.1 gdamore
302 1.1 gdamore strlcpy(pty, tty, sizeof(pty));
303 1.1 gdamore slash = strrchr(pty, '/');
304 1.2 plunky if (slash == NULL || slash[1] == '\0')
305 1.2 plunky errx(EXIT_FAILURE, "%s: invalid tty", tty);
306 1.1 gdamore
307 1.1 gdamore slash[1] = 'p';
308 1.2 plunky if (strcmp(pty, tty) == 0)
309 1.2 plunky errx(EXIT_FAILURE, "Master and slave tty are the same (%s)", tty);
310 1.1 gdamore
311 1.2 plunky if ((master = open(pty, O_RDWR, 0)) < 0)
312 1.2 plunky err(EXIT_FAILURE, "%s", pty);
313 1.1 gdamore
314 1.1 gdamore /*
315 1.1 gdamore * Slave TTY
316 1.1 gdamore */
317 1.1 gdamore
318 1.1 gdamore if ((gr = getgrnam("tty")) != NULL)
319 1.1 gdamore ttygid = gr->gr_gid;
320 1.1 gdamore else
321 1.1 gdamore ttygid = (gid_t)-1;
322 1.1 gdamore
323 1.2 plunky (void)chown(tty, getuid(), ttygid);
324 1.2 plunky (void)chmod(tty, S_IRUSR | S_IWUSR | S_IWGRP);
325 1.2 plunky (void)revoke(tty);
326 1.2 plunky
327 1.2 plunky return master;
328 1.2 plunky }
329 1.1 gdamore
330 1.2 plunky int
331 1.12 plunky open_client(bdaddr_t *laddr, bdaddr_t *raddr, int lm, uintmax_t psm, const char *service)
332 1.2 plunky {
333 1.2 plunky struct sockaddr_bt sa;
334 1.3 plunky struct service *s;
335 1.2 plunky struct linger l;
336 1.3 plunky char *ep;
337 1.10 plunky int fd, error;
338 1.10 plunky uintmax_t channel;
339 1.3 plunky
340 1.3 plunky for (s = services ; ; s++) {
341 1.3 plunky if (s->name == NULL) {
342 1.5 plunky channel = strtoul(service, &ep, 10);
343 1.10 plunky if (*ep != '\0')
344 1.10 plunky errx(EXIT_FAILURE, "Unknown service: %s", service);
345 1.3 plunky
346 1.3 plunky break;
347 1.3 plunky }
348 1.3 plunky
349 1.3 plunky if (strcasecmp(s->name, service) == 0) {
350 1.12 plunky error = service_search(laddr, raddr, s->class, &psm, &channel);
351 1.10 plunky if (error != 0)
352 1.10 plunky errx(EXIT_FAILURE, "%s: %s", s->name, strerror(error));
353 1.3 plunky
354 1.3 plunky break;
355 1.3 plunky }
356 1.3 plunky }
357 1.1 gdamore
358 1.10 plunky if (channel < RFCOMM_CHANNEL_MIN || channel > RFCOMM_CHANNEL_MAX)
359 1.10 plunky errx(EXIT_FAILURE, "Invalid channel %"PRIuMAX, channel);
360 1.10 plunky
361 1.12 plunky if (L2CAP_PSM_INVALID(psm))
362 1.12 plunky errx(EXIT_FAILURE, "Invalid PSM 0x%04"PRIxMAX, psm);
363 1.12 plunky
364 1.2 plunky memset(&sa, 0, sizeof(sa));
365 1.2 plunky sa.bt_len = sizeof(sa);
366 1.2 plunky sa.bt_family = AF_BLUETOOTH;
367 1.2 plunky bdaddr_copy(&sa.bt_bdaddr, laddr);
368 1.2 plunky
369 1.2 plunky fd = socket(PF_BLUETOOTH, SOCK_STREAM, BTPROTO_RFCOMM);
370 1.2 plunky if (fd < 0)
371 1.2 plunky err(EXIT_FAILURE, "socket()");
372 1.2 plunky
373 1.2 plunky if (bind(fd, (struct sockaddr *)&sa, sizeof(sa)) < 0)
374 1.2 plunky err(EXIT_FAILURE, "bind(%s)", bt_ntoa(laddr, NULL));
375 1.2 plunky
376 1.2 plunky memset(&l, 0, sizeof(l));
377 1.2 plunky l.l_onoff = 1;
378 1.2 plunky l.l_linger = 5;
379 1.2 plunky if (setsockopt(fd, SOL_SOCKET, SO_LINGER, &l, sizeof(l)) < 0)
380 1.2 plunky err(EXIT_FAILURE, "linger()");
381 1.2 plunky
382 1.7 plunky if (setsockopt(fd, BTPROTO_RFCOMM, SO_RFCOMM_LM, &lm, sizeof(lm)) < 0)
383 1.7 plunky err(EXIT_FAILURE, "link mode");
384 1.7 plunky
385 1.12 plunky sa.bt_psm = psm;
386 1.2 plunky sa.bt_channel = channel;
387 1.2 plunky bdaddr_copy(&sa.bt_bdaddr, raddr);
388 1.2 plunky
389 1.2 plunky if (connect(fd, (struct sockaddr *)&sa, sizeof(sa)) < 0)
390 1.12 plunky err(EXIT_FAILURE, "connect(%s, 0x%04"PRIxMAX", %"PRIuMAX")",
391 1.12 plunky bt_ntoa(raddr, NULL), psm, channel);
392 1.1 gdamore
393 1.2 plunky return fd;
394 1.2 plunky }
395 1.1 gdamore
396 1.2 plunky int
397 1.12 plunky open_server(bdaddr_t *laddr, uint16_t psm, uint8_t channel, int lm, const char *service)
398 1.1 gdamore {
399 1.10 plunky uint8_t buffer[256];
400 1.2 plunky struct sockaddr_bt sa;
401 1.10 plunky struct service *s;
402 1.2 plunky struct linger l;
403 1.2 plunky socklen_t len;
404 1.10 plunky sdp_session_t ss;
405 1.10 plunky sdp_data_t rec;
406 1.10 plunky int sv, fd;
407 1.10 plunky
408 1.10 plunky for (s = services; ; s++) {
409 1.10 plunky if (s->name == NULL)
410 1.10 plunky usage();
411 1.1 gdamore
412 1.10 plunky if (strcasecmp(s->name, service) == 0)
413 1.10 plunky break;
414 1.10 plunky }
415 1.2 plunky
416 1.10 plunky /* Open server socket */
417 1.2 plunky sv = socket(PF_BLUETOOTH, SOCK_STREAM, BTPROTO_RFCOMM);
418 1.2 plunky if (sv < 0)
419 1.2 plunky err(EXIT_FAILURE, "socket()");
420 1.2 plunky
421 1.10 plunky memset(&sa, 0, sizeof(sa));
422 1.10 plunky sa.bt_len = sizeof(sa);
423 1.10 plunky sa.bt_family = AF_BLUETOOTH;
424 1.12 plunky sa.bt_psm = psm;
425 1.10 plunky sa.bt_channel = channel;
426 1.10 plunky bdaddr_copy(&sa.bt_bdaddr, laddr);
427 1.2 plunky if (bind(sv, (struct sockaddr *)&sa, sizeof(sa)) < 0)
428 1.12 plunky err(EXIT_FAILURE, "bind(%s, 0x%04x, %d)",
429 1.12 plunky bt_ntoa(laddr, NULL), psm, channel);
430 1.2 plunky
431 1.7 plunky if (setsockopt(sv, BTPROTO_RFCOMM, SO_RFCOMM_LM, &lm, sizeof(lm)) < 0)
432 1.7 plunky err(EXIT_FAILURE, "link mode");
433 1.7 plunky
434 1.2 plunky if (listen(sv, 1) < 0)
435 1.2 plunky err(EXIT_FAILURE, "listen()");
436 1.2 plunky
437 1.13 plunky len = sizeof(sa);
438 1.13 plunky if (getsockname(sv, (struct sockaddr *)&sa, &len) < 0)
439 1.13 plunky err(EXIT_FAILURE, "getsockname()");
440 1.13 plunky if (len != sizeof(sa))
441 1.13 plunky errx(EXIT_FAILURE, "getsockname()");
442 1.13 plunky
443 1.10 plunky /* Build SDP record */
444 1.10 plunky rec.next = buffer;
445 1.10 plunky rec.end = buffer + sizeof(buffer);
446 1.10 plunky
447 1.10 plunky sdp_put_uint16(&rec, SDP_ATTR_SERVICE_RECORD_HANDLE);
448 1.10 plunky sdp_put_uint32(&rec, 0x00000000);
449 1.10 plunky
450 1.10 plunky sdp_put_uint16(&rec, SDP_ATTR_SERVICE_CLASS_ID_LIST);
451 1.10 plunky sdp_put_seq(&rec, 3);
452 1.10 plunky sdp_put_uuid16(&rec, s->class);
453 1.10 plunky
454 1.12 plunky len = (psm == L2CAP_PSM_RFCOMM ? 0 : 3);
455 1.12 plunky
456 1.10 plunky sdp_put_uint16(&rec, SDP_ATTR_PROTOCOL_DESCRIPTOR_LIST);
457 1.12 plunky sdp_put_seq(&rec, 12 + len);
458 1.12 plunky sdp_put_seq(&rec, 3 + len);
459 1.10 plunky sdp_put_uuid16(&rec, SDP_UUID_PROTOCOL_L2CAP);
460 1.12 plunky if (len > 0)
461 1.12 plunky sdp_put_uint16(&rec, psm);
462 1.10 plunky sdp_put_seq(&rec, 5);
463 1.10 plunky sdp_put_uuid16(&rec, SDP_UUID_PROTOCOL_RFCOMM);
464 1.13 plunky sdp_put_uint8(&rec, sa.bt_channel);
465 1.10 plunky
466 1.10 plunky sdp_put_uint16(&rec, SDP_ATTR_BROWSE_GROUP_LIST);
467 1.10 plunky sdp_put_seq(&rec, 3);
468 1.10 plunky sdp_put_uuid16(&rec, SDP_SERVICE_CLASS_PUBLIC_BROWSE_GROUP);
469 1.10 plunky
470 1.10 plunky sdp_put_uint16(&rec, SDP_ATTR_LANGUAGE_BASE_ATTRIBUTE_ID_LIST);
471 1.10 plunky sdp_put_seq(&rec, 9);
472 1.10 plunky sdp_put_uint16(&rec, 0x656e); /* "en" */
473 1.10 plunky sdp_put_uint16(&rec, 106); /* UTF-8 */
474 1.10 plunky sdp_put_uint16(&rec, SDP_ATTR_PRIMARY_LANGUAGE_BASE_ID);
475 1.10 plunky
476 1.10 plunky if (s->class == SDP_SERVICE_CLASS_LAN_ACCESS_USING_PPP) {
477 1.10 plunky sdp_put_uint16(&rec, SDP_ATTR_SERVICE_AVAILABILITY);
478 1.10 plunky sdp_put_uint8(&rec, 0x00);
479 1.10 plunky }
480 1.10 plunky
481 1.10 plunky sdp_put_uint16(&rec, SDP_ATTR_BLUETOOTH_PROFILE_DESCRIPTOR_LIST);
482 1.10 plunky sdp_put_seq(&rec, 8);
483 1.10 plunky sdp_put_seq(&rec, 6);
484 1.10 plunky sdp_put_uuid16(&rec, s->class);
485 1.10 plunky sdp_put_uint16(&rec, 0x0100); /* v1.0 */
486 1.10 plunky
487 1.10 plunky sdp_put_uint16(&rec, SDP_ATTR_PRIMARY_LANGUAGE_BASE_ID
488 1.10 plunky + SDP_ATTR_SERVICE_NAME_OFFSET);
489 1.10 plunky sdp_put_str(&rec, s->description, -1);
490 1.10 plunky
491 1.10 plunky if (s->class == SDP_SERVICE_CLASS_DIALUP_NETWORKING) {
492 1.10 plunky sdp_put_uint16(&rec, SDP_ATTR_AUDIO_FEEDBACK_SUPPORT);
493 1.10 plunky sdp_put_bool(&rec, false);
494 1.10 plunky }
495 1.1 gdamore
496 1.10 plunky #if 0
497 1.10 plunky if (s->class == SDP_SERVICE_CLASS_LAN_ACCESS_USING_PPP) {
498 1.10 plunky sdp_put_uint16(&rec, SDP_ATTR_IP_SUBNET); /* TODO */
499 1.10 plunky sdp_put_str(&rec, "0.0.0.0/0", -1);
500 1.1 gdamore }
501 1.10 plunky #endif
502 1.1 gdamore
503 1.10 plunky rec.end = rec.next;
504 1.10 plunky rec.next = buffer;
505 1.2 plunky
506 1.10 plunky /* Register service with SDP server */
507 1.2 plunky ss = sdp_open_local(NULL);
508 1.10 plunky if (ss == NULL)
509 1.2 plunky err(EXIT_FAILURE, "sdp_open_local");
510 1.2 plunky
511 1.10 plunky if (!sdp_record_insert(ss, laddr, NULL, &rec))
512 1.10 plunky err(EXIT_FAILURE, "sdp_record_insert");
513 1.2 plunky
514 1.10 plunky /* Accept client connection */
515 1.2 plunky len = sizeof(sa);
516 1.2 plunky fd = accept(sv, (struct sockaddr *)&sa, &len);
517 1.2 plunky if (fd < 0)
518 1.2 plunky err(EXIT_FAILURE, "accept");
519 1.2 plunky
520 1.2 plunky memset(&l, 0, sizeof(l));
521 1.2 plunky l.l_onoff = 1;
522 1.2 plunky l.l_linger = 5;
523 1.2 plunky if (setsockopt(fd, SOL_SOCKET, SO_LINGER, &l, sizeof(l)) < 0)
524 1.2 plunky err(EXIT_FAILURE, "linger()");
525 1.2 plunky
526 1.2 plunky close(sv);
527 1.2 plunky return fd;
528 1.2 plunky }
529 1.1 gdamore
530 1.2 plunky void
531 1.2 plunky copy_data(int src, int dst)
532 1.1 gdamore {
533 1.2 plunky static char buf[BUFSIZ];
534 1.2 plunky ssize_t nr, nw, off;
535 1.1 gdamore
536 1.2 plunky while ((nr = read(src, buf, sizeof(buf))) == -1) {
537 1.2 plunky if (errno != EINTR) {
538 1.2 plunky syslog(LOG_ERR, "read failed: %m");
539 1.2 plunky exit(EXIT_FAILURE);
540 1.2 plunky }
541 1.2 plunky }
542 1.1 gdamore
543 1.3 plunky if (nr == 0) /* reached EOF */
544 1.3 plunky done++;
545 1.3 plunky
546 1.2 plunky for (off = 0 ; nr ; nr -= nw, off += nw) {
547 1.2 plunky if ((nw = write(dst, buf + off, (size_t)nr)) == -1) {
548 1.2 plunky syslog(LOG_ERR, "write failed: %m");
549 1.2 plunky exit(EXIT_FAILURE);
550 1.1 gdamore }
551 1.1 gdamore }
552 1.2 plunky }
553 1.1 gdamore
554 1.10 plunky int
555 1.12 plunky service_search(bdaddr_t const *laddr, bdaddr_t const *raddr,
556 1.12 plunky uint16_t class, uintmax_t *psm, uintmax_t *channel)
557 1.10 plunky {
558 1.10 plunky uint8_t buffer[6]; /* SSP (3 bytes) + AIL (3 bytes) */
559 1.10 plunky sdp_session_t ss;
560 1.10 plunky sdp_data_t ail, ssp, rsp, rec, value, pdl, seq;
561 1.10 plunky uint16_t attr;
562 1.10 plunky bool rv;
563 1.10 plunky
564 1.10 plunky seq.next = buffer;
565 1.10 plunky seq.end = buffer + sizeof(buffer);
566 1.10 plunky
567 1.10 plunky /*
568 1.10 plunky * build ServiceSearchPattern (3 bytes)
569 1.10 plunky */
570 1.10 plunky ssp.next = seq.next;
571 1.10 plunky sdp_put_uuid16(&seq, class);
572 1.10 plunky ssp.end = seq.next;
573 1.10 plunky
574 1.10 plunky /*
575 1.10 plunky * build AttributeIDList (3 bytes)
576 1.10 plunky */
577 1.10 plunky ail.next = seq.next;
578 1.10 plunky sdp_put_uint16(&seq, SDP_ATTR_PROTOCOL_DESCRIPTOR_LIST);
579 1.10 plunky ail.end = seq.next;
580 1.10 plunky
581 1.10 plunky ss = sdp_open(laddr, raddr);
582 1.10 plunky if (ss == NULL)
583 1.10 plunky return errno;
584 1.10 plunky
585 1.10 plunky rv = sdp_service_search_attribute(ss, &ssp, &ail, &rsp);
586 1.10 plunky if (!rv) {
587 1.10 plunky sdp_close(ss);
588 1.10 plunky return errno;
589 1.10 plunky }
590 1.10 plunky
591 1.10 plunky /*
592 1.10 plunky * The response will be a list of records that matched our
593 1.10 plunky * ServiceSearchPattern, where each record is a sequence
594 1.10 plunky * containing a single ProtocolDescriptorList attribute and
595 1.10 plunky * value
596 1.10 plunky *
597 1.10 plunky * seq
598 1.10 plunky * uint16 ProtocolDescriptorList
599 1.10 plunky * value
600 1.10 plunky * seq
601 1.10 plunky * uint16 ProtocolDescriptorList
602 1.10 plunky * value
603 1.10 plunky *
604 1.10 plunky * If the ProtocolDescriptorList describes a single stack,
605 1.10 plunky * the attribute value takes the form of a single Data Element
606 1.10 plunky * Sequence where each member is a protocol descriptor.
607 1.10 plunky *
608 1.10 plunky * seq
609 1.10 plunky * list
610 1.10 plunky *
611 1.10 plunky * If it is possible for more than one kind of protocol
612 1.10 plunky * stack to be used to gain access to the service, the
613 1.10 plunky * ProtocolDescriptorList takes the form of a Data Element
614 1.10 plunky * Alternative where each member is a Data Element Sequence
615 1.10 plunky * describing an alternative protocol stack.
616 1.10 plunky *
617 1.10 plunky * alt
618 1.10 plunky * seq
619 1.10 plunky * list
620 1.10 plunky * seq
621 1.10 plunky * list
622 1.10 plunky *
623 1.10 plunky * Each protocol stack description contains a sequence for each
624 1.10 plunky * protocol, where each sequence contains the protocol UUID as
625 1.10 plunky * the first element, and any ProtocolSpecificParameters. We are
626 1.12 plunky * interested in the L2CAP psm if provided, and the RFCOMM channel
627 1.12 plunky * number, stored as parameter#1 in each case.
628 1.10 plunky *
629 1.10 plunky * seq
630 1.10 plunky * uuid L2CAP
631 1.10 plunky * uint16 psm
632 1.10 plunky * seq
633 1.10 plunky * uuid RFCOMM
634 1.10 plunky * uint8 channel
635 1.10 plunky */
636 1.10 plunky
637 1.10 plunky rv = false;
638 1.10 plunky while (!rv && sdp_get_seq(&rsp, &rec)) {
639 1.10 plunky if (!sdp_get_attr(&rec, &attr, &value)
640 1.10 plunky || attr != SDP_ATTR_PROTOCOL_DESCRIPTOR_LIST)
641 1.10 plunky continue;
642 1.10 plunky
643 1.10 plunky sdp_get_alt(&value, &value); /* strip any alt container */
644 1.10 plunky while (!rv && sdp_get_seq(&value, &pdl)) {
645 1.12 plunky *psm = L2CAP_PSM_RFCOMM;
646 1.10 plunky if (sdp_get_seq(&pdl, &seq)
647 1.10 plunky && sdp_match_uuid16(&seq, SDP_UUID_PROTOCOL_L2CAP)
648 1.12 plunky && (sdp_get_uint(&seq, psm) || true)
649 1.10 plunky && sdp_get_seq(&pdl, &seq)
650 1.10 plunky && sdp_match_uuid16(&seq, SDP_UUID_PROTOCOL_RFCOMM)
651 1.10 plunky && sdp_get_uint(&seq, channel))
652 1.10 plunky rv = true;
653 1.10 plunky }
654 1.10 plunky }
655 1.10 plunky
656 1.10 plunky sdp_close(ss);
657 1.10 plunky return (rv) ? 0 : ENOATTR;
658 1.10 plunky }
659 1.10 plunky
660 1.2 plunky void
661 1.2 plunky sighandler(int s)
662 1.2 plunky {
663 1.1 gdamore
664 1.2 plunky done++;
665 1.2 plunky }
666 1.2 plunky
667 1.2 plunky void
668 1.2 plunky reset_tio(void)
669 1.1 gdamore {
670 1.1 gdamore
671 1.2 plunky tcsetattr(STDIN_FILENO, TCSAFLUSH, &tio);
672 1.2 plunky }
673 1.2 plunky
674 1.2 plunky void
675 1.1 gdamore usage(void)
676 1.1 gdamore {
677 1.7 plunky const char *cmd = getprogname();
678 1.2 plunky struct service *s;
679 1.2 plunky
680 1.12 plunky fprintf(stderr, "Usage: %s [-d device] [-m mode] [-p psm] [-s service] [-t tty]\n"
681 1.13 plunky " %*s {-a bdaddr | [-c channel]}\n"
682 1.2 plunky "\n"
683 1.2 plunky "Where:\n"
684 1.2 plunky "\t-a bdaddr remote device address\n"
685 1.3 plunky "\t-c channel local RFCOMM channel\n"
686 1.2 plunky "\t-d device local device address\n"
687 1.7 plunky "\t-m mode link mode\n"
688 1.12 plunky "\t-p psm protocol/service multiplexer\n"
689 1.3 plunky "\t-s service service class\n"
690 1.2 plunky "\t-t tty run in background using pty\n"
691 1.8 dsl "\n", cmd, (int)strlen(cmd), "");
692 1.2 plunky
693 1.3 plunky fprintf(stderr, "Known service classes:\n");
694 1.2 plunky for (s = services ; s->name != NULL ; s++)
695 1.3 plunky fprintf(stderr, "\t%-13s%s\n", s->name, s->description);
696 1.1 gdamore
697 1.1 gdamore exit(EXIT_FAILURE);
698 1.2 plunky }
699