1 /*
2 * profile.c
3 */
4
5 /*-
6 * Copyright (c) 2004 Maksim Yevmenkin <m_evmenkin@yahoo.com>
7 * All rights reserved.
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 *
18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
19 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
24 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
25 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
26 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
27 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
28 * SUCH DAMAGE.
29 *
30 * $Id: profile.c,v 1.6 2004/01/13 19:31:54 max Exp $
31 * $FreeBSD$
32 */
33
34 #include <sys/queue.h>
35 #define L2CAP_SOCKET_CHECKED
36 #include <bluetooth.h>
37 #include <sdp.h>
38 #include <string.h>
39 #include "profile.h"
40 #include "provider.h"
41
42 /*
43 * Lookup profile descriptor
44 */
45
46 profile_p
profile_get_descriptor(uint16_t uuid)47 profile_get_descriptor(uint16_t uuid)
48 {
49 extern profile_t dun_profile_descriptor;
50 extern profile_t ftrn_profile_descriptor;
51 extern profile_t irmc_profile_descriptor;
52 extern profile_t irmc_command_profile_descriptor;
53 extern profile_t lan_profile_descriptor;
54 extern profile_t opush_profile_descriptor;
55 extern profile_t sp_profile_descriptor;
56 extern profile_t nap_profile_descriptor;
57 extern profile_t gn_profile_descriptor;
58 extern profile_t panu_profile_descriptor;
59
60 static const profile_p profiles[] = {
61 &dun_profile_descriptor,
62 &ftrn_profile_descriptor,
63 &irmc_profile_descriptor,
64 &irmc_command_profile_descriptor,
65 &lan_profile_descriptor,
66 &opush_profile_descriptor,
67 &sp_profile_descriptor,
68 &nap_profile_descriptor,
69 &gn_profile_descriptor,
70 &panu_profile_descriptor
71 };
72
73 int32_t i;
74
75 for (i = 0; i < sizeof(profiles)/sizeof(profiles[0]); i++)
76 if (profiles[i]->uuid == uuid)
77 return (profiles[i]);
78
79 return (NULL);
80 }
81
82 /*
83 * Look attribute in the profile descripror
84 */
85
86 profile_attr_create_p
profile_get_attr(const profile_p profile,uint16_t attr)87 profile_get_attr(const profile_p profile, uint16_t attr)
88 {
89 attr_p ad = (attr_p) profile->attrs;
90
91 for (; ad->create != NULL; ad ++)
92 if (ad->attr == attr)
93 return (ad->create);
94
95 return (NULL);
96 }
97
98 /*
99 * uint32 value32 - 5 bytes
100 */
101
102 int32_t
common_profile_create_service_record_handle(uint8_t * buf,uint8_t const * const eob,uint8_t const * data,uint32_t datalen)103 common_profile_create_service_record_handle(
104 uint8_t *buf, uint8_t const * const eob,
105 uint8_t const *data, uint32_t datalen)
106 {
107 if (buf + 5 > eob)
108 return (-1);
109
110 SDP_PUT8(SDP_DATA_UINT32, buf);
111 SDP_PUT32(((provider_p) data)->handle, buf);
112
113 return (5);
114 }
115
116 /*
117 * seq8 len8 - 2 bytes
118 * uuid16 value16 - 3 bytes
119 * [ uuid16 value ]
120 */
121
122 int32_t
common_profile_create_service_class_id_list(uint8_t * buf,uint8_t const * const eob,uint8_t const * data,uint32_t datalen)123 common_profile_create_service_class_id_list(
124 uint8_t *buf, uint8_t const * const eob,
125 uint8_t const *data, uint32_t datalen)
126 {
127 int32_t len = 3 * (datalen >>= 1);
128
129 if (len <= 0 || len > 0xff || buf + 2 + len > eob)
130 return (-1);
131
132 SDP_PUT8(SDP_DATA_SEQ8, buf);
133 SDP_PUT8(len, buf);
134
135 for (; datalen > 0; datalen --) {
136 SDP_PUT8(SDP_DATA_UUID16, buf);
137 SDP_PUT16(*((uint16_t const *)data), buf);
138 data += sizeof(uint16_t);
139 }
140
141 return (2 + len);
142 }
143
144 /*
145 * seq8 len8 - 2 bytes
146 * seq 8 len8 - 2 bytes
147 * uuid16 value16 - 3 bytes
148 * uint16 value16 - 3 bytes
149 * [ seq 8 len8
150 * uuid16 value16
151 * uint16 value16 ]
152 */
153
154 int32_t
common_profile_create_bluetooth_profile_descriptor_list(uint8_t * buf,uint8_t const * const eob,uint8_t const * data,uint32_t datalen)155 common_profile_create_bluetooth_profile_descriptor_list(
156 uint8_t *buf, uint8_t const * const eob,
157 uint8_t const *data, uint32_t datalen)
158 {
159 int32_t len = 8 * (datalen >>= 2);
160
161 if (len <= 0 || len > 0xff || buf + 2 + len > eob)
162 return (-1);
163
164 SDP_PUT8(SDP_DATA_SEQ8, buf);
165 SDP_PUT8(len, buf);
166
167 for (; datalen > 0; datalen --) {
168 SDP_PUT8(SDP_DATA_SEQ8, buf);
169 SDP_PUT8(6, buf);
170 SDP_PUT8(SDP_DATA_UUID16, buf);
171 SDP_PUT16(*((uint16_t const *)data), buf);
172 data += sizeof(uint16_t);
173 SDP_PUT8(SDP_DATA_UINT16, buf);
174 SDP_PUT16(*((uint16_t const *)data), buf);
175 data += sizeof(uint16_t);
176 }
177
178 return (2 + len);
179 }
180
181 /*
182 * seq8 len8 - 2 bytes
183 * uint16 value16 - 3 bytes
184 * uint16 value16 - 3 bytes
185 * uint16 value16 - 3 bytes
186 */
187
188 int32_t
common_profile_create_language_base_attribute_id_list(uint8_t * buf,uint8_t const * const eob,uint8_t const * data,uint32_t datalen)189 common_profile_create_language_base_attribute_id_list(
190 uint8_t *buf, uint8_t const * const eob,
191 uint8_t const *data, uint32_t datalen)
192 {
193 if (buf + 11 > eob)
194 return (-1);
195
196 SDP_PUT8(SDP_DATA_SEQ8, buf);
197 SDP_PUT8(9, buf);
198
199 /*
200 * Language code per ISO 639:1988. Use "en".
201 */
202
203 SDP_PUT8(SDP_DATA_UINT16, buf);
204 SDP_PUT16(((0x65 << 8) | 0x6e), buf);
205
206 /*
207 * Encoding. Recommended is UTF-8. ISO639 UTF-8 MIBenum is 106
208 * (http://www.iana.org/assignments/character-sets)
209 */
210
211 SDP_PUT8(SDP_DATA_UINT16, buf);
212 SDP_PUT16(106, buf);
213
214 /*
215 * Offset (Primary Language Base is 0x100)
216 */
217
218 SDP_PUT8(SDP_DATA_UINT16, buf);
219 SDP_PUT16(SDP_ATTR_PRIMARY_LANGUAGE_BASE_ID, buf);
220
221 return (11);
222 }
223
224 /*
225 * Common provider name is "FreeBSD"
226 */
227
228 int32_t
common_profile_create_service_provider_name(uint8_t * buf,uint8_t const * const eob,uint8_t const * data,uint32_t datalen)229 common_profile_create_service_provider_name(
230 uint8_t *buf, uint8_t const * const eob,
231 uint8_t const *data, uint32_t datalen)
232 {
233 char provider_name[] = "FreeBSD";
234
235 return (common_profile_create_string8(buf, eob,
236 (uint8_t const *) provider_name,
237 strlen(provider_name)));
238 }
239
240 /*
241 * str8 len8 string
242 */
243
244 int32_t
common_profile_create_string8(uint8_t * buf,uint8_t const * const eob,uint8_t const * data,uint32_t datalen)245 common_profile_create_string8(
246 uint8_t *buf, uint8_t const * const eob,
247 uint8_t const *data, uint32_t datalen)
248 {
249 if (datalen == 0 || datalen > 0xff || buf + 2 + datalen > eob)
250 return (-1);
251
252 SDP_PUT8(SDP_DATA_STR8, buf);
253 SDP_PUT8(datalen, buf);
254 memcpy(buf, data, datalen);
255
256 return (2 + datalen);
257 }
258
259 /*
260 * Service Availability
261 */
262
263 int32_t
common_profile_create_service_availability(uint8_t * buf,uint8_t const * const eob,uint8_t const * data,uint32_t datalen)264 common_profile_create_service_availability(
265 uint8_t *buf, uint8_t const * const eob,
266 uint8_t const *data, uint32_t datalen)
267 {
268 if (datalen != 1 || buf + 2 > eob)
269 return (-1);
270
271 SDP_PUT8(SDP_DATA_UINT8, buf);
272 SDP_PUT8(data[0], buf);
273
274 return (2);
275 }
276
277 /*
278 * seq8 len8 - 2 bytes
279 * seq8 len8 - 2 bytes
280 * uuid16 value16 - 3 bytes
281 * seq8 len8 - 2 bytes
282 * uuid16 value16 - 3 bytes
283 * uint8 value8 - 2 bytes
284 */
285
286 int32_t
rfcomm_profile_create_protocol_descriptor_list(uint8_t * buf,uint8_t const * const eob,uint8_t const * data,uint32_t datalen)287 rfcomm_profile_create_protocol_descriptor_list(
288 uint8_t *buf, uint8_t const * const eob,
289 uint8_t const *data, uint32_t datalen)
290 {
291 if (datalen != 1 || buf + 14 > eob)
292 return (-1);
293
294 SDP_PUT8(SDP_DATA_SEQ8, buf);
295 SDP_PUT8(12, buf);
296
297 SDP_PUT8(SDP_DATA_SEQ8, buf);
298 SDP_PUT8(3, buf);
299 SDP_PUT8(SDP_DATA_UUID16, buf);
300 SDP_PUT16(SDP_UUID_PROTOCOL_L2CAP, buf);
301
302 SDP_PUT8(SDP_DATA_SEQ8, buf);
303 SDP_PUT8(5, buf);
304 SDP_PUT8(SDP_DATA_UUID16, buf);
305 SDP_PUT16(SDP_UUID_PROTOCOL_RFCOMM, buf);
306 SDP_PUT8(SDP_DATA_UINT8, buf);
307 SDP_PUT8(*data, buf);
308
309 return (14);
310 }
311
312 /*
313 * seq8 len8 - 2 bytes
314 * seq8 len8 - 2 bytes
315 * uuid16 value16 - 3 bytes
316 * seq8 len8 - 2 bytes
317 * uuid16 value16 - 3 bytes
318 * uint8 value8 - 2 bytes
319 * seq8 len8 - 2 bytes
320 * uuid16 value16 - 3 bytes
321 */
322
323 int32_t
obex_profile_create_protocol_descriptor_list(uint8_t * buf,uint8_t const * const eob,uint8_t const * data,uint32_t datalen)324 obex_profile_create_protocol_descriptor_list(
325 uint8_t *buf, uint8_t const * const eob,
326 uint8_t const *data, uint32_t datalen)
327 {
328 if (datalen != 1 || buf + 19 > eob)
329 return (-1);
330
331 SDP_PUT8(SDP_DATA_SEQ8, buf);
332 SDP_PUT8(17, buf);
333
334 SDP_PUT8(SDP_DATA_SEQ8, buf);
335 SDP_PUT8(3, buf);
336 SDP_PUT8(SDP_DATA_UUID16, buf);
337 SDP_PUT16(SDP_UUID_PROTOCOL_L2CAP, buf);
338
339 SDP_PUT8(SDP_DATA_SEQ8, buf);
340 SDP_PUT8(5, buf);
341 SDP_PUT8(SDP_DATA_UUID16, buf);
342 SDP_PUT16(SDP_UUID_PROTOCOL_RFCOMM, buf);
343 SDP_PUT8(SDP_DATA_UINT8, buf);
344 SDP_PUT8(*data, buf);
345
346 SDP_PUT8(SDP_DATA_SEQ8, buf);
347 SDP_PUT8(3, buf);
348 SDP_PUT8(SDP_DATA_UUID16, buf);
349 SDP_PUT16(SDP_UUID_PROTOCOL_OBEX, buf);
350
351 return (19);
352 }
353
354 /*
355 * seq8 len8
356 * uint8 value8 - bytes
357 * [ uint8 value 8 ]
358 */
359
360 int32_t
obex_profile_create_supported_formats_list(uint8_t * buf,uint8_t const * const eob,uint8_t const * data,uint32_t datalen)361 obex_profile_create_supported_formats_list(
362 uint8_t *buf, uint8_t const * const eob,
363 uint8_t const *data, uint32_t datalen)
364 {
365 int32_t len = 2 * datalen;
366
367 if (len <= 0 || len > 0xff || buf + 2 + len > eob)
368 return (-1);
369
370 SDP_PUT8(SDP_DATA_SEQ8, buf);
371 SDP_PUT8(len, buf);
372
373 for (; datalen > 0; datalen --) {
374 SDP_PUT8(SDP_DATA_UINT8, buf);
375 SDP_PUT8(*data++, buf);
376 }
377
378 return (2 + len);
379 }
380
381 /*
382 * do not check anything
383 */
384
385 int32_t
common_profile_always_valid(uint8_t const * data,uint32_t datalen)386 common_profile_always_valid(uint8_t const *data, uint32_t datalen)
387 {
388 return (1);
389 }
390
391 /*
392 * verify server channel number (the first byte in the data)
393 */
394
395 int32_t
common_profile_server_channel_valid(uint8_t const * data,uint32_t datalen)396 common_profile_server_channel_valid(uint8_t const *data, uint32_t datalen)
397 {
398 if (data[0] < 1 || data[0] > 30)
399 return (0);
400
401 return (1);
402 }
403
404 /*
405 * verify server channel number and supported_formats_size
406 * sdp_opush_profile and sdp_irmc_profile
407 */
408
409 int32_t
obex_profile_data_valid(uint8_t const * data,uint32_t datalen)410 obex_profile_data_valid(uint8_t const *data, uint32_t datalen)
411 {
412 sdp_opush_profile_p opush = (sdp_opush_profile_p) data;
413
414 if (opush->server_channel < 1 ||
415 opush->server_channel > 30 ||
416 opush->supported_formats_size == 0 ||
417 opush->supported_formats_size > sizeof(opush->supported_formats))
418 return (0);
419
420 return (1);
421 }
422
423 /*
424 * BNEP protocol descriptor
425 */
426
427 int32_t
bnep_profile_create_protocol_descriptor_list(uint8_t * buf,uint8_t const * const eob,uint8_t const * data,uint32_t datalen)428 bnep_profile_create_protocol_descriptor_list(
429 uint8_t *buf, uint8_t const * const eob,
430 uint8_t const *data, uint32_t datalen)
431 {
432 /* supported protocol types */
433 uint16_t ptype[] = {
434 0x0800, /* IPv4 */
435 0x0806, /* ARP */
436 #ifdef INET6
437 0x86dd, /* IPv6 */
438 #endif
439 };
440
441 uint16_t i, psm, version = 0x0100,
442 nptypes = sizeof(ptype)/sizeof(ptype[0]),
443 nptypes_size = nptypes * 3;
444
445 if (datalen != 2 || 18 + nptypes_size > 255 ||
446 buf + 20 + nptypes_size > eob)
447 return (-1);
448
449 memcpy(&psm, data, sizeof(psm));
450
451 SDP_PUT8(SDP_DATA_SEQ8, buf);
452 SDP_PUT8(18 + nptypes_size, buf);
453
454 SDP_PUT8(SDP_DATA_SEQ8, buf);
455 SDP_PUT8(6, buf);
456 SDP_PUT8(SDP_DATA_UUID16, buf);
457 SDP_PUT16(SDP_UUID_PROTOCOL_L2CAP, buf);
458 SDP_PUT8(SDP_DATA_UINT16, buf);
459 SDP_PUT16(psm, buf);
460
461 SDP_PUT8(SDP_DATA_SEQ8, buf);
462 SDP_PUT8(8 + nptypes_size, buf);
463 SDP_PUT8(SDP_DATA_UUID16, buf);
464 SDP_PUT16(SDP_UUID_PROTOCOL_BNEP, buf);
465 SDP_PUT8(SDP_DATA_UINT16, buf);
466 SDP_PUT16(version, buf);
467 SDP_PUT8(SDP_DATA_SEQ8, buf);
468 SDP_PUT8(nptypes_size, buf);
469 for (i = 0; i < nptypes; i ++) {
470 SDP_PUT8(SDP_DATA_UINT16, buf);
471 SDP_PUT16(ptype[i], buf);
472 }
473
474 return (20 + nptypes_size);
475 }
476
477 /*
478 * BNEP security description
479 */
480
481 int32_t
bnep_profile_create_security_description(uint8_t * buf,uint8_t const * const eob,uint8_t const * data,uint32_t datalen)482 bnep_profile_create_security_description(
483 uint8_t *buf, uint8_t const * const eob,
484 uint8_t const *data, uint32_t datalen)
485 {
486 uint16_t security_descr;
487
488 if (datalen != 2 || buf + 3 > eob)
489 return (-1);
490
491 memcpy(&security_descr, data, sizeof(security_descr));
492
493 SDP_PUT8(SDP_DATA_UINT16, buf);
494 SDP_PUT16(security_descr, buf);
495
496 return (3);
497 }
498
499