Code styling fixes
This commit is contained in:
@@ -12,33 +12,27 @@ if not uv then
|
||||
uv = vim.loop
|
||||
end
|
||||
|
||||
-- Lines 15-43 from http://lua-users.org/wiki/BaseSixtyFour
|
||||
local b='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/'
|
||||
function 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
|
||||
function 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^(8-i) or 0) end
|
||||
return string.char(c)
|
||||
end))
|
||||
-- Lines 15-37 from http://lua-users.org/wiki/BaseSixtyFour
|
||||
local ba = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/"
|
||||
local function 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 ba:sub(c + 1, c + 1)
|
||||
end) .. ({ "", "==", "=" })[#data % 3 + 1]
|
||||
)
|
||||
end
|
||||
-- End of code from http://lua-users.org/wiki/BaseSixtyFour
|
||||
|
||||
|
||||
Reference in New Issue
Block a user