tools/bcmtool_4343w.c

   1 /*****************************************************************************
   2 **
   3 **  Name:          bcmtool.c
   4 **
   5 **  Description:   Download a patchram files for the HCD format
   6 **
   7 **  Copyright (c) 2000-2009, Broadcom Corp., All Rights Reserved.
   8 ******************************************************************************/
   9
  10 #include <stdio.h>
  11 #include <errno.h>
  12 #include <sys/types.h>
  13 #include <sys/stat.h>
  14 #include <fcntl.h>
  15 #include <stdlib.h>
  16 #include <time.h>
  17 #include <string.h>
  18 #include <signal.h>
  19 #include <unistd.h>
  20 #include <sys/termios.h>
  21 #include <sys/ioctl.h>
  22 #include <limits.h>
  23
  24 #define N_HCI   15
  25 #define HCI_UART_H4             0
  26 #define HCI_UART_BCSP   1
  27 #define HCI_UART_3WIRE  2
  28 #define HCI_UART_H4DS   3
  29 #define HCI_UART_LL             4
  30 #define HCIUARTSETPROTO         _IOW('U', 200, int)
  31 #define HCIUARTGETPROTO         _IOR('U', 201, int)
  32 #define HCIUARTGETDEVICE        _IOR('U', 202, int)
  33
  34 /* BT_WAKE Polarity - 0=Active Low, 1= Active High */
  35 #define HCILP_BT_WAKE_POLARITY        1
  36
  37 /* HOST_WAKE Polarity - 0=Active Low, 1= Active High */
  38 #define HCILP_HOST_WAKE_POLARITY      1
  39
  40 /* Local Feature */
  41 #define BCM_DISABLE_RF_PWRCTRL        FALSE
  42
  43 #define RELEASE_DATE "2011.02.07"
  44 #define DEBUG 1
  45
  46 typedef unsigned char UINT8;
  47 typedef unsigned short UINT16;
  48 typedef unsigned long UINT32;
  49 typedef signed long INT32;
  50 typedef signed char INT8;
  51 typedef signed short INT16;
  52 typedef unsigned char BOOLEAN;
  53
  54 #define FALSE    0
  55 #define TRUE     (!FALSE)
  56
  57 #define BD_ADDR_LEN     6       /* Device address length */
  58 typedef UINT8 BD_ADDR[BD_ADDR_LEN];     /* Device address */
  59
  60 #define HCI_GRP_LINK_CONTROL_CMDS                 (0x01 << 10)
  61 #define HCI_GRP_LINK_POLICY_CMDS                  (0x02 << 10)
  62 #define HCI_GRP_HOST_CONT_BASEBAND_CMDS           (0x03 << 10)
  63 #define HCI_GRP_INFORMATIONAL_PARAMS              (0x04 << 10)
  64 #define HCI_GRP_STATUS_PARAMS                     (0x05 << 10)
  65 #define HCI_GRP_TESTING_CMDS                      (0x06 << 10)
  66 #define HCI_GRP_L2CAP_CMDS                        (0x07 << 10)
  67 #define HCI_GRP_L2CAP_HCI_EVTS                    (0x08 << 10)
  68 #define HCI_GRP_VENDOR_SPECIFIC                   (0x3F << 10)
  69
  70 #define HCI_RESET                                 (0x0003 | HCI_GRP_HOST_CONT_BASEBAND_CMDS)
  71 #define HCI_SET_EVENT_FILTER                      (0x0005 | HCI_GRP_HOST_CONT_BASEBAND_CMDS)
  72 #define HCI_READ_LOCAL_NAME                       (0x0014 | HCI_GRP_HOST_CONT_BASEBAND_CMDS)
  73 #define HCI_READ_SCAN_ENABLE                      (0x0019 | HCI_GRP_HOST_CONT_BASEBAND_CMDS)
  74 #define HCI_WRITE_SCAN_ENABLE                     (0x001A | HCI_GRP_HOST_CONT_BASEBAND_CMDS)
  75
  76 #define HCI_READ_LOCAL_VERSION_INFO               (0x0001 | HCI_GRP_INFORMATIONAL_PARAMS)
  77 #define HCI_READ_LOCAL_FEATURES                   (0x0003 | HCI_GRP_INFORMATIONAL_PARAMS)
  78
  79 #define HCI_ENABLE_DEV_UNDER_TEST_MODE            (0x0003 | HCI_GRP_TESTING_CMDS)
  80
  81 #define HCI_BRCM_SUPER_PEEK_POKE                  (0x000A | HCI_GRP_VENDOR_SPECIFIC)
  82 #define VSC_WRITE_BD_ADDR                         (0x0001 | HCI_GRP_VENDOR_SPECIFIC)
  83 #define VSC_HCI_CMD_SET_LOC_FEATURES_CMD          (0x000B | HCI_GRP_VENDOR_SPECIFIC)
  84 #define HCI_BRCM_UPDATE_BAUDRATE_CMD              (0x0018 | HCI_GRP_VENDOR_SPECIFIC)
  85 #define HCI_BRCM_WRITE_SCO_PCM_INT_PARAM          (0x001C | HCI_GRP_VENDOR_SPECIFIC)
  86 #define VSC_WRITE_PCM_DATA_FORMAT_PARAM           (0x001E | HCI_GRP_VENDOR_SPECIFIC)
  87 #define HCI_BRCM_WRITE_SLEEP_MODE                 (0x0027 | HCI_GRP_VENDOR_SPECIFIC)
  88 #define HCI_BRCM_DOWNLOAD_MINI_DRV                (0x002E | HCI_GRP_VENDOR_SPECIFIC)
  89 #define VSC_WRITE_UART_CLOCK_SETTING              (0x0045 | HCI_GRP_VENDOR_SPECIFIC)
  90 #define HCI_VSC_WRITE_RAM                         (0x004C | HCI_GRP_VENDOR_SPECIFIC)
  91 #define HCI_VSC_LAUNCH_RAM                        (0x004E | HCI_GRP_VENDOR_SPECIFIC)
  92
  93 #define VOICE_SETTING_MU_LAW_MD                   0x0100
  94 #define VOICE_SETTING_LINEAR_MD                   0x0060
  95
  96 #define HCI_ARM_MEM_PEEK                          0x04
  97 #define HCI_ARM_MEM_POKE                          0x05
  98
  99 #define BTUI_MAX_STRING_LENGTH_PER_LINE           255
 100 #define HCI_BRCM_WRITE_SLEEP_MODE_LENGTH          12
 101
 102 #define HCI_BRCM_UPDATE_BAUD_RATE_ENCODED_LENGTH    0x02
 103 #define HCI_BRCM_UPDATE_BAUD_RATE_UNENCODED_LENGTH  0x06
 104
 105 #define VSC_WRITE_UART_CLOCK_SETTING_LEN          1
 106
 107 /* print string with time stamp */
 108 #define TDEBUG0(m)                               if(debug_mode) {print_time();fprintf(stderr,m);}
 109 #define TDEBUG1(m,n1)                            if(debug_mode) {print_time();fprintf(stderr,m,n1);}
 110 #define TDEBUG2(m,n1,n2)                         if(debug_mode) {print_time();fprintf(stderr,m,n1,n2);}
 111 #define TDEBUG3(m,n1,n2,n3)                      if(debug_mode) {print_time();fprintf(stderr,m,n1,n2,n3);}
 112 #define TDEBUG4(m,n1,n2,n3,n4)                   if(debug_mode) {print_time();fprintf(stderr,m,n1,n2,n3,n4);}
 113 #define TDEBUG5(m,n1,n2,n3,n4,n5)                if(debug_mode) {print_time();fprintf(stderr,m,n1,n2,n3,n4,n5);}
 114 #define TDEBUG6(m,n1,n2,n3,n4,n5,n6)             if(debug_mode) {print_time();fprintf(stderr,m,n1,n2,n3,n4,n5,n6);}
 115
 116 /* print just string */
 117 #define DEBUG0(m)                               if(debug_mode) {fprintf(stderr,m);}
 118 #define DEBUG1(m,n1)                            if(debug_mode) {fprintf(stderr,m,n1);}
 119 #define DEBUG2(m,n1,n2)                         if(debug_mode) {fprintf(stderr,m,n1,n2);}
 120 #define DEBUG3(m,n1,n2,n3)                      if(debug_mode) {fprintf(stderr,m,n1,n2,n3);}
 121 #define DEBUG4(m,n1,n2,n3,n4)                   if(debug_mode) {fprintf(stderr,m,n1,n2,n3,n4);}
 122 #define DEBUG5(m,n1,n2,n3,n4,n5)                if(debug_mode) {fprintf(stderr,m,n1,n2,n3,n4,n5);}
 123 #define DEBUG6(m,n1,n2,n3,n4,n5,n6)             if(debug_mode) {fprintf(stderr,m,n1,n2,n3,n4,n5,n6);}
 124
 125 #define STREAM_TO_UINT8(u8, p)   {u8 = (UINT8)(*(p)); (p) += 1;}
 126 #define STREAM_TO_UINT16(u16, p) {u16 = ((UINT16)(*(p)) + (((UINT16)(*((p) + 1))) << 8)); (p) += 2;}
 127 #define STREAM_TO_UINT32(u32, p) {u32 = (((UINT32)(*(p))) + ((((UINT32)(*((p) + 1)))) << 8) + ((((UINT32)(*((p) + 2)))) << 16) + ((((UINT32)(*((p) + 3)))) << 24)); (p) += 4;}
 128
 129 #define ROTATE_BD_ADDR(p1, p2)    \
 130                                                                         do                 \
 131                                                                         {                                                       \
 132                                                                                 p1[0] = p2[5];          \
 133                                                                                 p1[1] = p2[4];          \
 134                                                                                 p1[2] = p2[3];          \
 135                                                                                 p1[3] = p2[2];          \
 136                                                                                 p1[4] = p2[1];          \
 137                                                                                 p1[5] = p2[0];          \
 138                                                                         } while (0)
 139
 140 UINT8 vsc_for_pcm_config[5] = { 0x00, 0x00, 0x03, 0x03, 0x00 };
 141
 142 /*
 143                     Byte1 -- 0 for MSb first
 144                     Byte2 -- 0 Fill value
 145                     Byte3 -- 1 Fill option (0:0's, 1:1's , 2:Signed, 3:Programmable)
 146                     Byte4 -- 1 Number of fill bits
 147                     Byte5 -- 1 Right justified (0 for left justified)
 148 */
 149
 150 UINT8 vsc_for_sco_pcm[5] = { 0x00, 0x01, 0x00, 0x01, 0x01 };
 151
 152 /*
 153                     Neverland : PCM, 256, short, master ,master
 154                     Volance   : PCM, 256, short, master ,master
 155
 156                     Byte1 -- 0 for PCM 1 for UART or USB
 157                     Byte2 -- 0 : 128, 1: 256, 2:512, 3:1024, 4:2048 Khz
 158                     Byte3 -- 0 for short frame sync 1 for long frame sync
 159                     Byte4 -- 0 Clock direction 0 for same as sync 1 for opposite direction
 160                     Byte5 -- 0 for slave 1 for master
 161 */
 162
 163 int fd;                         /* HCI handle */
 164
 165 BOOLEAN debug_mode = FALSE;     /* Debug Mode Enable */
 166
 167 BOOLEAN use_two_stop_bits = FALSE;     /* Flag of two stop bits for tty */
 168
 169 BOOLEAN use_high_speed_download_mode = TRUE;     /* Flag of High Speed download mode */
 170
 171 unsigned char buffer[1024];
 172
 173 typedef enum {
 174         BCM_UNKNOWN = 0,
 175         BCM4330,
 176         BCM4334W,
 177         BCM4343W,
 178 } bcm_product_type;
 179
 180 bcm_product_type bcm_target_product = BCM_UNKNOWN;
 181
 182 static struct {
 183         bcm_product_type bcm_product;
 184         char *name;
 185 } bcm_product_table[] = {
 186         { BCM_UNKNOWN,  "UNKNOWN"},
 187         { BCM4330,      "BCM4330"},
 188         { BCM4334W,     "BCM4334W"},
 189         { BCM4343W,     "BCM4343W"},
 190         { 0, NULL }
 191 };
 192
 193 struct termios termios;
 194
 195 void ChangeBaudRate(UINT32 baudrate);
 196
 197 void exit_err(UINT8 err)
 198 {
 199         if (use_high_speed_download_mode)
 200                 ChangeBaudRate(115200);
 201
 202         exit(err);
 203 }
 204
 205 void print_time(void)
 206 {
 207 #if 0
 208         struct timespec tp;
 209         int rs;
 210
 211         rs = clock_gettime(CLOCK_REALTIME, &tp);
 212         fprintf(stderr, "[%04d : %06d]\n", tp.tv_sec, tp.tv_nsec / 1000);
 213         return;
 214 #endif
 215 }
 216
 217 void dump(unsigned char *out, int len)
 218 {
 219         int i;
 220
 221         for (i = 0; i < len; i++) {
 222                 if (!(i % 16)) {
 223                         DEBUG0("\n");
 224                 }
 225                 DEBUG1("%02x ", out[i]);
 226         }
 227         DEBUG0("\n\n");
 228 }
 229
 230 UINT8 SendCommand(UINT16 opcode, UINT8 param_len, UINT8 * p_param_buf)
 231 {
 232         UINT8 pbuf[255] = { 0, };
 233         UINT8 i = 0;
 234
 235         pbuf[0] = 0x1;
 236         pbuf[1] = (UINT8) (opcode);
 237         pbuf[2] = (UINT8) (opcode >> 8);
 238         pbuf[3] = param_len;
 239
 240         for (i = 0; i < param_len; i++) {
 241                 pbuf[i + 4] = *p_param_buf++;
 242         }
 243
 244         DEBUG1("Send %d", param_len + 4);
 245
 246         dump(pbuf, param_len + 4);
 247
 248         write(fd, pbuf, param_len + 4);
 249         return 0;
 250 }
 251
 252 void expired(int sig)
 253 {
 254         static UINT8 count = 0;
 255         DEBUG0("expired try again\n");
 256         SendCommand(HCI_RESET, 0, NULL);
 257         alarm(1);
 258         count++;
 259
 260         if (count > 3) {
 261                 fprintf(stderr, "[ERR] HCI reset time expired\n");
 262                 exit(1);
 263         }
 264 }
 265
 266 void read_event(int fd, unsigned char *buffer)
 267 {
 268         int i = 0;
 269         int len = 3;
 270         int count;
 271
 272         while ((count = read(fd, &buffer[i], len)) < len) {
 273                 i += count;
 274                 len -= count;
 275         }
 276
 277         i += count;
 278         len = buffer[2];
 279
 280         while ((count = read(fd, &buffer[i], len)) < len) {
 281                 i += count;
 282                 len -= count;
 283         }
 284
 285 #ifdef DEBUG
 286         count += i;
 287
 288         DEBUG1("\nreceived %d", count);
 289         dump(buffer, count);
 290 #endif
 291 }
 292
 293 INT32 filesize(char *name)
 294 {
 295         INT32 size;
 296         int flag;
 297         struct stat buf;
 298
 299         flag = stat(name, &buf);
 300         if (flag == -1)
 301                 return -1;
 302
 303         size = buf.st_size;
 304         return (size);
 305 }
 306
 307 void DisplayProgress(int total, int val)
 308 {
 309 #if 0
 310 #define PROGRESS_NUM 20
 311
 312         int p;
 313         int i;
 314         char text[PROGRESS_NUM + 2] = { 0, };
 315
 316         text[0] = '[';
 317         text[PROGRESS_NUM + 1] = ']';
 318         p = (val * PROGRESS_NUM) / total;
 319
 320         for (i = 1; i <= p; i++) {
 321                 text[i] = '=';
 322         }
 323
 324         for (i = p + 1; i <= PROGRESS_NUM; i++) {
 325                 text[i] = ' ';
 326         }
 327
 328         for (i = 0; i <= (PROGRESS_NUM + 1); i++) {
 329                 fprintf(stderr, "%c", text[i]);
 330         }
 331
 332         if (p >= PROGRESS_NUM)
 333                 fprintf(stderr, "  %6d/%6d\n", val, total);
 334         else
 335                 fprintf(stderr, "  %6d/%6d\r", val, total);
 336 #else
 337         if (val == total)
 338                 fprintf(stderr, " %6d/%6d\n", val, total);
 339         else
 340                 fprintf(stderr, " %6d/%6d\r", val, total);
 341 #endif
 342 }
 343
 344 UINT8 DownloadPatchram(char *patchram1)
 345 {
 346         UINT32 len;
 347         char prm[128] = { 0, };
 348         FILE *pFile = NULL;
 349
 350         INT32 FileSize = 0;
 351         INT32 SentSize = 0;
 352
 353         DEBUG1("\n%s\n", patchram1);
 354
 355         /* HCI reset */
 356         DEBUG0("HCI reset\n");
 357         SendCommand(HCI_RESET, 0, NULL);
 358         alarm(1);
 359         read_event(fd, buffer);
 360         alarm(0);
 361
 362         if (use_high_speed_download_mode)
 363                 ChangeBaudRate(3000000);
 364
 365         strcpy(prm, patchram1);
 366
 367         fprintf(stderr, "Download Start\n");
 368
 369         if ((pFile = fopen(prm, "r")) == NULL) {
 370                 fprintf(stderr, "file %s could not be opened, error %d\n", prm,
 371                         errno);
 372                 exit_err(1);
 373         }
 374         FileSize = filesize(prm);
 375
 376         SendCommand(HCI_BRCM_DOWNLOAD_MINI_DRV, 0, NULL);
 377         read_event(fd, buffer);
 378
 379         usleep(50000);
 380
 381         while (fread(&buffer[1], sizeof(UINT8), 3, pFile)) {
 382                 buffer[0] = 0x01;
 383
 384                 len = buffer[3];
 385
 386                 fread(&buffer[4], sizeof(UINT8), len, pFile);
 387
 388                 write(fd, buffer, len + 4);
 389
 390                 /* dispaly progress */
 391                 SentSize += (len + 3);
 392 #if 0
 393                 DisplayProgress(FileSize, SentSize);
 394 #endif
 395                 /* dispaly progress */
 396
 397                 read_event(fd, buffer);
 398
 399         }
 400         fclose(pFile);
 401
 402         if (bcm_target_product == BCM4343W) {
 403                 fprintf(stderr, "Delay 200ms for BCM4343W Wireless Charging Feature\n");
 404                 usleep(200000);         /*200ms delay */
 405         } else {
 406                 usleep(100000);         /*100ms delay */
 407         }
 408
 409         tcflush(fd, TCIOFLUSH);
 410         tcgetattr(fd, &termios);
 411         cfmakeraw(&termios);
 412         termios.c_cflag |= CRTSCTS;
 413
 414         if (use_two_stop_bits)
 415                 termios.c_cflag |= CSTOPB;
 416
 417         tcsetattr(fd, TCSANOW, &termios);
 418         tcflush(fd, TCIOFLUSH);
 419         tcsetattr(fd, TCSANOW, &termios);
 420         tcflush(fd, TCIOFLUSH);
 421         tcflush(fd, TCIOFLUSH);
 422         cfsetospeed(&termios, B115200);
 423         cfsetispeed(&termios, B115200);
 424         tcsetattr(fd, TCSANOW, &termios);
 425
 426         /* Send HCI_RESET Command and process event */
 427         DEBUG0("HCI reset\n");
 428         SendCommand(HCI_RESET, 0, NULL);
 429         alarm(1);
 430         read_event(fd, buffer);
 431         alarm(0);
 432         fprintf(stderr, "Download Complete\n");
 433
 434         return 0;
 435 }
 436
 437 void SetScanEnable(void)
 438 {
 439         UINT8 scan_data[1];
 440
 441         /* 0x00: No scan enabled                            */
 442         /* 0x01: Inquiry scan enabled  | Page scan disabled */
 443         /* 0x02: Inquiry scan disabled | Page scan enabled  */
 444         /* 0x03: Inquiry scan enabled  | Page scan enabled  */
 445
 446         scan_data[0] = 0x03;
 447         SendCommand(HCI_WRITE_SCAN_ENABLE, 1, &scan_data[0]);
 448         read_event(fd, buffer);
 449 }
 450
 451 /* This patch has been added to write PCM setting for Ponte */
 452 void SetAudio_for_PCM(void)
 453 {
 454         fprintf(stderr, "Write Audio parameter for PCM\n");
 455
 456         vsc_for_pcm_config[0] = 0x0;
 457         vsc_for_pcm_config[1] = 0x0;
 458         vsc_for_pcm_config[2] = 0x3; /* PCM format 16bit */
 459         vsc_for_pcm_config[3] = 0x0;
 460         vsc_for_pcm_config[4] = 0x0;
 461
 462         DEBUG5("vsc_for_pcm_config = {%d,%d,%d,%d,%d}\n", vsc_for_pcm_config[0],
 463                vsc_for_pcm_config[1], vsc_for_pcm_config[2],
 464                vsc_for_pcm_config[3], vsc_for_pcm_config[4]);
 465
 466         SendCommand(VSC_WRITE_PCM_DATA_FORMAT_PARAM, 5,
 467                     (UINT8 *) vsc_for_pcm_config);
 468         read_event(fd, buffer);
 469 }
 470
 471 void SetAudio(void)
 472 {
 473         fprintf(stderr, "Write Audio parameter\n");
 474
 475         DEBUG5("vsc_for_sco_pcm = {%d,%d,%d,%d,%d}\n", vsc_for_sco_pcm[0],
 476                vsc_for_sco_pcm[1], vsc_for_sco_pcm[2],
 477                vsc_for_sco_pcm[3], vsc_for_sco_pcm[4]);
 478
 479         SendCommand(HCI_BRCM_WRITE_SCO_PCM_INT_PARAM, 5,
 480                     (UINT8 *) vsc_for_sco_pcm);
 481         read_event(fd, buffer);
 482
 483         DEBUG5("vsc_for_pcm_config = {%d,%d,%d,%d,%d}\n", vsc_for_pcm_config[0],
 484                vsc_for_pcm_config[1], vsc_for_pcm_config[2],
 485                vsc_for_pcm_config[3], vsc_for_pcm_config[4]);
 486
 487         SendCommand(VSC_WRITE_PCM_DATA_FORMAT_PARAM, 5,
 488                     (UINT8 *) vsc_for_pcm_config);
 489         read_event(fd, buffer);
 490 }
 491
 492 void SetPcmConf(UINT8 p0, UINT8 p1, UINT8 p2, UINT8 p3, UINT8 p4)
 493 {
 494         vsc_for_pcm_config[0] = p0;
 495         vsc_for_pcm_config[1] = p1;
 496         vsc_for_pcm_config[2] = p2;
 497         vsc_for_pcm_config[3] = p3;
 498         vsc_for_pcm_config[4] = p4;
 499 }
 500
 501 void SetScoConf(UINT8 p0, UINT8 p1, UINT8 p2, UINT8 p3, UINT8 p4)
 502 {
 503         vsc_for_sco_pcm[0] = p0;
 504         vsc_for_sco_pcm[1] = p1;
 505         vsc_for_sco_pcm[2] = p2;
 506         vsc_for_sco_pcm[3] = p3;
 507         vsc_for_sco_pcm[4] = p4;
 508 }
 509
 510 void HCILP_Enable(BOOLEAN on)
 511 {
 512         /* Host Stack Idle Threshold */
 513         UINT8 hcilp_idle_threshold = 0x01;
 514
 515         /* Host Controller Idle Threshold */
 516         UINT8 hcilp_hc_idle_threshold = 0x01;
 517
 518         if (bcm_target_product == BCM4343W) {
 519                 hcilp_idle_threshold = 0x0A;
 520                 hcilp_hc_idle_threshold = 0x0A;
 521         }
 522
 523         fprintf(stderr, "Set Low Power mode %d for %s\n", on,
 524                                 bcm_product_table[bcm_target_product].name);
 525
 526         UINT8 data[HCI_BRCM_WRITE_SLEEP_MODE_LENGTH] = {
 527                 0x01,           /* Sleep Mode algorithm 1 */
 528                 hcilp_idle_threshold,   /* Host Idle Treshold */
 529                 hcilp_hc_idle_threshold,        /* Host Controller Idle Treshold*//* this should be less than scan interval. */
 530                 HCILP_BT_WAKE_POLARITY, /* BT_WAKE Polarity - 0=Active Low, 1= Active High */
 531                 HCILP_HOST_WAKE_POLARITY,       /* HOST_WAKE Polarity - 0=Active Low, 1= Active High */
 532                 0x01,           /* Allow host Sleep during SCO */
 533                 0x01,           /* Combine Sleep Mode and LPM - The device will not sleep in mode 0 if this flag is set to 1, */
 534                 0x00,           /* UART_TXD Tri-State : 0x00 = Do not tri-state UART_TXD in sleep mode */
 535                 0x00,           /* NA to Mode 1 */
 536                 0x00,           /* NA to Mode 1 */
 537                 0x00,           /* NA*/
 538                 0x00,           /* NA*/
 539         };
 540
 541         if (on) {
 542                 data[0] = 0x01;
 543         } else {
 544                 data[0] = 0x00;
 545         }
 546
 547         SendCommand(HCI_BRCM_WRITE_SLEEP_MODE, HCI_BRCM_WRITE_SLEEP_MODE_LENGTH,
 548                     (UINT8 *) data);
 549         read_event(fd, buffer);
 550 }
 551
 552 UINT32 uart_speed(UINT32 Speed)
 553 {
 554         switch (Speed) {
 555         case 115200:
 556                 return B115200;
 557         case 230400:
 558                 return B230400;
 559         case 460800:
 560                 return B460800;
 561         case 921600:
 562                 return B921600;
 563         case 1000000:
 564                 return B1000000;
 565         case 1500000:
 566                 return B1500000;
 567         case 2000000:
 568                 return B2000000;
 569         case 2500000:
 570                 return B2500000;
 571         case 3000000:
 572                 return B3000000;
 573         case 4000000:
 574                 return B4000000;
 575         default:
 576                 return B115200;
 577         }
 578 }
 579
 580 void ChangeBaudRate(UINT32 baudrate)
 581 {
 582         UINT8 hci_data[HCI_BRCM_UPDATE_BAUD_RATE_UNENCODED_LENGTH] =
 583             { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };
 584         UINT8 uart_clock_24 = 0x2;      /* 0x1 - UART Clock 48MHz, 0x2 - UART Clock 24MHz */
 585         UINT8 uart_clock_48 = 0x1;      /* 0x1 - UART Clock 48MHz, 0x2 - UART Clock 24MHz */
 586
 587         switch (baudrate) {
 588         case 115200:
 589         case 230400:
 590         case 460800:
 591         case 921600:
 592         case 1000000:
 593         case 1500000:
 594         case 2000000:
 595         case 2500000:
 596                 /* Write UART Clock setting of 24MHz */
 597                 DEBUG0("Change UART_CLOCK 24Mhz\n");
 598                 SendCommand(VSC_WRITE_UART_CLOCK_SETTING,
 599                             VSC_WRITE_UART_CLOCK_SETTING_LEN,
 600                             (UINT8 *) & uart_clock_24);
 601                 read_event(fd, buffer);
 602                 break;
 603
 604         case 3000000:
 605         case 4000000:
 606                 /* Write UART Clock setting of 48MHz */
 607                 DEBUG0("Change UART_CLOCK 48Mhz\n");
 608                 SendCommand(VSC_WRITE_UART_CLOCK_SETTING,
 609                             VSC_WRITE_UART_CLOCK_SETTING_LEN,
 610                             (UINT8 *) & uart_clock_48);
 611                 read_event(fd, buffer);
 612                 break;
 613
 614         default:
 615                 fprintf(stderr, "Not Support baudrate = %ld\n", baudrate);
 616                 exit_err(1);
 617                 break;
 618         }
 619
 620         hci_data[2] = baudrate & 0xFF;
 621         hci_data[3] = (baudrate >> 8) & 0xFF;
 622         hci_data[4] = (baudrate >> 16) & 0xFF;
 623         hci_data[5] = (baudrate >> 24) & 0xFF;
 624
 625         DEBUG1("Change Baudrate %ld\n", baudrate);
 626
 627         SendCommand(HCI_BRCM_UPDATE_BAUDRATE_CMD,
 628                     HCI_BRCM_UPDATE_BAUD_RATE_UNENCODED_LENGTH,
 629                     (UINT8 *) hci_data);
 630         read_event(fd, buffer);
 631
 632         tcflush(fd, TCIOFLUSH);
 633         tcgetattr(fd, &termios);
 634         cfmakeraw(&termios);
 635         termios.c_cflag |= CRTSCTS;
 636
 637         if (use_two_stop_bits)
 638                 termios.c_cflag |= CSTOPB;
 639
 640         tcsetattr(fd, TCSANOW, &termios);
 641         tcflush(fd, TCIOFLUSH);
 642         tcsetattr(fd, TCSANOW, &termios);
 643         tcflush(fd, TCIOFLUSH);
 644         tcflush(fd, TCIOFLUSH);
 645         cfsetospeed(&termios, uart_speed(baudrate));
 646         cfsetispeed(&termios, uart_speed(baudrate));
 647         tcsetattr(fd, TCSANOW, &termios);
 648
 649 }
 650
 651 void EnableTestMode(void)
 652 {
 653         UINT8 filter_data[] = { 0x02, 0x00, 0x02 };
 654
 655         /* bt sleep  disable */
 656         HCILP_Enable(FALSE);
 657
 658         /* Enable both Inquiry & Page Scans */
 659         SetScanEnable();
 660
 661         /* Set Event Filter: Enable Auto Connect */
 662         SendCommand(HCI_SET_EVENT_FILTER, 0x03, (UINT8 *) filter_data);
 663         read_event(fd, buffer);
 664
 665         /* Enable Device under test */
 666         SendCommand(HCI_ENABLE_DEV_UNDER_TEST_MODE, 0x0, NULL);
 667         read_event(fd, buffer);
 668
 669         fprintf(stderr, "Enable Device Under Test\n");
 670 }
 671
 672 void GetLocalName(void)
 673 {
 674         UINT8 *data = NULL;
 675
 676         /* HCI reset */
 677         DEBUG0("HCI reset\n");
 678         SendCommand(HCI_RESET, 0, NULL);
 679         alarm(1);
 680         read_event(fd, buffer);
 681         alarm(0);
 682
 683         DEBUG0("Read Local Name\n");
 684         SendCommand(HCI_READ_LOCAL_NAME, 0, NULL);
 685         read_event(fd, buffer);
 686
 687         data = &buffer[7];
 688
 689         fprintf(stderr, "Chip Name is %s\n", data);
 690 }
 691
 692 void SetLocalFeatures(void)
 693 {
 694         UINT8 *data = NULL;
 695
 696         DEBUG0("Read Local Feature\n");
 697         SendCommand(HCI_READ_LOCAL_FEATURES, 0, NULL);
 698         read_event(fd, buffer);
 699
 700         data = &buffer[7];
 701
 702 #if (BCM_DISABLE_RF_PWRCTRL == TRUE)
 703         fprintf(stderr, "Remove Power Control\n");
 704         data[2] &= 0xFB;        /* Power contrel */
 705 #endif
 706         DEBUG0("Write Local Feature\n");
 707         SendCommand(VSC_HCI_CMD_SET_LOC_FEATURES_CMD, 0x08, (UINT8 *) data);
 708         read_event(fd, buffer);
 709 }
 710
 711 void EnbleHCI(void)
 712 {
 713         int i = N_HCI;
 714         int proto = HCI_UART_H4;
 715
 716         if (ioctl(fd, TIOCSETD, &i) < 0) {
 717                 fprintf(stderr, "Can't set line discipline\n");
 718                 return;
 719         }
 720
 721         if (ioctl(fd, HCIUARTSETPROTO, proto) < 0) {
 722                 fprintf(stderr, "Can't set hci protocol\n");
 723                 return;
 724         }
 725         fprintf(stderr, "Done setting line discpline\n");
 726         return;
 727
 728 }
 729
 730 void SetBcmProductType(char *bcm_product_name)
 731 {
 732         int i = 0;
 733
 734         if (bcm_product_name == NULL) {
 735                 bcm_target_product = BCM_UNKNOWN;
 736                 return;
 737         }
 738
 739         for (i = 0; bcm_product_table[i].name != NULL; i++) {
 740                 if (!strcasecmp(bcm_product_table[i].name,bcm_product_name)) {
 741                         bcm_target_product = bcm_product_table[i].bcm_product;
 742                         fprintf(stderr, "Detected name is %s\n",
 743                                                 bcm_product_table[i].name);
 744                 }
 745         }
 746
 747         return;
 748 }
 749
 750 void print_usage(void)
 751 {
 752         fprintf(stderr, "\n");
 753         fprintf(stderr, "BRCM BT tool for Linux    release %s\n", RELEASE_DATE);
 754         fprintf(stderr, "\n");
 755         fprintf(stderr,
 756                 " Usage: bcmtool <tty Device> <command> [command parameter],....\n\n");
 757         fprintf(stderr,
 758                 "  -FILE    Patchram file name     EX) -FILE=BCM43xx_xxx.hcd\n");
 759         fprintf(stderr,
 760                 "  -BAUD    Set Baudrate           EX) -BAUD=3000000\n");
 761         fprintf(stderr,
 762                 "  -ADDR    BD addr file name      EX) -ADDR=.bdaddr\n");
 763         fprintf(stderr, "  -SCO     Enable SCO/PCM config  EX) -SCO\n");
 764         fprintf(stderr, "  -PCM_SETTING     Write PCM config EX) -PCM_SETTING\n");
 765         fprintf(stderr,
 766                 "  -SETSCO  SCO/PCM values verify  EX) -SETSCO=0,1,0,1,1,0,0,3,3,0\n");
 767         fprintf(stderr, "  -LP      Enable Low power       EX) -LP\n");
 768         fprintf(stderr, "  -FEATURE Set local Feature      EX) -FEATURE\n");
 769         fprintf(stderr, "  -GETNAME Get local Name         EX) -GETNAME\n");
 770         fprintf(stderr,
 771                 "  -DUT     Enable DUT mode(do not use with -LP) EX) -DUT\n");
 772         fprintf(stderr,
 773                 "  -ATTACH  Attach BT controller to BlueZ stack  EX) -ATTACH\n");
 774         fprintf(stderr, "  -DEBUG   Debug message          EX) -DEBUG\n");
 775         fprintf(stderr, "  -CSTOPB  Set two stop bits for tty EX) -CSTOPB\n");
 776         fprintf(stderr, "  -SLOWDOWN Set low speed download mode \n");
 777         fprintf(stderr, "       default is High speed mode EX) -SLOWDOWN\n");
 778         fprintf(stderr, "  -TYPE    BCM Product name       EX) -TYPE=BCM4343W\n");
 779
 780         fprintf(stderr, "\n");
 781 }
 782
 783 int main(int argc, char *argv[])
 784 {
 785         UINT8 i = 0;
 786
 787         if (argc < 2) {
 788                 print_usage();
 789                 exit(1);
 790         } else {
 791                 fprintf(stderr, "BRCM BT tool for Linux    release %s\n",
 792                         RELEASE_DATE);
 793         }
 794
 795         /* Open dev port */
 796         if ((fd = open(argv[1], O_RDWR | O_NOCTTY)) == -1) {
 797                 fprintf(stderr, "port %s could not be opened, error %d\n",
 798                         argv[1], errno);
 799                 exit(2);
 800         }
 801
 802         tcflush(fd, TCIOFLUSH);
 803         tcgetattr(fd, &termios);
 804         cfmakeraw(&termios);
 805         termios.c_cflag |= CRTSCTS;
 806
 807         if (use_two_stop_bits)
 808                 termios.c_cflag |= CSTOPB;
 809
 810         tcsetattr(fd, TCSANOW, &termios);
 811         tcflush(fd, TCIOFLUSH);
 812         tcsetattr(fd, TCSANOW, &termios);
 813         tcflush(fd, TCIOFLUSH);
 814         tcflush(fd, TCIOFLUSH);
 815         cfsetospeed(&termios, B115200);
 816         cfsetispeed(&termios, B115200);
 817         tcsetattr(fd, TCSANOW, &termios);
 818
 819         signal(SIGALRM, expired);
 820
 821         for (i = 2; i < argc; i++) {
 822                 char *ptr = argv[i];
 823
 824                 if (strstr(ptr, "-DEBUG")) {
 825                         debug_mode = TRUE;
 826                         DEBUG0("DEBUG On\n");
 827
 828                 } else if (strstr(ptr, "-CSTOPB")) {
 829                         use_two_stop_bits = TRUE;
 830                         DEBUG0("Use two stop bits for tty\n");
 831
 832                 } else if (strstr(ptr, "-SLOWDOWN")) {
 833                         use_high_speed_download_mode = FALSE;
 834                         DEBUG0("Disable High Speed Download mode\n");
 835
 836                 } else if (strstr(ptr, "-TYPE=")) {
 837                         char bcm_product_name[128];
 838                         ptr +=6;
 839
 840                         strncpy(bcm_product_name,ptr,8);
 841
 842                         SetBcmProductType(bcm_product_name);
 843                 }
 844         }
 845
 846         for (i = 2; i < argc; i++) {
 847                 char *ptr = argv[i];
 848
 849                 if (ptr == NULL)
 850                         continue;
 851
 852                 fprintf(stderr, "[%d] %s\n", i - 1, ptr);
 853
 854                 if (strstr(ptr, "-FILE=")) {
 855                         char prm_name[128];
 856
 857                         ptr += 6;
 858
 859                         strncpy(prm_name, ptr, 127);
 860                         DownloadPatchram(prm_name);
 861
 862                 } else if (strstr(ptr, "-BAUD=")) {
 863                         UINT32 baudrate;
 864
 865                         ptr += 6;
 866                         baudrate = atoi(ptr);
 867
 868                         ChangeBaudRate(baudrate);
 869                 } else if (strstr(ptr, "-ADDR=")) {
 870                         char *bdaddr_filename;
 871                         FILE *pFile = NULL;
 872
 873                         int bdaddr[10]; /* Displayed BD Address */
 874
 875                         BD_ADDR local_addr;     /* BD Address for write */
 876
 877 #if 0
 878                         ptr += 6;
 879                         if (sscanf
 880                             (ptr, "%02X:%02X:%02X:%02X:%02X:%02X", &bdaddr[0],
 881                              &bdaddr[1], &bdaddr[2], &bdaddr[3], &bdaddr[4],
 882                              &bdaddr[5]) != 6) {
 883                                 fprintf(stderr, "-ADDR: Parameter error");
 884                                 exit_err(1);
 885                         }
 886                         bte_write_bdaddr(bdaddr);
 887 #endif
 888                         ptr += 6;
 889                         bdaddr_filename = ptr;
 890
 891                         if (bdaddr_filename) {
 892                                 pFile = fopen(bdaddr_filename, "r");
 893                         }
 894
 895                         if (pFile) {
 896                                 char text[BTUI_MAX_STRING_LENGTH_PER_LINE];
 897
 898                                 fgets(text, BTUI_MAX_STRING_LENGTH_PER_LINE,
 899                                       pFile);
 900                                 sscanf(text, "%02x%02x", &bdaddr[0],
 901                                        &bdaddr[1]);
 902
 903                                 fgets(text, BTUI_MAX_STRING_LENGTH_PER_LINE,
 904                                       pFile);
 905                                 sscanf(text, "%02x", &bdaddr[2]);
 906
 907                                 fgets(text, BTUI_MAX_STRING_LENGTH_PER_LINE,
 908                                       pFile);
 909                                 sscanf(text, "%02x%02x%02x", &bdaddr[3],
 910                                        &bdaddr[4], &bdaddr[5]);
 911
 912                                 fprintf(stderr,
 913                                         "Writing B/D Address = %02X:%02X:%02X:%02X:%02X:%02X\n",
 914                                         bdaddr[0], bdaddr[1], bdaddr[2],
 915                                         bdaddr[3], bdaddr[4], bdaddr[5]);
 916
 917                                 ROTATE_BD_ADDR(local_addr, bdaddr);
 918
 919                                 SendCommand(VSC_WRITE_BD_ADDR, BD_ADDR_LEN,
 920                                             (UINT8 *) local_addr);
 921                                 read_event(fd, buffer);
 922                         } else {
 923                                 fprintf(stderr, "-ADDR: file open fail\n");
 924                                 exit_err(1);
 925                         }
 926                 } else if (strstr(ptr, "-PCM_SETTING")) {
 927                         SetAudio_for_PCM();
 928
 929                 } else if (strstr(ptr, "-SCO")) {
 930                         SetAudio();
 931
 932                 } else if (strstr(ptr, "-SETSCO=")) {
 933                         ptr += 8;
 934                         int value[10];
 935
 936                         if (sscanf
 937                             (ptr, "%d,%d,%d,%d,%d,%d,%d,%d,%d,%d", &value[0],
 938                              &value[1], &value[2], &value[3], &value[4],
 939                              &value[5], &value[6], &value[7], &value[8],
 940                              &value[9]) != 10) {
 941                                 DEBUG0("PCM / SCO configuration value err\n");
 942                                 DEBUG0
 943                                     ("SCO_Routing,PCM_Interface_Rate,Frame_Type,Sync_Mode,Clock_Mode,LSB_First,Fill_bits,Fill_Method,Fill_Num,Right_Justify\n");
 944                                 exit_err(1);
 945                         }
 946
 947                         SetScoConf(value[0], value[1], value[2], value[3],
 948                                    value[4]);
 949                         SetPcmConf(value[5], value[6], value[7], value[8],
 950                                    value[9]);
 951                         SetAudio();
 952                 } else if (strstr(ptr, "-LP")) {
 953                         HCILP_Enable(TRUE);
 954                 } else if (strstr(ptr, "-DUT")) {
 955                         EnableTestMode();
 956                 } else if (strstr(ptr, "-FEATURE")) {
 957                         SetLocalFeatures();
 958                 } else if (strstr(ptr, "-GETNAME")) {
 959                         GetLocalName();
 960                 } else if (strstr(ptr, "-ATTACH")) {
 961                         EnbleHCI();
 962                         while (1) {
 963                                 sleep(UINT_MAX);
 964                         }
 965                 } else if (strstr(ptr, "-DEBUG")) {
 966                 } else if (strstr(ptr, "-CSTOPB")) {
 967                 } else if (strstr(ptr, "-SLOWDOWN")) {
 968                 } else if (strstr(ptr, "-TYPE")) {
 969                 } else {
 970                         fprintf(stderr, "Invalid parameter(s)!\n");
 971                         exit_err(1);
 972                 }
 973         }
 974
 975         fprintf(stderr, "EXIT\n");
 976         close(fd);
 977         exit(0);
 978
 979         return 0;
 980 }