diff options
| author | alyx <alyx@aleteoryx.me> | 2024-04-05 11:36:56 -0400 |
|---|---|---|
| committer | alyx <alyx@aleteoryx.me> | 2024-04-05 11:36:56 -0400 |
| commit | d7727c21586734f19d016fc84f94eaf0764eda34 (patch) | |
| tree | 7e013742b891d00e19ad7653f978f0a3fa577988 | |
| parent | 21ffaa07a20ccec702a77278724c6f78351a96f2 (diff) | |
| download | lfm_embed-d7727c21586734f19d016fc84f94eaf0764eda34.tar.gz lfm_embed-d7727c21586734f19d016fc84f94eaf0764eda34.tar.bz2 lfm_embed-d7727c21586734f19d016fc84f94eaf0764eda34.zip | |
html.lua functional
| -rw-r--r-- | src/theming/lua-lib/expect.lua | 2 | ||||
| -rw-r--r-- | src/theming/lua-lib/html.lua | 36 |
2 files changed, 35 insertions, 3 deletions
diff --git a/src/theming/lua-lib/expect.lua b/src/theming/lua-lib/expect.lua index f4cade7..9afbb49 100644 --- a/src/theming/lua-lib/expect.lua +++ b/src/theming/lua-lib/expect.lua @@ -94,7 +94,7 @@ end -- @throws If the field is not one of the allowed types. local function field(tbl, index, ...) expect(1, tbl, "table") - expect(2, index, "string") + expect(2, index, "string", "number") local value = tbl[index] local t = native_type(value) diff --git a/src/theming/lua-lib/html.lua b/src/theming/lua-lib/html.lua index de65d6a..386618b 100644 --- a/src/theming/lua-lib/html.lua +++ b/src/theming/lua-lib/html.lua @@ -1,12 +1,44 @@ -- SPDX-License-Identifier: AGPL-3.0-only +local function html_escape(s) + expect(1, s, "string") + + s = string.gsub(s, "&", "&") + s = string.gsub(s, "<", "<") + s = string.gsub(s, ">", ">") + s = string.gsub(s, "'", "'") + s = string.gsub(s, "\"", """) + + return s +end + local function html(el, tbl) expect(1, el, "string") - expect(2, el, "table") + expect(2, tbl, "table") + + innerHtml = "" + attributes = "" for k, v in pairs(tbl) do if type(k) == "string" then - expect.field(tbl, k, "string", "table") + expect.field(tbl, k, "string") + attributes = attributes .. " " .. k .. "='" .. html_escape(v) .. "'" end end + for k, v in ipairs(tbl) do + expect.field(tbl, k, "string", "table") + if type(v) == "table" then v = html_escape(v[1]) end + innerHtml = innerHtml .. v + end + + return string.format("<%s%s>%s</%s>", el, attributes, innerHtml, el) end + +local function root(tbl) + return "<!DOCTYPE html>\n" .. html("html", tbl) +end + +return setmetatable( + { root = root }, + { __call = html, + __index = function (idx) return function(tbl) html(idx, tbl) end end }) |