summaryrefslogtreecommitdiffstats
path: root/src/civetweb/test/page.lua
diff options
context:
space:
mode:
authorDaniel Baumann <daniel.baumann@progress-linux.org>2024-04-27 18:24:20 +0000
committerDaniel Baumann <daniel.baumann@progress-linux.org>2024-04-27 18:24:20 +0000
commit483eb2f56657e8e7f419ab1a4fab8dce9ade8609 (patch)
treee5d88d25d870d5dedacb6bbdbe2a966086a0a5cf /src/civetweb/test/page.lua
parentInitial commit. (diff)
downloadceph-483eb2f56657e8e7f419ab1a4fab8dce9ade8609.tar.xz
ceph-483eb2f56657e8e7f419ab1a4fab8dce9ade8609.zip
Adding upstream version 14.2.21.upstream/14.2.21upstream
Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
Diffstat (limited to 'src/civetweb/test/page.lua')
-rw-r--r--src/civetweb/test/page.lua71
1 files changed, 71 insertions, 0 deletions
diff --git a/src/civetweb/test/page.lua b/src/civetweb/test/page.lua
new file mode 100644
index 00000000..2b5600ac
--- /dev/null
+++ b/src/civetweb/test/page.lua
@@ -0,0 +1,71 @@
+mg.write("HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n")
+
+mg.write([[
+<html><body>
+<p>This is another example of a Lua script, creating a web page served by the
+<a href="https://github.com/civetweb/civetweb/">CivetWeb web server</a>.
+</p><p>
+The following features are available:
+<ul>
+]])
+
+ mg.write("<li>" .. _VERSION .. " server pages</li>")
+ if sqlite3 then
+ mg.write("<li>sqlite3 binding</li>")
+ end
+ if lfs then
+ mg.write("<li>lua file system</li>")
+ end
+
+
+mg.write("</ul></p>\r\n")
+mg.write("<p> Today is " .. os.date("%A") .. "</p>\r\n")
+mg.write("<p> URI is " .. mg.request_info.uri .. "</p>\r\n")
+
+mg.write("<p>Database example:\r\n<pre>\r\n")
+
+ -- Open database
+ local db = sqlite3.open('requests.db')
+ -- Note that the data base is located in the current working directory
+ -- of the process if no other path is given here.
+
+ -- Setup a trace callback, to show SQL statements we'll be executing.
+ -- db:trace(function(data, sql) mg.write('Executing: ', sql: '\n') end, nil)
+
+ -- Create a table if it is not created already
+ db:exec([[
+ CREATE TABLE IF NOT EXISTS requests (
+ id INTEGER PRIMARY KEY AUTOINCREMENT,
+ timestamp NOT NULL,
+ method NOT NULL,
+ uri NOT NULL,
+ addr
+ );
+ ]])
+
+ -- Add entry about this request
+ local stmt = db:prepare(
+ 'INSERT INTO requests VALUES(NULL, datetime("now"), ?, ?, ?);');
+ stmt:bind_values(mg.request_info.request_method,
+ mg.request_info.uri,
+ mg.request_info.remote_port)
+ stmt:step()
+ stmt:finalize()
+
+ -- Show all previous records
+ mg.write('Previous requests:\n')
+ stmt = db:prepare('SELECT * FROM requests ORDER BY id DESC;')
+ while stmt:step() == sqlite3.ROW do
+ local v = stmt:get_values()
+ mg.write(v[1] .. ' ' .. v[2] .. ' ' .. v[3] .. ' '
+ .. v[4] .. ' ' .. v[5] .. '\n')
+ end
+
+ -- Close database
+ db:close()
+
+mg.write([[
+</pre>
+</p>
+</body></html>
+]])