|
|
|
基于FAX／MODEM遠(yuǎn)程通信程序設(shè)計(jì)</P><P> 陳立新</P><P> 摘 要 本文首先介紹了開發(fā)Windows事件驅(qū)動(dòng)的串行通信編程原理及方法，然后簡(jiǎn)述了FAX／MODEM的控制方式，接著詳細(xì)論述了一個(gè)遠(yuǎn)程監(jiān)視系統(tǒng)的編程例子。最后探討了技術(shù)的應(yīng)用途徑。<BR> 關(guān)鍵詞 WINDOWS 事件驅(qū)動(dòng) 串行通信 FAX／MODEM 遠(yuǎn)程監(jiān)視</P><P> 1. 引 言</P><P> FAX／MODEM首先用于傳真業(yè)務(wù)，近幾年發(fā)展極為迅速，取得了極大成功。隨著技術(shù)的發(fā)展和人們認(rèn)識(shí)的提高，人們拓寬了FAX／MODEM的功能，把它用于廣域網(wǎng)絡(luò)通信中，F(xiàn)AX／MODEM能從微機(jī)接受串行數(shù)據(jù)，直接傳給另一端的FAX機(jī)或另一臺(tái)FAX／MODEM，所以使用微機(jī)通過(guò)程控電話網(wǎng)和FAX／MODEM互聯(lián)起來(lái)可以組成一個(gè)廣域網(wǎng)絡(luò)系統(tǒng)，當(dāng)兩臺(tái)微機(jī)撥號(hào)聯(lián)上后，它們就獨(dú)占了一條電話線路，它們之間就像本地通信一樣(光電傳輸速度108米／秒)方便[1]。</P><P> 2. Windows事件驅(qū)動(dòng)編程原理</P><P> 采用OWL開發(fā)應(yīng)用程序。<BR> 2.1 WM_COMMNOTIFY消息<BR> WM_COMMNOTIFY是窗口管理類型消息，當(dāng)COM端口有事件發(fā)生時(shí)Windows就向窗口發(fā)送這條消息。該消息指出了WINDOWS發(fā)送接收隊(duì)列的狀態(tài)，如果通告狀態(tài)是CN_EVENT，表明COM端口有通信事件發(fā)生，其消息TMessage結(jié)構(gòu)的成員wParam標(biāo)志發(fā)生事件的COM端口[2]。<BR> 2.2 對(duì)消息的響應(yīng)<BR> 定義一個(gè)窗口及一個(gè)消息響應(yīng)成員函數(shù)如下：<BR> class TMonitorWindow:public Twindow<BR> {／／私有成員<BR> public;<BR> �。谐蓡T<BR> virtual void WMCommnotify(RTMessage Msg)<BR> =［WM_FIRST:WM_COMMNOTIFY];};<BR> 在此例中，當(dāng)TMonitorWindow對(duì)象接到一個(gè)WM_COMMNOTIFY消息，就立即自動(dòng)喚起WMCOmmnotify成員函數(shù)，處理端口事件。其中Msg是消息RTMessage類型的變量，RTMessage是TMessage的引用。從WINDOWS發(fā)送的消息信息存放于Msg中。<BR> 如果表達(dá)式(((Msg.LP.Lo＆ CN_EVENT)==CN_EVENT)＆＆(Msg.WParam==comm2))為真，則表明端口comm2有通信事件發(fā)生，可以從comm2中讀取接收?qǐng)?bào)文。</P><P> 3. FAX／MODEM的控制</P><P> 3.1 命令模式和在線模式<BR> FAX／MODEM工作時(shí)處在本地命令狀態(tài)或在線狀態(tài)。處在本地命令時(shí)，用戶能夠通過(guò)計(jì)算機(jī)的串行接口向它發(fā)送命令，完成一定功能，F(xiàn)AX／MODEM不傳送這些命令；一旦與遠(yuǎn)程FAX／MODEM建立連接后，F(xiàn)AX／MODEM就進(jìn)入在線狀態(tài)，這時(shí)它將直接傳送計(jì)算機(jī)發(fā)送的命令[1]。<BR> 3.2 命令和結(jié)果碼<BR> 所有HayesFAX／MODEM控制命令毫無(wú)例外一律使用AT開頭。當(dāng)FAX／MODEM接受一個(gè)命令，它就返回一個(gè)結(jié)果，這個(gè)結(jié)果可以是一個(gè)字符串或結(jié)果碼。因此可以編程與FAX／MODEM交互，實(shí)現(xiàn)用軟件來(lái)控制FAX／MODEM。</P><P> 4.遠(yuǎn)程監(jiān)視編程</P><P> 假設(shè)2臺(tái)微機(jī)(稱A和B)通過(guò)電話網(wǎng)、FAX／MODEM連接，用A機(jī)監(jiān)視B機(jī)，實(shí)時(shí)接收B機(jī)發(fā)送的狀態(tài)報(bào)文(B機(jī)的發(fā)送是隨機(jī)的)，那么A機(jī)的監(jiān)視軟件模塊主要包括：定義監(jiān)視窗口；初始化并建立與B機(jī)的連接；監(jiān)視B機(jī)；掛斷關(guān)閉通信口結(jié)束程序運(yùn)行。這里介紹功能模塊編程方法如下：<BR> 4.1 定義監(jiān)視窗口<BR> class TMonitorWindow: public TWindow<BR> { COMSTAT comstat;<BR> char buffer[1024]; ∥緩沖區(qū)<BR> int bufnum; ∥緩沖區(qū)實(shí)際字節(jié)數(shù)<BR> int comdev; ∥串行口設(shè)備號(hào)<BR> int status; ∥當(dāng)前通信狀態(tài)<BR> void InitComm(); ∥初始化串行口<BR> void InitFAX／MODEM();∥初始化FAX／MODEM<BR> void Dial(char＊); ∥撥號(hào)<BR> void Connect(); ∥接聽電話<BR> void HangUp(); ∥掛斷電話<BR> void EndFAX／MODEM(); ∥掛斷FAX／MODEM<BR> void EndComm(); ∥結(jié)束通信<BR> int ReadFAX／MODEMCode();∥讀取FAX／MODEM返回碼public:<BR> TMonitorWindow(PTWindowsObject AParent,<BR> LPSTR ATitle);<BR> virtual void CloseWindow();<BR> virtual void WMClose(RTMessage Msg)<BR> =［CM_FIRST+WM_CLOSE];∥終止程序運(yùn)行<BR> virtual void CommMessage(RTMessage Msg)<BR> =［WM_FIRST+WM_COMMNOTIFY;∥通信消息函數(shù)<BR> };<BR> 4.2 初始化并建立與B機(jī)的連接<BR> 4.2.1 計(jì)算機(jī)串口初始化<BR> 串行口的初始化必須完成三項(xiàng)任務(wù)：一調(diào)用OpenComm函數(shù)打開串行口。一個(gè)重要的工作是檢查返回值，如果小于或等于0，則打開操作失敗，這時(shí)必須采取容錯(cuò)措施；二調(diào)用SetCommState設(shè)置通信參數(shù)；三是調(diào)用函數(shù)setCommEventMask設(shè)定窗口只收CN_EVENT通告；調(diào)用函數(shù)<BR> EnableCommNotification屏蔽<BR> CN_RECEIVE和CN_TRANSMIT通告。參考代碼如下：<BR> void TMonitorWindow::InitComm()<BR> { DCB dcb;<BR> comdev=OpenComm(″COM3″,1024.1024);<BR> if(comdev<=0)<BR> { MessageBox(HWindow,″串行口打開失敗!″<BR> ，″出錯(cuò)″，MB_OK)；<BR> GetCommError(comdev,＆comstat);<BR> }<BR> else<BR> { GetCommState(comdev,＆dcb);<BR> dcb.BaudRate=4800;<BR> dcb.Parity=NOPARITY;<BR> dcb.ByteSize=8;<BR> dcb.StopBits=ONESTOPBIT;<BR> if (SetCommState(＆dcb)<0)<BR> {McssagcBox(HWindow,″串行口打開失敗!″<BR> ，″出錯(cuò)″，MB_OK);<BR> GetCommError(comdev,＆comstat);<BR> return;<BR> }<BR> SetCommEventMask(comdev,EV_RXCHAR<BR> |EV_RING |EV_BREAK);<BR> EnableCommNotification(comdev,HWindow,－1,－1);<BR> }<BR> }<BR> 4.2.2 FAX／MODEM初始化<BR> 作如下工作：關(guān)掉屏幕回顯，設(shè)置數(shù)字顯示結(jié)果碼，打開載波信號(hào)，設(shè)置揚(yáng)聲器值，打開結(jié)果碼，設(shè)置FAX／MODEM值。組合命令為：<BR> ″ATEOVO＆C1＆D2X4M1L1QOSO=OS7=10\r″;<BR> 參考代碼如下：<BR> void TMonitorWindow::InitFAX／MODEM()<BR> { char ＊Str=″ATEOVO＆C1＆D2X4M1L1QOSO=OS7=10\r″;<BR> if (WriteComm(comdev,Str,strlen(Str))<0)<BR> { GetCommError(comdev,＆comstat);<BR> MessageBox(HWindow,″初使化FAX／MODEM失敗!″，″出錯(cuò)″，MB_OK)；<BR> }<BR> }<BR> 4.2.3 撥號(hào)<BR> 如果用音頻撥號(hào)方式撥電話號(hào)碼1234567，撥號(hào)命令為：<BR> “ATDT 1234567\r”；<BR> 如果用脈沖撥號(hào)方式撥電話號(hào)碼1234567，撥號(hào)命令為：<BR> “ATDP 1234567\r”；<BR> 如果電話號(hào)碼暫存到字符串DialStr中，用Dial函數(shù)撥號(hào)，參考代碼如下：<BR> void TMonitorWindow::Dial(char ＊telphone)<BR> {char DialStr[50];<BR> sprintf(DialStr,″ATDP％s\r″,telphone);<BR> if(WriteComm(comdev,DialStr,strlen(DialStr))<0)<BR> {MessageBox(HWindow,″撥號(hào)FAX／MODEM失敗!″，″出錯(cuò)″，MB_OK)；<BR> GetCommError(comdev,＆comstat);<BR> }<BR> }<BR> 4.2.4 連接<BR> 發(fā)送″ATA\r″命令可以實(shí)現(xiàn)連接。<BR> 參考代碼如下：<BR> void TMonitorWindow::Conncct()<BR> { char＊ connstr=″ATA\r″;<BR> if(WriteComm(comdev,connstr,strlen(connstr))<0)<BR> {MessageBox(HWindow,″撥號(hào)FAX／MODEM失敗!″，″出錯(cuò)″，MB_OK)；<BR> GetCommError(comdev,＆comstat);<BR> }<BR> }<BR> 4.3 監(jiān)視B機(jī)<BR> 4.3.1 讀FAX／MODEM返回碼<BR> 計(jì)算機(jī)向FAX／MODEM發(fā)送命令后，立即讀通信口的接送隊(duì)列，將讀出的字符串轉(zhuǎn)換成整數(shù)即得到FAX／MODEM返回碼。參考代碼如下：<BR> int TMonitorWindow::ReadFAX／MODEMCode()<BR> { char tempbuf[20]<BR> int readno;<BR> readno=ReadComm(comdev，tempbuf，3)；<BR> if (readno<0)<BR> { MessageBox(HWindow,″Read FAX／MODEM CodeError!″,″ERROR″,MB_OK)；<BR> GetCommError(comdev,＆comstat);<BR> return －1;<BR> }<BR> else<BR> { tempbuf[readno]=′\0′；<BR> return(atoi(tempbuf))；<BR> }<BR> }<BR> 4.3.2 監(jiān)控FAX／MODEM<BR> WM_COMMNOTIFY消息響應(yīng)函數(shù)參考代碼如下，其中必須調(diào)用函數(shù)GetCommEventMask將標(biāo)志復(fù)位以便能繼續(xù)收到通知，調(diào)用ReadComm讀接收字符串，并將收到的字符串組合起來(lái)，以字符′\0′為結(jié)束符。<BR> void TMonitorWindow::CommMessage(RTMessage Msg)<BR> { int result; ∥記錄FAX／MODEM返回碼<BR> int event;<BR> HDC hdc;<BR> MSG msg;<BR> if ( ((Msg.LP.Lo ＆ CN_EVENT)==CN_EVENT)＆＆<BR> (Msg.WParam==comdev))∥是通信事件<BR> { event=GetCommEventMask(comdev,EV_RXCHAR);<BR> switch (status)<BR> {<BR> case strdialing: ∥字符串發(fā)送撥號(hào)<BR> result=ReadFAX／MODEMCode();<BR> if (result==10)<BR> {status=strsending;<BR> MessageBox(HWindow,″result=CONNECT″,″SEND″,MB_OK);<BR> writcComm(comdcv,buffor,bufnum);<BR> }<BR> else<BR> {<BR> if (result)<BR> {MessageBox(HWindow,Message[result],″出錯(cuò)″，MB_OK)；<BR> status=ready;<BR> }<BR> }<BR> break;<BR> case strconnecting; ∥字符串電話接聽<BR> result=ReadFAX／MODEMCode();<BR> if (result==1)status=strconnecting;<BR> else<BR> {<BR> if(result)<BR> {MessageBox(HWindow,Message[result],″出錯(cuò)″，MB_OK<BR> status=ready;<BR> }<BR> else status=strreceiving;<BR> }<BR> break;<BR> case strsending:<BR> HangUp();<BR> break;<BR> case strreceiving; ∥收到字符串<BR> bufnum=ReadComm(comdev,buffer,500);<BR> if(bufnum>0)<BR> {<BR> static int i=1;<BR> buffer[bufnum]=′\0′;<BR> hdc=GetDC(HWindow);<BR> TextOut(hdc,10,20＊i,buffer,bufnum);<BR> ReleaseDC(HWindow,hdc);<BR> i＋＋;<BR> }<BR> else MessageBox(HWindow,″Receive Error″,″ERROR″,MB_OK);<BR> break;<BR> case ready:<BR> result=ReadFAX／MODEMCode();<BR> status=strconnecting;<BR> Connect();<BR> break;<BR> default;<BR> result=ReadFAX／MODEMCode();<BR> }∥switch<BR> }<BR> }<BR> }<BR> }<BR> }<BR> 4.4 中止程序運(yùn)行<BR> 按Alt＋F4，選擇彈出菜單“關(guān)閉”項(xiàng)執(zhí)行“中止程序運(yùn)行”操作，具體完成“掛斷”、“關(guān)閉MODEM”、“關(guān)閉串行口”和“關(guān)閉監(jiān)視窗口”功能。<BR> 4.4.1 掛斷<BR> 發(fā)送“ATHO\r”命令可以實(shí)現(xiàn)連接。<BR> 參考代碼如下：<BR> void TMonitorWindow::HangUp()<BR> {<BR> char＊ HangUpstr=″ATHO\r″；<BR> WriteComm(comdev,HangUpstr,strlen(HangUpstr));<BR> }</P><P> 5. 結(jié)束語(yǔ)</P><P> 通過(guò)FAX／MODEM進(jìn)行遠(yuǎn)程信息傳輸有較廣闊的應(yīng)用前景，比如：民航售票、遠(yuǎn)程信息查詢等。FAX／MODEM在廣域網(wǎng)絡(luò)系統(tǒng)成為重要的組成部分。本文所述原理推廣到工廠遠(yuǎn)距離監(jiān)控上，可以大大減少工廠遠(yuǎn)程維修和售后服務(wù)費(fèi)用。 □</P><P> 作者單位：陳立新(湖南高新實(shí)業(yè)股份有限公司 長(zhǎng)沙410073)</P><P> 參考文獻(xiàn)</P><P> [1]王仲文，薛榮華，巴雪靜譯：《精通串行通信》，電子工業(yè)出版社，1995年2月第一版<BR> [2]鐘向群，龍旭東，薛安，陳鋼譯：《Borland C＋＋3.1開發(fā)Windows應(yīng)用程序》，清華大學(xué)出版社，1993年10月第一版<BR> <BR>
|
|
狀 態(tài)：
離線
公司簡(jiǎn)介
產(chǎn)品目錄
|
|
|
公司名稱：
|
中華工控網(wǎng)
|
| 聯(lián) 系 人： |
客服中心
|
| 電 話： |
0755-26546361
|
| 傳 真： |
0755-26585268 |
| 地 址： |
深圳市南山區(qū)創(chuàng)業(yè)路現(xiàn)代城華庭1棟6A |
| 郵 編： |
518054 |
| 主 頁(yè)： |
|
|
|
|
|
