test/gatt-test/bluetooth-gatt-test.c

   1 /*
   2  * Copyright (c) 2011 Samsung Electronics Co., Ltd All Rights Reserved
   3  *
   4  * Licensed under the Apache License, Version 2.0 (the "License");
   5  * you may not use this file except in compliance with the License.
   6  * You may obtain a copy of the License at
   7  *
   8  *              http://www.apache.org/licenses/LICENSE-2.0
   9  *
  10  * Unless required by applicable law or agreed to in writing, software
  11  * distributed under the License is distributed on an "AS IS" BASIS,
  12  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  13  * See the License for the specific language governing permissions and
  14  * limitations under the License.
  15  *
  16  */
  17
  18 /**
  19  * @file       bluetooth-gatt-test.c
  20  * @brief      This is the source file for bluetooth framework test suite.
  21  */
  22
  23 #include <stdio.h>
  24 #include <errno.h>
  25 #include <ctype.h>
  26 #include <fcntl.h>
  27 #include <unistd.h>
  28 #include <stdint.h>
  29 #include <string.h>
  30 #include <glib.h>
  31 #include <dbus/dbus-glib.h>
  32 #include <dbus/dbus.h>
  33 #include "bluetooth-api.h"
  34
  35
  36 #define PRT(format, args...) printf("%s:%d() "format, __FUNCTION__, __LINE__, ##args)
  37 #define TC_PRT(format, args...) PRT(format"\n", ##args)
  38
  39 #define TC_PASS 1
  40 #define TC_FAIL 0
  41
  42 GMainLoop *main_loop = NULL;
  43
  44 typedef struct {
  45         const char *tc_name;
  46         int tc_code;
  47 } tc_table_t;
  48
  49 tc_table_t tc_table[] = {
  50         {"Send alert to remote le device"               , 1},
  51         {"Set Link loss alert"          , 2},
  52
  53         /* -----------------------------------------*/
  54         {"Finish"                                       , 0x00ff},
  55         {NULL                                   , 0x0000},
  56
  57 };
  58
  59 #define tc_result(success, tc_index) \
  60         TC_PRT("Test case [%d - %s] %s", tc_table[tc_index].tc_code, tc_table[tc_index].tc_name, ((success == TC_PASS) ? "Success" : "Failed"));
  61
  62 char *g_alert_char_handle = NULL;
  63 guint8 g_alert_level = 0;
  64
  65 #define IMMEDIATE_ALERT_UUID    "00001802-0000-1000-8000-00805f9b34fb"
  66 #define LINK_LOSS_UUID          "00001803-0000-1000-8000-00805f9b34fb"
  67 #define ALERT_LEVEL_CHR_UUID    "2a06"
  68
  69 #define BD_ADDR_FILE "/opt/remote-bd"
  70
  71 void tc_usage_print(void)
  72 {
  73         int i = 0;
  74
  75         while (tc_table[i].tc_name) {
  76                 if (tc_table[i].tc_code != 0x00ff) {
  77                         TC_PRT("Key %d : usage %s", tc_table[i].tc_code,
  78                                                         tc_table[i].tc_name);
  79                 } else {
  80                         TC_PRT("Key %d : usage %s\n\n", 0x00ff,
  81                                                         tc_table[i].tc_name);
  82                 }
  83
  84                 i++;
  85         }
  86 }
  87
  88 static void convert_addr_string_to_addr_type(bluetooth_device_address_t *addr,
  89                                                         const char *address)
  90 {
  91         char *ptr1, *ptr2, *ptr3, *ptr4, *ptr5;
  92
  93         if (!address || !addr)
  94                 return;
  95
  96         addr->addr[0] = strtol(address, &ptr5, 16);
  97         addr->addr[1] = strtol(ptr5 + 1, &ptr4, 16);
  98         addr->addr[2] = strtol(ptr4 + 1, &ptr3, 16);
  99         addr->addr[3] = strtol(ptr3 + 1, &ptr2, 16);
 100         addr->addr[4] = strtol(ptr2 + 1, &ptr1, 16);
 101         addr->addr[5] = strtol(ptr1 + 1, NULL, 16);
 102 }
 103
 104 char * get_bd_from_file(char *filename)
 105 {
 106         int fd;
 107         char *buf;
 108
 109         if ((fd = open(filename, O_RDONLY)) < 0) {
 110                 perror("Can't open file");
 111                 return NULL;
 112         }
 113
 114         buf = g_malloc0(20);
 115         /* Fix : NULL_RETURNS */
 116         if (buf == NULL) {
 117                 close(fd);
 118                 return NULL;
 119         }
 120
 121         if (read(fd, buf, 17) < 17) {
 122                 perror("Can't load firmware");
 123                 g_free(buf);
 124                 close(fd);
 125                 return NULL;
 126         }
 127
 128         close(fd);
 129
 130         return buf;
 131 }
 132
 133 static void __accept_bdaddress(bluetooth_device_address_t *device_address)
 134 {
 135         char str_address[20] = {0};
 136         char *addr;
 137
 138         addr = get_bd_from_file(BD_ADDR_FILE);
 139         if (addr) {
 140                 TC_PRT("Remote bd adress from file: %s", addr);
 141                 convert_addr_string_to_addr_type(device_address, addr);
 142                 g_free(addr);
 143                 return;
 144         }
 145
 146         TC_PRT("Enter bd address: ");
 147         int ret = 0;
 148         ret = scanf("%s", str_address);
 149         if (ret < 0)
 150                 TC_PRT("Some read error");
 151         TC_PRT("You have entered bd address %s\n", str_address);
 152         convert_addr_string_to_addr_type(device_address, str_address);
 153 }
 154
 155 static void __accept_alert_level()
 156 {
 157         TC_PRT("Enter alert level \n 0 - no alert 1 - mild alert 2 - High alert : ");
 158         int ret = 0;
 159         ret = scanf("%c", &g_alert_level);
 160         if (ret < 0)
 161                 TC_PRT("Some read error");
 162         TC_PRT("You have selected alert level %hu ", g_alert_level);
 163 }
 164
 165 int test_input_callback(void *data)
 166 {
 167         int ret = 0;
 168         int test_id = (int)data;
 169         bluetooth_device_address_t device_address;
 170         bt_gatt_service_property_t service;
 171
 172         switch (test_id) {
 173         case 0x00ff:
 174                 TC_PRT("Finished");
 175                 g_main_loop_quit(main_loop);
 176                 break;
 177         case 1:
 178                 TC_PRT("Immediate Alert");
 179                 __accept_bdaddress(&device_address);
 180
 181                 __accept_alert_level();
 182
 183                 if (g_alert_char_handle) {
 184                         if (bluetooth_gatt_set_characteristics_value(g_alert_char_handle,
 185                                                 &g_alert_level, 1) != BLUETOOTH_ERROR_NONE)
 186                                 TC_PRT("Set char val failed");
 187
 188                         return 0;
 189                 }
 190
 191                 ret = bluetooth_gatt_get_service_from_uuid(&device_address,
 192                                                         IMMEDIATE_ALERT_UUID,
 193                                                         &service);
 194                 if (ret != BLUETOOTH_ERROR_NONE) {
 195                         TC_PRT(" bluetooth_gatt_get_service_from_uuid FAILED");
 196                         return 0;
 197                 }
 198
 199                 ret = bluetooth_gatt_get_char_from_uuid(service.handle,
 200                                                         ALERT_LEVEL_CHR_UUID);
 201                 if (ret != BLUETOOTH_ERROR_NONE) {
 202                         TC_PRT(" bluetooth_gatt_get_char_from_uuid FAILED");
 203                         return 0;
 204                 }
 205
 206                 break;
 207         case 2:
 208                 TC_PRT("Proximity Link loss alert");
 209                 __accept_bdaddress(&device_address);
 210
 211                 __accept_alert_level();
 212
 213                 /* TODO */
 214                 break;
 215         default:
 216                 break;
 217         }
 218
 219         return 0;
 220 }
 221
 222 void startup()
 223 {
 224         TC_PRT("bluetooth framework TC startup");
 225
 226         dbus_threads_init_default();
 227
 228         main_loop = g_main_loop_new(NULL, FALSE);
 229 }
 230
 231 void cleanup()
 232 {
 233         TC_PRT("bluetooth framework TC cleanup");
 234         if (main_loop != NULL)
 235                 g_main_loop_unref(main_loop);
 236 }
 237
 238 static void __handle_alert_char(char *char_handle,
 239                                         bt_gatt_char_property_t *char_pty)
 240 {
 241         if (char_pty->val == NULL)
 242                 TC_PRT("Read only char");
 243         else
 244                 TC_PRT("Current Alert level [%d]", char_pty->val[0]);
 245
 246         g_alert_char_handle = g_strdup(char_handle);
 247
 248         if (bluetooth_gatt_set_characteristics_value(char_handle,
 249                                 &g_alert_level, 1) != BLUETOOTH_ERROR_NONE)
 250                 TC_PRT("Set char val failed");
 251
 252 }
 253
 254 static gboolean __handle_char(char *char_handle,
 255                                         bt_gatt_char_property_t *char_pty)
 256 {
 257         TC_PRT("char uuid %s", char_pty->uuid);
 258
 259         if (g_strstr_len(char_pty->uuid, -1, ALERT_LEVEL_CHR_UUID) != NULL) {
 260                 TC_PRT("Alert char recieved");
 261                 __handle_alert_char(char_handle, char_pty);
 262                 return TRUE;
 263         } /* Add else if for other chars*/
 264
 265         return FALSE;
 266 }
 267
 268 void bt_event_callback(int event, bluetooth_event_param_t* param,
 269                                                         void *user_data)
 270 {
 271         TC_PRT(">>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>");
 272         TC_PRT("bt event callback 0x%04x", event);
 273         switch (event) {
 274         case BLUETOOTH_EVENT_GATT_GET_CHAR_FROM_UUID:
 275         {
 276                 TC_PRT("BLUETOOTH_EVENT_GATT_GET_CHAR_FROM_UUID");
 277                 if (param->result != 0) {
 278                         TC_PRT("Failed!!!");
 279                         return;
 280                 }
 281                 bt_gatt_char_property_t *char_pty = param->param_data;
 282
 283                 __handle_char(char_pty->handle, char_pty);
 284
 285         }
 286         break;
 287         default:
 288                 TC_PRT("received event [0x%04x]", event);
 289                 break;
 290         }
 291         TC_PRT("<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<");
 292 }
 293
 294 static gboolean key_event_cb(GIOChannel *chan, GIOCondition cond, gpointer data)
 295 {
 296         char buf[10] = {0};
 297         unsigned int len = 0;
 298         int test_id;
 299
 300         if (g_io_channel_read_chars(chan, buf, sizeof(buf),
 301                         &len, NULL) ==  G_IO_STATUS_ERROR) {
 302                 printf("IO Channel read error");
 303                 return FALSE;
 304         }
 305         printf("%s\n", buf);
 306         tc_usage_print();
 307
 308         test_id = atoi(buf);
 309
 310         if (test_id)
 311                 g_idle_add(test_input_callback, (void*)test_id);
 312
 313         return TRUE;
 314 }
 315
 316 int main()
 317 {
 318         int ret_val;
 319         GIOChannel *key_io;
 320
 321         startup();
 322
 323         /* Register callback function */
 324         TC_PRT("TC : %s", tc_table[0].tc_name);
 325         ret_val = bluetooth_register_callback(bt_event_callback, NULL);
 326         if (ret_val >= BLUETOOTH_ERROR_NONE) {
 327                 TC_PRT("bluetooth_register_callback returned Success");
 328                 tc_result(TC_PASS, 0);
 329         } else {
 330                 TC_PRT("bluetooth_register_callback returned failiure [0x%04x]", ret_val);
 331                 tc_result(TC_FAIL, 0);
 332                 return 0;
 333         }
 334
 335         ret_val = bluetooth_check_adapter();
 336         if (ret_val < BLUETOOTH_ERROR_NONE) {
 337                 TC_PRT("bluetooth_check_adapter returned failiure [0x%04x]", ret_val);
 338                 tc_result(TC_FAIL, 3);
 339         } else {
 340                 TC_PRT("BT state [0x%04x]", ret_val);
 341                 tc_result(TC_PASS, 3);
 342         }
 343
 344         key_io = g_io_channel_unix_new(fileno(stdin));
 345
 346         g_io_add_watch(key_io, G_IO_IN | G_IO_HUP | G_IO_ERR | G_IO_NVAL,
 347                         key_event_cb, NULL);
 348         g_io_channel_unref(key_io);
 349
 350         g_main_loop_run(main_loop);
 351
 352         cleanup();
 353         return 0;
 354 }