view core/src/luan/modules/host/Hosting.luan @ 379:e9e445e28f0b

add error checking to Hosting
author Franklin Schmidt <fschmidt@gmail.com>
date Mon, 20 Apr 2015 12:24:54 -0600
parents 6fd016d35ec1
children 5b36f663a1b8
line wrap: on
line source

-- Hosting

local Io = require "luan:Io"
local Luan = require "luan:Luan"
local error = Luan.error


port = 9101

function push(domain,password,dir)
	local f = Io.Uri("file:"..dir)
	f.exists() or error("directory '"..dir.."' not found")
	f.is_directory() or error("'"..dir.."' is not a directory")
	local socket = "socket:" .. domain .. ":" .. port
	local pc = Io.Uri(socket).Pickle_client()
	local pickle = pc.pickle
	pc.call(%>
		local Hosting = require "luan:host/Hosting"
		Hosting.do_push(<%=pickle(domain)%>,<%=pickle(password)%>,<%=pickle(dir)%>)
	<%)
	pc.close()
end

function delete(domain,password)
	local socket = "socket:" .. domain .. ":" .. port
	local pc = Io.Uri(socket).Pickle_client()
	local pickle = pc.pickle
	pc.call(%>
		local Hosting = require "luan:host/Hosting"
		Hosting.do_delete(<%=pickle(domain)%>,<%=pickle(password)%>)
	<%)
	pc.close()
end