-- Fetch() API Demo local function WriteForm(url) Write([[ redbean fetch demo

redbean fetch demo

Your redbean is able to function as an HTTP client too. Lua server pages can use the Fetch() API to to send outgoing HTTP and HTTPS requests to other web servers. All it takes is a line of code!

]] % {EscapeHtml(url)}) end local function main() if IsPublicIp(GetClientAddr()) then ServeError(403) elseif GetMethod() == 'GET' or GetMethod() == 'HEAD' then WriteForm("https://justine.lol") elseif GetMethod() == 'POST' then status, headers, payload = Fetch(GetParam('url')) if status then WriteForm(GetParam('url')) Write('
\r\n') Write('
Status\r\n') Write('

%d %s\r\n' % {status, GetHttpReason(status)}) Write('

Headers\r\n') Write('
\r\n') for k,v in pairs(headers) do Write('
') Write(EscapeHtml(k)) Write(': ') Write(EscapeHtml(v)) Write('
\r\n') end Write('
Payload\r\n') Write('
')
         Write(EscapeHtml(VisualizeControlCodes(payload)))
         Write('
\r\n') Write('
\r\n') else err = headers WriteForm(GetParam('url')) Write('

Error

\n') Write('

') Write(EscapeHtml(VisualizeControlCodes(err))) end else ServeError(405) SetHeader('Allow', 'GET, HEAD, POST') end end main()