fftempl/fftempl.cgi at master · fuxoft/fftempl · GitHub

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
#!/usr/bin/env luajit

_G.FFTEMPL = {version = {}, debug = {log={}}}

--FFTempl
--by Frantisek Fuka
--This is FFTempl loader which must never fail
_G.FFTEMPL.version.loader = string.match([[*<= Version '2.1.2+D20210402T174732' =>*]], "'(.+)'")

function FFTEMPL.log(str)
	table.insert(FFTEMPL.debug.log, tostring(str))
end

local function fftempl_init()
	local sfn = assert(os.getenv("SCRIPT_FILENAME"), "Cannot get $SCRIPT_FILENAME")
	local fftd = assert(sfn:match("^(.+)fftempl%.cgi$"), "Cannot extract base path")
	FFTEMPL.fftempl_dir = fftd
end

local function fftempl_main()
	local function error_HTML(str)
		local debugtext = table.concat(FFTEMPL.debug.log,"<p>\n")
		if debugtext == "" then
			 debugtext="No debug text! <i>(You can log debug messages yourself by calling FFTEMPL.log() function)</i>"
		end
		return('<html><body><h1>FFTempl Error!</h1><pre>' .. str .. '</pre><p><h3>FFTEMPL DEBUG OUTPUT FOLLOWS:</h3><p>'..debugtext..'</body></html>')
	end

	local function err_fun(errstat)
		local tback = debug.traceback(errstat)
--[[	local start,msg,rest = tback:match("^(%S- )([^\n]*)(.+)$")
		if rest == rest then
			tback = "<b>"..tostring(start) .. "<font color=red>"..tostring(msg).."</font></b>"..tostring(rest)
		end
	]]
		return tback
	end

	local function doit()
		local result = dofile("fftempl_core.lua")
		assert(type(result)=="table", "Result is not a table")
		assert(result.html, "Missing .html content in result")
		assert(result.content_type, "Missing .content_type in result")
		assert(result.http_status_code,"Missing .http_status_code in result")
		return result
	end

	local status,result = xpcall(doit, err_fun)
	if not status then
		print("Status: 500") --Internal server error
		print("Content-type: text/html; charset=UTF-8")
		print()
		print(error_HTML(result))
	else
		print("Status: "..result.http_status_code)
		print("Content-type: "..result.content_type)
		if result.extra_headers then
			print(tostring(result.extra_headers))
		end
		print()
		if FFTEMPL.args.fftempl_debug=='messages' then --if the URL contains parameter "fftempl_debug=messages"
			print(table.concat(FFTEMPL.debug.log,"<p>\n"))
		end
		print(result.html)
	end
end

fftempl_init()
fftempl_main()