WinCE开发How to大集合之 WinCE下读写串口非常简单好用的例程

WinCE下读写串口非常简单好用的例程

//打开串口
hPort=CreateFile(lpszPortName,GENERIC_READ|GENERIC_WRITE,0,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
BOOL CSerial::InitDCB()
{
DCB PortDCB;//声明一个DCB结构
DWORD dwError;
PortDCB.DCBlength = sizeof (DCB); //初始化 DCBlength
GetCommState (hPort, &PortDCB); //得到端口的默认设置信息
//改变DCB结构设置
PortDCB.BaudRate =CBR_115200; //波特率
//其他还想改变的默认配置
//根据DCB结构配置端口
if (!SetCommState (hPort, &PortDCB))
{ //不能配置串行端口
MessageBox (NULL, TEXT("Unable to configure the serial port!"), TEXT("Error!"), MB_OK);
dwError = GetLastError (); //获得错误原因的代码
return FALSE;
}
return TRUE;
}
BOOL CSerial::InitCommTimeouts()
{
COMMTIMEOUTS CommTimeouts; //声明一个COMMTIMEOUTS结构
DWORD dwError;
//得到超时参数
GetCommTimeouts (hPort, &CommTimeouts);
//改变COMMTIMEOUTS结构设置
//不使用这个逾时功能,ReadFile直到所有字符接收完才会返回
CommTimeouts.ReadIntervalTimeout = 0;
CommTimeouts.ReadTotalTimeoutMultiplier = 0;
CommTimeouts.ReadTotalTimeoutConstant = 0;
//不使用这个逾时功能,WriteFile直到所有字符接收完才会返回
CommTimeouts.WriteTotalTimeoutMultiplier = 0;
CommTimeouts.WriteTotalTimeoutConstant=0;
if (!SetCommTimeouts(hPort,&CommTimeouts)) //设置端口超时值
{ //不能设置超时值　　
MessageBox (NULL, TEXT("Unable to set the time-out parameters!"),TEXT("Error!"), MB_OK);
dwError = GetLastError (); //获得错误原因的代码
return FALSE;
}
return TRUE;
}
DWORD CSerial::WritePort(byte *buf,DWORD dwCharToWrite)
{
BOOL fWriteState;
DWORD dwBytesWritten;
//写入数据
// PurgeComm(hPort,PURGE_TXCLEAR|PURGE_RXCLEAR|PURGE_RXABORT|PURGE_TXABORT);
//PurgeComm(hPort,PURGE_TXCLEAR|PURGE_RXABORT|PURGE_TXABORT);
fWriteState=WriteFile(hPort,buf,dwCharToWrite,&dwBytesWritten,NULL);
if(!fWriteState) //不能写数据
{
MessageBox(NULL,TEXT("You can't write the data to the port!"),TEXT("Error!"),MB_OK);
dwBytesWritten=0;
}
//PurgeComm(hPort,PURGE_TXCLEAR|PURGE_RXCLEAR);
//PurgeComm(hPort,PURGE_TXCLEAR);
return dwBytesWritten;
}
DWORD WINAPI ReadPortThread(LPVOID lpvoid)
{
BOOL fReadState; //读入信息时返回值,若为TRUE就是正确读入
DWORD dwCommModemStatus; //串口状态,以判断是否有事件发生
DWORD dwLength; //读入信息的长度
COMSTAT ComStat; //串口状态的详细情况表,
DWORD dwErrorFlags; //读串口状态的标志
BOOL readStatus=FALSE; //读入信息的状态,若为TRUE就是正在读入但还没有读完
int iCounter=0;
DWORD dwBytes;
byte Byte;
SetCommMask(hPort,EV_RXCHAR); //设置程序响应的事件
PurgeComm(hPort,PURGE_RXCLEAR|PURGE_TXCLEAR); //清空串口的接收缓冲区,必要性不大,但有保证作用
//ClearCommError(hPort,&dwErrorFlags,&ComStat); //清除串口状态标志,并返回当前状态
while (hPort != INVALID_HANDLE_VALUE) //程序在串口有效的状态下,无限循环
{
if(WaitCommEvent(hPort, &dwCommModemStatus,0)) //等待串口的事件发生,当dwCommModemStatus值为1时表示接收到数据
{
SetCommMask (hPort, EV_RXCHAR); //重新设置程序响应的事件,但这个只是保证程序的安全性,一般并不起作用
if (dwCommModemStatus & EV_RXCHAR) //检测收到的事件是否为"接收字符"的事件
{
ClearCommError(hPort,&dwErrorFlags,&ComStat); //清除串口状态标志,并返回当前状态
dwLength=ComStat.cbInQue; //cbInQue返回在串行驱动程序输入队列中的字符数
if(dwLength>0)//防止无故产生事件
{
//从串口读取数据
//读入数据,并返回数据长度,采用同步方式
if(dwLength <10240)
{
fReadState=ReadFile(hPort,&fbuf[0],dwLength,&dwLength,NULL);
if(!fReadState)
{
MessageBox(NULL,TEXT("Can't fetch the data!"),TEXT("Reading Error!"),MB_OK); //不能从串口读取数据
}
else
{
//ProcessReceive((WPARAM)dwLength,(LPARAM)fbuf);
::SendMessage(m_hWnd,WM_COMM_RCHAR2,(WPARAM)dwLength,(LPARAM)fbuf); //通知主窗口数据已经得到可以处理
}
}
else//当缓存溢出就处理读掉
{
DWORD j=dwLength%10240;
for(int i=0;i <dwLength/10240;i++)
fReadState=ReadFile(hPort,&fbuf[0],dwLength,&dwLength,NULL);
fReadState=ReadFile(hPort,&fbuf[0],j,&j,NULL);
}
}
}
}
// PurgeComm(hPort,PURGE_RXCLEAR);//清空串口的接收缓冲区,必要性不大,但有保证作用
//重新获得串口状态,必要性不大,48表示没有事件产生
GetCommModemStatus (hPort, &dwCommModemStatus);
}
return 0;
}

这个是个例子，不过不是在ADS下用的，因为调用了API接口，一般都是在microsoft的开发工具，比如EVC,VS2005上面使用
如果你是做WinCE应用程序的，就使用EVC或者VS2005吧
上面的例子我现在也在使用，还是非常好用的，因为如果直接Readfile，效率很低，要么等超时，要么无限等，都会让系统响应变慢，这种是利用类似Event的机制来激活线程
如果你不希望作为单独一个线程，可以稍作修改，就可以通过循环判断而得知read buffer的状态
参考：

BOOL fReadState; //读入信息时返回值,若为TRUE就是正确读入
DWORD dwCommModemStatus; //串口状态,以判断是否有事件发生
DWORD dwLength; //读入信息的长度
COMSTAT ComStat; //串口状态的详细情况表,
DWORD dwErrorFlags; //读串口状态的标志
BOOL readStatus=FALSE; //读入信息的状态,若为TRUE就是正在读入但还没有读完
int iCounter=0;
#if 1
//检测收到的事件是否为"接收字符"的事件
::ClearCommError(g_hGSMCOM,&dwErrorFlags,&ComStat); //清除串口状态标志,并返回当前状态
dwLength=ComStat.cbInQue; //cbInQue返回在串行驱动程序输入队列中的字符数
if(dwLength > 0) { //防止无故产生事件
DWORD dwRetLen = 0;
DWORD dwTimes = (dwLength / (GSM_READBUFF_SIZE - 1)) + 1;
DWORD j = dwLength % (GSM_READBUFF_SIZE-1);
for(DWORD i = 0; i < dwTimes; i++) {
DWORD dwRoundReadSize = ((dwTimes - i) == 1)? j:(GSM_READBUFF_SIZE-1);
memset(g_szReadBuff, 0, dwRoundReadSize + 1);
fReadState=::ReadFile( g_hGSMCOM,
g_szReadBuff,
dwRoundReadSize,
&dwRetLen,
NULL
);
if(!fReadState) {
//RETAILMSG(GSM_DEBUG_ERROR,(TEXT("[%s]: Can't fetch the data!/r/n"), pszFname));
MessageBox(NULL,TEXT("Can't fetch the data!"),TEXT("Reading Error!"),MB_OK); //不能从串口读取数据
return 0;
} else {
g_szReadBuff[dwRoundReadSize] = 0;
//MessageBox(NULL,TEXT("Read OK!"),TEXT("Reading OK!"),MB_OK);
EnterCriticalSection(&g_csSendLock);
g_pcMC55->CheckResult(g_szReadBuff, dwRoundReadSize);
LeaveCriticalSection(&g_csSendLock);
}
}
return dwLength;
}
#else
if(::WaitCommEvent(g_hGSMCOM, &dwCommModemStatus,0)) { //等待串口的事件发生,当dwCommModemStatus值为1时表示接收到数据
::SetCommMask (g_hGSMCOM, EV_RXCHAR); //重新设置程序响应的事件,但这个只是保证程序的安全性,一般并不起作用
if (dwCommModemStatus & EV_RXCHAR) {//检测收到的事件是否为"接收字符"的事件
::ClearCommError(g_hGSMCOM,&dwErrorFlags,&ComStat); //清除串口状态标志,并返回当前状态
dwLength=ComStat.cbInQue; //cbInQue返回在串行驱动程序输入队列中的字符数
if(dwLength > 0) { //防止无故产生事件
DWORD dwRetLen = 0;
DWORD dwTimes = (dwLength / (GSM_READBUFF_SIZE - 1)) + 1;
DWORD j = dwLength % (GSM_READBUFF_SIZE-1);
for(DWORD i = 0; i < dwTimes; i++) {
DWORD dwRoundReadSize = ((dwTimes - i) == 1)? j:(GSM_READBUFF_SIZE-1);
memset(g_szReadBuff, 0, dwRoundReadSize + 1);
fReadState=::ReadFile( g_hGSMCOM,
g_szReadBuff,
dwRoundReadSize,
&dwRetLen,
NULL
);
if(!fReadState) {
//RETAILMSG(GSM_DEBUG_ERROR,(TEXT("[%s]: Can't fetch the data!/r/n"), pszFname));
MessageBox(NULL,TEXT("Can't fetch the data!"),TEXT("Reading Error!"),MB_OK); //不能从串口读取数据
return 0;
} else {
g_pcMC55->CheckResult(g_szReadBuff, dwRoundReadSize);
}
}
return dwLength;
}
}
}
#endif
// PurgeComm(hPort,PURGE_RXCLEAR);//清空串口的接收缓冲区,必要性不大,但有保证作用
//重新获得串口状态,必要性不大,48表示没有事件产生
//::GetCommModemStatus (g_hGSMCOM, &dwCommModemStatus);
return 0;