串口操作源码.doc

串口操作源码.txt什么叫乐观派？这个。就象茶壶一样，屁股被烧得红红的，还有心情吹口哨。生活其实很简单，过了今天就是明天。一生看一个女人是不科学的，容易看出病来。/*模 块 名：YFCOM.cpp /*说 明：YFSoft 版权所有2005 - 2006(C) /*创 建 人：叶帆 /*日 期：2006年4月4日 /*修 改 人： /*日 期： /*描 述：串口操作 /*版 本：V1.0 /* #include stdafx.h #include yfcom.h /串口句柄 HANDLE m_COM_Handle; /两个信号全局变量（串口操作用） OVERLAPPED m_OverlappedRead, m_OverlappedWrite; /* /函 数 名：OpenCom /输 入：long lngPort, 串口号 / char *cfgMessage, 配置信息，形如9600,e,8,1 / long lngInSize, 接收缓冲区大小 / long lngOutSize 发送缓冲区大小 /输 出：long /功能描述：打开串口 /全局变量： /调用模块： /作 者：叶帆 /日 期：2006年4月4日 /修 改 人： /日 期： /版 本： /* long OpenCom(long lngPort,char *cfgMessage,long lngInSize,long lngOutSize) try char szMsg255; DCB dcb; /打开端口 if (lngPort9) sprintf( szMsg, .COM%d, lngPort ); else sprintf( szMsg, COM%d, lngPort ); /用异步方式读写串口 m_COM_Handle = CreateFile(szMsg, GENERIC_READ | GENERIC_WRITE, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL | FILE_FLAG_OVERLAPPED , NULL ); if( m_COM_Handle = NULL ) return( 2 ); /清空异步读写参数 memset(&(m_OverlappedRead), 0, sizeof (OVERLAPPED); memset(&(m_OverlappedWrite), 0, sizeof (OVERLAPPED); /设置dcb块 dcb.DCBlength = sizeof( DCB ); /长度 GetCommState(m_COM_Handle , &dcb ); /波特率,奇偶校验,数据位,停止位 如：9600,n,8,1 sprintf(szMsg,COM%d:%s, lngPort,cfgMessage); BuildCommDCB(szMsg,&dcb); /- dcb.fBinary=TRUE; /二进制方式 dcb.fOutxCtsFlow=FALSE; /不用CTS检测发送流控制 dcb.fOutxDsrFlow=FALSE; /不用DSR检测发送流控制 dcb.fDtrControl=DTR_CONTROL_DISABLE; /禁止DTR流量控制 dcb.fDsrSensitivity=FALSE; /对DTR信号线不敏感 dcb.fTXContinueOnXoff=TRUE; /检测接收缓冲区 dcb.fOutX=FALSE; /不做发送字符控制 dcb.fInX =FALSE; /不做接收控制 dcb.fErrorChar=FALSE; /是否用指定字符替换校验错的字符 dcb.fNull=FALSE; /保留NULL字符 dcb.fRtsControl=RTS_CONTROL_ENABLE; /允许RTS流量控制 dcb.fAbortOnError=FALSE; /发送错误后，继续进行下面的读写操作 dcb.fDummy2=0; /保留 dcb.wReserved=0; /没有使用，必须为0 dcb.XonLim=0; /指定在XOFF字符发送之前接收到缓冲区中可允许的最小字节数 dcb.XoffLim=0; /指定在XOFF字符发送之前缓冲区中可允许的最小可用字节数 2006-5-2 19:47 回复 ikkoku01 6位粉丝 2楼 dcb.XonChar=0; /发送和接收的XON字符 dcb.XoffChar=0; /发送和接收的XOFF字符 dcb.ErrorChar=0; /代替接收到奇偶校验错误的字符 dcb.EofChar=0; /用来表示数据的结束 dcb.EvtChar=0; /事件字符，接收到此字符时，会产生一个事件 dcb.wReserved1=0; /没有使用 /dcb.BaudRate =9600; /波特率 /dcb.Parity=0; /奇偶校验 /dcb.ByteSize=8; /数据位 /dcb.StopBits=0; /停止位 /- if(dcb.Parity=0 ) / 0-4=None,Odd,Even,Mark,Space dcb.fParity=FALSE; /奇偶校验无效 else dcb.fParity=TRUE; /奇偶校验有效 sprintf(szMsg,COM%d:%d,%d,%d,%d (InSize:%ld,OutSize:%ld), lngPort,dcb.BaudRate,dcb.Parity,dcb.ByteSize,dcb.StopBits,lngInSize,lngOutSize); /读写超时设置 COMMTIMEOUTS CommTimeOuts; /西门子参数 CommTimeOuts.ReadIntervalTimeout =0; /字符允许间隔ms 该参数如果为最大值，会使readfile命令立即返回 CommTimeOuts.ReadTotalTimeoutMultiplier =0; /总的超时时间(对单个字节) CommTimeOuts.ReadTotalTimeoutConstant = 2500; /多余的超时时间ms CommTimeOuts.WriteTotalTimeoutMultiplier =0; /总的超时时间(对单个字节) CommTimeOuts.WriteTotalTimeoutConstant = 2500; /多余的超时时间 SetCommTimeouts( m_COM_Handle, &CommTimeOuts ); /获取信号句柄 m_OverlappedRead.hEvent = CreateEvent(NULL, TRUE, FALSE, NULL); m_OverlappedWrite.hEvent = CreateEvent(NULL, TRUE, FALSE, NULL); if( !SetCommState( m_COM_Handle, &dcb ) | /判断设置参数是否成功 !SetupComm( m_COM_Handle, lngInSize, lngOutSize ) | /设置输入和输出缓冲区是否成功 m_OverlappedRead.hEvent=NULL | m_OverlappedWrite.hEvent=NULL) DWORD dwError = GetLastError(); /获取最后的错误信息 if( m_OverlappedRead.hEvent != NULL ) CloseHandle( m_OverlappedRead.hEvent ); if( m_OverlappedWrite.hEvent != NULL ) CloseHandle( m_OverlappedWrite.hEvent ); CloseHandle( m_COM_Handle ); m_COM_Handle=NULL; return dwError; return( 0 ); catch(.) return -1; /* /函 数 名：CloseCom /输 入： /输 出：long /功能描述：关闭串口 /全局变量： /调用模块： /作 者：叶帆 /日 期：2006年4月4日 /修 改 人： /日 期： /版 本： /* long CloseCom() try if(m_COM_Handle = NULL ) return( 1 ); SetCommMask(m_COM_Handle ,NULL); SetEvent(m_OverlappedRead.hEvent); SetEvent(m_OverlappedWrite.hEvent); 2006-5-2 19:47 回复 ikkoku01 6位粉丝 3楼 if( m_OverlappedRead.hEvent != NULL ) CloseHandle( m_OverlappedRead.hEvent ); if( m_OverlappedWrite.hEvent != NULL ) CloseHandle( m_OverlappedWrite.hEvent ); if (CloseHandle( m_COM_Handle )=FALSE)return (2); m_COM_Handle = NULL; catch(.) return (3); return( 0 ); /* /函 数 名：SendData /输 入：BYTE *bytBuffer, 数据 / long lngSize 个数 /输 出：long /功能描述：发送数据 /全局变量： /调用模块： /作 者：叶帆 /日 期：2006年4月4日 /修 改 人： /日 期： /版 本： /* long SendData(BYTE *bytBuffer, long lngSize ) try if( m_COM_Handle = NULL ) return( -1 ); DWORD dwBytesWritten=lngSize; BOOL bWriteStat; COMSTAT ComStat; DWORD dwErrorFlags; ClearCommError(m_COM_Handle,&dwErrorFlags,&ComStat); bWriteStat=WriteFile(m_COM_Handle, bytBuffer, lngSize, &dwBytesWritten, &(m_OverlappedWrite); if(!bWriteStat) if(GetLastError()=ERROR_IO_PENDING) GetOverlappedResult(m_COM_Handle,&(m_OverlappedWrite),&dwBytesWritten,TRUE); /等待直到发送完毕 else dwBytesWritten=0; return (long)dwBytesWritten; catch(.) return -1; /* /函 数 名：AcceptData /输 入：BYTE *bytBuffer, 数据 / long lngSize 个数 /输 出：long /功能描述：读取数据 /全局变量： /调用模块： /作 者：叶帆 /日 期：2006年4月4日 /修 改 人： /日 期： /版 本： /* long AcceptData(BYTE *bytBuffer, long lngSize ) try if( m_COM_Handle = NULL ) return( -1 ); DWORD lngBytesRead=lngSize; BOOL fReadStat; DWORD dwRes=0; /读数据 fReadStat=ReadFile(m_COM_Handle,bytBuffer,lngSize,&lngBytesRead,&(m_OverlappedRead); /Sleep(1); if( !fReadStat ) if( GetLastError() = ERROR_IO_PENDING ) /重叠 I/O 操作在进行中 dwRes=WaitForSingleObject(m_OverlappedRead.hEvent,1000); /等待，直到超时 switch(dwRes) case WAIT_OBJECT_0: /读完成 if(GetOverlappedResult(m_COM_Handle,&(m_OverlappedRead),&lngBytesRead,FALSE)=0) /错误 return -2; break; case WAIT_TIMEOUT: /超时 return -1; break; default: /WaitForSingleObject 错误 break; return lngBytesRead; catch(.) return -1; /* /函 数 名：ClearAcceptBuffer /输 入： /输 出：long /功能描述：清除接收缓冲区 /全局变量： /调用模块： /作 者：叶帆 /日 期：2006年4月4日 /修 改 人： /日 期： /版 本： /* long ClearAcceptBuffer() try if(m_COM_Handle = NULL ) return( -1 ); PurgeComm(m_COM_Handle,PURGE_RXABORT | PURGE_RXCLEAR); / catch