| /* |
| * Licensed to the Apache Software Foundation (ASF) under one |
| * or more contributor license agreements. See the NOTICE file |
| * distributed with this work for additional information |
| * regarding copyright ownership. The ASF licenses this file |
| * to you under the Apache License, Version 2.0 (the |
| * "License"); you may not use this file except in compliance |
| * with the License. You may obtain a copy of the License at |
| * |
| * http://www.apache.org/licenses/LICENSE-2.0 |
| * |
| * Unless required by applicable law or agreed to in writing, |
| * software distributed under the License is distributed on an |
| * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY |
| * KIND, either express or implied. See the License for the |
| * specific language governing permissions and limitations |
| * under the License. |
| */ |
| |
| #include <assert.h> |
| #include <string.h> |
| #include <stdio.h> |
| #include <errno.h> |
| #include "os/mynewt.h" |
| #include <bsp/bsp.h> |
| #include <hal/hal_gpio.h> |
| #include <console/console.h> |
| #include <mgmt/mgmt.h> |
| |
| #include <oic/oc_api.h> |
| #include <oic/oc_gatt.h> |
| #include <cborattr/cborattr.h> |
| |
| /* BLE */ |
| #include <nimble/ble.h> |
| #include <host/ble_hs.h> |
| #include <services/gap/ble_svc_gap.h> |
| |
| /* Application-specified header. */ |
| #include "bleprph.h" |
| |
| static int bleprph_gap_event(struct ble_gap_event *event, void *arg); |
| |
| /** |
| * Logs information about a connection to the console. |
| */ |
| static void |
| bleprph_print_conn_desc(struct ble_gap_conn_desc *desc) |
| { |
| MODLOG_DFLT(INFO, "handle=%d our_ota_addr_type=%d our_ota_addr=", |
| desc->conn_handle, desc->our_ota_addr.type); |
| print_addr(desc->our_ota_addr.val); |
| MODLOG_DFLT(INFO, " our_id_addr_type=%d our_id_addr=", |
| desc->our_id_addr.type); |
| print_addr(desc->our_id_addr.val); |
| MODLOG_DFLT(INFO, " peer_ota_addr_type=%d peer_ota_addr=", |
| desc->peer_ota_addr.type); |
| print_addr(desc->peer_ota_addr.val); |
| MODLOG_DFLT(INFO, " peer_id_addr_type=%d peer_id_addr=", |
| desc->peer_id_addr.type); |
| print_addr(desc->peer_id_addr.val); |
| MODLOG_DFLT(INFO, " conn_itvl=%d conn_latency=%d supervision_timeout=%d " |
| "encrypted=%d authenticated=%d bonded=%d\n", |
| desc->conn_itvl, desc->conn_latency, |
| desc->supervision_timeout, |
| desc->sec_state.encrypted, |
| desc->sec_state.authenticated, |
| desc->sec_state.bonded); |
| } |
| |
| /** |
| * Enables advertising with the following parameters: |
| * o General discoverable mode. |
| * o Undirected connectable mode. |
| */ |
| static void |
| bleprph_advertise(void) |
| { |
| struct ble_gap_adv_params adv_params; |
| struct ble_hs_adv_fields fields; |
| const char *name; |
| int rc; |
| |
| /** |
| * Set the advertisement data included in our advertisements: |
| * o Flags (indicates advertisement type and other general info). |
| * o Advertising tx power. |
| * o Device name. |
| * o service UUID. |
| */ |
| |
| memset(&fields, 0, sizeof fields); |
| |
| /* Advertise two flags: |
| * o Discoverability in forthcoming advertisement (general) |
| * o BLE-only (BR/EDR unsupported). |
| */ |
| fields.flags = BLE_HS_ADV_F_DISC_GEN | |
| BLE_HS_ADV_F_BREDR_UNSUP; |
| |
| /* Indicate that the TX power level field should be included; have the |
| * stack fill this value automatically. This is done by assiging the |
| * special value BLE_HS_ADV_TX_PWR_LVL_AUTO. |
| */ |
| fields.tx_pwr_lvl_is_present = 1; |
| fields.tx_pwr_lvl = BLE_HS_ADV_TX_PWR_LVL_AUTO; |
| |
| name = ble_svc_gap_device_name(); |
| fields.name = (uint8_t *)name; |
| fields.name_len = strlen(name); |
| fields.name_is_complete = 1; |
| |
| #if MYNEWT_VAL(ADVERTISE_128BIT_UUID) |
| /* Advertise the 128-bit CoAP-over-BLE service UUID in the scan response. */ |
| fields.uuids128 = (ble_uuid128_t []) { |
| BLE_UUID128_INIT(OC_GATT_UNSEC_SVC_UUID) |
| }; |
| fields.num_uuids128 = 1; |
| fields.uuids128_is_complete = 1; |
| #endif |
| #if MYNEWT_VAL(ADVERTISE_16BIT_UUID) |
| /* Advertise the 16-bit CoAP-over-BLE service UUID in the scan response. */ |
| fields.uuids16 = (ble_uuid16_t[]) { |
| BLE_UUID16_INIT(OC_GATT_SEC_SVC_UUID) |
| }; |
| fields.num_uuids16 = 1; |
| fields.uuids16_is_complete = 1; |
| #endif |
| rc = ble_gap_adv_set_fields(&fields); |
| if (rc != 0) { |
| MODLOG_DFLT(ERROR, "error setting advertisement data; rc=%d\n", rc); |
| return; |
| } |
| |
| /* Begin advertising. */ |
| memset(&adv_params, 0, sizeof adv_params); |
| adv_params.conn_mode = BLE_GAP_CONN_MODE_UND; |
| adv_params.disc_mode = BLE_GAP_DISC_MODE_GEN; |
| rc = ble_gap_adv_start(BLE_OWN_ADDR_PUBLIC, NULL, BLE_HS_FOREVER, |
| &adv_params, bleprph_gap_event, NULL); |
| if (rc != 0) { |
| MODLOG_DFLT(ERROR, "error enabling advertisement; rc=%d\n", rc); |
| return; |
| } |
| } |
| |
| /** |
| * The nimble host executes this callback when a GAP event occurs. The |
| * application associates a GAP event callback with each connection that forms. |
| * bleprph uses the same callback for all connections. |
| * |
| * @param event The type of event being signalled. |
| * @param ctxt Various information pertaining to the event. |
| * @param arg Application-specified argument; unuesd by |
| * bleprph. |
| * |
| * @return 0 if the application successfully handled the |
| * event; nonzero on failure. The semantics |
| * of the return code is specific to the |
| * particular GAP event being signalled. |
| */ |
| static int |
| bleprph_gap_event(struct ble_gap_event *event, void *arg) |
| { |
| struct ble_gap_conn_desc desc; |
| int rc; |
| |
| switch (event->type) { |
| case BLE_GAP_EVENT_CONNECT: |
| /* A new connection was established or a connection attempt failed. */ |
| MODLOG_DFLT(INFO, "connection %s; status=%d ", |
| event->connect.status == 0 ? "established" : "failed", |
| event->connect.status); |
| if (event->connect.status == 0) { |
| rc = ble_gap_conn_find(event->connect.conn_handle, &desc); |
| assert(rc == 0); |
| bleprph_print_conn_desc(&desc); |
| } |
| MODLOG_DFLT(INFO, "\n"); |
| |
| if (event->connect.status != 0) { |
| /* Connection failed; resume advertising. */ |
| bleprph_advertise(); |
| } else { |
| oc_ble_coap_conn_new(event->connect.conn_handle); |
| } |
| return 0; |
| |
| case BLE_GAP_EVENT_DISCONNECT: |
| MODLOG_DFLT(INFO, "disconnect; reason=%d ", event->disconnect.reason); |
| bleprph_print_conn_desc(&event->disconnect.conn); |
| MODLOG_DFLT(INFO, "\n"); |
| |
| oc_ble_coap_conn_del(event->disconnect.conn.conn_handle); |
| |
| /* Connection terminated; resume advertising. */ |
| bleprph_advertise(); |
| return 0; |
| |
| case BLE_GAP_EVENT_CONN_UPDATE: |
| /* The central has updated the connection parameters. */ |
| MODLOG_DFLT(INFO, "connection updated; status=%d ", |
| event->conn_update.status); |
| rc = ble_gap_conn_find(event->connect.conn_handle, &desc); |
| assert(rc == 0); |
| bleprph_print_conn_desc(&desc); |
| MODLOG_DFLT(INFO, "\n"); |
| return 0; |
| |
| case BLE_GAP_EVENT_ADV_COMPLETE: |
| MODLOG_DFLT(INFO, "advertise complete; reason=%d\n", |
| event->adv_complete.reason); |
| bleprph_advertise(); |
| return 0; |
| |
| case BLE_GAP_EVENT_ENC_CHANGE: |
| /* Encryption has been enabled or disabled for this connection. */ |
| MODLOG_DFLT(INFO, "encryption change event; status=%d ", |
| event->enc_change.status); |
| rc = ble_gap_conn_find(event->connect.conn_handle, &desc); |
| assert(rc == 0); |
| bleprph_print_conn_desc(&desc); |
| MODLOG_DFLT(INFO, "\n"); |
| return 0; |
| |
| case BLE_GAP_EVENT_SUBSCRIBE: |
| MODLOG_DFLT(INFO, "subscribe event; conn_handle=%d attr_handle=%d " |
| "reason=%d prevn=%d curn=%d previ=%d curi=%d\n", |
| event->subscribe.conn_handle, |
| event->subscribe.attr_handle, |
| event->subscribe.reason, |
| event->subscribe.prev_notify, |
| event->subscribe.cur_notify, |
| event->subscribe.prev_indicate, |
| event->subscribe.cur_indicate); |
| return 0; |
| |
| case BLE_GAP_EVENT_MTU: |
| MODLOG_DFLT(INFO, "mtu update event; conn_handle=%d cid=%d mtu=%d\n", |
| event->mtu.conn_handle, |
| event->mtu.channel_id, |
| event->mtu.value); |
| return 0; |
| |
| case BLE_GAP_EVENT_REPEAT_PAIRING: |
| /* We already have a bond with the peer, but it is attempting to |
| * establish a new secure link. This app sacrifices security for |
| * convenience: just throw away the old bond and accept the new link. |
| */ |
| |
| /* Delete the old bond. */ |
| rc = ble_gap_conn_find(event->repeat_pairing.conn_handle, &desc); |
| assert(rc == 0); |
| ble_store_util_delete_peer(&desc.peer_id_addr); |
| |
| /* Return BLE_GAP_REPEAT_PAIRING_RETRY to indicate that the host should |
| * continue with the pairing operation. |
| */ |
| return BLE_GAP_REPEAT_PAIRING_RETRY; |
| } |
| |
| return 0; |
| } |
| |
| static void |
| bleprph_on_reset(int reason) |
| { |
| MODLOG_DFLT(ERROR, "Resetting state; reason=%d\n", reason); |
| } |
| |
| static void |
| bleprph_on_sync(void) |
| { |
| /* Begin advertising. */ |
| bleprph_advertise(); |
| } |
| |
| static void |
| app_get_light(oc_request_t *request, oc_interface_mask_t interface) |
| { |
| bool value; |
| |
| if (hal_gpio_read(LED_BLINK_PIN)) { |
| value = true; |
| } else { |
| value = false; |
| } |
| oc_rep_start_root_object(); |
| switch (interface) { |
| case OC_IF_BASELINE: |
| oc_process_baseline_interface(request->resource); |
| case OC_IF_A: |
| oc_rep_set_boolean(root, value, value); |
| break; |
| default: |
| break; |
| } |
| oc_rep_end_root_object(); |
| oc_send_response(request, OC_STATUS_OK); |
| } |
| |
| static void |
| app_set_light(oc_request_t *request, oc_interface_mask_t interface) |
| { |
| bool value; |
| int len; |
| uint16_t data_off; |
| struct os_mbuf *m; |
| struct cbor_attr_t attrs[] = { |
| [0] = { |
| .attribute = "value", |
| .type = CborAttrBooleanType, |
| .addr.boolean = &value, |
| .dflt.boolean = false |
| }, |
| [1] = { |
| } |
| }; |
| |
| len = coap_get_payload(request->packet, &m, &data_off); |
| if (cbor_read_mbuf_attrs(m, data_off, len, attrs)) { |
| oc_send_response(request, OC_STATUS_BAD_REQUEST); |
| } else { |
| hal_gpio_write(LED_BLINK_PIN, value == true); |
| oc_send_response(request, OC_STATUS_CHANGED); |
| } |
| } |
| |
| static void |
| omgr_app_init(void) |
| { |
| oc_resource_t *res; |
| |
| oc_init_platform("MyNewt", NULL, NULL); |
| oc_add_device("/oic/d", "oic.d.light", "MynewtLed", "1.0", "1.0", NULL, |
| NULL); |
| |
| res = oc_new_resource("/light/1", 1, 0); |
| oc_resource_bind_resource_type(res, "oic.r.switch.binary"); |
| oc_resource_bind_resource_interface(res, OC_IF_A); |
| oc_resource_set_default_interface(res, OC_IF_A); |
| |
| oc_resource_set_discoverable(res); |
| oc_resource_set_periodic_observable(res, 1); |
| oc_resource_set_request_handler(res, OC_GET, app_get_light); |
| oc_resource_set_request_handler(res, OC_PUT, app_set_light); |
| oc_resource_set_request_handler(res, OC_POST, app_set_light); |
| oc_add_resource(res); |
| |
| } |
| |
| static const oc_handler_t omgr_oc_handler = { |
| .init = omgr_app_init, |
| }; |
| |
| /** |
| * main |
| * |
| * The main task for the project. This function initializes the packages, |
| * then starts serving events from default event queue. |
| * |
| * @return int NOTE: this function should never return! |
| */ |
| int |
| main(void) |
| { |
| int rc; |
| |
| /* Set initial BLE device address. */ |
| memcpy(g_dev_addr, (uint8_t[6]){0x0a, 0xfa, 0xcf, 0xac, 0xfa, 0xc0}, 6); |
| |
| /* Initialize OS */ |
| sysinit(); |
| |
| /* Initialize the OIC */ |
| oc_main_init((oc_handler_t *)&omgr_oc_handler); |
| oc_ble_coap_gatt_srv_init(); |
| |
| ble_hs_cfg.reset_cb = bleprph_on_reset; |
| ble_hs_cfg.sync_cb = bleprph_on_sync; |
| ble_hs_cfg.gatts_register_cb = gatt_svr_register_cb; |
| ble_hs_cfg.store_status_cb = ble_store_util_status_rr; |
| |
| /* Set the default device name. */ |
| rc = ble_svc_gap_device_name_set("c5"); |
| assert(rc == 0); |
| |
| /* Our light resource */ |
| hal_gpio_init_out(LED_BLINK_PIN, 1); |
| |
| while (1) { |
| os_eventq_run(os_eventq_dflt_get()); |
| } |
| /* Never exit */ |
| |
| return 0; |
| } |