player/Project_App_Calendar/App_Src/win/mywin_user_chat.c

#include "mywin_inc.h"
#include "mywin_user_chat.h"
#include "char_encode.h"





WIN_ChatStruct *WIN_CreatChat (WIN_WindowStruct *base,
			void (*msgLoop)(struct _WIN_WindowStruct *win,WIN_MsgStruct *msg),
			int x,int y,int x_size,int y_size)
{
	//重设消息循环
	if (msgLoop==0)
	{
		msgLoop=(void (*)(struct _WIN_WindowStruct *win,WIN_MsgStruct *msg))CHAT_DefaultMsgLoop;  
	} 
	
	WIN_ChatStruct *ret=mymalloc (sizeof ( WIN_ChatStruct));
	//调用父类的构造函数
	if (ret)
	{
		mymemset (ret,0,sizeof ( WIN_ChatStruct));
//		if (0==WIN_CreatWindowExt((WIN_WindowStruct *)ret,base,msgLoop,x,y,x_size,y_size))
		if (0==WIN_CreatTouchEx((WIN_TouchWinStruct *)ret,base,msgLoop,x,y,x_size,y_size))
		{
			//创建失败
			myfree (ret);
			ret=0;
		}
		else
		{
			//构造一个
			((WIN_WindowStruct *)ret)->winType="WIN_ChatStruct";
			((WIN_WindowStruct *)ret)->intercept=1; 
			((WIN_WindowStruct *)ret)->deleteWindow=(void (*)(struct _WIN_WindowStruct *win))WIN_DeleteChat;
			((WIN_WindowStruct *)ret)->bkcolor=0;
			((WIN_WindowStruct *)ret)->color=0xd7c1ac;

			ret->font_size=WIN_SetFontType(16);
		
			for (int i=0;i<CHAT_MAX_MAC_NUM;i++)
			{
				ret->mac[i]=mymalloc(CHAT_MAX_MAC_LEN); 
				ret->mac_name[i]=mymalloc(CHAT_MAX_MAC_LEN); 
			}
		}
	}
	
	
	return ret;

}


void WIN_DeleteChat(WIN_ChatStruct *chat)
{
	for (int i=0;i<CHAT_MAX_MAC_NUM;i++)
	{
		myfree(chat->mac[i]); 
		myfree(chat->mac_name[i]); 
	}
	
	ble_reboot(&chat->ble);
	
	WIN_SetFontType(chat->font_size);
	
	//调用父类的销毁函数
	WIN_DeleteWindow ( (WIN_WindowStruct *)chat);

}









void CHAT_DefaultPaint(WIN_ChatStruct *chat)
{
	int x=0;
	int y=0;
	int x_size=((WIN_WindowStruct *)chat)->x_size;
	int y_size=((WIN_WindowStruct *)chat)->y_size;
	
	WIN_PaintBackGround ((WIN_WindowStruct *)chat);
	
}




//扫描蓝牙从机
static int g_scan (void *ptr)
{
	WIN_ChatStruct *chat=ptr;
	
	ble_mac_name *mac=mymalloc(sizeof(ble_mac_name)*CHAT_MAX_MAC_NUM);
	ble_scan(&chat->ble,mac,&chat->mac_num);
	
	//把扫描到的mac地址转化为字符串以供显示
	for(int i=0;i<chat->mac_num;i++)
	{
		char *ptr=chat->mac[i];
		sprintf(ptr,"%02X%02X%02X%02X%02X%02X",mac[i].mac[0],mac[i].mac[1],mac[i].mac[2],mac[i].mac[3],mac[i].mac[4],mac[i].mac[5]);
		if(mac[i].name[0])
		{
			ptr=chat->mac_name[i];
			mymemcpy(ptr,mac[i].name,strlen(mac[i].name)+1);
		}
		else
		{
			chat->mac_name[i][0]=0;
		}
	}
	myfree(mac);
	return 0;
}









//初始化
void CHAT_Init(WIN_ChatStruct *chat)
{
	int x_size=((WIN_WindowStruct *)chat)->x_size;
	int y_size=((WIN_WindowStruct *)chat)->y_size;
	
	ble_init(&chat->ble);
	
	if(ble_reboot(&chat->ble)==0)
	{
		MSGBOX_TipsTime((WIN_WindowStruct *)chat,"错误","蓝牙模块复位失败！","确定",5000);
		((WIN_WindowStruct *)chat)->deleteWindow((WIN_WindowStruct *)chat);
		return ;
	}
	if(chat->mode=='1')
	{
		//TODO 进入主机模式
		chat->page=1;
		
		ble_set_host(&chat->ble);
			
		WORKING_DoWork((WIN_WindowStruct *)chat,"正在扫描蓝牙从机...",g_scan,chat);
		
		chat->connect= WIN_CreatButton(((WIN_WindowStruct *)chat),0,x_size*3/4,y_size*1/4,90,45);
		BUTTON_SetKeyString(chat->connect,"连接");
		chat->next= WIN_CreatButton(((WIN_WindowStruct *)chat),0,x_size*3/4,y_size*3/4,130,45);
		BUTTON_SetKeyString(chat->next,"下一步");
		
//		chat->mac_select=SCROLLBAR_SelectItem(((WIN_WindowStruct *)chat),chat->mac,chat->mac_num,20,y_size/4,x_size*3/5,y_size*2/4);
		chat->mac_select=SCROLLBAR_SelectItem(((WIN_WindowStruct *)chat),chat->mac,0,20,y_size/4,x_size*3/5,y_size*2/4);
		for(int i=0;i<chat->mac_num;i++)
		{
			char *ptr=chat->mac[i];
			if(chat->mac_name[i][0]) ptr=chat->mac_name[i];
			SCROLLBAR_AddItem(chat->mac_select,ptr);
		}
	}
	else if(chat->mode=='2')
	{
		//TODO 进入从机模式
		chat->page=2;
		chat->next= WIN_CreatButton(((WIN_WindowStruct *)chat),0,x_size/2,y_size*3/4,130,45);
		BUTTON_SetKeyString(chat->next,"下一步");
		chat->name=INPUTBOX_InputChars(((WIN_WindowStruct *)chat),x_size/4,y_size/4,x_size/2,y_size/4);
		
	}
	WIN_SetInvalid ((WIN_WindowStruct *)chat);
}



//接收数据
void CHAT_GetRecvData(WIN_ChatStruct *chat)
{
	while(ble_deal_notice(&chat->ble));
	
	uint8_t *buff=mymalloc(256);
	int len=0;
	for(int j=0;j<BLE_MAX_LINKED;j++)
	{
		ble_device *ble_dev=0;
		if(ble_dev=ble_find_device_by_index(&chat->ble,j),ble_dev)
		{
			while(len=ble_get_recv_data_by_end(&chat->ble,ble_dev->conn_handle,buff,100,'\n'),len!=0)
			{
				buff[len]=0;
				for(int i=0;i<3;i++)
				{
					if(len-1-i>=0)
					{
						if(buff[len-1-i]=='\r'||buff[len-1-i]=='\n')
							buff[len-1-i]=0;
					}
				}	
				if(chat->record)
				{
					u8 *gbk=mymalloc(256);
					sprintf((char*)gbk,"%d:",ble_dev->conn_handle);
					
					utf82gbk_str(buff,&gbk[strlen((char *)gbk)]);
					RECORD_AddMsg(chat->record,'r',(char *)gbk);
					myfree(gbk);
				}
			}
		}
	}
	myfree(buff);
}



//触摸按键处理
void CHAT_DealChild(WIN_ChatStruct *chat,void *src_child)
{
	if (src_child==chat->connect)
	{
		//TODO 蓝牙连接从机
		uint8_t mac[6]={0};
		at_string_to_hex(chat->mac[chat->mac_select->index],mac);
		if(ble_connect_by_mac(&chat->ble,mac)==1)
		{
			MSGBOX_TipsTime((WIN_WindowStruct *)chat,"提示","连接成功","确定",5000);
		}
		else
		{
			MSGBOX_TipsTime((WIN_WindowStruct *)chat,"提示","连接失败","确定",5000);
		}
	}
	else if (src_child==chat->send)
	{
		
		uint16_t handle=1;
		if (chat->handle_select)
			handle=chat->handle_select->index+1;
		
		
		char *inputs=chat->chars_send->inputs;
		
		u8 *utf8=mymalloc(256);
		gbk2utf8_str((u8 *)inputs,utf8);
		ble_send_data(&chat->ble,handle,(uint8_t *)utf8,strlen((char *)utf8));
		myfree(utf8);
		
		ble_send_data(&chat->ble,handle,(uint8_t *)"\r\n",2);
		RECORD_AddMsg(chat->record,'s',chat->chars_send->inputs);
		//INPUTBOX_Clear(chat->chars_send);
	}
	else if (src_child==chat->next)
	{
		//TODO 下一步，进入收发消息页面
		if (chat->page==2)
		{
			ble_set_name(&chat->ble,chat->name->inputs);
			((WIN_WindowStruct *)chat->name)->deleteWindow((WIN_WindowStruct *)chat->name);
			chat->name=0;
			ble_set_slave(&chat->ble);
		}
		else if (chat->page==1)
		{
			((WIN_WindowStruct *)chat->mac_select)->deleteWindow((WIN_WindowStruct *)chat->mac_select);
			chat->mac_select=0;
			((WIN_WindowStruct *)chat->connect)->deleteWindow((WIN_WindowStruct *)chat->connect);
			chat->connect=0;
		}
		ble_set_data_transport(&chat->ble,1);
		((WIN_WindowStruct *)chat->next)->deleteWindow((WIN_WindowStruct *)chat->next);
		chat->next=0;
		
		//开始接收数据
		WIN_CreatTimer((WIN_WindowStruct *)chat,50);
		
		int x_size=((WIN_WindowStruct *)chat)->x_size;
		int y_size=((WIN_WindowStruct *)chat)->y_size;
		//新建聊天记录框
		chat->record=RECORD_DrawRecord((WIN_WindowStruct *)chat,5,5,x_size-10,200);
		//新建输入框
		chat->chars_send=INPUTBOX_InputChars(((WIN_WindowStruct *)chat),5,205,x_size-10-150,40);
		//新建发送通道选择框
		static const char *handle[]={"通道1","通道2","通道3","通道4","通道5"};
		chat->handle_select=SCROLLBAR_SelectItem(((WIN_WindowStruct *)chat),(char **)handle,5,5+x_size-10-150,205,100,40);
		//新建发送按钮
		chat->send=WIN_CreatButton(((WIN_WindowStruct *)chat),0,x_size-50-5,210,50,25);
		BUTTON_SetKeyString(chat->send,"发送");
		WIN_SetInvalid ((WIN_WindowStruct *)chat);
	}
}





void CHAT_DefaultMsgLoop(WIN_ChatStruct *chat,WIN_MsgStruct *msg)
{
	WIN_MoveStruct *m=0;
	WIN_KeyStruct *k=0;
	switch (msg->msg)
	{	
		case WIN_MSG_INIT:
		{
			CHAT_Init(chat);
		}
		break;
		case WIN_MSG_PAINT:
			CHAT_DefaultPaint(chat);
		break;
		case WIN_MSG_KEY:
			k=msg->data.p;
			if (k->shortPress&KEY_VALUE_UP)//短按
			{
			}
			else if (k->shortPress&KEY_VALUE_DOWN)
			{
			}
			if (k->shortPress&KEY_VALUE_HOME)
			{
				//返回
				((WIN_WindowStruct *)chat)->deleteWindow((WIN_WindowStruct *)chat);
				break;
			}
			if (k->shortPress)
			{
				WIN_SetInvalid ((WIN_WindowStruct *)chat);
			}
			break;//case WIN_MSG_KEY:
		case WIN_MSG_MOVE:
			m=msg->data.p;
			switch (m->moveType)
			{
				case MOVE_DATA_MOVED:
					break;
				default:
					break;
			}
			break;
		case WIN_MSG_TIMER:
		{
			CHAT_GetRecvData(chat);
			break;
		}
		case WIN_MSG_CHID:
			switch (msg->data.v)
			{
				case CHID_DELETE:
				break;
				case CHID_USER:
				{
					if (msg->data2.v==BUTTON_PRESSED)
					{
						//处理触摸按键
						CHAT_DealChild(chat,msg->srcWin);
					}
				}
				break;
				default:
				break;
			}
			break;
		default:
			break;
	}
}



int CHAT_StartChat(WIN_WindowStruct *win)
{
	char mode=0;
	if (MSGBOX_Inquiry(win,"提示","请选择角色","主机","从机")==0)
	{
		mode='1';
	}
	else
	{
		mode='2';
	}
	WIN_ChatStruct *chat=WIN_CreatChat(win,0,0,0,win->x_size,win->y_size);
	chat->mode=mode;
	WIN_SetBackPic ((WIN_WindowStruct *)chat,&win->pic);
	WIN_ShowWindow((WIN_WindowStruct *)chat);
	return 0;
}