#include "mba32a.h"
#include "usart.h"
#include "interface.h"
#include "key.h"
#include "tt808.h"
#include "ml307a.h"


//*结构体
BtStep btstep;
BtFrame btframe;
extern Menu_table menu;	
extern TT808 tt808;
extern TipsFlag tipsflag;	

//*整型
uint8_t resetcount_bt=0;
uint16_t resetFlag16=0;

//*布尔
bool resetBTmodule = false;

bool L1Worked = false;
bool L2Worked = false;
bool L3Worked = false;
bool L4Worked = false;
bool L5Worked = false;
bool L6Worked = false;
bool L7Worked = false;
bool L8Worked = false;

//*字符串
char autoRe[1024];


//*外部方法
uint16_t read_flash_16(uint32_t addr);
void Write_Information(uint32_t addr, uint16_t newValue);

//*本模块方法
uint8_t sendCmd_BT(char *pCmd,char *pRes, uint32_t timeOut, uint8_t sendNum);
void MBA32AReset(void);
uint16_t resetdev[2];


void open_lock(BtFrame btframe);
void close_lock(BtFrame btframe);



extern TipsFlag tipsflag;	
/**
  * @breaf 蓝牙启动位读写检查
  */
void Start_Read_resetFlag16(void)
{
	resetdev[0] = 0xAAAA;
	
	Flash_ReadBytes(&resetdev[1], resetDevAddr, 2);
	resetFlag16 = resetdev[1];
	
	if(resetFlag16==0xFFFF)//开机检测（首次启动）
	{
		if(sendCmd_BT("AT+RESET=1\r\n","OK",1,1))
		{
			Flash_WriteBytes(resetdev,resetDevAddr,1);
			printf("###复位设备成功\r\n");
			btstep = UUIDS;
		}
	}
	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;
		}
		else
		{
			
			PRINT_UUID("UUID项及发射功率");//符合设置项
			btstep = BtStepDefault;
		}
	}
}
/**
  * @breaf 蓝牙初始化，工作接口
  */
void MBA32A_Init(void)
{

	btframe.userId 	  = 0x64747531; 
	btframe.Autoseal  = 0xFF; //自动施封时间
	
	printf("\t###01\tBT_init%d...\r\n", resetcount_bt); 
	
	Start_Read_resetFlag16();/** 启动位读写检查 **/

	if(sendCmd_BT("AT+DISCONN=0\r\n","ERROR",1,1))//断开连接
	{
		if(sendCmd_BT("AT+DISCONN=1\r\n","ERROR",1,1))//断开连接
		{
			printf("#已无主设备连接\n");
		}
		printf("#已无从设备连接\n");
		
	}
	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;
			}
		}
		case TxPower:
		{
			if(sendCmd_BT("AT+TXPOWER?\r\n","+TXPOWER:0",1,1))//蓝牙芯片默认值，需要修改
			{
				if(sendCmd_BT("AT+TXPOWER=10\r\n","OK",1,1))
				{
					printf("#04设置发射功率成功\n");
					btstep++;
				}
			}
			else
			{	//ERROR 其他值
				//MBA32AReset();
				break;
			}
		}
			
	}

//menu.current=0;
//refresh=true;
	

}
/**
  * @breaf 串口发送命令子函数
  */
void USART_SendString(UART_HandleTypeDef *huart,char *str)
{
	//printf("\r\nAT_CMD:\t");
	HAL_UART_Transmit(huart, (uint8_t*)str, strlen(str), 0xFFFF);		//工作信息串口发送
    HAL_UART_Transmit(&huart1, (uint8_t*)str, strlen(str), 0xFFFF);		//485打印log
    //HAL_UART_Transmit(&huart3, (uint8_t*)str, strlen(str), 0xFFFF);	//TTL打印log
	
}
/**
  * @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);
		
        while(time--)
		{
			if(strstr((const char *)U5_BTrecvBuff, pRes) != NULL)             // 如果检索到关键词
			{
				memset(U5_BTrecvBuff,0,50);
				return 1;
			}
			HAL_Delay(100);
        }
    }
    return 0;
}

/**
  * @breaf 模块复位函数（接收数组清0）
  */		
void MBA32AReset(void)
{
	resetcount_bt+=1;
	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监测模块重启位
}



/**
  * @breaf 蓝牙开锁信息帧
  */
void open_lock(BtFrame btframe)			//蓝牙开锁信息帧
{
	uint8_t header[2] 	= {0x66, 0x01};//Jl_lock帧头
	uint8_t open_CMD[] = {0x02, 0x0C, 	0x00,0x00,0x00,0x00,		0x00,0x00,0x00,0x00, \
												0x00,0x00,0x00,0x00,   0x00};//开锁命令帧
	
	uint32_t serialNum;
	if(menu.current==4)
	{
		serialNum = btframe.serialNum1;//流水号
	}
	if(menu.current==5)
	{
		serialNum = btframe.serialNum2;//流水号
	}
	if(menu.current==6)
	{
		serialNum = btframe.serialNum3;//流水号
	}
	if(menu.current==7)
	{
		serialNum = btframe.serialNum4;//流水号
	}
	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 = dblocptr->location.timeStamp;//现在时间
	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),1);//加密
}

/**
  * @breaf 蓝牙关锁信息帧
  */
void close_lock(BtFrame btframe)		//蓝牙关锁信息帧
{
	uint8_t header[2] 	= {0x66, 0x01};//Jl_lock帧头
	uint8_t close_CMD[] = {0x03, 0x0B, 0x00,0x00,0x00,0x00,		0x00,0x00,0x00,0x00, \
												0x00,0x00,0x00,0x00};//关锁命令帧
	uint32_t serialNum;
	if(menu.current==4)
	{
		serialNum = btframe.serialNum1;//流水号
	}
	if(menu.current==5)
	{
		serialNum = btframe.serialNum2;//流水号
	}
	if(menu.current==6)
	{
		serialNum = btframe.serialNum3;//流水号
	}
	if(menu.current==7)
	{
		serialNum = btframe.serialNum4;//流水号
	}
	close_CMD[2]=(serialNum>>24) & 0xff;
	close_CMD[3]=(serialNum>>16) & 0xff;
	close_CMD[4]=(serialNum>>8) & 0xff;
	close_CMD[5]= serialNum & 0xff;
												
	uint32_t userid = btframe.userId;//用户id
	close_CMD[6]=(userid>>24) & 0xff;
	close_CMD[7]=(userid>>16) & 0xff;
	close_CMD[8]=(userid>>8) & 0xff;
	close_CMD[9]= userid & 0xff;											
											
	uint32_t ntime = dblocptr->location.timeStamp;//现在时间
	close_CMD[10]=(ntime>>24) & 0xff;
	close_CMD[11]=(ntime>>16) & 0xff;
	close_CMD[12]=(ntime>>8) & 0xff;
	close_CMD[13]= ntime & 0xff;											
	
	sendCombinedArray(header,sizeof(header),close_CMD,sizeof(close_CMD),1);
}


uint8_t BtLockConn(uint8_t temp,uint8_t close)
{
	if(temp==0)
	{
		if(sendCmd_BT(macsetptr->SN1CONN,macsetptr->SN1ED,1,1))
		{
			//printf("%s连接成功\r\n",lockinfo.SN1name);
			if(close)
			{
				close_lock(btframe); //施封操作
				return 1;
			}
			else
			{
				open_lock(btframe); //解封操作
				return 1;
			}
		}
		else
		{
			//printf("%s连接失败\r\n",lockinfo.SN1name);
		}	
	}
	else if(temp==1)
	{
		if(sendCmd_BT(macsetptr->SN2CONN,macsetptr->SN2ED,1,1))
		{
			//printf("%s连接成功\r\n",lockinfo.SN2name);
			if(close)
			{
				close_lock(btframe); //施封操作
			}
			else
			{
				open_lock(btframe); //解封操作
			}
		}
		else
		{
			//printf("%s连接失败\r\n",lockinfo.SN2name);
		}	
	}
	else if(temp==2)
	{
		if(sendCmd_BT(macsetptr->SN3CONN,macsetptr->SN3ED,1,1))
		{
			printf("%s连接成功\r\n",lockinfo.SN3name);
			if(close)
			{
				close_lock(btframe); //施封操作
			}
			else
			{
				open_lock(btframe); //解封操作
			}
		}
		else
		{
			printf("%s连接失败\r\n",lockinfo.SN3name);
		}	
	}
	else if(temp==3)
	{
		if(sendCmd_BT(macsetptr->SN4CONN,macsetptr->SN4ED,1,1))
		{
			printf("%s连接成功\r\n",lockinfo.SN4name);
			if(close)
			{
				close_lock(btframe); //施封操作
			}
			else
			{
				open_lock(btframe); //解封操作
			}
		}
		else
		{
			printf("%s连接失败\r\n",lockinfo.SN4name);
		}	
	}
	
	else if(temp==4)
	{
		if(sendCmd_BT(macsetptr->SN5CONN,macsetptr->SN5ED,1,1))
		{
			printf("%s连接成功\r\n",lockinfo.SN5name);
			if(close)
			{
				close_lock(btframe); //施封操作
			}
			else
			{
				open_lock(btframe); //解封操作
			}
		}
		else
		{
			printf("%s连接失败\r\n",lockinfo.SN5name);
		}	
	}
	else if(temp==5)
	{
		if(sendCmd_BT(macsetptr->SN6CONN,macsetptr->SN6ED,1,1))
		{
			printf("%s连接成功\r\n",lockinfo.SN6name);
			if(close)
			{
				close_lock(btframe); //施封操作
			}
			else
			{
				open_lock(btframe); //解封操作
			}
		}
		else
		{
			printf("%s连接失败\r\n",lockinfo.SN6name);
		}	
	}
		
	else if(temp==6)
	{
		if(sendCmd_BT(macsetptr->SN7CONN,macsetptr->SN7ED,1,1))
		{
			printf("%s连接成功\r\n",lockinfo.SN7name);
			if(close)
			{
				close_lock(btframe); //施封操作
			}
			else
			{
				open_lock(btframe); //解封操作
			}
		}
		else
		{
			printf("%s连接失败\r\n",lockinfo.SN7name);
		}	
	}
	else if(temp==7)
	{
		if(sendCmd_BT(macsetptr->SN8CONN,macsetptr->SN8ED,1,1))
		{
			printf("%s连接成功\r\n",lockinfo.SN8name);
			if(close)
			{
				close_lock(btframe); //施封操作
			}
			else
			{
				open_lock(btframe); //解封操作
			}
		}
		else
		{
			printf("%s连接失败\r\n",lockinfo.SN8name);
		}	
	}
}


void connectDevices() {
    int connectedDevice = 0; // 用于跟踪已连接的设备的数量
    int devices[8] = {0}; // 数组用于跟踪设备的连接状态（0 - 未连接，1 - 已连接）
    
    while (connectedDevice < macsetptr->macCount) { // 直到已连接设备数量达到macCount时继续循环
        for (int i = 0; i < macsetptr->macCount; i++) { // 循环遍历所有设备
            if (devices[i] == 0) { // 检查设备是否未连接
                // 尝试连接设备
                //printf("正在尝试连接设备 %d...\n", i);
                // 连接代码
                int connectionStatus = BtLockConn(i, 0); 
                if (connectionStatus == 1) { // 如果连接成功
                    //printf("已连接设备 %d！\n", i);
                    devices[i] = 1; // 将设备标记为已连接
                    connectedDevice++; // 已连接设备数量加一
                    // 对已连接设备进行操作
                } else {
                    //printf("无法连接设备 %d。\n", i);
                }
                
                // 添加超时机制，使用HAL_Delay函数
                HAL_Delay(200); // 等待200毫秒
				printf("%d\r\n",i);
				printf("%d\r\n",macsetptr->macCount);
            }
        }
    }
    if(connectedDevice==macsetptr->macCount)
	{
		menu.current=0;
	}
    
    // 所有设备均已连接，可以在这里进行进一步操作
}
void open_close_lock(void)
{
	connectDevices();
	

}