main.c

PIC18F6520+SIM300做的透明传输的DTU

//
// GPRS data terminal unit
// MPLAB6.30 + C18 2.40.01
// MPLAB7.10 + C18 2.42
//
#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 = ON
#pragma config CP1 = ON
#pragma config CP2 = ON
#pragma config CP3 = ON
#pragma config OSC = HS
#pragma config WDT = OFF				//狗打开，分频比默认1：128，最大延时2304ms
#pragma config LVP = OFF
#pragma config DEBUG = OFF

#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];		//

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

#pragma udata mydata5 =0x0500		//反向无功暂存区
unsigned char WugongTemp[DataLength];

//！！注意用法：#pragma udata access MY_ACS_DATA
//	    	near unsigned char root, square;
//		#pragma udata  /* continue allocating static data in non-access ram */

#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 Address_Length,IndexOfTP_UDL,TP_UDL,IndexOfTP_DCS,TP_DCS,CMGR_CMGD_SIZE,Index0,Index1;
near unsigned char SecCounter,MinCounter,temp1,temp2,temp3;
near unsigned char SMS_CMD,NOAddr,NOLength;
near unsigned char EnergyDataAddr,UDLAddr,UDLLength,SMS_Start,AllLength;
near unsigned char Hour,Minute,CantLinkMin;			//CantLinkMin:不能建立连接一共多少分钟
near unsigned char DTU_Number[4];					//终端号共发三次
near unsigned char Link_Mode[2];
near unsigned char MaxTry;					//最大尝试次数，以便从while(1)死循环中退出
near unsigned char BT;

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;
near volatile unsigned char tEndedCode16H,tEndedCode0DH;				//收到结束符之后的时间		

//*********    位域定义    ***********
near union
{								//用法：if (Flags.Bit.Timeout == 1)
  struct
  {
    unsigned Recving485:1;
    unsigned Recved16H:1;
    unsigned Recved0DH:1;
    unsigned aFrame:1;		//收到电表回送的一帧
    unsigned :4;
  } 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 SysCancel:1;
    unsigned TimerOver:1;
    unsigned TCPLink:1;
	unsigned WS_NowLastE:1;		//WS_NowLastE=0:威胜表取当前电量数据
    unsigned :4;				//WS_NowLastE=1:威胜表取上月电量数据
  } 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 TotalE_Addr;
unsigned char SharpE_Addr;
unsigned char PeakE_Addr;
unsigned char DayE_Addr;
unsigned char LowE_Addr;

// *****************************************************************
//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_CDNSLINK(void);
void LoadCMD_CIPLINK(void);
void LoadCMD_CCLK(void);
void LoadCMD_CDNSCFG(void);
void LoadCMD_CIPDPDP(void);
void LoadCMD_CPOWD(void);
void LoadCMD_CSQ(void);
void LoadCMD_CNUM(void);
void LoadCMD_CIPHEAD(void);
void LoadCMD_CIPSTATUS(void);
void LoadCipstartBuf(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 ClearMeterREG(void);
void ClearGPRSREG(void);
void GenParity(unsigned char DataWillSend);
void CHECKSUM(void);
void SendCMDtoMeter(unsigned char num);
void Proc_SMS(void);
void SMS_Energy(void);
void WS_Energy(void);
void OK_Data(void);
void SendSMS(void);
void WS_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 Proc_TimerOver(void);
void Proc_min(void);
void ConfigInt(void);
void Module_Init(void);
void PowerDownModule(void);
void ResetModule(void);
void SetDateTime(void);
//void ReadDTUNO(void);
void DTUNO2Str(void);
void ReadTime(void);
void ConvertTime(void);
void ConnectDNS(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 ReadDN_IP(void);
void Proc_err(void);
void HanderCMD(void);
void InitPeriph(void);
//void LedOn(void);
void UART1_setup(void);
void UART2_setup(void);
void SendToModule(unsigned int num);
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 SMSText (void);		//移位函数，计算GSM模式下的Dxx

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

#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)		//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();
		}
		
		if(MeterComm.Bit.Recved16H ==1)
		{
			tEndedCode16H++;
			if(tEndedCode16H >= ms200)			//
			{//收到结束符之后，200ms没再接受字节，说明是帧结尾
				MeterComm.Bit.aFrame = 1;
				MeterComm.Bit.Recved16H = 0;
				tEndedCode16H = 0;
			}
		}//END of if(Recved16H ==1 || Recved0DH ==1)
		else if(MeterComm.Bit.Recved0DH == 1)
		{
			tEndedCode0DH++;
			if(tEndedCode0DH >= ms200)			//
			{//收到结束符之后，200ms没再接受字节，说明是帧结尾
				MeterComm.Bit.aFrame = 1;
				MeterComm.Bit.Recved0DH = 0;
				tEndedCode0DH = 0;
			}
		}
  }//END if(PIR1bits.TMR1IF)
  
// -------------------------------------------------------------
// 在这里处理从电表收到的应答。
  if(PIR1bits.RC1IF)		//串口 1 与电表连接，加超时处理
  {							//1200bps，8，E
  	RevTemp = RCREG1;		//读RCREG1清PIR1bits.RCIF
	BUF_METER[ByteReceived]=RevTemp;
	ByteReceived++;
	tEndedCode16H = 0;
	tEndedCode0DH = 0;
	OverTimeMeter = 0;	//清零防止接收超时

	if(RevTemp == 0x16)	MeterComm.Bit.Recved16H = 1;
	else if(RevTemp == _CR)	MeterComm.Bit.Recved0DH = 1;
	else 
	{
		MeterComm.Bit.Recved16H = 0;
		MeterComm.Bit.Recved0DH = 0;
	}
  }//END if(PIR1bits.RCIF)

//--------------------------------------------------
  if(PIR3bits.RC2IF)		//串口 2 与module连接
  {							//9600bps，8，N
  	RevTemp = RCREG2;			//读RCREG2清PIR3bits.RCIF
	OverTimeGPRS = 0;
	if(ByteRecvUART2>240)
		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 if(RevTemp == _CR && ByteRecvUART2 == 0x01)	//连续收到两个回车
	{//在发送ate0之前，echo回来的命令以回车结束
		Nop();		//同样的回车不用存，直接退出就行了
	}
//已收到CR 起始符
	else
	{
		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 ;
		  }
		}//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;
		}//END of if(Flags.Bit.RecvGPRS == 1)
	}//END of else
  }//END if(PIR3bits.RCIF)
}//END void INT_Procedure (void)


void main (void) 
{
  unsigned char *p;
  near unsigned int ClearNum;
  
  PassSeconds(5);
  p = 0000;
  if(PWRUP55AA != 0x55AA)
  {
  	for(ClearNum = 0x5FF;ClearNum>0;ClearNum--) 	
  	{
 		*p = 0;
		p ++;
  	}
  }
  InitPeriph();
  UART1_setup ();
  UART2_setup ();
  Timer1_setup();
  ConfigInt();				//中断配置

//read parameters from eeprom  
	R_eeprom((char *)Link_Mode,LinkMode,2);
//read heart beating's time	
	EEADRH = 0x00;
	EEADR = lobyte(BeatTime);
	EECON1bits.EEPGD = 0;	// Point to DATA memory
	EECON1bits.CFGS = 0;
	INTCONbits.GIE = 0; 

	EECON1bits.RD = 1;
	BT = EEDATA;
	if(BT > 60)
		BT = 15;

	INTCONbits.GIE = 1; 
//
  if(PWRUP55AA != 0x55AA)
  {
	for(k=80;k>0;k--) 	//延时16秒
  	{
 		delay200ms ();
  	}
 	Module_Init();
 	PWRUP55AA = 0x55AA;
  }
  T1DELAY = T1_TICK;
  t1use = OneMinute;

//  Read DTU NO
	R_eeprom((char *)DTU_Number,DTUNO,4);
  	ReadTime();
  while(1)
  {
	CLRWDT();
	SoftDog = 0x00;
	
	if(OtherFlags.Bit.TimerOver == 0x01)		//到定时的时间？
	{
	  Proc_TimerOver();
	}

// ------------------------------------------------------------    
	if(ModulFlags.Bit.EchoModule)
	{
  	  	if(strncmppgm2ram((char *)RecvFromMS,(const far rom char *)CLOSED,L_CLOSED) == 0)
	  	{//主站因故断了连接，关闭即可
			OtherFlags.Bit.TCPLink = 0;
			Close_Shut();
	  		ModulFlags.Bit.EchoModule = 0 ;
   	  		ByteRecvUART2 = 0;
			ClearGPRSREG();
////!!!			OtherFlags.Bit.SysCancel = 1;
	  	}//END of if(cRet == 0)
// ------------------------------------------------------------    
//比较收到的是否短信通知 +CMTI: 	  
		else if(strncmppgm2ram((char *)RecvFromMS,(const far rom char *)PLUSCMTI,L_PLUSCMTI) == 0)
  	  	{
  	    	Proc_SMS();
			ModulFlags.Bit.EchoModule = 0 ;
  			ByteRecvUART2 = 0;
  	  	}
		else if(strncmppgm2ram((char *)RecvFromMS,(const far rom char *)Module_RDY,RDY_SIZE) == 0)
  	  	{//对module进行了复位
 			Module_Init();	//只复位不掉电，module是否还是UCS编码？
			ClearGPRSREG();
  	  	}
		else if(strncmppgm2ram((char *)RecvFromMS,(const far rom char *)PDP_DEACT,L_DEACT) == 0)
  	  	{//module主动上报:与网络失去连接.
			OtherFlags.Bit.TCPLink = 0;
  			LoadCMD_CIPSHUT();
  			WaitReturn = 0;
  			SendToModule (CIPSHUT_SIZE);
			DelaySeconds(8);
//
			ResetModule();
			Module_Init();
			ClearGPRSREG();
  	  	}
		else if(strncmppgm2ram((char *)RecvFromMS,(const far rom char *)ANS_ERROR513,L_ERROR513) == 0)
		{//有未读短信	
			LoadCMD_CMGR();		//读所有未读信息
			WaitReturn = 0;
			SendToModule (CMGL_SIZE);
			DelaySeconds(4);
			ClearGPRSREG();
			
			Index1 = _CR;
			for(k=1;k<10;k++)
			{
				Index0 = k +0x30;	//删除1~9条短信
				LoadCMD_CMGD();
				WaitReturn = 0;
 				SendToModule (CMGL_SIZE);
				DelaySeconds(4);