Mercurial Hosting > luan
annotate core/src/luan/modules/host/Hosting.luan @ 348:6fd016d35ec1 0.2
improve Hosting and fix mmake
author | Franklin Schmidt <fschmidt@gmail.com> |
---|---|
date | Sun, 12 Apr 2015 08:35:23 -0600 |
parents | core/src/luan/modules/Hosting.luan@7f7708e8fdd4 |
children | e9e445e28f0b |
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 |
321
7f7708e8fdd4
remove import statement
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
282
diff
changeset
|
3 local Io = require "luan:Io" |
189
fb3993431f76
minor
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
184
diff
changeset
|
4 |
144
2e92f0a6fcac
add Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
5 port = 9101 |
2e92f0a6fcac
add Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
6 |
348
6fd016d35ec1
improve Hosting and fix mmake
Franklin Schmidt <fschmidt@gmail.com>
parents:
321
diff
changeset
|
7 function push(domain,password,dir) |
282
38bd29e59a6e
minor
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
276
diff
changeset
|
8 local socket = "socket:" .. domain .. ":" .. port |
275
340656b18b74
fix reactionary code
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
189
diff
changeset
|
9 local pc = Io.Uri(socket).Pickle_client() |
144
2e92f0a6fcac
add Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
10 local pickle = pc.pickle |
184
69f1e79a9eb0
fix Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
171
diff
changeset
|
11 pc.call(%> |
348
6fd016d35ec1
improve Hosting and fix mmake
Franklin Schmidt <fschmidt@gmail.com>
parents:
321
diff
changeset
|
12 local Hosting = require "luan:host/Hosting" |
6fd016d35ec1
improve Hosting and fix mmake
Franklin Schmidt <fschmidt@gmail.com>
parents:
321
diff
changeset
|
13 Hosting.do_push(<%=pickle(domain)%>,<%=pickle(password)%>,<%=pickle(dir)%>) |
184
69f1e79a9eb0
fix Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
171
diff
changeset
|
14 <%) |
144
2e92f0a6fcac
add Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
15 pc.close() |
2e92f0a6fcac
add Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
16 end |
2e92f0a6fcac
add Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
17 |
348
6fd016d35ec1
improve Hosting and fix mmake
Franklin Schmidt <fschmidt@gmail.com>
parents:
321
diff
changeset
|
18 function delete(domain,password) |
282
38bd29e59a6e
minor
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
276
diff
changeset
|
19 local socket = "socket:" .. domain .. ":" .. port |
275
340656b18b74
fix reactionary code
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
189
diff
changeset
|
20 local pc = Io.Uri(socket).Pickle_client() |
144
2e92f0a6fcac
add Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
21 local pickle = pc.pickle |
184
69f1e79a9eb0
fix Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
171
diff
changeset
|
22 pc.call(%> |
348
6fd016d35ec1
improve Hosting and fix mmake
Franklin Schmidt <fschmidt@gmail.com>
parents:
321
diff
changeset
|
23 local Hosting = require "luan:host/Hosting" |
6fd016d35ec1
improve Hosting and fix mmake
Franklin Schmidt <fschmidt@gmail.com>
parents:
321
diff
changeset
|
24 Hosting.do_delete(<%=pickle(domain)%>,<%=pickle(password)%>) |
184
69f1e79a9eb0
fix Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
171
diff
changeset
|
25 <%) |
144
2e92f0a6fcac
add Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
26 pc.close() |
2e92f0a6fcac
add Reactionary.luan
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
27 end |