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