mod_httpserver: Return Content-Type header based on file extension.

Thu, 10 Dec 2009 16:22:34 +0500

author
Waqas Hussain <waqas20@gmail.com>
date
Thu, 10 Dec 2009 16:22:34 +0500
changeset 2356
6d1e745a96f8
parent 2355
08f02de5ab9d
child 2357
d978e2ae7013

mod_httpserver: Return Content-Type header based on file extension.

plugins/mod_httpserver.lua file | annotate | diff | comparison | revisions
--- a/plugins/mod_httpserver.lua	Thu Dec 10 16:21:33 2009 +0500
+++ b/plugins/mod_httpserver.lua	Thu Dec 10 16:22:34 2009 +0500
@@ -17,6 +17,17 @@
 local response_400 = { status = "400 Bad Request", body = "<h1>Bad Request</h1>Sorry, we didn't understand your request :(" };
 local response_404 = { status = "404 Not Found", body = "<h1>Page Not Found</h1>Sorry, we couldn't find what you were looking for :(" };
 
+-- TODO: Should we read this from /etc/mime.types if it exists? (startup time...?)
+local mime_map = {
+	html = "text/html";
+	htm = "text/html";
+	xml = "text/xml";
+	xsl = "text/xml";
+	txt = "plain/text; charset=utf-8";
+	js = "text/javascript";
+	css = "text/css";
+};
+
 local function preprocess_path(path)
 	if path:sub(1,1) ~= "/" then
 		path = "/"..path;
@@ -40,7 +51,16 @@
 	if not f then return response_404; end
 	local data = f:read("*a");
 	f:close();
-	return data;
+	local ext = path:match("%.([^.]*)$");
+	local mime = mime_map[ext];
+	if not mime then
+		mime = ext and "application/octet-stream" or "text/html";
+	end
+	module:log("warn", "ext: %s, mime: %s", ext, mime);
+	return {
+		headers = { ["Content-Type"] = mime; };
+		body = data;
+	};
 end
 
 local function handle_file_request(method, body, request)

mercurial