串口通信例程.docx
- 文档编号:12280606
- 上传时间:2023-06-05
- 格式:DOCX
- 页数:10
- 大小:16.17KB
串口通信例程.docx
《串口通信例程.docx》由会员分享,可在线阅读,更多相关《串口通信例程.docx(10页珍藏版)》请在冰点文库上搜索。
串口通信例程
Window95串口通信函数集合(只适用于32位)
需要说明的是:
这是我程序的一部份,因此有一些与具体应用无关的部份。
但我感觉关键是原理,而不是程序本身.后面有些利用介绍,帮忙理解这长的程序。
头文件(.H)
#include""
#defineGWL_PGPSINFO0
#defineGPSEXTRABYTESsizeof(LONG)
#defineMAXPORTS4
#defineCN_SENDWM_USER+100
#defineRXQUEUE4096
#defineTXQUEUE4096
ffset=0;
WRITE_OS(npGPSInfo).OffsetHigh=0;
READ_OS(npGPSInfo).Offset=0;
READ_OS(npGPSInfo).OffsetHigh=0;
Event=CreateEvent(NULL,TRUE,FALSE,NULL);
if(READ_OS(npGPSInfo).hEvent==NULL)
{LocalFree(npGPSInfo);
return(-1);
}
WRITE_OS(npGPSInfo).hEvent=CreateEvent(NULL,TRUE,FALSE,NULL);
if(NULL==WRITE_OS(npGPSInfo).hEvent)
{CloseHandle(READ_OS(npGPSInfo).hEvent);
LocalFree(npGPSInfo);
return(-1);
}
return((LRESULT)TRUE);
}
BOOLNEARDestroyGPSInfo()
{
if(!
npGPSInfo)return(FALSE);
if(CONNECTED(npGPSInfo))CloseConnection();
CloseHandle(READ_OS(npGPSInfo).hEvent);
CloseHandle(WRITE_OS(npGPSInfo).hEvent);
CloseHandle(POSTEVENT(npGPSInfo));
LocalFree(npGPSInfo);
return(TRUE);
}
BOOLNEAROpenConnection()
{
charszPort[15];
BOOLfRetVal;
HCURSORhOldCursor,hWaitCursor;
HANDLEhCommWatchThread;
DWORDdwThreadID;
COMMTIMEOUTSCommTimeOuts;
if(!
npGPSInfo)return(FALSE);
hWaitCursor=LoadCursor(NULL,IDC_WAIT);
hOldCursor=SetCursor(hWaitCursor);
wsprintf(szPort,"COM%d",PORT(npGPSInfo));
if((COMDEV(npGPSInfo)=CreateFile(szPort,GENERIC_READ|GENERIC_WRITE,
0,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL|FILE_FLAG_OVERLAPPED,
NULL))==(HANDLE)-1)
return(FALSE);
else
{SetCommMask(COMDEV(npGPSInfo),EV_RXCHAR);
SetupComm(COMDEV(npGPSInfo),4096,4096);
PurgeComm(COMDEV(npGPSInfo),PURGE_TXABORT|PURGE_RXABORT|PURGE_TXCLEAR|PURGE_RXCLEAR);
=0xFFFFFFFF;
=0;
=1000;
=0;
=1000;
SetCommTimeouts(COMDEV(npGPSInfo),&CommTimeOuts);
}
fRetVal=SetupConnection();
if(fRetVal)
{CONNECTED(npGPSInfo)=TRUE;
if(NULL==(hCommWatchThread=CreateThread((LPSECURITY_ATTRIBUTES)NULL,
0,(LPTHREAD_START_ROUTINE)CommWatchProc,
(LPVOID)NULL,0,&dwThreadID)))
{CONNECTED(npGPSInfo)=FALSE;
CloseHandle(COMDEV(npGPSInfo));
fRetVal=FALSE;
}
else
{THREADID(npGPSInfo)=dwThreadID;
HTHREAD(npGPSInfo)=hCommWatchThread;
EscapeCommFunction(COMDEV(npGPSInfo),SETDTR);
}
}
else
{CONNECTED(npGPSInfo)=FALSE;
CloseHandle(COMDEV(npGPSInfo));
}
SetCursor(hOldCursor);
return(fRetVal);
}
BOOLNEARSetupConnection()
{BOOLfRetVal;
DCBdcb;
if(!
npGPSInfo)return(FALSE);
=sizeof(DCB);
GetCommState(COMDEV(npGPSInfo),&dcb);
=BAUDRATE(npGPSInfo);
=BYTESIZE(npGPSInfo);
=PARITY(npGPSInfo);
=STOPBITS(npGPSInfo);
=FALSE;
=DTR_CONTROL_ENABLE;
=FALSE;
=RTS_CONTROL_ENABLE;
==FALSE;
=TRUE;
=TRUE;
fRetVal=SetCommState(COMDEV(npGPSInfo),&dcb);
return(fRetVal);
}
BOOLNEARCloseConnection()
{
if(!
npGPSInfo)return(FALSE);
CONNECTED(npGPSInfo)=FALSE;
SetCommMask(COMDEV(npGPSInfo),0);
while(THREADID(npGPSInfo)!
=0);
EscapeCommFunction(COMDEV(npGPSInfo),CLRDTR);
PurgeComm(COMDEV(npGPSInfo),PURGE_TXABORT|PURGE_RXABORT|
PURGE_TXCLEAR|PURGE_RXCLEAR);
CloseHandle(COMDEV(npGPSInfo));
return(TRUE);
}
intNEARReadCommBlock(LPSTRlpszBlock,intnMaxLength)
{
BOOLfReadStat;
COMSTATComStat;
DWORDdwErrorFlags;
DWORDdwLength;
DWORDdwError;
if(!
npGPSInfo)return(FALSE);
ClearCommError(COMDEV(npGPSInfo),&dwErrorFlags,&ComStat);
dwLength=min((DWORD)nMaxLength,;
if(dwLength>0)
{fReadStat=ReadFile(COMDEV(npGPSInfo),lpszBlock,
dwLength,&dwLength,&READ_OS(npGPSInfo));
if(!
fReadStat)
{if(GetLastError()==ERROR_IO_PENDING)
{OutputDebugString("\n\rIOPending");
while(!
GetOverlappedResult(COMDEV(npGPSInfo),&READ_OS(npGPSInfo),&dwLength,TRUE))
{dwError=GetLastError();
if(dwError==ERROR_IO_INCOMPLETE)continue;
}
}
else
{dwLength=0;
ClearCommError(COMDEV(npGPSInfo),&dwErrorFlags,&ComStat);
}
}
}
return(dwLength);
}
BOOLNEARWriteCommBlock(LPSTRlpByte,DWORDdwBytesToWrite)
{BOOLfWriteStat;
DWORDdwBytesWritten;
DWORDdwErrorFlags;
DWORDdwError;
COMSTATComStat;
if(!
npGPSInfo)return(FALSE);
fWriteStat=WriteFile(COMDEV(npGPSInfo),lpByte,dwBytesToWrite,
&dwBytesWritten,&WRITE_OS(npGPSInfo));
if(!
fWriteStat)
{if(GetLastError()==ERROR_IO_PENDING)
{while(!
GetOverlappedResult(COMDEV(npGPSInfo),
&WRITE_OS(npGPSInfo),&dwBytesWritten,TRUE))
{dwError=GetLastError();
if(dwError==ERROR_IO_INCOMPLETE)continue;
else
{ClearCommError(COMDEV(npGPSInfo),&dwErrorFlags,&ComStat);
break;
}
}
}
else
{ClearCommError(COMDEV(npGPSInfo),&dwErrorFlags,&ComStat);
return(FALSE);
}
}
return(TRUE);
}
DWORDFARPASCALCommWatchProc(LPSTR)
{DWORDdwEvtMask;
OVERLAPPEDos;
intnLength;
BYTEabIn[1024];
memset(&os,0,sizeof(OVERLAPPED));
//createI/Oeventusedforoverlappedread
=CreateEvent(NULL,TRUE,FALSE,NULL);
if==NULL)
{MessageBox(NULL,"Failedtocreateeventforthread!
","GPSError!
",MB_ICONEXCLAMATION|MB_OK);
return(FALSE);
}
if(!
SetCommMask(COMDEV(npGPSInfo),EV_RXCHAR))return(FALSE);
while(CONNECTED(npGPSInfo))
{dwEvtMask=0;
WaitCommEvent(COMDEV(npGPSInfo),&dwEvtMask,NULL);
if((dwEvtMask&EV_RXCHAR)==EV_RXCHAR)
{do
{if(nLength=ReadCommBlock((LPSTR)abIn,1024))
{//WriteCommBlock((LPSTR)abIn,nLength);
*(abIn+nLength)=0;
:
:
SendMessage(hGPSWnd,CN_SEND,nLength,(LONG)(LPSTR)abIn);
}
}
while((nLength>0)&&(CONNECTED(npGPSInfo)));
}
}
CloseHandle;
THREADID(npGPSInfo)=0;
HTHREAD(npGPSInfo)=NULL;
return(TRUE);
}
就这些了,希望能对问这些问题的朋友有所帮忙!
一般利用的顺序是:
CreateGPSInfo(被通知的窗口句柄,串口端口号1或2);
OpenConnection();//成立联结它会挪用SetupConnection
DestroyGPSInfo();//解除联结它会挪用CloseConnection
能够用ReadCommBlock/WriteCommBlock来读/写串口
CommWatchProc是监视串口的线程,由OpenConnection成立
当串口有数据来的时侯,它会通知'被通知的窗口句柄'的窗口数据传到的消息(自概念的)
:
:
SendMessage(hGPSWnd,CN_SEND,nLength,(LONG)(LPSTR)abIn);
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 串口 通信 例程