monitor/intel.c

   1 // SPDX-License-Identifier: LGPL-2.1-or-later
   2 /*
   3  *
   4  *  BlueZ - Bluetooth protocol stack for Linux
   5  *
   6  *  Copyright (C) 2011-2014  Intel Corporation
   7  *  Copyright (C) 2002-2010  Marcel Holtmann <marcel@holtmann.org>
   8  *
   9  *
  10  */
  11
  12 #ifdef HAVE_CONFIG_H
  13 #include <config.h>
  14 #endif
  15
  16 #include <stdio.h>
  17 #include <inttypes.h>
  18
  19 #include "lib/bluetooth.h"
  20 #include "lib/hci.h"
  21
  22 #include "src/shared/util.h"
  23 #include "display.h"
  24 #include "packet.h"
  25 #include "lmp.h"
  26 #include "ll.h"
  27 #include "vendor.h"
  28 #include "intel.h"
  29
  30 #define COLOR_UNKNOWN_EVENT_MASK        COLOR_WHITE_BG
  31 #define COLOR_UNKNOWN_SCAN_STATUS       COLOR_WHITE_BG
  32 #define COLOR_UNKNOWN_EXT_EVENT         COLOR_WHITE_BG
  33
  34 static void print_status(uint8_t status)
  35 {
  36         packet_print_error("Status", status);
  37 }
  38
  39 static void print_module(uint8_t module)
  40 {
  41         const char *str;
  42
  43         switch (module) {
  44         case 0x01:
  45                 str = "BC";
  46                 break;
  47         case 0x02:
  48                 str = "HCI";
  49                 break;
  50         case 0x03:
  51                 str = "LLC";
  52                 break;
  53         case 0x04:
  54                 str = "OS";
  55                 break;
  56         case 0x05:
  57                 str = "LM";
  58                 break;
  59         case 0x06:
  60                 str = "SC";
  61                 break;
  62         case 0x07:
  63                 str = "SP";
  64                 break;
  65         case 0x08:
  66                 str = "OSAL";
  67                 break;
  68         case 0x09:
  69                 str = "LC";
  70                 break;
  71         case 0x0a:
  72                 str = "APP";
  73                 break;
  74         case 0x0b:
  75                 str = "TLD";
  76                 break;
  77         case 0xf0:
  78                 str = "Debug";
  79                 break;
  80         default:
  81                 str = "Reserved";
  82                 break;
  83         }
  84
  85         print_field("Module: %s (0x%2.2x)", str, module);
  86 }
  87
  88 static void null_cmd(uint16_t index, const void *data, uint8_t size)
  89 {
  90 }
  91
  92 static void status_rsp(uint16_t index, const void *data, uint8_t size)
  93 {
  94         uint8_t status = get_u8(data);
  95
  96         print_status(status);
  97 }
  98
  99 static void reset_cmd(uint16_t index, const void *data, uint8_t size)
 100 {
 101         uint8_t reset_type = get_u8(data);
 102         uint8_t patch_enable = get_u8(data + 1);
 103         uint8_t ddc_reload = get_u8(data + 2);
 104         uint8_t boot_option = get_u8(data + 3);
 105         uint32_t boot_addr = get_le32(data + 4);
 106         const char *str;
 107
 108         switch (reset_type) {
 109         case 0x00:
 110                 str = "Soft software reset";
 111                 break;
 112         case 0x01:
 113                 str = "Hard software reset";
 114                 break;
 115         default:
 116                 str = "Reserved";
 117                 break;
 118         }
 119
 120         print_field("Reset type: %s (0x%2.2x)", str, reset_type);
 121
 122         switch (patch_enable) {
 123         case 0x00:
 124                 str = "Do not enable";
 125                 break;
 126         case 0x01:
 127                 str = "Enable";
 128                 break;
 129         default:
 130                 str = "Reserved";
 131                 break;
 132         }
 133
 134         print_field("Patch vectors: %s (0x%2.2x)", str, patch_enable);
 135
 136         switch (ddc_reload) {
 137         case 0x00:
 138                 str = "Do not reload";
 139                 break;
 140         case 0x01:
 141                 str = "Reload from OTP";
 142                 break;
 143         default:
 144                 str = "Reserved";
 145                 break;
 146         }
 147
 148         print_field("DDC parameters: %s (0x%2.2x)", str, ddc_reload);
 149
 150         switch (boot_option) {
 151         case 0x00:
 152                 str = "Current image";
 153                 break;
 154         case 0x01:
 155                 str = "Specified address";
 156                 break;
 157         default:
 158                 str = "Reserved";
 159                 break;
 160         }
 161
 162         print_field("Boot option: %s (0x%2.2x)", str, boot_option);
 163         print_field("Boot address: 0x%8.8x", boot_addr);
 164 }
 165
 166 struct intel_version_tlv {
 167         uint8_t type;
 168         uint8_t len;
 169         uint8_t val[];
 170 };
 171
 172 static void print_version_tlv_u32(const struct intel_version_tlv *tlv,
 173                                   char *type_str)
 174 {
 175         print_field("%s(%u): 0x%8.8x", type_str, tlv->type, get_le32(tlv->val));
 176 }
 177
 178 static void print_version_tlv_u16(const struct intel_version_tlv *tlv,
 179                                   char *type_str)
 180 {
 181         print_field("%s(%u): 0x%4.4x", type_str, tlv->type, get_le16(tlv->val));
 182 }
 183
 184 static void print_version_tlv_u8(const struct intel_version_tlv *tlv,
 185                                  char *type_str)
 186 {
 187         print_field("%s(%u): 0x%2.2x", type_str, tlv->type, get_u8(tlv->val));
 188 }
 189
 190 static void print_version_tlv_enabled(const struct intel_version_tlv *tlv,
 191                                       char *type_str)
 192 {
 193         print_field("%s(%u): %s(%u)", type_str, tlv->type,
 194                                         tlv->val[0] ? "Enabled" : "Disabled",
 195                                         tlv->val[0]);
 196 }
 197
 198 static void print_version_tlv_img_type(const struct intel_version_tlv *tlv,
 199                                        char *type_str)
 200 {
 201         const char *str;
 202
 203         switch (get_u8(tlv->val)) {
 204         case 0x01:
 205                 str = "Bootloader";
 206                 break;
 207         case 0x03:
 208                 str = "Firmware";
 209                 break;
 210         default:
 211                 str = "Unknown";
 212                 break;
 213         }
 214         print_field("%s(%u): %s(0x%2.2x)", type_str, tlv->type, str,
 215                                                         get_u8(tlv->val));
 216 }
 217
 218 static void print_version_tlv_timestamp(const struct intel_version_tlv *tlv,
 219                                         char *type_str)
 220 {
 221         print_field("%s(%u): %u-%u", type_str, tlv->type,
 222                                 tlv->val[1], tlv->val[0]);
 223 }
 224
 225 static void print_version_tlv_min_fw(const struct intel_version_tlv *tlv,
 226                                      char *type_str)
 227 {
 228         print_field("%s(%u): %u-%u.%u", type_str, tlv->type,
 229                                 tlv->val[0], tlv->val[1], 2000 + tlv->val[2]);
 230 }
 231
 232 static void print_version_tlv_otp_bdaddr(const struct intel_version_tlv *tlv,
 233                                          char *type_str)
 234 {
 235         packet_print_addr(type_str, tlv->val, 0x00);
 236 }
 237
 238 static void print_version_tlv_unknown(const struct intel_version_tlv *tlv,
 239                                       char *type_str)
 240 {
 241         print_field("%s(%u): ", type_str, tlv->type);
 242         packet_hexdump(tlv->val, tlv->len);
 243 }
 244
 245 static void print_version_tlv_mfg(const struct intel_version_tlv *tlv,
 246                                          char *type_str)
 247 {
 248         uint16_t mfg_id = get_le16(tlv->val);
 249
 250         print_field("%s(%u): %s (%u)", type_str, tlv->type,
 251                                                 bt_compidtostr(mfg_id), mfg_id);
 252 }
 253
 254 static const struct intel_version_tlv_desc {
 255         uint8_t type;
 256         char *type_str;
 257         void (*func)(const struct intel_version_tlv *tlv, char *type_str);
 258 } intel_version_tlv_table[] = {
 259         { 16, "CNVi TOP", print_version_tlv_u32 },
 260         { 17, "CNVr TOP", print_version_tlv_u32 },
 261         { 18, "CNVi BT", print_version_tlv_u32 },
 262         { 19, "CNVr BT", print_version_tlv_u32 },
 263         { 20, "CNVi OTP", print_version_tlv_u16 },
 264         { 21, "CNVr OTP", print_version_tlv_u16 },
 265         { 22, "Device Rev ID", print_version_tlv_u16 },
 266         { 23, "USB VID", print_version_tlv_u16 },
 267         { 24, "USB PID", print_version_tlv_u16 },
 268         { 25, "PCIE VID", print_version_tlv_u16 },
 269         { 26, "PCIe DID", print_version_tlv_u16 },
 270         { 27, "PCIe Subsystem ID", print_version_tlv_u16 },
 271         { 28, "Image Type", print_version_tlv_img_type },
 272         { 29, "Time Stamp", print_version_tlv_timestamp },
 273         { 30, "Build Type", print_version_tlv_u8 },
 274         { 31, "Build Num", print_version_tlv_u32 },
 275         { 32, "FW Build Product", print_version_tlv_u8 },
 276         { 33, "FW Build HW", print_version_tlv_u8 },
 277         { 34, "FW Build Step", print_version_tlv_u8 },
 278         { 35, "BT Spec", print_version_tlv_u8 },
 279         { 36, "Manufacturer", print_version_tlv_mfg },
 280         { 37, "HCI Revision", print_version_tlv_u16 },
 281         { 38, "LMP SubVersion", print_version_tlv_u16 },
 282         { 39, "OTP Patch Version", print_version_tlv_u8 },
 283         { 40, "Secure Boot", print_version_tlv_enabled },
 284         { 41, "Key From Header", print_version_tlv_enabled },
 285         { 42, "OTP Lock", print_version_tlv_enabled },
 286         { 43, "API Lock", print_version_tlv_enabled },
 287         { 44, "Debug Lock", print_version_tlv_enabled },
 288         { 45, "Minimum FW", print_version_tlv_min_fw },
 289         { 46, "Limited CCE", print_version_tlv_enabled },
 290         { 47, "SBE Type", print_version_tlv_u8 },
 291         { 48, "OTP BDADDR", print_version_tlv_otp_bdaddr },
 292         { 49, "Unlocked State", print_version_tlv_enabled },
 293         { 0, NULL, NULL },
 294 };
 295
 296 static void read_version_tlv_rsp(const void *data, uint8_t size)
 297 {
 298         uint8_t status = get_u8(data);
 299
 300         print_status(status);
 301
 302         /* Consume the status */
 303         data++;
 304         size--;
 305
 306         while (size > 0) {
 307                 const struct intel_version_tlv *tlv = data;
 308                 const struct intel_version_tlv_desc *desc = NULL;
 309                 int i;
 310
 311                 for (i = 0; intel_version_tlv_table[i].type > 0; i++) {
 312                         if (intel_version_tlv_table[i].type == tlv->type) {
 313                                 desc = &intel_version_tlv_table[i];
 314                                 break;
 315                         }
 316                 }
 317
 318                 if (desc)
 319                         desc->func(tlv, desc->type_str);
 320                 else
 321                         print_version_tlv_unknown(tlv, "Unknown Type");
 322
 323                 data += sizeof(*tlv) + tlv->len;
 324                 size -= sizeof(*tlv) + tlv->len;
 325         }
 326 }
 327
 328 static void read_version_rsp(uint16_t index, const void *data, uint8_t size)
 329 {
 330         uint8_t status = get_u8(data);
 331         uint8_t hw_platform = get_u8(data + 1);
 332         uint8_t hw_variant = get_u8(data + 2);
 333         uint8_t hw_revision = get_u8(data + 3);
 334         uint8_t fw_variant = get_u8(data + 4);
 335         uint8_t fw_revision = get_u8(data + 5);
 336         uint8_t fw_build_nn = get_u8(data + 6);
 337         uint8_t fw_build_cw = get_u8(data + 7);
 338         uint8_t fw_build_yy = get_u8(data + 8);
 339         uint8_t fw_patch = get_u8(data + 9);
 340
 341         /* There are two different formats of the response for the
 342          * HCI_Intel_Read_version command depends on the command parameters
 343          * If the size is fixed to 10 and hw_platform is 0x37, then it is the
 344          * legacy format, otherwise use the tlv based format.
 345          */
 346         if (size != 10 && hw_platform != 0x37) {
 347                 read_version_tlv_rsp(data, size);
 348                 return;
 349         }
 350
 351         print_status(status);
 352         print_field("Hardware platform: 0x%2.2x", hw_platform);
 353         print_field("Hardware variant: 0x%2.2x", hw_variant);
 354         print_field("Hardware revision: %u.%u", hw_revision >> 4,
 355                                                 hw_revision & 0x0f);
 356         print_field("Firmware variant: 0x%2.2x", fw_variant);
 357         print_field("Firmware revision: %u.%u", fw_revision >> 4,
 358                                                 fw_revision & 0x0f);
 359
 360         print_field("Firmware build: %u-%u.%u", fw_build_nn,
 361                                         fw_build_cw, 2000 + fw_build_yy);
 362         print_field("Firmware patch: %u", fw_patch);
 363 }
 364
 365 static void read_version_cmd(uint16_t index, const void *data, uint8_t size)
 366 {
 367         char *str;
 368         uint8_t type;
 369
 370         /* This is the legacy read version command format and no further action
 371          * is needed
 372          */
 373         if (size == 0)
 374                 return;
 375
 376         print_field("Requested Type:");
 377
 378         while (size > 0) {
 379                 const struct intel_version_tlv_desc *desc = NULL;
 380                 int i;
 381
 382                 type = get_u8(data);
 383
 384                 /* Get all supported types */
 385                 if (type == 0xff)
 386                         str = "All Supported Types";
 387                 else {
 388                         for (i = 0; intel_version_tlv_table[i].type > 0; i++) {
 389                                 if (intel_version_tlv_table[i].type == type) {
 390                                         desc = &intel_version_tlv_table[i];
 391                                         break;
 392                                 }
 393                         }
 394
 395                         if (desc)
 396                                 str = desc->type_str;
 397                         else
 398                                 str = "Unknown Type";
 399                 }
 400
 401                 print_field("  %s(0x%2.2x)", str, type);
 402
 403                 data += sizeof(type);
 404                 size -= sizeof(type);
 405         }
 406 }
 407
 408 static void set_uart_baudrate_cmd(uint16_t index, const void *data,
 409                                                         uint8_t size)
 410 {
 411         uint8_t baudrate = get_u8(data);
 412         const char *str;
 413
 414         switch (baudrate) {
 415         case 0x00:
 416                 str = "9600 Baud";
 417                 break;
 418         case 0x01:
 419                 str = "19200 Baud";
 420                 break;
 421         case 0x02:
 422                 str = "38400 Baud";
 423                 break;
 424         case 0x03:
 425                 str = "57600 Baud";
 426                 break;
 427         case 0x04:
 428                 str = "115200 Baud";
 429                 break;
 430         case 0x05:
 431                 str = "230400 Baud";
 432                 break;
 433         case 0x06:
 434                 str = "460800 Baud";
 435                 break;
 436         case 0x07:
 437                 str = "921600 Baud";
 438                 break;
 439         case 0x08:
 440                 str = "1843200 Baud";
 441                 break;
 442         case 0x09:
 443                 str = "3250000 baud";
 444                 break;
 445         case 0x0a:
 446                 str = "2000000 baud";
 447                 break;
 448         case 0x0b:
 449                 str = "3000000 baud";
 450                 break;
 451         case 0x0c:
 452                 str = "3714286 baud";
 453                 break;
 454         case 0x0d:
 455                 str = "4333333 baud";
 456                 break;
 457         case 0x0e:
 458                 str = "6500000 baud";
 459                 break;
 460         default:
 461                 str = "Reserved";
 462                 break;
 463         }
 464
 465         print_field("Baudrate: %s (0x%2.2x)", str, baudrate);
 466 }
 467
 468 static void secure_send_cmd(uint16_t index, const void *data, uint8_t size)
 469 {
 470         uint8_t type = get_u8(data);
 471         const char *str;
 472
 473         switch (type) {
 474         case 0x00:
 475                 str = "Init";
 476                 break;
 477         case 0x01:
 478                 str = "Data";
 479                 break;
 480         case 0x02:
 481                 str = "Sign";
 482                 break;
 483         case 0x03:
 484                 str = "PKey";
 485                 break;
 486         default:
 487                 str = "Reserved";
 488                 break;
 489         }
 490
 491         print_field("Type: %s fragment (0x%2.2x)", str, type);
 492
 493         packet_hexdump(data + 1, size - 1);
 494 }
 495
 496 static void manufacturer_mode_cmd(uint16_t index, const void *data,
 497                                                         uint8_t size)
 498 {
 499         uint8_t mode = get_u8(data);
 500         uint8_t reset = get_u8(data + 1);
 501         const char *str;
 502
 503         switch (mode) {
 504         case 0x00:
 505                 str = "Disabled";
 506                 break;
 507         case 0x01:
 508                 str = "Enabled";
 509                 break;
 510         default:
 511                 str = "Reserved";
 512                 break;
 513         }
 514
 515         print_field("Mode switch: %s (0x%2.2x)", str, mode);
 516
 517         switch (reset) {
 518         case 0x00:
 519                 str = "No reset";
 520                 break;
 521         case 0x01:
 522                 str = "Reset and deactivate patches";
 523                 break;
 524         case 0x02:
 525                 str = "Reset and activate patches";
 526                 break;
 527         default:
 528                 str = "Reserved";
 529                 break;
 530         }
 531
 532         print_field("Reset behavior: %s (0x%2.2x)", str, reset);
 533 }
 534
 535 static void write_bd_data_cmd(uint16_t index, const void *data, uint8_t size)
 536 {
 537         uint8_t features[8];
 538
 539         packet_print_addr("Address", data, 0x00);
 540         packet_hexdump(data + 6, 6);
 541
 542         memcpy(features, data + 12, 8);
 543         packet_print_features_lmp(features, 0);
 544
 545         memcpy(features, data + 20, 1);
 546         memset(features + 1, 0, 7);
 547         packet_print_features_ll(features);
 548
 549         packet_hexdump(data + 21, size - 21);
 550 }
 551
 552 static void read_bd_data_rsp(uint16_t index, const void *data, uint8_t size)
 553 {
 554         uint8_t status = get_u8(data);
 555
 556         print_status(status);
 557         packet_print_addr("Address", data + 1, 0x00);
 558         packet_hexdump(data + 7, size - 7);
 559 }
 560
 561 static void write_bd_address_cmd(uint16_t index, const void *data, uint8_t size)
 562 {
 563         packet_print_addr("Address", data, 0x00);
 564 }
 565
 566 static void act_deact_traces_cmd(uint16_t index, const void *data, uint8_t size)
 567 {
 568         uint8_t tx = get_u8(data);
 569         uint8_t tx_arq = get_u8(data + 1);
 570         uint8_t rx = get_u8(data + 2);
 571
 572         print_field("Transmit traces: 0x%2.2x", tx);
 573         print_field("Transmit ARQ: 0x%2.2x", tx_arq);
 574         print_field("Receive traces: 0x%2.2x", rx);
 575 }
 576
 577 static void stimulate_exception_cmd(uint16_t index, const void *data,
 578                                                         uint8_t size)
 579 {
 580         uint8_t type = get_u8(data);
 581         const char *str;
 582
 583         switch (type) {
 584         case 0x00:
 585                 str = "Fatal Exception";
 586                 break;
 587         case 0x01:
 588                 str = "Debug Exception";
 589                 break;
 590         default:
 591                 str = "Reserved";
 592                 break;
 593         }
 594
 595         print_field("Type: %s (0x%2.2x)", str, type);
 596 }
 597
 598 static const struct {
 599         uint8_t bit;
 600         const char *str;
 601 } events_table[] = {
 602         {  0, "Bootup"                  },
 603         {  1, "SCO Rejected via LMP"    },
 604         {  2, "PTT Switch Notification" },
 605         {  7, "Scan Status"             },
 606         {  9, "Debug Exception"         },
 607         { 10, "Fatal Exception"         },
 608         { 11, "System Exception"        },
 609         { 13, "LE Link Established"     },
 610         { 14, "FW Trace String"         },
 611         { }
 612 };
 613
 614 static void set_event_mask_cmd(uint16_t index, const void *data, uint8_t size)
 615 {
 616         const uint8_t *events_array = data;
 617         uint64_t mask, events = 0;
 618         int i;
 619
 620         for (i = 0; i < 8; i++)
 621                 events |= ((uint64_t) events_array[i]) << (i * 8);
 622
 623         print_field("Mask: 0x%16.16" PRIx64, events);
 624
 625         mask = events;
 626
 627         for (i = 0; events_table[i].str; i++) {
 628                 if (events & (((uint64_t) 1) << events_table[i].bit)) {
 629                         print_field("  %s", events_table[i].str);
 630                         mask &= ~(((uint64_t) 1) << events_table[i].bit);
 631                 }
 632         }
 633
 634         if (mask)
 635                 print_text(COLOR_UNKNOWN_EVENT_MASK, "  Unknown mask "
 636                                                 "(0x%16.16" PRIx64 ")", mask);
 637 }
 638
 639 static void ddc_config_write_cmd(uint16_t index, const void *data, uint8_t size)
 640 {
 641         while (size > 0) {
 642                 uint8_t param_len = get_u8(data);
 643                 uint16_t param_id = get_le16(data + 1);
 644
 645                 print_field("Identifier: 0x%4.4x", param_id);
 646                 packet_hexdump(data + 3, param_len - 2);
 647
 648                 data += param_len + 1;
 649                 size -= param_len + 1;
 650         }
 651 }
 652
 653 static void ddc_config_write_rsp(uint16_t index, const void *data, uint8_t size)
 654 {
 655         uint8_t status = get_u8(data);
 656         uint16_t param_id = get_le16(data + 1);
 657
 658         print_status(status);
 659         print_field("Identifier: 0x%4.4x", param_id);
 660 }
 661
 662 static void memory_write_cmd(uint16_t index, const void *data, uint8_t size)
 663 {
 664         uint32_t addr = get_le32(data);
 665         uint8_t mode = get_u8(data + 4);
 666         uint8_t length = get_u8(data + 5);
 667         const char *str;
 668
 669         print_field("Address: 0x%8.8x", addr);
 670
 671         switch (mode) {
 672         case 0x00:
 673                 str = "Byte access";
 674                 break;
 675         case 0x01:
 676                 str = "Half word access";
 677                 break;
 678         case 0x02:
 679                 str = "Word access";
 680                 break;
 681         default:
 682                 str = "Reserved";
 683                 break;
 684         }
 685
 686         print_field("Mode: %s (0x%2.2x)", str, mode);
 687         print_field("Length: %u", length);
 688
 689         packet_hexdump(data + 6, size - 6);
 690 }
 691
 692 static void read_supported_features_cmd(uint16_t index, const void *data,
 693                                                         uint8_t size)
 694 {
 695         uint8_t page = get_u8(data);
 696
 697         print_field("Page: 0x%2.2x", page);
 698 }
 699
 700 static void read_supported_features_rsp(uint16_t index, const void *data,
 701                                                         uint8_t size)
 702 {
 703         uint8_t status = get_u8(data);
 704         uint8_t page = get_u8(data + 1);
 705         uint8_t max_pages = get_u8(data + 2);
 706
 707         print_status(status);
 708         print_field("Page: 0x%2.2x", page);
 709         print_field("Max Pages: 0x%2.2x", max_pages);
 710         print_field("Supported Features:");
 711         packet_hexdump(data + 3, size - 3);
 712 }
 713
 714 static const struct vendor_ocf vendor_ocf_table[] = {
 715         { 0x001, "Reset",
 716                         reset_cmd, 8, true,
 717                         status_rsp, 1, true },
 718         { 0x002, "No Operation" },
 719         { 0x005, "Read Version",
 720                         read_version_cmd, 0, false,
 721                         read_version_rsp, 1, false },
 722         { 0x006, "Set UART Baudrate",
 723                         set_uart_baudrate_cmd, 1, true,
 724                         status_rsp, 1, true },
 725         { 0x007, "Enable LPM" },
 726         { 0x008, "PCM Write Configuration" },
 727         { 0x009, "Secure Send",
 728                         secure_send_cmd, 1, false,
 729                         status_rsp, 1, true },
 730         { 0x00d, "Read Secure Boot Params",
 731                         null_cmd, 0, true },
 732         { 0x00e, "Write Secure Boot Params" },
 733         { 0x00f, "Unlock" },
 734         { 0x010, "Change UART Baudrate" },
 735         { 0x011, "Manufacturer Mode",
 736                         manufacturer_mode_cmd, 2, true,
 737                         status_rsp, 1, true },
 738         { 0x012, "Read Link RSSI" },
 739         { 0x022, "Get Exception Info" },
 740         { 0x024, "Clear Exception Info" },
 741         { 0x02f, "Write BD Data",
 742                         write_bd_data_cmd, 6, false },
 743         { 0x030, "Read BD Data",
 744                         null_cmd, 0, true,
 745                         read_bd_data_rsp, 7, false },
 746         { 0x031, "Write BD Address",
 747                         write_bd_address_cmd, 6, true,
 748                         status_rsp, 1, true },
 749         { 0x032, "Flow Specification" },
 750         { 0x034, "Read Secure ID" },
 751         { 0x038, "Set Synchronous USB Interface Type" },
 752         { 0x039, "Config Synchronous Interface" },
 753         { 0x03f, "SW RF Kill",
 754                         null_cmd, 0, true,
 755                         status_rsp, 1, true },
 756         { 0x043, "Activate Deactivate Traces",
 757                         act_deact_traces_cmd, 3, true },
 758         { 0x04d, "Stimulate Exception",
 759                         stimulate_exception_cmd, 1, true,
 760                         status_rsp, 1, true },
 761         { 0x050, "Read HW Version" },
 762         { 0x052, "Set Event Mask",
 763                         set_event_mask_cmd, 8, true,
 764                         status_rsp, 1, true },
 765         { 0x053, "Config_Link_Controller" },
 766         { 0x089, "DDC Write" },
 767         { 0x08a, "DDC Read" },
 768         { 0x08b, "DDC Config Write",
 769                         ddc_config_write_cmd, 3, false,
 770                         ddc_config_write_rsp, 3, true },
 771         { 0x08c, "DDC Config Read" },
 772         { 0x08d, "Memory Read" },
 773         { 0x08e, "Memory Write",
 774                         memory_write_cmd, 6, false,
 775                         status_rsp, 1, true },
 776         { 0x0a6, "Read Supported Features",
 777                         read_supported_features_cmd, 1, true,
 778                         read_supported_features_rsp, 19, true },
 779
 780         { }
 781 };
 782
 783 const struct vendor_ocf *intel_vendor_ocf(uint16_t ocf)
 784 {
 785         int i;
 786
 787         for (i = 0; vendor_ocf_table[i].str; i++) {
 788                 if (vendor_ocf_table[i].ocf == ocf)
 789                         return &vendor_ocf_table[i];
 790         }
 791
 792         return NULL;
 793 }
 794
 795 static void startup_evt(uint16_t index, const void *data, uint8_t size)
 796 {
 797 }
 798
 799 static void fatal_exception_evt(uint16_t index, const void *data, uint8_t size)
 800 {
 801         uint16_t line = get_le16(data);
 802         uint8_t module = get_u8(data + 2);
 803         uint8_t reason = get_u8(data + 3);
 804
 805         print_field("Line: %u", line);
 806         print_module(module);
 807         print_field("Reason: 0x%2.2x", reason);
 808 }
 809
 810 static void bootup_evt(uint16_t index, const void *data, uint8_t size)
 811 {
 812         uint8_t zero = get_u8(data);
 813         uint8_t num_packets = get_u8(data + 1);
 814         uint8_t source = get_u8(data + 2);
 815         uint8_t reset_type = get_u8(data + 3);
 816         uint8_t reset_reason = get_u8(data + 4);
 817         uint8_t ddc_status = get_u8(data + 5);
 818         const char *str;
 819
 820         print_field("Zero: 0x%2.2x", zero);
 821         print_field("Number of packets: %d", num_packets);
 822
 823         switch (source) {
 824         case 0x00:
 825                 str = "Bootloader";
 826                 break;
 827         case 0x01:
 828                 str = "Operational firmware";
 829                 break;
 830         case 0x02:
 831                 str = "Self test firmware";
 832                 break;
 833         default:
 834                 str = "Reserved";
 835                 break;
 836         }
 837
 838         print_field("Source: %s (0x%2.2x)", str, source);
 839
 840         switch (reset_type) {
 841         case 0x00:
 842                 str = "Hardware reset";
 843                 break;
 844         case 0x01:
 845                 str = "Soft watchdog reset";
 846                 break;
 847         case 0x02:
 848                 str = "Soft software reset";
 849                 break;
 850         case 0x03:
 851                 str = "Hard watchdog reset";
 852                 break;
 853         case 0x04:
 854                 str = "Hard software reset";
 855                 break;
 856         default:
 857                 str = "Reserved";
 858                 break;
 859         }
 860
 861         print_field("Reset type: %s (0x%2.2x)", str, reset_type);
 862
 863         switch (reset_reason) {
 864         case 0x00:
 865                 str = "Power on";
 866                 break;
 867         case 0x01:
 868                 str = "Reset command";
 869                 break;
 870         case 0x02:
 871                 str = "Intel reset command";
 872                 break;
 873         case 0x03:
 874                 str = "Watchdog";
 875                 break;
 876         case 0x04:
 877                 str = "Fatal exception";
 878                 break;
 879         case 0x05:
 880                 str = "System exception";
 881                 break;
 882         case 0xff:
 883                 str = "Unknown";
 884                 break;
 885         default:
 886                 str = "Reserved";
 887                 break;
 888         }
 889
 890         print_field("Reset reason: %s (0x%2.2x)", str, reset_reason);
 891
 892         switch (ddc_status) {
 893         case 0x00:
 894                 str = "Firmware default";
 895                 break;
 896         case 0x01:
 897                 str = "Firmware default plus OTP";
 898                 break;
 899         case 0x02:
 900                 str = "Persistent RAM";
 901                 break;
 902         case 0x03:
 903                 str = "Not used";
 904                 break;
 905         default:
 906                 str = "Reserved";
 907                 break;
 908         }
 909
 910         print_field("DDC status: %s (0x%2.2x)", str, ddc_status);
 911 }
 912
 913 static void default_bd_data_evt(uint16_t index, const void *data, uint8_t size)
 914 {
 915         uint8_t mem_status = get_u8(data);
 916         const char *str;
 917
 918         switch (mem_status) {
 919         case 0x02:
 920                 str = "Invalid manufacturing data";
 921                 break;
 922         default:
 923                 str = "Reserved";
 924                 break;
 925         }
 926
 927         print_field("Memory status: %s (0x%2.2x)", str, mem_status);
 928 }
 929
 930 static void secure_send_commands_result_evt(uint16_t index, const void *data,
 931                                                         uint8_t size)
 932 {
 933         uint8_t result = get_u8(data);
 934         uint16_t opcode = get_le16(data + 1);
 935         uint16_t ogf = cmd_opcode_ogf(opcode);
 936         uint16_t ocf = cmd_opcode_ocf(opcode);
 937         uint8_t status = get_u8(data + 3);
 938         const char *str;
 939
 940         switch (result) {
 941         case 0x00:
 942                 str = "Success";
 943                 break;
 944         case 0x01:
 945                 str = "General failure";
 946                 break;
 947         case 0x02:
 948                 str = "Hardware failure";
 949                 break;
 950         case 0x03:
 951                 str = "Signature verification failed";
 952                 break;
 953         case 0x04:
 954                 str = "Parsing error of command buffer";
 955                 break;
 956         case 0x05:
 957                 str = "Command execution failure";
 958                 break;
 959         case 0x06:
 960                 str = "Command parameters error";
 961                 break;
 962         case 0x07:
 963                 str = "Command missing";
 964                 break;
 965         default:
 966                 str = "Reserved";
 967                 break;
 968         }
 969
 970         print_field("Result: %s (0x%2.2x)", str, result);
 971         print_field("Opcode: 0x%4.4x (0x%2.2x|0x%4.4x)", opcode, ogf, ocf);
 972         print_status(status);
 973 }
 974
 975 static void debug_exception_evt(uint16_t index, const void *data, uint8_t size)
 976 {
 977         uint16_t line = get_le16(data);
 978         uint8_t module = get_u8(data + 2);
 979         uint8_t reason = get_u8(data + 3);
 980
 981         print_field("Line: %u", line);
 982         print_module(module);
 983         print_field("Reason: 0x%2.2x", reason);
 984 }
 985
 986 static void le_link_established_evt(uint16_t index, const void *data,
 987                                                         uint8_t size)
 988 {
 989         uint16_t handle = get_le16(data);
 990         uint32_t access_addr = get_le32(data + 10);
 991
 992         print_field("Handle: %u", handle);
 993
 994         packet_hexdump(data + 2, 8);
 995
 996         print_field("Access address: 0x%8.8x", access_addr);
 997
 998         packet_hexdump(data + 14, size - 14);
 999 }
1000
1001 static void scan_status_evt(uint16_t index, const void *data, uint8_t size)
1002 {
1003         uint8_t enable = get_u8(data);
1004
1005         print_field("Inquiry scan: %s",
1006                                 (enable & 0x01) ? "Enabled" : "Disabled");
1007         print_field("Page scan: %s",
1008                                 (enable & 0x02) ? "Enabled" : "Disabled");
1009
1010         if (enable & 0xfc)
1011                 print_text(COLOR_UNKNOWN_SCAN_STATUS,
1012                                 "  Unknown status (0x%2.2x)", enable & 0xfc);
1013
1014 }
1015
1016 static void act_deact_traces_complete_evt(uint16_t index, const void *data,
1017                                                         uint8_t size)
1018 {
1019         uint8_t status = get_u8(data);
1020
1021         print_status(status);
1022 }
1023
1024 static void lmp_pdu_trace_evt(uint16_t index, const void *data, uint8_t size)
1025 {
1026         uint8_t type, len, id;
1027         uint16_t handle, count;
1028         uint32_t clock;
1029         const char *str;
1030
1031         type = get_u8(data);
1032         handle = get_le16(data + 1);
1033
1034         switch (type) {
1035         case 0x00:
1036                 str = "RX LMP";
1037                 break;
1038         case 0x01:
1039                 str = "TX LMP";
1040                 break;
1041         case 0x02:
1042                 str = "ACK LMP";
1043                 break;
1044         case 0x03:
1045                 str = "RX LL";
1046                 break;
1047         case 0x04:
1048                 str = "TX LL";
1049                 break;
1050         case 0x05:
1051                 str = "ACK LL";
1052                 break;
1053         default:
1054                 str = "Unknown";
1055                 break;
1056         }
1057
1058         print_field("Type: %s (0x%2.2x)", str, type);
1059         print_field("Handle: %u", handle);
1060
1061         switch (type) {
1062         case 0x00:
1063                 len = size - 8;
1064                 clock = get_le32(data + 4 + len);
1065
1066                 packet_hexdump(data + 3, 1);
1067                 lmp_packet(data + 4, len, false);
1068                 print_field("Clock: 0x%8.8x", clock);
1069                 break;
1070         case 0x01:
1071                 len = size - 9;
1072                 clock = get_le32(data + 4 + len);
1073                 id = get_u8(data + 4 + len + 4);
1074
1075                 packet_hexdump(data + 3, 1);
1076                 lmp_packet(data + 4, len, false);
1077                 print_field("Clock: 0x%8.8x", clock);
1078                 print_field("ID: 0x%2.2x", id);
1079                 break;
1080         case 0x02:
1081                 clock = get_le32(data + 3);
1082                 id = get_u8(data + 3 + 4);
1083
1084                 print_field("Clock: 0x%8.8x", clock);
1085                 print_field("ID: 0x%2.2x", id);
1086                 break;
1087         case 0x03:
1088                 len = size - 8;
1089                 count = get_le16(data + 3);
1090
1091                 print_field("Count: 0x%4.4x", count);
1092                 packet_hexdump(data + 3 + 2 + 1, 2);
1093                 llcp_packet(data + 8, len, false);
1094                 break;
1095         case 0x04:
1096                 len = size - 8;
1097                 count = get_le16(data + 3);
1098                 id = get_u8(data + 3 + 2);
1099
1100                 print_field("Count: 0x%4.4x", count);
1101                 print_field("ID: 0x%2.2x", id);
1102                 packet_hexdump(data + 3 + 2 + 1, 2);
1103                 llcp_packet(data + 8, len, false);
1104                 break;
1105         case 0x05:
1106                 count = get_le16(data + 3);
1107                 id = get_u8(data + 3 + 2);
1108
1109                 print_field("Count: 0x%4.4x", count);
1110                 print_field("ID: 0x%2.2x", id);
1111                 break;
1112         default:
1113                 packet_hexdump(data + 3, size - 3);
1114                 break;
1115         }
1116 }
1117
1118 static void write_bd_data_complete_evt(uint16_t index, const void *data,
1119                                                         uint8_t size)
1120 {
1121         uint8_t status = get_u8(data);
1122
1123         print_status(status);
1124 }
1125
1126 static void sco_rejected_via_lmp_evt(uint16_t index, const void *data,
1127                                                         uint8_t size)
1128 {
1129         uint8_t reason = get_u8(data + 6);
1130
1131         packet_print_addr("Address", data, 0x00);
1132         packet_print_error("Reason", reason);
1133 }
1134
1135 static void ptt_switch_notification_evt(uint16_t index, const void *data,
1136                                                         uint8_t size)
1137 {
1138         uint16_t handle = get_le16(data);
1139         uint8_t table = get_u8(data + 2);
1140         const char *str;
1141
1142         print_field("Handle: %u", handle);
1143
1144         switch (table) {
1145         case 0x00:
1146                 str = "Basic rate";
1147                 break;
1148         case 0x01:
1149                 str = "Enhanced data rate";
1150                 break;
1151         default:
1152                 str = "Reserved";
1153                 break;
1154         }
1155
1156         print_field("Packet type table: %s (0x%2.2x)", str, table);
1157 }
1158
1159 static void system_exception_evt(uint16_t index, const void *data, uint8_t size)
1160 {
1161         uint8_t type = get_u8(data);
1162         const char *str;
1163
1164         switch (type) {
1165         case 0x00:
1166                 str = "No Exception";
1167                 break;
1168         case 0x01:
1169                 str = "Undefined Instruction";
1170                 break;
1171         case 0x02:
1172                 str = "Prefetch abort";
1173                 break;
1174         case 0x03:
1175                 str = "Data abort";
1176                 break;
1177         default:
1178                 str = "Reserved";
1179                 break;
1180         }
1181
1182         print_field("Type: %s (0x%2.2x)", str, type);
1183
1184         packet_hexdump(data + 1, size - 1);
1185 }
1186
1187 static const struct vendor_evt vendor_evt_table[] = {
1188         { 0x00, "Startup",
1189                         startup_evt, 0, true },
1190         { 0x01, "Fatal Exception",
1191                         fatal_exception_evt, 4, true },
1192         { 0x02, "Bootup",
1193                         bootup_evt, 6, true },
1194         { 0x05, "Default BD Data",
1195                         default_bd_data_evt, 1, true },
1196         { 0x06, "Secure Send Commands Result",
1197                         secure_send_commands_result_evt, 4, true },
1198         { 0x08, "Debug Exception",
1199                         debug_exception_evt, 4, true },
1200         { 0x0f, "LE Link Established",
1201                         le_link_established_evt, 26, true },
1202         { 0x11, "Scan Status",
1203                         scan_status_evt, 1, true },
1204         { 0x16, "Activate Deactivate Traces Complete",
1205                         act_deact_traces_complete_evt, 1, true },
1206         { 0x17, "LMP PDU Trace",
1207                         lmp_pdu_trace_evt, 3, false },
1208         { 0x19, "Write BD Data Complete",
1209                         write_bd_data_complete_evt, 1, true },
1210         { 0x25, "SCO Rejected via LMP",
1211                         sco_rejected_via_lmp_evt, 7, true },
1212         { 0x26, "PTT Switch Notification",
1213                         ptt_switch_notification_evt, 3, true },
1214         { 0x29, "System Exception",
1215                         system_exception_evt, 133, true },
1216         { 0x2c, "FW Trace String" },
1217         { 0x2e, "FW Trace Binary" },
1218         { }
1219 };
1220
1221 /*
1222  * An Intel telemetry subevent is of the TLV format.
1223  * - Type: takes 1 byte. This is the subevent_id.
1224  * - Length: takes 1 byte.
1225  * - Value: takes |Length| bytes.
1226  */
1227 struct intel_tlv {
1228         uint8_t subevent_id;
1229         uint8_t length;
1230         uint8_t value[];
1231 };
1232
1233 #define TLV_SIZE(tlv) (*((const uint8_t *) tlv + 1) + 2 * sizeof(uint8_t))
1234 #define NEXT_TLV(tlv) (const struct intel_tlv *) \
1235                                         ((const uint8_t *) tlv + TLV_SIZE(tlv))
1236
1237 static void ext_evt_type(const struct intel_tlv *tlv)
1238 {
1239         uint8_t evt_type = get_u8(tlv->value);
1240         const char *str;
1241
1242         switch (evt_type) {
1243         case 0x00:
1244                 str = "System Exception";
1245                 break;
1246         case 0x01:
1247                 str = "Fatal Exception";
1248                 break;
1249         case 0x02:
1250                 str = "Debug Exception";
1251                 break;
1252         case 0x03:
1253                 str = "Connection Event for BR/EDR Link Type";
1254                 break;
1255         case 0x04:
1256                 str = "Disconnection Event";
1257                 break;
1258         case 0x05:
1259                 str = "Performance Stats";
1260                 break;
1261
1262         default:
1263                 print_text(COLOR_UNKNOWN_EXT_EVENT,
1264                         "Unknown extended telemetry event type (0x%2.2x)",
1265                         evt_type);
1266                 packet_hexdump((const void *) tlv,
1267                                         tlv->length + 2 * sizeof(uint8_t));
1268                 return;
1269         }
1270
1271         print_field("Extended event type (0x%2.2x): %s (0x%2.2x)",
1272                         tlv->subevent_id, str, evt_type);
1273 }
1274
1275 static void ext_acl_evt_conn_handle(const struct intel_tlv *tlv)
1276 {
1277         uint16_t conn_handle = get_le16(tlv->value);
1278
1279         print_field("ACL connection handle (0x%2.2x): 0x%4.4x",
1280                         tlv->subevent_id, conn_handle);
1281 }
1282
1283 static void ext_acl_evt_hec_errors(const struct intel_tlv *tlv)
1284 {
1285         uint32_t num = get_le32(tlv->value);
1286
1287         /* Skip if 0 */
1288         if (!num)
1289                 return;
1290
1291         print_field("Rx HEC errors (0x%2.2x): %d", tlv->subevent_id, num);
1292 }
1293
1294 static void ext_acl_evt_crc_errors(const struct intel_tlv *tlv)
1295 {
1296         uint32_t num = get_le32(tlv->value);
1297
1298         /* Skip if 0 */
1299         if (!num)
1300                 return;
1301
1302         print_field("Rx CRC errors (0x%2.2x): %d", tlv->subevent_id, num);
1303 }
1304
1305 static void ext_acl_evt_num_pkt_from_host(const struct intel_tlv *tlv)
1306 {
1307         uint32_t num = get_le32(tlv->value);
1308
1309         /* Skip if 0 */
1310         if (!num)
1311                 return;
1312
1313         print_field("Packets from host (0x%2.2x): %d",
1314                         tlv->subevent_id, num);
1315 }
1316
1317 static void ext_acl_evt_num_tx_pkt_to_air(const struct intel_tlv *tlv)
1318 {
1319         uint32_t num = get_le32(tlv->value);
1320
1321         /* Skip if 0 */
1322         if (!num)
1323                 return;
1324
1325         print_field("Tx packets (0x%2.2x): %d", tlv->subevent_id, num);
1326 }
1327
1328 static void ext_acl_evt_num_tx_pkt_retry(const struct intel_tlv *tlv)
1329 {
1330         char *subevent_str;
1331         uint32_t num = get_le32(tlv->value);
1332
1333         /* Skip if 0 */
1334         if (!num)
1335                 return;
1336
1337         switch (tlv->subevent_id) {
1338         case 0x4f:
1339                 subevent_str = "Tx packets 0 retries";
1340                 break;
1341         case 0x50:
1342                 subevent_str = "Tx packets 1 retries";
1343                 break;
1344         case 0x51:
1345                 subevent_str = "Tx packets 2 retries";
1346                 break;
1347         case 0x52:
1348                 subevent_str = "Tx packets 3 retries";
1349                 break;
1350         case 0x53:
1351                 subevent_str = "Tx packets 4 retries and more";
1352                 break;
1353         default:
1354                 subevent_str = "Unknown";
1355                 break;
1356         }
1357
1358         print_field("%s (0x%2.2x): %d", subevent_str, tlv->subevent_id, num);
1359 }
1360
1361 static void ext_acl_evt_num_tx_pkt_type(const struct intel_tlv *tlv)
1362 {
1363         char *packet_type_str;
1364         uint32_t num = get_le32(tlv->value);
1365
1366         /* Skip if 0 */
1367         if (!num)
1368                 return;
1369
1370         switch (tlv->subevent_id) {
1371         case 0x54:
1372                 packet_type_str = "DH1";
1373                 break;
1374         case 0x55:
1375                 packet_type_str = "DH3";
1376                 break;
1377         case 0x56:
1378                 packet_type_str = "DH5";
1379                 break;
1380         case 0x57:
1381                 packet_type_str = "2DH1";
1382                 break;
1383         case 0x58:
1384                 packet_type_str = "2DH3";
1385                 break;
1386         case 0x59:
1387                 packet_type_str = "2DH5";
1388                 break;
1389         case 0x5a:
1390                 packet_type_str = "3DH1";
1391                 break;
1392         case 0x5b:
1393                 packet_type_str = "3DH3";
1394                 break;
1395         case 0x5c:
1396                 packet_type_str = "3DH5";
1397                 break;
1398         default:
1399                 packet_type_str = "Unknown";
1400                 break;
1401         }
1402
1403         print_field("Tx %s packets (0x%2.2x): %d",
1404                         packet_type_str, tlv->subevent_id, num);
1405 }
1406
1407 static void ext_acl_evt_num_rx_pkt_from_air(const struct intel_tlv *tlv)
1408 {
1409         uint32_t num = get_le32(tlv->value);
1410
1411         /* Skip if 0 */
1412         if (!num)
1413                 return;
1414
1415         print_field("Rx packets (0x%2.2x): %d",
1416                         tlv->subevent_id, num);
1417 }
1418
1419 static void ext_acl_evt_link_throughput(const struct intel_tlv *tlv)
1420 {
1421         uint32_t num = get_le32(tlv->value);
1422
1423         /* Skip if 0 */
1424         if (!num)
1425                 return;
1426
1427         print_field("ACL link throughput (bps) (0x%2.2x): %d",
1428                         tlv->subevent_id, num);
1429 }
1430
1431 static void ext_acl_evt_max_packet_latency(const struct intel_tlv *tlv)
1432 {
1433         uint32_t num = get_le32(tlv->value);
1434
1435         /* Skip if 0 */
1436         if (!num)
1437                 return;
1438
1439         print_field("ACL max packet latency (us) (0x%2.2x): %d",
1440                         tlv->subevent_id, num);
1441 }
1442
1443 static void ext_acl_evt_avg_packet_latency(const struct intel_tlv *tlv)
1444 {
1445         uint32_t num = get_le32(tlv->value);
1446
1447         /* Skip if 0 */
1448         if (!num)
1449                 return;
1450
1451         print_field("ACL avg packet latency (us) (0x%2.2x): %d",
1452                         tlv->subevent_id, num);
1453 }
1454
1455 static void ext_acl_evt_rssi_moving_avg(const struct intel_tlv *tlv)
1456 {
1457         uint32_t num = get_le16(tlv->value);
1458
1459         /* Skip if 0 */
1460         if (!num)
1461                 return;
1462
1463         print_field("ACL RX RSSI moving avg (0x%2.2x): %d",
1464                         tlv->subevent_id, num);
1465 }
1466
1467 static void ext_acl_evt_bad_cnt(const char *prefix, const struct intel_tlv *tlv)
1468 {
1469         uint32_t c_1m = get_le32(tlv->value);
1470         uint32_t c_2m = get_le32(tlv->value + 4);
1471         uint32_t c_3m = get_le32(tlv->value + 8);
1472
1473         /* Skip if all 0 */
1474         if (!c_1m && !c_2m && !c_3m)
1475                 return;
1476
1477         print_field("%s (0x%2.2x): 1M %d 2M %d 3M %d",
1478                         prefix, tlv->subevent_id, c_1m, c_2m, c_3m);
1479 }
1480
1481 static void ext_acl_evt_snr_bad_cnt(const struct intel_tlv *tlv)
1482 {
1483         ext_acl_evt_bad_cnt("ACL RX SNR Bad Margin Counter", tlv);
1484 }
1485
1486 static void ext_acl_evt_rx_rssi_bad_cnt(const struct intel_tlv *tlv)
1487 {
1488         ext_acl_evt_bad_cnt("ACL RX RSSI Bad Counter", tlv);
1489 }
1490
1491 static void ext_acl_evt_tx_rssi_bad_cnt(const struct intel_tlv *tlv)
1492 {
1493         ext_acl_evt_bad_cnt("ACL TX RSSI Bad Counter", tlv);
1494 }
1495
1496 static void ext_sco_evt_conn_handle(const struct intel_tlv *tlv)
1497 {
1498         uint16_t conn_handle = get_le16(tlv->value);
1499
1500         print_field("SCO/eSCO connection handle (0x%2.2x): 0x%4.4x",
1501                         tlv->subevent_id, conn_handle);
1502 }
1503
1504 static void ext_sco_evt_num_rx_pkt_from_air(const struct intel_tlv *tlv)
1505 {
1506         uint32_t num = get_le32(tlv->value);
1507
1508         /* Skip if 0 */
1509         if (!num)
1510                 return;
1511
1512         print_field("Packets from host (0x%2.2x): %d", tlv->subevent_id, num);
1513 }
1514
1515 static void ext_sco_evt_num_tx_pkt_to_air(const struct intel_tlv *tlv)
1516 {
1517         uint32_t num = get_le32(tlv->value);
1518
1519         /* Skip if 0 */
1520         if (!num)
1521                 return;
1522
1523         print_field("Tx packets (0x%2.2x): %d", tlv->subevent_id, num);
1524 }
1525
1526 static void ext_sco_evt_num_rx_payloads_lost(const struct intel_tlv *tlv)
1527 {
1528         uint32_t num = get_le32(tlv->value);
1529
1530         /* Skip if 0 */
1531         if (!num)
1532                 return;
1533
1534         print_field("Rx payload lost (0x%2.2x): %d", tlv->subevent_id, num);
1535 }
1536
1537 static void ext_sco_evt_num_tx_payloads_lost(const struct intel_tlv *tlv)
1538 {
1539
1540         uint32_t num = get_le32(tlv->value);
1541
1542         /* Skip if 0 */
1543         if (!num)
1544                 return;
1545
1546         print_field("Tx payload lost (0x%2.2x): %d", tlv->subevent_id, num);
1547 }
1548
1549 static void slots_errors(const struct intel_tlv *tlv, const char *type_str)
1550 {
1551         /* The subevent has 5 slots where each slot is of the uint32_t type. */
1552         uint32_t num[5];
1553         const uint8_t *data = tlv->value;
1554         int i;
1555
1556         if (tlv->length != 5 * sizeof(uint32_t)) {
1557                 print_text(COLOR_UNKNOWN_EXT_EVENT,
1558                                 "  Invalid subevent length (%d)", tlv->length);
1559                 return;
1560         }
1561
1562         for (i = 0; i < 5; i++) {
1563                 num[i] = get_le32(data);
1564                 data += sizeof(uint32_t);
1565         }
1566
1567         print_field("%s (0x%2.2x): %d %d %d %d %d", type_str, tlv->subevent_id,
1568                         num[0], num[1], num[2], num[3], num[4]);
1569 }
1570
1571 static void ext_sco_evt_num_no_sync_errors(const struct intel_tlv *tlv)
1572 {
1573         slots_errors(tlv, "Rx No SYNC errors");
1574 }
1575
1576 static void ext_sco_evt_num_hec_errors(const struct intel_tlv *tlv)
1577 {
1578         slots_errors(tlv, "Rx HEC errors");
1579 }
1580
1581 static void ext_sco_evt_num_crc_errors(const struct intel_tlv *tlv)
1582 {
1583         slots_errors(tlv, "Rx CRC errors");
1584 }
1585
1586 static void ext_sco_evt_num_naks(const struct intel_tlv *tlv)
1587 {
1588         slots_errors(tlv, "Rx NAK errors");
1589 }
1590
1591 static void ext_sco_evt_num_failed_tx_by_wifi(const struct intel_tlv *tlv)
1592 {
1593         slots_errors(tlv, "Failed Tx due to Wifi coex");
1594 }
1595
1596 static void ext_sco_evt_num_failed_rx_by_wifi(const struct intel_tlv *tlv)
1597 {
1598         slots_errors(tlv, "Failed Rx due to Wifi coex");
1599 }
1600
1601 static void ext_sco_evt_samples_inserted(const struct intel_tlv *tlv)
1602 {
1603         uint32_t num = get_le32(tlv->value);
1604
1605         /* Skip if 0 */
1606         if (!num)
1607                 return;
1608
1609         print_field("Late samples inserted based on CDC (0x%2.2x): %d",
1610                         tlv->subevent_id, num);
1611 }
1612
1613 static void ext_sco_evt_samples_dropped(const struct intel_tlv *tlv)
1614 {
1615         uint32_t num = get_le32(tlv->value);
1616
1617         /* Skip if 0 */
1618         if (!num)
1619                 return;
1620
1621         print_field("Samples dropped (0x%2.2x): %d", tlv->subevent_id, num);
1622 }
1623
1624 static void ext_sco_evt_mute_samples(const struct intel_tlv *tlv)
1625 {
1626         uint32_t num = get_le32(tlv->value);
1627
1628         /* Skip if 0 */
1629         if (!num)
1630                 return;
1631
1632         print_field("Mute samples sent at initial connection (0x%2.2x): %d",
1633                         tlv->subevent_id, num);
1634 }
1635
1636 static void ext_sco_evt_plc_injection_data(const struct intel_tlv *tlv)
1637 {
1638         uint32_t num = get_le32(tlv->value);
1639
1640         /* Skip if 0 */
1641         if (!num)
1642                 return;
1643
1644         print_field("PLC injection data (0x%2.2x): %d", tlv->subevent_id, num);
1645 }
1646
1647 static const struct intel_ext_subevent {
1648         uint8_t subevent_id;
1649         uint8_t length;
1650         void (*func)(const struct intel_tlv *tlv);
1651 } intel_ext_subevent_table[] = {
1652         { 0x01, 1, ext_evt_type },
1653
1654         /* ACL audio link quality subevents */
1655         { 0x4a, 2, ext_acl_evt_conn_handle },
1656         { 0x4b, 4, ext_acl_evt_hec_errors },
1657         { 0x4c, 4, ext_acl_evt_crc_errors },
1658         { 0x4d, 4, ext_acl_evt_num_pkt_from_host },
1659         { 0x4e, 4, ext_acl_evt_num_tx_pkt_to_air },
1660         { 0x4f, 4, ext_acl_evt_num_tx_pkt_retry },
1661         { 0x50, 4, ext_acl_evt_num_tx_pkt_retry },
1662         { 0x51, 4, ext_acl_evt_num_tx_pkt_retry },
1663         { 0x52, 4, ext_acl_evt_num_tx_pkt_retry },
1664         { 0x53, 4, ext_acl_evt_num_tx_pkt_retry },
1665         { 0x54, 4, ext_acl_evt_num_tx_pkt_type },
1666         { 0x55, 4, ext_acl_evt_num_tx_pkt_type },
1667         { 0x56, 4, ext_acl_evt_num_tx_pkt_type },
1668         { 0x57, 4, ext_acl_evt_num_tx_pkt_type },
1669         { 0x58, 4, ext_acl_evt_num_tx_pkt_type },
1670         { 0x59, 4, ext_acl_evt_num_tx_pkt_type },
1671         { 0x5a, 4, ext_acl_evt_num_tx_pkt_type },
1672         { 0x5b, 4, ext_acl_evt_num_tx_pkt_type },
1673         { 0x5c, 4, ext_acl_evt_num_tx_pkt_type },
1674         { 0x5d, 4, ext_acl_evt_num_rx_pkt_from_air },
1675         { 0x5e, 4, ext_acl_evt_link_throughput },
1676         { 0x5f, 4, ext_acl_evt_max_packet_latency },
1677         { 0x60, 4, ext_acl_evt_avg_packet_latency },
1678         { 0x61, 2, ext_acl_evt_rssi_moving_avg },
1679         { 0x62, 12, ext_acl_evt_snr_bad_cnt },
1680         { 0x63, 12, ext_acl_evt_rx_rssi_bad_cnt },
1681         { 0x64, 12, ext_acl_evt_tx_rssi_bad_cnt },
1682
1683         /* SCO/eSCO audio link quality subevents */
1684         { 0x6a, 2, ext_sco_evt_conn_handle },
1685         { 0x6b, 4, ext_sco_evt_num_rx_pkt_from_air },
1686         { 0x6c, 4, ext_sco_evt_num_tx_pkt_to_air },
1687         { 0x6d, 4, ext_sco_evt_num_rx_payloads_lost },
1688         { 0x6e, 4, ext_sco_evt_num_tx_payloads_lost },
1689         { 0x6f, 20, ext_sco_evt_num_no_sync_errors },
1690         { 0x70, 20, ext_sco_evt_num_hec_errors },
1691         { 0x71, 20, ext_sco_evt_num_crc_errors },
1692         { 0x72, 20, ext_sco_evt_num_naks },
1693         { 0x73, 20, ext_sco_evt_num_failed_tx_by_wifi },
1694         { 0x74, 20, ext_sco_evt_num_failed_rx_by_wifi },
1695         { 0x75, 4, ext_sco_evt_samples_inserted },
1696         { 0x76, 4, ext_sco_evt_samples_dropped },
1697         { 0x77, 4, ext_sco_evt_mute_samples },
1698         { 0x78, 4, ext_sco_evt_plc_injection_data },
1699
1700         /* end */
1701         { 0x0, 0}
1702 };
1703
1704 static const struct intel_tlv *process_ext_subevent(const struct intel_tlv *tlv,
1705                                         const struct intel_tlv *last_tlv)
1706 {
1707         const struct intel_tlv *next_tlv = NEXT_TLV(tlv);
1708         const struct intel_ext_subevent *subevent = NULL;
1709         int i;
1710
1711         for (i = 0; intel_ext_subevent_table[i].length > 0; i++) {
1712                 if (intel_ext_subevent_table[i].subevent_id ==
1713                                                         tlv->subevent_id) {
1714                         subevent = &intel_ext_subevent_table[i];
1715                         break;
1716                 }
1717         }
1718
1719         if (!subevent) {
1720                 print_text(COLOR_UNKNOWN_EXT_EVENT,
1721                                 "Unknown extended subevent 0x%2.2x",
1722                                 tlv->subevent_id);
1723                 packet_hexdump(tlv->value, tlv->length);
1724                 return next_tlv;
1725         }
1726
1727         if (tlv->length != subevent->length) {
1728                 print_text(COLOR_ERROR, "Invalid length %d of subevent 0x%2.2x",
1729                                 tlv->length, tlv->subevent_id);
1730                 return NULL;
1731         }
1732
1733         if (next_tlv > last_tlv) {
1734                 print_text(COLOR_ERROR, "Subevent exceeds the buffer size.");
1735                 return NULL;
1736         }
1737
1738         subevent->func(tlv);
1739
1740         return next_tlv;
1741 }
1742
1743 static void intel_vendor_ext_evt(uint16_t index, const void *data, uint8_t size)
1744 {
1745         /* The data pointer points to a number of tlv.*/
1746         const struct intel_tlv *tlv = data;
1747         const struct intel_tlv *last_tlv = data + size;
1748
1749         /* Process every tlv subevent until reaching last_tlv.
1750          * The decoding process terminates normally when tlv == last_tlv.
1751          */
1752         while (tlv && tlv < last_tlv)
1753                 tlv = process_ext_subevent(tlv, last_tlv);
1754
1755         /* If an error occurs in decoding the subevents, hexdump the packet. */
1756         if (!tlv)
1757                 packet_hexdump(data, size);
1758 }
1759
1760 /* Vendor extended events with a vendor prefix. */
1761 static const struct vendor_evt vendor_prefix_evt_table[] = {
1762         { 0x03, "Extended Telemetry", intel_vendor_ext_evt },
1763         { }
1764 };
1765
1766 const uint8_t intel_vendor_prefix[] = {0x87, 0x80};
1767 #define INTEL_VENDOR_PREFIX_SIZE sizeof(intel_vendor_prefix)
1768
1769 /*
1770  * The vendor event with Intel vendor prefix.
1771  * Its format looks like
1772  *   0xff <length> <vendor_prefix> <subopcode> <data>
1773  *   where Intel's <vendor_prefix> is 0x8780.
1774  *
1775  *   When <subopcode> == 0x03, it is a telemetry event; and
1776  *   <data> is a number of tlv data.
1777  */
1778 struct vendor_prefix_evt {
1779         uint8_t prefix_data[INTEL_VENDOR_PREFIX_SIZE];
1780         uint8_t subopcode;
1781 };
1782
1783 static const struct vendor_evt *intel_vendor_prefix_evt(const void *data,
1784                                                         int *consumed_size)
1785 {
1786         unsigned int i;
1787         const struct vendor_prefix_evt *vnd = data;
1788         char prefix_string[INTEL_VENDOR_PREFIX_SIZE * 2 + 1] = { 0 };
1789
1790         /* Check if the vendor prefix matches. */
1791         for (i = 0; i < INTEL_VENDOR_PREFIX_SIZE; i++) {
1792                 if (vnd->prefix_data[i] != intel_vendor_prefix[i])
1793                         return NULL;
1794                 sprintf(prefix_string + i * 2, "%02x", vnd->prefix_data[i]);
1795         }
1796         print_field("Vendor Prefix (0x%s)", prefix_string);
1797
1798         /*
1799          * Handle the vendor event with a vendor prefix.
1800          *   0xff <length> <vendor_prefix> <subopcode> <data>
1801          * This loop checks whether the <subopcode> exists in the
1802          * vendor_prefix_evt_table.
1803          */
1804         for (i = 0; vendor_prefix_evt_table[i].str; i++) {
1805                 if (vendor_prefix_evt_table[i].evt == vnd->subopcode) {
1806                         *consumed_size = sizeof(struct vendor_prefix_evt);
1807                         return &vendor_prefix_evt_table[i];
1808                 }
1809         }
1810
1811         return NULL;
1812 }
1813
1814 const struct vendor_evt *intel_vendor_evt(const void *data, int *consumed_size)
1815 {
1816         uint8_t evt = *((const uint8_t *) data);
1817         int i;
1818
1819         /*
1820          * Handle the vendor event without a vendor prefix.
1821          *   0xff <length> <evt> <data>
1822          * This loop checks whether the <evt> exists in the vendor_evt_table.
1823          */
1824         for (i = 0; vendor_evt_table[i].str; i++) {
1825                 if (vendor_evt_table[i].evt == evt)
1826                         return &vendor_evt_table[i];
1827         }
1828
1829         /*
1830          * It is not a regular event. Check whether it is a vendor extended
1831          * event that comes with a vendor prefix followed by a subopcode.
1832          */
1833         return intel_vendor_prefix_evt(data, consumed_size);
1834 }