# HG changeset patch
# User Waqas Hussain <waqas20@gmail.com>
# Date 1260444154 -18000
# Node ID c9834f338a4e2acd6141db71b234126087b6614f
# Parent  716260e3b0174b0315763a2a74847610168abaa9
mod_httpserver: Return Content-Type header based on file extension.

diff -r 716260e3b017 -r c9834f338a4e plugins/mod_httpserver.lua
--- a/plugins/mod_httpserver.lua	Wed Dec 09 16:25:18 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)