MultiTerminal1 - Gitblit

QuakeGod

2023-10-23 4dfb88353b3671a71bc397d5f210d71f67f8fb04

提交 \| 用户 \| age
418cb3	1	#include "pch.h"
Q	2	#include "HvSerialPort.h"
	3
	4	int HvSerialPort1::Init()
	5	{
	6	return R_OK;
	7	}
	8
	9	int HvSerialPort1::SetParams(int nPortNum, int BaudRate, CString Settings)
	10	{
	11	m_nPort = nPortNum;
	12	m_nBaudRate = BaudRate;
	13	m_Settings = Settings;
	14	return R_OK;
	15	}
	16
	17	int HvSerialPort1::Open()
	18	{
	19	// TODO: 在此处添加实现代码.
	20	//Open Port
	21	int j;
	22	CString s1, s2;
	23	CString ComPortName;
	24	m_strResult.Empty();
	25	if (this->m_nPort == 0)
	26	{
	27	m_strResult.Format(_T("COM not specified %d"),m_nPort);
	28	return R_ERR;
	29	}
	30	if (this->m_bOpened)
	31	{
	32	m_strResult.Format(_T("COM%d already Opened"),m_nPort);
df0321	33	return R_OK;
418cb3	34	}
Q	35	ComPortName.Format(_T("\\\\.\\COM%d"), this->m_nPort);
	36	hCom1 = CreateFile(ComPortName, GENERIC_READ \| GENERIC_WRITE, 0, NULL, OPEN_EXISTING, 0, NULL);//FILE_ATTRIBUTE_NORMAL\|FILE_FLAG_OVERLAPPED
	37	if (hCom1 == INVALID_HANDLE_VALUE)
	38	{
	39	m_dwError = GetLastError();
	40	m_bOpened = false;
	41	FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM, 0, m_dwError, 0, s1.GetBuffer(2048), 2048, NULL);
	42	s1.ReleaseBuffer();
	43
	44	m_strResult.Format(_T("Open COM%d Err %d ,%s "), this->m_nPort, this->m_dwError, s1);
	45	return R_ERR;
	46	}
	47	else
	48	{
	49	m_dwError = GetLastError();
	50
	51	m_strResult.Format(_T("COM%d OK."), this->m_nPort);
	52	LastTime = GetTimemS();
	53	TotalSendBytes = 0; TotalRecvBytes = 0;
	54	LastSendBytes = 0; SendBytes = 0; RecvBytes = 0;
	55	LastRecvBytes = 0; SendSpeed = 0; RecvSpeed = 0;
	56	}
	57
	58	j = SetupComm(hCom1, 256, 256);
	59
	60	DCB dcb1;
	61	j = GetCommState(hCom1, &dcb1);
	62	BuildCommDCB(m_Settings, &dcb1);
	63
	64	dcb1.BaudRate = m_nBaudRate;
	65
	66	if (m_Settings.Find(_T("8")) != -1) { dcb1.ByteSize = 8; }
	67	else if (m_Settings.Find(_T("7")) != -1) { dcb1.ByteSize = 8; }
	68	else if (m_Settings.Find(_T("6")) != -1) { dcb1.ByteSize = 8; }
	69	else if (m_Settings.Find(_T("5")) != -1) { dcb1.ByteSize = 8; }
	70
	71	if (m_Settings.Find(_T("N")) != -1) { dcb1.fParity = FALSE; dcb1.Parity = NOPARITY; }
	72	else if (m_Settings.Find(_T("O")) != -1) { dcb1.fParity = TRUE; dcb1.Parity = ODDPARITY; }
	73	else if (m_Settings.Find(_T("E")) != -1) { dcb1.fParity = TRUE; dcb1.Parity = EVENPARITY; }
	74	else if (m_Settings.Find(_T("M")) != -1) { dcb1.fParity = TRUE; dcb1.Parity = MARKPARITY; }
	75	else if (m_Settings.Find(_T("S")) != -1) { dcb1.fParity = TRUE; dcb1.Parity = SPACEPARITY; }
	76
	77	if (m_Settings.Find(_T("1.5")) != -1) { dcb1.StopBits = ONE5STOPBITS; }
	78	else if (m_Settings.Find(_T("1")) != -1) { dcb1.StopBits = ONESTOPBIT; }
	79	else if (m_Settings.Find(_T("2")) != -1) { dcb1.StopBits = TWOSTOPBITS; }
	80
	81	dcb1.fDtrControl = 0;
	82	dcb1.fDsrSensitivity = false;
	83	dcb1.fBinary = 1;
	84	dcb1.fOutxCtsFlow = false;
	85	dcb1.fOutxDsrFlow = false;
	86	dcb1.fRtsControl = RTS_CONTROL_DISABLE;
	87
	88	j = SetCommState(hCom1, &dcb1);
	89	if (j == 0)
	90	{
	91	m_strResult.Format(_T("SetCommState Fail %d %s \r\n"), m_nBaudRate, m_Settings);
	92	CloseHandle(hCom1);
	93	m_bOpened = false;
	94	return R_ERR;
	95	}
	96	j = GetCommState(hCom1, &dcb1);
	97
	98	CString strParity;
	99	CString strStopBit;
	100
	101	if (dcb1.Parity == NOPARITY) { strParity = _T("N"); }
	102	else if (dcb1.Parity == EVENPARITY) { strParity = _T("E"); }
	103	else if (dcb1.Parity == ODDPARITY) { strParity = _T("O"); }
	104	else if (dcb1.Parity == MARKPARITY) { strParity = _T("M"); }
	105	else if (dcb1.Parity == SPACEPARITY) { strParity = _T("S"); }
	106	else { strParity = _T("X"); }
	107
	108	if (dcb1.StopBits == ONESTOPBIT) { strStopBit = _T("1"); }
	109	else if (dcb1.StopBits == ONE5STOPBITS) { strStopBit = _T("1.5"); }
	110	else if (dcb1.StopBits == TWOSTOPBITS) { strStopBit = _T("2"); }
	111	else { strStopBit = _T("3"); }
	112
	113	s1.Format(_T("%d %d-%s-%s"), dcb1.BaudRate, dcb1.ByteSize, strParity, strStopBit);
	114	m_strResult += s1;
	115
	116	COMMTIMEOUTS comtimeout1;
	117	COMSTAT comstat1;
	118	GetCommTimeouts(hCom1, &comtimeout1);
	119
	120	comtimeout1.ReadIntervalTimeout = 1; //两个字符之间的时间
	121	comtimeout1.ReadTotalTimeoutMultiplier = 0; //每个字符等待的时间，读多个字符则等待时间为单个时间乘以字符个数
	122	comtimeout1.ReadTotalTimeoutConstant = 2; //读取时，再另外多等待的时间。
	123	comtimeout1.WriteTotalTimeoutMultiplier = 0; //写入时，每个字符等待的时间，写入多个字符则等待时间为单个时间乘以字符个数。
	124	comtimeout1.WriteTotalTimeoutConstant = 0; //写入时，再另外多等待的时间。
	125
	126	SetCommTimeouts(hCom1, &comtimeout1);
	127	j = ClearCommError(hCom1, &m_dwError, &comstat1);
	128	s1.Format(_T("ClearCommError j %d errors %d "), j, m_dwError);
	129	s2 = s1;
	130	s1.Format(_T("cbInQue %d "), comstat1.cbInQue);
	131	s2 += s1;
	132	s1.Format(_T("cbOutQue %d "), comstat1.cbOutQue);
	133	s2 += s1;
	134	//PurgeComBuf();
	135	ClearBuf();
	136	m_bOpened = true;
	137
	138	//Start Read Thread
	139
	140	// MyThreadProc1ToRun = 1;
	141	// AfxBeginThread(MyJumper1, (LPVOID)this);
	142
	143	return R_OK;
	144	}
	145
	146	int HvSerialPort1::ClearStatData()
	147	{
	148	LastSendBytes = 0;
	149	LastRecvBytes = 0;
	150	SendBytes = 0;
	151	RecvBytes = 0;
	152	SendSpeed = 0;
	153	RecvSpeed = 0;
	154	return R_OK;
	155	}
	156
	157	int HvSerialPort1::CalSpeed()
	158	{
	159	double thistime = GetTimemS();
	160	double diftime = thistime - LastTime;
	161	if (diftime >= 500)
	162	{
	163	SendSpeed = (DWORD)(SendBytes * 1000 / diftime);
	164	RecvSpeed = static_cast<DWORD> (RecvBytes * 1000 / diftime);
	165	LastSendBytes = SendBytes; SendBytes = 0;
	166	LastRecvBytes = RecvBytes; RecvBytes = 0;
	167	LastTime = thistime;
	168	}
	169	return 0;
	170	}
	171
	172	int HvSerialPort1::Close()
	173	{
	174	// TODO: 在此处添加实现代码.
	175	if (m_bOpened)
	176	{
	177	// SendSign(STOP);
	178	MyThreadProc1ToRun = 0;
	179	Sleep(10);
	180	// wait for Thread stop
	181	//WaitForMultipleObjects(nCount);
	182	// close port
	183	CloseHandle(hCom1);
	184	m_bOpened = 0;
	185	hCom1 = INVALID_HANDLE_VALUE;
	186	m_strResult.Format(_T("COM%d Closed"), m_nPort);
	187	return R_OK;
	188	}
	189	else
	190	{
	191	m_strResult.Format(_T("COM%d not Opened"),m_nPort);
	192	return R_ERR;
	193	}
	194	}
	195
	196	int HvSerialPort1::SetRecvDoneCallBack(pRecvDone pRecvDoneFunc)
	197	{
	198	// TODO: 在此处添加实现代码.
	199	if (pRecvDoneFunc != NULL)
	200	{
	201	RecvDoneCB = pRecvDoneFunc;
	202	m_bRecvDoneCBSet = 1;
	203	}
	204	else
	205	{
	206	RecvDoneCB = NULL;
	207	m_bRecvDoneCBSet = 0;
	208	}
	209	return R_OK;
	210	}
	211
	212	UINT HvSerialPort1::MyJumper1(LPVOID pParam) //线程跳板
	213	{
	214	HvSerialPort1 pInput = (HvSerialPort1 )pParam; //反跳到真正的执行程序
	215	return pInput->MyThreadProc1(0);
	216	}
	217
	218	DWORD WINAPI HvSerialPort1::MyThreadProc1(LPVOID pParam)
	219	{
	220	//串口接收数据函数
	221
	222	//接收到的数据通知方式
	223	// 1. windows消息队列
	224	// 2. callback 函数 // 不同线程
	225	// 3. Event
	226	// 4. Buffer
	227
	228	OVERLAPPED osRead;
	229	HANDLE hEventArr[2];
	230	memset(&osRead, 0, sizeof(OVERLAPPED));
	231	osRead.hEvent = CreateEvent(NULL, TRUE, FALSE, NULL);
	232	SetCommMask(hCom1, EV_RXCHAR \| EV_TXEMPTY);
	233
	234	hEventArr[0] = osRead.hEvent;
	235	// hEventArr[1] = *g_OutPutList.GetEvent();
	236
	237	CString s1, s2;
	238	// SysLog(_T("线程开始运行\r\n"));
	239	MyThreadProc1Running = 1;
	240
	241	/*
	242	static OVERLAPPED ovlap1, ovlap2;
	243	*/
	244
	245	//SysLog(_T("准备接收\r\n"));
	246	DWORD dNumtoRead = 1000;
	247	dNumtoRead = 64;
	248	//nDataToSend = 0;
	249	DWORD wCount2 = 0;
	250	DWORD dwSent = 0;
	251	int nRunCount = 0;
	252	//计算接收速度;
	253
	254	int LastSpeedTime = (int)GetTimemS();
	255	int nThisRecv = 0;
	256
	257	COMSTAT cs;
	258	OVERLAPPED os;
	259	DWORD dwTrans;
	260	DWORD dwReaded;
	261	for (; MyThreadProc1ToRun == 1;)
	262	{
	263
	264	DWORD dwEvtMask = 0;
	265	///*
	266	// BOOL result = WaitCommEvent(hCom1, &dwEvtMask, NULL); // &os);
	267	// if (!result)
	268	{
	269	// if (GetLastError() == ERROR_IO_PENDING)
	270	// {
	271	// GetOverlappedResult(hCom1, &os, &dwTrans, true);
	272
	273	// }
	274	// if (dwEvtMask & EV_RXCHAR)
	275	if (1) { Sleep(1); } else
	276	{
	277	ClearCommError(hCom1, &m_dwError, &cs);
	278	int bytes = cs.cbInQue;
	279	dwReaded = 0;
	280	if (bytes > 0)
	281	{
	282	int j = ReadFile(hCom1, RecvBuf2, bytes, &dwReaded, NULL);
	283	if (j > 0)
	284	{
	285	//m_CS1.Lock();
	286	EnterCriticalSection(&g_cs);
	287	memcpy(RecvBuf + RecvBufDataLen, RecvBuf2, dwReaded);
	288	RecvBufDataLen += dwReaded;
	289	//m_CS1.Unlock();
	290	LeaveCriticalSection(&g_cs);
	291	}
	292	}
	293	else
	294	{
	295	Sleep(1);
	296	}
	297	}
	298	}
	299	if (RecvBufDataLen > 1024) { RecvBufDataLen = 0; }
	300	//EscapeCommFunction(hCom1, SETDTR);
	301	//*/
	302	}
	303	//SysLog(_T("跳出接收循环\r\n"));
	304	// hcurDC.SelectObject(def_font);
	305	// CloseHandle(hCom);
	306	//SysLog(_T("线程结束运行\r\n\r\n"));
	307	MyThreadProc1Running = 0;
	308	return 0;
	309	}
	310
	311	int HvSerialPort1::ClearBuf()
	312	{
	313	COMSTAT cs;
	314	for (int i = 0; i < 100;i++)
	315	{
	316	ClearCommError(hCom1, &m_dwError, &cs);
	317	int bytes = cs.cbInQue;
	318	if (bytes > 0)
	319	{
	320	Sleep(10);
	321	}
	322	PurgeComm(hCom1, PURGE_TXABORT \| PURGE_RXABORT \| PURGE_TXCLEAR \| PURGE_RXCLEAR);
	323	if (bytes == 0) break;
	324	}
	325
	326	RecvBufDataLen = 0;
	327	RecvBufPos = 0;
	328	return 0;
	329	}
	330
	331	int HvSerialPort1::Send(void * pBuf, int len1)
	332	{
	333	// TODO: 在此处添加实现代码.
	334	CString s1;
	335	int i, j;
	336	DWORD numsent;
	337
	338	if (!m_bOpened) { return R_ERR; }
	339
	340	j = WriteFile(hCom1, pBuf, len1, &numsent, NULL);
	341
	342	if (j != 0)
	343	{
	344	m_strResult.Format(_T("Send To COM%d OK %dB : "), this->m_nPort, numsent);
	345	for (i = 0; (unsigned)i < numsent; i++)
	346	{
	347	m_strResult.AppendFormat(_T("%c"), ((char *)pBuf)[i]);
	348	}
	349	m_strResult.AppendFormat(_T("\r\n"));
	350	}
	351	else
	352	{
	353	m_dwError = GetLastError();
	354	m_strResult.Format(_T("Send To COM%d fail. Error:%d SentBytes:%d "), this->m_nPort, m_dwError, numsent);
	355	}
	356	SendBytes += numsent;
	357	TotalSendBytes += numsent;
	358	return numsent;
	359
	360	return R_OK;
	361	}
	362	int HvSerialPort1::Recv(void * pBuf, int len1)
	363	{
	364	return RecvFromCom(pBuf, len1);
	365	}
	366
	367	int HvSerialPort1::RecvFromBuf(void * pBuf, int len1)
	368	{
	369	CString s1;
	370	int i, j;
	371	DWORD numreaded = 0;
	372	int numtoread = len1;
	373	m_strResult.Format(_T("ToRead %d "), len1);
	374	for (i = 0; i < 20; i++)
	375	{
	376	int k;
	377	//m_CS1.Lock();
	378	EnterCriticalSection(&g_cs);
	379	if (RecvBufDataLen)
	380	{
	381	if (RecvBufDataLen >= numtoread)
	382	{
	383	memcpy((char *)pBuf+numreaded, RecvBuf, numtoread);
	384	numreaded += numtoread;
	385	RecvBufDataLen -= numtoread;
	386	numtoread = 0;
	387	memmove(RecvBuf, RecvBuf + numtoread, RecvBufDataLen);
	388	}
	389	else
	390	{
	391	memcpy((char *)pBuf + numreaded, RecvBuf, RecvBufDataLen);
	392	numreaded += RecvBufDataLen;
	393	RecvBufDataLen = 0;
	394	RecvBufPos = 0;
	395	numtoread -= RecvBufDataLen;
	396	}
	397	}
	398	//m_CS1.Unlock();
	399	LeaveCriticalSection(&g_cs);
	400	if (numtoread == 0) break;
	401	Sleep(1);
	402	}
	403	if (numreaded > 0) {
	404	m_strResult.AppendFormat(_T("Read From COM%d OK %dB "), this->m_nPort, numreaded);
	405	for (i = 0; (unsigned)i < numreaded; i++)
	406	{
	407	m_strResult.AppendFormat(_T("%c"), ((char *)pBuf)[i]);
	408	}
	409	m_strResult.AppendFormat(_T("\r\n"));
	410	}
	411	else {
	412	m_strResult.Format(_T("Read From COM%d failed \r\n"), this->m_nPort);
	413	}
	414	m_strResult.AppendFormat(_T("ToRun %d, Running %d"), MyThreadProc1ToRun, MyThreadProc1Running);
	415
	416	return numreaded;
	417	}
	418	int HvSerialPort1::RecvFromCom(void * pBuf, int len1)
	419	{
	420	// TODO: 在此处添加实现代码.
	421	CString s1;
	422	int i, j;
	423	DWORD numreaded;
	424	if (!m_bOpened) { return R_ERR; }
	425	int len2 = 0;
	426	//Sleep(n/10);
	427	int nTryCount2 = 0;
	428	m_strResult.Format(_T("ToRead %d "), len1);
	429	for (int i = 0; i < m_nCountToTry; i++)
	430	{
	431	numreaded = 0;
	432
	433	j = ReadFile(hCom1, (char *)pBuf + len2, len1 - len2, &numreaded, NULL);
	434	if (j != 0) {
	435	len2 += numreaded;
	436	((char *)pBuf)[len2] = 0;
	437	if (len2 >= len1) break;
	438	nTryCount2 = 0;
	439	}
	440	else {
	441	if (len2 > 0) {
	442	nTryCount2++;
	443	if (nTryCount2 > m_nCountToWait) break;
	444	}
	445	}
	446	if (len2 > 0 && nTryCount2 > m_nCountToWait) break;
	447	}
	448	numreaded = len2;
	449	if (numreaded > 0) {
	450	m_strResult.AppendFormat(_T("Read From COM%d OK %dB "), this->m_nPort, numreaded);
	451	for (i = 0; (unsigned)i < numreaded; i++)
	452	{
	453	m_strResult.AppendFormat(_T("%c"), ((char *)pBuf)[i]);
	454	}
	455	m_strResult.AppendFormat(_T("\r\n"));
	456	}
	457	else {
	458	m_strResult.AppendFormat(_T("Read From COM%d failed \r\n"),this->m_nPort);
	459	}
	460
	461	RecvBytes += numreaded;
	462	TotalRecvBytes += numreaded;
	463
	464	return numreaded;
	465	return R_OK;
	466	}