1 require ‘bit‘ 2 3 local encode = function(inpath, outpath, key) 4 local inf = assert(io.open(inpath, 'rb')) 5 local outf = assert(io.open(outpath, 'wb')) 6 7 if (type(key) ~= 'string') or (string.len(key) == 0) then 8 key = 'x' 9 end10 11 local temp = nil12 local data = inf:read(1)13 while data do14 temp = bit.bxor(string.byte(data), string.byte(string.sub(key, 1, 1)))15 for i = 2, string.len(key) do16 temp = bit.bxor(temp, string.byte(string.sub(key, i, i)))17 end18 outf:write(string.char(temp))19 data = inf:read(1)20 end21 22 assert(inf:close())23 assert(outf:close())24 end25 26 local decode = function(inf, outf, key)27 encode(inf, outf, key)28 end29 30 ------------------------------------------------31 -- interface32 --33 transform_xor = {34 en = encode,35 de = decode,36 }