sms.cpp

可实现接收和发送短信息

	int nLength;			// 内部用的串长度
	int nDstLength;			// 目标PDU串长度
	unsigned char buf[256];	// 内部用的缓冲区
	
	// SMSC地址信息段
	nLength = strlen(pSrc->SCA);	// SMSC地址字符串的长度	
	buf[0] = (char)((nLength & 1) == 0 ? nLength : nLength + 1) / 2 + 1;	// SMSC地址信息长度
	buf[1] = 0x91;		// 固定: 用国际格式号码
	nDstLength = gsmBytes2String(buf, pDst, 2);		// 转换2个字节到目标PDU串
	nDstLength += gsmInvertNumbers(pSrc->SCA, &pDst[nDstLength], nLength);	// 转换SMSC号码到目标PDU串
	
	// TPDU段基本参数、目标地址等
	nLength = strlen(pSrc->TPA);	// TP-DA地址字符串的长度
	buf[0] = 0x11;					// 是发送短信(TP-MTI=01)，TP-VP用相对格式(TP-VPF=10)
	buf[1] = 0;						// TP-MR=0
	buf[2] = (char)nLength;			// 目标地址数字个数(TP-DA地址字符串真实长度)
	buf[3] = 0x91;					// 固定: 用国际格式号码
	nDstLength += gsmBytes2String(buf, &pDst[nDstLength], 4);		// 转换4个字节到目标PDU串
	nDstLength += gsmInvertNumbers(pSrc->TPA, &pDst[nDstLength], nLength);	// 转换TP-DA到目标PDU串
	
	// TPDU段协议标识、编码方式、用户信息等
	nLength = strlen(pSrc->TP_UD);	// 用户信息字符串的长度
	buf[0] = pSrc->TP_PID;			// 协议标识(TP-PID)
	buf[1] = pSrc->TP_DCS;			// 用户信息编码方式(TP-DCS)
	buf[2] = 0;						// 有效期(TP-VP)为5分钟
	if(pSrc->TP_DCS == GSM_7BIT)	
	{
		// 7-bit编码方式
		buf[3] = nLength;			// 编码前长度
		nLength = gsmEncode7bit(pSrc->TP_UD, &buf[4], nLength+1) + 4;	// 转换TP-DA到目标PDU串
	}
	else if(pSrc->TP_DCS == GSM_UCS2)
	{
		// UCS2编码方式
		buf[3] = gsmEncodeUcs2(pSrc->TP_UD, &buf[4], nLength);	// 转换TP-DA到目标PDU串
		nLength = buf[3] + 4;		// nLength等于该段数据长度
	}
	else
	{
		// 8-bit编码方式
		buf[3] = gsmEncode8bit(pSrc->TP_UD, &buf[4], nLength);	// 转换TP-DA到目标PDU串
		nLength = buf[3] + 4;		// nLength等于该段数据长度
	}
	nDstLength += gsmBytes2String(buf, &pDst[nDstLength], nLength);		// 转换该段数据到目标PDU串
	
	// 返回目标字符串长度
	return nDstLength;
}

// PDU解码，用于接收、阅读短消息
// pSrc: 源PDU串指针
// pDst: 目标PDU参数指针
// 返回: 用户信息串长度
int gsmDecodePdu(const char* pSrc, SM_PARAM* pDst)
{
	int nDstLength;			// 目标PDU串长度
	unsigned char tmp;		// 内部用的临时字节变量
	unsigned char buf[256];	// 内部用的缓冲区
	
	// SMSC地址信息段
	gsmString2Bytes(pSrc, &tmp, 2);	// 取长度
	tmp = (tmp - 1) * 2;	// SMSC号码串长度
	pSrc += 4;			// 指针后移，忽略了SMSC地址格式
	gsmSerializeNumbers(pSrc, pDst->SCA, tmp);	// 转换SMSC号码到目标PDU串
	pSrc += tmp;		// 指针后移
	
	// TPDU段基本参数、回复地址等
	gsmString2Bytes(pSrc, &tmp, 2);	// 取基本参数
	pSrc += 2;		// 指针后移
	// 包含回复地址，取回复地址信息
	gsmString2Bytes(pSrc, &tmp, 2);	// 取长度
    tmp += 1;	// 调整奇偶性
	pSrc += 4;			// 指针后移，忽略了回复地址(TP-RA)格式
	gsmSerializeNumbers(pSrc, pDst->TPA, tmp);	// 取TP-RA号码
	pSrc += tmp;		// 指针后移
	//}
	
	// TPDU段协议标识、编码方式、用户信息等
	gsmString2Bytes(pSrc, (unsigned char*)&pDst->TP_PID, 2);	// 取协议标识(TP-PID)
	pSrc += 2;		// 指针后移
	gsmString2Bytes(pSrc, (unsigned char*)&pDst->TP_DCS, 2);	// 取编码方式(TP-DCS)
	pSrc += 2;		// 指针后移
	gsmSerializeNumbers(pSrc, pDst->TP_SCTS, 14);		// 服务时间戳字符串(TP_SCTS) 
	pSrc += 14;		// 指针后移
	gsmString2Bytes(pSrc, &tmp, 2);	// 用户信息长度(TP-UDL)
	pSrc += 2;		// 指针后移
	if(pDst->TP_DCS == GSM_7BIT)	
	{
		// 7-bit解码
		nDstLength = gsmString2Bytes(pSrc, buf, tmp & 7 ? (int)tmp * 7 / 4 + 2 : (int)tmp * 7 / 4);	// 格式转换
		gsmDecode7bit(buf, pDst->TP_UD, nDstLength);	// 转换到TP-DU
		nDstLength = tmp;
	}
	else if(pDst->TP_DCS == GSM_UCS2)
	{
		// UCS2解码
		nDstLength = gsmString2Bytes(pSrc, buf, tmp * 2);			// 格式转换
		nDstLength = gsmDecodeUcs2(buf, pDst->TP_UD, nDstLength);	// 转换到TP-DU
	}
	else
	{
		// 8-bit解码
		nDstLength = gsmString2Bytes(pSrc, buf, tmp * 2);			// 格式转换
		nDstLength = gsmDecode8bit(buf, pDst->TP_UD, nDstLength);	// 转换到TP-DU
	}
	
	// 返回目标字符串长度
	return nDstLength;
}
// 发送短消息
// pSrc: 源PDU参数指针
BOOL gsmSendMessage(const SM_PARAM* pSrc)
{
	int nPduLength;		// PDU串长度
	unsigned char nSmscLength;	// SMSC串长度
	int nLength;		// 串口收到的数据长度
	char cmd[20];		// 命令串
	char pdu[512];		// PDU串
	char ans[128];		// 应答串
	char phone[20];
	char text[512];     //文本方式下用
	CString type;
    if(g_index==0)
	{
		nPduLength = gsmEncodePdu(pSrc, pdu);	// 根据PDU参数，编码PDU串
		strcat(pdu, "\x01a");		// 以Ctrl-Z结束
		
		gsmString2Bytes(pdu, &nSmscLength, 2);	// 取PDU串中的SMSC信息长度
		nSmscLength++;		// 加上长度字节本身
		
		// 命令中的长度，不包括SMSC信息长度，以数据字节计
		sprintf(cmd,"AT+CMGF=0\r");
		WriteComm(cmd,strlen(cmd));
		Sleep(50);
		nLength = ReadComm(ans, 128);	// 读应答数据
		type = ans;
		Sleep(50);
		if (type.Find("OK")!=-1)
		{
			sprintf(cmd,"AT+CSCS=\"UCS2\"\r");
			WriteComm(cmd,strlen(cmd));
			Sleep(50);
			nLength = ReadComm(ans, 128);	// 读应答数据
			type = ans;
			Sleep(50);
            if (type.Find("OK")!=-1)
			{
				sprintf(cmd, "AT+CMGS=%d\r", nPduLength / 2 - nSmscLength);	// 生成命令				
				TRACE("%s", cmd);
				TRACE("%s\n", pdu);				
				WriteComm(cmd, strlen(cmd));	// 先输出命令串
				Sleep(50);
				nLength = ReadComm(ans, 128);	// 读应答数据				
				type = ans;
				// 根据能否找到"\r\n> "决定成功与否
				if(type.Find("\r\n")!=-1)
				{
					WriteComm(pdu, strlen(pdu));		// 得到肯定回答，继续输出PDU串
					Sleep(50);
					nLength = ReadComm(ans, 128);		// 读应答数据					
					// 根据能否找到"+CMS ERROR"决定成功与否
					if(nLength > 0 && strncmp(ans, "+CMS ERROR", 10) != 0)
					{
						return TRUE;
					}
					else
					{
                        AfxMessageBox("短信发送失败，建议检查连接设置!");
						return TRUE;
					}
				}
				else
				{
					AfxMessageBox("短信发送失败，建议检查连接设置!");
					return TRUE;
				}
			}
			else
			{
                AfxMessageBox("短信发送失败，建议检查连接设置!");
				return true;
			}
		}
		else
		{
			AfxMessageBox("短信发送失败，建议检查连接设置!");
			return true;
		}
	}
	else if(g_index==1)
	{
		sprintf(cmd,"AT\r");
		WriteComm(cmd,strlen(cmd));
		Sleep(50);
		nLength = ReadComm(ans, 128);	// 读应答数据
		type = ans;
		Sleep(50);
		if (type.Find("OK")!=-1)
		{
			sprintf(cmd, "AT+CMGF=1\r");	// 设置发送模式为文本模式
			WriteComm(cmd,strlen(cmd));  // 输出命令串
			Sleep(50);
			nLength = ReadComm(ans, 128);	// 读应答数据
			type = ans;
			if (type.Find("OK")!=-1)
			{
				sprintf(cmd, "AT+CSCS=\"gsm\"\r");//发送方式选择GSM点对点
				WriteComm(cmd,strlen(cmd));// 输出命令串
				Sleep(50);
				nLength = ReadComm(ans, 128);	// 读应答数据
				type = ans;
				if (type.Find("OK")!=-1)
				{
					sprintf(phone, "AT+CMGS=\"%s\"\r",pSrc->TPA);//输出对方手机号码
					WriteComm(phone,strlen(phone));// 输出命令串
					Sleep(50);
					nLength = ReadComm(ans, 128);	// 读应答数据
					type = ans;
					if (type.Find("\r\n")!=-1)
					{
						sprintf(text,pSrc->TP_UD);
						strcat(text, "\x01a");
						WriteComm(text,strlen(text));
						Sleep(50);
						nLength = ReadComm(ans, 128);	// 读应答数据
						type = ans;
						if (type.Find("ERROR")==-1)
						{
							return TRUE;
						}
						else
						{
							AfxMessageBox("短信发送失败，建议检查连接设置!");
							return true;
						}
					}
					else
					{
						AfxMessageBox("短信发送失败，建议检查连接设置!");
						return true;
					}
				}
				else
				{
					AfxMessageBox("短信发送失败，建议检查连接设置!");
					return true;
				}
			}
			else
			{
				AfxMessageBox("短信发送失败，建议检查连接设置!");
				return true;
			}
		}
		else
		{
			AfxMessageBox("短信发送失败，建议检查连接设置!");
			return true;
		}
		
	}
	return TRUE;
}

// 读取短消息
// 用+CMGL代替+CMGR，可一次性读出全部短消息
// pMsg: 短消息缓冲区，必须足够大
// 返回: 短消息条数
int gsmReadMessage(SM_PARAM* pMsg)
{
	int nLength;		// 串口收到的数据长度
	int nMsg;			// 短消息计数值
	char* ptr;			// 内部用的数据指针
	char cmd[16];		// 命令串
	char ans[1024];		// 应答串
	CString type;
	nMsg = 0;
	ptr = ans;

    sprintf(cmd,"AT+CMGF=0\r"); //统一采用PDU方式解码
	
	WriteComm(cmd,strlen(cmd)); // 输出命令串

    Sleep(50);

	sprintf(cmd, "AT+CMGL\r");	// 生成命令
	
	WriteComm(cmd, strlen(cmd));	// 输出命令串
	
	Sleep(50);

	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:"
			type=ans;
			sscanf(ptr, "%d", &pMsg->index);	// 读取序号
			TRACE("  index=%d\n",pMsg->index);
			
			//ptr +=1;        //跳过","
             
			ptr = strstr(ptr, "\r\n");	// 找下一行
			ptr += 2;		// 跳过"\r\n"
			
			gsmDecodePdu(ptr, pMsg);	// PDU串解码
			
			pMsg++;		// 准备读下一条短消息
			nMsg++;		// 短消息计数加1
		}
	}
	
	return nMsg;
}

// 删除短消息
// 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;
}