SMS C语言的代码

转载大虾的非常难得的用C编写短信收发 
  
// 字节数据转换为可打印字符串   
// 如：{0xC8, 0x32, 0x9B, 0xFD, 0x0E, 0x01} --> "C8329BFD0E01"    
// 输入: pSrc - 源数据指针   
//       nSrcLength - 源数据长度   
// 输出: pDst - 目标字符串指针   
// 返回: 目标字符串长度   
int gsmBytes2String(const unsigned char* pSrc, char* pDst, int nSrcLength)  
{  
    const char tab[]="0123456789ABCDEF";    // 0x0-0xf的字符查找表   
  
    for (int i = 0; i < nSrcLength; i++)  
    {  
        *pDst++ = tab[*pSrc >> 4];        // 输出高4位   
        *pDst++ = tab[*pSrc & 0x0f];    // 输出低4位   
        pSrc++;  
    }  
  
    // 输出字符串加个结束符   
    *pDst = '/0';     
  
    // 返回目标字符串长度   
    return (nSrcLength * 2);  
}   
   
  
// 7bit解码   
// 输入: pSrc - 源编码串指针   
//       nSrcLength - 源编码串长度   
// 输出: pDst - 目标字符串指针   
// 返回: 目标字符串长度   
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) nLeft="*pSrc" 将该字节剩下的左边部分，作为残余数据保存起来 0x7f; & nLeft) | nByte) << *pDst="((*pSrc" 将源字节右边部分与残余数据相加，去掉最高位，得到一个目标解码字节 {>> (7-nByte);  
  
        // 修改目标串的指针和计数值   
        pDst++;  
        nDst++;  
  
        // 修改字节计数值   
        nByte++;  
  
        // 到了一组的最后一个字节   
        if(nByte == 7)  
        {  
            // 额外得到一个目标解码字节   
            *pDst = nLeft;  
  
            // 修改目标串的指针和计数值   
            pDst++;  
            nDst++;  
  
            // 组内字节序号和残余数据初始化   
            nByte = 0;  
            nLeft = 0;  
        }  
  
        // 修改源串的指针和计数值   
        pSrc++;  
        nSrc++;  
    }  
  
    // 输出字符串加个结束符   
    *pDst = '/0';  
  
    // 返回目标串长度   
    return nDst;  
}  
  
// 8bit编码   
// 输入: pSrc - 源字符串指针   
//       nSrcLength - 源字符串长度   
// 输出: pDst - 目标编码串指针   
// 返回: 目标编码串长度   
int gsmEncode8bit(const char* pSrc, unsigned char* pDst, int nSrcLength)  
{  
    // 简单复制   
    memcpy(pDst, pSrc, nSrcLength);  
  
    return nSrcLength;  
}  
  
// 8bit解码   
// 输入: pSrc - 源编码串指针   
//       nSrcLength -  源编码串长度   
// 输出: pDst -  目标字符串指针   
// 返回: 目标字符串长度   
int gsmDecode8bit(const unsigned char* pSrc, char* pDst, int nSrcLength)  
{  
    // 简单复制   
    memcpy(pDst, pSrc, nSrcLength);  
  
    // 输出字符串加个结束符   
    *pDst = '/0';  
  
    return nSrcLength;  
}  
  
// UCS2编码   
// 输入: pSrc - 源字符串指针   
//       nSrcLength - 源字符串长度   
// 输出: pDst - 目标编码串指针   
// 返回: 目标编码串长度   
int gsmEncodeUcs2(const char* pSrc, unsigned char* pDst, int nSrcLength)  
{  
    int nDstLength;     // UNICODE宽字符数目   
    WCHAR wchar[128];   // UNICODE串缓冲区   
  
    // 字符串-->UNICODE串   
    nDstLength = MultiByteToWideChar(CP_ACP, 0, pSrc, nSrcLength, wchar, 128);  
  
    // 高低字节对调，输出   
    for(int i=0; i<NDSTLENGTH; { *pDst++="wchar[i]" i++)>> 8;        // 先输出高位字节   
        *pDst++ = wchar[i] & 0xff;      // 后输出低位字节   
    }  
//  TRACE("%s",wchar);   
    // 返回目标编码串长度   
    return nDstLength * 2;  
}  
  
// UCS2解码   
// 输入: pSrc - 源编码串指针   
//       nSrcLength -  源编码串长度   
// 输出: pDst -  目标字符串指针   
// 返回: 目标字符串长度   
int gsmDecodeUcs2(const unsigned char* pSrc, char* pDst, int nSrcLength)  
{  
    int nDstLength;     // UNICODE宽字符数目   
    WCHAR wchar[128];   // UNICODE串缓冲区   
  
    // 高低字节对调，拼成UNICODE   
    for(int i=0; i<NSRCLENGTH |="*pSrc++;" << { i++) UNICODE串-- } 后低位字节 wchar[i]="*pSrc++" 先高位字节 8; 2;>字符串  
    nDstLength = WideCharToMultiByte(CP_ACP, 0, wchar, nSrcLength/2, pDst, 160, NULL, NULL);  
  
    // 输出字符串加个结束符   
    pDst[nDstLength] = '/0';  
  
    // 返回目标字符串长度   
    return nDstLength;  
}  
  
// 正常顺序的字符串转换为两两颠倒的字符串，若长度为奇数，补'F'凑成偶数   
// 如："8613851872468" --> "683158812764F8"   
// 输入: pSrc - 源字符串指针   
//       nSrcLength - 源字符串长度   
// 输出: pDst - 目标字符串指针   
// 返回: 目标字符串长度   
int gsmInvertNumbers(const char* pSrc, char* pDst, int nSrcLength)  
{  
    int nDstLength;     // 目标字符串长度   
    char ch;            // 用于保存一个字符   
  
    // 复制串长度   
    nDstLength = nSrcLength;  
  
    // 两两颠倒   
    for(int i=0; i<NSRCLENGTH;I+=2) & *pDst="/0" { *pDst++="*pSrc++;" } -- 如：?683158812764F8? 两两颠倒的字符串转换为正常顺序的字符串 nDstLength; return 返回目标字符串长度 ; 输出字符串加个结束符 目标串长度加1 nDstLength++; 补?F? *(pDst-2)="F" 1) if(nSrcLength 源串长度是奇数吗？ 复制先出现的字符 复制后出现的字符 保存先出现的字符 ch="*pSrc++;"> "8613851872468"  
// 输入: pSrc - 源字符串指针   
//       nSrcLength - 源字符串长度   
// 输出: pDst - 目标字符串指针   
// 返回: 目标字符串长度   
int gsmSerializeNumbers(const char* pSrc, char* pDst, int nSrcLength)  
{  
    int nDstLength;     // 目标字符串长度   
    char ch;            // 用于保存一个字符   
  
    // 复制串长度   
    nDstLength = nSrcLength;  
  
    // 两两颠倒   
    for(int i=0; i<NSRCLENGTH;I+=2) *pDst="/0" { *pDst++="*pSrc++;" } nDstLength; return 返回目标字符串长度 ; 输出字符串加个结束符 复制先出现的字符 复制后出现的字符 保存先出现的字符 ch="*pSrc++;" nLength="strlen(pSrc-" SMSC地址信息段 内部用的缓冲区 buf[256]; char unsigned 目标PDU串长度 int 内部用的串长度 nLength; pDst) char* pSrc, SM_PARAM* gsmEncodePdu(const 返回: 目标PDU串指针 - pDst 输出: 源PDU参数指针 pSrc 输入: PDU编码，用于编制、发送短消息 目标字符串长度减1 nDstLength--; pDst--; ?F?) if(*(pDst-1)="=" 最后的字符是?F?吗？>SCA);   // SMSC地址字符串的长度    
    buf[0] = (char)((nLength & 1) == 0 ? nLength : nLength + 1) / 2 + 1;    // SMSC地址信息长度   
//  TRACE("%c",buf[0]);   
    buf[1] = 0x91;      // 固定: 用国际格式号码   
    nDstLength = gsmBytes2String(buf, pDst, 2);     // 转换2个字节到目标PDU串   
//  TRACE("%s",pDst);   
    nDstLength += gsmInvertNumbers(pSrc->SCA, &pDst[nDstLength], nLength);   // 转换SMSC号码到目标PDU串   
//  TRACE("%s",pDst);   
  
    // 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串    
   
     
// 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); // 取长度   
    if(tmp & 1) 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;  
}  
  
  
// 初始化GSM状态   
BOOL gsmInit()  
{  
    char ans[128];      // 应答串   
  
    // 测试GSM-MODEM的存在性   
    WriteComm("AT/r", 3);  
    ReadComm(ans, 128);  
    if (strstr(ans, "OK") == NULL)  return FALSE;  
  
    // ECHO OFF   
    WriteComm("ATE0/r", 5);  
    ReadComm(ans, 128);  
  
    // PDU模式   
    WriteComm("AT+CMGF=0/r", 10);  
    ReadComm(ans, 128);  
  
    return TRUE;  
}  
  
  
// 发送短消息，仅发送命令，不读取应答   
// 输入: pSrc - 源PDU参数指针   
  
int gsmSendMessage(SM_PARAM* pSrc)  
{  
    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结束   
//  TRACE("%s", pdu);  //zhao   
    gsmString2Bytes(pdu, &nSmscLength, 2);  // 取PDU串中的SMSC信息长度   
    nSmscLength++;      // 加上长度字节本身   
  
    // 命令中的长度，不包括SMSC信息长度，以数据字节计   
    sprintf(cmd, "AT+CMGS=%d/r", nPduLength / 2 - nSmscLength); // 生成命令   
  
//  TRACE("%s", cmd);     
//  TRACE("%s/n", pdu);   
  
    WriteComm(cmd, strlen(cmd));    // 先输出命令串   
  
    nLength = ReadComm(ans, 128);   // 读应答数据   
  
    // 根据能否找到"/r/n> "决定成功与否   
    if(nLength == 4 && strncmp(ans, "/r/n> ", 4) == 0)  
    {  
        return WriteComm(pdu, strlen(pdu));     // 得到肯定回答，继续输出PDU串   
    }  
  
    return 0;  
}  
  
  
// 读取短消息，仅发送命令，不读取应答   
// 用+CMGL代替+CMGR，可一次性读出全部短消息   
  
int gsmReadMessageList()  
{  
    return WriteComm("AT+CMGL/r", 8);  //zhao    
}  
  
  
// 删除短消息，仅发送命令，不读取应答   
// 输入: index - 短消息序号，1-255   
  
int gsmDeleteMessage(int index)  
{  
    char cmd[16];       // 命令串   
  
    sprintf(cmd, "AT+CMGD=%d/r", index);    // 生成命令   
  
    // 输出命令串   
    return WriteComm(cmd, strlen(cmd));  
}  
  
// 读取GSM MODEM的应答，可能是一部分   
// 输出: pBuff - 接收应答缓冲区   
// 返回: GSM MODEM的应答状态, GSM_WAIT/GSM_OK/GSM_ERR   
// 备注: 可能需要多次调用才能完成读取一次应答，首次调用时应将pBuff初始化   
  
int gsmGetResponse(SM_BUFF* pBuff)  
{  
    int nLength;        // 串口收到的数据长度   
    int nState;  
  
    // 从串口读数据，追加到缓冲区尾部   
    nLength = ReadComm(&pBuff->data[pBuff->len], 128);      
    pBuff->len += nLength;  
  
    // 确定GSM MODEM的应答状态   
    nState = GSM_WAIT;  
    if ((nLength > 0) && (pBuff->len >= 4))  
    {  
        if (strncmp(&pBuff->data[pBuff->len - 4], "OK/r/n", 4) == 0)  nState = GSM_OK;  
        else if (strstr(pBuff->data, "+CMS ERROR") != NULL) nState = GSM_ERR;  
    }  
  
    return nState;  
}  
  
  
// 从列表中解析出全部短消息   
// 输入: pBuff - 短消息列表缓冲区   
// 输出: pMsg - 短消息缓冲区   
// 返回: 短消息条数   
int gsmParseMessageList(SM_PARAM* pMsg, SM_BUFF* pBuff)  
{  
    int nMsg;           // 短消息计数值   
    char* ptr;          // 内部用的数据指针   
  
    nMsg = 0;  
    ptr = pBuff->data;  
  
    // 循环读取每一条短消息, 以"+CMGL:"开头   
    while((ptr = strstr(ptr, "+CMGL:")) != NULL)  
    {  
        ptr += 6;       // 跳过"+CMGL:", 定位到序号   
        sscanf(ptr, "%d", &pMsg->index); // 读取序号   
//      TRACE("  index=%d/n",pMsg->index);   
  
        ptr = strstr(ptr, "/r/n");  // 找下一行   
        if (ptr != NULL)  
        {  
            ptr += 2;       // 跳过"/r/n", 定位到PDU   
              
            gsmDecodePdu(ptr, pMsg);    // PDU串解码   
  
            pMsg++;     // 准备读下一条短消息   
            nMsg++;     // 短消息计数加1   
        }  
    }  
  
    return nMsg;  
}