Mercurial Hosting > luan
view src/luan/host/Util.luan @ 1384:f5368cd8c056
remove template expressions and String.concat
author | Franklin Schmidt <fschmidt@gmail.com> |
---|---|
date | Thu, 15 Aug 2019 14:33:35 -0600 |
parents | 9604579c1c9b |
children | 8fe777ba5045 |
line wrap: on
line source
local Luan = require "luan:Luan.luan" local error = Luan.error local do_file = Luan.do_file or error() local ipairs = Luan.ipairs or error() local stringify = Luan.stringify or error() local Io = require "luan:Io.luan" local String = require "luan:String.luan" local lower = String.lower or error() local format = String.format or error() local Binary = require "luan:Binary.luan" local bytes = Binary.byte or error() local Hosting = require "luan:host/Hosting.luan" require "java" local Base64 = require "java:java.util.Base64" local MessageDigest = require "java:java.security.MessageDigest" local Util = {} function Util.read_password(domain) domain = lower(domain) return do_file(Hosting.sites_dir..domain.."/info.luan").password or error() end local function basic_authentication(dir,password) local sha1 = MessageDigest.getInstance("SHA1").digest(password.getBytes()) local encoded = Base64.getEncoder().encodeToString(sha1) local file = Io.schemes.file(dir.."/password.nginx") file.delete() file.write_text("admin:{SHA}"..encoded.."\n") end local function digest_authentication(dir,password) local s = "admin:Restricted:"..password local md5 = MessageDigest.getInstance("MD5").digest(s.getBytes()) md5 = {bytes(md5,1,#md5)} local encoded = "" for _, n in ipairs(md5) do encoded = encoded..format("%02x",n) end local file = Io.schemes.file(dir.."/password.nginx") file.delete() file.write_text("admin:Restricted:"..encoded.."\n") end function Util.write_password(domain,password) local dir = Hosting.sites_dir..lower(domain) local file = Io.schemes.file(dir.."/info.luan") file.delete() file.write_text("return "..stringify{password=password}.."\n") digest_authentication(dir,password) end return Util