xref: /btstack/example/gap_inquiry.c (revision 8257e5f9e1a9f15ac2fe1e69adc5d2eeeadf3fff)
1 /*
2  * Copyright (C) 2014 BlueKitchen GmbH
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions
6  * are met:
7  *
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. Neither the name of the copyright holders nor the names of
14  *    contributors may be used to endorse or promote products derived
15  *    from this software without specific prior written permission.
16  * 4. Any redistribution, use, or modification is done solely for
17  *    personal benefit and not for any commercial purpose or for
18  *    monetary gain.
19  *
20  * THIS SOFTWARE IS PROVIDED BY BLUEKITCHEN GMBH AND CONTRIBUTORS
21  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
22  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
23  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL MATTHIAS
24  * RINGWALD OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
25  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
26  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
27  * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
28  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
29  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF
30  * THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  *
33  * Please inquire about commercial licensing options at
34  * [email protected]
35  *
36  */
37 
38 // *****************************************************************************
39 /* EXAMPLE_START(gap_inquiry): GAP Inquiry Example
40  *
41  * @text The Generic Access Profile (GAP) defines how Bluetooth devices discover
42  * and establish a connection with each other. In this example, the application
43  * discovers  surrounding Bluetooth devices and collects their Class of Device
44  * (CoD), page scan mode, clock offset, and RSSI. After that, the remote name of
45  * each device is requested. In the following section we outline the Bluetooth
46  * logic part, i.e., how the packet handler handles the asynchronous events and
47  * data packets.
48  */
49 // *****************************************************************************
50 
51 #include <stdint.h>
52 #include <stdio.h>
53 #include <stdlib.h>
54 #include <string.h>
55 
56 #include "btstack.h"
57 
58 #define MAX_DEVICES 10
59 enum DEVICE_STATE { REMOTE_NAME_REQUEST, REMOTE_NAME_INQUIRED, REMOTE_NAME_FETCHED };
60 struct device {
61     bd_addr_t  address;
62     uint16_t   clockOffset;
63     uint32_t   classOfDevice;
64     uint8_t    pageScanRepetitionMode;
65     uint8_t    rssi;
66     enum DEVICE_STATE  state;
67 };
68 
69 #define INQUIRY_INTERVAL 5
70 struct device devices[MAX_DEVICES];
71 int deviceCount = 0;
72 
73 
74 enum STATE {INIT, ACTIVE} ;
75 enum STATE state = INIT;
76 
77 static btstack_packet_callback_registration_t hci_event_callback_registration;
78 
79 static int getDeviceIndexForAddress( bd_addr_t addr){
80     int j;
81     for (j=0; j< deviceCount; j++){
82         if (bd_addr_cmp(addr, devices[j].address) == 0){
83             return j;
84         }
85     }
86     return -1;
87 }
88 
89 static void start_scan(void){
90     printf("Starting inquiry scan..\n");
91     hci_send_cmd(&hci_inquiry, HCI_INQUIRY_LAP, INQUIRY_INTERVAL, 0);
92 }
93 
94 static int has_more_remote_name_requests(void){
95     int i;
96     for (i=0;i<deviceCount;i++) {
97         if (devices[i].state == REMOTE_NAME_REQUEST) return 1;
98     }
99     return 0;
100 }
101 
102 static void do_next_remote_name_request(void){
103     int i;
104     for (i=0;i<deviceCount;i++) {
105         // remote name request
106         if (devices[i].state == REMOTE_NAME_REQUEST){
107             devices[i].state = REMOTE_NAME_INQUIRED;
108             printf("Get remote name of %s...\n", bd_addr_to_str(devices[i].address));
109             hci_send_cmd(&hci_remote_name_request, devices[i].address,
110                         devices[i].pageScanRepetitionMode, 0, devices[i].clockOffset | 0x8000);
111             return;
112         }
113     }
114 }
115 
116 static void continue_remote_names(void){
117     if (has_more_remote_name_requests()){
118         do_next_remote_name_request();
119         return;
120     }
121     start_scan();
122 }
123 
124 /* @section Bluetooth Logic
125  *
126  * @text The Bluetooth logic is implemented as a state machine within the packet
127  * handler. In this example, the following states are passed sequentially:
128  * INIT, and ACTIVE.
129  */
130 
131 static void packet_handler(uint8_t packet_type, uint16_t channel, uint8_t *packet, uint16_t size){
132     bd_addr_t addr;
133     int i;
134     int numResponses;
135     int index;
136 
137     if (packet_type != HCI_EVENT_PACKET) return;
138 
139     uint8_t event = hci_event_packet_get_type(packet);
140 
141     switch(state){
142         /* @text In INIT, an inquiry  scan is started, and the application transits to
143          * ACTIVE state.
144          */
145         case INIT:
146             if (packet[2] == HCI_STATE_WORKING) {
147                 start_scan();
148                 state = ACTIVE;
149             }
150             break;
151 
152         /* @text In ACTIVE, the following events are processed:
153          *  - Inquiry result event: the list of discovered devices is processed and the
154          *    Class of Device (CoD), page scan mode, clock offset, and RSSI are stored in a table.
155          *  - Inquiry complete event: the remote name is requested for devices without a fetched
156          *    name. The state of a remote name can be one of the following:
157          *    REMOTE_NAME_REQUEST, REMOTE_NAME_INQUIRED, or REMOTE_NAME_FETCHED.
158          *  - Remote name cached event: prints cached remote names provided by BTstack,
159          *    if persistent storage is provided.
160          *  - Remote name request complete event: the remote name is stored in the table and the
161          *    state is updated to REMOTE_NAME_FETCHED. The query of remote names is continued.
162          */
163         case ACTIVE:
164             switch(event){
165                 case HCI_EVENT_INQUIRY_RESULT:
166                 case HCI_EVENT_INQUIRY_RESULT_WITH_RSSI:
167                     numResponses = packet[2];
168                     for (i=0; i<numResponses && deviceCount < MAX_DEVICES;i++){
169                         reverse_bd_addr(&packet[3 + i * 6], addr);
170                         index = getDeviceIndexForAddress(addr);
171                         if (index >= 0) continue;   // already in our list
172 
173                         memcpy(devices[deviceCount].address, addr, 6);
174                         devices[deviceCount].pageScanRepetitionMode =   packet [3 + numResponses*(6)         + i*1];
175                         if (event == HCI_EVENT_INQUIRY_RESULT){
176                             devices[deviceCount].classOfDevice = little_endian_read_24(packet, 3 + numResponses*(6+1+1+1)   + i*3);
177                             devices[deviceCount].clockOffset =   little_endian_read_16(packet, 3 + numResponses*(6+1+1+1+3) + i*2) & 0x7fff;
178                             devices[deviceCount].rssi  = 0;
179                         } else {
180                             devices[deviceCount].classOfDevice = little_endian_read_24(packet, 3 + numResponses*(6+1+1)     + i*3);
181                             devices[deviceCount].clockOffset =   little_endian_read_16(packet, 3 + numResponses*(6+1+1+3)   + i*2) & 0x7fff;
182                             devices[deviceCount].rssi  =                    packet [3 + numResponses*(6+1+1+3+2) + i*1];
183                         }
184                         devices[deviceCount].state = REMOTE_NAME_REQUEST;
185                         printf("Device found: %s with COD: 0x%06x, pageScan %d, clock offset 0x%04x, rssi 0x%02x\n", bd_addr_to_str(addr),
186                                 devices[deviceCount].classOfDevice, devices[deviceCount].pageScanRepetitionMode,
187                                 devices[deviceCount].clockOffset, devices[deviceCount].rssi);
188                         deviceCount++;
189                     }
190                     break;
191 
192                 case HCI_EVENT_INQUIRY_COMPLETE:
193                     for (i=0;i<deviceCount;i++) {
194                         // retry remote name request
195                         if (devices[i].state == REMOTE_NAME_INQUIRED)
196                             devices[i].state = REMOTE_NAME_REQUEST;
197                     }
198                     continue_remote_names();
199                     break;
200 
201                 case HCI_EVENT_REMOTE_NAME_REQUEST_COMPLETE:
202                     reverse_bd_addr(&packet[3], addr);
203                     index = getDeviceIndexForAddress(addr);
204                     if (index >= 0) {
205                         if (packet[2] == 0) {
206                             printf("Name: '%s'\n", &packet[9]);
207                             devices[index].state = REMOTE_NAME_FETCHED;
208                         } else {
209                             printf("Failed to get name: page timeout\n");
210                         }
211                     }
212                     continue_remote_names();
213                     break;
214 
215                 default:
216                     break;
217             }
218             break;
219 
220         default:
221             break;
222     }
223 }
224 
225 /* @text For more details on discovering remote devices, please see
226  * Section on [GAP](../profiles/#sec:GAPdiscoverRemoteDevices).
227  */
228 
229 
230 /* @section Main Application Setup
231  *
232  * @text Listing MainConfiguration shows main application code.
233  * It registers the HCI packet handler and starts the Bluetooth stack.
234  */
235 
236 /* LISTING_START(MainConfiguration): Setup packet handler for GAP inquiry */
237 int btstack_main(int argc, const char * argv[]);
238 int btstack_main(int argc, const char * argv[]) {
239 
240     hci_event_callback_registration.callback = &packet_handler;
241     hci_add_event_handler(&hci_event_callback_registration);
242 
243     // turn on!
244     hci_power_control(HCI_POWER_ON);
245 
246     return 0;
247 }
248 /* LISTING_END */
249 /* EXAMPLE_END */
250