?? 實戰串行通訊.txt
字號:
GetCommProperties
GetCommState
GetCommTimeouts
GetDefaultCommConfig
PurgeComm
SetCommBreak
SetCommConfig
SetCommMask
SetCommState
SetCommTimeouts
SetDefaultCommConfig
SetupComm
TransmitCommChar
WaitCommEvent
我剛看到這些 API 的時候,都不知道如何使用它們,但并不是所有這些 API 都是必須用的,比如說你要檢測當前串口的設置可以只用 SetCommState 而不用 GetCommProperties 和 GetCommConfig,雖然它們返回的信息可能更多。同樣,如果有些值你想用缺省的,比如緩沖區的大小和超時的時間等等,那么 SetupComm 和 BuildCommDCBAndTimeouts、SetCommTimeouts 也可以不用,TransmitCommChar 是馬上在發送序列中優先插入發送一個字符用的,平時也很少用到,下面講的是必須用到的 API 和使用步驟:
建立 Event -- 用 CreateEvent
invoke CreateEvent,NULL,TRUE,FALSE,NULL
用異步方式操作串口必須要定義 OVERLAPPED 結構,其中的 hEvent 必須自己建立,你要定義兩個 OVERLAPPED 結構,一個用于讀一個用于寫,當然也必須建立兩個 Event,把它們放入 OVERLAPPED.hEvent
打開串口 -- 用 CreateFile
invoke CreateFile,addr szPortName,GENERIC_READ or GENERIC_WRITE,0,NULL,OPEN_EXISTING,FILE_FLAG_OVERLAPPED,NULL
注意用異步方式必須指定 FILE_FLAG_OVERLAPPED,而文件方式必須 OPEN_EXISTING,讀寫必須是 GENERIC_READ or GENERIC_WRITE
設置串口參數 -- 用 SetCommState
invoke SetCommState,hCom,addr dcbx
hCom 是前面打開成功后返回的句柄,dcbx 是數據結構 DCB,里面包括了通訊的具體參數,至于這個參數的建立,你可以自己填寫,也可以用前面提到的 BuildCommDCB 或 CommConfigDialog 填寫
建立讀數據的線程
到這里,就可以開始讀數據了,一般我們是在主線程中寫數據,因為寫是我們可以控制的,而讀的時候我們不知道數據什么時候會到,所以要建立一個線程專門用來讀數據,在這個線程中,我們循環地用 ReadFile 讀串口,同時用 WaitCommEvent 檢測線路狀態。
如果要檢測通訊狀態,如 CTS 信號,RingIn 等等 -- 用 SetCommMask、WaitCommEvent、ClearCommError、GetCommModemStatus
invoke SetCommMask,hCom,EV_BREAK or EV_CTS or EV_DSR or EV_ERR or EV_RING or EV_RLSD or EV_RXCHAR or EV_RXFLAG or EV_TXEMPTY
SetCommMask 指定 WaitCommEvent 要等待的事件名稱,具體的參數請查手冊
invoke WaitCommEvent,hCom,addr dwEvent,NULL
WaitCommEvent 等待一直到 SetCommMask 指定事件之一發生
invoke ClearCommError,hCom,addr dwError,addr stComStat
在 WaitCommEvent 以后,要用 ClearCommError 清除事件的 Flag,以便進行下一輪 WaitCommEvent,同時這個 API 可以獲得更詳細的事件信息
invoke GetCommModemStatus,hCom,addr dwModemStatus
同樣,GetCommModemStatus 是用來獲得串口線路狀態的,如 CTS、RING 等等,當 WaitCommEvent 返回時,只是指出了如 CTS 等等狀態有變化,但具體是變成 On 還是 Off 了還要靠這個 API 去取得更詳細的信息
讀數據 -- 用 ReadFile
invoke ReadFile,hCom,addr szBuffer,sizeof szBuffer,addr dwBytesRead,addr stReadState
最后一個參數是開頭定義的 OVERLAPPED 結構的地址,指定了它就表示是用異步方式的讀方式,這個 API 會馬上返回,接下去要用
invoke GetOverlappedResult,hCom,addr stReadState,addr dwBytesRead,FALSE
將其余的數據讀完
結束時關閉端口 -- 停止 WaitCommEvent 的等待以及關閉端口 CloseHandle
平時程序會停留在 WaitCommEvent 的等待中,當要終止線程的時候,必須是程序從 WaitCommEvent 中退出來,這時候要用
按照 Win32 手冊上的說明,參數為 NULL 的 SetCommMask 會使另一個線程中的 WaitCommEvent 馬上返回,然后就是用 CloseHandle 關閉端口
invoke CloseHandle,hCom
5 Win32 通訊 API Bug 之二--- SetCommMask 和 WaitCommEvent
嚴格的說這不應該是 Bug,而是偶然的情況,我發現有些時候我的讀線程無法結束,跟蹤發現是停在了 WaitCommEvent 上,這說明有時候 invoke SetCommMask,hCom,NULL 并不能使 WaitCommEvent 退出,我最后使用的辦法是: 在 SetCommMask 以后再執行 invoke SetEvent,stReadState.hEvent,把讀的 OVERLAPPED 結構中的 Event 置位,讓 WaitCommEvent 認為有 Event 發生,它就會馬上返回,也許這并不是普遍的情況,但如果你的程序也是停在了 WaitCommEvent 的地方,不妨一試。
6 如何編寫讀線程中的循環
按照《Serial communications in Microsoft Win32》一文中的例程,讀循環可以用:
#define READ_TIMEOUT 500 // milliseconds
DWORD dwRes;
DWORD dwRead;
BOOL fWaitingOnRead = FALSE;
OVERLAPPED osReader = {0};
// Create the overlapped event. Must be closed before exiting
// to avoid a handle leak.
osReader.hEvent = CreateEvent(NULL, TRUE, FALSE, NULL);
if (osReader.hEvent == NULL)
// Error creating overlapped event; abort.
if (!fWaitingOnRead) {
// Issue read operation.
if (!ReadFile(hComm, lpBuf, READ_BUF_SIZE, &dwRead, &osReader)) {
if (GetLastError() != ERROR_IO_PENDING) // read not delayed?
// Error in communications; report it.
else
fWaitingOnRead = TRUE;
}
else {
// read completed immediately
HandleASuccessfulRead(lpBuf, dwRead);
}
}
if (fWaitingOnRead) {
dwRes = WaitForSingleObject(osReader.hEvent, READ_TIMEOUT);
switch(dwRes)
{
// Read completed.
case WAIT_OBJECT_0:
if (!GetOverlappedResult(hComm, &osReader, &dwRead, FALSE))
// Error in communications; report it.
else
// Read completed successfully.
HandleASuccessfulRead(lpBuf, dwRead);
// Reset flag so that another opertion can be issued.
fWaitingOnRead = FALSE;
break;
case WAIT_TIMEOUT:
// Operation isn't complete yet. fWaitingOnRead flag isn't
// changed since I'll loop back around, and I don't want
// to issue another read until the first one finishes.
//
// This is a good time to do some background work.
break;
default:
// Error in the WaitForSingleObject; abort.
// This indicates a problem with the OVERLAPPED structure's
// event handle.
break;
}
}
這一段程序在 98 下正常,但非常不幸的是在 Win2000 下,ReadFile 總是返回讀正確,并不返回 ERROR_IO_PENDING,使下面的 WaitForSingleObject 的循環形同虛設,要命的是,ReadFile 返回讀正確卻每次只讀一個字節,結果程序工作得很奇怪,即使緩沖區中有很多的字符,程序也每次只能讀一個字符,要等到發送字符或做其他的操作使線路狀態改變了,才能讀下一個字符,我不知道這個奇怪的現象是如何發生的,反正我解決的辦法是在 ReadFile 前加 WaitCommEvent,真正等到 EV_RXCHAR 以后才去 ReadFile,到最后,我用的循環是這樣的,雖然沒有一篇文章中的例子是這樣的,但它卻同時在 windows9x 和 windows2000 下工作得很好:
.while dwFlag & IF_CONNECT
;********************************************************************
; 檢測其它的通信事件
; 如果檢測到且定義了 lpProcessEvent 則調用 lpProcessEvent
;********************************************************************
invoke WaitCommEvent,hCom,addr @dwEvent,NULL ;addr stReadState
push eax
invoke ClearCommError,hCom,addr @dwError,addr @stComStat
pop eax
.if eax == 0
invoke GetLastError
.if eax == ERROR_IO_PENDING
or dwFlag,IF_WAITING
.endif
.else
;這里是線路狀態的處理
.endif
;********************************************************************
; 如果沒有在等待異步讀的過程中,則讀端口
;********************************************************************
.if ! (dwFlag & IF_WAITING)
mov @dwBytesRead,0
invoke ReadFile,hCom,addr @szBuffer,sizeof @szBuffer,\
addr @dwBytesRead,addr stReadState
.if eax == FALSE
or dwFlag,IF_WAITING
invoke GetLastError
.if eax != ERROR_IO_PENDING
;這里是錯誤處理
.endif
.else
and dwFlag,not IF_WAITING
mov eax,@dwBytesRead
.if eax != 0
;這里是接收到的數據處理
.endif
.endif
.endif
;********************************************************************
; 如果在異步讀端口中,則等待一段時間
;********************************************************************
.if dwFlag & IF_WAITING
invoke WaitForSingleObject,stReadState.hEvent,200
.if eax == WAIT_OBJECT_0
and dwFlag,not IF_WAITING
invoke GetOverlappedResult,hCom,addr stReadState,\
addr @dwBytesRead,FALSE
.if eax != 0
mov eax,@dwBytesRead
.if eax != 0
;這里是接收到的數據處理
.endif
.else
;這里是錯誤處理
invoke ClearCommError,hCom,addr @dwError,addr @stComStat
.endif
.else
;這里是錯誤處理
.endif
.endif
.endw
7 流控制的問題
在流控制方式為“無”和“軟件控制”的情況下,基本上沒有什么問題,但在“硬件控制”下,win32 手冊中說明 RTS_CONTROL_HANDSHAKE 控制方式的含義是:
Enables RTS handshaking. The driver raises the RTS line when the "type-ahead" (input) buffer is less than one-half full and lowers the RTS line when the buffer is more than three-quarters full. If handshaking is enabled, it is an error for the application to adjust the line by using the EscapeCommFunction function.
也就是說,當緩沖區快滿的時候 RTS 會自動 OFF 通知對方暫停發送,當緩沖區重新空出來的時候, RTS 會自動 ON,但我發現當 RTS 變 OFF 以后即使你已經清空了緩沖區, RTS 也不會自動的 ON,造成對方停在那里不發送了,所以,如果要用硬件流控制的話,還要在接收后最好加上檢測緩沖區大小的判斷,具體是使用 ClearCommError 后返回的 COMSTAT.cbInQue,當緩沖區已經空出來的時候,要使用 invoke EscapeCommFunction,hCom,SETRTS 重新將 RTS 設置為 ON。
以上是我在串行通訊編程中發現的實際問題,如果有和實際不符的地方或者別的問題,歡迎到編程論壇探討。
--------------------------------------------------------------------------------
(C) Copyright by LuoYunBin's Win32 ASM Page,http://asm.yeah.net
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -