annotate src/tools/request.txt.luan @ 34:62d04ca486dd

UI
author Franklin Schmidt <fschmidt@gmail.com>
date Tue, 12 Nov 2024 16:08:24 -0700
parents e22a1ba4b2ed
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
6
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
1 local Binary = require "luan:Binary.luan"
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
2 local Io = require "luan:Io.luan"
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
3 local Http = require "luan:http/Http.luan"
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
4
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
5
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
6 return function()
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
7 Io.stdout = Http.response.text_writer()
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
8 %><%= Http.request.raw_head %><%
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
9 if Http.request.body ~= nil then
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
10 %><%=Binary.to_string(Http.request.body,"utf-8")%><%
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
11 end
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
12 end