Home | History | Annotate | Line # | Download | only in btpand
client.c revision 1.2
      1 /*	$NetBSD: client.c,v 1.2 2008/12/06 20:01:14 plunky Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 2008 Iain Hibbert
      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 ``AS IS'' AND ANY EXPRESS OR
     17  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     18  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     19  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     20  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     21  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     22  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     23  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     24  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     25  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     26  */
     27 
     28 #include <sys/cdefs.h>
     29 __RCSID("$NetBSD: client.c,v 1.2 2008/12/06 20:01:14 plunky Exp $");
     30 
     31 #include <bluetooth.h>
     32 #include <errno.h>
     33 #include <sdp.h>
     34 #include <unistd.h>
     35 
     36 #include "btpand.h"
     37 #include "bnep.h"
     38 #include "sdp.h"
     39 
     40 static void client_query(void);
     41 
     42 void
     43 client_init(void)
     44 {
     45 	struct sockaddr_bt sa;
     46 	channel_t *chan;
     47 	socklen_t len;
     48 	int fd;
     49 	uint16_t mru, mtu;
     50 
     51 	if (bdaddr_any(&remote_bdaddr))
     52 		return;
     53 
     54 	if (service_name)
     55 		client_query();
     56 
     57 	fd = socket(PF_BLUETOOTH, SOCK_SEQPACKET, BTPROTO_L2CAP);
     58 	if (fd == -1) {
     59 		log_err("Could not open L2CAP socket: %m");
     60 		exit(EXIT_FAILURE);
     61 	}
     62 
     63 	memset(&sa, 0, sizeof(sa));
     64 	sa.bt_family = AF_BLUETOOTH;
     65 	sa.bt_len = sizeof(sa);
     66 	bdaddr_copy(&sa.bt_bdaddr, &local_bdaddr);
     67 	if (bind(fd, (struct sockaddr *)&sa, sizeof(sa)) == -1) {
     68 		log_err("Could not bind client socket: %m");
     69 		exit(EXIT_FAILURE);
     70 	}
     71 
     72 	if (setsockopt(fd, BTPROTO_L2CAP, SO_L2CAP_LM,
     73 	    &l2cap_mode, sizeof(l2cap_mode)) == -1) {
     74 		log_err("Could not set link mode (0x%4.4x): %m", l2cap_mode);
     75 		exit(EXIT_FAILURE);
     76 	}
     77 
     78 	mru = BNEP_MTU_MIN;
     79 	if (setsockopt(fd, BTPROTO_L2CAP, SO_L2CAP_IMTU,
     80 	    &mru, sizeof(mru)) == -1) {
     81 		log_err("Could not set L2CAP IMTU (%d): %m", mru);
     82 		exit(EXIT_FAILURE);
     83 	}
     84 
     85 	log_info("Opening connection to service 0x%4.4x at %s",
     86 	    service_class, bt_ntoa(&remote_bdaddr, NULL));
     87 
     88 	sa.bt_psm = l2cap_psm;
     89 	bdaddr_copy(&sa.bt_bdaddr, &remote_bdaddr);
     90 	if (connect(fd, (struct sockaddr *)&sa, sizeof(sa)) == -1) {
     91 		log_err("Could not connect: %m");
     92 		exit(EXIT_FAILURE);
     93 	}
     94 
     95 	len = sizeof(mru);
     96 	if (getsockopt(fd, BTPROTO_L2CAP, SO_L2CAP_IMTU, &mru, &len) == -1) {
     97 		log_err("Could not get IMTU: %m");
     98 		exit(EXIT_FAILURE);
     99 	}
    100 	if (mru < BNEP_MTU_MIN) {
    101 		log_err("L2CAP IMTU too small (%d)", mru);
    102 		exit(EXIT_FAILURE);
    103 	}
    104 
    105 	len = sizeof(mtu);
    106 	if (getsockopt(fd, BTPROTO_L2CAP, SO_L2CAP_OMTU, &mtu, &len) == -1) {
    107 		log_err("Could not get L2CAP OMTU: %m");
    108 		exit(EXIT_FAILURE);
    109 	}
    110 	if (mtu < BNEP_MTU_MIN) {
    111 		log_err("L2CAP OMTU too small (%d)", mtu);
    112 		exit(EXIT_FAILURE);
    113 	}
    114 
    115 	chan = channel_alloc();
    116 	if (chan == NULL)
    117 		exit(EXIT_FAILURE);
    118 
    119 	chan->send = bnep_send;
    120 	chan->recv = bnep_recv;
    121 	chan->mru = mru;
    122 	chan->mtu = mtu;
    123 	b2eaddr(chan->raddr, &remote_bdaddr);
    124 	b2eaddr(chan->laddr, &local_bdaddr);
    125 	chan->state = CHANNEL_WAIT_CONNECT_RSP;
    126 	channel_timeout(chan, 10);
    127 	if (!channel_open(chan, fd))
    128 		exit(EXIT_FAILURE);
    129 
    130 	bnep_send_control(chan, BNEP_SETUP_CONNECTION_REQUEST,
    131 	    2, service_class, SDP_SERVICE_CLASS_PANU);
    132 }
    133 
    134 static void
    135 client_query(void)
    136 {
    137 	uint8_t buffer[512];
    138 	sdp_attr_t attr;
    139 	uint32_t range;
    140 	void *ss;
    141 	int rv;
    142 	uint8_t *seq0, *seq1;
    143 
    144 	attr.flags = SDP_ATTR_INVALID;
    145 	attr.attr = 0;
    146 	attr.vlen = sizeof(buffer);
    147 	attr.value = buffer;
    148 
    149 	range = SDP_ATTR_RANGE(SDP_ATTR_PROTOCOL_DESCRIPTOR_LIST,
    150 			       SDP_ATTR_PROTOCOL_DESCRIPTOR_LIST);
    151 
    152 	ss = sdp_open(&local_bdaddr, &remote_bdaddr);
    153 	if (ss == NULL || (errno = sdp_error(ss)) != 0) {
    154 		log_err("%s: %m", service_name);
    155 		exit(EXIT_FAILURE);
    156 	}
    157 
    158 	log_info("Searching for %s service at %s",
    159 	    service_name, bt_ntoa(&remote_bdaddr, NULL));
    160 
    161 	rv = sdp_search(ss, 1, &service_class, 1, &range, 1, &attr);
    162 	if (rv != 0) {
    163 		log_err("%s: %s", service_name, strerror(sdp_error(ss)));
    164 		exit(EXIT_FAILURE);
    165 	}
    166 
    167 	sdp_close(ss);
    168 
    169 	if (attr.flags != SDP_ATTR_OK
    170 	    || attr.attr != SDP_ATTR_PROTOCOL_DESCRIPTOR_LIST) {
    171 		log_err("%s service not found", service_name);
    172 		exit(EXIT_FAILURE);
    173 	}
    174 
    175 	/*
    176 	 * we expect the following protocol descriptor list
    177 	 *
    178 	 *	seq len
    179 	 *	  seq len
    180 	 *	    uuid value == L2CAP
    181 	 *	    uint16 value16 => PSM
    182 	 *	  seq len
    183 	 *	    uuid value == BNEP
    184 	 */
    185 	if (_sdp_get_seq(&attr.value, attr.value + attr.vlen, &seq0)
    186 	    && _sdp_get_seq(&seq0, attr.value, &seq1)
    187 	    && _sdp_match_uuid16(&seq1, seq0, SDP_UUID_PROTOCOL_L2CAP)
    188 	    && _sdp_get_uint16(&seq1, seq0, &l2cap_psm)
    189 	    && _sdp_get_seq(&seq0, attr.value, &seq1)
    190 	    && _sdp_match_uuid16(&seq1, seq0, SDP_UUID_PROTOCOL_BNEP)) {
    191 		log_info("Found PSM %d for service %s", l2cap_psm, service_name);
    192 		return;
    193 	}
    194 
    195 	log_err("%s query failed", service_name);
    196 	exit(EXIT_FAILURE);
    197 }
    198