From 9dd962166a1849a31b25767a81cf269f4b99d4a5 Mon Sep 17 00:00:00 2001
From: dvs1
Date: Mon, 16 Dec 2024 13:25:52 +1000
Subject: Commit the test version of the code.

---
 notYetAnotherWiki.lua | 112 ++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 112 insertions(+)
 create mode 100755 notYetAnotherWiki.lua

(limited to 'notYetAnotherWiki.lua')

diff --git a/notYetAnotherWiki.lua b/notYetAnotherWiki.lua
new file mode 100755
index 0000000..1f077b5
--- /dev/null
+++ b/notYetAnotherWiki.lua
@@ -0,0 +1,112 @@
+#!/usr/bin/env luajit
+
+--[[ TODOs
+Contstruct metadata.webtrail in createHTML from links to index.HTML in the various bits of the path of the input file.
+
+Construct a default set of menus if menu.md / header.md doesn't exist in each directory.
+Same for footer.md I guess.
+
+For such fragments, rename their results to footer.FRAGMENT.   metadata.isFragment
+
+BUG - sub directories get their links screwed with extra path.
+
+Check the timestamps on the files, only update if source is newer than destination.  Meh, it's already 600 times faster than the pandoc version.
+
+Add atom feed and history for single page.  Alas cgit only seems to have ATOM feed and commit log on the whole repo, not individual files.
+]]
+
+local lcmark = require("lcmark")
+
+local createHTML = function(cm, file, menu)
+--    cm = string.gsub(cm, '._ ', '.  ')
+    if nil ~= file then print('About to parse file ' .. file) end
+    local result = ''
+    local body, metadata, err = lcmark.convert(cm, "html", {smart = true, yaml_metadata = true, columns = 0})
+
+    if nil == body then print('oops! ' .. err) else
+	local bod, err = lcmark.compile_template(body)
+	if nil == bod then print('oops! ' .. err) else
+	    local templateFile = metadata.template
+	    metadata['_'] = ' '
+	    if nil == templateFile then templateFile = 'default' end
+	    templateFile = templateFile .. '.template'
+	    if nil == menu then
+		templateFile = nil
+	    else
+		metadata.menu = menu
+	    end
+	    metadata.body = lcmark.apply_template(bod, metadata)
+
+	    local tm = ''
+	    if nil ~= templateFile then
+    		local h = io.open(templateFile, 'r')
+		if nil ~= h then
+		    tm = tm .. h:read('*a')
+		    h:close()
+		else
+		    print('oops! No such file ' .. templateFile)
+		end
+
+		local template, err = lcmark.compile_template(tm)
+		if nil == template then print('oops! ' .. err) else
+		    result = lcmark.apply_template(template, metadata)
+		end
+	    else
+		result = body
+	    end
+	end
+    end
+
+    if ('' ~= result) and (nil ~= file) then
+	local base = string.gsub(file, '%.md$', '')
+	print('Creating file ' .. base .. '.HTML')
+	local a, e = io.open(base .. '.HTML', 'w')
+	if nil == a then print('Could not open ' .. base .. '.HTML - ' .. e) else
+	    a:write(result)
+	    a:close()
+	end
+    end
+    return result
+end
+
+
+local cm = ''
+local filename = ''
+local menu = ''
+
+
+local h = io.open('menu.md', 'r')
+if nil ~= h then
+    print('Found menu.md')
+    menu = createHTML(h:read('*a'))
+    h:close()
+    menu = string.gsub(menu, 'ul>', 'menu>')
+end
+
+
+if 0 ~= #arg then
+    for i,a in ipairs(arg) do
+	if filename == '' then filename = a end
+        local h = io.open(a, 'r')
+	if nil ~= h then
+	    cm = cm .. h:read('*a')
+	    h:close()
+	else
+	    print('oops! No such file ' .. a)
+	end
+    end
+    if filename == '' then filename = 'test.md' end
+    createHTML(cm, filename, menu)
+else
+    local sticks = io.popen('find . -name "*.md" -type f -printf "%P\n"')
+    for  l in sticks:lines() do
+	cm = ''
+	local h = io.open(l, 'r')
+	if nil ~= h then
+	    createHTML(h:read('*a'), l, menu)
+	    h:close()
+	else
+	    print('oops! No such file ' .. l)
+	end
+    end
+end
-- 
cgit v1.1