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       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