摘 要 本文首先介紹了開發(fā)Windows事件驅動的串行通信編程原理及方法,然后簡述了FAX MODEM的控制方式,接著詳細論述了一個遠程監(jiān)視系統(tǒng)的編程例子。最后探討了技術的應用途徑。
1. 引 言
FAX MODEM首先用于傳真業(yè)務,近幾年發(fā)展極為迅速,取得了極大成功。隨著技術的發(fā)展和人們認識的提高,人們拓寬了FAX MODEM的功能,把它用于廣域網(wǎng)絡通信中,FAX MODEM能從微機接受串行數(shù)據(jù),直接傳給另一端的FAX機或另一臺FAX MODEM,所以使用微機通過程控電話網(wǎng)和FAX MODEM互聯(lián)起來可以組成一個廣域網(wǎng)絡系統(tǒng),當兩臺微機撥號聯(lián)上后,它們就獨占了一條電話線路,它們之間就像本地通信一樣(光電傳輸速度108米/秒)方便[1]。
2. Windows事件驅動編程原理
采用OWL開發(fā)應用程序。
2.1 WM_COMMNOTIFY消息
WM_COMMNOTIFY是窗口管理類型消息,當COM端口有事件發(fā)生時Windows就向窗口發(fā)送這條消息。該消息指出了WINDOWS發(fā)送接收隊列的狀態(tài),如果通告狀態(tài)是CN_EVENT,表明COM端口有通信事件發(fā)生,其消息TMessage結構的成員wParam標志發(fā)生事件的COM端口[2]。
2.2 對消息的響應
定義一個窗口及一個消息響應成員函數(shù)如下:
class TMonitorWindow:public Twindow
{//私有成員
public;
//公有成員
virtual void WMCommnotify(RTMessage Msg)
=[WM_FIRST:WM_COMMNOTIFY];};
在此例中,當TMonitorWindow對象接到一個WM_COMMNOTIFY消息,就立即自動喚起WMCOmmnotify成員函數(shù),處理端口事件。其中Msg是消息RTMessage類型的變量,RTMessage是TMessage的引用。從WINDOWS發(fā)送的消息信息存放于Msg中。
如果表達式(((Msg.LP.Lo& CN_EVENT)==CN_EVENT)&&(Msg.WParam==comm2))為真,則表明端口comm2有通信事件發(fā)生,可以從comm2中讀取接收報文。
3. FAX MODEM的控制
3.1 命令模式和在線模式
FAX MODEM工作時處在本地命令狀態(tài)或在線狀態(tài)。處在本地命令時,用戶能夠通過計算機的串行接口向它發(fā)送命令,完成一定功能,F(xiàn)AX MODEM不傳送這些命令;一旦與遠程FAX MODEM建立連接后,F(xiàn)AX MODEM就進入在線狀態(tài),這時它將直接傳送計算機發(fā)送的命令[1]。
3.2 命令和結果碼
所有HayesFAX MODEM控制命令毫無例外一律使用AT開頭。當FAX MODEM接受一個命令,它就返回一個結果,這個結果可以是一個字符串或結果碼。因此可以編程與FAX MODEM交互,實現(xiàn)用軟件來控制FAX MODEM。
4.遠程監(jiān)視編程
假設2臺微機(稱A和B)通過電話網(wǎng)、FAX MODEM連接,用A機監(jiān)視B機,實時接收B機發(fā)送的狀態(tài)報文(B機的發(fā)送是隨機的),那么A機的監(jiān)視軟件模塊主要包括:定義監(jiān)視窗口;初始化并建立與B機的連接;監(jiān)視B機;掛斷關閉通信口結束程序運行。這里介紹功能模塊編程方法如下:
4.1 定義監(jiān)視窗口
class TMonitorWindow: public TWindow
{ COMSTAT comstat;
char buffer[1024]; ∥緩沖區(qū)
int bufnum; ∥緩沖區(qū)實際字節(jié)數(shù)
int comdev; ∥串行口設備號
int status; ∥當前通信狀態(tài)
void InitComm(); ∥初始化串行口
void InitFAX MODEM();∥初始化FAX MODEM
void Dial(char*); ∥撥號
void Connect(); ∥接聽電話
void HangUp(); ∥掛斷電話
void EndFAX MODEM(); ∥掛斷FAX MODEM
void EndComm(); ∥結束通信
int ReadFAX MODEMCode();∥讀取FAX MODEM返回碼public:
TMonitorWindow(PTWindowsObject AParent,
LPSTR ATitle);
virtual void CloseWindow();
virtual void WMClose(RTMessage Msg)
=[CM_FIRST+WM_CLOSE];∥終止程序運行
virtual void CommMessage(RTMessage Msg)
=[WM_FIRST+WM_COMMNOTIFY;∥通信消息函數(shù)
};
4.2 初始化并建立與B機的連接
4.2.1 計算機串口初始化
串行口的初始化必須完成三項任務:一調用OpenComm函數(shù)打開串行口。一個重要的工作是檢查返回值,如果小于或等于0,則打開操作失敗,這時必須采取容錯措施;二調用SetCommState設置通信參數(shù);三是調用函數(shù)setCommEventMask設定窗口只收CN_EVENT通告;調用函數(shù)
EnableCommNotification屏蔽
CN_RECEIVE和CN_TRANSMIT通告。參考代碼如下:
void TMonitorWindow::InitComm()
{ DCB dcb;
comdev=OpenComm(″COM3″,1024.1024);
if(comdev<=0)
{ MessageBox(HWindow,″串行口打開失敗!″
,″出錯″,MB_OK);
GetCommError(comdev,&comstat);
}
else
{ GetCommState(comdev,&dcb);
dcb.BaudRate=4800;
dcb.Parity=NOPARITY;
dcb.ByteSize=8;
dcb.StopBits=ONESTOPBIT;
if (SetCommState(&dcb)<0)
{McssagcBox(HWindow,″串行口打開失敗!″
,″出錯″,MB_OK);
GetCommError(comdev,&comstat);
return;
}
SetCommEventMask(comdev,EV_RXCHAR
|EV_RING |EV_BREAK);
EnableCommNotification(comdev,HWindow,-1,-1);
}
}
4.2.2 FAX MODEM初始化
作如下工作:關掉屏幕回顯,設置數(shù)字顯示結果碼,打開載波信號,設置揚聲器值,打開結果碼,設置FAX MODEM值。組合命令為:
″ATEOVO&C1&D2X4M1L1QOSO=OS7=10\r″;
參考代碼如下:
void TMonitorWindow::InitFAX MODEM()
{ char *Str=″ATEOVO&C1&D2X4M1L1QOSO=OS7=10\r″;
if (WriteComm(comdev,Str,strlen(Str))<0)
{ GetCommError(comdev,&comstat);
MessageBox(HWindow,″初使化FAX MODEM失敗!″,″出錯″,MB_OK);
}
}
4.2.3 撥號
如果用音頻撥號方式撥電話號碼88888888,撥號命令為:
“ATDT 88888888\r”;
如果用脈沖撥號方式撥電話號碼88888888,撥號命令為:
“ATDP 88888888\r”;
如果電話號碼暫存到字符串DialStr中,用Dial函數(shù)撥號,參考代碼如下:
void TMonitorWindow::Dial(char *telphone)
{char DialStr[50];
sprintf(DialStr,″ATDP%s\r″,telphone);
if(WriteComm(comdev,DialStr,strlen(DialStr))<0)
{MessageBox(HWindow,″撥號FAX MODEM失敗!″,″出錯″,MB_OK);
GetCommError(comdev,&comstat);
}
}
4.2.4 連接
發(fā)送″ATA\r″命令可以實現(xiàn)連接。
參考代碼如下:
void TMonitorWindow::Conncct()
{ char* connstr=″ATA\r″;
if(WriteComm(comdev,connstr,strlen(connstr))<0)
{MessageBox(HWindow,″撥號FAX MODEM失敗!″,″出錯″,MB_OK);
GetCommError(comdev,&comstat);
}
}
4.3 監(jiān)視B機
4.3.1 讀FAX MODEM返回碼
計算機向FAX MODEM發(fā)送命令后,立即讀通信口的接送隊列,將讀出的字符串轉換成整數(shù)即得到FAX MODEM返回碼。參考代碼如下:
int TMonitorWindow::ReadFAX MODEMCode()
{ char tempbuf[20]
int readno;
readno=ReadComm(comdev,tempbuf,3);
if (readno<0)
{ MessageBox(HWindow,″Read FAX MODEM CodeError!″,″ERROR″,MB_OK);
GetCommError(comdev,&comstat);
return -1;
}
else
{ tempbuf[readno]=′\0′;
return(atoi(tempbuf));
}
}
4.3.2 監(jiān)控FAX MODEM
WM_COMMNOTIFY消息響應函數(shù)參考代碼如下,其中必須調用函數(shù)GetCommEventMask將標志復位以便能繼續(xù)收到通知,調用ReadComm讀接收字符串,并將收到的字符串組合起來,以字符′\0′為結束符。
void TMonitorWindow::CommMessage(RTMessage Msg)
{ int result; ∥記錄FAX MODEM返回碼
int event;
HDC hdc;
MSG msg;
if ( ((Msg.LP.Lo & CN_EVENT)==CN_EVENT)&&
(Msg.WParam==comdev))∥是通信事件
{ event=GetCommEventMask(comdev,EV_RXCHAR);
switch (status)
{
case strdialing: ∥字符串發(fā)送撥號
result=ReadFAX MODEMCode();
if (result==10)
{status=strsending;
MessageBox(HWindow,″result=CONNECT″,″SEND″,MB_OK);
writcComm(comdcv,buffor,bufnum);
}
else
{
if (result)
{MessageBox(HWindow,Message[result],″出錯″,MB_OK);
status=ready;
}
}
break;
case strconnecting; ∥字符串電話接聽
result=ReadFAX MODEMCode();
if (result==1)status=strconnecting;
else
{
if(result)
{MessageBox(HWindow,Message[re