diff options
| author | Daniel Baumann <daniel.baumann@progress-linux.org> | 2024-04-27 18:24:20 +0000 |
|---|---|---|
| committer | Daniel Baumann <daniel.baumann@progress-linux.org> | 2024-04-27 18:24:20 +0000 |
| commit | 483eb2f56657e8e7f419ab1a4fab8dce9ade8609 (patch) | |
| tree | e5d88d25d870d5dedacb6bbdbe2a966086a0a5cf /src/civetweb/test/page.lua | |
| parent | Initial commit. (diff) | |
| download | ceph-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.lua | 71 |
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> +]]) |