#include "stdafx.h"
#include "sms.h"
int  gsmDecode8bit(const unsigned char *pSrc, char *pDst, int nSrcLength)
{
	// 簡單復制
	memcpy(pDst, pSrc, nSrcLength);
	// 輸出字符串加個結束符
	*pDst = '\0';
	return nSrcLength;
}

int gsmEncode8bit(const char *pSrc, unsigned char *pDst, int nSrcLength)
{
	// 簡單復制
	memcpy(pDst, pSrc, nSrcLength);

	return nSrcLength;
}

int gsmDecodeUcs2(const unsigned char* pSrc, char* pDst, int nSrcLength)
{
	int nDstLength;        // UNICODE寬字符數目
    WCHAR wchar[128];      // UNICODE串緩沖區
    
    // 高低字節對調，拼成UNICODE
    for(int 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;
}

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; i++)
    {
// 先輸出高位字節
        *pDst++ = wchar[i] >> 8;
        // 后輸出低位字節
        *pDst++ = wchar[i] & 0xff;
    }
    
    // 返回目標編碼串長度
    return nDstLength * 2;
}

  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;

	
}

 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; 
	
}

 int  gsmString2Bytes(const char* pSrc, unsigned char* pDst, int nSrcLength)
{
	
	for(int i=0; i<nSrcLength; i+=2)
    {
        // 輸出高4位
        if(*pSrc>='0' && *pSrc<='9')
        {
            *pDst = (*pSrc - '0') << 4;
		}
        else
        {
            *pDst = (*pSrc - 'A' + 10) << 4;
        }
    
        pSrc++;
// 輸出低4位
        if(*pSrc>='0' && *pSrc<='9')
        {
            *pDst |= *pSrc - '0';
        }
        else
		{
            *pDst |= *pSrc - 'A' + 10;
        }
        pSrc++;
        pDst++;
    }
    
    // 返回目標數據長度
    return nSrcLength / 2;
	
}

 int  gsmBytes2String(const unsigned char* pSrc, char* pDst, int nSrcLength)
{
	
	const char tab[]="0123456789ABCDEF";    // 0x0-0xf的字符查找表
    
    for(int i=0; i<nSrcLength; i++)
    {
		// 輸出低4位
        *pDst++ = tab[*pSrc >> 4];
                                        
        // 輸出高4位
        *pDst++ = tab[*pSrc & 0x0f];
    
        pSrc++;
	}
    
    // 輸出字符串加個結束符
    *pDst = '\0';
    
    // 返回目標字符串長度
    return nSrcLength * 2;
}

int  ReadComm(HANDLE hComm,void* pData, int nLength)
{
	
	DWORD dwNumRead;    // 串口收到的數據長度    
    ReadFile(hComm, pData, (DWORD)nLength, &dwNumRead, NULL);
    
    return (int)dwNumRead;
}



bool  WriteComm(HANDLE hComm,void* pData, int nLength)
{
	
	DWORD dwNumWrite;    // 串口發出的數據長度
    
    return WriteFile(hComm, pData, (DWORD)nLength, &dwNumWrite, NULL);
}


/*
  bool  CloseComm(HANDLE hComm)
{
	
	return CloseHandle(hComm);
}

  HANDLE  OpenComm(const char* pPort, int nBaudRate, int nParity, int nByteSize, int nStopBits)
{
	
	HANDLE  hComm;
	DCB dcb;        // 串口控制塊
    COMMTIMEOUTS timeouts = {    // 串口超時控制參數
        100,        // 讀字符間隔超時時間: 100 ms
        1,          // 讀操作時每字符的時間: 1 ms (n個字符總共為n ms)
        500,        // 基本的(額外的)讀超時時間: 500 ms
        1,          // 寫操作時每字符的時間: 1 ms (n個字符總共為n ms)
        100};       // 基本的(額外的)寫超時時間: 100 ms
    
    hComm = CreateFile(pPort,    // 串口名稱或設備路徑
            GENERIC_READ | GENERIC_WRITE,    // 讀寫方式
            0,               // 共享方式：獨占
            NULL,            // 默認的安全描述符
            OPEN_EXISTING,   // 創建方式
            0,               // 不需設置文件屬性
            NULL);           // 不需參照模板文件
    
    if(hComm == INVALID_HANDLE_VALUE) return FALSE;        // 打開串口失敗
    
    GetCommState(hComm, &dcb);        // 取DCB
    
    dcb.BaudRate = nBaudRate;
    dcb.ByteSize = nByteSize;
    dcb.Parity = nParity;
    dcb.StopBits = nStopBits;
    
    SetCommState(hComm, &dcb);        // 設置DCB
    
    SetupComm(hComm, 4096, 1024);     // 設置輸入輸出緩沖區大小
    
    SetCommTimeouts(hComm, &timeouts);    // 設置超時
    
    return hComm;
}
*/

bool  gsmDeleteMessage(HANDLE Fcomm,const int index)
{
	
	int nLength;          // 串口收到的數據長度
    char cmd[16];         // 命令串
    char ans[128];        // 應答串
    
    sprintf(cmd, "AT+CMGD=%d\r", index);    // 生成命令
    
    // 輸出命令串
    WriteComm(Fcomm,cmd, strlen(cmd));
    
    // 讀應答數據
    nLength = ReadComm(Fcomm,ans, 128);
    
    // 根據能否找到"+CMS ERROR"決定成功與否
    if(nLength > 0 && strncmp(ans, "+CMS ERROR", 10) != 0)
    {
        return TRUE;
    }
   return FALSE;
}

int  gsmReadMessage(HANDLE Fcomm,SM_PARAM* pMsg,int index)
{
	int nLength;        // 串口收到的數據長度
    int nMsg;           // 短消息計數值
    char* ptr;          // 內部用的數據指針
	char *ptr1;
	char *ptr2;
	char *ptr3;
    char cmd[16];       // 命令串
    char ans[1024];     // 應答串
    nMsg = 0;
    ptr = ans;