NBIOT BC28驱动程序

//******************************************************************************

// www.gilicon.cn

//

// Copyright © 2020, NANCHANG Co.,Ltd.

// All rights reserved.

//

// FileName : NB_BC28.c

// Date : 2020-01-07

// Version : V0001

// 历史记录 : 1.第一次创建

//

// 说明：

// NB_IOT与平台相关的配置变量定义

//******************************************************************************

#include "NB_BC28.h"

#include "NB_Board.h"

#include "systick.h"

#include "lcd12864.h"

#include "Iwdg.h"

//#define REMOTE_SERVER_IP "183.230.40.39"

//#define REMOTE_DEVICE_ID "533756583"

//#define REMOTE_SERVER_PASS "252854"

//#define REMOTE_MQTT_INFO "NBIOTGILICON"

//#define REMOTE_MQTT_VER "version"

//#define REMOTE_MQTT_SUB_TOPIC "/gilicon/device/001"

//#define REMOTE_MQTT_PUB_TOPIC "/gilicon/device/002"

#define REMOTE_SERVER_IP "183.230.40.39"

//#define REMOTE_DEVICE_ID "581594300"

//#define REMOTE_DEVICE_ID "581594301"

//#define REMOTE_DEVICE_ID "581594302"

//#define REMOTE_DEVICE_ID "581594303"

//#define REMOTE_DEVICE_ID "581594304"

#define REMOTE_DEVICE_ID "581594306"

//char MAC_DEVICE_ID[12] = "000000000004";

//char MAC_DEVICE_ID[12] = "202603530001";

//char MAC_DEVICE_ID[12] = "202607910010";

char MAC_DEVICE_ID[12] = "202607980007";

#define REMOTE_SERVER_PASS "252854"

//#define REMOTE_MQTT_INFO "GILICONDEV001"

//#define REMOTE_MQTT_INFO "GILICONDEV002"

//#define REMOTE_MQTT_INFO "GILICONDEV003"

//#define REMOTE_MQTT_INFO "GILICONDEV004"

//#define REMOTE_MQTT_INFO "GILICONDEV005"

#define REMOTE_MQTT_INFO "GILICONDEV007"

#define REMOTE_MQTT_VER "version"

#define REMOTE_MQTT_SUB_TOPIC ""/gilicon/device/001""

#define REMOTE_MQTT_PUB_TOPIC "/gilicon/device/002"

bool NB_Connect_Err = false;

NETWORK_DEVICE_INFO NBIOT_MODULE_INFO ;

bool NB_OrderInfo(void);

bool NBIOT_Cmd ( char * cmd, char * reply1, char * reply2, u32 waittime );

//创建TCP Socket===>成功返回1，失败返回0

u8 NB_Create_TCP(char *server_ip, int port)

{

char buffer[64] = {0};

bool status = true ;

sprintf(buffer, "AT+QMTOPEN=0,%s,%d", server_ip, port);
//连接MQ
status = NBIOT_Cmd(buffer, "OK", NULL, 1500);
//连接ONENET MQTT服务器
if(true == status)
{

// fnWDT_Restart();

sprintf(buffer, "AT+QMTCONN=0,%s,%s,%s", REMOTE_DEVICE_ID, REMOTE_SERVER_PASS,REMOTE_MQTT_INFO);

status = NBIOT_Cmd(buffer, "OK", NULL, 3000);

if(true == status)

return 1 ;

else

return 0 ;

}

return 0 ;

}

//订阅信息

bool NB_OrderInfo(void)

{

bool status = true ;

char data_buffer[64] = {0};

sprintf(data_buffer, "AT+QMTSUB=0,1,%s,0", REMOTE_MQTT_SUB_TOPIC);

status = NBIOT_Cmd(data_buffer, "+QMTSUB", NULL, 3000);

return status ;

}

//NBIOT基础配置

bool BASE_Config_NBIOT(void)

{

char buffer[50] = {0};

bool status = true ;

//按照获取的产品、设备信息，配置阿里云设备信息。AT+QMTCFG="version",0,4

sprintf(buffer, "AT+QMTCFG=%s,0,4", REMOTE_MQTT_VER);

status = NBIOT_Cmd(buffer, "OK", NULL, 500);

return status ;

}

//关闭Socket连接

bool Close_Socket(void)

{

bool status = true ;

status = NBIOT_Cmd("AT+QMTCLOSE=0", "OK", NULL, 2000);

return status ;

}

/*

• 函数名：NBIOT_Cmd

• 描述 ：对NBIOT模块发送AT指令

• 输入 ：cmd，待发送的指令

      reply1，reply2，期待的响应，为NULL表不需响应，两者为或逻辑关系

      waittime，等待响应的时间

• 返回 : 1，指令发送成功

      0，指令发送失败

• 调用 ：被外部调用

  */

  bool NBIOT_Cmd ( char * cmd, char * reply1, char * reply2, u32 waittime )

  {

  bool status = false ;

  USART1_RX_STA = 0 ;//从新开始接收新的数据包

  // memset(NB_RXBuffer, 0, MAX_COMPACK_SIZE); //清空接收缓冲

  u1_printf("%s\r\n", cmd);

  if ( ( reply1 == 0 ) && ( reply2 == 0 ) ) //不需要接收数据

  return true;

  delay_ms ( waittime ); //延时

  // NB_RXBuffer[NB_FramLength] = '\0';

  if(USART1_RX_STA&0X8000)//接收到期待的应答结果

  {

  NB_RXBuffer[USART1_RX_STA&0X7FFF]=0;//添加结束符

  // printf("RXBuffer:%s\n", NB_RXBuffer);

  USART1_RX_STA = 0;

  if(strstr((char *)NB_RXBuffer, reply1) != NULL)

  {

  // printf("ackerror:%s\n", reply1);

  return true ;

  }

   if (strstr((char *)NB_RXBuffer, reply2) != NULL)
   {
  

  // printf("acksuccess:%s\n", NB_RXBuffer);

  //如果匹配到断连标志，就重新建立连接

  NB_Connect_Err = true;

  // BASE_Config_NBIOT();

  status = NB_Create_TCP(REMOTE_SERVER_IP, 6002);

  // fnWDT_Restart();

  if (false == status)

  {

  // fnWDT_Restart();

  Close_Socket();

  NB_Create_TCP(REMOTE_SERVER_IP, 6002);

  NB_Connect_Err = false;

  }

  NB_OrderInfo();

  u1_printf("%s\r\n", cmd); //重新发一次数据

  return true ;

  }

  }

  return false ;

  }

void NB_TCP_Connect(void)

{

bool status = false ;

NB_Connect_Err = true;

status = NB_Create_TCP(REMOTE_SERVER_IP, 6002);
if  (false == status)
{
    Close_Socket();
    NB_Create_TCP(REMOTE_SERVER_IP, 6002);
    NB_Connect_Err = false;
}
NB_OrderInfo();

}

//NBIOT发送数据到后台服务器

/*

Data_Length:要发送到后台的原始数据的长度

hex_data:要发送到后台的，但必须将原始数据转换成十六进制编码的数据

*/

bool NB_Send_Data_To_Server(uint8_t *send_data)

{

bool status = true;

char data_buffer[NB_MAX_SEND_LEN] = {0};

// printf("数据上传:\n");

// printf("%s\n", data_buffer);

// NB_OrderInfo();

sprintf(data_buffer, "AT+QMTPUBEX=0,0,0,0,%s,%s", REMOTE_MQTT_PUB_TOPIC, send_data);

status = NBIOT_Cmd(data_buffer, "OK","ERROR", 1000);

// if(status == true)

// {

// u1_printf("%s\r\n", data_buffer);

// USART_SendData(USART1,0x1A);

// }

return status ;

}

//bool NB_Send_Data_To_Server(uint8_t *send_data)

//{

// bool status = true;

// char data_buffer[128] = {0};

printf("数据上传:\n");

printf("%s\n", data_buffer);

//

// sprintf(data_buffer, "AT+QMTPUB=0,0,0,1,%s", REMOTE_MQTT_PUB_TOPIC);

// status = NBIOT_Cmd(data_buffer, "<",NULL, 500);

// if(status == true)

// {

// u1_printf("%s\r\n", data_buffer);

// USART_SendData(USART1,0x1A);

// }

//

// return status ;

//}

//获取信号强度

int Get_CSQ(void)

{

int signal_value = -1;

bool status = true ;

char csq_buffer[50] = {0};

status = NBIOT_Cmd("AT+CSQ", "+CSQ", NULL, 500);

if(status == true)
{
    memcpy(csq_buffer, NB_RXBuffer + 7, 2);
    signal_value = atoi(csq_buffer);
    return signal_value ;
}
return 99 ;

}

//获取入网状态

bool Get_Enter_Net_Status(void)

{

int status = 0 ;

bool cmd_status = false ;

char buffer[30] = {0};

cmd_status = NBIOT_Cmd("AT+CGATT?", "OK", NULL, 2000);

// cmd_status = NBIOT_Cmd("AT+CGATT?", "OK", NULL, 60000);

memcpy(buffer, NB_RXBuffer + 9, 1);

status = atoi(buffer);

if(1 == status)
    return true;
else
    return false ;

}

//检查模组是否在线

bool checkNBIOT(void)

{

return NBIOT_Cmd("AT", "OK", NULL, 500);

}

bool NBIOT_ClosePSM(void)

{

return NBIOT_Cmd("AT+CPSMS=0", "OK", NULL, 500);

}

bool NBIOT_CloseDRX(void)

{

return NBIOT_Cmd("AT+CEDRXS=0,5", "OK", NULL, 500);

}

int nb_reconnect_cnt = 0;

/**

• 功能：初始化NBIOT

• 参数：None

• 返回值：初始化结果，非0为初始化成功,0为失败

  */

  int initNBIOT(void)

  {

  bool status_return = false ;

  while(1)

  {

  switch(NBIOT_MODULE_INFO.Init_NB_Status)

  {

  //1、检查NBIOT模块是否在线

  case 0:

  status_return = checkNBIOT();

           if(false == status_return)
           {
  

// printf("NB模块硬件故障...\n");

display_string_8x16(5,16,"NB ERROR");

NBIOT_MODULE_INFO.Init_NB_Status = 0 ;

nb_reconnect_cnt++;

if (nb_reconnect_cnt > 5)

{

nb_reconnect_cnt = 0;

NBIOT_MODULE_INFO.Init_NB_Status = 7 ;

}

}

else

{

// printf("NB模块正常连接\n");

display_string_8x16(5,16,"NB ONLINE");

NBIOT_MODULE_INFO.Init_NB_Status = 1 ;

nb_reconnect_cnt = 0;

}

delay_ms ( 2000 );

break ;

        case 1:
            status_return = Get_Enter_Net_Status();

            if(false == status_return)
            {

// printf("入网失败，请重新复位模块\n");

display_string_8x16(5,16,"NET ERROR");

NBIOT_MODULE_INFO.Init_NB_Status = 1 ;

nb_reconnect_cnt++;

if (nb_reconnect_cnt > 5)

{

nb_reconnect_cnt = 0;

NBIOT_MODULE_INFO.Init_NB_Status = 2 ;

}

break ;

}

else

{

// printf("模组入网成功...\n");

display_string_8x16(5,16,"NET OK");

NBIOT_MODULE_INFO.Init_NB_Status = 2 ;

nb_reconnect_cnt = 0;

}

            break ;

        case 2:
             NBIOT_MODULE_INFO.signalCSQ = Get_CSQ();

            if(99 == NBIOT_MODULE_INFO.signalCSQ)
            {

// printf("设备无信号...\n");

display_string_8x16(5,16,"NB CSQ LOW");

NBIOT_MODULE_INFO.Init_NB_Status = 2 ;

nb_reconnect_cnt++;

if (nb_reconnect_cnt > 5)

{

nb_reconnect_cnt = 0;

NBIOT_MODULE_INFO.Init_NB_Status = 7 ;

}

}

else

{

// printf("信号级别:%d\n", NBIOT_MODULE_INFO.signalCSQ);

display_string_8x16(5,16,"NB CSQ OK");

NBIOT_MODULE_INFO.Init_NB_Status = 3 ;

nb_reconnect_cnt = 0;

}

break ;

        case 3:
            //按照获取的产品、设备信息，配置阿里云设备信息。AT+QMTCFG="version",0,4
            status_return = BASE_Config_NBIOT();

            if(false == status_return)
            {
                NBIOT_MODULE_INFO.Init_NB_Status = 3 ;
                 nb_reconnect_cnt++;
                if (nb_reconnect_cnt > 5)
                {
                    nb_reconnect_cnt = 0;
                    NBIOT_MODULE_INFO.Init_NB_Status = 7 ;
                }
            }
            else
            {
                NBIOT_MODULE_INFO.Init_NB_Status = 4 ;
                nb_reconnect_cnt = 0; 
            }
            delay_ms ( 1000 );    
            break ;

        case 4:
            Close_Socket();
            status_return = NB_Create_TCP(REMOTE_SERVER_IP, 6002);

            if(false == status_return)
            {

// printf("重新创建TCP连接失败\n");

NBIOT_MODULE_INFO.Init_NB_Status = 5 ;

display_string_8x16(5,16,"NB CONNECT ERR");

break ;

}

else

{

// printf("重新创建TCP连接成功\n");

NBIOT_MODULE_INFO.Init_NB_Status = 5 ;

display_string_8x16(5,16,"NB CONNECT OK");

            }
            delay_ms ( 2000 );    
            break ;

        case 5:
            
            status_return = NB_OrderInfo();

            if(false == status_return)
            {
                NBIOT_MODULE_INFO.Init_NB_Status = 7 ;
            }
            else
            {
                NBIOT_MODULE_INFO.Init_NB_Status = 7 ;
            }
            delay_ms ( 1000 );    
            break ;

        default:
            break ;
    }

    if(7 == NBIOT_MODULE_INFO.Init_NB_Status)
    {
        NBIOT_ClosePSM();
        NBIOT_CloseDRX();
        break ;
    }
}

return 1;

}

char* nb_itoa(int num, char* str, int radix)

{

/索引表 /

char temp;

char index[] = "0123456789ABCDEF";

unsigned unum;/中间变量 /

int i = 0, j, k;

/*确定unum的值*/
if(radix == 10 && num < 0) /*十进制负数*/
{
    unum = (unsigned) - num;
    str[i++] = '-';
}
else unum = (unsigned)num; /*其他情况*/

/*转换*/
do
{
    str[i++] = index[unum % (unsigned)radix];
    unum /= radix;
}
while(unum);

str[i] = '\0';

/*逆序*/
if(str[0] == '-')
    k = 1; /*十进制负数*/
else
    k = 0;

for(j = k; j <= (i - 1) / 2; j++)
{
    temp = str[j];
    str[j] = str[i - 1 + k - j];
    str[i - 1 + k - j] = temp;
}

return str;

}

int nb_Str2Hex(char *str, char *hex)

{

int high = 0;

int low = 0;

int temp = 0;

if (NULL == str || NULL == hex)
{
    return -1;
}

if (0 == strlen(str))
{
    return -2;
}

while(*str)
{
    temp = (int)(*str);
    high = temp >> 4;
    low = temp & 15;
    nb_itoa(high, hex, 16);
    hex++;
    nb_itoa(low, hex, 16);
    hex++;
    str++;
}

*hex = '\0';
return 0;

}