xref: /btstack/src/classic/pbap_client.c (revision f6fb536452573216b8c12692b87b78ef0221df9e)
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_phonebook_name = "pb.vcf";
70 
71 const char * pbap_vcard_listing_type = "x-bt/vcard-listing";
72 const char * pbap_vcard_listing_name = "pb";
73 
74 // default
75 static uint32_t pbap_supported_features = 0x0000;
76 
77 typedef enum {
78     PBAP_INIT = 0,
79     PBAP_W4_GOEP_CONNECTION,
80     PBAP_W2_SEND_CONNECT_REQUEST,
81     PBAP_W4_CONNECT_RESPONSE,
82     PBAP_W4_USER_AUTHENTICATION,
83     PBAP_W2_SEND_AUTHENTICATED_CONNECT,
84     PBAP_CONNECT_RESPONSE_RECEIVED,
85     PBAP_CONNECTED,
86     //
87     PBAP_W2_SEND_DISCONNECT_REQUEST,
88     PBAP_W4_DISCONNECT_RESPONSE,
89     //
90     PBAP_W2_PULL_PHONEBOOK,
91     PBAP_W4_PHONEBOOK,
92     PBAP_W2_SET_PATH_ROOT,
93     PBAP_W4_SET_PATH_ROOT_COMPLETE,
94     PBAP_W2_SET_PATH_ELEMENT,
95     PBAP_W4_SET_PATH_ELEMENT_COMPLETE,
96     PBAP_W2_GET_PHONEBOOK_SIZE,
97     PBAP_W4_GET_PHONEBOOK_SIZE_COMPLETE,
98     //
99     PBAP_W2_GET_CARD_LIST,
100     PBAP_W4_GET_CARD_LIST_COMPLETE,
101 
102 } pbap_state_t;
103 
104 typedef struct pbap_client {
105     pbap_state_t state;
106     uint16_t  cid;
107     bd_addr_t bd_addr;
108     hci_con_handle_t con_handle;
109     uint8_t   incoming;
110     uint16_t  goep_cid;
111     btstack_packet_handler_t client_handler;
112     const char * current_folder;
113     const char * phone_number;
114     uint16_t set_path_offset;
115     uint8_t  authentication_options;
116     uint16_t authentication_nonce[16];
117     const char * authentication_password;
118     yxml_t  xml_parser;
119     uint8_t xml_buffer[50];
120 } pbap_client_t;
121 
122 static pbap_client_t _pbap_client;
123 static pbap_client_t * pbap_client = &_pbap_client;
124 
125 static void pbap_client_emit_connected_event(pbap_client_t * context, uint8_t status){
126     uint8_t event[15];
127     int pos = 0;
128     event[pos++] = HCI_EVENT_PBAP_META;
129     pos++;  // skip len
130     event[pos++] = PBAP_SUBEVENT_CONNECTION_OPENED;
131     little_endian_store_16(event,pos,context->cid);
132     pos+=2;
133     event[pos++] = status;
134     memcpy(&event[pos], context->bd_addr, 6);
135     pos += 6;
136     little_endian_store_16(event,pos,context->con_handle);
137     pos += 2;
138     event[pos++] = context->incoming;
139     event[1] = pos - 2;
140     if (pos != sizeof(event)) log_error("goep_client_emit_connected_event size %u", pos);
141     context->client_handler(HCI_EVENT_PACKET, context->cid, &event[0], pos);
142 }
143 
144 static void pbap_client_emit_connection_closed_event(pbap_client_t * context){
145     uint8_t event[5];
146     int pos = 0;
147     event[pos++] = HCI_EVENT_PBAP_META;
148     pos++;  // skip len
149     event[pos++] = PBAP_SUBEVENT_CONNECTION_CLOSED;
150     little_endian_store_16(event,pos,context->cid);
151     pos+=2;
152     event[1] = pos - 2;
153     if (pos != sizeof(event)) log_error("pbap_client_emit_connection_closed_event size %u", pos);
154     context->client_handler(HCI_EVENT_PACKET, context->cid, &event[0], pos);
155 }
156 
157 static void pbap_client_emit_operation_complete_event(pbap_client_t * context, uint8_t status){
158     uint8_t event[6];
159     int pos = 0;
160     event[pos++] = HCI_EVENT_PBAP_META;
161     pos++;  // skip len
162     event[pos++] = PBAP_SUBEVENT_OPERATION_COMPLETED;
163     little_endian_store_16(event,pos,context->cid);
164     pos+=2;
165     event[pos++]= status;
166     event[1] = pos - 2;
167     if (pos != sizeof(event)) log_error("pbap_client_emit_can_send_now_event size %u", pos);
168     context->client_handler(HCI_EVENT_PACKET, context->cid, &event[0], pos);
169 }
170 
171 static void pbap_client_emit_phonebook_size_event(pbap_client_t * context, uint8_t status, uint16_t phonebook_size){
172     uint8_t event[8];
173     int pos = 0;
174     event[pos++] = HCI_EVENT_PBAP_META;
175     pos++;  // skip len
176     event[pos++] = PBAP_SUBEVENT_PHONEBOOK_SIZE;
177     little_endian_store_16(event,pos,context->cid);
178     pos+=2;
179     event[pos++] = status;
180     little_endian_store_16(event,pos, phonebook_size);
181     pos+=2;
182     event[1] = pos - 2;
183     if (pos != sizeof(event)) log_error("pbap_client_emit_phonebook_size_event size %u", pos);
184     context->client_handler(HCI_EVENT_PACKET, context->cid, &event[0], pos);
185 }
186 
187 static void pbap_client_emit_authentication_event(pbap_client_t * context, uint8_t options){
188     // split options
189     uint8_t user_id_required = options & 1 ? 1 : 0;
190     uint8_t full_access      = options & 2 ? 1 : 0;
191 
192     uint8_t event[7];
193     int pos = 0;
194     event[pos++] = HCI_EVENT_PBAP_META;
195     pos++;  // skip len
196     event[pos++] = PBAP_SUBEVENT_AUTHENTICATION_REQUEST;
197     little_endian_store_16(event,pos,context->cid);
198     pos+=2;
199     event[pos++] = user_id_required;
200     event[pos++] = full_access;
201     if (pos != sizeof(event)) log_error("pbap_client_emit_authentication_event size %u", pos);
202     context->client_handler(HCI_EVENT_PACKET, context->cid, &event[0], pos);
203 }
204 
205 static void pbap_client_emit_card_result_event(pbap_client_t * context, const char * name, const char * handle){
206     uint8_t event[5 + PBAP_MAX_NAME_LEN + PBAP_MAX_HANDLE_LEN];
207     int pos = 0;
208     event[pos++] = HCI_EVENT_PBAP_META;
209     pos++;  // skip len
210     event[pos++] = PBAP_SUBEVENT_CARD_RESULT;
211     little_endian_store_16(event,pos,context->cid);
212     pos+=2;
213     int name_len = btstack_min(PBAP_MAX_NAME_LEN, strlen(name));
214     event[pos++] = name_len;
215     memcpy(&event[pos], name, name_len);
216     pos += name_len;
217     int handle_len = btstack_min(PBAP_MAX_HANDLE_LEN, strlen(handle));
218     event[pos++] = handle_len;
219     memcpy(&event[pos], handle, handle_len);
220     pos += handle_len;
221     event[1] = pos - 2;
222     context->client_handler(HCI_EVENT_PACKET, context->cid, &event[0], pos);
223 }
224 
225 static const uint8_t collon = (uint8_t) ':';
226 
227 static void pbap_handle_can_send_now(void){
228     uint8_t  path_element[20];
229     uint16_t path_element_start;
230     uint16_t path_element_len;
231     uint8_t  application_parameters[PBAP_MAX_PHONE_NUMBER_LEN + 10];
232     uint8_t  challenge_response[36];
233     int i;
234     uint16_t phone_number_len;
235 
236     MD5_CTX md5_ctx;
237 
238     switch (pbap_client->state){
239         case PBAP_W2_SEND_CONNECT_REQUEST:
240             goep_client_create_connect_request(pbap_client->goep_cid, OBEX_VERSION, 0, OBEX_MAX_PACKETLEN_DEFAULT);
241             goep_client_add_header_target(pbap_client->goep_cid, 16, pbap_uuid);
242             // Mandatory if the PSE advertises a PbapSupportedFeatures attribute in its SDP record, else excluded.
243             if (goep_client_get_pbap_supported_features(pbap_client->goep_cid) != PBAP_FEATURES_NOT_PRESENT){
244                 application_parameters[0] = PBAP_APPLICATION_PARAMETER_PBAP_SUPPORTED_FEATURES;
245                 application_parameters[1] = 4;
246                 big_endian_store_32(application_parameters, 2, pbap_supported_features);
247                 goep_client_add_header_application_parameters(pbap_client->goep_cid, 6, &application_parameters[0]);
248             }
249             pbap_client->state = PBAP_W4_CONNECT_RESPONSE;
250             goep_client_execute(pbap_client->goep_cid);
251             break;
252         case PBAP_W2_SEND_AUTHENTICATED_CONNECT:
253             goep_client_create_connect_request(pbap_client->goep_cid, OBEX_VERSION, 0, OBEX_MAX_PACKETLEN_DEFAULT);
254             goep_client_add_header_target(pbap_client->goep_cid, 16, pbap_uuid);
255             // setup authentication challenge response
256             i = 0;
257             challenge_response[i++] = 0;  // Tag Digest
258             challenge_response[i++] = 16; // Len
259             // calculate md5
260             MD5_Init(&md5_ctx);
261             MD5_Update(&md5_ctx, pbap_client->authentication_nonce, 16);
262             MD5_Update(&md5_ctx, &collon, 1);
263             MD5_Update(&md5_ctx, pbap_client->authentication_password, strlen(pbap_client->authentication_password));
264             MD5_Final(&challenge_response[i], &md5_ctx);
265             i += 16;
266             challenge_response[i++] = 2;  // Tag Nonce
267             challenge_response[i++] = 16; // Len
268             memcpy(&challenge_response[i], pbap_client->authentication_nonce, 16);
269             i += 16;
270             goep_client_add_header_challenge_response(pbap_client->goep_cid, i, challenge_response);
271             pbap_client->state = PBAP_W4_CONNECT_RESPONSE;
272             goep_client_execute(pbap_client->goep_cid);
273             break;
274         case PBAP_W2_SEND_DISCONNECT_REQUEST:
275             goep_client_create_disconnect_request(pbap_client->goep_cid);
276             pbap_client->state = PBAP_W4_DISCONNECT_RESPONSE;
277             goep_client_execute(pbap_client->goep_cid);
278             return;
279         case PBAP_W2_PULL_PHONEBOOK:
280         case PBAP_W2_GET_PHONEBOOK_SIZE:
281             goep_client_create_get_request(pbap_client->goep_cid);
282             goep_client_add_header_name(pbap_client->goep_cid, "telecom/pb.vcf");
283             goep_client_add_header_type(pbap_client->goep_cid, pbap_phonebook_type);
284             if (pbap_client->state == PBAP_W2_GET_PHONEBOOK_SIZE){
285                 // Regular TLV wih 1-byte len
286                 application_parameters[0] = PBAP_APPLICATION_PARAMETER_MAX_LIST_COUNT;
287                 application_parameters[1] = 2;
288                 big_endian_store_16(application_parameters, 2, 0);
289                 goep_client_add_header_application_parameters(pbap_client->goep_cid, 4, &application_parameters[0]);
290                 // state
291                 pbap_client->state = PBAP_W4_GET_PHONEBOOK_SIZE_COMPLETE;
292             } else {
293 #if 1
294                 // Regular TLV wih 1-byte len
295                 application_parameters[0] = PBAP_APPLICATION_PARAMETER_MAX_LIST_COUNT;
296                 application_parameters[1] = 2;
297                 big_endian_store_16(application_parameters, 2, 0xffff);
298                 goep_client_add_header_application_parameters(pbap_client->goep_cid, 4, &application_parameters[0]);
299 #endif
300                 // state
301                 pbap_client->state = PBAP_W4_PHONEBOOK;
302             }
303             // send packet
304             goep_client_execute(pbap_client->goep_cid);
305             break;
306         case PBAP_W2_GET_CARD_LIST:
307             goep_client_create_get_request(pbap_client->goep_cid);
308             goep_client_add_header_type(pbap_client->goep_cid, pbap_vcard_listing_type);
309             goep_client_add_header_name(pbap_client->goep_cid, pbap_vcard_listing_name);
310             // Regular TLV wih 1-byte len
311             i = 0;
312             phone_number_len = btstack_min(PBAP_MAX_PHONE_NUMBER_LEN, strlen(pbap_client->phone_number));
313             application_parameters[i++] = PBAP_APPLICATION_PARAMETER_SEARCH_VALUE;
314             application_parameters[i++] = phone_number_len;
315             memcpy(&application_parameters[i], pbap_client->phone_number, phone_number_len);
316             i += phone_number_len;
317             application_parameters[i++] = PBAP_APPLICATION_PARAMETER_SEARCH_PROPERTY;
318             application_parameters[i++] = 1;
319             application_parameters[i++] = 0x01; // Number
320             goep_client_add_header_application_parameters(pbap_client->goep_cid, i, &application_parameters[0]);
321             pbap_client->state = PBAP_W4_GET_CARD_LIST_COMPLETE;
322             // send packet
323             goep_client_execute(pbap_client->goep_cid);
324             break;
325         case PBAP_W2_SET_PATH_ROOT:
326             goep_client_create_set_path_request(pbap_client->goep_cid, 1 << 1); // Don’t create directory
327             // On Android 4.2 Cyanogenmod, using "" as path fails
328             // goep_client_add_header_name(pbap_client->goep_cid, "");     // empty == /
329             // state
330             pbap_client->state = PBAP_W4_SET_PATH_ROOT_COMPLETE;
331             // send packet
332             goep_client_execute(pbap_client->goep_cid);
333             break;
334         case PBAP_W2_SET_PATH_ELEMENT:
335             // find '/' or '\0'
336             path_element_start = pbap_client->set_path_offset;
337             while (pbap_client->current_folder[pbap_client->set_path_offset] != '\0' &&
338                 pbap_client->current_folder[pbap_client->set_path_offset] != '/'){
339                 pbap_client->set_path_offset++;
340             }
341             // skip /
342             if (pbap_client->current_folder[pbap_client->set_path_offset] == '/'){
343                 pbap_client->set_path_offset++;
344             }
345             path_element_len = pbap_client->set_path_offset-path_element_start;
346             memcpy(path_element, &pbap_client->current_folder[path_element_start], path_element_len);
347             path_element[path_element_len] = 0;
348 
349             // detect end of path (after setting path_element)
350             if (pbap_client->current_folder[pbap_client->set_path_offset] == '\0'){
351                 pbap_client->current_folder = NULL;
352             }
353 
354             log_info("Path element '%s', done %u", path_element, pbap_client->current_folder == NULL);
355 
356             goep_client_create_set_path_request(pbap_client->goep_cid, 1 << 1); // Don’t create directory
357             goep_client_add_header_name(pbap_client->goep_cid, (const char *) path_element); // next element
358             // state
359             pbap_client->state = PBAP_W4_SET_PATH_ELEMENT_COMPLETE;
360             // send packet
361             goep_client_execute(pbap_client->goep_cid);
362             break;
363         default:
364             break;
365     }
366 }
367 
368 static void pbap_parse_authentication_challenge(pbap_client_t * context, const uint8_t * challenge_data, uint16_t challenge_len){
369     // printf("Challenge:  ");
370     // printf_hexdump(challenge_data, challenge_len);
371     int i;
372     // uint8_t charset_code = 0;
373     for (i=0 ; i<challenge_len ; ){
374         int tag = challenge_data[i];
375         int len = challenge_data[i + 1];
376         i += 2;
377         switch (tag) {
378             case 0:
379                 if (len != 0x10) {
380                     log_error("Invalid OBEX digest len %u", len);
381                     return;
382                 }
383                 memcpy(context->authentication_nonce, &challenge_data[i], 16);
384                 // printf("Nonce: ");
385                 // printf_hexdump(context->authentication_nonce, 16);
386                 break;
387             case 1:
388                 context->authentication_options = challenge_data[i];
389                 // printf("Options %u\n", context->authentication_options);
390                 break;
391             case 2:
392                 // TODO: handle charset
393                 // charset_code = challenge_data[i];
394                 break;
395         }
396         i += len;
397     }
398 }
399 
400 static void pbap_packet_handler(uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size){
401 
402     UNUSED(channel); // ok: there is no channel
403     UNUSED(size);    // ok: handling own geop events
404 
405     obex_iterator_t it;
406     uint8_t status;
407     switch (packet_type){
408         case HCI_EVENT_PACKET:
409             switch (hci_event_packet_get_type(packet)) {
410                 case HCI_EVENT_GOEP_META:
411                     switch (hci_event_goep_meta_get_subevent_code(packet)){
412                         case GOEP_SUBEVENT_CONNECTION_OPENED:
413                             status = goep_subevent_connection_opened_get_status(packet);
414                             pbap_client->con_handle = goep_subevent_connection_opened_get_con_handle(packet);
415                             pbap_client->incoming = goep_subevent_connection_opened_get_incoming(packet);
416                             goep_subevent_connection_opened_get_bd_addr(packet, pbap_client->bd_addr);
417                             if (status){
418                                 log_info("pbap: connection failed %u", status);
419                                 pbap_client->state = PBAP_INIT;
420                                 pbap_client_emit_connected_event(pbap_client, status);
421                             } else {
422                                 log_info("pbap: connection established");
423                                 pbap_client->goep_cid = goep_subevent_connection_opened_get_goep_cid(packet);
424                                 pbap_client->state = PBAP_W2_SEND_CONNECT_REQUEST;
425                                 goep_client_request_can_send_now(pbap_client->goep_cid);
426                             }
427                             break;
428                         case GOEP_SUBEVENT_CONNECTION_CLOSED:
429                             if (pbap_client->state != PBAP_CONNECTED){
430                                 pbap_client_emit_operation_complete_event(pbap_client, OBEX_DISCONNECTED);
431                             }
432                             pbap_client->state = PBAP_INIT;
433                             pbap_client_emit_connection_closed_event(pbap_client);
434                             break;
435                         case GOEP_SUBEVENT_CAN_SEND_NOW:
436                             pbap_handle_can_send_now();
437                             break;
438                     }
439                     break;
440                 default:
441                     break;
442             }
443             break;
444         case GOEP_DATA_PACKET:
445             // TODO: handle chunked data
446             // obex_dump_packet(goep_client_get_request_opcode(pbap_client->goep_cid), packet, size);
447             switch (pbap_client->state){
448                 case PBAP_W4_CONNECT_RESPONSE:
449                     switch (packet[0]){
450                         case OBEX_RESP_SUCCESS:
451                             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)){
452                                 uint8_t hi = obex_iterator_get_hi(&it);
453                                 if (hi == OBEX_HEADER_CONNECTION_ID){
454                                     goep_client_set_connection_id(pbap_client->goep_cid, obex_iterator_get_data_32(&it));
455                                 }
456                             }
457                             pbap_client->state = PBAP_CONNECTED;
458                             pbap_client_emit_connected_event(pbap_client, 0);
459                             break;
460                         case OBEX_RESP_UNAUTHORIZED:
461                             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)){
462                                 uint8_t hi = obex_iterator_get_hi(&it);
463                                 if (hi == OBEX_HEADER_AUTHENTICATION_CHALLENGE){
464                                     pbap_parse_authentication_challenge(pbap_client, obex_iterator_get_data(&it), obex_iterator_get_data_len(&it));
465                                 }
466                             }
467                             pbap_client->state = PBAP_W4_USER_AUTHENTICATION;
468                             pbap_client_emit_authentication_event(pbap_client, pbap_client->authentication_options);
469                             break;
470                         default:
471                             log_info("pbap: obex connect failed, result 0x%02x", packet[0]);
472                             pbap_client->state = PBAP_INIT;
473                             pbap_client_emit_connected_event(pbap_client, OBEX_CONNECT_FAILED);
474                             break;
475                     }
476                     break;
477                 case PBAP_W4_DISCONNECT_RESPONSE:
478                         goep_client_disconnect(pbap_client->goep_cid);
479                         break;
480                 case PBAP_W4_SET_PATH_ROOT_COMPLETE:
481                 case PBAP_W4_SET_PATH_ELEMENT_COMPLETE:
482                     log_info("set path root/path element complete, current folder %s, path offset %u", pbap_client->current_folder, pbap_client->set_path_offset);
483                     if (packet[0] == OBEX_RESP_SUCCESS){
484                         if (pbap_client->current_folder){
485                             pbap_client->state = PBAP_W2_SET_PATH_ELEMENT;
486                             goep_client_request_can_send_now(pbap_client->goep_cid);
487                         } else {
488                             pbap_client->state = PBAP_CONNECTED;
489                             pbap_client_emit_operation_complete_event(pbap_client, 0);
490                         }
491                     } else if (packet[0] == OBEX_RESP_NOT_FOUND){
492                         pbap_client->state = PBAP_CONNECTED;
493                         pbap_client_emit_operation_complete_event(pbap_client, OBEX_NOT_FOUND);
494                     } else {
495                         pbap_client->state = PBAP_CONNECTED;
496                         pbap_client_emit_operation_complete_event(pbap_client, OBEX_UNKNOWN_ERROR);
497                     }
498                     break;
499                 case PBAP_W4_PHONEBOOK:
500                     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)){
501                         uint8_t hi = obex_iterator_get_hi(&it);
502                         if (hi == OBEX_HEADER_BODY || hi == OBEX_HEADER_END_OF_BODY){
503                             uint16_t     data_len = obex_iterator_get_data_len(&it);
504                             const uint8_t  * data =  obex_iterator_get_data(&it);
505                             pbap_client->client_handler(PBAP_DATA_PACKET, pbap_client->cid, (uint8_t *) data, data_len);
506                         }
507                     }
508                     switch(packet[0]){
509                         case OBEX_RESP_CONTINUE:
510                             pbap_client->state = PBAP_W2_PULL_PHONEBOOK;
511                             goep_client_request_can_send_now(pbap_client->goep_cid);
512                             break;
513                         case OBEX_RESP_SUCCESS:
514                             pbap_client->state = PBAP_CONNECTED;
515                             pbap_client_emit_operation_complete_event(pbap_client, 0);
516                             break;
517                         default:
518                             log_info("unexpected response 0x%02x", packet[0]);
519                             pbap_client->state = PBAP_CONNECTED;
520                             pbap_client_emit_operation_complete_event(pbap_client, OBEX_UNKNOWN_ERROR);
521                             break;
522                     }
523                     break;
524                 case PBAP_W4_GET_PHONEBOOK_SIZE_COMPLETE:
525                     pbap_client->state = PBAP_CONNECTED;
526                     if (packet[0] == OBEX_RESP_SUCCESS){
527                         int have_size = 0;
528                         uint16_t phonebook_size;
529                         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)){
530                             uint8_t hi = obex_iterator_get_hi(&it);
531                             if (hi == OBEX_HEADER_APPLICATION_PARAMETERS){
532                                 uint16_t     data_len = obex_iterator_get_data_len(&it);
533                                 const uint8_t  * data =  obex_iterator_get_data(&it);
534                                 // iterate over application headers (TLV with 1 bytes len)
535                                 unsigned int i = 0;
536                                 while (i<data_len){
537                                     uint8_t tag = data[i++];
538                                     uint8_t len = data[i++];
539                                     if (tag == PBAP_APPLICATION_PARAMETER_PHONEBOOK_SIZE && len == 2){
540                                         have_size = 1;
541                                         phonebook_size = big_endian_read_16(data, i);
542                                     }
543                                     i+=len;
544                                 }
545                             }
546                         }
547                         if (have_size){
548                             pbap_client_emit_phonebook_size_event(pbap_client, 0, phonebook_size);
549                             break;
550                         }
551                     }
552                     pbap_client_emit_phonebook_size_event(pbap_client, OBEX_UNKNOWN_ERROR, 0);
553                     break;
554                 case PBAP_W4_GET_CARD_LIST_COMPLETE:
555                     switch (packet[0]){
556                         case OBEX_RESP_CONTINUE:
557                             pbap_client->state = PBAP_W2_GET_CARD_LIST;
558                             goep_client_request_can_send_now(pbap_client->goep_cid);
559                             break;
560                         case OBEX_RESP_SUCCESS:
561                             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)){
562                                 uint8_t hi = obex_iterator_get_hi(&it);
563                                 if (hi == OBEX_HEADER_END_OF_BODY){
564                                     uint16_t     data_len = obex_iterator_get_data_len(&it);
565                                     const uint8_t  * data =  obex_iterator_get_data(&it);
566                                     // now try parsing it
567                                     yxml_init(&pbap_client->xml_parser, pbap_client->xml_buffer, sizeof(pbap_client->xml_buffer));
568                                     int card_found = 0;
569                                     int name_found = 0;
570                                     int handle_found = 0;
571                                     char name[PBAP_MAX_NAME_LEN];
572                                     char handle[PBAP_MAX_HANDLE_LEN];
573                                     name[0] = 0;
574                                     handle[0] = 0;
575                                     while (data_len--){
576                                         yxml_ret_t r = yxml_parse(&pbap_client->xml_parser, *data++);
577                                         switch (r){
578                                             case YXML_ELEMSTART:
579                                                 card_found = strcmp("card", pbap_client->xml_parser.elem) == 0;
580                                                 break;
581                                             case YXML_ELEMEND:
582                                                 if (card_found){
583                                                     pbap_client_emit_card_result_event(pbap_client, name, handle);
584                                                 }
585                                                 card_found = 0;
586                                                 break;
587                                             case YXML_ATTRSTART:
588                                                 if (!card_found) break;
589                                                 if (strcmp("name", pbap_client->xml_parser.attr) == 0){
590                                                     name_found = 1;
591                                                     break;
592                                                 }
593                                                 if (strcmp("handle", pbap_client->xml_parser.attr) == 0){
594                                                     handle_found = 1;
595                                                     break;
596                                                 }
597                                                 break;
598                                             case YXML_ATTRVAL:
599                                                 if (name_found) {
600                                                     // "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."
601                                                     if (strlen(name) + 4 + 1 >= sizeof(name)) break;
602                                                     strcat(name, pbap_client->xml_parser.data);
603                                                     break;
604                                                 }
605                                                 if (handle_found) {
606                                                     // "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."
607                                                     if (strlen(handle) + 4 + 1 >= sizeof(handle)) break;
608                                                     strcat(handle, pbap_client->xml_parser.data);
609                                                     break;
610                                                 }
611                                                 break;
612                                             case YXML_ATTREND:
613                                                 name_found = 0;
614                                                 handle_found = 0;
615                                                 break;
616                                             default:
617                                                 break;
618                                         }
619                                     }
620                                     //
621                                     pbap_client->state = PBAP_CONNECTED;
622                                     pbap_client_emit_operation_complete_event(pbap_client, 0);
623                                 }
624                             }
625                             break;
626                         case OBEX_RESP_NOT_ACCEPTABLE:
627                             pbap_client->state = PBAP_CONNECTED;
628                             pbap_client_emit_operation_complete_event(pbap_client, OBEX_NOT_ACCEPTABLE);
629                             break;
630                         default:
631                             log_info("unexpected response 0x%02x", packet[0]);
632                             pbap_client->state = PBAP_CONNECTED;
633                             pbap_client_emit_operation_complete_event(pbap_client, OBEX_UNKNOWN_ERROR);
634                             break;
635                     }
636                     break;
637                 default:
638                     break;
639             }
640             break;
641         default:
642             break;
643     }
644 }
645 
646 void pbap_client_init(void){
647     memset(pbap_client, 0, sizeof(pbap_client_t));
648     pbap_client->state = PBAP_INIT;
649     pbap_client->cid = 1;
650 }
651 
652 uint8_t pbap_connect(btstack_packet_handler_t handler, bd_addr_t addr, uint16_t * out_cid){
653     if (pbap_client->state != PBAP_INIT) return BTSTACK_MEMORY_ALLOC_FAILED;
654     pbap_client->state = PBAP_W4_GOEP_CONNECTION;
655     pbap_client->client_handler = handler;
656     uint8_t err = goep_client_create_connection(&pbap_packet_handler, addr, BLUETOOTH_SERVICE_CLASS_PHONEBOOK_ACCESS_PSE, &pbap_client->goep_cid);
657     *out_cid = pbap_client->cid;
658     if (err) return err;
659     return 0;
660 }
661 
662 uint8_t pbap_disconnect(uint16_t pbap_cid){
663     UNUSED(pbap_cid);
664     if (pbap_client->state != PBAP_CONNECTED) return BTSTACK_BUSY;
665     pbap_client->state = PBAP_W2_SEND_DISCONNECT_REQUEST;
666     goep_client_request_can_send_now(pbap_client->goep_cid);
667     return 0;
668 }
669 
670 uint8_t pbap_get_phonebook_size(uint16_t pbap_cid){
671     UNUSED(pbap_cid);
672     if (pbap_client->state != PBAP_CONNECTED) return BTSTACK_BUSY;
673     pbap_client->state = PBAP_W2_GET_PHONEBOOK_SIZE;
674     goep_client_request_can_send_now(pbap_client->goep_cid);
675     return 0;
676 }
677 
678 uint8_t pbap_pull_phonebook(uint16_t pbap_cid){
679     UNUSED(pbap_cid);
680     if (pbap_client->state != PBAP_CONNECTED) return BTSTACK_BUSY;
681     pbap_client->state = PBAP_W2_PULL_PHONEBOOK;
682     goep_client_request_can_send_now(pbap_client->goep_cid);
683     return 0;
684 }
685 
686 uint8_t pbap_set_phonebook(uint16_t pbap_cid, const char * path){
687     UNUSED(pbap_cid);
688     if (pbap_client->state != PBAP_CONNECTED) return BTSTACK_BUSY;
689     pbap_client->state = PBAP_W2_SET_PATH_ROOT;
690     pbap_client->current_folder = path;
691     pbap_client->set_path_offset = 0;
692     goep_client_request_can_send_now(pbap_client->goep_cid);
693     return 0;
694 }
695 
696 uint8_t pbap_authentication_password(uint16_t pbap_cid, const char * password){
697     UNUSED(pbap_cid);
698     if (pbap_client->state != PBAP_W4_USER_AUTHENTICATION) return BTSTACK_BUSY;
699     pbap_client->state = PBAP_W2_SEND_AUTHENTICATED_CONNECT;
700     pbap_client->authentication_password = password;
701     goep_client_request_can_send_now(pbap_client->goep_cid);
702     return 0;
703 }
704 
705 uint8_t pbap_lookup_by_number(uint16_t pbap_cid, const char * phone_number){
706     UNUSED(pbap_cid);
707     if (pbap_client->state != PBAP_CONNECTED) return BTSTACK_BUSY;
708     pbap_client->state = PBAP_W2_GET_CARD_LIST;
709     pbap_client->phone_number = phone_number;
710     goep_client_request_can_send_now(pbap_client->goep_cid);
711     return 0;
712 }
713