WinXP与WinCE串口的运行机制之比较
//========================================================================
//TITLE:
// WinXP与WinCE串口的运行机制之比较
//AUTHOR:
// norains
//DATE:
// Saturday 11-November-2006
//Passed Environment:
// PC:WinXP+VC6.0
// CE:WinCE4.2+EVC4.0
//========================================================================
查看微软相关的串口通信文档,可以发现在桌面操作系统中,串口通信分为两种模式:同步和异步.而WinCE只有一种,但文档中却没标明归属哪种模式.实际上,WinCE的串口通信模式更像介于同步和异步之间.
在此先简要地介绍何为同步和异步.所谓的同步,指得是对同一个设备或文件(在文中只的是串口COM1)的读或写操作必须要等待上一个操作完成才能进行.比如说,调用ReadFile()函数读取串口,但由于上一个WriteFile()操作没完成,ReadFile()的操作就被阻塞,直到WriteFile()完成后才能运行.而异步,则无论上一个操作是否完成,都会执行目前调用的操作.还是拿前面举的例子,在异步模式下,即使WriteFile()没有执行完成,ReadFile()也会立刻执行.
1.CreateFile()参数的差异
首先说明一下WinCE和WinXP打开串口时参数的差异.以打开串口COM1为例子,WinCE下的名字为"COM1:",而WinXP为"COM1",两者的唯一区别仅仅在于WinCE下多个分号.
例如:
HANDLE hd = CreateFile(TEXT("COM1:"),GENERIC_READ|GENERIC_WRITE,0,NULL,OPEN_EXISTING,0,NULL); //WinCE
HANDLE hd = CreateFile(TEXT("COM1"),GENERIC_READ|GENERIC_WRITE,0,NULL,OPEN_EXISTING,0,NULL); //WinXP
在这稍微多说一下,在默认的环境下,TEXT宏在WinCE下会编译为双字节,而WinXP为单字节.换句话说,TEXT("COM1")在WinCE下相当于L"COM1",而WinXP则为"COM1".
2.单线程比较
还是用代码做例子来说明比较形象.这是一段单线程的代码,先对串口进行写操作,然后再读.对于WinXP来说,这是同步模式.(与主题无关的代码省略)
int WINAPI WinMain( HINSTANCE hInstance,
HINSTANCE hPrevInstance,
LPTSTR lpCmdLine,
int nCmdShow)
{
...
HANDLE hCom = CreateFile(TEXT("COM1:"),GENERIC_READ|GENERIC_WRITE,0,NULL,OPEN_EXISTING,0,NULL); //WinCE
//HANDLE Com = CreateFile(TEXT("COM1"),GENERIC_READ|GENERIC_WRITE,0,NULL,OPEN_EXISTING,0,NULL); //WinXP
...
DWORD dwBytes;
if(WriteFile(hCom,TEXT("COM1:"),5,&dwBytes,NULL) == FALSE) //WinCE
//if(WriteFile(hCom,TEXT("COM1"),5,&dwBytes,NULL) == FALSE) //WinXP
{
return 0x05;
}
...
DWORD dwRead;
char szBuf[MAX_READ_BUFFER];
if(ReadFile(hCom,szBuf,MAX_READ_BUFFER,&dwRead,NULL) == FALSE)
{
return 0x10;
}
...
}
经过实验,可以发现这段代码在WinCE和WinXP下都能正常工作,并且其表现也相同,都是在WriteFile()函数返回后才执行ReadFile().
由于异步模式在单线程中也能正常运作,唯一的不同只是在执行WriteFile()时可能也会执行ReadFile()(依WriteFile()函数执行的时间而定),所在此不表.
3.多线程比较
单线程两者表现相同,那多线程呢?下面这段代码采用多线程,先是创建一个读的线程,用来监控串口是否有新数据到达,然后在主线程中对串口写出数据.
这里假设是这么一个情况,有两台设备,分别为A和B,下面的代码运行于设备A,设备B仅仅只是应答而已.换句话说,只有A向B发送数据,B才会返回应答信号.
//主线程
int WINAPI WinMain( HINSTANCE hInstance,
HINSTANCE hPrevInstance,
LPTSTR lpCmdLine,
int nCmdShow)
{
...
CreateThread(NULL,0,ReadThread,0,0,&dwThrdID); //创建一个读的线程.
...
HANDLE hCom = CreateFile(TEXT("COM1:"),GENERIC_READ|GENERIC_WRITE,0,NULL,OPEN_EXISTING,0,NULL); //WinCE
//HANDLE Com = CreateFile(TEXT("COM1"),GENERIC_READ|GENERIC_WRITE,0,NULL,OPEN_EXISTING,0,NULL); //WinXP
...
DWORD dwBytes;
if(WriteFile(hCom,"AT\r\n",4,&dwBytes,NULL) == FALSE) //WinCE
//if(WriteFile(hCom,"AT\r\n",5,&dwBytes,NULL) == FALSE) //WinXP
{
return 0x05;
}
...
}
//读线程
DWORD WINAPI ReadThread()
{
...
SetCommMask(hCom),EV_RXCHAR);
DWORD dwCommStatus = 0;
if(WaitCommEvent(hCom),&dwCommStatus,NULL) == FALSE)
{
//Clear the error flag
DWORD dwErrors;
COMSTAT comStat;
memset(&comStat,0,sizeof(comStat));
ClearCommError(hCom,&dwErrors,&comStat);
return 0x15;
}
...
char szBuf[MAX_READ_BUFFER]={0};
DWORD dwRead;
if(ReadFile(hCom),szBuf,MAX_READ_BUFFER,&dwRead,NULL) == FALSE || dwRead == 0)
{
return 0x20;
}
...
}
这段代码在WinCE下运行完全正常,读线程在监听收到的数据的同时,主线程顺利地往外发数据.
然而同样的代码,在WinXP下则根本无法完成工作.运行此代码,我们将发现CPU的占用率高达99%.通过单步调试,发现两个线程分别卡在WaitCommEvent()和WriteFile()函数中.因为根据同步模式的定义,当前对设备的操作必须要等待上一个操作完毕方可执行.在以上代码中,因为设备B没接到设备A的命令而不会向设备A发送应答,故WaitCommEvent()函数因为没有检测到接受数据而一直在占用串口;而WaitCommEvent()一直占据串口使得WriteFile()没有得到串口资源而处于阻塞状态,这就造成了死锁.
而这种情况没有在WinCE上出现,只要WaitCommEvent()和WriteFile()不在同一个线程,就可以正常工作.这应该和系统的调度方式有关.
如果要在PC上同时进行WaitCommEvent()和WriteFile()操作,需要把串口的模式改写为异步模式.
更改后的代码如下:
//主线程
int WINAPI WinMain( HINSTANCE hInstance,
HINSTANCE hPrevInstance,
LPTSTR lpCmdLine,
int nCmdShow)
{
...
CreateThread(NULL,0,ReadThread,0,0,&dwThrdID); //创建一个读的线程.
...
HANDLE Com = CreateFile(TEXT("COM1"),GENERIC_READ|GENERIC_WRITE,0,NULL,OPEN_EXISTING,0,FILE_FLAG_OVERLAPPED);
...
OVERLAPPED olWrite;
memset(&olWrite,0,sizeof(m_olWrite));
olWrite.hEvent = CreateEvent(NULL,TRUE,FALSE,NULL);
DWORD dwBytes;
if(WriteFile(hCom,"AT\r\n",4,&dwBytes,&olWrite) == FALSE)
{
if(GetLastError() != ERROR_IO_PENDING)
{
return 0x20;
}
}
if(GetOverlappedResult(hCom,&olWrite,&dwBytes,TRUE) == FALSE)
{
return 0x25;
}
...
}
//读线程
DWORD WINAPI ReadThread()
{
...
memset(&olWaite,0,sizeof(olWaite));
olWaite.hEvent = CreateEvent(NULL,TRUE,FALSE,NULL);
SetCommMask(hCom),EV_RXCHAR);
DWORD dwCommStatus = 0;
WaitCommEvent(hCom,&dwCommStatus,olWaite);
DWORD dwByte; //norains:It is only suitable for the GetOverlappedResult(),not undefined here.
if(GetOverlappedResult(hCom,olWaite,&dwByte,TRUE) == FALSE)
{
if(GetLastError() != ERROR_IO_PENDING)
{
return 0x30;
}
//Clear the error flag
DWORD dwErrors;
COMSTAT comStat;
memset(&comStat,0,sizeof(comStat));
ClearCommError(hCom,&dwErrors,&comStat);
return 0x35;
}
...
memset(&olRead,0,sizeof(olRead));
olRead.hEvent = CreateEvent(NULL,TRUE,FALSE,NULL);
char szBuf[MAX_READ_BUFFER]={0};
DWORD dwRead;
if(ReadFile(hCom,szBuf,MAX_READ_BUFFER,&dwRead,olRead) ==FALSE)
{
if(GetLastError() != ERROR_IO_PENDING)
{
return 0x40;
}
if(GetOverlappedResult(hCom,olRead,&dwRead,TRUE) == FALSE)
{
return 0x45;
}
if(dwRead == 0)
{
return 0x50;
}
}
...
}
测试经过更改后的代码,可以发现在WinXP下终于可以同时调用WaitCommEvent()和WriteFile()而不造成死锁.
在这里可以发现WinCE和WinXP的串口调度的差异性:单线程中,WinCE的串口工作方式和WinXP串口的同步工作模式相符;而多线程中,WinCE串口工作方式却又和WinXP的异步方式吻合.虽然无法确切比较WinCE的单一串口模式是否比WinXP的双模式更为优越,但可以确认的是,WinCE的这种串口调用方式给程序员带来了极大的便利.
4.WinXP异步模式两种判断操作是否成功的方法
因为在WinXP的异步模式中,WriteFile(),ReadFile()和WaitCommEvent()大部分情况下都是未操作完毕就返回,所以不能简单地判断返回值是否为TRUE或FALSE来判断.
以ReadFile()函数做例子.
一种是上文所用的方法:
if(ReadFile(hCom,szBuf,MAX_READ_BUFFER,&dwRead,olRead) ==FALSE)
{
if(GetLastError() != ERROR_IO_PENDING)
{
return 0x40;
}
if(GetOverlappedResult(hCom,olRead,&dwRead,TRUE) == FALSE)
{
return 0x45;
}
if(dwRead == 0)
{
return 0x50;
}
}
如果ReadFile()返回为TRUE,则表明读文件已经完成.但这种情况几乎不会出现,因为对外设的读写相对于内存的读写来说非常慢,所以一般在ReadFile()函数还没执行完毕,程序已经执行到下一个语句.
当ReadFile()返回为FALSE时,需要采用GetLastError()函数判断读操作是否在后台进行.如果在后台进行,则调用GetOverlappedResult()函数获取ReadFile()函数的结果.在这里要注意的是,GetOverlappedResult()函数的最后一个参数必须设置为TRUE,表明要等ReadFile()函数在后台运行完毕才返回.如果最后一个参数设置为FALSE,则即使ReadFile()还在后台执行,GetOverlappedResult()函数也会立刻返回,从而造成判断错误.
另一种是调用WaitForSingleObject函数达到此目的:
if(ReadFile(hCom,szBuf,MAX_READ_BUFFER,&dwRead,olRead) ==FALSE)
{
if(GetLastError() != ERROR_IO_PENDING)
{
return 0x40;
}
if(WaitForSingleObject(olRead.hEvent,INFINITE) != WAIT_OBJECT_0)
{
return 0x55;
}
if(GetOverlappedResult(hCom,olRead,&dwRead,FALSE) == FALSE)
{
return 0x45;
}
if(dwRead == 0)
{
return 0x50;
}
}
因为ReadFile()在后台执行完毕以后,会发送一个event,所以在这里可以调用WaitForSingleObject()等待ReadFile()执行完毕,然后再调用GetOverlappedResult()获取ReadFile()的最终结果.在这里需要注意的是,GetOverlappedResult()的最后一个参数一定要设置为FALSE,因为WaitForSingleObject()已经捕获了ReadFile()发出的event,再也没有event传递到GetOverlappedResult()函数.如果此时GetOverlappedResult()最后一个参数设置为TRUE,则线程会一直停留在GetOverlappedResult()函数而不往下执行.
