visus
/
teensy-usbhost
Watch 1
Star 0
Fork 0
Code Issues 0 Pull Requests 0 Releases 0 Wiki Activity
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
212 Commits
1 Branch
Tree: 080396e8ab
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '080396e8ab'
${ noResults }
teensy-usbhost/bluetooth.cpp

1279 lines
45KB
Raw Blame History 

  1. /* USB EHCI Host for Teensy 3.6

  2.  * Copyright 2017 Paul Stoffregen (paul@pjrc.com)

  3.  *

  4.  * Permission is hereby granted, free of charge, to any person obtaining a

  5.  * copy of this software and associated documentation files (the

  6.  * "Software"), to deal in the Software without restriction, including

  7.  * without limitation the rights to use, copy, modify, merge, publish,

  8.  * distribute, sublicense, and/or sell copies of the Software, and to

  9.  * permit persons to whom the Software is furnished to do so, subject to

  10.  * the following conditions:

  11.  *

  12.  * The above copyright notice and this permission notice shall be included

  13.  * in all copies or substantial portions of the Software.

  14.  *

  15.  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS

  16.  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF

  17.  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.

  18.  * IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY

  19.  * CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,

  20.  * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE

  21.  * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

  22.  *

  23.  * information about the BlueTooth HCI comes from logic analyzer captures

  24.  * plus... http://affon.narod.ru/BT/bluetooth_app_c10.pdf

  25.  */

  26. 

  27. #include <Arduino.h>

  28. #include "USBHost_t36.h"  // Read this header first for key info

  29. 

  30. #define print   USBHost::print_

  31. #define println USBHost::println_

  32. 

  33. //#define DEBUG_BT

  34. //#define DEBUG_BT_VERBOSE

  35. 

  36. #ifndef DEBUG_BT

  37. #undef DEBUG_BT_VERBOSE

  38. void DBGPrintf(...) {};

  39. #else

  40. #define DBGPrintf Serial.printf

  41. #endif

  42. 

  43. #ifndef DEBUG_BT_VERBOSE

  44. void VDBGPrintf(...) {};

  45. #else

  46. #define VDBGPrintf Serial.printf

  47. #endif

  48. 

  49. 

  50. /************************************************************/

  51. //  Define HCI Commands OGF HIgh byte OCF is low byte... 

  52. //     Actually shifted values...

  53. /************************************************************/

  54. #define HCI_INQUIRY 						0x0401

  55. #define HCI_INQUIRY_CANCEL					0x0402

  56. #define HCI_CREATE_CONNECTION				0x0405

  57. #define HCI_OP_ACCEPT_CONN_REQ				0x0409

  58. #define HCI_LINK_KEY_NEG_REPLY				0x040C

  59. #define HCI_PIN_CODE_REPLY					0x040D

  60. #define HCI_AUTH_REQUESTED					0x0411

  61. #define HCI_OP_REMOTE_NAME_REQ				0x0419

  62. #define HCI_OP_REMOTE_NAME_REQ_CANCEL		0x041a

  63. #define HCI_OP_READ_REMOTE_FEATURES			0x041b

  64. #define HCI_OP_READ_REMOTE_VERSION_INFORMATION 0x041D

  65. 

  66. 

  67. #define HCI_Write_Default_Link_Policy_Settings	0x080f

  68. #define HCI_Set_Event_Mask					0x0c01

  69. #define HCI_RESET 							0x0c03

  70. #define HCI_Set_Event_Filter_Clear			0x0c05

  71. #define HCI_Read_Local_Name					0x0c14

  72. #define HCI_Read_Stored_Link_Key			0x0c0d

  73. #define HCI_DELETE_STORED_LINK_KEY			0x0c12

  74. #define HCI_WRITE_LOCAL_NAME				0x0c13

  75. #define Write_Connection_Accept_Timeout		0x0c16

  76. #define HCI_WRITE_SCAN_ENABLE				0x0c1a

  77. #define HCI_Read_Page_Scan_Activity			0x0c1b

  78. #define HCI_READ_CLASS_OF_DEVICE			0x0c23

  79. #define HCI_WRITE_CLASS_OF_DEV				0x0C24

  80. #define HCI_Read_Voice_Setting				0x0c25

  81. #define HCI_Read_Number_Of_Supported_IAC	0x0c38

  82. #define HCI_Read_Current_IAC_LAP			0x0c39

  83. #define HCI_WRITE_INQUIRY_MODE				0x0c45

  84. #define HCI_Read_Page_Scan_Type				0x0c46

  85. #define HCI_WRITE_EIR						0x0c52

  86. #define HCI_WRITE_SSP_MODE					0x0c56

  87. #define HCI_Read_Inquiry_Response_Transmit_Power_Level 0x0c58

  88. #define HCI_WRITE_LE_HOST_SUPPORTED			0x0c6d

  89. 

  90. #define HCI_Read_Local_Supported_Features	0x1003

  91. #define HCI_Read_Local_Extended_Features	0x1004

  92. #define HCI_Read_Buffer_Size				0x1005

  93. #define HCI_Read_BD_ADDR					0x1009

  94. #define HCI_Read_Local_Version_Information	0x1001

  95. #define HCI_Read_Local_Supported_Commands	0x1002

  96. 

  97. #define HCI_LE_SET_EVENT_MASK				0x2001

  98. #define HCI_LE_Read_Buffer_Size				0x2002

  99. #define HCI_LE_Read_Local_supported_Features 0x2003

  100. #define HCI_LE_READ_ADV_TX_POWER			0x2007

  101. #define HCI_LE_SET_ADV_DATA					0x2008

  102. #define HCI_LE_SET_SCAN_RSP_DATA			0x2009

  103. #define HCI_LE_READ_WHITE_LIST_SIZE			0x200f

  104. #define HCI_LE_CLEAR_WHITE_LIST				0x2010

  105. #define HCI_LE_Supported_States				0x201c

  106. 

  107. /* Bluetooth L2CAP PSM - see http://www.bluetooth.org/Technical/AssignedNumbers/logical_link.htm */

  108. #define HID_CTRL_PSM    0x11 // HID_Control PSM Value

  109. #define HID_INTR_PSM    0x13 // HID_Interrupt PSM Value

  110. 

  111. // Used For Connection Response 

  112. #define PENDING     0x01

  113. #define SUCCESSFUL  0x00

  114. 

  115. 

  116. /* L2CAP signaling commands */

  117. #define L2CAP_CMD_COMMAND_REJECT        0x01

  118. #define L2CAP_CMD_CONNECTION_REQUEST    0x02

  119. #define L2CAP_CMD_CONNECTION_RESPONSE   0x03

  120. #define L2CAP_CMD_CONFIG_REQUEST        0x04

  121. #define L2CAP_CMD_CONFIG_RESPONSE       0x05

  122. #define L2CAP_CMD_DISCONNECT_REQUEST    0x06

  123. #define L2CAP_CMD_DISCONNECT_RESPONSE   0x07

  124. #define L2CAP_CMD_INFORMATION_REQUEST   0x0A

  125. #define L2CAP_CMD_INFORMATION_RESPONSE  0x0B

  126. 

  127. #define HID_THDR_DATA_INPUT				0xa1 

  128. // HID stuff

  129. #define HID_BOOT_PROTOCOL           	0x00

  130. #define HID_RPT_PROTOCOL                0x01

  131. 

  132. /* HCI Events  */

  133. 	enum {EV_INQUIRY_COMPLETE= 0x01,EV_INQUIRY_RESULT= 0x02,EV_CONNECT_COMPLETE= 0x03,EV_INCOMING_CONNECT= 0x04,EV_DISCONNECT_COMPLETE= 0x05

  134. 		,EV_AUTHENTICATION_COMPLETE= 0x06,EV_REMOTE_NAME_COMPLETE= 0x07,EV_ENCRYPTION_CHANGE= 0x08,EV_CHANGE_CONNECTION_LINK= 0x09,EV_ROLE_CHANGED= 0x12

  135. 		,EV_NUM_COMPLETE_PKT= 0x13,EV_PIN_CODE_REQUEST= 0x16,EV_LINK_KEY_REQUEST= 0x17,EV_LINK_KEY_NOTIFICATION= 0x18,EV_DATA_BUFFER_OVERFLOW= 0x1A

  136. 		,EV_MAX_SLOTS_CHANGE= 0x1B,EV_READ_REMOTE_VERSION_INFORMATION_COMPLETE= 0x0C,EV_QOS_SETUP_COMPLETE= 0x0D,EV_COMMAND_COMPLETE= 0x0E,EV_COMMAND_STATUS= 0x0F

  137. 		,EV_LOOPBACK_COMMAND= 0x19,EV_PAGE_SCAN_REP_MODE= 0x20 };

  138. 

  139. 

  140. 

  141. 

  142. // different modes

  143. enum {PC_RESET = 1, PC_WRITE_CLASS_DEVICE, PC_READ_BDADDR, PC_READ_LOCAL_VERSION, 

  144. 			PC_SEND_INQUIRE, PC_INQUIRE_CANCEL=100, PC_AUTHENTICATION_REQUESTED=110, PC_LINK_KEY_NEGATIVE=120, PC_PIN_CODE_REPLY=130,

  145. 			PC_WRITE_SCAN_PAGE=200};

  146. //////////////

  147. 

  148. //////////////

  149. 

  150. // Setup some states for the TX pipe where we need to chain messages

  151. enum {STATE_TX_SEND_CONNECT_INT=200, STATE_TX_SEND_CONECT_RSP_SUCCESS, STATE_TX_SEND_CONFIG_REQ};

  152. 

  153. // This is a list of all the drivers inherited from the BTHIDInput class.

  154. // Unlike the list of USBDriver (managed in enumeration.cpp), drivers stay

  155. // on this list even when they have claimed a top level collection.

  156. BTHIDInput * BluetoothController::available_bthid_drivers_list = NULL;

  157. 

  158. void BluetoothController::driver_ready_for_bluetooth(BTHIDInput *driver)

  159. {

  160. 	driver->next = NULL;

  161. 	if (available_bthid_drivers_list == NULL) {

  162. 		available_bthid_drivers_list = driver;

  163. 	} else {

  164. 		BTHIDInput *last = available_bthid_drivers_list;

  165. 		while (last->next) last = last->next;

  166. 		last->next = driver;

  167. 	}

  168. }

  169. 

  170. // When a new top level collection is found, this function asks drivers

  171. // if they wish to claim it.  The driver taking ownership of the

  172. // collection is returned, or NULL if no driver wants it.

  173. BTHIDInput * BluetoothController::find_driver(uint32_t device_type)

  174. {

  175. 	Serial.printf("BluetoothController::find_driver");

  176. 	BTHIDInput *driver = available_bthid_drivers_list;

  177. 	while (driver) {

  178. 		Serial.printf("  driver %x\n", (uint32_t)driver);

  179. 		if (driver->claim_bluetooth(this, device_type)) {

  180. 			Serial.printf("    *** Claimed ***\n");

  181. 			return driver;

  182. 		}

  183. 		driver = driver->next;

  184. 	}

  185. 	return NULL;

  186. }

  187. 

  188. 

  189. /************************************************************/

  190. //  Initialization and claiming of devices & interfaces

  191. /************************************************************/

  192. 

  193. void BluetoothController::init()

  194. {

  195. 	contribute_Pipes(mypipes, sizeof(mypipes)/sizeof(Pipe_t));

  196. 	contribute_Transfers(mytransfers, sizeof(mytransfers)/sizeof(Transfer_t));

  197. 	contribute_String_Buffers(mystring_bufs, sizeof(mystring_bufs)/sizeof(strbuf_t));

  198. 	driver_ready_for_device(this);

  199. }

  200. 

  201. bool BluetoothController::claim(Device_t *dev, int type, const uint8_t *descriptors, uint32_t len)

  202. {

  203. 	// only claim at device level 

  204. 	println("BluetoothController claim this=", (uint32_t)this, HEX);

  205. 

  206. 	// Lets try to support the main USB Bluetooth class...

  207. 	// http://www.usb.org/developers/defined_class/#BaseClassE0h

  208. 	if (dev->bDeviceClass != 0xe0) return false;	// not base class wireless controller

  209. 	if ((dev->bDeviceSubClass != 1) || (dev->bDeviceProtocol != 1)) return false; // Bluetooth Programming Interface

  210. 	if (type != 0) return false;

  211. 

  212. 	DBGPrintf("BluetoothController claim this=%x vid:pid=%x:%x\n    ", (uint32_t)this, dev->idVendor,  dev->idProduct);

  213. 	if (len > 512) {

  214. 		DBGPrintf("  Descriptor length %d only showing first 512\n    ");

  215. 		len = 512;

  216. 	}	

  217. 	for (uint16_t i=0; i < len; i++) {

  218. 		DBGPrintf("%x ", descriptors[i]);

  219. 		if ((i & 0x3f) == 0x3f) DBGPrintf("\n    ");

  220. 	}

  221. 	DBGPrintf("\n  ");

  222. 

  223. 	// Lets try to process the first Interface and get the end points...

  224. 	// Some common stuff for both XBoxs

  225. 	uint32_t count_end_points = descriptors[4];

  226. 	if (count_end_points < 2) return false;

  227. 	uint32_t rxep = 0;

  228. 	uint32_t rx2ep = 0;

  229. 	uint32_t txep = 0;

  230. 	uint8_t rx_interval = 0;

  231. 	uint8_t rx2_interval = 0;

  232. 	uint8_t tx_interval = 0;

  233. 	rx_size_ = 0;

  234. 	rx2_size_ = 0;

  235. 	tx_size_ = 0;

  236. 	uint32_t descriptor_index = 9; 

  237. 	while (count_end_points-- /*&& ((rxep == 0) || txep == 0) */) {

  238. 		if (descriptors[descriptor_index] != 7) return false; // length 7

  239. 		if (descriptors[descriptor_index+1] != 5) return false; // ep desc

  240. 		if ((descriptors[descriptor_index+4] <= 64)

  241. 			&& (descriptors[descriptor_index+5] == 0)) {

  242. 			// have a bulk EP size 

  243. 			if (descriptors[descriptor_index+2] & 0x80 ) {

  244. 				if (descriptors[descriptor_index+3] == 3) 	{ // Interrupt

  245. 					rxep = descriptors[descriptor_index+2];

  246. 					rx_size_ = descriptors[descriptor_index+4];

  247. 					rx_interval = descriptors[descriptor_index+6];

  248. 				} else if  (descriptors[descriptor_index+3] == 2) 	{ // bulk

  249. 					rx2ep = descriptors[descriptor_index+2];

  250. 					rx2_size_ = descriptors[descriptor_index+4];

  251. 					rx2_interval = descriptors[descriptor_index+6];

  252. 				}

  253. 			} else {

  254. 				txep = descriptors[descriptor_index+2]; 

  255. 				tx_size_ = descriptors[descriptor_index+4];

  256. 				tx_interval = descriptors[descriptor_index+6];

  257. 			}

  258. 		}

  259. 		descriptor_index += 7;  // setup to look at next one...

  260. 	}

  261. 	if ((rxep == 0) || (txep == 0)) {

  262. 		Serial.printf("Bluetooth end points not found: %d %d\n", rxep, txep);

  263. 				return false; // did not find two end points.

  264. 	}

  265. 	DBGPrintf("    rxep=%d(%d) txep=%d(%d) rx2ep=%d(%d)\n", rxep&15, rx_size_, txep, tx_size_, 

  266. 		rx2ep&15, rx2_size_);

  267. 

  268. 	print("BluetoothController, rxep=", rxep & 15);

  269. 	print("(", rx_size_);

  270. 	print("), txep=", txep);

  271. 	print("(", tx_size_);

  272. 	println(")");

  273. 	rxpipe_ = new_Pipe(dev, 3, rxep & 15, 1, rx_size_, rx_interval);

  274. 	if (!rxpipe_) return false;

  275. 	txpipe_ = new_Pipe(dev, 3, txep, 0, tx_size_, tx_interval);

  276. 	if (!txpipe_) {

  277. 		//free_Pipe(rxpipe_);

  278. 		return false;

  279. 	}

  280. 	rx2pipe_ = new_Pipe(dev, 2, rx2ep & 15, 1, rx2_size_, rx2_interval);

  281. 	if (!rx2pipe_)  {

  282. 		// Free other pipes...

  283. 		return false;

  284. 	}

  285. 

  286. 	rxpipe_->callback_function = rx_callback;

  287. 	queue_Data_Transfer(rxpipe_, rxbuf_, rx_size_, this);

  288. 

  289. 	rx2pipe_->callback_function = rx2_callback;

  290. 	queue_Data_Transfer(rx2pipe_, rx2buf_, rx2_size_, this);

  291. 

  292. 	txpipe_->callback_function = tx_callback;

  293. 

  294. 	// Send out the reset

  295. 	device = dev; // yes this is normally done on return from this but should not hurt if we do it here.

  296. 	sendResetHCI();

  297. 	pending_control_ = PC_RESET; 

  298. 

  299. 	return true;

  300. }

  301. 

  302. 

  303. void BluetoothController::disconnect()

  304. {

  305. 	Serial.printf("Bluetooth Disconnect");

  306. 	if (device_driver_) {

  307. 		device_driver_->release_bluetooth();

  308. 		device_driver_ = nullptr;

  309. 	}

  310. }

  311. 

  312. 

  313. 

  314. void BluetoothController::control(const Transfer_t *transfer)

  315. {

  316. 	println("    control callback (bluetooth) ", pending_control_, HEX);

  317. #ifdef DEBUG_BT_VERBOSE

  318. 	DBGPrintf("    Control callback (bluetooth): %d : ", pending_control_);

  319. 	uint8_t *buffer = (uint8_t*)transfer->buffer;

  320. 	for (uint8_t i=0; i < transfer->length; i++) DBGPrintf("%x ", buffer[i]);

  321. 	DBGPrintf("\n");

  322. #endif

  323. }

  324. 

  325. /************************************************************/

  326. //  Interrupt-based Data Movement

  327. /************************************************************/

  328. 

  329. void BluetoothController::rx_callback(const Transfer_t *transfer)

  330. {

  331. 	if (!transfer->driver) return;

  332. 	((BluetoothController *)(transfer->driver))->rx_data(transfer);

  333. }

  334. 

  335. void BluetoothController::rx2_callback(const Transfer_t *transfer)

  336. {

  337. 	if (!transfer->driver) return;

  338. 	((BluetoothController *)(transfer->driver))->rx2_data(transfer);

  339. }

  340. 

  341. void BluetoothController::tx_callback(const Transfer_t *transfer)

  342. {

  343. 	if (!transfer->driver) return;

  344. 	((BluetoothController *)(transfer->driver))->tx_data(transfer);

  345. }

  346. 

  347. 

  348. void BluetoothController::rx_data(const Transfer_t *transfer)

  349. {

  350. 	uint32_t len = transfer->length - ((transfer->qtd.token >> 16) & 0x7FFF);

  351. 	print_hexbytes((uint8_t*)transfer->buffer, len);

  352. 	DBGPrintf("BT rx_data(%d): ", len);

  353. 	uint8_t *buffer = (uint8_t*)transfer->buffer;

  354. 	for (uint8_t i=0; i < len; i++) DBGPrintf("%x ", buffer[i]);

  355. 	DBGPrintf("\n");

  356. 

  357. 	// Note the logical packets returned from the device may be larger

  358. 	// than can fit in one of our packets, so we will detect this and

  359. 	// the next read will be continue in or rx_buf_ in the next logical 

  360. 	// location.  We will only go into process the next logical state

  361. 	// when we have the full response read in... 

  362. 	if (rx_packet_data_remaining == 0) {	// Previous command was fully handled

  363. 		rx_packet_data_remaining = rxbuf_[1] + 2;	// length of data plus the two bytes at start...

  364. 	}		

  365.     // Now see if the data 

  366.     rx_packet_data_remaining -= len;	// remove the length of this packet from length

  367. 

  368. 	if (rx_packet_data_remaining == 0) {	// read started at beginning of packet so get the total length of packet

  369. 	    switch(rxbuf_[0]) { // Switch on event type

  370. 		    case EV_COMMAND_COMPLETE: //0x0e

  371. 	        	handle_hci_command_complete();// Check if command succeeded

  372. 	            break;

  373.             case EV_COMMAND_STATUS:	//0x0f

  374.             	handle_hci_command_status();

  375.             	break;

  376. 			case EV_INQUIRY_COMPLETE: // 0x01

  377. 				handle_hci_inquiry_complete();

  378. 				break;

  379. 			case EV_INQUIRY_RESULT:	  // 0x02

  380. 				handle_hci_inquiry_result();

  381. 				break;

  382. 			case EV_CONNECT_COMPLETE:	// 0x03

  383. 				handle_hci_connection_complete();

  384. 				break;

  385. 			case EV_INCOMING_CONNECT:	// 0x04

  386. 				handle_hci_incoming_connect();

  387. 				break;

  388. 			case EV_DISCONNECT_COMPLETE: // 0x05

  389. 				handle_hci_disconnect_complete();

  390. 				break;

  391. 			case EV_AUTHENTICATION_COMPLETE:// 0x06

  392. 				handle_hci_authentication_complete();

  393. 				break;

  394. 			case EV_REMOTE_NAME_COMPLETE: // 0x07

  395. 				handle_hci_remote_name_complete();

  396. 				break;	

  397. 			case EV_READ_REMOTE_VERSION_INFORMATION_COMPLETE:

  398. 				handle_hci_remote_version_information_complete();

  399. 				break;

  400. 			case EV_PIN_CODE_REQUEST: // 0x16

  401. 				handle_hci_pin_code_request();

  402. 				break;

  403. 

  404. 			case EV_LINK_KEY_REQUEST:	// 0x17

  405. 				handle_hci_link_key_request();

  406. 				break;

  407. 			case EV_LINK_KEY_NOTIFICATION: // 0x18

  408. 				handle_hci_link_key_notification();	

  409. 			default:

  410. 				break;

  411. 	    }

  412. 		// Start read at start of buffer. 

  413. 		queue_Data_Transfer(rxpipe_, rxbuf_, rx_size_, this);

  414. 	} else {

  415. 		// Continue the read - Todo - maybe verify len == rx_size_

  416. 		queue_Data_Transfer(rxpipe_, buffer + rx_size_, rx_size_, this);

  417. 		return;		// Don't process the message yet as we still have data to receive. 

  418. 	}

  419. }

  420. 

  421. //===================================================================

  422. // Called when an HCI command completes.

  423. void BluetoothController::handle_hci_command_complete() 

  424. {

  425. 	uint16_t hci_command = rxbuf_[3] + (rxbuf_[4] << 8);

  426. 	uint8_t buffer_index;

  427.     if(!rxbuf_[5]) { 

  428.     	VDBGPrintf("    Command Completed! \n");

  429.     } else {

  430.     	VDBGPrintf("    Command(%x) Completed - Error: %d! \n", hci_command, rxbuf_[5]);

  431.     	// BUGBUG:: probably need to queue something? 

  432.     }

  433. 

  434. 	switch (hci_command) {

  435. 		case HCI_OP_REMOTE_NAME_REQ:

  436. 			break;

  437. 		case HCI_RESET:	//0x0c03

  438. 			if (!rxbuf_[5]) pending_control_ = PC_WRITE_CLASS_DEVICE;

  439. 			//  If it fails, will retry. maybe should have repeat max...  

  440. 			break;

  441. 		case HCI_Set_Event_Filter_Clear:	//0x0c05

  442. 			break;

  443. 		case HCI_Read_Local_Name:	//0x0c14

  444. 			// received name back... 

  445. 			{

  446. 				//BUGBUG:: probably want to grab string object and copy to 

  447. 				Serial.printf("    Local name: %s\n", &rxbuf_[6]);

  448. /*

  449. 				uint8_t len = rxbuf_[1]+2;	// Length field +2 for total bytes read

  450. 				for (uint8_t i=6; i < len; i++) {

  451. 					if (rxbuf_[i] == 0) {

  452. 						break;

  453. 					}

  454. 					Serial.printf("%c", rxbuf_[i]);

  455. 				}

  456. 				Serial.printf("\n"); */

  457. 			}

  458. 			break;

  459. 		case Write_Connection_Accept_Timeout:	//0x0c16

  460. 			break;

  461. 		case HCI_READ_CLASS_OF_DEVICE:	// 0x0c23

  462. 			break;

  463. 		case HCI_Read_Voice_Setting: 	//0x0c25

  464. 			break;

  465. 		case HCI_Read_Number_Of_Supported_IAC:	//0x0c38

  466. 			break;

  467. 		case HCI_Read_Current_IAC_LAP:	//0x0c39

  468. 			break;

  469. 		case HCI_WRITE_INQUIRY_MODE:	//0x0c45

  470. 			break;

  471. 		case HCI_Read_Inquiry_Response_Transmit_Power_Level: //0x0c58

  472. 			break;

  473. 		case HCI_Read_Local_Supported_Features:	//0x1003

  474. 			// Remember the features supported by local... 

  475. 			for (buffer_index = 0; buffer_index < 8; buffer_index++) {

  476. 				features[buffer_index] = rxbuf_[buffer_index+6];

  477. 			}

  478. 			break;

  479. 		case HCI_Read_Buffer_Size:	// 0x1005

  480. 			break;

  481. 		case HCI_Read_BD_ADDR:	//0x1009

  482. 			{

  483. 	     		DBGPrintf("   BD Addr");

  484. 	            for(uint8_t i = 0; i < 6; i++) {

  485. 	            	my_bdaddr[i] = rxbuf_[6 + i];

  486. 	            	DBGPrintf(":%x", my_bdaddr[i]);

  487. 	            }

  488. 				DBGPrintf("\n");

  489. 			}

  490. 			break;

  491. 		case HCI_Read_Local_Version_Information:	//0x1001

  492. 			hciVersion = rxbuf_[6];		// Should do error checking above... 

  493. 			DBGPrintf("    Local Version: %x\n", hciVersion);

  494. 			pending_control_ = (do_pair_device_)? PC_SEND_INQUIRE : PC_WRITE_SCAN_PAGE;

  495. 			break;

  496. 		case HCI_Read_Local_Supported_Commands:	//0x1002

  497. 			break;

  498. 		case HCI_LE_Read_Buffer_Size:	//0x2002

  499. 			break;

  500. 		case HCI_LE_Read_Local_supported_Features:	//0x2003

  501. 			break;

  502. 		case HCI_LE_Supported_States:	//0x201c

  503. 			break;

  504. 

  505. 		case HCI_Read_Local_Extended_Features:	//0x1004

  506. 			break;

  507. 		case HCI_Set_Event_Mask:					//0x0c01

  508. 			break;

  509. 		case HCI_Read_Stored_Link_Key:			//0x0c0d

  510. 			break;

  511. 		case HCI_Write_Default_Link_Policy_Settings:	//0x080f

  512. 			break;

  513. 		case HCI_Read_Page_Scan_Activity:			//0x0c1b

  514. 			break;

  515. 		case HCI_Read_Page_Scan_Type:				//0x0c46

  516. 			break;

  517. 		case HCI_LE_SET_EVENT_MASK:				//0x2001

  518. 			break;

  519. 		case HCI_LE_READ_ADV_TX_POWER:			//0x2007

  520. 			break;

  521. 		case HCI_LE_READ_WHITE_LIST_SIZE:			//0x200f

  522. 			break;

  523. 		case HCI_LE_CLEAR_WHITE_LIST:				//0x2010

  524. 			break;

  525. 		case HCI_DELETE_STORED_LINK_KEY:			//0x0c12

  526. 			break;

  527. 		case HCI_WRITE_LOCAL_NAME:				//0x0c13

  528. 			break;

  529. 		case HCI_WRITE_SCAN_ENABLE:				//0x0c1a

  530. 			DBGPrintf("Write_Scan_enable Completed\n");

  531. 			if (device_connection_handle_) {

  532. 				// Lets see if we can get the remote information

  533. 				//sendHCIRemoteVersionInfoRequest();

  534. 			}

  535. 			break;

  536. 		case HCI_WRITE_SSP_MODE:					//0x0c56

  537. 			break;

  538. 		case HCI_WRITE_EIR:						//0x0c52

  539. 			break;

  540. 		case HCI_WRITE_LE_HOST_SUPPORTED:			//0x0c6d

  541. 			break;

  542. 		case HCI_LE_SET_SCAN_RSP_DATA:			//0x2009

  543. 			break;

  544. 	}

  545. 	// And queue up the next command

  546. 	queue_next_hci_command();

  547. }

  548. 

  549. void BluetoothController::queue_next_hci_command()

  550. {

  551. 	// Ok We completed a command now see if we need to queue another command

  552. 	// Still probably need to reorganize... 

  553.     switch (pending_control_) {

  554.     		// Initial setup states. 

  555.  		case PC_RESET: 

  556. 			sendResetHCI();

  557. 			break;

  558.     	case PC_WRITE_CLASS_DEVICE:

  559.     		sendHDCWriteClassOfDev();

  560.     		pending_control_++;

  561.     		break;

  562.      	case PC_READ_BDADDR:

  563. 			sendHCIReadBDAddr();

  564. 			pending_control_++;

  565. 			break;

  566. 

  567.      	case PC_READ_LOCAL_VERSION:

  568.      		sendHCIReadLocalVersionInfo();

  569. 			//pending_control_++;

  570. 			break;

  571. 

  572. 		// These are used when we are pairing. 	

  573. 		case PC_SEND_INQUIRE:

  574. 			sendHCI_INQUIRY();

  575. 			pending_control_++;

  576. 			break;

  577. 		case PC_INQUIRE_CANCEL:	

  578. 			// lets try to create a connection...

  579. 			sendHCICreateConnection();

  580. 			pending_control_++;

  581. 			break;

  582. 		case PC_AUTHENTICATION_REQUESTED:	

  583. 			break;

  584. 		case PC_LINK_KEY_NEGATIVE:

  585. 			break;

  586. 		case PC_PIN_CODE_REPLY:

  587. 			break;

  588. 

  589. 		// None Pair mode

  590. 		case PC_WRITE_SCAN_PAGE:

  591. 			sendHCIWriteScanEnable(2);

  592. 			pending_control_ = 0;	// 

  593. 			break;

  594. 		default:	

  595. 			break;

  596.     }

  597. 

  598. }

  599. 

  600. 

  601. void BluetoothController::handle_hci_command_status() 

  602. {

  603. 	// <event type><param count><status><num packets allowed to be sent><CMD><CMD>

  604. #ifdef DEBUG_BT

  605. 	uint16_t hci_command = rxbuf_[4] + (rxbuf_[5] << 8);

  606. 	if (rxbuf_[2]) {

  607. 		DBGPrintf("    Command %x Status %x - ", hci_command, rxbuf_[2]);

  608. 		switch (rxbuf_[2]) {

  609. 			case 0x01: DBGPrintf("Unknown HCI Command\n"); break;

  610. 			case 0x02: DBGPrintf("Unknown Connection Identifier\n"); break;

  611. 			case 0x03: DBGPrintf("Hardware Failure\n"); break;

  612. 			case 0x04: DBGPrintf("Page Timeout\n"); break;

  613. 			case 0x05: DBGPrintf("Authentication Failure\n"); break;

  614. 			case 0x06: DBGPrintf("PIN or Key Missing\n"); break;

  615. 			case 0x07: DBGPrintf("Memory Capacity Exceeded\n"); break;

  616. 			case 0x08: DBGPrintf("Connection Timeout\n"); break;

  617. 			case 0x09: DBGPrintf("Connection Limit Exceeded\n"); break;

  618. 			case 0x0A: DBGPrintf("Synchronous Connection Limit To A Device Exceeded\n"); break;

  619. 			case 0x0B: DBGPrintf("Connection Already Exists\n"); break;

  620. 			case 0x0C: DBGPrintf("Command Disallowed\n"); break;

  621. 			case 0x0D: DBGPrintf("Connection Rejected due to Limited Resources\n"); break;

  622. 			case 0x0E: DBGPrintf("Connection Rejected Due To Security Reasons\n"); break;

  623. 			case 0x0F: DBGPrintf("Connection Rejected due to Unacceptable BD_ADDR\n"); break;

  624. 			default: DBGPrintf("???\n"); break;

  625. 		}

  626. 	} else {

  627. 		VDBGPrintf("    Command %x Status %x\n", hci_command, rxbuf_[2]);

  628. 	}

  629. #endif

  630. }

  631. 

  632. void BluetoothController::handle_hci_inquiry_result() 

  633. {

  634. 	// 2 f 1 79 22 23 a c5 cc 1 2 0 40 25 0 3b 2 

  635. 	// Wondered if multiple items if all of the BDADDR are first then next field...

  636. 	// looks like it is that way...

  637. 	// Section 7.7.2

  638. 	DBGPrintf("    Inquiry Result - Count: %d\n", rxbuf_[2]);

  639. 	for (uint8_t i=0; i < rxbuf_[2]; i++) {

  640. 		uint8_t index_bd = 3 + (i*6);

  641. 		uint8_t index_ps = 3 + (6*rxbuf_[2]) + i;

  642. 		uint8_t index_class = 3 + (9*rxbuf_[2]) + i;

  643. 		uint8_t index_clock_offset = 3 + (12*rxbuf_[2]) + i;

  644. 		uint32_t bluetooth_class = rxbuf_[index_class] + ((uint32_t)rxbuf_[index_class+1] << 8) + ((uint32_t)rxbuf_[index_class+2] << 16);

  645. 		DBGPrintf("      BD:%x:%x:%x:%x:%x:%x, PS:%d, class: %x\n", 

  646. 			rxbuf_[index_bd],rxbuf_[index_bd+1],rxbuf_[index_bd+2],rxbuf_[index_bd+3],rxbuf_[index_bd+4],rxbuf_[index_bd+5],

  647. 			rxbuf_[index_ps], bluetooth_class);

  648. 		// See if we know the class 

  649. 		if ((bluetooth_class & 0xff00) == 0x2500) {

  650. 			DBGPrintf("      Peripheral device\n");

  651. 			if (bluetooth_class & 0x80) DBGPrintf("        Mouse\n");

  652. 			if (bluetooth_class & 0x40) DBGPrintf("        Keyboard\n"); 

  653. 			switch(bluetooth_class & 0x3c) {

  654. 				case 4: DBGPrintf("        Joystick\n"); break;

  655. 				case 8: DBGPrintf("        Gamepad\n"); break;

  656. 				case 0xc: DBGPrintf("        Remote Control\n"); break;

  657. 			}

  658. 

  659. 			// BUGBUG, lets hard code to go to new state...

  660. 			for (uint8_t i = 0; i < 6; i++) device_bdaddr_[i] = rxbuf_[index_bd+i];

  661. 			device_class_ = bluetooth_class;

  662. 			device_driver_ = find_driver(device_class_);

  663. 

  664.     		device_ps_repetion_mode_  = rxbuf_[index_ps]; // mode

  665.     		device_clock_offset_[0] = rxbuf_[index_clock_offset];

  666.     		device_clock_offset_[1] = rxbuf_[index_clock_offset+1];

  667. 

  668. 			// Now we need to bail from inquiry and setup to try to connect...

  669. 			sendHCIInquiryCancel();

  670. 			pending_control_ = PC_INQUIRE_CANCEL;

  671. 			break;

  672. 		}

  673. 	}

  674. }

  675. 

  676. void BluetoothController::handle_hci_inquiry_complete() {

  677. 	VDBGPrintf("    Inquiry Complete - status: %d\n", rxbuf_[2]);

  678. }

  679. 

  680. void BluetoothController::handle_hci_connection_complete() {

  681. 	//  0  1  2  3  4  5  6  7  8 9  10 11 12

  682. 	//       ST CH CH BD BD BD BD BD BD LT EN

  683. 	// 03 0b 04 00 00 40 25 00 58 4b 00 01 00 

  684. 	device_connection_handle_ = rxbuf_[3]+ (uint16_t)(rxbuf_[4]<<8);

  685. 	DBGPrintf("    Connection Complete - ST:%x LH:%x\n", rxbuf_[2], device_connection_handle_);

  686. 	if (do_pair_device_) {

  687. 		sendHCIAuthenticationRequested();

  688. 		pending_control_ = PC_AUTHENTICATION_REQUESTED;

  689. 	}

  690. }

  691. 

  692. void BluetoothController::handle_hci_incoming_connect() {

  693. 	//           BD    BD   BD    BD  BD   BD  CL    CL    CL  LT

  694. 	// 0x04 0x0A 0x79 0x22 0x23 0x0A 0xC5 0xCC 0x40 0x05 0x00 0x01

  695. 	uint32_t class_of_device  = rxbuf_[8] + (uint16_t)(rxbuf_[9]<<8) + (uint32_t)(rxbuf_[10]<<16);

  696. 	DBGPrintf("    Event: Incoming Connect -  %x:%x:%x:%x:%x:%x CL:%x LT:%x\n", 

  697. 		rxbuf_[2], rxbuf_[3], rxbuf_[4], rxbuf_[5], rxbuf_[6], rxbuf_[7], class_of_device, rxbuf_[11]);

  698. 	if (((class_of_device & 0xff00) == 0x2500) || ((class_of_device & 0xff00) == 0x500)) {

  699. 		DBGPrintf("      Peripheral device\n");

  700. 		if (class_of_device & 0x80) DBGPrintf("        Mouse\n");

  701. 		if (class_of_device & 0x40) DBGPrintf("        Keyboard\n"); 

  702. 		switch(class_of_device & 0x3c) {

  703. 			case 4: DBGPrintf("        Joystick\n"); break;

  704. 			case 8: DBGPrintf("        Gamepad\n"); break;

  705. 			case 0xc: DBGPrintf("        Remote Control\n"); break;

  706. 		}

  707. 		device_driver_ = find_driver(class_of_device);

  708. 

  709. 		// We need to save away the BDADDR and class link type?

  710. 		for(uint8_t i=0; i<6; i++) device_bdaddr_[i] = rxbuf_[i+2];

  711. 		device_class_ = class_of_device;	

  712. 		sendHCIRemoteNameRequest();

  713. 	}

  714. 

  715. //	sendHCIAuthenticationRequested();

  716. //	pending_control_ = PC_AUTHENTICATION_REQUESTED;

  717. }

  718. 

  719. 

  720. void BluetoothController::handle_hci_pin_code_request() {

  721. 	// 0x16 0x06 0x79 0x22 0x23 0x0A 0xC5 0xCC

  722. 	DBGPrintf("    Event: Pin Code Request %x:%x:%x:%x:%x:%x\n", 

  723. 		rxbuf_[2], rxbuf_[3], rxbuf_[4], rxbuf_[5], rxbuf_[6], rxbuf_[7]);

  724. 	sendHCIPinCodeReply();

  725. 	pending_control_ = PC_PIN_CODE_REPLY;

  726. }

  727. 

  728. void BluetoothController::handle_hci_link_key_request() {

  729. 	// 17 6 79 22 23 a c5 cc 

  730. 	DBGPrintf("    Event: Link Key Request %x:%x:%x:%x:%x:%x\n", 

  731. 		rxbuf_[2], rxbuf_[3], rxbuf_[4], rxbuf_[5], rxbuf_[6], rxbuf_[7]);

  732. 

  733. 	// Now here is where we need to decide to say we have key or tell them to 

  734. 	// cancel key...  right now hard code to cancel...

  735. 	sendHCILinkKeyNegativeReply();

  736. 	pending_control_ = PC_LINK_KEY_NEGATIVE;

  737. }

  738. 

  739. void BluetoothController::handle_hci_link_key_notification() {

  740. 	// 0   1  2  3  4 5  6  7  8  9 10  1  2  3  4  5  6  7  8  9 20  1  2  3 4

  741. 	// 18 17 79 22 23 a c5 cc 5e 98 d4 5e bb 15 66 da 67 fe 4f 87 2b 61 46 b4 0 

  742. 	DBGPrintf("    Event: Link Key Notificaton %x:%x:%x:%x:%x:%x Type:%x\n    key:", 

  743. 		rxbuf_[2], rxbuf_[3], rxbuf_[4], rxbuf_[5], rxbuf_[6], rxbuf_[7], rxbuf_[24]);

  744. 	for (uint8_t i = 8; i < 24; i++) DBGPrintf("%02x ", rxbuf_[i]);

  745. 	DBGPrintf("\n");

  746. 

  747. 	// Now here is where we need to decide to say we have key or tell them to 

  748. 	// cancel key...  right now hard code to cancel...

  749. 

  750. }

  751. 

  752. void BluetoothController::handle_hci_disconnect_complete()

  753. {

  754. 	//5 4 0 48 0 13

  755. 	DBGPrintf("    Event: HCI Disconnect complete(%d): handle: %x, reason:%x\n", rxbuf_[2], 

  756. 		rxbuf_[3]+(rxbuf_[4]<<8), rxbuf_[5]);

  757. 	if (device_driver_) {

  758. 		device_driver_->release_bluetooth();

  759. 		device_driver_ = nullptr;

  760. 	}

  761. 	// Probably should clear out connection data. 

  762. 	device_connection_handle_ = 0;

  763. 	device_class_ = 0;	

  764. 	memset(device_bdaddr_, 0, sizeof(device_bdaddr_));

  765. 	//... 

  766. }

  767. 

  768. void BluetoothController::handle_hci_authentication_complete()

  769. {

  770. 	//  6 3 13 48 0

  771. 	DBGPrintf("    Event: HCI Authentication complete(%d): handle: %x\n", rxbuf_[2], 

  772. 		rxbuf_[3]+(rxbuf_[4]<<8));

  773. 	// Start up lcap connection...

  774. 	connection_rxid_ = 0;

  775. 	sendl2cap_ConnectionRequest(device_connection_handle_, connection_rxid_, control_dcid_, HID_CTRL_PSM);

  776. }

  777. 

  778. void BluetoothController::handle_hci_remote_name_complete() {

  779. 	//           STAT bd   bd   bd   bd    bd  bd

  780. 	// 0x07 0xFF 0x00 0x79 0x22 0x23 0x0A 0xC5 0xCC 0x42 0x6C 0x75 0x65 0x74 0x6F 0x6F ...

  781. 	DBGPrintf("    Event: handle_hci_remote_name_complete(%d)\n", rxbuf_[2]);

  782. 	if (rxbuf_[2] == 0) {

  783. 		DBGPrintf("    Remote Name: ");

  784. 		for (uint8_t *psz = &rxbuf_[9]; *psz; psz++) DBGPrintf("%c", *psz);

  785. 		DBGPrintf("\n");

  786. 	}

  787. 	// Lets now try to accept the connection. 

  788. 	sendHCIAcceptConnectionRequest();

  789. }

  790. 

  791. void BluetoothController::handle_hci_remote_version_information_complete() {

  792. 	//           STAT bd   bd   bd   bd    bd  bd

  793. 	//c 8 0 48 0 5 45 0 0 0

  794. 	remote_ver_ = rxbuf_[6];

  795. 	remote_man_ = rxbuf_[7]+((uint16_t)rxbuf_[8]<< 8);

  796. 	remote_subv_ = rxbuf_[9];

  797. 	

  798. 	DBGPrintf("    Event: handle_hci_remote_version_information_complete(%d): ", rxbuf_[2]);

  799. 	DBGPrintf(" Handle: %x, Ver:%x, Man: %x, SV: %x\n", 

  800. 		rxbuf_[3]+((uint16_t)rxbuf_[4]<< 8), remote_ver_, remote_man_, remote_subv_);

  801. 	// Lets now try to accept the connection. 

  802. 	sendHCIAcceptConnectionRequest();

  803. }

  804. 

  805. void BluetoothController::rx2_data(const Transfer_t *transfer)

  806. {

  807. 	uint32_t len = transfer->length - ((transfer->qtd.token >> 16) & 0x7FFF);

  808. 	DBGPrintf("\n=====================\nBT rx2_data(%d): ", len);

  809. 	uint8_t *buffer = (uint8_t*)transfer->buffer;

  810. 	for (uint8_t i=0; i < len; i++) DBGPrintf("%x ", buffer[i]);

  811. 	DBGPrintf("\n");

  812. 

  813. 	// call backs.  See if this is an L2CAP reply. example

  814. 	//  HCI      | l2cap 

  815. 	//48 20 10 0 | c 0 1 0 | 3 0 8 0 44 0 70 0 0 0 0 0

  816. 	// BUGBUG need to do more verification, like the handle

  817. 	uint16_t hci_length = buffer[2] + ((uint16_t)buffer[3]<<8);

  818. 	uint16_t l2cap_length = buffer[4] + ((uint16_t)buffer[5]<<8);

  819. //	uint16_t rsp_packet_length = buffer[10] + ((uint16_t)buffer[11]<<8);

  820. 	if ((hci_length == (l2cap_length + 4)) /*&& (hci_length == (rsp_packet_length+8))*/) {

  821. 		// All the lengths appear to be correct...  need to do more...

  822. 		switch (buffer[8]) {

  823. 			case L2CAP_CMD_CONNECTION_REQUEST:

  824. 				process_l2cap_connection_request(&buffer[8]);

  825. 				break;

  826. 			case L2CAP_CMD_CONNECTION_RESPONSE:

  827. 				process_l2cap_connection_response(&buffer[8]);

  828. 				break;

  829. 			case L2CAP_CMD_CONFIG_REQUEST:

  830. 				process_l2cap_config_request(&buffer[8]);

  831. 				break;

  832. 			case L2CAP_CMD_CONFIG_RESPONSE:

  833. 				process_l2cap_config_response(&buffer[8]);

  834. 				break;

  835. 

  836. 			case HID_THDR_DATA_INPUT:

  837. 				handleHIDTHDRData(buffer);	// Pass the whole buffer...

  838. 				break;

  839. 			case L2CAP_CMD_COMMAND_REJECT:

  840. 				process_l2cap_command_reject(&buffer[8]);

  841. 				break;

  842. 			case L2CAP_CMD_DISCONNECT_REQUEST:

  843. 				process_l2cap_disconnect_request(&buffer[8]);

  844. 				break;

  845. 		}

  846. 	}

  847. 

  848. 

  849. 	

  850. 	

  851. 

  852. 	// Queue up for next read...

  853. 	queue_Data_Transfer(rx2pipe_, rx2buf_, rx2_size_, this);

  854. }

  855. 

  856. 

  857. void BluetoothController::sendHCICommand(uint16_t hciCommand, uint16_t cParams, const uint8_t* data)

  858. {

  859. 	txbuf_[0] = hciCommand & 0xff;

  860. 	txbuf_[1] = (hciCommand >> 8) & 0xff;

  861. 	txbuf_[2] = cParams;

  862. 	if (cParams) {

  863. 		memcpy(&txbuf_[3], data, cParams);	// copy in the commands parameters.

  864. 	}

  865. 	uint8_t nbytes = cParams+3;

  866. 	for (uint8_t i=0; i< nbytes; i++) DBGPrintf("%02x ", txbuf_[i]);

  867. 	DBGPrintf(")\n");

  868. 	mk_setup(setup, 0x20, 0x0, 0, 0, nbytes);

  869. 	queue_Control_Transfer(device, &setup, txbuf_, this);

  870. }

  871. 

  872. //---------------------------------------------

  873. void BluetoothController::sendHCI_INQUIRY() {

  874. 	// Start unlimited inqury, set timeout to max and 

  875. 	DBGPrintf("HCI_INQUIRY called (");

  876. 	static const uint8_t hci_inquiry_data[ ] = {

  877. 			0x33, 0x8B, 0x9E, 	// Bluetooth assigned number LAP 0x9E8B33 General/unlimited inquiry Access mode

  878. 			0x30, 0xa};			// Max inquiry time little over minute and up to 10 responses

  879. 	sendHCICommand(HCI_INQUIRY, sizeof(hci_inquiry_data), hci_inquiry_data);	

  880. }

  881. 

  882. //---------------------------------------------

  883. void BluetoothController::sendHCIInquiryCancel() {

  884. 	DBGPrintf("HCI_INQUIRY_CANCEL called (");

  885. 	sendHCICommand(HCI_INQUIRY_CANCEL, 0, nullptr);	

  886. }

  887. 

  888. //---------------------------------------------

  889. void BluetoothController::sendHCICreateConnection() {

  890. 	DBGPrintf("HCI_CREATE_CONNECTION called (");

  891. 	uint8_t connection_data[13];

  892. 	//  0    1    2    3    4    5    6    7    8   9    10   11   12

  893. 	// BD   BD   BD   BD   BD   BD   PT   PT  PRS   0    CS   CS   ARS

  894. 	//0x79 0x22 0x23 0x0A 0xC5 0xCC 0x18 0xCC 0x01 0x00 0x00 0x00 0x00

  895. 	//0x05 0x04 0x0D 0x79 0x22 0x23 0x0A 0xC5 0xCC 0x18 0xCC 0x01 0x00 0x00 0x00 0x00

  896. 	//  05   04   0d   40   25   00   c4   01   00   18   cc   01   00   00 00     00 

  897. 

  898. 	for (uint8_t i=0; i<6; i++) connection_data[i] = device_bdaddr_[i];

  899. 	connection_data[6] = 0x18; //DM1/DH1

  900. 	connection_data[7] = 0xcc; //

  901. 	connection_data[8] = device_ps_repetion_mode_;  // from device

  902. 	connection_data[9] = 0;	//

  903. 	connection_data[10] = 0;  // clock offset 

  904. 	connection_data[11] = 0;  // clock offset 

  905. 	connection_data[12] = 0;  // allow role swith no 

  906. 	sendHCICommand(HCI_CREATE_CONNECTION, sizeof(connection_data), connection_data);	

  907. }

  908. 

  909. //---------------------------------------------

  910. void BluetoothController::sendHCIAcceptConnectionRequest() {

  911. 	DBGPrintf("HCI_OP_ACCEPT_CONN_REQ called (");

  912. 	uint8_t connection_data[7];

  913. 

  914. 	//  0    1    2    3    4    5    6    7    8   9    10   11   12

  915. 	//  BD   BD   BD   BD   BD   BD  role 

  916. 	//0x79 0x22 0x23 0x0A 0xC5 0xCC 0x00

  917. 	for (uint8_t i=0; i<6; i++) connection_data[i] = device_bdaddr_[i];

  918. 	connection_data[6] = 0; // Role as master

  919. 	sendHCICommand(HCI_OP_ACCEPT_CONN_REQ, sizeof(connection_data), connection_data);	

  920. }

  921. 

  922. //---------------------------------------------

  923. void BluetoothController::sendHCIAuthenticationRequested() {

  924. 	DBGPrintf("HCI_AUTH_REQUESTED called (");

  925. 	uint8_t connection_data[2];

  926. 	connection_data[0] = device_connection_handle_ & 0xff;

  927. 	connection_data[1] = (device_connection_handle_>>8) & 0xff;

  928. 	sendHCICommand(HCI_AUTH_REQUESTED, sizeof(connection_data), connection_data);	

  929. }

  930. 

  931. //---------------------------------------------

  932. void BluetoothController::sendHCILinkKeyNegativeReply() {

  933. 	DBGPrintf("HCI_LINK_KEY_NEG_REPLY called (");

  934. 	uint8_t connection_data[6];

  935. 	for (uint8_t i=0; i<6; i++) connection_data[i] = device_bdaddr_[i];

  936. 	sendHCICommand(HCI_LINK_KEY_NEG_REPLY, sizeof(connection_data), connection_data);	

  937. }

  938. 

  939. //---------------------------------------------

  940. // BUGBUG:: hard code string for this pass.

  941. 

  942. void BluetoothController::sendHCIPinCodeReply() {

  943. 	// 0x0D 0x04 0x17 0x79 0x22 0x23 0x0A 0xC5 0xCC 0x04 0x30 0x30 0x30 0x30 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00

  944. 	DBGPrintf("HCI_PIN_CODE_REPLY called (");

  945. 	uint8_t connection_data[23];

  946. 	uint8_t i;

  947. 

  948. 	for (i=0; i<6; i++) connection_data[i] = device_bdaddr_[i];

  949. 

  950. 	for (i=0; pair_pincode_[i] !=0; i++) connection_data[7+i] = pair_pincode_[i];

  951. 	connection_data[6] = i; // remember the length	

  952. 	for (uint8_t i=7+connection_data[6]; i<23; i++) connection_data[i] = 0;

  953. 	sendHCICommand(HCI_PIN_CODE_REPLY, sizeof(connection_data), connection_data);	

  954. }

  955. 

  956. //---------------------------------------------

  957. void BluetoothController::sendResetHCI() {

  958. 	DBGPrintf("HCI_RESET called (");

  959. 	sendHCICommand(HCI_RESET, 0, nullptr);	

  960. }

  961. 

  962. void BluetoothController::sendHDCWriteClassOfDev() {

  963. 	// 0x24 0x0C 0x03 0x04 0x08 0x00

  964. 	const static uint8_t device_class_data[] = {BT_CLASS_DEVICE & 0xff, (BT_CLASS_DEVICE >> 8) & 0xff, (BT_CLASS_DEVICE >> 16) & 0xff};

  965. 	DBGPrintf("HCI_WRITE_CLASS_OF_DEV called (");

  966. 	sendHCICommand(HCI_WRITE_CLASS_OF_DEV, sizeof(device_class_data), device_class_data);	

  967. }

  968. 

  969. 

  970. 

  971. void BluetoothController::sendHCIReadBDAddr() {

  972. 	DBGPrintf("HCI_Read_BD_ADDR called (");

  973. 	sendHCICommand(HCI_Read_BD_ADDR, 0, nullptr);	

  974. }

  975. 

  976. void BluetoothController::sendHCIReadLocalVersionInfo() {

  977. 	DBGPrintf("HCI_Read_Local_Version_Information called (");

  978. 	sendHCICommand(HCI_Read_Local_Version_Information, 0, nullptr);	

  979. }

  980. 

  981. 

  982. void BluetoothController::sendHCIWriteScanEnable(uint8_t scan_op)	{//				0x0c1a

  983. // 0x1A 0x0C 0x01 0x02

  984. 	DBGPrintf("HCI_WRITE_SCAN_ENABLE called(");

  985. 	sendHCICommand(HCI_WRITE_SCAN_ENABLE, 1, &scan_op);

  986. }

  987. 

  988. void BluetoothController::sendHCIRemoteNameRequest() {		// 0x0419

  989. 	//               BD   BD   BD   BD   BD   BD   PS   0    CLK   CLK

  990. 	//0x19 0x04 0x0A 0x79 0x22 0x23 0x0A 0xC5 0xCC 0x01 0x00 0x00 0x00

  991. 

  992. 	DBGPrintf("HCI_OP_REMOTE_NAME_REQ called (");

  993. 	uint8_t connection_data[10];

  994. 	for (uint8_t i=0; i<6; i++) connection_data[i] = device_bdaddr_[i];

  995. 	connection_data[6] = 1;	// page scan repeat mode...

  996. 	connection_data[7] = 0;	 // 0

  997. 	connection_data[8] = 0;	// Clk offset

  998. 	connection_data[9] = 0; 

  999. 	sendHCICommand(HCI_OP_REMOTE_NAME_REQ, sizeof(connection_data), connection_data);	

  1000. }

  1001. 

  1002. void BluetoothController::sendHCIRemoteVersionInfoRequest() {		// 0x041D

  1003. 	//               BD   BD   BD   BD   BD   BD   PS   0    CLK   CLK

  1004. 	//0x19 0x04 0x0A 0x79 0x22 0x23 0x0A 0xC5 0xCC 0x01 0x00 0x00 0x00

  1005. 

  1006. 	DBGPrintf("HCI_OP_READ_REMOTE_VERSION_INFORMATION called (");

  1007. 	uint8_t connection_data[2];

  1008. 	connection_data[0] = device_connection_handle_ & 0xff;

  1009. 	connection_data[1] = (device_connection_handle_>>8) & 0xff;

  1010. 	sendHCICommand(HCI_OP_READ_REMOTE_VERSION_INFORMATION, sizeof(connection_data), connection_data);	

  1011. }

  1012. 

  1013. // l2cap support functions. 

  1014. void BluetoothController::sendl2cap_ConnectionResponse(uint16_t handle, uint8_t rxid, uint16_t dcid, uint16_t scid, uint8_t result) {

  1015.  	uint8_t l2capbuf[12];

  1016.     l2capbuf[0] = L2CAP_CMD_CONNECTION_RESPONSE; // Code

  1017.     l2capbuf[1] = rxid; // Identifier

  1018.     l2capbuf[2] = 0x08; // Length

  1019.     l2capbuf[3] = 0x00;

  1020.     l2capbuf[4] = dcid & 0xff; // Destination CID

  1021.     l2capbuf[5] = dcid >> 8;

  1022.     l2capbuf[6] = scid & 0xff; // Source CID

  1023.     l2capbuf[7] = scid >> 8;

  1024.     l2capbuf[8] = result; // Result: Pending or Success

  1025.     l2capbuf[9] = 0x00;

  1026.     l2capbuf[10] = 0x00; // No further information

  1027.     l2capbuf[11] = 0x00;

  1028. 

  1029. 	DBGPrintf("L2CAP_CMD_CONNECTION_RESPONSE called(");

  1030.     sendL2CapCommand(handle, l2capbuf, sizeof(l2capbuf));

  1031. }

  1032. 

  1033. 

  1034. 

  1035. void BluetoothController::sendl2cap_ConnectionRequest(uint16_t handle, uint8_t rxid, uint16_t scid, uint16_t psm) {

  1036.  	uint8_t l2capbuf[8];

  1037.     l2capbuf[0] = L2CAP_CMD_CONNECTION_REQUEST; // Code

  1038.     l2capbuf[1] = rxid; // Identifier

  1039.     l2capbuf[2] = 0x04; // Length

  1040.     l2capbuf[3] = 0x00;

  1041.     l2capbuf[4] = (uint8_t)(psm & 0xff); // PSM

  1042.     l2capbuf[5] = (uint8_t)(psm >> 8);

  1043.     l2capbuf[6] = scid & 0xff; // Source CID

  1044.     l2capbuf[7] = (scid >> 8) & 0xff;

  1045. 

  1046. 	DBGPrintf("`ConnectionRequest called(");

  1047.     sendL2CapCommand(handle, l2capbuf, sizeof(l2capbuf));

  1048. }

  1049. 

  1050. void BluetoothController::sendl2cap_ConfigRequest(uint16_t handle, uint8_t rxid, uint16_t dcid) {

  1051. 	 	uint8_t l2capbuf[12];

  1052.         l2capbuf[0] = L2CAP_CMD_CONFIG_REQUEST; // Code

  1053.         l2capbuf[1] = rxid; // Identifier

  1054.         l2capbuf[2] = 0x08; // Length

  1055.         l2capbuf[3] = 0x00;

  1056.         l2capbuf[4] = dcid & 0xff; // Destination CID

  1057.         l2capbuf[5] = (dcid >> 8) & 0xff;

  1058.         l2capbuf[6] = 0x00; // Flags

  1059.         l2capbuf[7] = 0x00;

  1060.         l2capbuf[8] = 0x01; // Config Opt: type = MTU (Maximum Transmission Unit) - Hint

  1061.         l2capbuf[9] = 0x02; // Config Opt: length

  1062.         l2capbuf[10] = 0xFF; // MTU

  1063.         l2capbuf[11] = 0xFF;

  1064. 

  1065. 		DBGPrintf("L2CAP_ConfigRequest called(");

  1066.         sendL2CapCommand(handle, l2capbuf, sizeof(l2capbuf));

  1067. }

  1068. 

  1069. void BluetoothController::sendl2cap_ConfigResponse(uint16_t handle, uint8_t rxid, uint16_t scid) {

  1070. 	 	uint8_t l2capbuf[14];

  1071.         l2capbuf[0] = L2CAP_CMD_CONFIG_RESPONSE; // Code

  1072.         l2capbuf[1] = rxid; // Identifier

  1073.         l2capbuf[2] = 0x0A; // Length

  1074.         l2capbuf[3] = 0x00;

  1075.         l2capbuf[4] = scid & 0xff; // Source CID

  1076.         l2capbuf[5] = (scid >> 8) & 0xff;

  1077.         l2capbuf[6] = 0x00; // Flag

  1078.         l2capbuf[7] = 0x00;

  1079.         l2capbuf[8] = 0x00; // Result

  1080.         l2capbuf[9] = 0x00;

  1081.         l2capbuf[10] = 0x01; // Config

  1082.         l2capbuf[11] = 0x02;

  1083.         l2capbuf[12] = 0xA0;

  1084.         l2capbuf[13] = 0x02;

  1085. 

  1086. 		DBGPrintf("L2CAP_ConfigResponse called(");

  1087.         sendL2CapCommand(handle, l2capbuf, sizeof(l2capbuf));

  1088. }

  1089. 

  1090. 

  1091. //*******************************************************************

  1092. //*******************************************************************

  1093. void BluetoothController::tx_data(const Transfer_t *transfer)

  1094. {

  1095. 	println("    tx_data(bluetooth) ", pending_control_, HEX);

  1096. #ifdef DEBUG_BT_VERBOSE

  1097. 	DBGPrintf("tx_data callback (bluetooth): %d : ", pending_control_tx_);

  1098. 	uint8_t *buffer = (uint8_t*)transfer->buffer;

  1099. 	for (uint8_t i=0; i < transfer->length; i++) DBGPrintf("%x ", buffer[i]);

  1100. 	DBGPrintf("\n");

  1101. #endif

  1102. 	switch (pending_control_tx_) {

  1103. 		case STATE_TX_SEND_CONNECT_INT:

  1104. 		connection_rxid_++;

  1105. 		sendl2cap_ConnectionRequest(device_connection_handle_, connection_rxid_, interrupt_dcid_, HID_INTR_PSM);

  1106. 		pending_control_tx_ = 0;

  1107. 		break;

  1108. 	case STATE_TX_SEND_CONECT_RSP_SUCCESS:

  1109. 		delay(1);

  1110. 		// Tell the device we are ready

  1111. 		sendl2cap_ConnectionResponse(device_connection_handle_, connection_rxid_++, control_dcid_, control_scid_, SUCCESSFUL);

  1112. 		pending_control_tx_ = STATE_TX_SEND_CONFIG_REQ;

  1113. 		break;

  1114. 	case STATE_TX_SEND_CONFIG_REQ:

  1115. 		delay(1);

  1116. 		sendl2cap_ConfigRequest(device_connection_handle_, connection_rxid_, control_scid_);

  1117. 		pending_control_tx_ = 0;

  1118. 		break;

  1119. 	}

  1120. }

  1121. 

  1122. 

  1123. //*******************************************************************

  1124. //                                                                 

  1125. // HCI ACL Packets

  1126. // HCI Handle Low, HCI_Handle_High (PB, BC), Total length low, TLH  - HCI ACL Data packet

  1127. // length Low, length high, channel id low, channel id high - L2CAP header

  1128. // code, identifier, length, ... - Control-frame 

  1129. 

  1130. /************************************************************/

  1131. /*                    L2CAP Commands                        */

  1132. 

  1133. void BluetoothController::sendL2CapCommand(uint16_t handle, uint8_t* data, uint8_t nbytes, uint8_t channelLow, uint8_t channelHigh)

  1134. {

  1135.     txbuf_[0] = handle & 0xff; // HCI handle with PB,BC flag

  1136.     txbuf_[1] = (((handle >> 8) & 0x0f) | 0x20);

  1137.     txbuf_[2] = (uint8_t)((4 + nbytes) & 0xff); // HCI ACL total data length

  1138.     txbuf_[3] = (uint8_t)((4 + nbytes) >> 8);

  1139.     txbuf_[4] = (uint8_t)(nbytes & 0xff); // L2CAP header: Length

  1140.     txbuf_[5] = (uint8_t)(nbytes >> 8);

  1141.     txbuf_[6] = channelLow;

  1142.     txbuf_[7] = channelHigh;

  1143. 	if (nbytes) {

  1144. 		memcpy(&txbuf_[8], data, nbytes);	// copy in the commands parameters.

  1145. 	}

  1146. 	nbytes = nbytes+8;

  1147. 	for (uint8_t i=0; i< nbytes; i++) DBGPrintf("%02x ", txbuf_[i]);

  1148. 	DBGPrintf(")\n");

  1149. 	

  1150. 	if (!queue_Data_Transfer(txpipe_, txbuf_, nbytes, this)) {

  1151. 		println("sendL2CapCommand failed");

  1152. 	}

  1153. }

  1154. 

  1155. void  BluetoothController::process_l2cap_connection_request(uint8_t *data) {

  1156. 	//       ID   LEN  LEN PSM  PSM  SCID SCID        

  1157. 	// 0x02 0x02 0x04 0x00 0x11 0x00 0x43 0x00

  1158. 

  1159. 	uint16_t psm = data[4]+((uint16_t)data[5] << 8); 

  1160. 	uint16_t scid = data[6]+((uint16_t)data[7] << 8);

  1161. 	DBGPrintf("    L2CAP Connection Request: ID: %d, PSM: %x, SCID: %x\n", data[1], psm, scid);

  1162. 

  1163. 	// Assuming not pair mode Send response like:

  1164. 	//      RXID Len  LEN  DCID DCID  SCID SCID RES 0     0    0

  1165. 	// 0x03 0x02 0x08 0x00 0x70 0x00 0x43 0x00 0x01 0x00 0x00 0x00

  1166. 	control_scid_ = scid;

  1167. 	connection_rxid_ = data[1];

  1168. 	sendl2cap_ConnectionResponse(device_connection_handle_, connection_rxid_, control_dcid_, control_scid_, PENDING);

  1169. 	pending_control_tx_ = STATE_TX_SEND_CONECT_RSP_SUCCESS;

  1170. }

  1171. 

  1172. // Process the l2cap_connection_response...

  1173. void BluetoothController::process_l2cap_connection_response(uint8_t *data) {

  1174. 

  1175. 	uint16_t scid = data[4]+((uint16_t)data[5] << 8); 

  1176. 	uint16_t dcid = data[6]+((uint16_t)data[7] << 8); 

  1177. 

  1178. 	DBGPrintf("    L2CAP Connection Response: ID: %d, Dest:%x, Source:%x, Result:%x, Status: %x\n",

  1179. 		data[1], scid, dcid,

  1180. 		data[8]+((uint16_t)data[9] << 8), data[10]+((uint16_t)data[11] << 8));

  1181. 

  1182. 	//48 20 10 0 | c 0 1 0 | 3 0 8 0 44 0 70 0 0 0 0 0

  1183. 	if (dcid == interrupt_dcid_) {

  1184. 		interrupt_scid_ = scid;

  1185. 		DBGPrintf("      Interrupt Response\n");

  1186. 		sendl2cap_ConfigRequest(device_connection_handle_, connection_rxid_, scid);

  1187. 	} else if (dcid == control_dcid_) {

  1188. 		control_scid_ = scid;

  1189. 		DBGPrintf("      Control Response\n");

  1190. 		sendl2cap_ConfigRequest(device_connection_handle_, connection_rxid_, scid);

  1191. 	}

  1192. }

  1193. 

  1194. void BluetoothController::process_l2cap_config_request(uint8_t *data) {

  1195. 	//48 20 10 0 c 0 1 0 *4 2 8 0 70 0 0 0 1 2 30 0

  1196. 	uint16_t dcid = data[4]+((uint16_t)data[5] << 8); 

  1197. 	DBGPrintf("    L2CAP config Request: ID: %d, Dest:%x, Flags:%x,  Options: %x %x %x %x\n",

  1198. 		data[1], dcid, data[6]+((uint16_t)data[7] << 8),

  1199. 		data[8], data[9], data[10], data[11]);

  1200. 	// Now see which dest was specified

  1201. 	if (dcid == control_dcid_) {

  1202. 		DBGPrintf("      Control Configuration request\n");

  1203. 		sendl2cap_ConfigResponse(device_connection_handle_, data[1], control_scid_);

  1204. 	} else if (dcid == interrupt_dcid_) {

  1205. 		DBGPrintf("      Interrupt Configuration request\n");

  1206. 		sendl2cap_ConfigResponse(device_connection_handle_, data[1], interrupt_scid_);

  1207. 	}

  1208. }

  1209. 

  1210. void BluetoothController::process_l2cap_config_response(uint8_t *data) {

  1211. 	// 48 20 12 0 e 0 1 0 5 0 a 0 70 0 0 0 0 0 1 2 30 0

  1212. 	uint16_t scid = data[4]+((uint16_t)data[5] << 8); 

  1213. 	DBGPrintf("    L2CAP config Response: ID: %d, Source:%x, Flags:%x, Result:%x, Config: %x\n",

  1214. 		data[1], scid, data[6]+((uint16_t)data[7] << 8),

  1215. 		data[8]+((uint16_t)data[9] << 8), data[10]+((uint16_t)data[11] << 8));

  1216. 	if (scid == control_dcid_) {

  1217. 		// Set HID Boot mode

  1218. 		setHIDProtocol(HID_BOOT_PROTOCOL);  //

  1219. 		//setHIDProtocol(HID_RPT_PROTOCOL);  //HID_RPT_PROTOCOL

  1220. 		//if (do_pair_device_) {

  1221. 			// Tell system we will next need to setup connection for the interrupt

  1222. 			pending_control_tx_ = STATE_TX_SEND_CONNECT_INT;

  1223. 		//}

  1224. 	} else if (scid == interrupt_dcid_) {

  1225. 		// Enable SCan to page mode

  1226. 		sendHCIWriteScanEnable(2);

  1227. 	}

  1228. }

  1229. 

  1230. void BluetoothController::process_l2cap_command_reject(uint8_t *data) {		

  1231. 	// 48 20 b 0 7 0 70 0 *1 0 0 0 2 0 4 

  1232. 	DBGPrintf("    L2CAP command reject: ID: %d, length:%x, Reason:%x,  Data: %x %x \n",

  1233. 		data[1], data[2] + ((uint16_t)data[3] << 8), data[4], data[5], data[6]);

  1234. 

  1235. }

  1236. 

  1237. void BluetoothController::process_l2cap_disconnect_request(uint8_t *data) {

  1238. 	uint16_t dcid = data[4]+((uint16_t)data[5] << 8); 

  1239. 	uint16_t scid = data[6]+((uint16_t)data[7] << 8); 

  1240. 	DBGPrintf("    L2CAP disconnect request: ID: %d, Length:%x, Dest:%x, Source:%x\n",

  1241. 		data[1], data[2] + ((uint16_t)data[3] << 8), dcid, scid);

  1242. }

  1243. 

  1244. 

  1245. void BluetoothController::setHIDProtocol(uint8_t protocol) {

  1246. 	// Should verify protocol is boot or report

  1247. 	uint8_t l2capbuf[1];

  1248.     l2capbuf[0] = 0x70 | protocol; // Set Protocol, see Bluetooth HID specs page 33

  1249.     DBGPrintf("Set HID Protocol %d (", protocol);

  1250.     sendL2CapCommand(device_connection_handle_, l2capbuf, sizeof(l2capbuf), control_scid_ & 0xff, control_scid_ >> 8);

  1251. }

  1252. 

  1253. void BluetoothController::handleHIDTHDRData(uint8_t *data) {

  1254. 	// Example

  1255. 	//                      T HID data

  1256. 	//48 20 d 0 9 0 71 0 a1 3 8a cc c5 a 23 22 79

  1257. 	uint16_t len = data[4] + ((uint16_t)data[5] << 8);

  1258. 	DBGPrintf("HID HDR Data: len: %d, Type: %d\n", len, data[9]);

  1259. 

  1260. 	// ??? How to parse??? Use HID object??? 

  1261. 	if (device_driver_) {

  1262. 		device_driver_->process_bluetooth_HID_data(&data[9], len-1); // We skip the first byte...

  1263. 	} else {

  1264. 		switch (data[9]) {

  1265. 			case 1:

  1266. 				DBGPrintf("    Keyboard report type\n");

  1267. 				break;

  1268. 			case 2: 

  1269. 				DBGPrintf("    Mouse report type\n");	

  1270. 				break;

  1271. 			case 3:	

  1272. 				DBGPrintf("    Combo keyboard/pointing\n");

  1273. 				break;

  1274. 			default:

  1275. 				DBGPrintf("    Unknown report\n");	

  1276. 		}

  1277. 	}

  1278. }