main12.c

透明传输的DTU。实现配置：microchip 18F6520,协议DL/T645。 全部C源码文件。

/* **************************************************
3.14	改为透传
3.15	Line 1583 delay4ms()删除，加快发给模块速度
3.19	powerkey 上电之后延时过短（40s）会导致cipstart不能连接。
		不使用透传，改回成AT命令模式发送
		发完at+cipsend=xx之后，必须等待大于号的应答
		加上对send ok 的判断。
5。29	最新版和小庄带到厦门的手工版只有在线灯的改变，只在FuntionPin.h中改动了。		
6.6     庄添加：目的：实现信号强度灯指示
        1.屏蔽掉所有信号强度灯操作；
        2.在proc_min中加读信号强度；
		3.在proc_timeover中加信号强度灯的亮暗设置
		4.在主循环while(1)之前加信号强度读取
6.16    删除SoftDog,移动初上电55AA里的语句
6.19    掌机设置终端号的协议解释里加了个ConnectIP(),目的:让后台原来连接的终端号断线,让新设的终端号上线		
6.21	增加采集器对掌机的485端口检查命令的应答（原来只有红外）
*/
// GPRS data terminal unit
// MPLAB6.30 + C18 2.40.01
// MPLAB7.10 + C18 2.42
// MPLAB7.50 + C18 3.04
//
#include <p18f6520.h>  /* for the special function register declarations */
#include <usart.h> 
#include <string.h> 
#include <ctype.h>
#include "Parameters.h"
#include "always.h"
#include "delay.h"
#include "FuntionPin.h"

#pragma config CP0 = OFF
#pragma config CP1 = OFF
#pragma config CP2 = OFF
#pragma config CP3 = OFF
#pragma config OSC = HS
#pragma config WDT = OFF				//狗打开，分频比默认1：128，最大延时2304ms
#pragma config LVP = OFF
#pragma config DEBUG = ON

#pragma udata mydata2 =0x0200		//初始化了的数据放到idata
unsigned char RecvFromMS[240];		//AT+CMGR的回送最长142,再加上port=2020(9x4=36)
unsigned char MeterNumber[6];
unsigned char delayus_variable;
unsigned char WaitReturn;		//=0:发送的是初始化帧，接受到除了起始符外的回车即收到一帧
								//=3:发送的是cipstart,需要接收3个回车，相当于两帧
								//=4:发送的是cmgr,需要接收4个回车，相当于3帧

#pragma udata mydata3 =0x0300
//每一个section的空间不能超过256个，利用对数组的初始化就可以把它定义到别的section。
unsigned char BUF_METER[256];		//只作为从485接口接受数据的缓冲区

#pragma udata mydata4 =0x0400		//短信数据
//短信最长140+15=155（还有一个长度字节，则数组定义为156）
unsigned char SMS_Return[DataLength];
//18F6520:2kRAM,最大到7FFH

#pragma udata mydata5 =0x0500
//接收到的主站命令，提取出来放到此处
unsigned char YC_CMD_BUF[250];

#pragma udata mydata7 =0x0700
unsigned char SMS_CMD_BUF[50];							//接收到的主站命令，提取出来放到此处
//unsigned char APN[16];

#pragma udata access my_access							//放入ACCESS BANK
//定义一个数组存储发送数据
near unsigned char k,j,tt,cRet,DataAddr,parity;
near unsigned char LengthCipstart,LengthCipsend,LengthBUF2,LengthIPDNS;
near unsigned char dLength,tempArr[3];
near unsigned char SecCounter,MinCounter,temp1,temp2,temp3,temp4,LampDelay,SigQua,bitFL;
near unsigned char SMS_CMD,NOAddr,NOLength;
near unsigned char EnergyDataAddr,UDLAddr,UDLLength,SMS_Start,AllLength;
near unsigned char Date,Hour,Minute,Second,CantLinkMin;		//CantLinkMin:不能建立连接一共多少分钟
near unsigned char MaxTry;								//最大尝试次数，以便从while(1)死循环中退出
near unsigned char BUFFER_ID,OnLineTime,MetersNum;
near unsigned char IrTX9D,Ir_ByteToSend;			//红外发送第九位

near volatile unsigned int SoftDog;
near volatile unsigned int T1DELAY;
near volatile unsigned char ReceivedReturn,ByteReceived,ByteRecvUART2;
near volatile unsigned char RevTemp,IPDHead,Length;
near volatile unsigned char CMDLengthLow,CMDLengthHigh;
//   !!!!!!!! 满了！FULL!!!!!!          

//*********    位域定义    ***********
near union
{														//用法：if (Flags.Bit.Timeout == 1)
  struct
  {
//    unsigned isIr:1;			//是红外通讯
    unsigned aFrame:1;			//收到电表回送的一帧
    unsigned RecvMeter:1;
    unsigned :6;
  } Bit;
  unsigned char Comm1Byte;
} MeterComm;
near union
{								//用法：if (Flags.Bit.Timeout == 1)
  struct
  {
    unsigned RecvGPRS:1;		//收到主站从GPRS信道传过来的命令
    unsigned RecvUART2:1;
    unsigned CMD_Frame:1;		//收到主站的命令帧
    unsigned :5;
  } Bit;
  unsigned char Comm2Byte;
} GPRSComm;
near union
{		
  struct
  {
    unsigned RecvEcho:1;		//收到module的应答 or 主动上报的状态
    unsigned EchoModule:1;		//module应答完毕
	unsigned CMGSSent:1;		//是发送短信
    unsigned :5;
  } Bit;
  unsigned char ModuleBYTE;
} ModulFlags;

near union
{		
  struct
  {
    unsigned TimerOver:1;
    unsigned TCPLink:1;
    unsigned :6;
  } Bit;
  unsigned char FlagsByte;
} OtherFlags;

#pragma udata my_data1 = 0x0100
unsigned char TranToMS[DataLength];

#pragma udata datatest = 0x0060
unsigned char Text1,Text2,Text3;
unsigned char DepNOLow,DepNOHigh;
unsigned int RWDTemp;
unsigned int OverTimeMeter,OverTimeGPRS;
unsigned int cMinute,t1use,PWRUP55AA;
unsigned long EnergyValue=0,LeftLong=0,MidLong=0;
unsigned long LargeValueHigh=0,LargeValueLow=0;
unsigned char NowPosition;
unsigned char EnergyOfMonth;
unsigned char Ip_start_buf2[MaxDNSIPSize];
unsigned char EnergyData[4],EnergyDataUCS2[36];
unsigned char PortNO[4];
unsigned char LeftedMoney[4];
unsigned char MeterNO[6];
unsigned char TotalE_Addr;
unsigned char SharpE_Addr;
unsigned char PeakE_Addr;
unsigned char DayE_Addr;
unsigned char LowE_Addr;
unsigned char invE_Addr;
unsigned char leftedM_Addr;
unsigned char Address_Length,IndexOfTP_UDL,TP_UDL,IndexOfTP_DCS,TP_DCS,CMGR_CMGD_SIZE;

unsigned char DTU_Number[4],Index0,Index1;
unsigned char TxData,RxData;
unsigned char Link_Mode[2];
unsigned char BT;


// *****************************************************************
//funtion prototype
void INT_Procedure (void);   /* prototype needed for 'goto' below */

void LoadCMD_AT(void);
void LoadCMD_CSCS(void);
void LoadCMD_ATE0(void);
void LoadCMD_CIPSPRT(void);
void LoadCMD_CREG(void);
void LoadCMD_CREGAsk(void);
void LoadCMD_CCLK(void);
void LoadCMD_CSQ(void);
void LoadCMD_CNUM(void);
void LoadCMD_CIPHEAD(void);
void LoadCMD_CIPSTATUS(void);
void LoadCipstartBuf(void);
void LoadCMD_ATO(void);
void LoadCMD_CIPSEND(void);
void LoadCMD_CMGS(void);
void LoadCMD_CIPCLOSE(void);
void LoadCMD_CIPSHUT(void);
void LoadCMD_CMGR(void);
void LoadCMD_CMGD(void);
void LoadCMD_CMGL(void);
void LoadCMD_CIICR(void);
void LoadCMD_CIFSR(void);

void ThreeCommand(void);
void ClearMeterREG(void);
void ClearGPRSREG(void);
void GenParity(unsigned char DataWillSend);
void CHECKSUM(void);
void YC_CHECKSUM(void);
void TT_CHECKSUM(void);
void SMS_CHECKSUM(void);
void SendCMDtoMeter(unsigned char num);
void ReturnDataToHander(unsigned char num);
void Proc_SMS(void);
void SMS_Energy(void);
void OK_Data(void);
void SendSMS(void);
void HandleData(unsigned char ei);
void ConvertToUCS2(void);
void TimeDataToUCS2(void);
void ASC2B(void);
void B2ASC(void);
void Load645Header(void);
void ErrorMSG(void);

void Timer1_setup(void);
void PWM_setup(void);
void Proc_TimerOver(void);
void Proc_min(void);
void ConfigInt(void);
void SendBeatPack(void);
void FirstTimeInitial(void);
void Module_Init(void);
void PowerOnModule(void);
void PowerOffModule(void);
void PWRKeyOn(void);
void PWRKeyOff(void);

void SetDateTime(void);
void DTUNO2Str(void);
void ReadTime(void);
void ConvertTime(void);
void ConnectIP(void);
void ReInitial(void);
void Close_Shut(void);
void SendDTUNO(void);
void CMDtoDTU(void);

void W_eeprom(char *pData,unsigned int addr,unsigned char DataLen);
void R_eeprom(char *pData,unsigned int addr,unsigned char Datalen);
void Read_IP(void);
void Read_APN(void);
void HanderCMD(void);
void InitPeriph(void);
//void LedOn(void);
void UART1_setup(void);
void UART2_setup(void);
void SPI_setup(void);
void SPIRX(unsigned int sAddr,unsigned char *DestAddr,unsigned char rCount);
void SPIDX(unsigned char TrData);
void SendToModule(unsigned int num);
void Proc_0HourData(void);
void UploadData(void);

void DelaySeconds(unsigned char cSec);
void PassSeconds(unsigned char PSec);

/* delay10ms is found in an assembly file */
extern void delay4ms (void);
extern void delay10ms (void);
extern void delay20ms (void);
extern void delay50ms (void);
extern void delay200ms (void);

extern void RB0INT (void);		//外部中断:红外接收
extern void SendByte (void);	//红外单字节发送

// ************************************************************************

#pragma code LOW_INTERRUPT_VECTOR = 0x08
void low_ISR (void) 
{
  _asm
    goto INT_Procedure
  _endasm
}

#pragma code  /* allow the linker to locate the remaining code */

//*************   中断处理程序   ****************
#pragma interrupt INT_Procedure
void INT_Procedure (void) 
{
  volatile unsigned char tLength,arr;
  if(PIR1bits.TMR1IF == 1)		//50ms中断一次
  { 
	T1CONbits.TMR1ON = 0;	//关闭TMR1
	TMR1H = hibyte(T1DELAY);
	TMR1L = lobyte(T1DELAY);	

	T1CONbits.TMR1ON = 1;	//启动TMR1
  	PIR1bits.TMR1IF = 0;
	OtherFlags.Bit.TimerOver = 1;
/*
	SoftDog += 1;			//50ms增1
	if(SoftDog > 2000)		//2000 * 50ms =100秒
	{
		SoftDog = 0x00;
		RESET();
	}
*/
  }//END if(PIR1bits.TMR1IF)

	if(INTCONbits.INT0IF == 1)	//红外接收起始位触发下降沿中断
	{
       RB0INT();
	}
  
// -------------------------------------------------------------
// 在这里处理从电表收到的应答。
  if(PIR1bits.RC1IF == 1 || INTCONbits.INT0IF == 1)		//串口 1 与电表连接，加超时处理
  {							//1200bps，8，E
	if(PIR1bits.RC1IF == 1)
  		RevTemp = RCREG1;		//读RCREG1清PIR1bits.RCIF
	else
//如果是INTCONbits.INT0IF == 1,RevTemp就已被赋值
		INTCONbits.INT0IF = 0;
	OverTimeMeter = 0;	//清零防止接收超时

//*******************************************************
//   	BUF_METER[ByteReceived]=RevTemp;
//   	ByteReceived++;
//*******************************************************
	if(MeterComm.Bit.RecvMeter == 0)
	{//未收到68H
		
		if(RevTemp == 0x68)
		  MeterComm.Bit.RecvMeter = 1;
		else
		  return;
	}
// 读出接收到的第9位数据
//  	if(RCSTA1bits.RX9D==1)
//  	  MeterComm.Bit.RX9D_copy=1;
//  	else
//  	  MeterComm.Bit.RX9D_copy=0;
  
// 计算偶校验位，与RX9D_copy比较 ......
// 清除OERR
	RCSTA1bits.OERR=0;
	if(ByteReceived<=9)
	{  
	  switch (ByteReceived)
    	  {
      		case 0:
      		case 7:
				if(RevTemp==0x68)
	     	  	{  
	     	  		BUF_METER[ByteReceived]=RevTemp;
	     	     	ByteReceived++;
	     	  	}
                break;

      		case 8:
					BUF_METER[ByteReceived]=RevTemp;	
	     	   		ByteReceived++;
                break;
      		case 9:
				if(RevTemp > DataLength)	//大于最大长度
                {
		     		ByteReceived = 0;
                    break;
		  		}
		  //否则往下执行
      		default:  
		  		BUF_METER[ByteReceived]=RevTemp;
		  		ByteReceived++;
                break;
    	  }//end switch  
	}//end if(ByteReceived<=9)
	else
	{  
		arr=BUF_METER[9]+11;		//DI0,DI1记入长度L
	   	if(ByteReceived == arr)
	   	{
	   		if(RevTemp == 0x16)
	   		{  
	   	   		BUF_METER[ByteReceived] = RevTemp;
				MeterComm.Bit.aFrame = 1;
	     		ByteReceived++;
	   		}
			else
	   		{  
				ByteReceived = 0;
		  		MeterComm.Bit.RecvMeter = 0;
	   		}
	   }
	   else
	   {
	     	BUF_METER[ByteReceived]=RevTemp;
	     	ByteReceived++;
	   }
	}
  }//END if(PIR1bits.RC1IF == 1 || INTCONbits.INT0IF == 1)

//--------------------------------------------------
  if(PIR3bits.RC2IF == 1)		//串口 2 与module连接
  {							//9600bps，8，N
  	RevTemp = RCREG2;			//读RCREG2清PIR3bits.RCIF
	OverTimeGPRS = 0;
	if(ByteRecvUART2>250)
		ByteRecvUART2 = 0;
	
	if(GPRSComm.Bit.RecvUART2 == 0x00)
	{				//未收到起始符:0D 或 ＋
		if(RevTemp == _CR)
		{
		  ModulFlags.Bit.RecvEcho = 1 ;
		  GPRSComm.Bit.RecvUART2 = 1;
		  RecvFromMS[ByteRecvUART2]=RevTemp;
	 	  ByteRecvUART2++;
		}
		else if(RevTemp == _PLUS)	//＋:远端（主站）发来的命令前导符
		{
		  GPRSComm.Bit.RecvGPRS = 1 ;
		  GPRSComm.Bit.RecvUART2 = 1;
		  RecvFromMS[ByteRecvUART2]=RevTemp;
	 	  ByteRecvUART2++;
		}
		else
		  return;
	}
	else			//已收到起始符:0D 或 ＋
	{
		RecvFromMS[ByteRecvUART2]=RevTemp;
		ByteRecvUART2++;

		if(ModulFlags.Bit.RecvEcho == 0x01)
		{
		  if(ModulFlags.Bit.CMGSSent == 0x01)	//发送短信
		  {
		  	if(RevTemp == _SPACE)
		  		ModulFlags.Bit.EchoModule = 1;
		  }
		  if(RevTemp == _CR)
		  {
		  	if(WaitReturn == 0x03)
		  	{
		  		ReceivedReturn++;
		  		if(ReceivedReturn == 0x03) 
				{
		  	  		ModulFlags.Bit.EchoModule = 1 ;
			  		ReceivedReturn = 0;
				}
		  	}
		  	else if(WaitReturn == 0x04)
		  	{
		  		ReceivedReturn++;
		  		if(ReceivedReturn == 0x04) 
				{
		  	  		ModulFlags.Bit.EchoModule = 1 ;
			  		ReceivedReturn = 0;
				}
		  	}
		  	else ModulFlags.Bit.EchoModule = 1 ;	//WaitReturn = 2的情况在这处理
		  }
		}//END of if(Flags.Bit.RecvEcho == 1)
//=+:远端（主站）数据
		if(GPRSComm.Bit.RecvGPRS == 0x01)
		{
//从前导+IPDxx:_SPACE取出xx
		  if(RevTemp == _COLON && ByteRecvUART2 >4  && ByteRecvUART2 <8)	
//收到：后就可以取出长度
		  {
				CMDLengthLow = RecvFromMS[ByteRecvUART2-2];
				CMDLengthLow -= 0x30;		//字符转成数字
				if(RecvFromMS[ByteRecvUART2-3] == _D)	// || RecvFromMS[ByteRecvUART2-2] == _d)
				{
	  				Length = CMDLengthLow;
				}
				else
				{
					CMDLengthHigh = RecvFromMS[ByteRecvUART2-3];
	  				CMDLengthHigh -= 0x30;
					tLength = CMDLengthHigh;
//转换成10进制:Length = CMDLengthHigh*10+CMDLengthLow
	  				Length = tLength <<3;
	  				Length = Length + CMDLengthHigh + CMDLengthHigh + CMDLengthLow;
					
				}
				IPDHead = ByteRecvUART2;
		  }//BED of if(RevTemp == _COLON && ByteRecvUART2 >4  && ByteRecvUART2 <8)	
	  	  if(ByteRecvUART2 == IPDHead + Length)//+IPDxx:FE.. 68 NO 68 CMD L CHECKSUM 16
	  	  {
				GPRSComm.Bit.CMD_Frame = 1;
				//SignalLed = HIGH;			//关闭信号强度灯
		  }
		}//END of if(Flags.Bit.RecvGPRS == 1)
	}//END of else
  }//END if(PIR3bits.RCIF)
}//END void INT_Procedure (void)

void Load_SigQua(void)   //信号强度读取：庄
{
   	LoadCMD_CSQ();
	SendToModule (CSQ_SIZE);
	DelaySeconds(2);
	temp4=((RecvFromMS[8]-0x30)*10+(RecvFromMS[9]-0x30))/7;
    if(ModulFlags.Bit.EchoModule == 1)  
    {
		if(temp4!=SigQua)
		{
     		SigQua=temp4;
      		LampDelay=0;
      		if(SigQua==0)
      		{
      	    	bitFL=1;  //从暗开始
      			SignalLed=CLOSE;
      		}
      		else 
      		{
      			bitFL=0;
      			SignalLed=LIGHT;
      		}
		}	
     }
	else 
	{
		SigQua=0;    //GPRS模块未响应时灯暗
 		SignalLed=CLOSE;
	}
 	ModulFlags.Bit.EchoModule = 0 ;
  	ByteRecvUART2 = 0;
}

void main (void) 
{
  unsigned char *p;
  near unsigned int ClearNum;
  temp4=0;        //增加信号强度部分 :庄
  SigQua=0;
  LampDelay=0;
  bitFL=1;