单片机实现短信自动发送

进行短信发送的前提是短信内容的正确编码。经过以上对短信发送过程的分析，可以通过单片机对其进行实现。下面是实现程序例程：

/*-------------------------------------------------------------------------

函数名：PDU_SMS()

功能 ：发送短信

参数说明：SMS_Center为短信中心号码 11位

SMS_Telenum为短信接收方的号码 11位

SMS_Context为短信的内容

--------------------------------------------------------------------------------*/

int PDU_SMS(char *SMS_Center, char *SMS_Telenum, 

char *SMS_Context,char is_GB)

{

int i,j;

unsigned char len,time;

char lens[3];

time=0;

for(i=0;i<300;i++) PDU_Code[i]=PDU_t[i];

/*----------设置短信中心号码--------------*/

for (i = 0, j = 0; i < strlen(SMS_Center) / 2; i++)

{

PDU_Code[6+(j++)] = SMS_Center[2 *i + 1];

PDU_Code[6+(j++)] = SMS_Center[2 *i];

}

PDU_Code[6+j++] = 'F'; //在最后补上的F

PDU_Code[6+j] = SMS_Center[strlen(SMS_Center) - 1];

/*---------------------------------------------*/

/*----------设置接收号码--------------*/

for (i = 0, j = 0; i < strlen(SMS_Telenum) / 2; i++)

{

PDU_Code[26+(j++)] = SMS_Telenum[2 *i + 1];

PDU_Code[26+(j++)] = SMS_Telenum[2 *i];

}

PDU_Code[26+j++] = 'F';

PDU_Code[26+j] = SMS_Telenum[strlen(SMS_Telenum) - 1];

/*---------------------------------------------*/

/*----------设置短信内容长度--------------*/

if(is_GB==0)

len = strlen(SMS_Context) *2;

else

len = strlen(SMS_Context);



PDU_Code[44] = (len >> 4) > 9 ? (len >> 4) + 55: (len >> 4) + 48;

PDU_Code[45] = (len &0x0f) > 9 ? (len &0x0f) + 55: (len &0x0f) + 48;

/*---------------------------------------------*/



/*----------编码短信内容--------------*/

if(is_GB==0)//如果不是GB码，短信内容为ascii码字符串

{

for (i = 0,j=0; i<strlen(SMS_Context);i++)

{

szzh16(SMS_Context[j++],lens);

PDU_Code[46+i*4] = '0';

PDU_Code[46+i*4+1] = '0';

PDU_Code[46+i*4+2] = lens[0];

PDU_Code[46+i*4+3] = lens[1];

}

PDU_Code[46+i*4] = 0x1a;

PDU_Code[46+i*4+1] = 0xff; 

}

else 

//短信内容为GB码，如果要使手机能够显示，改到UNICODE编码

{

for (i = 0,j=0; i<strlen(SMS_Context);i++)

{

szzh16((int)SMS_Context[j++],lens);

PDU_Code[46+i*2] = lens[0];

PDU_Code[46+i*2+1] = lens[1];

}

PDU_Code[46+i*2] = 0x1a;

PDU_Code[46+i*2+1] = 0xff; 

}

/*---------------------------------------------*/

if(PDU_HandShake())

{

do

{

//LCD_PutChn(5,96,"SS...");

//if(is_GB)

PDU_EnablePDU();

if(is_GB==0)

PDU_SetLength(Strlen(SMS_Context)*2);

else

PDU_SetLength(Strlen(SMS_Context));

PDU_Send(PDU_Code);

//LCD_PutEng(5,96,"SS");

for(i=0;i<25;i++)

delay(20000); 

sbuf[counter]=0;

//LCD_PutNum16(5,96,time);

counter=0;

time++;

}

//判断是否发送成功，如果不成功继续发送，最多4次，如仍不成功，返回0

while(strpos(sbuf+strlen(sbuf)-20,'G')==-1&&time<4);



if(strpos(sbuf+strlen(sbuf)-20,'G')==-1)

return 0;

else

return 1; //成功的话返回0

}

else

{

//LCD_PutEng(5,96,"LL");

sbuf[counter]=0;

//LCD_PutEng(0,0,sbuf);

counter=0;

return 0;

}

}

以上程序成功实现短信的发送，其中的一些函数限于篇幅可自行实现。

（6）单片机对短信的读取与解码

单片机可以通过AT指令对短信猫中的短信进行读取，并对读入的短信数据进行分析与解码。

读出的短信格式与发送时的短信编码大致是相同的。下面给出相应的程序例程，读者可以在自行实验中对照验证。



1. 读取某一条短信，并将其进行显示

/*-------------------------------------------------------

函数名：LAD_SMS()(short for "Load And Display the Short MessageS")

功能:用户函数，读取第n条短信，并在LCD的(x,y)位置显示出来

----------------------------------------------------------*/

unsigned char LAD_SMS(unsigned char n,unsigned char x,unsigned char y)

{

unsigned char i,len,t;

char temp[5];

char temp1[3];

//IN_Draw_BlankorBlackRect(0,20,30,72,0);

szzh10(n,temp1); 

//将n转为相应的字符串，如n=21，则字符串为"21"，用以与AT指令拼接。

t=85;

clear_sbuf();

counter=0;

send_s("AT+CMGR=");//AT+CMGR为读取短信的AT指令

send_s(temp1);//上面所得的字符串

send(0x0d);

send(0x0a);

for(i=0;i<10;i++) delay(10000); //等待读取完毕

sbuf[counter]=0; //在收到的数据末尾附加'\0'

temp[0]=sbuf[23];

temp[1]=sbuf[24];

temp[2]=sbuf[25];

temp[3]=0;

if(sbuf[25]!=0x0d) t++;

for(i=0;i<strlen(temp);i++) if(temp[i]==0x0d) temp[i]=0;

len=atoi(temp); //获取收到的短信内容长度

//LCD_PutEng(23,76,"(SM:");

//LCD_PutNum16(27,76,n);

//LCD_PutEng(29,76,")");

if(len==0)

{

//LCD_PutEng(5,96,"EMP");

//LCD_PutChn(x,y,">短信空");

delay(50000); 

return 0;

}

len-=20;

if(len>90)

{

//LCD_PutEng(5,96,"MTL");

//LCD_PutChn(x,y,">短信太长");

delay(50000); 

return 0;

}



for(i=0;i<len;i++)

{

temp[0]=sbuf[t+2*i];

temp[1]=sbuf[t+2*i+1];

temp[2]=0;

sbuf[i]=_hex_(temp); 

//收到的短信内容是内存方式的显示表示，转为十六进制数

}



sbuf[i]=0;

Analysis_Pro();//解码后的内容在sbuf中，此函数对其进行显示输出

//LCD_PutEng(x,y,inf_bw.Date);

//LCD_PutEng(x,y,sbuf+29); 



delay(50000);

clear_sbuf();

counter=0;

return 1;

}

2. 检测新短信

/*-------------------------------------------------------

函数名：Check_New()

功能:用户函数，检测有无新的短信，如果有返回1，否则返回0

----------------------------------------------------------*/

unsigned char Check_New()

{int i;

send_s("AT+CMGL=0"); //AT+CMGL=0为读取新短信的AT指令

send(0x0d);

send(0x0a); //发送回车

delay(10000); //等待接收完毕

if(sbuf[12]=='O') return 0xff;

if(sbuf[12]=='+') 

{

for(i=18;i<23;i++)

if(sbuf[i]==',') sbuf[i]=0;

return atoi(sbuf+19); //返回新短信的位置

} 

}



3. 删除某条短信

/*-------------------------------------------------------

函数名：Delete()

功能:用户函数，删除第n条短信

----------------------------------------------------------*/

unsigned char Delete(unsigned char n)

{

char t[10];

char t1[5];

strcpy(t,"AT+CMGD="); //AT+CMGD为删除短信的AT指令

szzh10(n,t1);

strcpy(t+8,t1);

while(Send_AT_CMD(t)!=1);

//LCD_PutEng(5,96,"SM");

//LCD_PutNum16(7,96,n);

//LCD_PutEng(10,96,"De");

delay(60000);

return 1; 

}

TC35的控制主要包含如下几类指令：

　　（1）初始化指令

　　设置短消息发送格式AT+CMGF=1<CR>，设置1代表PDU模式，<CR>是回车符号，也就是0x0d，指令正确则模块返回<CRLF>OK<CRLF>，<CRLF>是回车换行符号。

　　（2）设置/读取短消息中心

　　短消息中心号码由移动运营商提供。

　　设置短消息中心的指令格式为：

　　AT+CSCA=″+8613800531500″(短消息中心)<CR>

　　设置正确则模块返回<CRLF>OK<CRLF>。

　　读取短消息服务中心则使用命令：

AT+CSCA=?<CR>

　　TC35模块应该返回：

<CRLF>+CSCA:″8613800531500″<CRLF>。

　　（3）设置短消息到达自动提示

　　设置短消息到达自动提示的指令格式为：

AT+CNMI=1,1,0,0,1<CR>

　　设置正确则TC35模块返回：

<CRLF>OK<CRLF>。

　　设置此命令可使模块在短消息到达后向串口发送指令：

<CRLF>+CMTI:″SM″,INDEX(信息存储位置)<CRLF>。

　　通过TC35发送短消息的方法为：

　　PC上的控制软件按照PDU的格式发送和接收数据，短消息的内容可以是中文或者其他字符。在PDU模式，如果发送短消息，则首先发送短消息数据的长度：

AT+CMGS=<length><CR>

　　等待TC35模块返回ASCII字符">"，则可以将PDU数据输入，PDU数据以<Z>(也就是0x1a)作为结束符。短消息发送成功，模块返回：

<CRLF>OK<CRLF>

　　通过TC35接收短消息的方法为：

　　短消息到来后，串口上会接收到指令

<CRLF>+CMTI:″SM″,INDEX(信息存储位置)<CRLF>

　　PC上的控制软件通过读取PDU数据的AT命令

AT+CMGR=INDEX<CRLF>

　　将TC35模块中PDU格式的短消息内容读出。如果用+CMGL代替+CMGR，则可一次性读出全部短消息。

　　通过TC35删除短消息的方法为：

　　PC上的控制软件收到一条短消息并处理后，需要将其在SIM卡上删除，以防止SIM卡饱和。删除短消息的指令为：

AT+CMGD=INDEX<CR>

　　删除后模块返回

<CRLF>OK<CRLF>

2.程序实例

　　由于本文的宗旨在于讲解串口通信，因此，我们屏蔽图形用户界面的细节，制作一个简单的短信收发软件，它包含了控制短信终端的所有串口通信内容。实际上，一个理想的短信收发软件的界面应类似于Outlook或Foxmail，包含收件箱、发件箱、已发送短信箱等内容，但是这些东西都与我们要介绍的串口通信无关，因此，下面的软件界面虽"败絮其外"，但仍可称得上"金玉其中"：

　　关于界面上控件的描述如下：

BEGIN
　EDITTEXT IDC_SMSCONTENT_EDIT,39,61,242,38,ES_AUTOHSCROLL
　PUSHBUTTON "发送",IDC_SEND_BUTTON,316,80,45,18
　GROUPBOX "接收短消息",IDC_STATIC,28,124,361,167
　LTEXT "对方手机号",IDC_STATIC,41,35,42,11
　EDITTEXT IDC_PHONENUM_EDIT,88,30,192,17,ES_AUTOHSCROLL
　PUSHBUTTON "清除",IDC_CLEAR_BUTTON,316,30,45,18
　GROUPBOX "发送短消息",IDC_STATIC,29,19,361,95
　LISTBOX IDC_RECVSMS_LIST,43,137,331,127,LBS_SORT | 
　LBS_NOINTEGRALHEIGHT | WS_VSCROLL | WS_TABSTOP
　PUSHBUTTON "接收",IDC_RECV_BUTTON,77,269,55,16
　PUSHBUTTON "清空",IDC_DELETEALL_BUTTON,273,268,45,14
END 

　　对话框类的消息映射为：

BEGIN_MESSAGE_MAP(CSMSControlDlg, CDialog)
//{{AFX_MSG_MAP(CSMSControlDlg)
　ON_WM_SYSCOMMAND()
　ON_WM_PAINT()
　ON_WM_QUERYDRAGICON()
　ON_BN_CLICKED(IDC_CLEAR_BUTTON, OnClearButton)
　ON_BN_CLICKED(IDC_SEND_BUTTON, OnSendButton)
　ON_BN_CLICKED(IDC_RECV_BUTTON, OnRecvButton)
　ON_BN_CLICKED(IDC_DELETEALL_BUTTON, OnDeleteallButton)
//}}AFX_MSG_MAP
END_MESSAGE_MAP() 

　下面是对本例程软件的主要数据结构和核心函数的介绍：

　　数据结构

// 用户信息编码方式
#define GSM_7BIT 0
#define GSM_8BIT 4
#define GSM_UCS2 8 
// 短消息参数结构，编码/解码共用
// 其中，字符串以0结尾
typedef struct
{
　char SCA[16]; // 短消息服务中心号码(SMSC地址)
　char TPA[16]; // 目标号码或回复号码(TP-DA或TP-RA)
　char TP_PID; // 用户信息协议标识(TP-PID)
　char TP_DCS; // 用户信息编码方式(TP-DCS)
　char TP_SCTS[16]; // 服务时间戳字符串(TP_SCTS), 接收时用到
　char TP_UD[161]; // 原始用户信息(编码前或解码后的TP-UD)
　char index; // 短消息序号，在读取时用到
} SM_PARAM; 

　　发送短消息

　　发送按钮对应的函数为CSMSControlDlg::OnSendButton，它读取用户输出并根据目标电话号码和短信息内容形成SM_PARAM(源PDU参数)的内容，接着进行发送：

void CSMSControlDlg::OnSendButton() 
{
　// TODO: Add your control notification handler code here
　//获得用户输入
　CString desPhoneNum;
　CString smsContent;
　GetDlgItemText(IDC_PHONENUM_EDIT,desPhoneNum);
　GetDlgItemText(IDC_SMSCONTENT_EDIT,smsContent);

　//填充SM_PARAM结构体内容
　SM_PARAM smParam;
　smParam = CreateSMPARAMStruct(desPhoneNum,smsContent);

　//发送短信息
　gsmSendMessage(smParam);
} 

　　其中调用的gsmSendMessage函数体现了串口通信的核心内容，它按照第1节阐述的GSM模块发送短消息的串口控制流程进行短信的发送：

BOOL gsmSendMessage(const SM_PARAM *pSrc // pSrc: 源PDU参数指针)
{
　int nPduLength; // PDU串长度
　unsigned char nSmscLength; // SMSC串长度
　int nLength; // 串口收到的数据长度
　char cmd[16]; // 命令串
　char pdu[512]; // PDU串
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　char ans[128]; // 应答串

　nPduLength = gsmEncodePdu(pSrc, pdu); // 根据PDU参数，编码PDU串
　strcat(pdu, "\x01a"); // 以Ctrl-Z结束

　gsmString2Bytes(pdu, &nSmscLength, 2); // 取PDU串中的SMSC信息长度
　nSmscLength++; // 加上长度字节本身

　// 命令中的长度，不包括SMSC信息长度，以数据字节计
　sprintf(cmd, "AT+CMGS=%d\r", nPduLength / 2-nSmscLength); // 生成命令

　WriteComm(cmd, strlen(cmd)); // 先输出命令串

　nLength = ReadComm(ans, 128); // 读应答数据
　
　// 根据能否找到"\r\n> "决定成功与否
　if (nLength == 4 && strncmp(ans, "\r\n> ", 4) == 0)
　{
　　WriteComm(pdu, strlen(pdu)); // 得到肯定回答，继续输出PDU串

　　nLength = ReadComm(ans, 128); // 读应答数据
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　// 根据能否找到"+CMS ERROR"决定成功与否
　　if (nLength > 0 && strncmp(ans, "+CMS ERROR", 10) != 0)
　　{
　　　return TRUE;
　　}
　}
　return FALSE;
}

　　读取短消息

　　点击"接收"按钮会通过gsmReadMessage函数的调用获得所有短消息，最后在列表控件中显示所有短信：

void CSMSControlDlg::OnRecvButton() 
{
　// TODO: Add your control notification handler code here
　SM_PARAM smParam[100];//短信缓冲区
　int smsNum;//短信条数
　smsNum = gsmReadMessage(smParam);//读取短信

　//显示短信
　for(int i=0;i<smsNum;i++)
　{
　　m_recvlist.AddString(CString(smsNum[i].TPA)+smsNum[i].TP_UD);
　} 
} 
　　其中调用的gsmReadMessage函数完成最核心的短信接收功能，它按照第1节阐述的GSM模块接收短消息的串口控制流程进行短信的接收：


// 参数：pMsg 短消息缓冲区，必须足够大
// 返回：短消息条数
int gsmReadMessage(SM_PARAM* pMsg)
{
　int nLength; // 串口收到的数据长度
　int nMsg; // 短消息计数值
　char* ptr; // 内部用的数据指针
　char cmd[16]; // 命令串
　char ans[1024]; // 应答串

　nMsg = 0;
　ptr = ans;

　sprintf(cmd, "AT+CMGL\r"); // 生成命令，用+CMGL可一次性读出全部短消息
　　　　　　　　　　　　　　　　　　
　WriteComm(cmd, strlen(cmd)); // 输出命令串
　nLength = ReadComm(ans, 1024); // 读应答数据
　// 根据能否找到"+CMS ERROR"决定成功与否
　if(nLength > 0 && strncmp(ans, "+CMS ERROR", 10) != 0)
　{
　　// 循环读取每一条短消息, 以"+CMGL:"开头
　　while((ptr = strstr(ptr, "+CMGL:")) != NULL)
　　{
　　　ptr += 6; // 跳过"+CMGL:"
　　　sscanf(ptr, "%d", &pMsg->index); // 读取序号
　　　　　　　　　　　　　　　　　　　
　　　ptr = strstr(ptr, "\r\n"); // 找下一行
　　　ptr += 2; // 跳过"\r\n"

　　　gsmDecodePdu(ptr, pMsg); // PDU串解码
　　　pMsg++; // 准备读下一条短消息
　　　nMsg++; // 短消息计数加1
　　}
　}
　　return nMsg;
}

删除短消息

　　我们可以在读取完所有短信息后调用gsmDeleteMessage函数在GSM模块上删除那些已经被接收到PC上的短信息，它按照第1节阐述的GSM模块删除短消息的串口控制流程进行短信的删除：

// index: 短消息序号，从1开始
BOOL gsmDeleteMessage(const int index)
{
　int nLength; // 串口收到的数据长度
　char cmd[16]; // 命令串
　char ans[128]; // 应答串

　sprintf(cmd, "AT+CMGD=%d\r", index); // 生成命令

　// 输出命令串
　WriteComm(cmd, strlen(cmd));

　// 读应答数据
　nLength = ReadComm(ans, 128);

　// 根据能否找到"+CMS ERROR"决定成功与否
　if (nLength > 0 && strncmp(ans, "+CMS ERROR", 10) != 0)
　{
　　return TRUE;
　}
　return FALSE;
} 

　　在PC控制软件的短信列表框中删除所有短消息的"清空"按钮函数为：

void CSMSControlDlg::OnDeleteallButton() 
{
　// TODO: Add your control notification handler code here
　m_recvlist.ResetContent();
} 

　　设置/读/写串口

　　在应用程序启动与退出及gsmSendMessage、gsmReadMessage和gsmDeleteMessage函数中广泛使用的串口相关函数用WIN32 API实现：

// 串口设备句柄
HANDLE hComm;

// 打开串口
// pPort: 串口名称或设备路径，可用"COM1"或"\\.\COM1"两种方式，建议用后者
// nBaudRate: 波特率
// nParity: 奇偶校验
// nByteSize: 数据字节宽度
// nStopBits: 停止位
BOOL OpenComm(const char *pPort, int nBaudRate, int nParity, int nByteSize, int
nStopBits)
{
　DCB dcb; // 串口控制块
　COMMTIMEOUTS timeouts =
　{
　　// 串口超时控制参数
　　100, // 读字符间隔超时时间: 100 ms
　　1, // 读操作时每字符的时间: 1 ms (n个字符总共为n ms)
　　500, // 基本的(额外的)读超时时间: 500 ms
　　1, // 写操作时每字符的时间: 1 ms (n个字符总共为n ms)
　　100
　}; // 基本的(额外的)写超时时间: 100 ms

　hComm = CreateFile(pPort, // 串口名称或设备路径
　　GENERIC_READ | GENERIC_WRITE, // 读写方式
　　0, // 共享方式：独占
　　NULL, // 默认的安全描述符
　　OPEN_EXISTING, // 创建方式
　　0, // 不需设置文件属性
　　NULL); // 不需参照模板文件

　if (hComm == INVALID_HANDLE_VALUE)
　　return FALSE;
　// 打开串口失败

　GetCommState(hComm, &dcb); // 取DCB
　dcb.BaudRate = nBaudRate;
　dcb.ByteSize = nByteSize;
　dcb.Parity = nParity;
　dcb.StopBits = nStopBits;

　SetCommState(hComm, &dcb); // 设置DCB
　
　SetupComm(hComm, 4096, 1024); // 设置输入输出缓冲区大小

　SetCommTimeouts(hComm, &timeouts); // 设置超时
　return TRUE;
}

// 关闭串口
BOOL CloseComm()
{
　return CloseHandle(hComm);
}

// 写串口
// pData: 待写的数据缓冲区指针
// nLength: 待写的数据长度
void WriteComm(void *pData, int nLength)
{
　DWORD dwNumWrite; // 串口发出的数据长度
　WriteFile(hComm, pData, (DWORD)nLength, &dwNumWrite, NULL);
}

// 读串口
// pData: 待读的数据缓冲区指针
// nLength: 待读的最大数据长度
// 返回: 实际读入的数据长度
int ReadComm(void *pData, int nLength)
{
　DWORD dwNumRead; // 串口收到的数据长度
　ReadFile(hComm, pData, (DWORD)nLength, &dwNumRead, NULL);
　return (int)dwNumRead;
} 
　编/解码GSM短消息

　　陷于本文的篇幅，这里只给出编解码函数的原型，具体请参看GSM标准及《通过串口收发短消息》一文。

// UCS2编码 返回: 目标编码串长度
int gsmEncodeUcs2(const char *pSrc, // 源字符串指针
　unsigned char *pDst, // pDst: 目标编码串指针
　int nSrcLength // nSrcLength: 源字符串长度
);

// UCS2解码 返回: 目标字符串长度
int gsmDecodeUcs2(const unsigned char *pSrc, //源编码串指针
char *pDst, // pDst: 目标字符串指针
int nSrcLength // nSrcLength: 源编码串长度
);

//可打印字符串转换为字节数据 返回: 目标数据长度
//如："C8329BFD0E01" --> {0xC8, 0x32, 0x9B, 0xFD, 0x0E, 0x01}
int gsmString2Bytes(const char *pSrc, // pSrc: 源字符串指针
unsigned char *pDst, // pDst: 目标数据指针
int nSrcLength // nSrcLength: 源字符串长度 
);

// 字节数据转换为可打印字符串 返回: 目标字符串长度
// 如：{0xC8, 0x32, 0x9B, 0xFD, 0x0E, 0x01} --> "C8329BFD0E01"
int gsmBytes2String(const unsigned char *pSrc, // pSrc: 源数据指针
char *pDst, // pDst: 目标字符串指针
int nSrcLength // nSrcLength: 源数据长度;