CRC32

#include <tchar.h>
#include <windows.h>
 
WORD MakeCRC16(BYTE *buf, WORD Num)
{
    WORD Polynom16=0x8005;
    WORD CRCHL;//хранит текущую CRC
    BYTE CRCBUF;//буфер для очередного байта сообщения
    BYTE i;
    WORD n,c;
    
//первые два байта сообщения
    CRCHL=((WORD)buf[0])<<8 | buf[1];
    //по очереди достаём все байты сообщения
    for(n=2;n<Num;n++)
    {
//кладём в буфер очередной байт сообщения
        CRCBUF=buf[n];
//и побитно вдвигаем его в CRCHL
        for(i=0;i<8;i++)
        {
//бит, выдвинутый слева из CRCHL (bool!!)
            c=CRCHL & 0x8000;
//сдвиг CRCHL и вдвигание старшего бита из CRCBUF
            CRCHL=CRCHL<<1 | CRCBUF>>7;
//сдвиг CRCBUF
            CRCBUF=CRCBUF<<1;
//если из CRCHL вначале был выдвинут ненулевой бит, то xor
            if(c)CRCHL^=Polynom16;
        }
    }
 
//"добавляем в конец сообщения ещё 2 нулевых байта"
    for(i=0;i<16;i++)
    {
//бит, выдвинутый слева из CRCHL (bool!!)
        c=CRCHL & 0x8000;
//сдвиг CRCHL и вдвигание нуля из CRCBUF
        CRCHL=CRCHL<<1;
//если из CRCHL вначале был выдвинут ненулевой бит,то xor
        if(c)CRCHL^=Polynom16;
    }
    return CRCHL;
}
 
bool CheckFile(LPCTSTR filename)
{
    bool b=true;
    HANDLE h=CreateFile(filename,GENERIC_READ,FILE_SHARE_READ,0,
        OPEN_EXISTING,0,0);
    if(h==INVALID_HANDLE_VALUE) 
        return false;
    DWORD dwSize;
    // Размер файла без размера записанного CRC.
    dwSize=GetFileSize(h,0)-2;
    PBYTE pMem=new BYTE[dwSize];
    if(pMem==0)
        return false;
    DWORD dwCount;
    ReadFile(h,pMem,dwSize,&dwCount,0);
    WORD qw=MakeCRC16(pMem,(WORD)dwSize);
    
    // Считываем CRC.
    PBYTE pMemCRC=new BYTE[2];
    ReadFile(h,pMemCRC,2,&dwCount,0);
    WORD crc=*(WORD*)pMemCRC;
 
    CloseHandle(h);
    delete [] pMem;
    delete [] pMemCRC;
    if (crc==qw)
        return true;
    else 
        return false;
}
 
BOOL WINAPI DllMain(HMODULE hModule, DWORD dwReason, LPVOID Rez)
{
    switch (dwReason) 
    {
        case DLL_PROCESS_ATTACH:
        {
            TCHAR Buf[MAX_PATH]; // MAX_PATH - максимальная длина строки с путём.
            GetModuleFileName(hModule,Buf,MAX_PATH);
            BOOL b=CheckFile((LPCTSTR)Buf);
            if(!b)
                return FALSE;
            break;
        }
        case DLL_THREAD_ATTACH:
            break;
        case DLL_THREAD_DETACH:
            break;
        case DLL_PROCESS_DETACH:
            break;
    }
    return(TRUE); 
}