// cl /Zi /D_NO_WINDOWS /D_NO_RAPI /EHsc /I ..\common /DW32TST atcmdmon.cpp ..\common\debug.cpp ..\common\stringutils.cpp ..\common\vectorutils.cpp  /link /subsystem:console
// 

#include  <windows.h>

#ifndef W32TST
#include  "cenk.h"
#include  "kernelmisc.h"
#endif

#include  "vectorutils.h"
#include  "stringutils.h"
#include "debug.h"

#define HTC_TYPHOON  0
#define HTC_STARTREK 1
#define HTC_HERALD   2
static int g_devtype=-1;

template <typename T>
void read_mem(DWORD ofs, DWORD size, T &buf)
{
    buf.resize(size/sizeof(T::value_type));
    memcpy(vectorptr(buf), (void*)ofs, size);
}
void write_diffs(bool bBinary, const std::string& typenam, const std::string& dirnam, DWORD prev, DWORD cur, ByteVector::const_iterator bufstart)
{
    if (prev==cur) {
        return;
    }
    ByteVector diff;
    if (prev<cur) {
        diff.insert(diff.end(), bufstart+prev, bufstart+cur);
    }
    else {
        diff.insert(diff.end(), bufstart+prev, bufstart+0x1000);
        diff.insert(diff.end(), bufstart, bufstart+cur);
    }
    debugt("%s:%s   %04x-%04x  : %04x bytes\n", typenam.c_str(), dirnam.c_str(), prev, cur, diff.size());
    if (bBinary)
        debug("%s\n\n", hexdump(diff).c_str());
    else
        debug("%s\n\n", ascdump(diff, "\n\r", true).c_str());
}
char *buftypenames[]= { "atcmd", "data", "xpanel", "???" };
char *dirtypenames[]= { "wincerequest", "gsmresponse" };
void write_diffs(const DwordVector& prev, const DwordVector& cur, const ByteVector& data)
{
    for (size_t buftype=0 ; buftype<4 ; buftype++)
        for (size_t dirtype=0 ; dirtype<2 ; dirtype++)
            write_diffs(buftype&1, buftypenames[buftype], dirtypenames[dirtype], 
                    prev[4*buftype+dirtype], cur[4*buftype+dirtype], data.begin()+0x1000*(2*buftype+1-dirtype));
}
std::string get_cpu_name()
{
    PROCESSOR_INFO pi;

    DWORD nReturned;
    if (!KernelIoControl(IOCTL_PROCESSOR_INFORMATION, NULL, 0, &pi, sizeof(pi), &nReturned)) {
        error("IOCTL_PROCESSOR_INFORMATION");
        return "";
    }
    return ToString(pi.szProcessorName);
}

#ifndef W32TST
int WINAPI WinMain( HINSTANCE hInstance,
                   HINSTANCE hPrevInstance,
                   LPTSTR    lpCmdLine,
                   int       nCmdShow)
#else
int main(char**,int)
#endif
{

    DebugSetLogfile("gsmbufmon.log");
#ifndef W32TST
    KernelMode _km;
#else
    DebugStdOut();
#endif
    DWORD bufbase= 0;
    WCHAR oeminfo[256];
    if (SystemParametersInfo(SPI_GETOEMINFO, 256, oeminfo, 0)) {
        std::string oemname= ToString(oeminfo);
        if (oemname=="HTC") {
            std::string cpuname= get_cpu_name();
            if (cpuname=="OMAP 730") {
                bufbase= 0x8f180000;
                g_devtype= HTC_TYPHOON;
            }
            else if (cpuname=="OMAP850 195MHz") {
                bufbase= 0x8a400000;
                g_devtype= HTC_STARTREK;
            }
            else {
                debug("unknown device: %s, %s\n", oemname.c_str(), cpuname.c_str());
            }
        }
        else if (oemname.find("HERA10000")!=oemname.npos) {
            bufbase= 0x8a300000;
            g_devtype= HTC_HERALD;
        }
        else if (oemname.find("i-mateSmartflip")!=oemname.npos) {
            bufbase= 0x8a400000;
            g_devtype= HTC_STARTREK;
        }
        else {
            debug("unknown device: %s\n", oemname.c_str());
        }
    }
    // sp3    typhoon : 0x8f180000
    // g10i   startrek: 0x8a400000
    // cp300  herald  : 0x8a300000
    // printf "#\"gsmbufmon\"0x8a300000" | pput -c -f %CSIDL_STARTUP%\gsmbufmon.lnk
    debugt("gsmbufmon started\n");
    if (lpCmdLine && lpCmdLine[0])
        bufbase= _tcstoul(lpCmdLine, 0, 0);

    DwordVector prevptrs;
    prevptrs.resize(0x10);
    while (1) {
        DwordVector ptrs;
        read_mem(0xb80bbc50, 0x40, ptrs);
        if (ptrs!=prevptrs) {
            ByteVector buf;
            read_mem(bufbase, 0x8000, buf);
            if (prevptrs.size()) {
                write_diffs(prevptrs, ptrs, buf);
            }
            prevptrs.swap(ptrs);
        }
        Sleep(30);
    }

    return 0;
}