Mercurial Hosting > luan
annotate src/luan/host/Util.luan @ 1677:ea7075b7afe1
switch to index.json
author | Franklin Schmidt <fschmidt@gmail.com> |
---|---|
date | Tue, 31 May 2022 14:36:16 -0600 |
parents | 5c676385284b |
children |
rev | line source |
---|---|
1181
51d1342e25ad
luanhost password handling
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff
changeset
|
1 local Luan = require "luan:Luan.luan" |
51d1342e25ad
luanhost password handling
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff
changeset
|
2 local error = Luan.error |
51d1342e25ad
luanhost password handling
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff
changeset
|
3 local do_file = Luan.do_file or error() |
1210
3db95cc00d09
luanhost - add digest authentication
Franklin Schmidt <fschmidt@gmail.com>
parents:
1190
diff
changeset
|
4 local ipairs = Luan.ipairs or error() |
1190 | 5 local stringify = Luan.stringify or error() |
1611
f67f972bd648
make postgres.luan optional
Franklin Schmidt <fschmidt@gmail.com>
parents:
1517
diff
changeset
|
6 local Package = require "luan:Package.luan" |
1181
51d1342e25ad
luanhost password handling
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff
changeset
|
7 local Io = require "luan:Io.luan" |
51d1342e25ad
luanhost password handling
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff
changeset
|
8 local String = require "luan:String.luan" |
51d1342e25ad
luanhost password handling
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff
changeset
|
9 local lower = String.lower or error() |
1210
3db95cc00d09
luanhost - add digest authentication
Franklin Schmidt <fschmidt@gmail.com>
parents:
1190
diff
changeset
|
10 local format = String.format or error() |
1517 | 11 local to_binary = String.to_binary or error() |
1210
3db95cc00d09
luanhost - add digest authentication
Franklin Schmidt <fschmidt@gmail.com>
parents:
1190
diff
changeset
|
12 local Binary = require "luan:Binary.luan" |
3db95cc00d09
luanhost - add digest authentication
Franklin Schmidt <fschmidt@gmail.com>
parents:
1190
diff
changeset
|
13 local bytes = Binary.byte or error() |
1472 | 14 local base64_encode = Binary.base64_encode or error() |
1418 | 15 local Hosted = require "luan:host/Hosted.luan" |
1394
8fe777ba5045
change postgres password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1384
diff
changeset
|
16 local Sql = require "luan:sql/Sql.luan" |
8fe777ba5045
change postgres password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1384
diff
changeset
|
17 local database = Sql.database or error() |
8fe777ba5045
change postgres password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1384
diff
changeset
|
18 local Logging = require "luan:logging/Logging.luan" |
8fe777ba5045
change postgres password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1384
diff
changeset
|
19 local logger = Logging.logger "Util" |
1181
51d1342e25ad
luanhost password handling
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff
changeset
|
20 |
51d1342e25ad
luanhost password handling
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff
changeset
|
21 |
51d1342e25ad
luanhost password handling
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff
changeset
|
22 local Util = {} |
51d1342e25ad
luanhost password handling
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff
changeset
|
23 |
51d1342e25ad
luanhost password handling
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff
changeset
|
24 function Util.read_password(domain) |
51d1342e25ad
luanhost password handling
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff
changeset
|
25 domain = lower(domain) |
1418 | 26 return do_file(Hosted.sites_dir..domain.."/info.luan").password or error() |
1181
51d1342e25ad
luanhost password handling
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff
changeset
|
27 end |
51d1342e25ad
luanhost password handling
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff
changeset
|
28 |
1394
8fe777ba5045
change postgres password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1384
diff
changeset
|
29 function Util.set_password(domain,password) |
1418 | 30 local dir = Hosted.sites_dir..lower(domain) |
1382 | 31 local file = Io.schemes.file(dir.."/info.luan") |
32 file.delete() | |
1384
f5368cd8c056
remove template expressions and String.concat
Franklin Schmidt <fschmidt@gmail.com>
parents:
1382
diff
changeset
|
33 file.write_text("return "..stringify{password=password}.."\n") |
1396
a5f61890ad84
add check_postgres_password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1394
diff
changeset
|
34 end |
1394
8fe777ba5045
change postgres password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1384
diff
changeset
|
35 |
1627 | 36 require "java" |
37 local WebHandler = require "java:luan.host.WebHandler" | |
38 local pg_admin = WebHandler.config.postgres | |
1396
a5f61890ad84
add check_postgres_password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1394
diff
changeset
|
39 |
a5f61890ad84
add check_postgres_password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1394
diff
changeset
|
40 function Util.set_postgres_password(domain,password) |
1626 | 41 if pg_admin == nil then |
1394
8fe777ba5045
change postgres password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1384
diff
changeset
|
42 return |
8fe777ba5045
change postgres password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1384
diff
changeset
|
43 end |
1396
a5f61890ad84
add check_postgres_password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1394
diff
changeset
|
44 local db = database(pg_admin) |
1407 | 45 local exists = db.query("select rolname from pg_roles where rolname=?",domain).results() ~= nil; |
1394
8fe777ba5045
change postgres password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1384
diff
changeset
|
46 --logger.info("exists "..exists) |
8fe777ba5045
change postgres password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1384
diff
changeset
|
47 if exists then |
8fe777ba5045
change postgres password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1384
diff
changeset
|
48 db.update( [[alter role "]]..domain..[[" with encrypted password ']]..password..[[']] ) |
8fe777ba5045
change postgres password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1384
diff
changeset
|
49 end |
8fe777ba5045
change postgres password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1384
diff
changeset
|
50 db.close() |
1210
3db95cc00d09
luanhost - add digest authentication
Franklin Schmidt <fschmidt@gmail.com>
parents:
1190
diff
changeset
|
51 end |
3db95cc00d09
luanhost - add digest authentication
Franklin Schmidt <fschmidt@gmail.com>
parents:
1190
diff
changeset
|
52 |
1396
a5f61890ad84
add check_postgres_password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1394
diff
changeset
|
53 function Util.check_postgres_password(domain,password) |
1626 | 54 if pg_admin == nil then |
1396
a5f61890ad84
add check_postgres_password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1394
diff
changeset
|
55 return |
a5f61890ad84
add check_postgres_password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1394
diff
changeset
|
56 end |
1416 | 57 local db = database(pg_admin) |
58 local exists = db.query("select rolname from pg_roles where rolname=?",domain).results() ~= nil; | |
1396
a5f61890ad84
add check_postgres_password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1394
diff
changeset
|
59 db.close() |
1416 | 60 if exists then |
61 db = database{ | |
62 class = "org.postgresql.Driver" | |
63 url = "jdbc:postgresql://localhost:5432/"..domain | |
64 user = domain | |
65 password = password | |
66 } | |
67 db.close() | |
68 end | |
1396
a5f61890ad84
add check_postgres_password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1394
diff
changeset
|
69 end |
a5f61890ad84
add check_postgres_password
Franklin Schmidt <fschmidt@gmail.com>
parents:
1394
diff
changeset
|
70 |
1181
51d1342e25ad
luanhost password handling
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff
changeset
|
71 return Util |