userfunc.c

泵站系统屏与屏之间的通信

			SubDevice[iPort].MsgToEng[WritePointer] = pData[i];
			WritePointer = (WritePointer+1)%MAX_MSG_LEN;
		}
		TempBuff[0] = (unsigned char)(WritePointer>>8);
		TempBuff[1] = (unsigned char)(WritePointer&0xFF);
		ShareMemWrite(StartAddr+2, 2, TempBuff);
	}
	else
	{
		if(MsgTpye == YC_Msg)
		{
			StartAddr = iPort*100+8;
			if(!Check_QUEUE_Space(StartAddr, nLen, MAX_MSG_LEN)) return;
			ShareMemRead(TempBuff, StartAddr+2, 2);
			WritePointer = TempBuff[0]*256+TempBuff[1];
			for(i=0; i<nLen; i++)
			{
				SubDevice[iPort].YcMsgToOpe[WritePointer] = pData[i];
				WritePointer = (WritePointer+1)%MAX_MSG_LEN;
			}
			TempBuff[0] = (unsigned char)(WritePointer>>8);
			TempBuff[1] = (unsigned char)(WritePointer&0xFF);
			ShareMemWrite(StartAddr+2, 2, TempBuff);
		}
		else
		{
			StartAddr = iPort*100+12;
			if(!Check_QUEUE_Space(StartAddr, nLen, MAX_MSG_LEN)) return;
			ShareMemRead(TempBuff, StartAddr+2, 2);
			WritePointer = TempBuff[0]*256+TempBuff[1];
			for(i=0; i<nLen; i++)
			{
				SubDevice[iPort].YxMsgToOpe[WritePointer] = pData[i];
				WritePointer = (WritePointer+1)%MAX_MSG_LEN;
			}
			TempBuff[0] = (unsigned char)(WritePointer>>8);
			TempBuff[1] = (unsigned char)(WritePointer&0xFF);
			ShareMemWrite(StartAddr+2, 2, TempBuff);
		}
	}		
}
int ReadOneMessageFromMem(int iPort,unsigned char *pRead,unsigned long StartAddr,unsigned short CurPointer)
{
	int i ;
	unsigned char TempBuff[8];
	unsigned short ReadPointer = CurPointer;
	if(StartAddr == (iPort*100+8))
	{
		for(i=0;i<2;i++)
		{
			*(pRead+i) = SubDevice[iPort].YcMsgToOpe[ReadPointer];
			ReadPointer = (ReadPointer+1)%MAX_MSG_LEN;
		}
		if(*(pRead)!=0x68)
		{
			ResetMemPointer(StartAddr);
			return 0;
		}
		if(*(pRead+1)>0)
		{
			for(i=0;i<*(pRead+1);i++)
			{
				*(pRead+2+i) = SubDevice[iPort].YcMsgToOpe[ReadPointer];
				ReadPointer = (ReadPointer+1)%MAX_MSG_LEN;
			}
			TempBuff[0] = (unsigned char)(ReadPointer>>8);
			TempBuff[1] = (unsigned char)(ReadPointer&0xFF);
			ShareMemWrite(StartAddr, 2, TempBuff);
			return *(pRead+1)+2;
		}
		else
		{
			ResetMemPointer(StartAddr);
			return 0;
		}
	}
	if(StartAddr == (iPort*100+12))
	{
		for(i=0;i<2;i++)
		{
			*(pRead+i) = SubDevice[iPort].YxMsgToOpe[ReadPointer];
			ReadPointer = (ReadPointer+1)%MAX_MSG_LEN;
		}
		if(*(pRead)!=0x68)
		{
			ResetMemPointer(StartAddr);
			return 0;
		}
		if(*(pRead+1)>0)
		{
			for(i=0;i<*(pRead+1);i++)
			{
				*(pRead+2+i) = SubDevice[iPort].YxMsgToOpe[ReadPointer];
				ReadPointer = (ReadPointer+1)%MAX_MSG_LEN;
			}
			TempBuff[0] = (unsigned char)(ReadPointer>>8);
			TempBuff[1] = (unsigned char)(ReadPointer&0xFF);
			ShareMemWrite(StartAddr, 2, TempBuff);
			return *(pRead+1)+2;
		}
		else
		{
			ResetMemPointer(StartAddr);
			return 0;
		}
	}
	if(StartAddr == (iPort*100+16))
	{
		for(i=0;i<2;i++)
		{
			*(pRead+i) = SubDevice[iPort].MsgToEng[ReadPointer];
			ReadPointer = (ReadPointer+1)%MAX_MSG_LEN;
		}
		if(*(pRead)!=0x68)
		{
			ResetMemPointer(StartAddr);
			return 0;
		}
		if(*(pRead+1)>0)
		{
			for(i=0;i<*(pRead+1);i++)
			{
				*(pRead+2+i) = SubDevice[iPort].MsgToEng[ReadPointer];
				ReadPointer = (ReadPointer+1)%MAX_MSG_LEN;
			}
			TempBuff[0] = (unsigned char)(ReadPointer>>8);
			TempBuff[1] = (unsigned char)(ReadPointer&0xFF);
			ShareMemWrite(StartAddr, 2, TempBuff);
			return *(pRead+1)+2;
		}
		else
		{
			ResetMemPointer(StartAddr);
			return 0;
		}	
	}
	return 0;
}
unsigned short GetCurrentPointer(unsigned long StartAddr)
{
	unsigned short CurPointer;
	unsigned char TempBuff[8];
	ShareMemRead(TempBuff,StartAddr,2);
	CurPointer = TempBuff[0]*256+TempBuff[1];
	return CurPointer;
}
int PointerNotEq(unsigned long StartAddr)
{
	int i,nRead=0;
	unsigned short ReadPointer;
	unsigned short WritePointer;
	unsigned char TempBuff[8];
	ShareMemRead(TempBuff,StartAddr,4);
	ReadPointer = TempBuff[0]*256+TempBuff[1];
	WritePointer = TempBuff[2]*256+TempBuff[3];
	if(ReadPointer != WritePointer)
	{
		return 1;
	}
	return 0;
}
unsigned char BCD_2_HEX(unsigned char BCD_Data)
{
	return (BCD_Data/16)*10 + BCD_Data%16;
}
/*-----------------------下面函数针对威盛电度表----------------------------*/
void BCD_To_HEX(unsigned char *pucHex,unsigned char *pucBCD)
{
	unsigned long ulValue;
	unsigned long ulByte;
	unsigned char ucL,ucH;
	
	ucL	=pucBCD[0] & 0xf;
	ucH	=pucBCD[0] / 0x10;
	ulByte	=ucL+ucH * 10;
	ulValue =ulByte;
	
	ucL	=pucBCD[1] & 0xf;
	ucH	=pucBCD[1] / 0x10;
	ulByte	=ucL+ucH * 10;
	ulByte *=100;
	ulValue+=ulByte;
	
	ucL	=pucBCD[2] & 0xf;
	ucH	=pucBCD[2] / 0x10;
	ulByte	=ucL+ucH * 10;
	ulByte *=10000;
	ulValue +=ulByte;
	
	ucL	=pucBCD[3] & 0xf;
	ucH	=pucBCD[3] / 0x10;
	ulByte	=ucL+ucH * 10;
	ulByte *=1000000;
	ulValue +=ulByte;
	
	ulValue *=10;     /*10 times*/
	
	*(pucHex)	=ulValue & 0xff;
	*(pucHex+1)	=(ulValue / 0x100) & 0xff;
	*(pucHex+2)	=(ulValue / 0x10000) & 0xff;
	*(pucHex+3)	=(ulValue / 0x1000000) & 0xff;
}
int FindPointInf(unsigned char DataType,unsigned char ucAddr,unsigned char ucSector,unsigned short ucInf103)
{
	int i ,ret = -1;
	switch(DataType)
	{
	case YC_Msg://YC
		for(i=0;i<nTransYc;i++)
		{
			if( (uYcTable[i].uAddr == ucAddr) && 
				(uYcTable[i].uSector == ucSector) && 
				(uYcTable[i].uInf103 == ucInf103) )
			{
				ret = i;
				break;
			}
		}
		break;
	case YX_Msg://YX
		for(i=0;i<nTransYx;i++)
		{
			if((uYxTable[i].uAddr == ucAddr) && 
				(uYxTable[i].uSector == ucSector) && 
				(uYxTable[i].uInf103 == ucInf103) )
			{
				ret = i;
				break;
			}
		}
		break;
	default :
		break;
	}
	return ret;
}
void RefreshDateData(unsigned char DataType, unsigned short uInf_Modbus, unsigned char *pData)
{
	switch(DataType)
	{
	case YC_Msg://YC
		MemYCBuff[2*uInf_Modbus+0] = *pData;
		MemYCBuff[2*uInf_Modbus+1] = *(pData+1);
		break;
	case YX_Msg://YX
		MemYXBuff[uInf_Modbus] = *pData;
		break;
	}
}
int RequireInvalid(unsigned char DataType,unsigned int StartAddr,unsigned int ReqNum)
{
	switch(DataType)
	{
	case YC_Msg:	//YC
		if(StartAddr > (MaxTransYc-1)) return 2;
		if( (ReqNum > 122) || ((StartAddr+ReqNum) > MaxTransYc) ) return 3;
		break;
	case YX_Msg:	//YX
		if( StartAddr > (MaxTransYx-1) ) return 2;
		if( (ReqNum > 1900) || ((StartAddr+ReqNum) > MaxTransYx) ) return 3;
		break;
	}
	return 0;
}
int GetYcResponseFrame(unsigned char *pFrame,unsigned int StartAddr,unsigned int ReqNum)
{
	int i, iByte, ret, offset;
	unsigned char ByteBuff[256];

	ret = ReqNum*2;
	iByte = BitToByte(ByteBuff,MemYXBuff,MaxTransYx);
	offset = MaxTransYc*2 - iByte;
	for(i=0; i<iByte/2; i++)
	{
		MemYCBuff[offset+2*i] = ByteBuff[2*i+1] ;
		MemYCBuff[offset+2*i+1] = ByteBuff[2*i] ;
	}
	memcpy(pFrame, MemYCBuff+StartAddr*2, ReqNum*2);
	return ret;
}
int GetYxResponseFrame(unsigned char *pFrame,unsigned int StartAddr,unsigned int ReqNum)
{
	int ret;
	unsigned char BitYx[1024];
	memcpy(BitYx, MemYXBuff+StartAddr, ReqNum);
	ret = BitToByte(pFrame,BitYx,ReqNum);
	return ret;
}
void SaveHMICommand(unsigned char *pData, int nLen)
{
	int i;
	unsigned char TempBuff[8];
	unsigned char WriteBuff[256];
	unsigned short WritePointer,tempPointer;
	unsigned short StartAddr = HMICmdMemAddr;
	if(nLen>253) 
		return;
	if(!Check_QUEUE_Space(StartAddr, nLen, MAX_HMICMD_LEN)) 
		return;
	
	ShareMemRead(TempBuff, StartAddr+2, 2);
	WritePointer = TempBuff[0]*256+TempBuff[1];
	tempPointer = WritePointer;
	WriteBuff[0] = 0x68;
	WriteBuff[1] = nLen;
	memcpy(WriteBuff+2, pData, nLen);
	if(nLen>0)
	{
		for(i=0; i<nLen+2; i++)
		{
			HMICmdBuff[WritePointer] = WriteBuff[i];
			WritePointer = (WritePointer+1)%MAX_HMICMD_LEN;
		}
		TempBuff[0] = HIBYTE(WritePointer);
		TempBuff[1] = LOBYTE(WritePointer);
		ShareMemWrite(StartAddr+2, 2, TempBuff);
	}
}
int ReadHMICommand(unsigned char *pRead)
{
	int i,nRead=0;
	unsigned char TempBuff[8],TempRead[8];
	unsigned short ReadPointer,WritePointer;
	unsigned short StartAddr = HMICmdMemAddr;
	ShareMemRead(TempBuff, StartAddr, 4);
	ReadPointer = TempBuff[0]*256+TempBuff[1];
	WritePointer = TempBuff[2]*256+TempBuff[3];
	if(ReadPointer != WritePointer)
	{	
		for(i=0;i<2;i++)
		{
			TempRead[i] = HMICmdBuff[ReadPointer];
			ReadPointer = (ReadPointer+1)%MAX_HMICMD_LEN;
		}
		if(TempRead[0]!=0x68)
		{
			ResetMemPointer(StartAddr);
			return 0;
		}
		if(TempRead[1]>0)
		{
			for(i=0;i<TempRead[1];i++)
			{
				*(pRead+i) = HMICmdBuff[ReadPointer];
				ReadPointer = (ReadPointer+1)%MAX_HMICMD_LEN;
			}
			TempBuff[0] = HIBYTE(ReadPointer);
			TempBuff[1] = LOBYTE(ReadPointer);
			ShareMemWrite(StartAddr, 2, TempBuff);
			return TempRead[1];
		}
		else
		{
			ResetMemPointer(StartAddr);
			return 0;
		}
	}
	return 0;
}

float CtoFHighLow(unsigned char *puc103)//将IEEE格式(4个字节)转换为浮点数
{
	float a;
	unsigned char i, k;
    void *pf;
    
    pf = &a;//指针指向浮点数
    for (i = 0, k = 3; i < 4; i++, k--)
		*((char*)pf + i) = *(puc103 + k);//强制void*指针转成char*,因为void*指针不能运算
	return a;
}

/******************************************************************/
/******************CCITT多项式的CRC校验****************************/
/**************多项式CRC-CCITT = X16 + X12 + X5 + X0***************/
/******************************************************************/
unsigned int CRC_CCITT(unsigned char *ptr, unsigned char len)
{
	unsigned int crc;
	unsigned char da;
	unsigned int crc_ta[256]={ 										/* CRC余式表 */
		0x0000, 0x1021, 0x2042, 0x3063, 0x4084, 0x50a5, 0x60c6, 0x70e7,
			0x8108, 0x9129, 0xa14a, 0xb16b, 0xc18c, 0xd1ad, 0xe1ce, 0xf1ef,
			0x1231, 0x0210, 0x3273, 0x2252, 0x52b5, 0x4294, 0x72f7, 0x62d6,
			0x9339, 0x8318, 0xb37b, 0xa35a, 0xd3bd, 0xc39c, 0xf3ff, 0xe3de,
			0x2462, 0x3443, 0x0420, 0x1401, 0x64e6, 0x74c7, 0x44a4, 0x5485,
			0xa56a, 0xb54b, 0x8528, 0x9509, 0xe5ee, 0xf5cf, 0xc5ac, 0xd58d,
			0x3653, 0x2672, 0x1611, 0x0630, 0x76d7, 0x66f6, 0x5695, 0x46b4,
			0xb75b, 0xa77a, 0x9719, 0x8738, 0xf7df, 0xe7fe, 0xd79d, 0xc7bc,
			0x48c4, 0x58e5, 0x6886, 0x78a7, 0x0840, 0x1861, 0x2802, 0x3823,
			0xc9cc, 0xd9ed, 0xe98e, 0xf9af, 0x8948, 0x9969, 0xa90a, 0xb92b,
			0x5af5, 0x4ad4, 0x7ab7, 0x6a96, 0x1a71, 0x0a50, 0x3a33, 0x2a12,
			0xdbfd, 0xcbdc, 0xfbbf, 0xeb9e, 0x9b79, 0x8b58, 0xbb3b, 0xab1a,
			0x6ca6, 0x7c87, 0x4ce4, 0x5cc5, 0x2c22, 0x3c03, 0x0c60, 0x1c41,
			0xedae, 0xfd8f, 0xcdec, 0xddcd, 0xad2a, 0xbd0b, 0x8d68, 0x9d49,
			0x7e97, 0x6eb6, 0x5ed5, 0x4ef4, 0x3e13, 0x2e32, 0x1e51, 0x0e70,
			0xff9f, 0xefbe, 0xdfdd, 0xcffc, 0xbf1b, 0xaf3a, 0x9f59, 0x8f78,
			0x9188, 0x81a9, 0xb1ca, 0xa1eb, 0xd10c, 0xc12d, 0xf14e, 0xe16f,
			0x1080, 0x00a1, 0x30c2, 0x20e3, 0x5004, 0x4025, 0x7046, 0x6067,
			0x83b9, 0x9398, 0xa3fb, 0xb3da, 0xc33d, 0xd31c, 0xe37f, 0xf35e,
			0x02b1, 0x1290, 0x22f3, 0x32d2, 0x4235, 0x5214, 0x6277, 0x7256,
			0xb5ea, 0xa5cb, 0x95a8, 0x8589, 0xf56e, 0xe54f, 0xd52c, 0xc50d,
			0x34e2, 0x24c3, 0x14a0, 0x0481, 0x7466, 0x6447, 0x5424, 0x4405,
			0xa7db, 0xb7fa, 0x8799, 0x97b8, 0xe75f, 0xf77e, 0xc71d, 0xd73c,
			0x26d3, 0x36f2, 0x0691, 0x16b0, 0x6657, 0x7676, 0x4615, 0x5634,
			0xd94c, 0xc96d, 0xf90e, 0xe92f, 0x99c8, 0x89e9, 0xb98a, 0xa9ab,
			0x5844, 0x4865, 0x7806, 0x6827, 0x18c0, 0x08e1, 0x3882, 0x28a3,
			0xcb7d, 0xdb5c, 0xeb3f, 0xfb1e, 0x8bf9, 0x9bd8, 0xabbb, 0xbb9a,
			0x4a75, 0x5a54, 0x6a37, 0x7a16, 0x0af1, 0x1ad0, 0x2ab3, 0x3a92,
			0xfd2e, 0xed0f, 0xdd6c, 0xcd4d, 0xbdaa, 0xad8b, 0x9de8, 0x8dc9,
			0x7c26, 0x6c07, 0x5c64, 0x4c45, 0x3ca2, 0x2c83, 0x1ce0, 0x0cc1,
			0xef1f, 0xff3e, 0xcf5d, 0xdf7c, 0xaf9b, 0xbfba, 0x8fd9, 0x9ff8,
			0x6e17, 0x7e36, 0x4e55, 0x5e74, 0x2e93, 0x3eb2, 0x0ed1, 0x1ef0
	};
	
	crc=0;
	while(len--!=0)
	{
		da=(unsigned char) (crc/256);	/* 以8位二进制数的形式暂存CRC的高8位 */
		crc<<=8;						/* 左移8位，相当于CRC的低8位乘以 */
		crc^=crc_ta[da^*ptr];			/* 高8位和当前字节相加后再查表求CRC ，再加上以前的CRC */
		ptr++;
	}
	return(crc);
}

short gencrc_16(short i)
{
	short j, k, crc ;
	k= i << 8 ;
	crc = 0 ;
	for ( j=0 ; j<8 ; j++ )
	{
		if ((crc^k) & 0x8000 )
			crc = ( crc << 1 ) ^ 0x1021 ;
		else
			crc <<= 1 ;
		k <<= 1 ;
	}
	return crc ;
}
unsigned int GetCrc16( unsigned int crc , unsigned char c )
{
	return ( (crc << 8 ) ^ gencrc_16((crc >> 8 ) ^ c ) ) ;
}

unsigned int CCITT_CRC(unsigned char *pData, int nLength)
{
	unsigned int uiCrc=0 ;
	int i;
	for ( i = 0 ; i < nLength ; i++ )
		uiCrc = GetCrc16(uiCrc,*(pData+i) ) ;
	return uiCrc ;
}