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