crc16/crc16.lua

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
local bit = require "bit";

module "crc16"

function hash(str)
	local crc;
	
	local function initCrc()
		crc = 0xffff;
	end
	
	local function updCrc(byte)
		crc = bit.bxor(crc, byte);
		for i=1,8 do
			local j = bit.band(crc, 1);
			crc = bit.rshift(crc, 1);
			if j ~= 0 then
				crc = bit.bxor(crc, 0x8408);
			end
		end
	end

	local function getCrc(str)
		initCrc();
		for i = 1, #str  do
			updCrc(str:byte(i));
		end
		return crc;
	end
	return getCrc(str);
end

return { hash = hash }