mod_vcard: Remove vcard_compatibility COMPAT (moved to mod_compat_vcard in prosody...

[prosody.git] / plugins / mod_http_files.lua

diff --git a/plugins/mod_http_files.lua b/plugins/mod_http_files.lua
index c585928306ddeae0069f7526436282f6891096f6..bdc3a01144959d92cbacac9b112484dca20cd94a 100644 (file)
--- a/plugins/mod_http_files.lua
+++ b/plugins/mod_http_files.lua
@@ -12,7 +12,7 @@ local lfs = require "lfs";
 local open = io.open;
 local stat = lfs.attributes;
 
-local http_base = module:get_option_string("http_path", "www_files");
+local http_base = module:get_option_string("http_files_dir", module:get_option_string("http_path", "www_files"));
 
 -- TODO: Should we read this from /etc/mime.types if it exists? (startup time...?)
 local mime_map = {
@@ -25,39 +25,25 @@ local mime_map = {
        css = "text/css";
 };
 
-local function preprocess_path(path)
-       if path:sub(1,1) ~= "/" then
-               path = "/"..path;
-       end
-       local level = 0;
-       for component in path:gmatch("([^/]+)/") do
-               if component == ".." then
-                       level = level - 1;
-               elseif component ~= "." then
-                       level = level + 1;
-               end
-               if level < 0 then
-                       return nil;
-               end
-       end
-       return path;
-end
-
 function serve_file(event, path)
        local response = event.response;
-       path = path and preprocess_path(path);
-       if not path then
-               return 400;
-       end
-       local full_path = http_base..path;
+       local orig_path = event.request.path;
+       local full_path = http_base.."/"..path;
        if stat(full_path, "mode") == "directory" then
-               if stat(full_path.."/index.html", "mode") == "file" then
-                       return serve_file(event, path.."/index.html");
+               if full_path:sub(-1) ~= "/" then
+                       response.headers.location = orig_path.."/";
+                       return 301;
                end
+               if stat(full_path.."index.html", "mode") == "file" then
+                       return serve_file(event, path.."index.html");
+               end
+
+               -- TODO File listing
                return 403;
        end
        local f, err = open(full_path, "rb");
        if not f then
+               module:log("warn", "Failed to open file: %s", err);
                return 404;
        end
        local data = f:read("*a");
@@ -72,7 +58,7 @@ end
 
 module:provides("http", {
        route = {
-               ["/*"] = serve_file;
+               ["GET /*"] = serve_file;
        };
 });