local Luan = require "luan:Luan.luan"
local error = Luan.error
local range = Luan.range or error()
local String = require "luan:String.luan"
local trim = String.trim or error()
local lower = String.lower or error()
local gsub = String.gsub or error()
local Io = require "luan:Io.luan"
local Http = require "luan:http/Http.luan"
local jesse_data = require "site:/lib/jesse_data.luan"
do -- make jesse_data into map
local t = {}
for i in range(1,#jesse_data,2) do
local input = jesse_data[i]
local response = jesse_data[i+1]
input = lower(input)
response = gsub(response,"\n","
")
t[input] = response
end
jesse_data = t
end
return function()
Io.stdout = Http.response.text_writer()
local input = Http.request.parameters.input
if input ~= nil then
Http.response.headers["content-type"] = "application/javascript"
input = lower(trim(input))
if input == "color1" then
%>
document.body.style.color = '#008000';
document.body.style.background = '#000000';
<%
elseif input == "color2" then
%>
document.body.style.color = '#000000';
document.body.style.background = '#FFFFFF';
<%
elseif input == "" then
-- do nothing
else
local response = jesse_data[input] or "I'm sorry, I don't understand."
%>
respond("<%=response%>");
<%
end
return
end
%>
JESSE
<%
end