1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
|
module:set_global();
module:depends("http");
local server = require "net.http.server";
local codes = require "net.http.codes";
local termcolours = require "util.termcolours";
local show_private = module:get_option_boolean("http_errors_detailed", false);
local default_messages = {
[400] = { "What kind of request do you call that??" };
[403] = { "You're not allowed to do that." };
[404] = { "Whatever you were looking for is not here. %";
"Where did you put it?", "It's behind you.", "Keep looking." };
[500] = { "% Check your error log for more info.";
"Gremlins.", "It broke.", "Don't look at me." };
};
local messages = setmetatable(module:get_option("http_errors_messages", {}), { __index = default_messages });
local html = [[
<!DOCTYPE html>
<html>
<head>
<meta charset="utf-8">
<style>
body{
margin-top:14%;
text-align:center;
background-color:#F8F8F8;
font-family:sans-serif;
}
h1{
font-size:xx-large;
}
p{
font-size:x-large;
}
p+p { font-size: large; font-family: courier }
</style>
</head>
<body>
<h1>$title</h1>
<p>$message</p>
<p>$extra</p>
</body>
</html>]];
html = html:gsub("%s%s+", "");
local entities = {
["<"] = "<", [">"] = ">", ["&"] = "&",
["'"] = "'", ["\""] = """, ["\n"] = "<br/>",
};
local function tohtml(plain)
return (plain:gsub("[<>&'\"\n]", entities));
end
local function get_page(code, extra)
local message = messages[code];
if message then
return (html:gsub("$(%a+)", {
title = rawget(codes, code) or ("Code "..tostring(code));
message = message[1]:gsub("%%", function ()
return message[math.random(2, math.max(#message,2))];
end);
extra = tohtml(extra or "");
}));
end
end
module:hook_object_event(server, "http-error", function (event)
return get_page(event.code, (show_private and event.private_message) or event.message);
end);
|
