root/RF_BT_Tail/JDY08.c

// File: JDY08.c
//------------------------------------------------------------------------------
// Author: Giovanni de Sanctis
// Email: info@lateral-technologies.com
//------------------------------------------------------------------------------
// Date: Dec 2018
// HAL for the JDY-08 Bluetooth module (based on the TI chip CC2541)
//------------------------------------------------------------------------------

#include "JDY08.h"
#include "Definitions.h"
#include "./mcc_generated_files/mcc.h"
#include <string.h>
#include <stdint.h>

//AT commands
#define HOSTEN  "AT+HOSTEN0"                    //Sets the right mode for BT serial slave
#define RST             "AT+RST"                                //Resets the BT module
#define NAME    "AT+NAME(!)Tail1"               //Sets the BT name
#define REVERSE "AT+REVERSE1"                   //
#define SPLASH  "Tail sw.ver."STR_VER   //Sent after initialisation

char    rxBuff[RX_BUFF_LEN];                    //rx buffer
uint8_t rxRdPtr;                                                //Reading Pointer to rxBuff     

//Return the pointer to the buffer read, or a NULL pointer if no chars were received
char* btReadStr()
{
  char c;                                                               //temp char
  uint8_t i;                                                    //iterator
  uint8_t rxPtr;                                                //index to the rx buffer
  
  //Flush buffer
  memset(rxBuff,0,sizeof(rxBuff));
  rxPtr=0;
  
  //If no data received then return
  if (!EUSART_is_rx_ready()) return 0;
    
  while (EUSART_is_rx_ready())                  //Keeps reading until there is data
  {
        c=EUSART_Read();
        rxBuff[rxPtr++]=c;
        if (c=='\n') break;
        if (rxPtr>sizeof(rxBuff)-1) break;
  }
  
  rxBuff[rxPtr]=0;                                              //Terminates the string
  rxRdPtr = 0;                                                  //Resets the buffer read pointer
  
  //Convert to uppercase
  for (i=0; (rxBuff[i]!=0 && i<RX_BUFF_LEN); i++)
  {
        c=rxBuff[i];
        if (c>='a' && c<='z') rxBuff[i]=c-('a'-'A');
  }
  
  if (rxPtr) return rxBuff;                             //Return pointer to string if not empty
  else return 0;                                                //A null pointer means nothing was received
}

void btSendStr(const char* str,uint8_t len)
{
  uint8_t i;
  
  if (len==0) len=strlen(str);//+1;             //if len=0 set len to strlen (+terminator)
  
  for (i=0; i<len; i++)
  {
        EUSART_Write(str[i]);
  }
}

//Returns >0 if rx string contains the string passed
//Must be called after btReadStr()
//This is used to seek for a command string
uint8_t btRxStrContains(const char* str)
{
  char* currPtr = strstr(&rxBuff[rxRdPtr],str);
  if (currPtr) 
  {
        rxRdPtr+=strlen(str);                   //Move pointer past the recognised substring
        if (rxRdPtr>=sizeof(rxBuff)) rxRdPtr=sizeof(rxBuff);
        return 1;
  }
  else currPtr=rxBuff;
  return 0;
}

//Reads the next numerical value (must be preceded by the specified char)
//Must be called after btReadStr()
uint8_t btRxValue(uint16_t * const val,char * const type,const uint16_t maxVal)
{
  char c;
  uint8_t valOK = 0;
  
  *type = 0;
  *val = 0;
    
  while (rxRdPtr<sizeof(rxBuff) )
  {
        c=rxBuff[rxRdPtr++];
        if (valOK==0 && c>='A' && c<='Z') 
        {
          *type = c;
          *val = 0;
          valOK = 0;
        }
        else if (*type && c>='0' && c<='9')
        {
          if (*val<maxVal)
          *val = (*val)*10 + (uint16_t)(c-'0');
          valOK = 1;
        }
        else 
          if (*type && valOK) 
          {
                if (rxRdPtr) rxRdPtr--;
                return 0;
          }
  }
  return 1;
}

//Sends an AT command, waits for the response and returns the response string
uint8_t btSendATcmd(const char *cmd)
{
  //Sends AT command (without the string termination)
  while (*cmd)
  {
    EUSART_Write(*cmd++);
  }
  __delay_ms(50);
  return 0;
}

void initJDY08()
{
  __delay_ms(50);                                 //Wait for the serial line to stabilise
  
  //Serial port was already initialised in SYSTEM_Initialize()
  btSendATcmd(HOSTEN);                    //Set proper mode of operation
  btSendATcmd(RST);                               //Reset the module
  __delay_ms(100);
  btSendATcmd(NAME);                      //Make sure the BT name is correct
  btSendATcmd(RST);                               //Reset the module
  __delay_ms(100);
  btSendATcmd(SPLASH);
  //Flush any remaining data
  while (EUSART_is_rx_ready()) EUSART_Read();
  
  rxRdPtr=0;
}