WINCE GPS 虚拟串口

// Defines the entry point for the DLL application.
//

#include "stdafx.h"

//#define LOG_CALLS

char * atoh = "0123456789ABCDEF";

//             "   0    1    2    3    4    5    6    7    8    9 : ; < = > ? @    A    B    C    D    E    F"
BYTE htoa1[] = {0x00,0x10,0x20,0x30,0x40,0x50,0x60,0x70,0x80,0x90,0,0,0,0,0,0,0,0xA0,0xB0,0xC0,0xD0,0xE0,0xF0};
BYTE htoa2[] = {0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0,0,0,0,0,0,0,0x0A,0x0B,0x0C,0x0D,0x0E,0x0F};

void Convert( LPVOID pBuffer, DWORD Count )
{
    char* pCh = (char*)pBuffer;
    char ch, crc1, crc2; DWORD nCRC; BYTE state = 10;
    for (DWORD i=0;i<Count; i++)
    {
        ch = pCh[i];

        if (ch == '$')
            state = 11;
        else
        {
            switch ( state )
            {
    //        case 10: state = ch == '$'? 11:10; break;
            case 11: state = ch == 'G'? 12:10; break;
            case 12: state = ch == 'P'? 13:10; break;
            case 13: state = ch == 'R'? 14:10; break;
            case 14: state = ch == 'M'? 15:10; break;
            case 15: state = ch == 'C'? 16:10; break;
            case 16: state = ch == ','? 20:10; break;

            case 20:     if (ch == 'A') state = 21; break;
            case 21: state = ch == '*'? 22:20; break;
            case 22:
                    crc1 = ch; state = 23; break;
            case 23:
                {
                    crc2 = ch;

                    // get the crc
                    nCRC = htoa1[crc1 - '0'] + htoa2[crc2 - '0'];

                    // remove the chars we are deleting
                    nCRC -= 'A';
                    nCRC -= ',';

                    // ... ,,A*72\n
                    //          ^ current pos
                    //      ^ current pos

                    pCh[i-4]='*';
                    pCh[i-3]=atoh[(nCRC & 0xF0) >> 4];
                    pCh[i-2]=atoh[ nCRC & 0x0F ];
                    pCh[i-1]=13;
                    pCh[i-0]=10;

                    state = 10;
                }
                break;
            }
        }
    }
}


#ifdef LOG_CALLS
void Log(LPCTSTR szStr, bool bLF = true)
{
    HANDLE hFile = CreateFile ( _T("\\log.txt"), GENERIC_WRITE, FILE_SHARE_READ, NULL, OPEN_ALWAYS, FILE_ATTRIBUTE_NORMAL | FILE_FLAG_WRITE_THROUGH, NULL);

    SetFilePointer( hFile, 0, 0, FILE_END );

    DWORD dwLen;
    BOOL bOK = WriteFile( hFile, szStr, _tcslen(szStr)*sizeof(TCHAR), &dwLen, NULL );

    WriteFile( hFile, _T("\n"), _tcslen(_T("\n")), &dwLen, NULL );

    CloseHandle( hFile );

    OutputDebugString( szStr );
/*
    FILE *f = fopen("\\DemoDriverLog.txt", "a");
    fprintf(f, "%u", GetTickCount());
    fprintf(f, "%s", szStr);
    if (bLF)
        fprintf(f, "\n");
    fflush(f);
    fclose(f);
*/
}
#endif

GPSVIRTUALDRIVERDLL_API DWORD COM_Init(LPCTSTR pContext, LPCVOID lpvBusContext);
GPSVIRTUALDRIVERDLL_API BOOL COM_Deinit( DWORD hDeviceContext );
GPSVIRTUALDRIVERDLL_API DWORD COM_Open( DWORD hDeviceContext, DWORD AccessCode, DWORD ShareMode );
GPSVIRTUALDRIVERDLL_API BOOL COM_Close( DWORD hOpenContext );
GPSVIRTUALDRIVERDLL_API BOOL COM_IOControl( DWORD hOpenContext, DWORD dwCode, PBYTE pBufIn, DWORD dwLenIn, PBYTE pBufOut, DWORD dwLenOut, PDWORD pdwActualOut );
GPSVIRTUALDRIVERDLL_API void COM_PowerUp( DWORD hDeviceContext );
GPSVIRTUALDRIVERDLL_API void COM_PowerDown( DWORD hDeviceContext );
GPSVIRTUALDRIVERDLL_API DWORD COM_Read( DWORD hOpenContext, LPVOID pBuffer, DWORD Count );
GPSVIRTUALDRIVERDLL_API DWORD COM_Write( DWORD hOpenContext, LPCVOID pBuffer, DWORD Count );
GPSVIRTUALDRIVERDLL_API DWORD COM_Seek( DWORD hOpenContext, long Amount, WORD Type );

#define DEVICE_CONTEXT    0x1450
#define OPEN_CONTEXT 0x1451

HANDLE hComm = INVALID_HANDLE_VALUE;
DWORD dwManageIndex = 1;

unsigned char tmpbuf[2048];

BOOL APIENTRY DllMain( HANDLE hModule,
                      DWORD  ul_reason_for_call,
                      LPVOID lpReserved
                      )
{
    switch ( ul_reason_for_call )
    {
    case DLL_PROCESS_ATTACH:
        break;
    case DLL_PROCESS_DETACH:
        break;
    case DLL_THREAD_ATTACH:
        break;
    case DLL_THREAD_DETACH:
        break;
    }
    return TRUE;
}

GPSVIRTUALDRIVERDLL_API DWORD COM_Init( LPCTSTR pContext, LPCVOID lpvBusContext)
{
#ifdef LOG_CALLS
    Log(_T("Init\n"));
#endif

    DWORD Index = 0;
    HKEY hKey;
    if (RegOpenKeyEx(HKEY_LOCAL_MACHINE, pContext, 0, 0, &hKey) == ERROR_SUCCESS)
    {
        TCHAR szDriverKey[255];
        DWORD dwSize = 255;
        DWORD dwType;

        RETAILMSG(1,(TEXT("COM_Init, pContext = %s\r\n"), pContext));


        if (RegQueryValueEx(hKey, L"Key", 0, &dwType, (BYTE *)szDriverKey, &dwSize) == ERROR_SUCCESS)
        {
            RegCloseKey(hKey);
            if (RegOpenKeyEx(HKEY_LOCAL_MACHINE, szDriverKey, 0, 0, &hKey) == ERROR_SUCCESS)
            {
                dwSize=4;
                if (RegQueryValueEx(hKey, L"Index", 0, &dwType, (BYTE *)&Index, &dwSize) != ERROR_SUCCESS)
                    Index = 0;
                RegCloseKey(hKey);
            }
        }
    }
    if (Index != 0)
        dwManageIndex = Index;




    return DEVICE_CONTEXT;
}

GPSVIRTUALDRIVERDLL_API BOOL COM_Deinit( DWORD hDeviceContext )
{
    if (hDeviceContext != DEVICE_CONTEXT)
    {
#ifdef LOG_CALLS
        Log(_T("False Deinst\n"));
#endif
        return FALSE;
    }

#ifdef LOG_CALLS
    Log(_T("DeInit\n"));
#endif
    return TRUE;
}

GPSVIRTUALDRIVERDLL_API DWORD COM_Open( DWORD hDeviceContext, DWORD AccessCode, DWORD ShareMode )
{
    if (hDeviceContext != DEVICE_CONTEXT)
    {
#ifdef LOG_CALLS
        Log(_T("False Open\n"));
#endif
        return 0;
    }


#ifdef LOG_CALLS
    TCHAR buf[255];
    _stprintf(buf, _T("Open port %s for access %u and share %u %s\n"), szPort, AccessCode, ShareMode, hComm ? _T("OK") : _T("Failed"));
    Log(buf);
#endif



    return OPEN_CONTEXT;
}

GPSVIRTUALDRIVERDLL_API BOOL COM_Close( DWORD hOpenContext )
{
    if (hOpenContext != OPEN_CONTEXT)
    {
#ifdef LOG_CALLS
        Log(_T("False Close\n"));
#endif
        return 0;
    }

#ifdef LOG_CALLS
    Log(_T("Close\n"));
#endif
    BOOL bRet = CloseHandle(hComm);
    hComm = INVALID_HANDLE_VALUE;
    return bRet;
}

GPSVIRTUALDRIVERDLL_API BOOL COM_IOControl( DWORD hOpenContext, DWORD dwCode, PBYTE pBufIn, DWORD dwLenIn, PBYTE pBufOut, DWORD dwLenOut, PDWORD pdwActualOut )
{
    if (hOpenContext != OPEN_CONTEXT)
    {
#ifdef LOG_CALLS
        Log(_T("False IOControl\n"));
#endif
        return 0;
    }

#ifdef LOG_CALLS
    TCHAR buf[255];
    _stprintf(buf, _T("Control code=%u, inlen=%u\n"), dwCode, dwLenIn);
    Log(buf);
#endif

    BOOL bRet=DeviceIoControl(
        hComm,
        dwCode,
        pBufIn,
        dwLenIn,
        pBufOut,
        dwLenOut,
        pdwActualOut,
        NULL);

#ifdef LOG_CALLS
    _stprintf(buf, _T("IOControl return bRet=%d, outlen=%u\n"), bRet, *pdwActualOut);
    Log(buf);
#endif

    return bRet;
}

GPSVIRTUALDRIVERDLL_API void COM_PowerUp( DWORD hDeviceContext )
{
}

GPSVIRTUALDRIVERDLL_API void COM_PowerDown( DWORD hDeviceContext )
{
}

GPSVIRTUALDRIVERDLL_API DWORD COM_Read( DWORD hOpenContext, LPVOID pBuffer, DWORD Count )
{
    
    DWORD dwBytes = 0;




   


    
    if (hOpenContext != OPEN_CONTEXT)
    {
#ifdef LOG_CALLS
        Log(_T("False Read\n"));
#endif
        return 0;
    }

    if(dwManageIndex==6)
    {
      hComm = CreateFile(
        _T("\\log6.txt"),
        GENERIC_READ,
        FILE_SHARE_READ,
        NULL,
        OPEN_EXISTING,
        FILE_ATTRIBUTE_NORMAL,
        NULL);
        
      //if(hComm!=INVALID_HANDLE_VALUE)Count=GetFileSize(hComm, NULL);

      RETAILMSG(1,(TEXT("open log6.txt %d\r\n"),Count));

    }


    if(dwManageIndex==9)
    {
      hComm = CreateFile(
        _T("\\log9.txt"),
        GENERIC_READ,
        FILE_SHARE_READ,
        NULL,
        OPEN_EXISTING,
        FILE_ATTRIBUTE_NORMAL,
        NULL);

      //if(hComm!=INVALID_HANDLE_VALUE)Count=GetFileSize(hComm, NULL);

       RETAILMSG(1,(TEXT("open log9.txt %d\r\n"),Count));
    }


    //if(Count==0xFFFFFFFF)Count＝0;

 



    
    if(hComm!=INVALID_HANDLE_VALUE)
    {

           SetFilePointer( hComm, 0, 0, FILE_BEGIN );

       ReadFile(hComm, tmpbuf,512, &dwBytes, NULL);



       RETAILMSG(1,(TEXT("read txt %x%x%x  %x\r\n"),tmpbuf[0],tmpbuf[1],tmpbuf[2],dwBytes));

       

       CloseHandle(hComm);

       if(dwManageIndex==6)
       {
          DeleteFile(_T("\\log6.txt"));
       }
        
        
       if(dwManageIndex==9)
       {
         DeleteFile(_T("\\log9.txt"));
       }


    }

    
        pBuffer=&tmpbuf[0];


    //Convert( pBuffer, dwBytes );

#ifdef LOG_CALLS
    TCHAR buf[100];
    _stprintf( buf, _T("Read max=%u, read count: %u\n"), Count, dwBytes );
    Log(buf);
#endif

    return dwBytes;
}

GPSVIRTUALDRIVERDLL_API DWORD COM_Write( DWORD hOpenContext, LPCVOID pBuffer, DWORD Count )
{
    if (hOpenContext != OPEN_CONTEXT)
    {
#ifdef LOG_CALLS
        Log(_T("False Write\n"));
#endif
        return 0;
    }

#ifdef LOG_CALLS
    TCHAR buf[255];
    _stprintf(buf, _T("Write bytes=%u\n"), Count);
    Log(buf);
#endif
    DWORD dwBytes = 0;
    //WriteFile(hComm, pBuffer, Count, &dwBytes, NULL);
    return dwBytes;
}

GPSVIRTUALDRIVERDLL_API DWORD COM_Seek( DWORD hOpenContext, long Amount, WORD Type )
{
#ifdef LOG_CALLS
    TCHAR buf[255];
    _stprintf(buf, _T("Seek Amount=%u, Type=%u\n"), Amount, Type);
    Log(buf);
#endif

    return 0;
}