#include "mba32a.h"
#include "usart.h"
#include "interface.h"

/**
  * @breaf 外部定义
  */
extern UART_HandleTypeDef huart3;
extern UART_HandleTypeDef huart5;
extern Menu_table menu;					//结构体
extern TipsFlag tipsflag;

/**
  * @breaf 本页定义
  */
BtFrame btframe;
BtStep btstep;
bool BT_CONN = false;
bool connected = false;						//连接断进程标志位
bool resetBTmodule = false;

uint8_t step_BT=0;
uint8_t dev1[12]={0};
uint8_t resetcount=0;
uint16_t u5length=0;
uint16_t resetFlag16=0;
uint8_t g_MBA32A_8buf[1024]={0};  			//蓝牙接收数组
uint8_t g_MBA32A_8buf_Down[1024]={0} ;		//蓝牙搬移数组
uint16_t 	bt_dataLength=0;				//bt接收有效数据长度
uint8_t 	bt_error_num=0;					//bt接收的错误事件
uint32_t 	bt_serial_num=0;				//bt接收的流水号
uint8_t 	bt_battery=0;					//bt剩余电量百分比
uint8_t 	bt_log_num=0;					//bt记录事件数量
uint8_t 	bt_lock_machinesta=0;			//bt锁（电机）状态（0x00开；0x01关；0x02异常）
uint8_t 	bt_lock_ropesta=0;				//bt锁（锁绳）状态（0x00插入；0x01拔出）
uint16_t 	bt_hwver=0;						//bt硬件版本号
uint16_t 	bt_sfver=0;						//bt软件版本号

/**
  * @breaf 本页方法
  */
uint8_t sendCmd_BT(char *pCmd, char *pRes, uint32_t timeOut, uint8_t sendNum);
void MBA32AReset(void);
void Start_Read_resetFlag16(void);
void Bt_Connection(void);
/**
  * @breaf 非本页方法
  */
void execute_interface(Menu_table menu);


/**
  * @breaf 蓝牙初始化，工作接口
  */
void MBA32A_Init(void)
{
	INIT_BT_FRAME();/** 流水号/用户id/自动施封 **/
	Start_Read_resetFlag16();/** 启动位读写检查 **/
	switch(btstep)
	{
		case BtStepDefault:
			break;
		case UUIDS:
		{
			if(sendCmd_BT("AT+UUIDS?\r\n","+UUIDS:FFF0",1,1))//蓝牙芯片默认值，需要修改
			{
				if(sendCmd_BT("AT+UUIDS=0002\r\n","OK",1,1))
				{
					printf("#01设置主服务成功\n");
					btstep++;
				}
			}
			else
			{	//ERROR 其他值
				MBA32AReset();
				break;
			}
		}
		case UUIDN:
		{
			if(sendCmd_BT("AT+UUIDN?\r\n","+UUIDN:FFF1",1,1))//蓝牙芯片默认值，需要修改
			{
				if(sendCmd_BT("AT+UUIDN=FF04\r\n","OK",1,1))
				{
					printf("#02设置读服务成功\n");
					btstep++;
				}
			}
			else
			{	//ERROR 其他值
				MBA32AReset();
				break;
			}
		}
		case UUIDW:
		{
			if(sendCmd_BT("AT+UUIDW?\r\n","+UUIDW:FFF2",1,1))//蓝牙芯片默认值，需要修改
			{
				if(sendCmd_BT("AT+UUIDW=FFF5\r\n","OK",1,1))
				{
					printf("#03设置写服务成功\n");
					btstep++;
				}
			}
			else
			{	//ERROR 其他值
				MBA32AReset();
				break;
			}
		}
	}
}

/**
  * @breaf 蓝牙启动位读写检查
  */
void Start_Read_resetFlag16(void)
{
	resetFlag16 = read_flash_16(resetDevAddr);
	if(resetFlag16==0xFFFF)//开机检测（首次启动）
	{
		if(sendCmd_BT("AT+RESET=1\r\n","OK",1,1))
		{
			Write_Information(resetDevAddr);//写入0xAAAA
			printf("#复位设备成功\r\n");
			btstep = UUIDS;
		}
		if(!sendCmd_BT("AT+DISCONN=0\r\n","OK",1,1))
		{
			printf("#无设备连接\r\n");
		}
		else
		{
			printf("#已断开连接设备\r\n");
		}
	}
	else if(resetFlag16==0xAAAA)//开机检测（大于1次启动）
	{
		printf("#非首次启动\r\n");
		if (!sendCmd_BT("AT+UUIDS?\r\n","+UUIDS:0002",1,1))
		{
			PRINT_NUUID("UUIDS");//UUID项不符合
			btstep = UUIDS;
		}
		if (!sendCmd_BT("AT+UUIDN?\r\n","+UUIDN:FF04",1,1))
		{
			PRINT_NUUID("UUIDN");//UUID项不符合
			btstep = UUIDN;
		}
		if (!sendCmd_BT("AT+UUIDW?\r\n","+UUIDW:FFF5",1,1))
		{
			PRINT_NUUID("UUIDW");//UUID项不符合
			btstep = UUIDW;
		}
		else
		{
			PRINT_UUID("UUID项");//UUID项符合设置项
			btstep = BtStepDefault;
		}
	}
}
/**
  * @breaf 蓝牙初始化，演示接口
  */
void MBA32A_Init_demo(void)
{
	startdtu = true;
	menu.home=0;
	btframe.serialNum = 0x00000001;//流水号
	btframe.userId 	  = 0x64747531;//dtu1
	btframe.Autoseal  = 0x01;
	printf("\r\t\tBTinit%d...",resetcount);
	
	resetFlag16 = read_flash_16(resetDevAddr);
	if(resetFlag16==0xFFFF)//开机检测（首次启动）
	{
		if(sendCmd_BT("AT+RESET=1\r\n","OK",1,1))
		{
			Write_Information(resetDevAddr);//写入0xAAAA
			printf("复位设备成功\r\n");
		}
		else if(sendCmd_BT("AT+DISCONN=0\r\n","OK",1,1))
		{
			printf("取消连接所有设备\r\n");
		}
		else
		{
			printf("复位失败\r\n");
		}
	}
	else if(resetFlag16==0xAAAA)//开机检测（大于1次启动）
	{
		//printf("复位%X\r\n",resetFlag16);
		printf("非首次启动\r\n");
	}
	
	switch(step_BT)
	{
		case 0:
		{
			if(sendCmd_BT("AT+DEV?\r\n","+DEV:0,101000000003",1,1))
			{
				startdtu=false;	//关闭开始界面
				BT_CONN=true;
				connected=true;
				if(sendCmd_BT("AT+AUTO_CFG=1\r\n","OK",1,1))
				{
					printf("自动重连打开\r\n");
				}
				printf("设备已连接\r\n");
				//L1bd=true;
				break;
			}
			else if(sendCmd_BT("AT+DEV?\r\n","+DEV:",1,1))	
			{
				printf("未连接设备\r\n");
			}
			step_BT++;
		}
		case 1:
		{
			printf("设备未连接\r\n");
			if(!connected)//断进程标志位
			{
				if(sendCmd_BT("AT+UUIDS?\r\n","+UUIDS:FFF0",1,1))//蓝牙芯片默认值，需要修改
				{
					if(sendCmd_BT("AT+UUIDS=0002\r\n","OK",1,1))
					{
						printf("01设置主服务成功\n");
						step_BT++;
					}
				}
				else if(sendCmd_BT("AT+UUIDS?\r\n","+UUIDS:0002",1,1))
				{
					printf("UUIDS非默认值，符合\n");
					step_BT++;
				}
				else
				{	//ERROR 其他值
					MBA32AReset();
					break;
				}
			}
		}

		case 2:
		{
			if(!connected)//断进程标志位
			{
				if(sendCmd_BT("AT+UUIDN?\r\n","+UUIDN:FFF1",1,1))//蓝牙芯片默认值，需要修改
				{
					if(sendCmd_BT("AT+UUIDN=FF04\r\n","OK",1,1))
					{
						printf("02设置读服务成功\n");
						step_BT++;
					}
				}
				else if(sendCmd_BT("AT+UUIDN?\r\n","+UUIDN:FF04",1,1))
				{
					printf("UUIDN非默认值，符合\n");
					step_BT++;
				}
				else
				{	//ERROR 其他值
					MBA32AReset();
					break;
				}
			}
		}
		
		case 3:
		{
			if(!connected)//断进程标志位
			{
				if(sendCmd_BT("AT+UUIDW?\r\n","+UUIDW:FFF2",1,1))//蓝牙芯片默认值，需要修改
				{
					if(sendCmd_BT("AT+UUIDW=FFF5\r\n","OK",1,1))
					{
						printf("03设置写服务成功\n");
						step_BT++;
					}
				}
				else if(sendCmd_BT("AT+UUIDW?\r\n","+UUIDW:FFF5",1,1))
				{
					printf("UUIDW非默认值，符合\n");
					step_BT++;
				}
				else
				{	//ERROR 其他值
					MBA32AReset();
					break;
				}
			}
		}
		
		case 4:
		{
			if(!connected)//断进程标志位
			{
				if(sendCmd_BT("AT+CONN=101000000003\r\n","+CONNECTED:0,101000000003",3,3))
				{           
					startdtu=false;	//关闭开始界面
					BT_CONN=true;
					//L1bd=true;
					if(sendCmd_BT("AT+AUTO_CFG=1\r\n","OK",1,1))
					{
						printf("自动重连打开\r\n");
					}
					printf("连接成功！");
					break;
				}
				else if(sendCmd_BT("AT+CONN=101000000003\r\n","+CONNECT TIMEOUT",3,5))
				{
					printf("连接超时！");
					MBA32AReset();		//后台复位
					break;
				}
				else 
				{
					printf("连接失败！ %s",g_MBA32A_8buf_Down);
					MBA32AReset();
					break;
				}
			}
		}
	}
}


/**
  * @breaf 模块复位函数（接收数组清0）
  */		
void MBA32AReset(void)
{
	printf("Bt reset\r\n");   
	HAL_GPIO_WritePin(REST_BT_GPIO_Port,REST_BT_Pin,GPIO_PIN_RESET);
	HAL_Delay(4000);
	btstep = UUIDS;
	resetBTmodule=true;//freertos监测模块重启位
	resetcount+=1;
}

/**
  * @breaf 串口发送命令子函数
  */
void USART_SendString(UART_HandleTypeDef *huart, char *str)
{
	printf("\r\n\tTransmit CMD:\t");
	HAL_UART_Transmit(huart, (uint8_t*)str, strlen(str), 0xFFFF);
    HAL_UART_Transmit(&huart3, (uint8_t*)str, strlen(str), 0xFFFF);
	
}

/**
  * @breaf 串口发送命令，有接收数组比较函数
  */
uint8_t sendCmd_BT(char *pCmd, char *pRes, uint32_t timeOut, uint8_t sendNum)
{
    uint8_t i = 0;
    uint32_t time;          
    for(i = 0; i < sendNum; i++)
	{
        time = timeOut * 10;
        USART_SendString(&huart5, pCmd);
		HAL_Delay(30);
		printf("------->%s",g_MBA32A_8buf_Down);
		//memset(g_MBA32A_8buf_Down,0,50);
		
        while(time--)
		{
			if(strstr((const char *)g_MBA32A_8buf_Down, pRes) != NULL)             // 如果检索到关键词
			{
				memset(g_MBA32A_8buf_Down,0,50);
				return 1;
			}
			HAL_Delay(100);
        }
    }
    return 0;
}

/**
  * @breaf 20字节串口回显
  */
void Echo_BT(uint8_t echosize)
{
	HAL_UART_Transmit(&huart3,g_MBA32A_8buf_Down, echosize, 0xFFFF);//TTL回显
}

/**
  * @breaf 查询蓝牙锁信息帧
  */
void lock_searchInfo(void)		//蓝牙查询信息帧
{
	uint8_t header[2] 		= {0x66, 0x00};//Jl_lock帧头
	uint8_t serchInfo_CMD[] = {0x01, 0x00};//查询信息命令帧
	sendCombinedArray(header,sizeof(header),serchInfo_CMD,sizeof(serchInfo_CMD));
	Echo_BT(20);

}

/**
  * @breaf 蓝牙开锁信息帧
  */
void open_lock(BtFrame btframe)					//蓝牙开锁信息帧
{
	uint8_t header[2] 	= {0x66, 0x00};//Jl_lock帧头
	uint8_t open_CMD[] = {0x02, 0x0C, 	0x00,0x00,0x00,0x00,		0x00,0x00,0x00,0x00,	\
												0x00,0x00,0x00,0x00,   0x00};//开锁命令帧
	
	uint32_t serialNum = btframe.serialNum;//流水号
	open_CMD[2]=(serialNum>>24) & 0xff;
	open_CMD[3]=(serialNum>>16) & 0xff;
	open_CMD[4]=(serialNum>>8) & 0xff;
	open_CMD[5]= serialNum & 0xff;
												
	uint32_t userid = btframe.userId;//用户id
	open_CMD[6]=(userid>>24) & 0xff;
	open_CMD[7]=(userid>>16) & 0xff;
	open_CMD[8]=(userid>>8) & 0xff;
	open_CMD[9]= userid & 0xff;
												
	uint32_t ntime = btframe.Ntime;//现在时间
	open_CMD[10]=(ntime>>24) & 0xff;
	open_CMD[11]=(ntime>>16) & 0xff;
	open_CMD[12]=(ntime>>8) & 0xff;
	open_CMD[13]= ntime & 0xff;
												
	open_CMD[14] = btframe.Autoseal;//自动施封时间										
													
	sendCombinedArray(header,sizeof(header),open_CMD,sizeof(open_CMD));
	Echo_BT(20);
	refresh=true;
}

/**
  * @breaf 蓝牙关锁信息帧
  */
void close_lock(BtFrame btframe)					//蓝牙关锁信息帧
{
	uint8_t header[2] 	= {0x66, 0x00};//Jl_lock帧头
	uint8_t close_CMD[] = {0x03, 0x0B};//关锁命令帧
	sendCombinedArray(header,sizeof(header),close_CMD,sizeof(close_CMD));
	Echo_BT(20);
	refresh=true;
}

/**
  * @breaf 写死的蓝牙连接函数
  */
void Bt_Connection(void)
{
	if(sendCmd_BT("AT+CONN=101000000003\r\n","+CONNECTED:0,101000000003",3,3))
	{           
		if(sendCmd_BT("AT+AUTO_CFG=1\r\n","OK",1,1))
		{
			printf("自动重连打开\r\n");
		}
		printf("连接成功！");
		menu.current=2;
		refresh=true;
		
		/** 后期修改 **/
		BT_CONN=true;
		L1bd=true;
	}
	else if(sendCmd_BT("AT+CONN=101000000003\r\n","+CONNECT TIMEOUT",3,5))
	{
		printf("连接超时！");
		MBA32AReset();		//后台复位
	}
	else 
	{
		printf("连接失败！ %s",g_MBA32A_8buf_Down);
		MBA32AReset();
	}	
}

/**
  * @breaf 蓝牙扫描MAC切分函数
  */
#define JL_LOCK_LENGTH 	11
#define DEV_LENGTH 		12
//#define DEV_COUNT 		4
uint16_t counter_bt = 0;
void split_BtArr(uint8_t* arr, uint16_t len)
{
	bool found_JLLock = false;
    //uint8_t JLLock[] = {0x01, 0x00, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00};
    uint8_t JLLock[] = {0x31, 0x00, 0x31, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00};
    //uint8_t null[] = {0x31, 0x31, 0x31, 0x00, 0x00};
    for (uint16_t i = 0; i < len - JL_LOCK_LENGTH; i++)
    {
        if (memcmp(&arr[i], JLLock, JL_LOCK_LENGTH) == 0)
        {
            found_JLLock = true;
        }
        
        if (found_JLLock)
        {
			memcpy(dev1, arr+i , DEV_LENGTH);
			printf("d1:%s",dev1);
		}
	}
}

/**
  * @breaf 蓝牙扫描函数
  */
void Bt_MacScan(char *pCmd)
{
	//"AT+SCAN=1\r\n"
	if(menu.current==3)//MAC1搜索
	{
		USART_SendString(&huart5, pCmd);
		HAL_Delay(300);
		printf("%s\r\n",g_MBA32A_8buf_Down);
//		for (int i = 0; i < u5length; i++) {
//			printf("0x%02x ", g_MBA32A_8buf_Down[i]);
//		}
			
		//split_BtArr(g_MBA32A_8buf_Down, u5length);
		HAL_Delay(1000);
	}
//	else if(menu.current==4)//MAC2搜索
//	{
//		USART_SendString(&huart5, pCmd);
//	}
//	else if(menu.current==5)//MAC3搜索
//	{
//		USART_SendString(&huart5, pCmd);
//	}	
//	else if(menu.current==6)//MAC4搜索
//	{
//		USART_SendString(&huart5, pCmd);
//	}	
	
}

/**
  * @breaf 问询蓝牙锁工作信息函数
  */
void workinfo_W(void)
{	
	if(*g_MBA32A_8buf_Down == NULL)
		return;
	if(g_MBA32A_8buf_Down[0]==0x66 && g_MBA32A_8buf_Down[1]==0x00  )//未加密帧头(命令字0x01)
	{
		if(g_MBA32A_8buf_Down[2]==0x01)
		{
//			bt_dataLength = g_MBA32A_8buf_Down[3];//接收数据长度
//			bt_error_num = g_MBA32A_8buf_Down[4];	//错误事件数
//			// 将4个字节存入 bt_serial_num流水号
//			bt_serial_num |= g_MBA32A_8buf_Down[5]<<24;
//			bt_serial_num |= g_MBA32A_8buf_Down[6]<<16;
//			bt_serial_num |= g_MBA32A_8buf_Down[7]<<8;
//			bt_serial_num |= g_MBA32A_8buf_Down[8];
//			bt_battery = g_MBA32A_8buf_Down[9];	//电量百分比
//			bt_log_num = g_MBA32A_8buf_Down[10];//记录型事件
			bt_lock_machinesta = g_MBA32A_8buf_Down[11];	//电机状态
			bt_lock_ropesta    = g_MBA32A_8buf_Down[12];	//锁绳状态
//			bt_hwver |= g_MBA32A_8buf_Down[13]<<8; 			//硬件版本号
//			bt_hwver |= g_MBA32A_8buf_Down[14]; 
//			bt_sfver |= g_MBA32A_8buf_Down[15]<<8; 			//软件版本号
//			bt_sfver |= g_MBA32A_8buf_Down[16]; 
			
		}
		else if((g_MBA32A_8buf_Down[2]==0x03) && (g_MBA32A_8buf_Down[3]==0x01))//施封（关锁完成）
		{

		}

		else if((g_MBA32A_8buf_Down[2]==0x02) && (g_MBA32A_8buf_Down[3]==0x01))//解封（关锁完成）
		{

		}
	}

}
/**
  * @breaf 00-施解封操作(Freertos 工作函数)
  */
void open_close_lock(void)
{
	if(menu.up == 1 && menu.current == 0x0C && tipsflag!=Abnormal_motor  && tipsflag == Default){

		btframe.serialNum+=1;
		// 施封操作
		tipsflag = InProgress;//进行中
		close_lock(btframe);

	}
	else if(menu.up == 0 && menu.current == 0x0C &&  tipsflag!=Abnormal_motor && tipsflag == Default)
	{
		btframe.serialNum+=1;
		// 解封操作
		tipsflag = InProgress;//进行中
		open_lock(btframe);

	}  
}

/**
  * @breaf 01-key跳转回按键后current跳转0x0C
  */
void Seal_Unseal_Jumptips(void)
{
	if (menu.enter == 4)
	{
		if ((menu.current == 8 || menu.current == 9 || menu.current == 0xa || menu.current == 0xb))
		{
			if (menu.up == 1)
			{
				menu.current = 0x0C;		
				HAL_Delay(300);
			}
			else if (menu.up == 0)
			{
				menu.current =  0x0C;		
				HAL_Delay(300);
			}
		}
	}
}


/**
  * @breaf 02-设置锁位状态
  * @enter InProgress
  */
unsigned char warning[]="WARNING";
unsigned char left[]="<<";
unsigned char right[]=">>";
void tips(void)
{
	if (tipsflag == Default) {
		// 执行默认操作
		
	} else if (tipsflag == InProgress) {	
		
		tipsflag = Default;
		OLED_ShowString(37,5,warning,16,0);
		OLED_ShowString(13,32, right,16,1);
		OLED_ShowString(95,32,left,16,1);
		// 执行操作中的操作
		OLED_ShowChinese(38,32,22,16,1);//操
		OLED_ShowChinese(58,32,23,16,1);//作
		OLED_ShowChinese(78,32, 0,16,1);//中
	}
	else if (tipsflag == Abnormal_motor)
    {
		OLED_ShowString(20,52,">>",12,1);				//显示ASCII字符	 
		OLED_ShowChinese(38,52,17,12,1);//电
		OLED_ShowChinese(51,52,18,12,1);//机
		OLED_ShowChinese(64,52,19,12,1);//异
		OLED_ShowChinese(77,52,20,12,1);//常
		OLED_ShowString(92,52,"<<",12,1);				//显示ASCII字符	 
    }
	else {
		// 处理其他情况
		
	}
	
	
}

/**
  * @breaf 03-扫描锁位状态
  */
void Scan_lock_status(void)
{
	if(bt_lock_machinesta==0x01 && bt_lock_ropesta==0x00 && g_MBA32A_8buf_Down[0]==0x66)//0x01电机关 0x00锁绳插入
	{
		tipsflag = Default;
		menu.home=0xF000;//关（全部关闭）
	}
	else if(bt_lock_machinesta==0x00 && bt_lock_ropesta==0x01 && g_MBA32A_8buf_Down[0]==0x66)
	{
		tipsflag = Default;
		menu.home=0x1000;//开（全部开启）
	}
	else if(bt_lock_ropesta==0x00 && bt_lock_machinesta==0x00 && g_MBA32A_8buf_Down[0]==0x66)
	{
		tipsflag = Default;
		menu.home=0x1000;//开（电机打开，锁绳插入，可按键拔出）
	}
	else if(bt_lock_ropesta==0x01 && bt_lock_machinesta==0x00 && g_MBA32A_8buf_Down[0]==0x66)
	{
		tipsflag = Default;
		menu.home=0x1000;//开（电机关闭，锁绳拔出）
	}
	else if(bt_lock_ropesta==0x01 && bt_lock_machinesta==0x01 && g_MBA32A_8buf_Down[0]==0x66)
	{
		tipsflag = Default;
		menu.home=0x1000;//开（电机关闭，锁绳拔出）
	}
	else if(bt_lock_machinesta == 0x02 && g_MBA32A_8buf_Down[0]==0x66)
	{
		tipsflag = Abnormal_motor;
	}

}