xref: /btstack/src/classic/pbap_client.c (revision eeba0155525928e20640454de897539523a2552b)
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 #define __BTSTACK_FILE__ "pbap_client.c"
39 
40 #include "btstack_config.h"
41 
42 #include <stdint.h>
43 #include <stdio.h>
44 #include <stdlib.h>
45 #include <string.h>
46 
47 #include "hci_cmd.h"
48 #include "btstack_run_loop.h"
49 #include "btstack_debug.h"
50 #include "hci.h"
51 #include "btstack_memory.h"
52 #include "hci_dump.h"
53 #include "l2cap.h"
54 #include "bluetooth_sdp.h"
55 #include "classic/sdp_client_rfcomm.h"
56 #include "btstack_event.h"
57 #include "md5.h"
58 #include "yxml.h"
59 
60 #include "classic/obex.h"
61 #include "classic/obex_iterator.h"
62 #include "classic/goep_client.h"
63 #include "classic/pbap_client.h"
64 
65 // 796135f0-f0c5-11d8-0966- 0800200c9a66
66 static const uint8_t pbap_uuid[] = { 0x79, 0x61, 0x35, 0xf0, 0xf0, 0xc5, 0x11, 0xd8, 0x09, 0x66, 0x08, 0x00, 0x20, 0x0c, 0x9a, 0x66};
67 
68 const char * pbap_phonebook_type     = "x-bt/phonebook";
69 const char * pbap_vcard_listing_type = "x-bt/vcard-listing";
70 const char * pbap_vcard_entry_type   = "x-bt/vcard";
71 
72 const char * pbap_vcard_listing_name = "pb";
73 
74 static uint32_t pbap_supported_features = \
75     PBAP_SUPPORTED_FEATURES_DOWNLOAD |
76     PBAP_SUPPORTED_FEATURES_BROWSING |
77     PBAP_SUPPORTED_FEATURES_DATABASE_IDENTIFIER |
78     PBAP_SUPPORTED_FEATURES_FOLDER_VERSION_COUNTERS |
79     PBAP_SUPPORTED_FEATURES_VCARD_SELECTING |
80     PBAP_SUPPORTED_FEATURES_ENHANCED_MISSED_CALLS |
81     PBAP_SUPPORTED_FEATURES_DEFAULT_CONTACT_IMAGE_FORMAT |
82     PBAP_SUPPORTED_FEATURES_X_BT_UCI_VCARD_PROPERTY;
83 
84 typedef enum {
85     PBAP_INIT = 0,
86     PBAP_W4_GOEP_CONNECTION,
87     PBAP_W2_SEND_CONNECT_REQUEST,
88     PBAP_W4_CONNECT_RESPONSE,
89     PBAP_W4_USER_AUTHENTICATION,
90     PBAP_W2_SEND_AUTHENTICATED_CONNECT,
91     PBAP_CONNECT_RESPONSE_RECEIVED,
92     PBAP_CONNECTED,
93     //
94     PBAP_W2_SEND_DISCONNECT_REQUEST,
95     PBAP_W4_DISCONNECT_RESPONSE,
96     //
97     PBAP_W2_PULL_PHONEBOOK,
98     PBAP_W4_PHONEBOOK,
99     PBAP_W2_SET_PATH_ROOT,
100     PBAP_W4_SET_PATH_ROOT_COMPLETE,
101     PBAP_W2_SET_PATH_ELEMENT,
102     PBAP_W4_SET_PATH_ELEMENT_COMPLETE,
103     PBAP_W2_GET_PHONEBOOK_SIZE,
104     PBAP_W4_GET_PHONEBOOK_SIZE_COMPLETE,
105     // - pull vacard liast
106     PBAP_W2_GET_CARD_LIST,
107     PBAP_W4_GET_CARD_LIST_COMPLETE,
108     // - pull vcard entry
109     PBAP_W2_GET_CARD_ENTRY,
110     PBAP_W4_GET_CARD_ENTRY_COMPLETE
111 
112 } pbap_state_t;
113 
114 typedef enum {
115     SRM_DISABLED,
116     SRM_W4_CONFIRM,
117     SRM_ENABLED_BUT_WAITING,
118     SRM_ENABLED
119 } srm_state_t;
120 
121 typedef struct pbap_client {
122     pbap_state_t state;
123     uint16_t  cid;
124     bd_addr_t bd_addr;
125     hci_con_handle_t con_handle;
126     uint8_t   incoming;
127     uint16_t  goep_cid;
128     btstack_packet_handler_t client_handler;
129     int request_number;
130     srm_state_t srm_state;
131     const char * current_folder;
132     const char * phone_number;
133     const char * phonebook_path;
134     const char * vcard_name;
135     uint16_t set_path_offset;
136     /* vcard selector / operator */
137     uint32_t vcard_selector;
138     uint8_t  vcard_selector_operator;
139     uint8_t  vcard_selector_supported;
140     /* abort */
141     uint8_t  abort_operation;
142     /* authentication */
143     uint8_t  authentication_options;
144     uint16_t authentication_nonce[16];
145     const char * authentication_password;
146     /* xml parser */
147     yxml_t  xml_parser;
148     uint8_t xml_buffer[50];
149     /* flow control mode */
150     uint8_t flow_control_enabled;
151     uint8_t flow_next_triggered;
152 } pbap_client_t;
153 
154 static pbap_client_t _pbap_client;
155 static pbap_client_t * pbap_client = &_pbap_client;
156 
157 static void pbap_client_emit_connected_event(pbap_client_t * context, uint8_t status){
158     uint8_t event[15];
159     int pos = 0;
160     event[pos++] = HCI_EVENT_PBAP_META;
161     pos++;  // skip len
162     event[pos++] = PBAP_SUBEVENT_CONNECTION_OPENED;
163     little_endian_store_16(event,pos,context->cid);
164     pos+=2;
165     event[pos++] = status;
166     memcpy(&event[pos], context->bd_addr, 6);
167     pos += 6;
168     little_endian_store_16(event,pos,context->con_handle);
169     pos += 2;
170     event[pos++] = context->incoming;
171     event[1] = pos - 2;
172     if (pos != sizeof(event)) log_error("goep_client_emit_connected_event size %u", pos);
173     context->client_handler(HCI_EVENT_PACKET, context->cid, &event[0], pos);
174 }
175 
176 static void pbap_client_emit_connection_closed_event(pbap_client_t * context){
177     uint8_t event[5];
178     int pos = 0;
179     event[pos++] = HCI_EVENT_PBAP_META;
180     pos++;  // skip len
181     event[pos++] = PBAP_SUBEVENT_CONNECTION_CLOSED;
182     little_endian_store_16(event,pos,context->cid);
183     pos+=2;
184     event[1] = pos - 2;
185     if (pos != sizeof(event)) log_error("pbap_client_emit_connection_closed_event size %u", pos);
186     context->client_handler(HCI_EVENT_PACKET, context->cid, &event[0], pos);
187 }
188 
189 static void pbap_client_emit_operation_complete_event(pbap_client_t * context, uint8_t status){
190     uint8_t event[6];
191     int pos = 0;
192     event[pos++] = HCI_EVENT_PBAP_META;
193     pos++;  // skip len
194     event[pos++] = PBAP_SUBEVENT_OPERATION_COMPLETED;
195     little_endian_store_16(event,pos,context->cid);
196     pos+=2;
197     event[pos++]= status;
198     event[1] = pos - 2;
199     if (pos != sizeof(event)) log_error("pbap_client_emit_can_send_now_event size %u", pos);
200     context->client_handler(HCI_EVENT_PACKET, context->cid, &event[0], pos);
201 }
202 
203 static void pbap_client_emit_phonebook_size_event(pbap_client_t * context, uint8_t status, uint16_t phonebook_size){
204     uint8_t event[8];
205     int pos = 0;
206     event[pos++] = HCI_EVENT_PBAP_META;
207     pos++;  // skip len
208     event[pos++] = PBAP_SUBEVENT_PHONEBOOK_SIZE;
209     little_endian_store_16(event,pos,context->cid);
210     pos+=2;
211     event[pos++] = status;
212     little_endian_store_16(event,pos, phonebook_size);
213     pos+=2;
214     event[1] = pos - 2;
215     if (pos != sizeof(event)) log_error("pbap_client_emit_phonebook_size_event size %u", pos);
216     context->client_handler(HCI_EVENT_PACKET, context->cid, &event[0], pos);
217 }
218 
219 static void pbap_client_emit_authentication_event(pbap_client_t * context, uint8_t options){
220     // split options
221     uint8_t user_id_required = options & 1 ? 1 : 0;
222     uint8_t full_access      = options & 2 ? 1 : 0;
223 
224     uint8_t event[7];
225     int pos = 0;
226     event[pos++] = HCI_EVENT_PBAP_META;
227     pos++;  // skip len
228     event[pos++] = PBAP_SUBEVENT_AUTHENTICATION_REQUEST;
229     little_endian_store_16(event,pos,context->cid);
230     pos+=2;
231     event[pos++] = user_id_required;
232     event[pos++] = full_access;
233     if (pos != sizeof(event)) log_error("pbap_client_emit_authentication_event size %u", pos);
234     context->client_handler(HCI_EVENT_PACKET, context->cid, &event[0], pos);
235 }
236 
237 static void pbap_client_emit_card_result_event(pbap_client_t * context, const char * name, const char * handle){
238     uint8_t event[5 + PBAP_MAX_NAME_LEN + PBAP_MAX_HANDLE_LEN];
239     int pos = 0;
240     event[pos++] = HCI_EVENT_PBAP_META;
241     pos++;  // skip len
242     event[pos++] = PBAP_SUBEVENT_CARD_RESULT;
243     little_endian_store_16(event,pos,context->cid);
244     pos+=2;
245     int name_len = btstack_min(PBAP_MAX_NAME_LEN, strlen(name));
246     event[pos++] = name_len;
247     memcpy(&event[pos], name, name_len);
248     pos += name_len;
249     int handle_len = btstack_min(PBAP_MAX_HANDLE_LEN, strlen(handle));
250     event[pos++] = handle_len;
251     memcpy(&event[pos], handle, handle_len);
252     pos += handle_len;
253     event[1] = pos - 2;
254     context->client_handler(HCI_EVENT_PACKET, context->cid, &event[0], pos);
255 }
256 
257 static const uint8_t collon = (uint8_t) ':';
258 
259 static void pbap_handle_can_send_now(void){
260     uint8_t  path_element[20];
261     uint16_t path_element_start;
262     uint16_t path_element_len;
263     uint8_t  application_parameters[PBAP_MAX_PHONE_NUMBER_LEN + 10];
264     uint8_t  challenge_response[36];
265     int i;
266     uint16_t phone_number_len;
267 
268     MD5_CTX md5_ctx;
269 
270     if (pbap_client->abort_operation){
271         pbap_client->abort_operation = 0;
272         pbap_client->state = PBAP_CONNECTED;
273         goep_client_create_abort_request(pbap_client->goep_cid);
274         goep_client_execute(pbap_client->goep_cid);
275         return;
276     }
277 
278     switch (pbap_client->state){
279         case PBAP_W2_SEND_CONNECT_REQUEST:
280             goep_client_create_connect_request(pbap_client->goep_cid, OBEX_VERSION, 0, OBEX_MAX_PACKETLEN_DEFAULT);
281             goep_client_add_header_target(pbap_client->goep_cid, 16, pbap_uuid);
282             // Mandatory if the PSE advertises a PbapSupportedFeatures attribute in its SDP record, else excluded.
283             if (goep_client_get_pbap_supported_features(pbap_client->goep_cid) != PBAP_FEATURES_NOT_PRESENT){
284                 application_parameters[0] = PBAP_APPLICATION_PARAMETER_PBAP_SUPPORTED_FEATURES;
285                 application_parameters[1] = 4;
286                 big_endian_store_32(application_parameters, 2, pbap_supported_features);
287                 goep_client_add_header_application_parameters(pbap_client->goep_cid, 6, &application_parameters[0]);
288             }
289             pbap_client->state = PBAP_W4_CONNECT_RESPONSE;
290             goep_client_execute(pbap_client->goep_cid);
291             break;
292         case PBAP_W2_SEND_AUTHENTICATED_CONNECT:
293             goep_client_create_connect_request(pbap_client->goep_cid, OBEX_VERSION, 0, OBEX_MAX_PACKETLEN_DEFAULT);
294             goep_client_add_header_target(pbap_client->goep_cid, 16, pbap_uuid);
295             // setup authentication challenge response
296             i = 0;
297             challenge_response[i++] = 0;  // Tag Digest
298             challenge_response[i++] = 16; // Len
299             // calculate md5
300             MD5_Init(&md5_ctx);
301             MD5_Update(&md5_ctx, pbap_client->authentication_nonce, 16);
302             MD5_Update(&md5_ctx, &collon, 1);
303             MD5_Update(&md5_ctx, pbap_client->authentication_password, strlen(pbap_client->authentication_password));
304             MD5_Final(&challenge_response[i], &md5_ctx);
305             i += 16;
306             challenge_response[i++] = 2;  // Tag Nonce
307             challenge_response[i++] = 16; // Len
308             memcpy(&challenge_response[i], pbap_client->authentication_nonce, 16);
309             i += 16;
310             goep_client_add_header_challenge_response(pbap_client->goep_cid, i, challenge_response);
311             pbap_client->state = PBAP_W4_CONNECT_RESPONSE;
312             goep_client_execute(pbap_client->goep_cid);
313             break;
314         case PBAP_W2_SEND_DISCONNECT_REQUEST:
315             goep_client_create_disconnect_request(pbap_client->goep_cid);
316             pbap_client->state = PBAP_W4_DISCONNECT_RESPONSE;
317             goep_client_execute(pbap_client->goep_cid);
318             return;
319         case PBAP_W2_PULL_PHONEBOOK:
320         case PBAP_W2_GET_PHONEBOOK_SIZE:
321             goep_client_create_get_request(pbap_client->goep_cid);
322             if (pbap_client->request_number == 0){
323                 if (!pbap_client->flow_control_enabled){
324                     goep_client_add_header_srm_enable(pbap_client->goep_cid);
325                     pbap_client->srm_state = SRM_W4_CONFIRM;
326                 }
327                 goep_client_add_header_name(pbap_client->goep_cid, pbap_client->phonebook_path);
328                 goep_client_add_header_type(pbap_client->goep_cid, pbap_phonebook_type);
329                 i = 0;
330                 if (pbap_client->vcard_selector_supported){
331                     // vCard Selector
332                     if (pbap_client->vcard_selector){
333                         application_parameters[i++] = PBAP_APPLICATION_PARAMETER_VCARD_SELECTOR;
334                         application_parameters[i++] = 8;
335                         memset(&application_parameters[i], 0, 4);
336                         i += 4;
337                         big_endian_store_32(application_parameters, i, pbap_client->vcard_selector);
338                         i += 4;
339                     }
340                     // vCard Selector Operator
341                     if (pbap_client->vcard_selector_operator != PBAP_VCARD_SELECTOR_OPERATOR_OR){
342                         application_parameters[i++] = PBAP_APPLICATION_PARAMETER_VCARD_SELECTOR_OPERATOR;
343                         application_parameters[i++] = 1;
344                         application_parameters[i++] = pbap_client->vcard_selector_operator;
345                     }
346                 }
347                 if (pbap_client->state == PBAP_W2_GET_PHONEBOOK_SIZE){
348                     // Regular TLV wih 1-byte len
349                     application_parameters[i++] = PBAP_APPLICATION_PARAMETER_MAX_LIST_COUNT;
350                     application_parameters[i++] = 2;
351                     big_endian_store_16(application_parameters, 2, 0);
352                     i += 2;
353                 }
354                 if (i){
355                     goep_client_add_header_application_parameters(pbap_client->goep_cid, i, application_parameters);
356                 }
357             }
358             if (pbap_client->state == PBAP_W2_GET_PHONEBOOK_SIZE){
359                 // state
360                 pbap_client->state = PBAP_W4_GET_PHONEBOOK_SIZE_COMPLETE;
361             } else {
362                 // state
363                 pbap_client->state = PBAP_W4_PHONEBOOK;
364             }
365             // send packet
366             pbap_client->request_number++;
367             goep_client_execute(pbap_client->goep_cid);
368             break;
369         case PBAP_W2_GET_CARD_LIST:
370             goep_client_create_get_request(pbap_client->goep_cid);
371             if (pbap_client->request_number == 0){
372                 if (!pbap_client->flow_control_enabled){
373                     goep_client_add_header_srm_enable(pbap_client->goep_cid);
374                     pbap_client->srm_state = SRM_W4_CONFIRM;
375                 }
376                 goep_client_add_header_name(pbap_client->goep_cid, pbap_client->phonebook_path);
377                 goep_client_add_header_type(pbap_client->goep_cid, pbap_vcard_listing_type);
378                 i = 0;
379                 if (pbap_client->vcard_selector_supported){
380                     // vCard Selector
381                     if (pbap_client->vcard_selector){
382                         application_parameters[i++] = PBAP_APPLICATION_PARAMETER_VCARD_SELECTOR;
383                         application_parameters[i++] = 8;
384                         memset(&application_parameters[i], 0, 4);
385                         i += 4;
386                         big_endian_store_32(application_parameters, i, pbap_client->vcard_selector);
387                         i += 4;
388                     }
389                     // vCard Selector Operator
390                     if (pbap_client->vcard_selector_operator != PBAP_VCARD_SELECTOR_OPERATOR_OR){
391                         application_parameters[i++] = PBAP_APPLICATION_PARAMETER_VCARD_SELECTOR_OPERATOR;
392                         application_parameters[i++] = 1;
393                         application_parameters[i++] = pbap_client->vcard_selector_operator;
394                     }
395                 }
396                 if (pbap_client->phone_number){
397                     // Search by phpone number
398                     phone_number_len = btstack_min(PBAP_MAX_PHONE_NUMBER_LEN, strlen(pbap_client->phone_number));
399                     application_parameters[i++] = PBAP_APPLICATION_PARAMETER_SEARCH_VALUE;
400                     application_parameters[i++] = phone_number_len;
401                     memcpy(&application_parameters[i], pbap_client->phone_number, phone_number_len);
402                     i += phone_number_len;
403                     application_parameters[i++] = PBAP_APPLICATION_PARAMETER_SEARCH_PROPERTY;
404                     application_parameters[i++] = 1;
405                     application_parameters[i++] = 0x01; // Number
406                 }
407                 if (i){
408                     goep_client_add_header_application_parameters(pbap_client->goep_cid, i, &application_parameters[0]);
409                 }
410                 pbap_client->state = PBAP_W4_GET_CARD_LIST_COMPLETE;
411             }
412             // send packet
413             pbap_client->request_number++;
414             goep_client_execute(pbap_client->goep_cid);
415             break;
416         case PBAP_W2_GET_CARD_ENTRY:
417             goep_client_create_get_request(pbap_client->goep_cid);
418             if (pbap_client->request_number == 0){
419                 if (!pbap_client->flow_control_enabled){
420                     goep_client_add_header_srm_enable(pbap_client->goep_cid);
421                     pbap_client->srm_state = SRM_W4_CONFIRM;
422                 }
423                 goep_client_add_header_name(pbap_client->goep_cid, pbap_client->vcard_name);
424                 goep_client_add_header_type(pbap_client->goep_cid, pbap_vcard_entry_type);
425                 i = 0;
426                 if (i){
427                     // TODO: support property selector
428                     // TODO: support format
429                     goep_client_add_header_application_parameters(pbap_client->goep_cid, i, &application_parameters[0]);
430                 }
431                 pbap_client->state = PBAP_W4_GET_CARD_ENTRY_COMPLETE;
432             }
433             // send packet
434             pbap_client->request_number++;
435             goep_client_execute(pbap_client->goep_cid);
436             break;
437         case PBAP_W2_SET_PATH_ROOT:
438             goep_client_create_set_path_request(pbap_client->goep_cid, 1 << 1); // Don’t create directory
439             goep_client_add_header_name(pbap_client->goep_cid, "");
440             // state
441             pbap_client->state = PBAP_W4_SET_PATH_ROOT_COMPLETE;
442             // send packet
443             goep_client_execute(pbap_client->goep_cid);
444             break;
445         case PBAP_W2_SET_PATH_ELEMENT:
446             // find '/' or '\0'
447             path_element_start = pbap_client->set_path_offset;
448             while (pbap_client->current_folder[pbap_client->set_path_offset] != '\0' &&
449                 pbap_client->current_folder[pbap_client->set_path_offset] != '/'){
450                 pbap_client->set_path_offset++;
451             }
452             path_element_len = pbap_client->set_path_offset-path_element_start;
453             memcpy(path_element, &pbap_client->current_folder[path_element_start], path_element_len);
454             path_element[path_element_len] = 0;
455 
456             // skip /
457             if (pbap_client->current_folder[pbap_client->set_path_offset] == '/'){
458                 pbap_client->set_path_offset++;
459             }
460 
461             // detect end of path (after setting path_element)
462             if (pbap_client->current_folder[pbap_client->set_path_offset] == '\0'){
463                 pbap_client->current_folder = NULL;
464             }
465 
466             log_info("Path element '%s', done %u", path_element, pbap_client->current_folder == NULL);
467 
468             goep_client_create_set_path_request(pbap_client->goep_cid, 1 << 1); // Don’t create directory
469             goep_client_add_header_name(pbap_client->goep_cid, (const char *) path_element); // next element
470             // state
471             pbap_client->state = PBAP_W4_SET_PATH_ELEMENT_COMPLETE;
472             // send packet
473             goep_client_execute(pbap_client->goep_cid);
474             break;
475         default:
476             break;
477     }
478 }
479 
480 static void pbap_parse_authentication_challenge(pbap_client_t * context, const uint8_t * challenge_data, uint16_t challenge_len){
481     // printf("Challenge:  ");
482     // printf_hexdump(challenge_data, challenge_len);
483     int i;
484     // uint8_t charset_code = 0;
485     for (i=0 ; i<challenge_len ; ){
486         int tag = challenge_data[i];
487         int len = challenge_data[i + 1];
488         i += 2;
489         switch (tag) {
490             case 0:
491                 if (len != 0x10) {
492                     log_error("Invalid OBEX digest len %u", len);
493                     return;
494                 }
495                 memcpy(context->authentication_nonce, &challenge_data[i], 16);
496                 // printf("Nonce: ");
497                 // printf_hexdump(context->authentication_nonce, 16);
498                 break;
499             case 1:
500                 context->authentication_options = challenge_data[i];
501                 // printf("Options %u\n", context->authentication_options);
502                 break;
503             case 2:
504                 // TODO: handle charset
505                 // charset_code = challenge_data[i];
506                 break;
507         }
508         i += len;
509     }
510 }
511 
512 static void pbap_process_srm_headers(pbap_client_t * context, uint8_t *packet, uint16_t size){
513 
514     if (packet[0] != OBEX_RESP_CONTINUE) return;
515 
516     // get SRM and SRMP Headers
517     int srm_value = OBEX_SRM_DISABLE;
518     int srmp_value = OBEX_SRMP_NEXT;
519     obex_iterator_t it;
520     for (obex_iterator_init_with_response_packet(&it, goep_client_get_request_opcode(context->goep_cid), packet, size); obex_iterator_has_more(&it) ; obex_iterator_next(&it)){
521         uint8_t hi = obex_iterator_get_hi(&it);
522         uint16_t     data_len = obex_iterator_get_data_len(&it);
523         const uint8_t  * data = data =  obex_iterator_get_data(&it);
524         switch (hi){
525             case OBEX_HEADER_SINGLE_RESPONSE_MODE:
526                 if (data_len != 1) break;
527                 srm_value = *data;
528                 break;
529             case OBEX_HEADER_SINGLE_RESPONSE_MODE_PARAMETER:
530                 if (data_len != 1) break;
531                 srmp_value = *data;
532                 break;
533             default:
534                 break;
535         }
536     }
537 
538     // Update SRM state based on SRM haders
539     switch (context->srm_state){
540         case SRM_W4_CONFIRM:
541             switch (srm_value){
542                 case OBEX_SRM_ENABLE:
543                     switch (srmp_value){
544                         case OBEX_SRMP_WAIT:
545                             context->srm_state = SRM_ENABLED_BUT_WAITING;
546                             break;
547                         default:
548                             context->srm_state = SRM_ENABLED;
549                             break;
550                     }
551                     break;
552                 default:
553                     context->srm_state = SRM_DISABLED;
554                     break;
555             }
556             break;
557         case SRM_ENABLED_BUT_WAITING:
558             switch (srmp_value){
559                 case OBEX_SRMP_WAIT:
560                     context->srm_state = SRM_ENABLED_BUT_WAITING;
561                     break;
562                 default:
563                     context->srm_state = SRM_ENABLED;
564                     break;
565             }
566             break;
567         default:
568             break;
569     }
570     log_info("SRM state %u", context->srm_state);
571 }
572 
573 static void pbap_packet_handler(uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size){
574 
575     UNUSED(channel); // ok: there is no channel
576     UNUSED(size);    // ok: handling own geop events
577 
578     obex_iterator_t it;
579     uint8_t status;
580     int wait_for_user = 0;
581     switch (packet_type){
582         case HCI_EVENT_PACKET:
583             switch (hci_event_packet_get_type(packet)) {
584                 case HCI_EVENT_GOEP_META:
585                     switch (hci_event_goep_meta_get_subevent_code(packet)){
586                         case GOEP_SUBEVENT_CONNECTION_OPENED:
587                             status = goep_subevent_connection_opened_get_status(packet);
588                             pbap_client->con_handle = goep_subevent_connection_opened_get_con_handle(packet);
589                             pbap_client->incoming = goep_subevent_connection_opened_get_incoming(packet);
590                             goep_subevent_connection_opened_get_bd_addr(packet, pbap_client->bd_addr);
591                             if (status){
592                                 log_info("pbap: connection failed %u", status);
593                                 pbap_client->state = PBAP_INIT;
594                                 pbap_client_emit_connected_event(pbap_client, status);
595                             } else {
596                                 log_info("pbap: connection established");
597                                 pbap_client->goep_cid = goep_subevent_connection_opened_get_goep_cid(packet);
598                                 pbap_client->state = PBAP_W2_SEND_CONNECT_REQUEST;
599                                 goep_client_request_can_send_now(pbap_client->goep_cid);
600                             }
601                             break;
602                         case GOEP_SUBEVENT_CONNECTION_CLOSED:
603                             if (pbap_client->state != PBAP_CONNECTED){
604                                 pbap_client_emit_operation_complete_event(pbap_client, OBEX_DISCONNECTED);
605                             }
606                             pbap_client->state = PBAP_INIT;
607                             pbap_client_emit_connection_closed_event(pbap_client);
608                             break;
609                         case GOEP_SUBEVENT_CAN_SEND_NOW:
610                             pbap_handle_can_send_now();
611                             break;
612                     }
613                     break;
614                 default:
615                     break;
616             }
617             break;
618         case GOEP_DATA_PACKET:
619             // TODO: handle chunked data
620             // obex_dump_packet(goep_client_get_request_opcode(pbap_client->goep_cid), packet, size);
621             switch (pbap_client->state){
622                 case PBAP_W4_CONNECT_RESPONSE:
623                     switch (packet[0]){
624                         case OBEX_RESP_SUCCESS:
625                             for (obex_iterator_init_with_response_packet(&it, goep_client_get_request_opcode(pbap_client->goep_cid), packet, size); obex_iterator_has_more(&it) ; obex_iterator_next(&it)){
626                                 uint8_t hi = obex_iterator_get_hi(&it);
627                                 if (hi == OBEX_HEADER_CONNECTION_ID){
628                                     goep_client_set_connection_id(pbap_client->goep_cid, obex_iterator_get_data_32(&it));
629                                 }
630                             }
631                             pbap_client->state = PBAP_CONNECTED;
632                             pbap_client->vcard_selector_supported = pbap_supported_features & goep_client_get_pbap_supported_features(pbap_client->goep_cid) & PBAP_SUPPORTED_FEATURES_VCARD_SELECTING;
633                             pbap_client_emit_connected_event(pbap_client, 0);
634                             break;
635                         case OBEX_RESP_UNAUTHORIZED:
636                             for (obex_iterator_init_with_response_packet(&it, goep_client_get_request_opcode(pbap_client->goep_cid), packet, size); obex_iterator_has_more(&it) ; obex_iterator_next(&it)){
637                                 uint8_t hi = obex_iterator_get_hi(&it);
638                                 if (hi == OBEX_HEADER_AUTHENTICATION_CHALLENGE){
639                                     pbap_parse_authentication_challenge(pbap_client, obex_iterator_get_data(&it), obex_iterator_get_data_len(&it));
640                                 }
641                             }
642                             pbap_client->state = PBAP_W4_USER_AUTHENTICATION;
643                             pbap_client_emit_authentication_event(pbap_client, pbap_client->authentication_options);
644                             break;
645                         default:
646                             log_info("pbap: obex connect failed, result 0x%02x", packet[0]);
647                             pbap_client->state = PBAP_INIT;
648                             pbap_client_emit_connected_event(pbap_client, OBEX_CONNECT_FAILED);
649                             break;
650                     }
651                     break;
652                 case PBAP_W4_DISCONNECT_RESPONSE:
653                         goep_client_disconnect(pbap_client->goep_cid);
654                         break;
655                 case PBAP_W4_SET_PATH_ROOT_COMPLETE:
656                 case PBAP_W4_SET_PATH_ELEMENT_COMPLETE:
657                     log_info("set path root/path element complete, current folder %s, path offset %u", pbap_client->current_folder, pbap_client->set_path_offset);
658                     if (packet[0] == OBEX_RESP_SUCCESS){
659                         if (pbap_client->current_folder){
660                             pbap_client->state = PBAP_W2_SET_PATH_ELEMENT;
661                             goep_client_request_can_send_now(pbap_client->goep_cid);
662                         } else {
663                             pbap_client->state = PBAP_CONNECTED;
664                             pbap_client_emit_operation_complete_event(pbap_client, 0);
665                         }
666                     } else if (packet[0] == OBEX_RESP_NOT_FOUND){
667                         pbap_client->state = PBAP_CONNECTED;
668                         pbap_client_emit_operation_complete_event(pbap_client, OBEX_NOT_FOUND);
669                     } else {
670                         pbap_client->state = PBAP_CONNECTED;
671                         pbap_client_emit_operation_complete_event(pbap_client, OBEX_UNKNOWN_ERROR);
672                     }
673                     break;
674                 case PBAP_W4_PHONEBOOK:
675                     pbap_client->flow_next_triggered = 0;
676                     wait_for_user = 0;
677                     for (obex_iterator_init_with_response_packet(&it, goep_client_get_request_opcode(pbap_client->goep_cid), packet, size); obex_iterator_has_more(&it) ; obex_iterator_next(&it)){
678                         uint8_t hi = obex_iterator_get_hi(&it);
679                         uint16_t     data_len = obex_iterator_get_data_len(&it);
680                         const uint8_t  * data = data =  obex_iterator_get_data(&it);
681                         switch (hi){
682                             case OBEX_HEADER_BODY:
683                             case OBEX_HEADER_END_OF_BODY:
684                                 pbap_client->client_handler(PBAP_DATA_PACKET, pbap_client->cid, (uint8_t *) data, data_len);
685                                 wait_for_user++;
686                                 if (wait_for_user > 1){
687                                     log_error("wait_for_user %u", wait_for_user);
688                                 }
689                                 break;
690                             default:
691                                 break;
692                         }
693                     }
694                     switch(packet[0]){
695                         case OBEX_RESP_CONTINUE:
696                             pbap_process_srm_headers(pbap_client, packet, size);
697                             if (pbap_client->srm_state ==  SRM_ENABLED) break;
698                             pbap_client->state = PBAP_W2_PULL_PHONEBOOK;
699                             if (!pbap_client->flow_control_enabled || !wait_for_user || pbap_client->flow_next_triggered) {
700                                 goep_client_request_can_send_now(pbap_client->goep_cid);
701                             }
702                             break;
703                         case OBEX_RESP_SUCCESS:
704                             pbap_client->state = PBAP_CONNECTED;
705                             pbap_client_emit_operation_complete_event(pbap_client, 0);
706                             break;
707                         default:
708                             log_info("unexpected response 0x%02x", packet[0]);
709                             pbap_client->state = PBAP_CONNECTED;
710                             pbap_client_emit_operation_complete_event(pbap_client, OBEX_UNKNOWN_ERROR);
711                             break;
712                     }
713                     break;
714                 case PBAP_W4_GET_PHONEBOOK_SIZE_COMPLETE:
715                     pbap_client->state = PBAP_CONNECTED;
716                     if (packet[0] == OBEX_RESP_SUCCESS){
717                         int have_size = 0;
718                         uint16_t phonebook_size;
719                         for (obex_iterator_init_with_response_packet(&it, goep_client_get_request_opcode(pbap_client->goep_cid), packet, size); obex_iterator_has_more(&it) ; obex_iterator_next(&it)){
720                             uint8_t hi = obex_iterator_get_hi(&it);
721                             if (hi == OBEX_HEADER_APPLICATION_PARAMETERS){
722                                 uint16_t     data_len = obex_iterator_get_data_len(&it);
723                                 const uint8_t  * data =  obex_iterator_get_data(&it);
724                                 // iterate over application headers (TLV with 1 bytes len)
725                                 unsigned int i = 0;
726                                 while (i<data_len){
727                                     uint8_t tag = data[i++];
728                                     uint8_t len = data[i++];
729                                     if (tag == PBAP_APPLICATION_PARAMETER_PHONEBOOK_SIZE && len == 2){
730                                         have_size = 1;
731                                         phonebook_size = big_endian_read_16(data, i);
732                                     }
733                                     i+=len;
734                                 }
735                             }
736                         }
737                         if (have_size){
738                             pbap_client_emit_phonebook_size_event(pbap_client, 0, phonebook_size);
739                             break;
740                         }
741                     }
742                     pbap_client_emit_phonebook_size_event(pbap_client, OBEX_UNKNOWN_ERROR, 0);
743                     break;
744                 case PBAP_W4_GET_CARD_LIST_COMPLETE:
745                     switch (packet[0]){
746                         case OBEX_RESP_CONTINUE:
747                             pbap_process_srm_headers(pbap_client, packet, size);
748                             if (pbap_client->srm_state ==  SRM_ENABLED) break;
749                             pbap_client->state = PBAP_W2_GET_CARD_LIST;
750                             if (!pbap_client->flow_control_enabled || !wait_for_user || pbap_client->flow_next_triggered) {
751                                 goep_client_request_can_send_now(pbap_client->goep_cid);
752                             }
753                             break;
754                         case OBEX_RESP_SUCCESS:
755                             for (obex_iterator_init_with_response_packet(&it, goep_client_get_request_opcode(pbap_client->goep_cid), packet, size); obex_iterator_has_more(&it) ; obex_iterator_next(&it)){
756                                 uint8_t hi = obex_iterator_get_hi(&it);
757                                 if (hi == OBEX_HEADER_END_OF_BODY){
758                                     uint16_t     data_len = obex_iterator_get_data_len(&it);
759                                     const uint8_t  * data =  obex_iterator_get_data(&it);
760                                     // now try parsing it
761                                     yxml_init(&pbap_client->xml_parser, pbap_client->xml_buffer, sizeof(pbap_client->xml_buffer));
762                                     int card_found = 0;
763                                     int name_found = 0;
764                                     int handle_found = 0;
765                                     char name[PBAP_MAX_NAME_LEN];
766                                     char handle[PBAP_MAX_HANDLE_LEN];
767                                     name[0] = 0;
768                                     handle[0] = 0;
769                                     while (data_len--){
770                                         yxml_ret_t r = yxml_parse(&pbap_client->xml_parser, *data++);
771                                         switch (r){
772                                             case YXML_ELEMSTART:
773                                                 card_found = strcmp("card", pbap_client->xml_parser.elem) == 0;
774                                                 break;
775                                             case YXML_ELEMEND:
776                                                 if (card_found){
777                                                     pbap_client_emit_card_result_event(pbap_client, name, handle);
778                                                 }
779                                                 card_found = 0;
780                                                 break;
781                                             case YXML_ATTRSTART:
782                                                 if (!card_found) break;
783                                                 if (strcmp("name", pbap_client->xml_parser.attr) == 0){
784                                                     name_found = 1;
785                                                     break;
786                                                 }
787                                                 if (strcmp("handle", pbap_client->xml_parser.attr) == 0){
788                                                     handle_found = 1;
789                                                     break;
790                                                 }
791                                                 break;
792                                             case YXML_ATTRVAL:
793                                                 if (name_found) {
794                                                     // "In UTF-8, characters from the U+0000..U+10FFFF range (the UTF-16 accessible range) are encoded using sequences of 1 to 4 octets."
795                                                     if (strlen(name) + 4 + 1 >= sizeof(name)) break;
796                                                     strcat(name, pbap_client->xml_parser.data);
797                                                     break;
798                                                 }
799                                                 if (handle_found) {
800                                                     // "In UTF-8, characters from the U+0000..U+10FFFF range (the UTF-16 accessible range) are encoded using sequences of 1 to 4 octets."
801                                                     if (strlen(handle) + 4 + 1 >= sizeof(handle)) break;
802                                                     strcat(handle, pbap_client->xml_parser.data);
803                                                     break;
804                                                 }
805                                                 break;
806                                             case YXML_ATTREND:
807                                                 name_found = 0;
808                                                 handle_found = 0;
809                                                 break;
810                                             default:
811                                                 break;
812                                         }
813                                     }
814                                 }
815                                 //
816                                 pbap_client->state = PBAP_CONNECTED;
817                                 pbap_client_emit_operation_complete_event(pbap_client, 0);
818                             }
819                             break;
820                         case OBEX_RESP_NOT_ACCEPTABLE:
821                             pbap_client->state = PBAP_CONNECTED;
822                             pbap_client_emit_operation_complete_event(pbap_client, OBEX_NOT_ACCEPTABLE);
823                             break;
824                         default:
825                             log_info("unexpected response 0x%02x", packet[0]);
826                             pbap_client->state = PBAP_CONNECTED;
827                             pbap_client_emit_operation_complete_event(pbap_client, OBEX_UNKNOWN_ERROR);
828                             break;
829                     }
830                     break;
831                 case PBAP_W4_GET_CARD_ENTRY_COMPLETE:
832                     switch (packet[0]){
833                         case OBEX_RESP_CONTINUE:
834                             pbap_process_srm_headers(pbap_client, packet, size);
835                             if (pbap_client->srm_state ==  SRM_ENABLED) break;
836                             pbap_client->state = PBAP_W2_GET_CARD_ENTRY;
837                             if (!pbap_client->flow_control_enabled || !wait_for_user || pbap_client->flow_next_triggered) {
838                                 goep_client_request_can_send_now(pbap_client->goep_cid);
839                             }
840                             break;
841                         case OBEX_RESP_SUCCESS:
842                             for (obex_iterator_init_with_response_packet(&it, goep_client_get_request_opcode(pbap_client->goep_cid), packet, size); obex_iterator_has_more(&it) ; obex_iterator_next(&it)){
843                                 uint8_t hi = obex_iterator_get_hi(&it);
844                                 if (hi == OBEX_HEADER_END_OF_BODY){
845                                     // uint16_t     data_len = obex_iterator_get_data_len(&it);
846                                     // const uint8_t  * data =  obex_iterator_get_data(&it);
847                                     // now try parsing it
848                                 }
849                             }
850                             pbap_client->state = PBAP_CONNECTED;
851                             pbap_client_emit_operation_complete_event(pbap_client, 0);
852                             break;
853                         case OBEX_RESP_NOT_ACCEPTABLE:
854                             pbap_client->state = PBAP_CONNECTED;
855                             pbap_client_emit_operation_complete_event(pbap_client, OBEX_NOT_ACCEPTABLE);
856                             break;
857                         default:
858                             log_info("unexpected response 0x%02x", packet[0]);
859                             pbap_client->state = PBAP_CONNECTED;
860                             pbap_client_emit_operation_complete_event(pbap_client, OBEX_UNKNOWN_ERROR);
861                             break;
862                     }
863                     break;
864                 default:
865                     break;
866             }
867             break;
868         default:
869             break;
870     }
871 }
872 
873 void pbap_client_init(void){
874     memset(pbap_client, 0, sizeof(pbap_client_t));
875     pbap_client->state = PBAP_INIT;
876     pbap_client->cid = 1;
877 }
878 
879 uint8_t pbap_connect(btstack_packet_handler_t handler, bd_addr_t addr, uint16_t * out_cid){
880     if (pbap_client->state != PBAP_INIT) return BTSTACK_MEMORY_ALLOC_FAILED;
881 
882     pbap_client->state = PBAP_W4_GOEP_CONNECTION;
883     pbap_client->client_handler = handler;
884     pbap_client->vcard_selector = 0;
885     pbap_client->vcard_selector_operator = PBAP_VCARD_SELECTOR_OPERATOR_OR;
886 
887     uint8_t err = goep_client_create_connection(&pbap_packet_handler, addr, BLUETOOTH_SERVICE_CLASS_PHONEBOOK_ACCESS_PSE, &pbap_client->goep_cid);
888     *out_cid = pbap_client->cid;
889     if (err) return err;
890     return 0;
891 }
892 
893 uint8_t pbap_disconnect(uint16_t pbap_cid){
894     UNUSED(pbap_cid);
895     if (pbap_client->state != PBAP_CONNECTED) return BTSTACK_BUSY;
896     pbap_client->state = PBAP_W2_SEND_DISCONNECT_REQUEST;
897     goep_client_request_can_send_now(pbap_client->goep_cid);
898     return 0;
899 }
900 
901 uint8_t pbap_get_phonebook_size(uint16_t pbap_cid, const char * path){
902     UNUSED(pbap_cid);
903     if (pbap_client->state != PBAP_CONNECTED) return BTSTACK_BUSY;
904     pbap_client->state = PBAP_W2_GET_PHONEBOOK_SIZE;
905     pbap_client->phonebook_path = path;
906     pbap_client->request_number = 0;
907     goep_client_request_can_send_now(pbap_client->goep_cid);
908     return 0;
909 }
910 
911 uint8_t pbap_pull_phonebook(uint16_t pbap_cid, const char * path){
912     UNUSED(pbap_cid);
913     if (pbap_client->state != PBAP_CONNECTED) return BTSTACK_BUSY;
914     pbap_client->state = PBAP_W2_PULL_PHONEBOOK;
915     pbap_client->phonebook_path = path;
916     pbap_client->request_number = 0;
917     goep_client_request_can_send_now(pbap_client->goep_cid);
918     return 0;
919 }
920 
921 uint8_t pbap_set_phonebook(uint16_t pbap_cid, const char * path){
922     UNUSED(pbap_cid);
923     if (pbap_client->state != PBAP_CONNECTED) return BTSTACK_BUSY;
924     pbap_client->state = PBAP_W2_SET_PATH_ROOT;
925     pbap_client->current_folder = path;
926     pbap_client->set_path_offset = 0;
927     goep_client_request_can_send_now(pbap_client->goep_cid);
928     return 0;
929 }
930 
931 uint8_t pbap_authentication_password(uint16_t pbap_cid, const char * password){
932     UNUSED(pbap_cid);
933     if (pbap_client->state != PBAP_W4_USER_AUTHENTICATION) return BTSTACK_BUSY;
934     pbap_client->state = PBAP_W2_SEND_AUTHENTICATED_CONNECT;
935     pbap_client->authentication_password = password;
936     goep_client_request_can_send_now(pbap_client->goep_cid);
937     return 0;
938 }
939 
940 uint8_t pbap_pull_vcard_listing(uint16_t pbap_cid, const char * path){
941     UNUSED(pbap_cid);
942     if (pbap_client->state != PBAP_CONNECTED) return BTSTACK_BUSY;
943     pbap_client->state = PBAP_W2_GET_CARD_LIST;
944     pbap_client->phonebook_path = path;
945     pbap_client->phone_number = NULL;
946     pbap_client->request_number = 0;
947     goep_client_request_can_send_now(pbap_client->goep_cid);
948     return 0;
949 }
950 
951 uint8_t pbap_pull_vcard_entry(uint16_t pbap_cid, const char * path){
952     UNUSED(pbap_cid);
953     if (pbap_client->state != PBAP_CONNECTED) return BTSTACK_BUSY;
954     pbap_client->state = PBAP_W2_GET_CARD_ENTRY;
955     // pbap_client->phonebook_path = NULL;
956     // pbap_client->phone_number = NULL;
957     pbap_client->vcard_name = path;
958     pbap_client->request_number = 0;
959     goep_client_request_can_send_now(pbap_client->goep_cid);
960     return 0;
961 }
962 
963 uint8_t pbap_lookup_by_number(uint16_t pbap_cid, const char * phone_number){
964     UNUSED(pbap_cid);
965     if (pbap_client->state != PBAP_CONNECTED) return BTSTACK_BUSY;
966     pbap_client->state = PBAP_W2_GET_CARD_LIST;
967     pbap_client->phonebook_path = pbap_vcard_listing_name;
968     pbap_client->phone_number   = phone_number;
969     pbap_client->request_number = 0;
970     goep_client_request_can_send_now(pbap_client->goep_cid);
971     return 0;
972 }
973 
974 uint8_t pbap_abort(uint16_t pbap_cid){
975     UNUSED(pbap_cid);
976     log_info("abort current operation, state 0x%02x", pbap_client->state);
977     pbap_client->abort_operation = 1;
978     goep_client_request_can_send_now(pbap_client->goep_cid);
979     return 0;
980 }
981 
982 uint8_t pbap_next_packet(uint16_t pbap_cid){
983     // log_info("pbap_next_packet, state %x", pbap_client->state);
984     UNUSED(pbap_cid);
985     if (!pbap_client->flow_control_enabled) return 0;
986     switch (pbap_client->state){
987         case PBAP_W2_PULL_PHONEBOOK:
988             goep_client_request_can_send_now(pbap_client->goep_cid);
989             break;
990         case PBAP_W4_PHONEBOOK:
991             pbap_client->flow_next_triggered = 1;
992             break;
993         default:
994             break;
995     }
996     return 0;
997 }
998 
999 uint8_t pbap_set_flow_control_mode(uint16_t pbap_cid, int enable){
1000     UNUSED(pbap_cid);
1001     if (pbap_client->state != PBAP_CONNECTED) return BTSTACK_BUSY;
1002     pbap_client->flow_control_enabled = enable;
1003     return 0;
1004 }
1005 
1006 uint8_t pbap_set_vcard_selector(uint16_t pbap_cid, uint32_t vcard_selector){
1007     UNUSED(pbap_cid);
1008     pbap_client->vcard_selector = vcard_selector;
1009     return 0;
1010 }
1011 
1012 uint8_t pbap_set_vcard_selector_operator(uint16_t pbap_cid, int vcard_selector_operator){
1013     UNUSED(pbap_cid);
1014     pbap_client->vcard_selector_operator = vcard_selector_operator;
1015     return 0;
1016 }
1017