usr.sbin/bluetooth/sdpd/profile.c

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