/****************************************************************************
 * apps/examples/nimble_blecent/misc.c
 *
 * SPDX-License-Identifier: Apache-2.0
 *
 * 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.
 *
 ****************************************************************************/

/****************************************************************************
 * Included Files
 ****************************************************************************/

#include <assert.h>
#include <stdio.h>
#include <string.h>

#include "host/ble_hs.h"
#include "host/ble_uuid.h"
#include "blecent.h"

/****************************************************************************
 * Private Functions
 ****************************************************************************/

static void print_bytes(FAR const uint8_t *bytes, int len)
{
  int i;

  for (i = 0; i < len; i++)
    {
      printf("%s0x%02x", i != 0 ? ":" : "", bytes[i]);
    }
}

/****************************************************************************
 * Public Functions
 ****************************************************************************/

void print_mbuf(FAR const struct os_mbuf *om)
{
  int colon;

  colon = 0;
  while (om != NULL)
    {
      if (colon)
        {
          printf(":");
        }
      else
        {
          colon = 1;
        }

      print_bytes(om->om_data, om->om_len);
      om = SLIST_NEXT(om, om_next);
    }
}

FAR char *addr_str(FAR const void *addr)
{
  static char buf[6 * 2 + 5 + 1];
  const uint8_t *u8p;

  u8p = addr;
  sprintf(buf, "%02x:%02x:%02x:%02x:%02x:%02x",
          u8p[5], u8p[4], u8p[3], u8p[2], u8p[1], u8p[0]);

  return buf;
}

void print_uuid(FAR const ble_uuid_t *uuid)
{
  char buf[BLE_UUID_STR_LEN];

  printf("%s", ble_uuid_to_str(uuid, buf));
}

void print_conn_desc(FAR const struct ble_gap_conn_desc *desc)
{
  printf("handle=%d our_ota_addr_type=%d our_ota_addr=%s ",
         desc->conn_handle, desc->our_ota_addr.type,
         addr_str(desc->our_ota_addr.val));
  printf("our_id_addr_type=%d our_id_addr=%s ",
         desc->our_id_addr.type, addr_str(desc->our_id_addr.val));
  printf("peer_ota_addr_type=%d peer_ota_addr=%s ",
         desc->peer_ota_addr.type, addr_str(desc->peer_ota_addr.val));
  printf("peer_id_addr_type=%d peer_id_addr=%s ",
         desc->peer_id_addr.type, addr_str(desc->peer_id_addr.val));
  printf("conn_itvl=%d conn_latency=%d supervision_timeout=%d "
         "encrypted=%d authenticated=%d bonded=%d",
         desc->conn_itvl, desc->conn_latency,
         desc->supervision_timeout,
         desc->sec_state.encrypted,
         desc->sec_state.authenticated,
         desc->sec_state.bonded);
}

void print_adv_fields(FAR const struct ble_hs_adv_fields *fields)
{
  char s[BLE_HS_ADV_MAX_SZ];
  const uint8_t *u8p;
  int i;

  if (fields->flags != 0)
    {
      printf("    flags=0x%02x\n", fields->flags);
    }

  if (fields->uuids16 != NULL)
    {
      printf("    uuids16(%scomplete)=",
            fields->uuids16_is_complete ? "" : "in");
      for (i = 0; i < fields->num_uuids16; i++)
        {
          print_uuid(&fields->uuids16[i].u);
          printf(" ");
        }

      printf("\n");
    }

  if (fields->uuids32 != NULL)
    {
      printf("    uuids32(%scomplete)=",
            fields->uuids32_is_complete ? "" : "in");
      for (i = 0; i < fields->num_uuids32; i++)
        {
          print_uuid(&fields->uuids32[i].u);
          printf(" ");
        }

      printf("\n");
    }

  if (fields->uuids128 != NULL)
    {
      printf("    uuids128(%scomplete)=",
            fields->uuids128_is_complete ? "" : "in");
      for (i = 0; i < fields->num_uuids128; i++)
        {
          print_uuid(&fields->uuids128[i].u);
          printf(" ");
        }

      printf("\n");
    }

  if (fields->name != NULL)
    {
      assert(fields->name_len < sizeof s - 1);
      memcpy(s, fields->name, fields->name_len);
      s[fields->name_len] = '\0';
      printf("    name(%scomplete)=%s\n",
            fields->name_is_complete ? "" : "in", s);
    }

  if (fields->tx_pwr_lvl_is_present)
    {
      printf("    tx_pwr_lvl=%d\n", fields->tx_pwr_lvl);
    }

  if (fields->slave_itvl_range != NULL)
    {
      printf("    slave_itvl_range=");
      print_bytes(fields->slave_itvl_range, BLE_HS_ADV_SLAVE_ITVL_RANGE_LEN);
      printf("\n");
    }

  if (fields->svc_data_uuid16 != NULL)
    {
      printf("    svc_data_uuid16=");
      print_bytes(fields->svc_data_uuid16, fields->svc_data_uuid16_len);
      printf("\n");
    }

  if (fields->public_tgt_addr != NULL)
    {
      printf("    public_tgt_addr=");
      u8p = fields->public_tgt_addr;
      for (i = 0; i < fields->num_public_tgt_addrs; i++)
        {
          printf("public_tgt_addr=%s ", addr_str(u8p));
          u8p += BLE_HS_ADV_PUBLIC_TGT_ADDR_ENTRY_LEN;
        }

      printf("\n");
    }

  if (fields->appearance_is_present)
    {
      printf("    appearance=0x%04x\n", fields->appearance);
    }

  if (fields->adv_itvl_is_present)
    {
      printf("    adv_itvl=0x%04x\n", fields->adv_itvl);
    }

  if (fields->svc_data_uuid32 != NULL)
    {
      printf("    svc_data_uuid32=");
      print_bytes(fields->svc_data_uuid32, fields->svc_data_uuid32_len);
      printf("\n");
    }

  if (fields->svc_data_uuid128 != NULL)
    {
      printf("    svc_data_uuid128=");
      print_bytes(fields->svc_data_uuid128, fields->svc_data_uuid128_len);
      printf("\n");
    }

  if (fields->uri != NULL)
    {
      printf("    uri=");
      print_bytes(fields->uri, fields->uri_len);
      printf("\n");
    }

  if (fields->mfg_data != NULL)
    {
      printf("    mfg_data=");
      print_bytes(fields->mfg_data, fields->mfg_data_len);
      printf("\n");
    }
}