From 6fcd554e9cc67b6a1fad5ec5132c4681c9336a6e Mon Sep 17 00:00:00 2001 From: TerryE Date: Wed, 2 Mar 2016 00:33:51 +0000 Subject: [PATCH] Delered as per #475 and creation of the encoder module --- lua_modules/base64/base64.lua | 41 -------------------------------- lua_modules/base64/base64_v2.lua | 36 ---------------------------- 2 files changed, 77 deletions(-) delete mode 100644 lua_modules/base64/base64.lua delete mode 100644 lua_modules/base64/base64_v2.lua diff --git a/lua_modules/base64/base64.lua b/lua_modules/base64/base64.lua deleted file mode 100644 index e3523a31..00000000 --- a/lua_modules/base64/base64.lua +++ /dev/null @@ -1,41 +0,0 @@ --- Lua 5.1+ base64 v3.0 (c) 2009 by Alex Kloss --- licensed under the terms of the LGPL2 - -local moduleName = ... -local M = {} -_G[moduleName] = M - --- character table string -local b='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/' - --- encoding -function M.enc(data) - return ((data:gsub('.', function(x) - local r,b='',x:byte() - for i=8,1,-1 do r=r..(b%2^i-b%2^(i-1)>0 and '1' or '0') end - return r; - end)..'0000'):gsub('%d%d%d?%d?%d?%d?', function(x) - if (#x < 6) then return '' end - local c=0 - for i=1,6 do c=c+(x:sub(i,i)=='1' and 2^(6-i) or 0) end - return b:sub(c+1,c+1) - end)..({ '', '==', '=' })[#data%3+1]) -end - --- decoding -function M.dec(data) - data = string.gsub(data, '[^'..b..'=]', '') - return (data:gsub('.', function(x) - if (x == '=') then return '' end - local r,f='',(b:find(x)-1) - for i=6,1,-1 do r=r..(f%2^i-f%2^(i-1)>0 and '1' or '0') end - return r; - end):gsub('%d%d%d?%d?%d?%d?%d?%d?', function(x) - if (#x ~= 8) then return '' end - local c=0 - for i=1,8 do c=c+(x:sub(i,i)=='1' and 2^(7-i) or 0) end - return string.char(c) - end)) -end - -return M diff --git a/lua_modules/base64/base64_v2.lua b/lua_modules/base64/base64_v2.lua deleted file mode 100644 index 1180f526..00000000 --- a/lua_modules/base64/base64_v2.lua +++ /dev/null @@ -1,36 +0,0 @@ ---this version actually works - -local tab = 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/' -base64 = { - enc = function(data) - local l,out = 0,'' - local m = (3-data:len()%3)%3 - local d = data..string.rep('\0',m) - for i=1,d:len() do - l = bit.lshift(l,8) - l = l+d:byte(i,i) - if i%3==0 then - for j=1,4 do - local a = bit.rshift(l,18)+1 - out = out..tab:sub(a,a) - l = bit.band(bit.lshift(l,6),0xFFFFFF) - end - end - end - return out:sub(1,-1-m)..string.rep('=',m) - end, - dec = function(data) - local a,b = data:gsub('=','A') - local out = '' - local l = 0 - for i=1,a:len() do - l=l+tab:find(a:sub(i,i))-1 - if i%4==0 then - out=out..string.char(bit.rshift(l,16),bit.band(bit.rshift(l,8),255),bit.band(l,255)) - l=0 - end - l=bit.lshift(l,6) - end - return out:sub(1,-b-1) - end -}