// SerialPortWM5Dlg.cpp : 實現文件
//

#include "stdafx.h"
#include "SerialPortWM5.h"
#include "SerialPortWM5Dlg.h"

#include "SetupDlg.h"

#define WM_NEW_DATA_ARRIVE WM_USER+1

#ifdef _DEBUG
#define new DEBUG_NEW
#endif

// CSerialPortWM5Dlg 對話框

CSerialPortWM5Dlg::CSerialPortWM5Dlg(CWnd* pParent /*=NULL*/)
	: CDialog(CSerialPortWM5Dlg::IDD, pParent)
{
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
	m_strReceive = _T("");
	m_strTransmit = _T("");
}

void CSerialPortWM5Dlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	DDX_Control(pDX, IDC_RECEIVE, m_CtrlReceive);
	DDX_Text(pDX, IDC_RECEIVE, m_strReceive);
	DDX_Text(pDX, IDC_TRANSMIT, m_strTransmit);
}

BEGIN_MESSAGE_MAP(CSerialPortWM5Dlg, CDialog)
#if defined(_DEVICE_RESOLUTION_AWARE) && !defined(WIN32_PLATFORM_WFSP)
	ON_WM_SIZE()
#endif
	//}}AFX_MSG_MAP
	ON_BN_CLICKED(IDC_SETUP, OnSetup)
	ON_BN_CLICKED(IDC_OPEN, OnOpen)
	ON_BN_CLICKED(IDC_CLEAR_RECE, OnClearRece)
	ON_BN_CLICKED(IDC_CLEAR_SEND, OnClearSend)
	ON_BN_CLICKED(IDC_RECE, OnRece)
	ON_BN_CLICKED(IDC_SEND, OnSend)
	ON_WM_DESTROY()
	ON_BN_CLICKED(IDC_CHECK_HEX, OnCheckHex)
	ON_BN_CLICKED(IDC_SEND_FILE, OnSendFile)
	ON_BN_CLICKED(IDC_SAVE_RECEIVED, OnSaveReceived)
	ON_BN_CLICKED(IDC_CHECK_HEX_SEND, OnCheckHexSend)
	ON_MESSAGE(WM_NEW_DATA_ARRIVE,OnDataArrivedMsg)
END_MESSAGE_MAP()


// CSerialPortWM5Dlg 消息處理程序

BOOL CSerialPortWM5Dlg::OnInitDialog()
{
	CDialog::OnInitDialog();

	// 設置此對話框的圖標。當應用程序主窗口不是對話框時，框架將自動
	//  執行此操作
	SetIcon(m_hIcon, TRUE);			// 設置大圖標
	SetIcon(m_hIcon, FALSE);		// 設置小圖標

	// TODO: 在此添加額外的初始化代碼
	//初始化變量
	BaudRates[0]=1200;
	BaudRates[1]=2400;
	BaudRates[2]=4800;
	BaudRates[3]=9600;
	BaudRates[4]=19200;
	BaudRates[5]=38400;
	BaudRates[6]=57600;
	BaudRates[7]=115200;

	PortIDs[0]=L"COM1:";
	PortIDs[1]=L"COM2:";
	PortIDs[2]=L"COM3:";
	PortIDs[3]=L"COM4:";
	PortIDs[4]=L"COM5:";
	PortIDs[5]=L"COM6:";
	PortIDs[6]=L"COM7:";
	PortIDs[7]=L"COM8:";
	PortIDs[8]=L"COM9:";

	PortNo=1;
	BaudRate=3;
	DataBits=8;
	StopBits=ONESTOPBIT;
	Parity=NOPARITY;

	Open=FALSE;
	Receive=FALSE;
	HexDisplay=FALSE;
	HexSend=FALSE;

	m_strDataReceived=_T("");

	m_pSerial=new CPSerialPort();
	
	return TRUE;  // 除非將焦點設置到控件，否則返回 TRUE
}

#if defined(_DEVICE_RESOLUTION_AWARE) && !defined(WIN32_PLATFORM_WFSP)
void CSerialPortWM5Dlg::OnSize(UINT /*nType*/, int /*cx*/, int /*cy*/)
{
	DRA::RelayoutDialog(
		AfxGetInstanceHandle(), 
		this->m_hWnd, 
		DRA::GetDisplayMode() != DRA::Portrait ? 
			MAKEINTRESOURCE(IDD_SERIALPORTWM5_DIALOG_WIDE) : 
			MAKEINTRESOURCE(IDD_SERIALPORTWM5_DIALOG));
}
#endif

void CSerialPortWM5Dlg::OnDataArrive(char *data,int length,DWORD userdata)
{
	CSerialPortWM5Dlg *pWnd=(CSerialPortWM5Dlg *)userdata;
	::SendMessage(pWnd->m_hWnd,WM_NEW_DATA_ARRIVE,(WPARAM)data,LPARAM(length));
}

LONG CSerialPortWM5Dlg::OnDataArrivedMsg(WPARAM wParam,LPARAM lParam)
{
	//處理收到的數據
	int length=(int)lParam;
	char *data=(char*)wParam;
	CString THex(_T(""));

	int i;

	if(length!=0)
	{
		if(HexDisplay)
		{
			for(i=0;i<length;i++)
			{
				if(data[i]<16)
				{
					THex.Format(_T("0%X "),data[i]);
				}
				else
				{
					THex.Format(_T("%2X "),data[i]);
				}
				m_strDataReceived+=THex;
			}
		}
		else
		{
			m_strDataReceived=CString(data).Left(length);
		}
		m_strReceive+=m_strDataReceived;
		m_strDataReceived=_T("");
		SetDlgItemText(IDC_RECEIVE,m_strReceive);
		m_CtrlReceive.SetSel(m_strReceive.GetLength(),m_strReceive.GetLength(),FALSE);
	}

	return 0;
}


BOOL CSerialPortWM5Dlg::SaveReceivedToFile(LPCTSTR FileName)
{
	int i;
	CFile cf;
	DWORD dwBytesToSave=m_strReceive.GetLength();
	
	if(!cf.Open(FileName,CFile::modeWrite|CFile::modeCreate))
	{
		AfxMessageBox(_T("無法打開Text文件！"));
	}

	cf.Seek(0,CFile::begin);
	char * buf=new char[dwBytesToSave];
	for(i=0;i<dwBytesToSave;i++)
	{
		buf[i]=m_strReceive.GetAt(i);
	}	

	cf.Write(buf,dwBytesToSave);
	
	delete[] buf;
	cf.Close();

	return TRUE;
}

void CSerialPortWM5Dlg::OnSetup() 
{
	CSetupDlg* Dialog1;
	Dialog1=new CSetupDlg;

	Dialog1->BaudRate=BaudRate;
	Dialog1->PortNo=PortNo-1;
	Dialog1->DataBits=DataBits-7;
	Dialog1->StopBits=StopBits;
	Dialog1->Parity=Parity;

	if(Dialog1->DoModal()==IDOK)
	{
		BaudRate=Dialog1->BaudRate;
		PortNo=Dialog1->PortNo+1;
		DataBits=Dialog1->DataBits+7;
		StopBits=Dialog1->StopBits;
		Parity=Dialog1->Parity;
	}

	delete Dialog1;
	
}

void CSerialPortWM5Dlg::OnOpen() 
{
	if(!Open)
	{
		PortID=PortIDs[PortNo-1];
		Open=m_pSerial->OpenPort(PortID,BaudRates[BaudRate],DataBits,StopBits,Parity,OnDataArrive,(DWORD)this);
		if(Open)
		{
			SetDlgItemText(IDC_OPEN,_T("關閉端口"));
		}
	}
	else
	{
		m_pSerial->ClosePort();
		Open=FALSE;
		Receive=FALSE;
		SetDlgItemText(IDC_RECE,_T("接收"));
		SetDlgItemText(IDC_OPEN,_T("打開端口"));
	}
}

void CSerialPortWM5Dlg::OnClearRece() 
{
	m_strReceive=_T("");
	GetDlgItemText(IDC_TRANSMIT,m_strTransmit);
	UpdateData(FALSE);
}

void CSerialPortWM5Dlg::OnClearSend() 
{
	m_strTransmit=_T("");
	UpdateData(FALSE);
}

void CSerialPortWM5Dlg::OnRece() 
{
	if(!Receive)
	{
		Receive=m_pSerial->Activate();
		if(Receive)
		{
			SetDlgItemText(IDC_RECE,_T("不接收"));
		}
	}
	else
	{
		m_pSerial->Deactivate();
		Receive=FALSE;
		SetDlgItemText(IDC_RECE,_T("接收"));
	}
}

void CSerialPortWM5Dlg::OnSend() 
{
	DWORD dwCharToWrite=0;
	DWORD dwBytesWritten=0;
	int i,j;

	GetDlgItemText(IDC_TRANSMIT,m_strTransmit);
	if(!HexSend)
	{
		dwCharToWrite=(DWORD)m_strTransmit.GetLength();
	}
	else
	{
		for(i=0;i<m_strTransmit.GetLength()/2;i++)
		{
			if(((m_strTransmit.GetAt(i*2)>='0'&&m_strTransmit.GetAt(i*2)<='9')||(m_strTransmit.GetAt(i*2)>='A'&&m_strTransmit.GetAt(i*2)<='F'))&&((m_strTransmit.GetAt(i*2+1)>='0'&&m_strTransmit.GetAt(i*2+1)<='9')||(m_strTransmit.GetAt(i*2+1)>='A'&&m_strTransmit.GetAt(i*2+1)<='F')))
			{
				dwCharToWrite++;
			}
		}
	}
	dwBytesWritten=0;
	
	if(Open&&dwCharToWrite!=0)
	{
		char* buf=new char[dwCharToWrite];
		if(!HexSend)
		{			
			for(i=0;i<(int)dwCharToWrite;i++)
			{
				buf[i]=(char)m_strTransmit.GetAt(i);
			}
		}
		else
		{
			j=0;
			for(i=0;i<m_strTransmit.GetLength()/2;i++)
			{
				if(((m_strTransmit.GetAt(i*2)>='0'&&m_strTransmit.GetAt(i*2)<='9')||(m_strTransmit.GetAt(i*2)>='A'&&m_strTransmit.GetAt(i*2)<='F'))&&((m_strTransmit.GetAt(i*2+1)>='0'&&m_strTransmit.GetAt(i*2+1)<='9')||(m_strTransmit.GetAt(i*2+1)>='A'&&m_strTransmit.GetAt(i*2+1)<='F')))
				{
					if(m_strTransmit.GetAt(i*2+1)>='0'&&m_strTransmit.GetAt(i*2+1)<='9')
					{
						buf[j]=m_strTransmit.GetAt(i*2+1)-48;
					}
					else
					{
						buf[j]=m_strTransmit.GetAt(i*2+1)-55;
					}
					if(m_strTransmit.GetAt(i*2)>='0'&&m_strTransmit.GetAt(i*2)<='9')
					{
						buf[j]+=(m_strTransmit.GetAt(i*2)-48)*16;
					}
					else
					{
						buf[j]+=(m_strTransmit.GetAt(i*2)-55)*16;
					}
					j++;
				}
			}
		}
		dwBytesWritten=m_pSerial->WritePort(buf,dwCharToWrite);
		if(dwBytesWritten==0)
		{
			AfxMessageBox(_T("無法向端口寫入數據！"));
		}
		delete[] buf;		
	}
}

void CSerialPortWM5Dlg::OnDestroy() 
{
	CDialog::OnDestroy();
	m_pSerial->ClosePort();
}

void CSerialPortWM5Dlg::OnCheckHex() 
{
	HexDisplay=!HexDisplay;
}

void CSerialPortWM5Dlg::OnSendFile() 
{
	if(!Open)
	{
		AfxMessageBox(_T("請先打開串口!"));
		return;
	}
	CString FileName(_T(""));
	CFileDialog FileDlg(TRUE,NULL,NULL,OFN_HIDEREADONLY,_T("All Files(*.*)|*.*||"));
	if(FileDlg.DoModal()==IDOK)
	{
		FileName=FileDlg.GetPathName();
	}
	if(FileName!=_T(""))
	{
		m_pSerial->WriteFileToPort(FileName);
	}
}

void CSerialPortWM5Dlg::OnSaveReceived() 
{
	CString FileName(_T(""));
	CFileDialog FileDlg(FALSE,NULL,NULL,OFN_HIDEREADONLY,TEXT("Text Files(*.txt)|*.txt||"));
	if(FileDlg.DoModal()==IDOK)
	{
		FileName=FileDlg.GetPathName();
	}
	if(FileName!=_T(""))
	{
		SaveReceivedToFile(FileName);
	}
}

void CSerialPortWM5Dlg::OnCheckHexSend() 
{
	HexSend=!HexSend;
}