main.c

ARM_LPC2194 对GSM模块进行控制的源代码程序

/****************************************************************************
* 文 件名：main.c
* 功   能：使用串口UART0接收上位机发送的数据，当接收到8个连续数据后，将接收计数值加一后输
*          出LED1--LED8显示，并将数据原封不动地发送回上位机。
* 说   明：将跳线器JP23全部短接。
*          通讯波特率115200，8位数据位，1位停止位，无奇偶校验。
*          中断服务程序不响应单字节发送累计至8 Bytes的情况，所以PC机必须连续发送8 Bytes。
****************************************************************************/
#include  "config.h" 
#include <string.h>
#include <stdio.h>
#define  UART_BPS	9600			// 定义通讯波特率

uint8  rcv_buf[100];          // UART0数据接收缓冲区
int re_count=0;
volatile uint8  rcv_new;    // 接收新数据标志

char   STR_AT[] = "AT\r\n";
char   STR_ATE[] = "ATE\r\n";
char   STR_CNMI[] = "AT+CNMI=1,1,0,0,1\r\n";
char   STR_CMGF[] = "AT+CMGF=0\r\n";


/****************************************************************************
* 名    称：UART0_SendByte()
* 功    能：向串口发送字节数据，并等待发送完毕。
* 入口参数：data		要发送的数据
* 出口参数：无
****************************************************************************/
void  UART0_SendByte(char data)
{  
    U0THR = data;				    	// 发送数据
    while( (U0LSR&0x40)==0 );	    	// 等待数据发送完毕
}

/****************************************************************************
* 名    称：UART0_SendStr()
* 功    能：向串口发送一字符串
* 入口参数：srt		要发送的字符串的指针
* 出口参数：无
****************************************************************************/
void  UART0_SendStr(char  *str)
{  
    while(1)
    {  
        if( *str == '\0' ) break;
        UART0_SendByte(*str++);	    	// 发送数据
    }
}
    
/****************************************************************************
* 名    称：IRQ_UART0()
* 功    能：串口UART0接收中断。
* 入口参数：无
* 出口参数：无
****************************************************************************/
void   __irq IRQ_UART0(void)
{  
     
    if( 0x04==(U0IIR&0x0F) ) rcv_new = 1;	// 设置接收到新的数据标志

     rcv_buf[re_count] = U0RBR;              	// 读取FIFO的数据，并清除中断标志
      re_count++;
    VICVectAddr = 0x00;              		// 中断处理结束
 
}               
      
                               
void  UART0_Init(void)
{   uint16 Fdiv;

    PINSEL0 = 0x00000005;		    // 设置I/O连接到UART0
    U0LCR = 0x83;						// DLAB = 1，可设置波特率
    Fdiv = (Fpclk / 16) / UART_BPS;		// 设置波特率
    U0DLM = Fdiv / 256;							
    U0DLL = Fdiv % 256;						
    U0LCR = 0x03;
    
    U0FCR = 0x01;                        	// 使能FIFO，并设置触发点为8字节
    U0IER = 0x01;                        	// 允许RBR中断，即接收中断
    
    
        /* 设置中断允许 */
    VICIntSelect = 0x00000000;           	// 设置所有通道为IRQ中断
    VICVectCntl0 = 0x26;        			// UART0中断通道分配到IRQ slot 0，即优先级最高
    VICVectAddr0 = (int)IRQ_UART0;       	// 设置UART0向量地址
    VICIntEnable = 0x00000040;           	// 使能UART0中断
}	
    
void sleep(int time)
{
  int i,j;
  for(i=0;i<=time;i++) 
  for(j=0;j<=5000;j++);   
} 















int EncodeNumber(char* pSrc, char* pDst, int nSrcLength)
{
	int nDstLength,i;		
	char ch;			
	nDstLength = nSrcLength;
	for(i=0; i<nSrcLength;i+=2)
	{
		ch = *pSrc++;		
		*pDst++ = *pSrc++;	
		*pDst++ = ch;		
	}

	if(nSrcLength & 1)
	{
		*(pDst-2) = 'F';	
		nDstLength++;		
	}
	*pDst = '\0';
	return nDstLength;
}


 void Memcpy(char* pDst,char* pSrc, int nSrcLength)
 {
       int i;
       for(i=0;i<nSrcLength;i++)
 		*pDst++ = *pSrc++;
 }    


int EncodeEnglish( char* psrc, char* pdes)
{
       int	i,j,len;
       int	cur;
       char t[20];
       len=strlen(psrc);   //j 用于移位计数
	    i=0;
	    j=0;

       while ( i<len )
       {
	  if (i<len-1)         //数据变换
	    cur=(  (psrc[i]) >> j)  | (((psrc[i+1]) << (7-j)) & 0xff) ;
          else
	  cur=((psrc[i]) >> j) & 0x7f;
	  sprintf(t,"%2.2X",cur);
	  strcat(pdes,t);
	  i++;
	  j=(j+1) %7;    //移位计数达到7位的特别处理
          if (j==0 ) i++;
      }  
      
	  return(len);
}


int sendMessage(char *CenterNumber,char *Sendnumber,char *Senddata)
{
char  userData[100],num_len[10], message_len[10],UserData_len[4], num_type[10];
char  smshead[100],smsdata[100];
int    CalledNumLen,str_len,var_len;
char Encode_CenterNumber[20], Encode_Sendnumber[20];


   CalledNumLen=strlen(Sendnumber);

   memset(smshead,0,100);
   memset(userData,0,100);
   memset(smsdata,0,100);  
    
   if (CalledNumLen>11)
   {
     num_type[0] ='9';
     num_type[1] ='1';
   }
   else
   {
     num_type[0] ='A';
     num_type[1] ='1'; 
   }
     sprintf(num_len,"%2.2X",CalledNumLen);


     var_len=0;
     str_len=4;     
     Memcpy(smshead+var_len,"0891",str_len);
     
     
     var_len=4;
     str_len= EncodeNumber(CenterNumber,Encode_CenterNumber,strlen(CenterNumber) );
     Memcpy(smshead+var_len,Encode_CenterNumber, str_len);   
    
      
     var_len=var_len+str_len; 
     str_len=4;
     Memcpy(smshead+var_len,"1100",str_len);
     
     
     var_len=var_len+str_len; 
     str_len=2;
     Memcpy(smshead+var_len,num_len,str_len);
     
     
     var_len=var_len+str_len; 
     str_len=2;
     Memcpy(smshead+var_len,num_type,str_len); 
     
     var_len=var_len+str_len; 
     str_len= EncodeNumber(Sendnumber,Encode_Sendnumber,strlen(Sendnumber) );
     Memcpy(smshead+var_len,Encode_Sendnumber, str_len);    
     
   
     var_len=var_len+str_len; 
     str_len=6;
     Memcpy(smshead+var_len,"000090", str_len);    


   
     EncodeEnglish(Senddata,userData);

     str_len=strlen(userData);
     sprintf(UserData_len,"%2.2X",str_len/2);


     strcat(smsdata,smshead);
     strcat(smsdata,UserData_len);
     strcat(smsdata,userData);
    
     sprintf(message_len,"AT+CMGS=%d\r\n",(strlen(smsdata)-18)/2);
     
     
     UART0_SendStr(message_len);   
     sleep(200);
     UART0_SendStr(smsdata);    
     
     UART0_SendByte(0x1A);
     UART0_SendByte(0x0D);
     UART0_SendByte(0x0A);
}

     
/****************************************************************************
* 名    称：main()
* 功    能：初始化串口，并等待接收到串口数据。
****************************************************************************/
int  main(void)
{   

char *CenterNumber="8613800760500\0";
char *Sendnumber="13425511775\0";
char *send_d="66666\0";

    IRQEnable();
    rcv_new = 0;                         	// 接收标志为0

    UART0_Init();        	// 初始化串口模式
  
     //UART0_SendStr(STR_ATE);   
    // UART0_SendStr(STR_AT);    
   //   sleep(300);
       
   //  UART0_SendStr(STR_CNMI); 
   //    sleep(300);      
  //   UART0_SendStr(STR_CMGF); 
       sleep(300);
                    
   sendMessage(CenterNumber,Sendnumber,send_d);   
    while(1)             					// 等待中断
    { 
        if(1==rcv_new)  					// 是否已经接收到8 Bytes的数据
        {  
           rcv_new = 0;       				// 清除标志
           
           if (re_count>88) 
           re_count=0; 
          //  rcv_buf[re_count] 
               			       
        }
    }
    return(0);
}