#include "44b0x.h"
#include "DataType.h"
#include "string.h"
#include "GB2312.h"
#include "UNICODE.h"
/*********************************************************************************
// 7-bit编码
// pSrc: 源字符串指针
// pDst: 目标编码串指针
// nSrcLength: 源字符串长度
// 返回: 目标编码串长度
**********************************************************************************/
int gsmEncode7bit(const char* pSrc, unsigned char* pDst, int nSrcLength)
{
int nSrc; // 源字符串的计数值
int nDst; // 目标编码串的计数值
int nChar; // 当前正在处理的组内字符字节的序号，范围是0-7
unsigned char nLeft; // 上一字节残余的数据
// 计数值初始化
nSrc = 0;
nDst = 0;
// 将源串每8个字节分为一组，压缩成7个字节
// 循环该处理过程，直至源串被处理完
// 如果分组不到8字节，也能正确处理
while(nSrc<nSrcLength)
{
// 取源字符串的计数值的最低3位
nChar = nSrc & 7;
// 处理源串的每个字节
if(nChar == 0)
{
// 组内第一个字节，只是保存起来，待处理下一个字节时使用
nLeft = *pSrc;
}
else
{
// 组内其它字节，将其右边部分与残余数据相加，得到一个目标编码字节
*pDst = (*pSrc << (8-nChar)) | nLeft;
// 将该字节剩下的左边部分，作为残余数据保存起来
nLeft = *pSrc >> nChar;
// 修改目标串的指针和计数值 pDst++;
nDst++;
}
// 修改源串的指针和计数值
pSrc++; nSrc++;
}
// 返回目标串长度
return nDst;
}
/****************************************************************************************
// 7-bit解码
// pSrc: 源编码串指针
// pDst: 目标字符串指针
// nSrcLength: 源编码串长度
// 返回: 目标字符串长度
***************************************************************************************/
int gsmDecode7bit(const unsigned char* pSrc, char* pDst, int nSrcLength)
{
int nSrc; // 源字符串的计数值
int nDst; // 目标解码串的计数值
int nByte; // 当前正在处理的组内字节的序号，范围是0-6
unsigned char nLeft; // 上一字节残余的数据
// 计数值初始化
nSrc = 0;
nDst = 0;
// 组内字节序号和残余数据初始化
nByte = 0;
nLeft = 0;
// 将源数据每7个字节分为一组，解压缩成8个字节
// 循环该处理过程，直至源数据被处理完
// 如果分组不到7字节，也能正确处理
while(nSrc<nSrcLength)
{
// 将源字节右边部分与残余数据相加，去掉最高位，得到一个目标解码字节
*pDst = ((*pSrc << nByte) | nLeft) & 0x7f;
// 将该字节剩下的左边部分，作为残余数据保存起来
nLeft = *pSrc >> (7-nByte);
// 修改目标串的指针和计数值
pDst++;
nDst++;
// 修改字节计数值
nByte++;
// 到了一组的最后一个字节
if(nByte == 7)
{
// 额外得到一个目标解码字节
*pDst = nLeft;
// 修改目标串的指针和计数值
pDst++;
nDst++;
// 组内字节序号和残余数据初始化
nByte = 0;
nLeft = 0;
}
// 修改源串的指针和计数值
pSrc++;
nSrc++;
}
*pDst = 0;
// 返回目标串长度
return nDst;
}
/************************************************************************************************************
需要指出的是，7-bit的字符集与ANSI标准字符集不完全一致，在0x20以下也排布了一些可打印字符，但英文字母、阿拉伯数字和常用符号的位置两者是一样的。用上面介绍的算法收发纯英文短消息，一般情况应该是够用了。如果是法语、德语、西班牙语等，含有 “?”、 “é”这一类字符，则要按上面编码的输出去查表，请参阅GSM 03.38的规定。
8-bit编码其实没有规定什么具体的算法，不需要介绍。
UCS2编码是将每个字符(1-2个字节)按照ISO/IEC10646的规定，转变为16位的Unicode宽字符。在Windows系统中，特别是在2000/XP中，可以简单地调用API 函数实现编码和解码。如果没有系统的支持，比如用单片机控制手机模块收发短消息，只好用查表法解决了。
Windows环境下，用C实现UCS2编码和解码的算法如下：
// UCS2编码
// pSrc: 源字符串指针
// pDst: 目标编码串指针
// nSrcLength: 源字符串长度
// 返回: 目标编码串长度
************************************************************************************************************/
/*int gsmEncodeUcs2(const char* pSrc, unsigned char* pDst, int nSrcLength)
{
int i,nDstLength; // UNICODE宽字符数目
wchar wchar[128]; // UNICODE串缓冲区
// 字符串-->UNICODE串
nDstLength = ::MultiByteToWideChar(CP_ACP, 0, pSrc, nSrcLength, char, 128);
// 高低字节对调，输出
for(i=0; i<nDstLength; i++)
{
// 先输出高位字节
*pDst++ = wchar[i] >> 8;
// 后输出低位字节
*pDst++ = wchar[i] & 0xff;
}
// 返回目标编码串长度
return nDstLength * 2;
}*/
/********************************************************************************************************
// UCS2解码
// pSrc: 源编码串指针
// pDst: 目标字符串指针
// nSrcLength: 源编码串长度
// 返回: 目标字符串长度
*******************************************************************************************************/
int gsmDecodeUcs2(unsigned char* pSrc, char* pDst,int pt)
{
int i,j;
U16 wchar; // UNICODE串缓冲区
// 高低字节对调，拼成UNICODE
pSrc=pSrc+pt;
pDst=pDst+pt;
if(*pSrc!=0)
return -1;
for(i=0; i<140; i++)
{
// 先高位字节
if(*pSrc==0){
pSrc++;
if(*pSrc!=0){
* pDst=*pSrc;
pDst++;
pSrc++;
}
else{
for(i=0;i<10;i++){
* pDst=0;
pDst++;
}
return -1;
}
}
else{
wchar = (U16)(*pSrc<<8);
pSrc++;
wchar |=(U16)*pSrc;
pSrc++;
for(j=0;j<sizeof(UNICODE);j++){
if(wchar==0x0d0a){
* pDst=0;
pDst++;
* pDst=0;
break;
}
if(UNICODE[j]==wchar){
wchar=GB2312[j];
*pDst=(char)(wchar >> 8);
pDst++;
*pDst=(char)wchar;
pDst++;
break;
}
}
}
}
return 0;
}
/*int gsmDecodeUcs2(const unsigned char* pSrc, char* pDst, int nSrcLength)
{
int i,j,nDstLength;
U16 wchar; // UNICODE串缓冲区
// 高低字节对调，拼成UNICODE
for(i=0; i<nSrcLength/2; i++)
{
// 先高位字节
wchar = (U16)(*pSrc++ << 8);
// 后低位字节
wchar |= (U16)(*pSrc++);
for(j=0;j<sizeof(UNICODE);j++){
if(UNICODE[j]==wchar){
wchar=GB2312[j];
*pDst=(char)wchar;
pDst++;
*pDst=(char)(wchar >> 8);
pDst++;
nDstLength++;
}
}
}
pDst[nDstLength] = NULL;
}*/
/*int gsmDecodeUcs2(const unsigned char* pSrc, char* pDst, int nSrcLength)
{
int i,nDstLength; // UNICODE宽字符数目
wchar wchar[128]; // UNICODE串缓冲区
// 高低字节对调，拼成UNICODE
for(i=0; i<nSrcLength/2; i++)
{
// 先高位字节
wchar[i] = *pSrc++ << 8;
// 后低位字节
wchar[i] |= *pSrc++;
}
// UNICODE串-->字符串
nDstLength = ::WideCharToMultiByte(CP_ACP, 0, wchar, nSrcLength/2, pDst, 160, NULL, NULL);
// 输出字符串加个结束符
pDst[nDstLength] = '\0';
// 返回目标字符串长度
return nDstLength;
}
/***********************************************************************************************************
用以上编码和解码模块，还不能将短消息字符串编码为PDU串需要的格式，也不能直接将PDU串中的用户信息解码为短消息字符串，因为还差一个在可打印字符串和字节数据之间相互转换的环节。可以循环调用sscanf和sprintf函数实现这种变换。下面提供不用这些函数的算法，它们也适用于单片机、 DSP编程环境。
// 可打印字符串转换为字节数据
// 如："C8329BFD0E01" --> {0xC8, 0x32, 0x9B, 0xFD, 0x0E, 0x01}
// pSrc: 源字符串指针
// pDst: 目标数据指针
// nSrcLength: 源字符串长度
// 返回: 目标数据长度
**********************************************************************************************************/
int gsmString2Bytes(const char* pSrc, unsigned char* pDst, int nSrcLength)
{
int i;
for(i=0; i<nSrcLength; i+=2)
{
// 输出高4位
if(*pSrc>='0' && *pSrc<='9')
{
*pDst = (*pSrc - '0') << 4;
}
else
{
*pDst = (*pSrc - 'A' + 10) << 4;
}
pSrc++;
// 输出低4位
