Added GET and POST support to HTTPServer class. (0.37.32)
This commit is contained in:
parent
c8393251e5
commit
83281bf2de
4 changed files with 92 additions and 6 deletions
|
|
@ -9,6 +9,8 @@
|
|||
* Added: 2025-12-28
|
||||
*/
|
||||
|
||||
#include <strings.fun>
|
||||
|
||||
print("<!doctype html><html><body>")
|
||||
print("<h1>Fun Environment Information</h1>")
|
||||
print("<p><strong>Current Path:</strong> " + env("PATH") + "</p>")
|
||||
|
|
@ -25,4 +27,32 @@ while i < len(all_keys)
|
|||
print("<li>" + key + "=" + all_env[key] + "</li>")
|
||||
i = i + 1
|
||||
print("</ul>")
|
||||
print("<h2>GET Variables:</h2>")
|
||||
print("<ul>")
|
||||
qs = env("QUERY_STRING")
|
||||
if (len(qs) > 0)
|
||||
params = str_split(qs, "&")
|
||||
i = 0
|
||||
while i < len(params)
|
||||
kv = str_split(params[i], "=")
|
||||
if (len(kv) == 2)
|
||||
print("<li>" + kv[0] + " = " + kv[1] + "</li>")
|
||||
else
|
||||
print("<li>" + params[i] + "</li>")
|
||||
i = i + 1
|
||||
print("</ul>")
|
||||
print("<h2>POST Variables:</h2>")
|
||||
print("<ul>")
|
||||
pd = env("POST_DATA")
|
||||
if (len(pd) > 0)
|
||||
params = str_split(pd, "&")
|
||||
i = 0
|
||||
while i < len(params)
|
||||
kv = str_split(params[i], "=")
|
||||
if (len(kv) == 2)
|
||||
print("<li>" + kv[0] + " = " + kv[1] + "</li>")
|
||||
else
|
||||
print("<li>" + params[i] + "</li>")
|
||||
i = i + 1
|
||||
print("</ul>")
|
||||
print("</body></html>")
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue