Переписать алгоритм расчета хеша с C на Lua

Есть функция расчета хеша написанная на си:
extern uint32 HashRot13(const uint8 * str, int length)
{
uint32 hash = 0;
int i;
for(i = 0; i < length; ++i, str++)
{
hash += (uint32)(*str);
hash -= (hash << 13) | (hash >> 19);
}
return hash;
}

Надо переписать его на lua.
На вход функция должна получать массив вида:
bytes = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x87, 0x0c, 0x31, 0x6a, 0x41, 0xdc, 0x15, 0x72, 0x39, 0xb5, 0x11, 0x6b, 0x1a, 0x03, 0x65, 0x1a }

Возвращать функция должна массив такого же вида.