hwmobile.cpp

基于vc++6.0的收发手机短信、读写手机电话本的平台

// HwMobile.cpp: implementation of the CHwMobile class.
//
//////////////////////////////////////////////////////////////////////

#include "stdafx.h"
#include "DllHwMobile.h"
#include "HwMobile.h"

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

#ifndef _SMS_DISABLE

//
// 计算字符个数
//
int CountCharNumber ( char *szStr, char cCalc )
{
	ASSERT ( szStr );
	int nCount = 0;
	for ( int i=0; szStr[i]!='\0'; i++ )
	{
		if ( szStr[i] == cCalc )
			nCount ++;
	}

	return nCount;
}

//
// 得到字符串的编码方式，纯英文用 GSM_7BIT 编码、带特殊字符的英文用 GSM_8BIT 编码、中文等用 GSM_UCS2 编码
//
int GetStringEncodeType ( char *pStr, int nSize)
{
	if ( !pStr ) return FALSE;
	int nLen = (int)strlen(pStr);

	int nEncode = GSM_7BIT;
	int nEspecialCharCount = 0;
	for ( int i=0; i<nSize && i<nLen && pStr[i] != '\0'; i++ )
	{
		// 是汉字等 UNICODE 文字
		if	(	pStr[i] < 0 ||
				pStr[i] == '~' || pStr[i] == '@' || pStr[i] == '$' || pStr[i] == '^' || pStr[i] == '_' ||
				pStr[i] == '|' || pStr[i] == '`' || pStr[i] == '{' || pStr[i] == '}' || pStr[i] == '[' || pStr[i] == ']'
			)
		{
			nEncode = GSM_UCS2;
			break;
		}
		// 是特殊字符
		else if ( !isalnum ( pStr[i] ) && pStr[i] != '!' && pStr[i] != '#' && pStr[i] != '%' && pStr[i] != '&' &&
			pStr[i] != '*' && pStr[i] != '(' && pStr[i] != ')' && pStr[i] != '+' && pStr[i] != '-' && pStr[i] != '=' &&
			 pStr[i] != '\"' && pStr[i] != ':' && pStr[i] != '\'' && pStr[i] != ';' && pStr[i] != '?' && pStr[i] != '>' &&
			 pStr[i] != '<' && pStr[i] != '/' && pStr[i] != '.' && pStr[i] != ',' && pStr[i] != '\t' && pStr[i] != '\r' &&
			 pStr[i] != '\n' && pStr[i] != ' '
			)
		{
			nEspecialCharCount ++;
		}
	}

	if ( nEncode == GSM_7BIT && nEspecialCharCount > 0 )
		nEncode = GSM_8BIT;

	return nEncode;
}

//
// 分析短信属性，编码方式、做一条短信时可以发送多少字节数据、超过了多少数据等等
// return : ----------------------------------------------------------------------------------------
//		szSMSContent 中可以用一条短信来发送的字节数
// Remark : ----------------------------------------------------------------------------------------
//		编码方式决定短信长度：GSM_7BIT 编码可以发送160个字符, GSM_8BIT 编码可以发送140个字符，
//		GSM_UCS2 编码只能发送70个字符
// Notice : ----------------------------------------------------------------------------------------
//		这里，将一个英文字母、一个汉字和一个数据字节都视为一个字符
//
int ParseSMSContentAttr (
		IN char* szSMSContent,
		OUT int *pnTotalCharNum/*=NULL*/,		// szSMSContent 总字符数
		OUT int *pnFreeCharNum/*=NULL*/,		// 将 szSMSContent 作成一条短信后，一条满负荷的短信还剩下多少个字符空间可以填入
		OUT int *pTP_DCS
	)
{
	ASSERT ( szSMSContent );
	int nSMSContentLen = (int)strlen ( szSMSContent );
	// 根据短信字符串来计算应该使用的编码方式
	int TP_DCS = GetStringEncodeType ( szSMSContent, nSMSContentLen );
	if ( pTP_DCS ) *pTP_DCS = TP_DCS;
	// 根据编码方式来获取一条短信的最大字符数
	int nUDMaxCharNum = GET_UD_MAX_CHAR_NUM ( TP_DCS );
	
	int nTotalCharCount = 0;		// 用来统计总字符数
	int nOneSMSByteCount = 0;		// 用来统计 szSMSContent 中可以用一条短信来发送的字节数
	for ( int i=0; i<nSMSContentLen; i++ )
	{
		if ( nTotalCharCount < nUDMaxCharNum ) nOneSMSByteCount ++;
		if ( szSMSContent[i] < 0 && i < nSMSContentLen-1 )
		{
			i ++;
			if ( nTotalCharCount < nUDMaxCharNum ) nOneSMSByteCount ++;
		}
		nTotalCharCount ++;
	}

	if ( pnTotalCharNum ) *pnTotalCharNum = nTotalCharCount;
	if ( pnFreeCharNum ) *pnFreeCharNum = nUDMaxCharNum - nTotalCharCount;

	return nOneSMSByteCount;
}

//
// 将传讯文字或短信文字分解成多条符合长度标准的字符串
// 注意：及时删除返回的指针
//
//u 需要调试
CStringArray* PartMessengerOrSMSText(
		IN LPCTSTR lpszText,
		IN int nSegmentCount/*=0*/,				// 要分解的每段文字的长度，如果是短信文字，这个参数可以忽略
		IN BOOL bTextIsSMS/*=TRUE*/,			// 文本是否是短信用的文本
		OUT int *pnFreeCharNum/*=NULL*/,		// 最后一条短信中还剩余多少个字符可以填入
		OUT CUIntArray *pUIntAry_DCS/*=NULL*/	// 短信编码方式
	)
{
	if ( !lpszText )
		return NULL;
	int nTextLen = lstrlen(lpszText);
	if ( nTextLen < 1 ) return NULL;
	char *szText = NULL;
	char szOneSMSText[UDMAXLEN_7BIT+1] = {0};
	CStringArray *pStrAry = NULL;
#ifdef UNICODE
	szText = new char[2*nTextLen+2];
	if ( !szText ) return NULL;
	memset ( szText, 0, 2*nTextLen+2 );
	CMultiByteString ( lpszText, STRING_IS_SOFTCODE, szText, 2*nTextLen+1 );
#else
	szText = lpszText;
#endif

	if ( !bTextIsSMS )
	{
		if ( nSegmentCount < 1 ) return NULL;
		pStrAry = SyncopateString ( szText, nSegmentCount );
	}
	else
	{
		pStrAry = new CStringArray;
		if ( pStrAry )
		{
			while ( strlen(szText) > 0 )
			{
				int TP_DCS = 0, nTotalCharNum = 0;
				int nOneSMSByteCount = ParseSMSContentAttr ( szText, &nTotalCharNum, pnFreeCharNum, &TP_DCS );
				nOneSMSByteCount = FindSentenceSyncopatePostion ( szText, nOneSMSByteCount-1 );
				memset ( szOneSMSText, 0, sizeof(szOneSMSText) );
				strncpy ( szOneSMSText, szText, nOneSMSByteCount );
				pStrAry->Add ( GetCompatibleString(szOneSMSText,FALSE) );
				if ( pUIntAry_DCS ) pUIntAry_DCS->Add ( TP_DCS );
				int nRemainLen = (int)strlen(szText)-nOneSMSByteCount;
				memmove ( szText, szText+nOneSMSByteCount, nRemainLen );
				szText[nRemainLen] = '\0';
			}
			ASSERT ( !pUIntAry_DCS || pStrAry->GetSize() == pUIntAry_DCS->GetSize() );
		}
	}

#ifdef UNICODE
	delete[] szText;
#endif
	return pStrAry;
}

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

CHwMobile::CHwMobile ()
	: m_nInitOK ( TRUE )
	, m_bSoundPrompt ( TRUE )
	, m_nBaudRate ( 0 )
	, m_nComNO ( 0 )
	, m_Proc_SaveSMSCFromGSM ( NULL )
	, m_Proc_IncomingFromGSM ( NULL )
	, m_bInitMobileLastRes ( -1 )
{
	HwDbgLog ( L_DEBUG, _T("CHwMobile 构造完成") );
	m_hEvt_IsBusy = ::CreateEvent ( NULL, TRUE, FALSE, NULL );
}

CHwMobile::~CHwMobile()
{
	if ( HANDLE_IS_VALID(m_hEvt_IsBusy) )
		::CloseHandle (m_hEvt_IsBusy);
	m_hEvt_IsBusy = NULL;

	m_UIntAry_NeedDelSMS.RemoveAll ();
}

//
// PDU编码，用于编制、发送短消息
// 输入: pSrc - 源PDU参数指针
// 输出: szDst - 目标PDU串指针
// 返回: 目标PDU串长度
//
int CHwMobile::gsmEncodePdu(const SM_PARAM *pSrc, char *szDst, int nDstSize )
{
	int nLength=0;							// 内部用的串长度
	int nDstLength=0;						// 目标PDU串长度
	BYTE buf[4096]={0};			// 内部用的缓冲区

//	strcpy ( (char*)pSrc->TPA, "13823310105" );
//	strcpy ( (char*)pSrc->SCA, "8613800755500" );

	// SMSC 地址信息段
	nLength = (int)strlen(pSrc->SCA);	// SMSC地址字符串的长度	
	buf[0] = (char)((nLength & 1) == 0 ? nLength : nLength + 1) / 2 + 1;	// SMSC地址信息长度
	buf[1] = 0x91;					// 0x0 : 本地格式； 0x91 : 用国际格式号码，就是：国家代码+手机号码
	nDstLength = gsmBytes2String(buf, szDst, 2, nDstSize);	// 转换2个字节到目标PDU串
	// 转换SMSC号码到目标PDU串
	nDstLength += gsmInvertNumbers(pSrc->SCA, &szDst[nDstLength], nLength,nDstSize-nDstLength);
	// TPDU段基本参数、目标地址等
	nLength = (int)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] = pSrc->bInternationalMobileNO ? 0x91 : 0x0;		// 0x0 : 本地格式； 0x91 : 用国际格式号码，就是：国家代码+手机号码
	nDstLength += gsmBytes2String(buf, &szDst[nDstLength], 4, nDstSize-nDstLength );		// 转换4个字节到目标PDU串
	nDstLength += gsmInvertNumbers(pSrc->TPA, &szDst[nDstLength], nLength,nDstSize-nDstLength);	// 转换TP-DA到目标PDU串

	// TPDU段协议标识、编码方式、用户信息等
	nLength = (int)strlen(pSrc->TP_UD_Byte);	// 用户信息字符串的长度
	buf[0] = pSrc->TP_PID;			// 协议标识(TP-PID)
	buf[1] = pSrc->TP_DCS;			// 用户信息编码方式(TP-DCS)
	buf[2] = 0xFF;					// 有效期(TP-VP)为 : 0x00~0xff (5分钟~最长)
	if ( GET_DCS(pSrc->TP_DCS) == GSM_8BIT )	
	{
		// 8-bit编码方式
		buf[3] = gsmEncode8bit(pSrc->TP_UD_Byte, &buf[4], nLength, sizeof(buf)-4);	// 转换TP-DA到目标PDU串
		nLength = buf[3] + 4;		// nLength等于该段数据长度
	}
	else if ( GET_DCS(pSrc->TP_DCS) == GSM_UCS2 )
	{
		// UCS2编码方式
		buf[3] = gsmEncodeUcs2(pSrc->TP_UD_Byte, &buf[4], nLength, sizeof(buf)-4);	// 转换TP-DA到目标PDU串
		nLength = buf[3] + 4;		// nLength等于该段数据长度
	}
	else
	{
		// 7-bit编码方式
		buf[3] = nLength;			// 编码前长度
		nLength = gsmEncode7bit(pSrc->TP_UD_Byte, &buf[4], nLength+1, sizeof(buf)-4) + 4;	// 转换TP-DA到目标PDU串
	}
	nDstLength += gsmBytes2String(buf, &szDst[nDstLength], nLength,nDstSize-nDstLength);		// 转换该段数据到目标PDU串

	// 返回目标字符串长度
	return nDstLength;
}

//
// PDU解码，用于接收、阅读短消息
// 输入: pSrc - 源PDU串指针
// 输出: pDst - 目标PDU参数指针
// 返回: >= 0 用户信息串长度； -1 数据长度不够；-2 非法的数据
//
int CHwMobile::gsmDecodePdu ( char* pSrc, IN OUT int &nHandleBytes, SM_PARAM *pDst )
{
	ASSERT ( pSrc && nHandleBytes>0 && pDst );
	HwDbgLog ( L_DEBUG, _T("Pdu code is :\r\n%s"), GetCompatibleString(pSrc,FALSE) );
	const int nSrcLength = nHandleBytes;
	nHandleBytes = 0;
	int nDstLength=0;				// 目标PDU串长度
	unsigned int tmp=0;				// 内部用的临时字节变量
	BYTE buf[4096] = {0};	// 内部用的缓冲区

	// SMSC地址信息段
	gsmString2Bytes(pSrc+nHandleBytes, (BYTE *)&tmp, 2, sizeof(tmp) );	// 取长度
	tmp = (tmp - 1) * 2;			// SMSC号码串长度
	nHandleBytes += 4;						// 指针后移，忽略了SMSC地址格式
	if ( nHandleBytes > nSrcLength )
		return -1;
	if ( tmp >= sizeof ( pDst->SCA ) )
		return -2;
	gsmSerializeNumbers ( pSrc+nHandleBytes, pDst->SCA, tmp, sizeof(pDst->SCA) );	// 转换SMSC号码到目标PDU串
	nHandleBytes += tmp;		// 指针后移
	if ( nHandleBytes > nSrcLength )
		return -1;

	// TPDU段基本参数
	gsmString2Bytes(pSrc+nHandleBytes, (BYTE *)&tmp, 2, sizeof(tmp) );	// 取基本参数
	nHandleBytes += 2;			// 指针后移
	if ( nHandleBytes > nSrcLength )
		return -1;

	// 取回复号码
	gsmString2Bytes(pSrc+nHandleBytes, (BYTE *)&tmp, 2, sizeof(tmp) );	// 取长度
	if(tmp & 1) tmp += 1;	// 调整奇偶性
	nHandleBytes += 4;			// 指针后移，忽略了回复地址(TP-RA)格式
	if ( nHandleBytes > nSrcLength )
		return -1;
	// 取TP-RA号码
	if ( tmp >= sizeof ( pDst->TPA ) )
		return -2;
	gsmSerializeNumbers(pSrc+nHandleBytes, pDst->TPA, tmp, sizeof(pDst->TPA) );
	nHandleBytes += tmp;		// 指针后移
	if ( nHandleBytes > nSrcLength )
		return -1;

	// TPDU段协议标识、编码方式、用户信息等
	gsmString2Bytes(pSrc+nHandleBytes, (BYTE*)&pDst->TP_PID, 2, sizeof(pDst->TP_PID));	// 取协议标识(TP-PID)
	nHandleBytes += 2;		// 指针后移
	if ( nHandleBytes > nSrcLength )
		return -1;
	gsmString2Bytes(pSrc+nHandleBytes, (BYTE*)&pDst->TP_DCS, 2, sizeof(pDst->TP_DCS));	// 取编码方式(TP-DCS)
	nHandleBytes += 2;		// 指针后移
	if ( nHandleBytes > nSrcLength )
		return -1;
	gsmSerializeNumbers(pSrc+nHandleBytes, pDst->TP_SCTS, 14, sizeof(pDst->TP_SCTS));			// 服务时间戳字符串(TP_SCTS) 
	nHandleBytes += 14;		// 指针后移
	if ( nHandleBytes > nSrcLength )
		return -1;
	gsmString2Bytes ( pSrc+nHandleBytes, (BYTE *)&tmp, 2, sizeof(tmp) );			// 用户信息长度(TP-UDL)
	nHandleBytes += 2;		// 指针后移
	if ( nHandleBytes > nSrcLength )
		return -1;

	int nLength = 0;
	if ( GET_DCS(pDst->TP_DCS) == GSM_8BIT )
	{
		nLength = tmp * 2;
		if ( nHandleBytes + nLength > nSrcLength )
			return -1;
		// 8-bit解码
		nDstLength = gsmString2Bytes(pSrc+nHandleBytes, buf, nLength, sizeof(buf) );				// 格式转换
		nDstLength = gsmDecode8bit(buf, pDst->TP_UD_Byte, nDstLength, sizeof(pDst->TP_UD_Byte) );	// 转换到TP-DU
	}
	else if ( GET_DCS(pDst->TP_DCS) == GSM_UCS2 )
	{
		nLength = tmp * 2;
		if ( nHandleBytes + nLength > nSrcLength )
			return -1;
		// UCS2解码
		nDstLength = gsmString2Bytes(pSrc+nHandleBytes, buf, nLength, sizeof(buf) );				// 格式转换
		nDstLength = gsmDecodeUcs2(buf, pDst->TP_UD_Byte, nDstLength, sizeof(pDst->TP_UD_Byte) );	// 转换到TP-DU
	}
	else
	{
		// 7-bit解码
		nLength = (tmp & 7) ? ((int)tmp * 7 / 4 + 2) : ((int)tmp * 7 / 4);
		if ( nHandleBytes + nLength > nSrcLength )
			return -1;
		nDstLength = gsmString2Bytes(pSrc+nHandleBytes, buf, nLength, sizeof(buf) );				// 格式转换
		gsmDecode7bit(buf, pDst->TP_UD_Byte, nDstLength, sizeof(pDst->TP_UD_Byte) );				// 转换到TP-DU
		nDstLength = tmp;
	}

	nHandleBytes += nLength;		// 指针后移

	// 返回目标字符串长度
	return nDstLength;
}

//
// 字节数据转换为可打印字符串
// 如：{0xC8, 0x32, 0x9B, 0xFD, 0x0E, 0x01} --> "C8329BFD0E01" 
// 输入: pSrc - 源数据指针
//       nSrcLength - 源数据长度
// 输出: szDst - 目标字符串指针
// 返回: 目标字符串长度
//
int CHwMobile::gsmBytes2String(const BYTE *pSrc, char *szDst, int nSrcLength, int nDstSize)
{
	const char tab[]="0123456789ABCDEF";	// 0x0-0xf的字符查找表
	char *pDstTail = (char *)(szDst + nDstSize);

	for (int i = 0; i < nSrcLength; i++)
	{
		*szDst++ = tab[*pSrc >> 4];		// 输出高4位
		if ( (char*)szDst >= pDstTail ) break;
		*szDst++ = tab[*pSrc & 0x0f];	// 输出低4位
		if ( (char*)szDst >= pDstTail ) break;
		pSrc++;
	}

	// 输出字符串加个结束符
	*szDst = '\0';

	// 返回目标字符串长度
	return (nSrcLength * 2);
}

//
// 正常顺序的字符串转换为两两颠倒的字符串，若长度为奇数，补'F'凑成偶数
// 如："8613851872468" --> "683158812764F8"
// 输入: pSrc - 源字符串指针
//       nSrcLength - 源字符串长度
// 输出: szDst - 目标字符串指针
// 返回: 目标字符串长度
//
int CHwMobile::gsmInvertNumbers(const char *pSrc, char *szDst, int nSrcLength, int nDstSize)
{
	int nDstLength=0;	// 目标字符串长度
	char ch;			// 用于保存一个字符
	char *pDstTail = (char *)(szDst + nDstSize);

	// 复制串长度
	nDstLength = nSrcLength;

	// 两两颠倒
	for(int i=0; i<nSrcLength;i+=2)
	{
		ch = *pSrc++;		// 保存先出现的字符
		*szDst++ = *pSrc++;	// 复制后出现的字符
		if ( (char*)szDst >= pDstTail ) break;
		*szDst++ = ch;		// 复制先出现的字符
		if ( (char*)szDst >= pDstTail ) break;
	}

	// 源串长度是奇数吗？
	if(nSrcLength & 1)
	{
		*(szDst-2) = 'F';	// 补'F'
		nDstLength++;		// 目标串长度加1
	}

	// 输出字符串加个结束符
	*szDst = '\0';

	// 返回目标字符串长度
	return nDstLength;
}

//
// 两两颠倒的字符串转换为正常顺序的字符串
// 如："683158812764F8" --> "8613851872468"
// 输入: pSrc - 源字符串指针
//       nSrcLength - 源字符串长度
// 输出: szDst - 目标字符串指针
// 返回: 目标字符串长度
//
int CHwMobile::gsmSerializeNumbers(const char *pSrc, char *szDst, int nSrcLength, int nDstSize)
{
	int nDstLength=0;	// 目标字符串长度
	char ch;			// 用于保存一个字符
	char *pDstTail = (char *)(szDst + nDstSize);

	// 复制串长度
	nDstLength = nSrcLength;

	// 两两颠倒
	for(int i=0; i<nSrcLength;i+=2)
	{
		ch = *pSrc++;		// 保存先出现的字符
		*szDst++ = *pSrc++;	// 复制后出现的字符
		if ( (char*)szDst >= pDstTail ) break;
		*szDst++ = ch;		// 复制先出现的字符
		if ( (char*)szDst >= pDstTail ) break;
	}

	// 最后的字符是'F'吗？
	if(*(szDst-1) == 'F')
	{
		szDst--;
		nDstLength--;		// 目标字符串长度减1
	}