1/*
2 * srr.c
3 *
4 * Copyright (c) 2004 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: srr.c,v 1.1 2004/01/13 01:54:39 max Exp $
29 * $FreeBSD$
30 */
31
32#include <sys/queue.h>
33#include <sys/uio.h>
34#include <netinet/in.h>
35#include <arpa/inet.h>
36#include <assert.h>
37#include <bluetooth.h>
38#include <errno.h>
39#include <sdp.h>
40#include <string.h>
41#include "profile.h"
42#include "provider.h"
43#include "server.h"
44
45/*
46 * Prepare Service Register response
47 */
48
49int32_t
50server_prepare_service_register_response(server_p srv, int32_t fd)
51{
52	uint8_t const	*req = srv->req + sizeof(sdp_pdu_t);
53	uint8_t const	*req_end = req + ((sdp_pdu_p)(srv->req))->len;
54	uint8_t		*rsp = srv->fdidx[fd].rsp;
55
56	profile_t	*profile = NULL;
57	provider_t	*provider = NULL;
58	bdaddr_t	*bdaddr = NULL;
59	int32_t		 uuid;
60
61	/*
62	 * Minimal Service Register Request
63	 *
64	 * value16	- uuid 2 bytes
65	 * bdaddr	- BD_ADDR 6 bytes
66	 */
67
68	if (!srv->fdidx[fd].control ||
69	    !srv->fdidx[fd].priv || req_end - req < 8)
70		return (SDP_ERROR_CODE_INVALID_REQUEST_SYNTAX);
71
72	/* Get ServiceClass UUID */
73	SDP_GET16(uuid, req);
74
75	/* Get BD_ADDR */
76	bdaddr = (bdaddr_p) req;
77	req += sizeof(*bdaddr);
78
79	/* Lookup profile descriptror */
80	profile = profile_get_descriptor(uuid);
81	if (profile == NULL)
82		return (SDP_ERROR_CODE_INVALID_REQUEST_SYNTAX);
83
84	/* Validate user data */
85	if (req_end - req < profile->dsize ||
86	    profile->valid == NULL ||
87	    (profile->valid)(req, req_end - req) == 0)
88		return (SDP_ERROR_CODE_INVALID_REQUEST_SYNTAX);
89
90	/* Register provider */
91	provider = provider_register(profile, bdaddr, fd, req, req_end - req);
92	if (provider == NULL)
93		return (SDP_ERROR_CODE_INSUFFICIENT_RESOURCES);
94
95	SDP_PUT16(0, rsp);
96	SDP_PUT32(provider->handle, rsp);
97
98	/* Set reply size */
99	srv->fdidx[fd].rsp_limit = srv->fdidx[fd].omtu - sizeof(sdp_pdu_t);
100	srv->fdidx[fd].rsp_size = rsp - srv->fdidx[fd].rsp;
101	srv->fdidx[fd].rsp_cs = 0;
102
103	return (0);
104}
105
106/*
107 * Send Service Register Response
108 */
109
110int32_t
111server_send_service_register_response(server_p srv, int32_t fd)
112{
113	struct iovec	iov[2];
114	sdp_pdu_t	pdu;
115	int32_t		size;
116
117	assert(srv->fdidx[fd].rsp_size < srv->fdidx[fd].rsp_limit);
118
119	pdu.pid = SDP_PDU_ERROR_RESPONSE;
120	pdu.tid = ((sdp_pdu_p)(srv->req))->tid;
121	pdu.len = htons(srv->fdidx[fd].rsp_size);
122
123	iov[0].iov_base = &pdu;
124	iov[0].iov_len = sizeof(pdu);
125
126	iov[1].iov_base = srv->fdidx[fd].rsp;
127	iov[1].iov_len = srv->fdidx[fd].rsp_size;
128
129	do {
130		size = writev(fd, (struct iovec const *) &iov, sizeof(iov)/sizeof(iov[0]));
131	} while (size < 0 && errno == EINTR);
132
133	srv->fdidx[fd].rsp_cs = 0;
134	srv->fdidx[fd].rsp_size = 0;
135	srv->fdidx[fd].rsp_limit = 0;
136
137	return ((size < 0)? errno : 0);
138}
139
140