Mercurial Hosting > luan

annotate src/luan/modules/host/Hosting.luan @ 775:1a68fc55a80c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
simplify dir structure
author Franklin Schmidt <fschmidt@gmail.com>
date Fri, 26 Aug 2016 14:36:40 -0600
parents core/src/luan/modules/host/Hosting.luan@2c41f2aec92f
children e7fb974e0c26
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
276
e5a0dd95f3e7 rename Reactionary to Hosting
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents: 275
diff changeset
1 -- Hosting
144
2e92f0a6fcac add Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
2
693
ca169567ce07 module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents: 633
diff changeset
3 local Luan = require "luan:Luan.luan"
379
e9e445e28f0b add error checking to Hosting
Franklin Schmidt <fschmidt@gmail.com>
parents: 348
diff changeset
4 local error = Luan.error
610
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
5 local ipairs = Luan.ipairs or error()
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
6 local pairs = Luan.pairs or error()
742
5578541125ea add Hosting.caller()
Franklin Schmidt <fschmidt@gmail.com>
parents: 740
diff changeset
7 local set_metatable = Luan.set_metatable or error()
693
ca169567ce07 module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents: 633
diff changeset
8 local Io = require "luan:Io.luan"
610
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
9 local print = Io.print or error()
693
ca169567ce07 module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents: 633
diff changeset
10 local Rpc = require "luan:Rpc.luan"
ca169567ce07 module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents: 633
diff changeset
11 local String = require "luan:String.luan"
633
c5baaa525897 don't push hidden files to luanhost
Franklin Schmidt <fschmidt@gmail.com>
parents: 619
diff changeset
12 local matches = String.matches or error()
610
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
13
379
e9e445e28f0b add error checking to Hosting
Franklin Schmidt <fschmidt@gmail.com>
parents: 348
diff changeset
14
503
92c3d22745b8 make _ENV optional
Franklin Schmidt <fschmidt@gmail.com>
parents: 435
diff changeset
15 local M = {}
189
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents: 184
diff changeset
16
144
2e92f0a6fcac add Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
17
503
92c3d22745b8 make _ENV optional
Franklin Schmidt <fschmidt@gmail.com>
parents: 435
diff changeset
18 function M.push(domain,password,dir)
610
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
19 local my_dir = Io.uri("file:"..dir)
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
20 my_dir.exists() or error("directory '"..dir.."' not found")
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
21 my_dir.is_directory() or error("'"..dir.."' is not a directory")
743
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 742
diff changeset
22 local host = Rpc.remote(domain)
610
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
23 local tree = host.get(domain,password)
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
24 if tree == nil then
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
25 print("creating "..domain)
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
26 tree = host.create(domain,password)
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
27 end
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
28
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
29 local function process(there_parent,there,here)
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
30 if here.is_file() then
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
31 if there == nil or there.last_modified < here.last_modified() then
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
32 print("copying "..here.to_string())
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
33 host.copy_file(domain,password,there_parent.path,here.name(),here.read_binary())
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
34 end
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
35 elseif here.is_directory() then
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
36 if here.name() == "local" then
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
37 return
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
38 end
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
39 if there == nil then
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
40 there = host.mkdir(domain,password,there_parent.path,here.name())
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
41 end
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
42 for _, here_child in ipairs(here.children()) do
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
43 local name = here_child.name()
633
c5baaa525897 don't push hidden files to luanhost
Franklin Schmidt <fschmidt@gmail.com>
parents: 619
diff changeset
44 if not matches(name,[[^\.]]) then
c5baaa525897 don't push hidden files to luanhost
Franklin Schmidt <fschmidt@gmail.com>
parents: 619
diff changeset
45 process(there,there.children[name],here_child)
c5baaa525897 don't push hidden files to luanhost
Franklin Schmidt <fschmidt@gmail.com>
parents: 619
diff changeset
46 there.children[name] = nil
c5baaa525897 don't push hidden files to luanhost
Franklin Schmidt <fschmidt@gmail.com>
parents: 619
diff changeset
47 end
610
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
48 end
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
49 for _, there_child in pairs(there.children) do
619
cc3a68033179 fix hosting delete logging
Franklin Schmidt <fschmidt@gmail.com>
parents: 615
diff changeset
50 if host.delete_unused(domain,password,there_child.path)==true then -- remove ==true later
cc3a68033179 fix hosting delete logging
Franklin Schmidt <fschmidt@gmail.com>
parents: 615
diff changeset
51 print("deleted "..there_child.name)
cc3a68033179 fix hosting delete logging
Franklin Schmidt <fschmidt@gmail.com>
parents: 615
diff changeset
52 end
610
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
53 end
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
54 else
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
55 error "not file or dir"
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
56 end
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
57 end
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
58
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
59 process( nil, tree, my_dir )
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
60
716
28fedb32ab19 hosting changes
Franklin Schmidt <fschmidt@gmail.com>
parents: 693
diff changeset
61 host.update_handler(domain,password)
144
2e92f0a6fcac add Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
62 end
2e92f0a6fcac add Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
63
503
92c3d22745b8 make _ENV optional
Franklin Schmidt <fschmidt@gmail.com>
parents: 435
diff changeset
64 function M.delete(domain,password)
743
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 742
diff changeset
65 local host = Rpc.remote(domain)
610
b4f3dbe1c6e3 add Rpc and change Hosting to use Rpc
Franklin Schmidt <fschmidt@gmail.com>
parents: 503
diff changeset
66 host.delete(domain,password)
144
2e92f0a6fcac add Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff changeset
67 end
503
92c3d22745b8 make _ENV optional
Franklin Schmidt <fschmidt@gmail.com>
parents: 435
diff changeset
68
615
abc3198c86dd fix tail recursion bug;
Franklin Schmidt <fschmidt@gmail.com>
parents: 610
diff changeset
69 function M.exists(domain)
743
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 742
diff changeset
70 local host = Rpc.remote(domain)
615
abc3198c86dd fix tail recursion bug;
Franklin Schmidt <fschmidt@gmail.com>
parents: 610
diff changeset
71 return host.exists(domain)
abc3198c86dd fix tail recursion bug;
Franklin Schmidt <fschmidt@gmail.com>
parents: 610
diff changeset
72 end
abc3198c86dd fix tail recursion bug;
Franklin Schmidt <fschmidt@gmail.com>
parents: 610
diff changeset
73
724
4f8e30a3ffd0 add Hosting.change_domain()
Franklin Schmidt <fschmidt@gmail.com>
parents: 716
diff changeset
74 function M.change_domain(old_domain,new_domain,password)
743
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 742
diff changeset
75 local host = Rpc.remote(new_domain)
724
4f8e30a3ffd0 add Hosting.change_domain()
Franklin Schmidt <fschmidt@gmail.com>
parents: 716
diff changeset
76 return host.change_domain(old_domain,new_domain,password)
4f8e30a3ffd0 add Hosting.change_domain()
Franklin Schmidt <fschmidt@gmail.com>
parents: 716
diff changeset
77 end
4f8e30a3ffd0 add Hosting.change_domain()
Franklin Schmidt <fschmidt@gmail.com>
parents: 716
diff changeset
78
740
6871ba08d521 add Hosting.change_password()
Franklin Schmidt <fschmidt@gmail.com>
parents: 724
diff changeset
79 function M.change_password(domain,old_password,new_password)
743
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 742
diff changeset
80 local host = Rpc.remote(domain)
740
6871ba08d521 add Hosting.change_password()
Franklin Schmidt <fschmidt@gmail.com>
parents: 724
diff changeset
81 return host.change_password(domain,old_password,new_password)
6871ba08d521 add Hosting.change_password()
Franklin Schmidt <fschmidt@gmail.com>
parents: 724
diff changeset
82 end
6871ba08d521 add Hosting.change_password()
Franklin Schmidt <fschmidt@gmail.com>
parents: 724
diff changeset
83
742
5578541125ea add Hosting.caller()
Franklin Schmidt <fschmidt@gmail.com>
parents: 740
diff changeset
84 function M.caller(domain)
743
2c41f2aec92f improve Rpc and implement rpc call for local webserver
Franklin Schmidt <fschmidt@gmail.com>
parents: 742
diff changeset
85 local host = Rpc.remote(domain)
742
5578541125ea add Hosting.caller()
Franklin Schmidt <fschmidt@gmail.com>
parents: 740
diff changeset
86 local mt = {}
5578541125ea add Hosting.caller()
Franklin Schmidt <fschmidt@gmail.com>
parents: 740
diff changeset
87 function mt.__index(_,key)
5578541125ea add Hosting.caller()
Franklin Schmidt <fschmidt@gmail.com>
parents: 740
diff changeset
88 return function(...)
5578541125ea add Hosting.caller()
Franklin Schmidt <fschmidt@gmail.com>
parents: 740
diff changeset
89 return host.call(domain,key,...)
5578541125ea add Hosting.caller()
Franklin Schmidt <fschmidt@gmail.com>
parents: 740
diff changeset
90 end
5578541125ea add Hosting.caller()
Franklin Schmidt <fschmidt@gmail.com>
parents: 740
diff changeset
91 end
5578541125ea add Hosting.caller()
Franklin Schmidt <fschmidt@gmail.com>
parents: 740
diff changeset
92 local t = {}
5578541125ea add Hosting.caller()
Franklin Schmidt <fschmidt@gmail.com>
parents: 740
diff changeset
93 set_metatable(t,mt)
5578541125ea add Hosting.caller()
Franklin Schmidt <fschmidt@gmail.com>
parents: 740
diff changeset
94 return t
5578541125ea add Hosting.caller()
Franklin Schmidt <fschmidt@gmail.com>
parents: 740
diff changeset
95 end
5578541125ea add Hosting.caller()
Franklin Schmidt <fschmidt@gmail.com>
parents: 740
diff changeset
96
503
92c3d22745b8 make _ENV optional
Franklin Schmidt <fschmidt@gmail.com>
parents: 435
diff changeset
97 return M