Mercurial Hosting > luan

comparison core/src/luan/modules/host/Hosting.luan @ 503:92c3d22745b8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
make _ENV optional
author Franklin Schmidt <fschmidt@gmail.com>
date Wed, 20 May 2015 23:24:46 -0600
parents 5b36f663a1b8
children b4f3dbe1c6e3
comparison
equal deleted inserted replaced
502:d3183a330ff5 503:92c3d22745b8
2 2
3 local Io = require "luan:Io" 3 local Io = require "luan:Io"
4 local Luan = require "luan:Luan" 4 local Luan = require "luan:Luan"
5 local error = Luan.error 5 local error = Luan.error
6 6
7 local M = {}
7 8
8 port = 9101 9 M.port = 9101
9 10
10 function push(domain,password,dir) 11 function M.push(domain,password,dir)
11 local f = Io.uri("file:"..dir) 12 local f = Io.uri("file:"..dir)
12 f.exists() or error("directory '"..dir.."' not found") 13 f.exists() or error("directory '"..dir.."' not found")
13 f.is_directory() or error("'"..dir.."' is not a directory") 14 f.is_directory() or error("'"..dir.."' is not a directory")
14 local socket = "socket:" .. domain .. ":" .. port 15 local socket = "socket:" .. domain .. ":" .. M.port
15 local pc = Io.uri(socket).pickle_client() 16 local pc = Io.uri(socket).pickle_client()
16 local pickle = pc.pickle 17 local pickle = pc.pickle
17 pc.call(%> 18 pc.call(%>
18 local Hosting = require "luan:host/Hosting" 19 local Hosting = require "luan:host/Hosting"
19 Hosting.do_push(<%=pickle(domain)%>,<%=pickle(password)%>,<%=pickle(dir)%>) 20 Hosting.do_push(<%=pickle(domain)%>,<%=pickle(password)%>,<%=pickle(dir)%>)
20 <%) 21 <%)
21 pc.close() 22 pc.close()
22 end 23 end
23 24
24 function delete(domain,password) 25 function M.delete(domain,password)
25 local socket = "socket:" .. domain .. ":" .. port 26 local socket = "socket:" .. domain .. ":" .. M.port
26 local pc = Io.uri(socket).pickle_client() 27 local pc = Io.uri(socket).pickle_client()
27 local pickle = pc.pickle 28 local pickle = pc.pickle
28 pc.call(%> 29 pc.call(%>
29 local Hosting = require "luan:host/Hosting" 30 local Hosting = require "luan:host/Hosting"
30 Hosting.do_delete(<%=pickle(domain)%>,<%=pickle(password)%>) 31 Hosting.do_delete(<%=pickle(domain)%>,<%=pickle(password)%>)
31 <%) 32 <%)
32 pc.close() 33 pc.close()
33 end 34 end
35
36 return M