gprs.cpp

这是用evc编写的MagicARM2410开发平台上的一个GPRS收发短信的源码。

// GPRS.cpp: implementation of the CGPRS class.
//
//////////////////////////////////////////////////////////////////////

#include "stdafx.h"
#include "GPRS.h"

#ifdef _DEBUG
#undef THIS_FILE
static char THIS_FILE[]=__FILE__;
#define new DEBUG_NEW
#endif

//////////////////////////////////////////////////////////////////////
// Construction/Destruction
//////////////////////////////////////////////////////////////////////

CGPRS::CGPRS()
{
	ResetGlobalVarial();
}

CGPRS::~CGPRS()
{
	if (pCeSerial->IsPortOpen() == TRUE)
	{
		pCeSerial->ClosePort();
	}

	if (pCeSerial)
		delete pCeSerial;
}


/*******************************************************************************************
函数名称: ResetGlobalVarial
描    述: 复位一些全局变量为默认值
输入参数: 无
输出参数: 无
返    回: 无
********************************************************************************************/
void CGPRS::ResetGlobalVarial(void)
{
	bSendATCmd = FALSE;					/* 当前不处于发送命令状态 */	
	m_RespCnt = 0;							
	m_strRespBuf = _T("");
	ResetEvent(m_ATCmdRespEvent);		/* 复位 GPRS 响应事件*/
}



/*******************************************************************************************
函数名称: GPRS_Init
描    述: GPRS 模块初始化函数
输入参数: LPCTSTR Port   : 串口号, 如 "COM1:"
		  int BaudRate   : 串口波特率, 如 115200
		  DWORD UserParam: 用户传递到该类中的参数
输出参数: 无
返    回: TRUE: 成功   FALSE: 失败
********************************************************************************************/
BOOL CGPRS:: GPRS_Init(LPCTSTR Port, int BaudRate, DWORD UserParam)
{	
	BOOL ret;
	DWORD Trycount = 2;

	do{																/* 尝试初始化 GPRS, 最多尝试两次 */
		Trycount--;

		pCeSerial = new CCeSerial;
		ret = pCeSerial->OpenPort(Port, BaudRate, 8, ONESTOPBIT, NOPARITY, TRUE, TRUE, (DWORD)this);
		if (ret == FALSE)											/* 打开串口, 数据位为8,停止位为1,无校验位 */
		{
			delete pCeSerial;
			return FALSE;
		}

		pCeSerial->OnCommRecv = OnCommRecv;							/* 串口接收成功回调函数 */
		m_UserParam = UserParam;									/* 保存用户传进来的参数 */
		m_ATCmdRespEvent = CreateEvent(NULL, TRUE, FALSE, NULL);	/* 创建 GPRS 响应事件 */

		GPRS_SendATCmd(_T("AT"));									/* 尝试模块是否处于激活状态 */
		GPRS_WaitResponseOK();
		GPRS_SendATCmd(_T("AT"));									/* 尝试模块是否处于激活状态 */
		GPRS_WaitResponseOK();

		GPRS_SendATCmd(_T("AT$NOSLEEP=1"));							/* 禁止模块进入睡眠模式 */
		ret = GPRS_WaitResponseOK();
		if (ret == FALSE)
		{
			delete pCeSerial;
			if (Trycount == 0) return FALSE;
		}
		else
			Trycount = 0;

	}while(Trycount > 0);

	GPRS_SendATCmd(_T("AT+CREG=1"));				
	ret = GPRS_WaitResponseOK();
	if (ret == FALSE)
		return FALSE;

	GPRS_SendATCmd(_T("AT+CLIP=1"));				/* 设置来电显示 */	
	ret = GPRS_WaitResponseOK();
	if (ret == FALSE)
		return FALSE;

	GPRS_SendATCmd(_T("AT+CMGF=1"));				/* 设置为文本模式 */
	ret = GPRS_WaitResponseOK();
	if (ret == FALSE)
		return FALSE;
	
	GPRS_SendATCmd(_T("AT+CSCS=\"GSM\""));			/* 设置字符集 */
	ret = GPRS_WaitResponseOK();
	if (ret == FALSE)
		return FALSE;

	//GPRS_SendATCmd(_T("AT+CSMP=17,168,0,0"));	    /* 设置文本模式参数 */
	//ret = GPRS_WaitResponseOK();
	//if (ret == FALSE)
	//	return FALSE;

	return TRUE;
}


/*******************************************************************************************
函数名称: OnCommRecv
描    述: 串口接收成功回调函数, 当串口正确接收到数据时, 该函数将被调用
输入参数: CString strCmd: 命令字
输出参数: DWORD UserParam : 用户传递的参数, 通常为CGPRS类的一个对象的指针
          BYTE *buf		  : 串口接收数据缓冲
		  DWORD buflen	  : 串口接收到的数据长度
返    回: 无
********************************************************************************************/
void CALLBACK CGPRS::OnCommRecv(DWORD UserParam, BYTE *buf, DWORD buflen)
{
	CGPRS *pGPRS = (CGPRS *)UserParam;	
	
	CString strTmp = _T("");
	LPTSTR pStr = strTmp.GetBuffer(buflen);	
	MultiByteToWideChar(CP_ACP, 0, (char *)buf, buflen, pStr, buflen); /* 将接收到的数据转换为 Unicode 编码 */
	strTmp.ReleaseBuffer();

	if (pGPRS->bSendATCmd == TRUE)
	{																	/* 之前用户发送了 AT 指令 */
		pGPRS->m_strRespBuf.Insert(pGPRS->m_RespCnt, strTmp);			/* 保存数据 */	
		SetEvent(pGPRS->m_ATCmdRespEvent);
		return;
	}
	
	if ((strTmp.Find(_T("RING")) >= 0) || 
		(strTmp.Find(_T("ring")) >= 0))
	{													/* 有电话打进来 */			
		CString strCallNum = pGPRS->GPRS_GetTheCallNum(strTmp);
		pGPRS->OnGPRSRecv(pGPRS->m_UserParam, GPRS_STATUS_RECEIVE_CALL,strCallNum);
	}
	
	if ((strTmp.Find(_T("NO CARRIER")) >= 0) || 
		(strTmp.Find(_T("no carrier")) >= 0))				
	{													/* 来电后, 对方挂机 */
		pGPRS->OnGPRSRecv(pGPRS->m_UserParam, GPRS_STATUS_OTHER_SIDE_HANDUP, "");
	}	

	pGPRS->bSendATCmd = FALSE;							/* 复位相关全局变量 */
	pGPRS->m_RespCnt = 0;							
	pGPRS->m_strRespBuf = _T("");
	ResetEvent(pGPRS->m_ATCmdRespEvent);
}


/*******************************************************************************************
函数名称: GPRS_GetTheCallNum
描    述: 取得来电的电话号码
输入参数: CString str:  来电时, GPRS 响应字符
输出参数: 无
返    回: 来电电话号码
********************************************************************************************/
CString CGPRS::GPRS_GetTheCallNum(CString str)
{
	int pos1 = str.Find(_T("+CLIP: \""), 0);
	if (pos1 < 0)
		return "";
	else
		pos1 = pos1 + wcslen(_T("+CLIP: \""));

	int pos2 = str.Find(_T("\""), pos1);
	if (pos2 < 0)
		return "";

	CString strNum;
	strNum = str.Mid(pos1, pos2 - pos1);				  /* 取得电话号码 */

	return strNum;
}


/*******************************************************************************************
函数名称: GPRS_SendATCmd
描    述: 发送 AT 命令
输入参数: CString strCmd: 命令字
输出参数: 无
返    回: TRUE: 成功   FALSE: 失败
********************************************************************************************/
BOOL CGPRS::GPRS_SendATCmd(CString strCmd)
{
	int len = strCmd.GetLength();
	BYTE *psendbuf = new BYTE[len + 2];
	
	m_RespCnt = 0;
	bSendATCmd = TRUE;								 /* 进入发送命令状态 */

	for(int i = 0; i < len;i++)
		psendbuf[i] = (char)strCmd.GetAt(i);		 /* 转换为单字节字符 */

	psendbuf[len] = '\r';							 /* 加入结束符 */
	psendbuf[len + 1] = '\n';
	pCeSerial->Senddata(psendbuf, len + 2);			 /* 从串口发送数据 */

	delete[] psendbuf;
	return TRUE;
}


/*******************************************************************************************
函数名称: GPRS_WaitResponseOK
描    述: 等待 AT 命令响应 OK
输入参数: 无
输出参数: 无
返    回: 无
********************************************************************************************/
BOOL CGPRS::GPRS_WaitResponseOK(void)
{
	DWORD ret;
	BOOL bOK = TRUE;

	while(1)
	{	// 等待 0.5 秒, 如果得不到回复, 即为错误
		ret = WaitForSingleObject(m_ATCmdRespEvent, 500);
		if (ret == WAIT_OBJECT_0)
		{
			if ((m_strRespBuf.Find(_T("ERROR\r\n"), 0) >= 0) ||
				(m_strRespBuf.Find(_T("error\r\n"), 0) >= 0))
			{													/* 响应中有"ERROR" */
				bOK = FALSE;
				break;
			}
			if ((m_strRespBuf.Find(_T("OK\r\n"), 0) >= 0) ||
				(m_strRespBuf.Find(_T("ok\r\n"), 0) >= 0))
			{													/* 响应中有"OK" */
				bOK = TRUE;
				break;
			}

			ResetEvent(m_ATCmdRespEvent);
		}
		else
		{
			bOK = FALSE;										/* 响应超时 */
			break;
		}
	}

	ResetGlobalVarial();								/* 复位用到的全局变量 */
	if (FALSE == bOK)
		return FALSE;

	return TRUE;
}


/*******************************************************************************************
函数名称: GPRS_WriteMsg
描    述: 将短信内容写入 GPRS 模块
输入参数: CString Msg:  短信内容
输出参数: 无
返    回: 无
********************************************************************************************/
BOOL CGPRS::GPRS_WriteMsg(CString Msg)
{
	int len = Msg.GetLength();
	BYTE *psendbuf = new BYTE[len + 3];

	for(int i = 0; i < len;i++)
		psendbuf[i] = (char)Msg.GetAt(i);			/* 转换为单字节字符 */

	psendbuf[len] = '\r';						    /* 加入结束符 */
	psendbuf[len + 1] = '\n';
	psendbuf[len + 2] = 0x1A;
	pCeSerial->Senddata(psendbuf, len + 3);			/* 从串口发送数据 */

	delete[] psendbuf;
	return TRUE;
}


/*******************************************************************************************
函数名称: GPRS_DialUp
描    述: 拨打电话(由本机打出)
输入参数: CString strTelNum: 电话号码
输出参数: 无
返    回: TRUE: 成功   FALSE: 失败
********************************************************************************************/
BOOL CGPRS::GPRS_DialUp(CString strTelNum)
{
	CString strDialup = _T("ATD");
	strDialup += strTelNum + ";";					/* 以分号作为结束 */

	GPRS_SendATCmd(strDialup);						/* 发送拨号命令 */

	return (GPRS_WaitResponseOK());
}


/*******************************************************************************************
函数名称: GPRS_DialDown
描    述: 挂机(由本机打出的挂机)
输入参数: 无
输出参数: 无
返    回: TRUE: 成功   FALSE: 失败
********************************************************************************************/
BOOL CGPRS::GPRS_DialDown(void)
{
	GPRS_SendATCmd("ATH");

	return (GPRS_WaitResponseOK());
}


/*******************************************************************************************
函数名称: GPRS_TakeTheCall
描    述: 接听电话(有电话打进来, 接听该电话)
输入参数: 无
输出参数: 无