求助LUA的位操作来实现CRC16算法

实现C的CRC16_buypass模式函数，求LUA代码，谢谢。

u16 calcCRC16_buypass(const u8 *data, u32 length)
{
    #define POLYNOMIAL 0x8005

    u16 crc = 0x0000;
    u32 j;
    u8 i;
    for (j=length; j>0; j--) {
    crc ^= (u16)(*data++) << 8;
    for (i=0; i<8; i++) {
        if (crc & 0x8000) crc = (crc<<1) ^ POLYNOMIAL;
        else crc <<= 1;
        }
    }
    return (crc);
}