xref: /btstack/test/hfp/mock.c (revision 16ece13520cb8efcf94cb63eab58a3eda87f40a2)
1 /*
2  * Copyright (C) 2014 BlueKitchen GmbH
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions
6  * are met:
7  *
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. Neither the name of the copyright holders nor the names of
14  *    contributors may be used to endorse or promote products derived
15  *    from this software without specific prior written permission.
16  * 4. Any redistribution, use, or modification is done solely for
17  *    personal benefit and not for any commercial purpose or for
18  *    monetary gain.
19  *
20  * THIS SOFTWARE IS PROVIDED BY BLUEKITCHEN GMBH AND CONTRIBUTORS
21  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
22  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
23  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL MATTHIAS
24  * RINGWALD OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
25  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
26  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
27  * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
28  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
29  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF
30  * THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  *
33  * Please inquire about commercial licensing options at
34  * [email protected]
35  *
36  */
37 
38 // *****************************************************************************
39 //
40 // HFP BTstack Mocks
41 //
42 // *****************************************************************************
43 
44 #include <stdint.h>
45 #include <stdio.h>
46 #include <stdlib.h>
47 #include <string.h>
48 
49 #include "hci.h"
50 #include "hci_dump.h"
51 #include "classic/sdp_query_rfcomm.h"
52 #include "classic/rfcomm.h"
53 #include "classic/hfp_hf.h"
54 
55 #include "mock.h"
56 
57 static void *registered_sdp_app_context;
58 static uint8_t sdp_rfcomm_channel_nr = 1;
59 const char sdp_rfcomm_service_name[] = "BTstackMock";
60 static uint16_t rfcomm_cid = 1;
61 static bd_addr_t dev_addr;
62 static uint16_t sco_handle = 10;
63 static uint8_t rfcomm_payload[200];
64 static uint16_t rfcomm_payload_len = 0;
65 
66 static uint8_t outgoing_rfcomm_payload[200];
67 static uint16_t outgoing_rfcomm_payload_len = 0;
68 
69 static uint8_t rfcomm_reserved_buffer[1000];
70 
71 hfp_connection_t * hfp_context;
72 
73 void (*registered_rfcomm_packet_handler)(uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size);
74 void (*registered_sdp_app_callback)(sdp_query_event_t * event, void * context);
75 
76 uint8_t * get_rfcomm_payload(){
77 	return &rfcomm_payload[0];
78 }
79 
80 uint16_t get_rfcomm_payload_len(){
81 	return rfcomm_payload_len;
82 }
83 
84 static int hfp_command_start_index = 0;
85 
86 
87 int has_more_hfp_commands(int start_command_offset, int end_command_offset){
88     int has_cmd = get_rfcomm_payload_len() - hfp_command_start_index >= 2 + start_command_offset + end_command_offset;
89     //printf("has more: payload len %d, start %d, has more %d\n", get_rfcomm_payload_len(), hfp_command_start_index, has_cmd);
90     return has_cmd;
91 }
92 
93 char * get_next_hfp_command(int start_command_offset, int end_command_offset){
94     //printf("get next: payload len %d, start %d\n", get_rfcomm_payload_len(), hfp_command_start_index);
95     char * data = (char *)(&get_rfcomm_payload()[hfp_command_start_index + start_command_offset]);
96     int data_len = get_rfcomm_payload_len() - hfp_command_start_index - start_command_offset;
97 
98     int i;
99 
100     for (i = 0; i < data_len; i++){
101         if ( *(data+i) == '\r' || *(data+i) == '\n' ) {
102             data[i]=0;
103             // update state
104             //printf("!!! command %s\n", data);
105             hfp_command_start_index = hfp_command_start_index + i + start_command_offset + end_command_offset;
106             return data;
107         }
108     }
109     printf("should not got here\n");
110     return NULL;
111 }
112 
113 void print_without_newlines(uint8_t *data, uint16_t len);
114 void print_without_newlines(uint8_t *data, uint16_t len){
115     int found_newline = 0;
116     int found_item = 0;
117 
118     for (int i=0; i<len; i++){
119         if (data[i] == '\r' || data[i] == '\n'){
120             if (!found_newline && found_item) printf("\n");
121             found_newline = 1;
122         } else {
123             printf("%c", data[i]);
124             found_newline = 0;
125             found_item = 1;
126         }
127     }
128     printf("\n");
129 }
130 
131 extern "C" void l2cap_init(void){}
132 
133 extern "C" void l2cap_register_packet_handler(void (*handler)(uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size)){
134 }
135 
136 int  rfcomm_send_internal(uint16_t rfcomm_cid, uint8_t *data, uint16_t len){
137 	int start_command_offset = 2;
138     int end_command_offset = 2;
139 
140     if (strncmp((char*)data, "AT", 2) == 0){
141 		start_command_offset = 0;
142 	}
143 
144     if (has_more_hfp_commands(start_command_offset, end_command_offset)){
145         //printf("Buffer response: ");
146         strncpy((char*)&rfcomm_payload[rfcomm_payload_len], (char*)data, len);
147         rfcomm_payload_len += len;
148     } else {
149         hfp_command_start_index = 0;
150         //printf("Copy response: ");
151         strncpy((char*)&rfcomm_payload[0], (char*)data, len);
152         rfcomm_payload_len = len;
153     }
154 
155     //print_without_newlines(rfcomm_payload,rfcomm_payload_len);
156     return 0;
157 }
158 
159 int       rfcomm_reserve_packet_buffer(void){
160     return 1;
161 };
162 void      rfcomm_release_packet_buffer(void){};
163 uint8_t * rfcomm_get_outgoing_buffer(void) {
164     return rfcomm_reserved_buffer;
165 }
166 uint16_t rfcomm_get_max_frame_size(uint16_t rfcomm_cid){
167     return sizeof(rfcomm_reserved_buffer);
168 }
169 int rfcomm_send_prepared(uint16_t rfcomm_cid, uint16_t len){
170     printf("--- rfcomm_send_prepared with len %u ---\n", len);
171     return rfcomm_send_internal(rfcomm_cid, rfcomm_reserved_buffer, len);
172 }
173 
174 static void hci_event_sco_complete(){
175     uint8_t event[19];
176     uint8_t pos = 0;
177     event[pos++] = HCI_EVENT_SYNCHRONOUS_CONNECTION_COMPLETE;
178     event[pos++] = sizeof(event) - 2;
179 
180     event[pos++] = 0; //status
181     bt_store_16(event,  pos, sco_handle);   pos += 2; // sco handle
182     bt_flip_addr(&event[pos], dev_addr);    pos += 6;
183 
184     event[pos++] = 0; // link_type
185     event[pos++] = 0; // transmission_interval
186     event[pos++] = 0; // retransmission_interval
187 
188     bt_store_16(event,  pos, 0);   pos += 2; // rx_packet_length
189     bt_store_16(event,  pos, 0);   pos += 2; // tx_packet_length
190 
191     event[pos++] = 0; // air_mode
192     (*registered_rfcomm_packet_handler)(HCI_EVENT_PACKET, 0, event, sizeof(event));
193 }
194 
195 int hci_send_cmd(const hci_cmd_t *cmd, ...){
196 	//printf("hci_send_cmd opcode 0x%02x\n", cmd->opcode);
197     if (cmd->opcode == 0x428){
198         hci_event_sco_complete();
199     }
200 	return 0;
201 }
202 
203 
204 void sdp_query_rfcomm_register_callback(void(*sdp_app_callback)(sdp_query_event_t * event, void * context), void * context){
205 	registered_sdp_app_callback = sdp_app_callback;
206 	registered_sdp_app_context = context;
207 }
208 
209 static void sdp_query_complete_response(uint8_t status){
210     sdp_query_complete_event_t complete_event = {
211         SDP_QUERY_COMPLETE,
212         status
213     };
214     (*registered_sdp_app_callback)((sdp_query_event_t*)&complete_event, registered_sdp_app_context);
215 }
216 
217 static void sdp_query_rfcomm_service_response(uint8_t status){
218     sdp_query_rfcomm_service_event_t service_event = {
219         SDP_QUERY_RFCOMM_SERVICE,
220         sdp_rfcomm_channel_nr,
221         (uint8_t *)sdp_rfcomm_service_name
222     };
223     (*registered_sdp_app_callback)((sdp_query_event_t*)&service_event, registered_sdp_app_context);
224 }
225 
226 void sdp_query_rfcomm_channel_and_name_for_uuid(bd_addr_t remote, uint16_t uuid){
227 	// printf("sdp_query_rfcomm_channel_and_name_for_uuid %p\n", registered_sdp_app_callback);
228 	sdp_query_rfcomm_service_response(0);
229 	sdp_query_complete_response(0);
230 }
231 
232 
233 uint8_t rfcomm_create_channel(bd_addr_t addr, uint8_t channel, uint16_t * out_cid){
234 	// RFCOMM_EVENT_OPEN_CHANNEL_COMPLETE
235     uint8_t event[16];
236     uint8_t pos = 0;
237     event[pos++] = RFCOMM_EVENT_OPEN_CHANNEL_COMPLETE;
238     event[pos++] = sizeof(event) - 2;
239     event[pos++] = 0;
240 
241     bt_flip_addr(&event[pos], addr);
242     memcpy(dev_addr, addr, 6);
243     pos += 6;
244 
245     bt_store_16(event,  pos, 1);   pos += 2;
246 	event[pos++] = 0;
247 
248 	bt_store_16(event, pos, rfcomm_cid); pos += 2;       // channel ID
249 	bt_store_16(event, pos, 200); pos += 2;   // max frame size
250     (*registered_rfcomm_packet_handler)(HCI_EVENT_PACKET, 0, (uint8_t *) event, pos);
251 
252     if (out_cid){
253         *out_cid = rfcomm_cid;
254     }
255     return 0;
256 }
257 
258 int rfcomm_can_send_packet_now(uint16_t rfcomm_cid){
259 	return 1;
260 }
261 
262 void rfcomm_disconnect_internal(uint16_t rfcomm_cid){
263 	uint8_t event[4];
264 	event[0] = RFCOMM_EVENT_CHANNEL_CLOSED;
265     event[1] = sizeof(event) - 2;
266     bt_store_16(event, 2, rfcomm_cid);
267     (*registered_rfcomm_packet_handler)(HCI_EVENT_PACKET, 0, (uint8_t *) event, sizeof(event));
268 }
269 
270 void rfcomm_register_packet_handler(void (*handler)(uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size)){
271 	registered_rfcomm_packet_handler = handler;
272 }
273 
274 uint8_t rfcomm_register_service(uint8_t channel, uint16_t max_frame_size){
275 	printf("rfcomm_register_service\n");
276     return 0;
277 }
278 
279 
280 void sdp_query_rfcomm_channel_and_name_for_search_pattern(bd_addr_t remote, uint8_t * des_serviceSearchPattern){
281 	printf("sdp_query_rfcomm_channel_and_name_for_search_pattern\n");
282 }
283 
284 
285 void rfcomm_accept_connection_internal(uint16_t rfcomm_cid){
286 	printf("rfcomm_accept_connection_internal \n");
287 }
288 
289 void run_loop_add_timer(timer_source_t *timer){
290 }
291 
292 int  run_loop_remove_timer(timer_source_t *timer){
293     return 0;
294 }
295 void run_loop_set_timer_handler(timer_source_t *ts, void (*process)(timer_source_t *_ts)){
296 }
297 
298 void run_loop_set_timer(timer_source_t *a, uint32_t timeout_in_ms){
299 }
300 
301 
302 void hci_emit_disconnection_complete(uint16_t handle, uint8_t reason){
303     uint8_t event[6];
304     event[0] = HCI_EVENT_DISCONNECTION_COMPLETE;
305     event[1] = sizeof(event) - 2;
306     event[2] = 0; // status = OK
307     bt_store_16(event, 3, handle);
308     event[5] = reason;
309     (*registered_rfcomm_packet_handler)(HCI_EVENT_PACKET, 0, event, sizeof(event));
310 }
311 
312 uint8_t gap_disconnect(hci_con_handle_t handle){
313     hci_emit_disconnection_complete(handle, 0);
314     return 0;
315 }
316 
317 uint16_t hci_get_sco_voice_setting(){
318     return 0x40;
319 }
320 
321 int hci_remote_eSCO_supported(hci_con_handle_t handle){
322     return 0;
323 }
324 
325 static void add_new_lines_to_hfp_command(uint8_t * data, int len){
326     if (len <= 0) return;
327     memset(&outgoing_rfcomm_payload, 0, 200);
328     int pos = 0;
329 
330     if (strncmp((char*)data, "AT", 2) == 0){
331         strncpy((char*)&outgoing_rfcomm_payload[pos], (char*)data, len);
332         pos += len;
333     } else {
334         outgoing_rfcomm_payload[pos++] = '\r';
335         outgoing_rfcomm_payload[pos++] = '\n';
336         strncpy((char*)&outgoing_rfcomm_payload[pos], (char*)data, len);
337         pos += len;
338     }
339     outgoing_rfcomm_payload[pos++] = '\r';
340     outgoing_rfcomm_payload[pos++] = '\n';
341     outgoing_rfcomm_payload[pos] = 0;
342     outgoing_rfcomm_payload_len = pos;
343 }
344 
345 void inject_hfp_command_to_hf(uint8_t * data, int len){
346     if (memcmp((char*)data, "AT", 2) == 0) return;
347     add_new_lines_to_hfp_command(data, len);
348     // printf("inject_hfp_command_to_hf to HF: ");
349     // print_without_newlines(outgoing_rfcomm_payload,outgoing_rfcomm_payload_len);
350     (*registered_rfcomm_packet_handler)(RFCOMM_DATA_PACKET, rfcomm_cid, (uint8_t *) &outgoing_rfcomm_payload[0], outgoing_rfcomm_payload_len);
351 
352 }
353 
354 void inject_hfp_command_to_ag(uint8_t * data, int len){
355     if (data[0] == '+') return;
356 
357     add_new_lines_to_hfp_command(data, len);
358     (*registered_rfcomm_packet_handler)(RFCOMM_DATA_PACKET, rfcomm_cid, (uint8_t *) &outgoing_rfcomm_payload[0], outgoing_rfcomm_payload_len);
359 }
360 
361 
362 
363