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