Add package remotes

unicorn/init.lua

@@ -1,5 +1,6 @@
 local unicorn = {}
 unicorn.core = dofile("/lib/unicorn/core.lua")
 unicorn.util = dofile("/lib/unicorn/util.lua")
+unicorn.remote = dofile("/lib/unicorn/remote.lua")
 
 return unicorn

unicorn/remote.lua

@@ -0,0 +1,30 @@
+---@description Support for using package remotes.
+-- @module unicorn.remote
+
+local unicorn = {}
+unicorn.core = dofile("/lib/unicorn/core.lua")
+unicorn.util = dofile("/lib/unicorn/util.lua")
+unicorn.remote = {}
+
+function unicorn.remote.install(package_name)
+	for _,v in pairs(fs.list("/etc/unicorn/remotes/")) do
+		local v = fs.open("/etc/unicorn/remotes/"..v, "r")
+		local v = v.readLine()
+		local v = v:gsub("https://", "") -- have to remove the https:// prefix because fs.combine does weird stuff with it if it's left in
+		local v = fs.combine(v, package_name..".lua")
+		v = 'https://'..v
+		response, httpError = unicorn.util.smartHttp(v)
+		if httpError then
+			if httpError == "Not Found" then
+				-- do nothing, continue with the loop
+			else
+				error("HTTP request to "..v.." failed with error "..httpError)
+			end
+		end
+		unicorn.util.fileWrite(response, "/tmp/"..package_name)
+		unicorn.core.install(dofile("/tmp/"..package_name))
+	end
+end
+
+return unicorn.remote
+

unicorn/util.lua

@@ -26,8 +26,7 @@ function unicorn.util.smartHttp(sUrl)
 		response.close()
 		return sResponse
 	else
-		error("HTTP failed: "..httpError)
-		return false
+		return false, httpError
 	end
 end