Add native support for homepages

libs/lucid-http/luasrc/lucid/http/LuciWebPublisher.lua

@@ -56,11 +56,18 @@ function factory(server, config)
 		end
 	end
 
+	local mypath
 	if type(config.virtual) == "table" then
 		for _, v in ipairs(config.virtual) do
+			mypath = mypath or v
 			vhost:set_handler(v, handler)
 		end
 	else
+		mypath = config.virtual
 		vhost:set_handler(config.virtual, handler)
 	end
+
+	if config.home then
+		vhost.default = mypath
+	end
 end

libs/lucid-http/luasrc/lucid/http/server.lua

@@ -198,6 +198,10 @@ function VHost.process(self, request, ...)
 	-- Call URI part
 	request.env.PATH_INFO = uri
 	
+	if self.default and uri == "/" then
+		return 302, {Location = self.default}
+	end
+
 	for k, h in pairs(self.handlers) do
 		if #k > hlen then
 			if uri == k or (uri:sub(1, #k) == k and uri:byte(#k+1) == sc) then

libs/lucid/hostfiles/etc/config/lucid

@@ -19,6 +19,7 @@ config LuciWebPublisher luciweb
 	option physical ''
 	list virtual /luci
 	option domain ''
+	option home 1
 	list exec ':lo'
 	list exec ':br-lan'
 	list exec 'root'
@@ -71,4 +72,3 @@ config 'Redirector' 'splashredir'
         option 'virtual' '/'
         option 'physical' ':80/luci/splash'
 
-	

libs/lucid/root/etc/config/lucid

@@ -15,6 +15,7 @@ config DirectoryPublisher webroot
 config LuciWebPublisher luciweb
 	option name 'LuCI Webapplication'
 	option physical ''
+	option home 1
 	list virtual /luci
 	list virtual /cgi-bin/luci
 	option domain ''