TODO-- Implement smart menus.

1 files changed, 59 insertions, 24 deletions

diff --git a/notYetAnotherWiki.lua b/notYetAnotherWiki.lua
index 9fa3178..cfe7459 100755
--- a/notYetAnotherWiki.lua
+++ b/notYetAnotherWiki.lua
@@ -2,7 +2,7 @@
 
 local lcmark = require("lcmark")
 
-local createHTML = function(cm, file, menu)
+local createHTML = function(cm, file, header, menu)
 --    cm = string.gsub(cm, '._ ', '.  ')
     if nil ~= file then print('About to parse file ' .. file) end
     local result = ''
@@ -19,6 +19,7 @@ local createHTML = function(cm, file, menu)
                 templateFile = nil
             else
                 metadata.menu = menu
+                metadata.header = header
             end
             metadata.body = lcmark.apply_template(bod, metadata)
 
@@ -55,43 +56,77 @@ local createHTML = function(cm, file, menu)
 end
 
 
-local cm = ''
-local filename = ''
-local menu = ''
+local cm, filename, header, menu = '', '', '', ''
+local site = {}
 
+for l in io.popen('find . -name "*.md" -type f -printf "%P\n"'):lines() do
+    local s = {}
+    local f = ''
+    local c = 1
+    for p in string.gmatch(l, '(%w+)/') do
+        table.insert(s, p)
+        c = c + #p + 1
+    end
+    local full = string.sub(l, c, -1)
+    local base = string.gsub(full, '%.md$', '')
+    table.insert(s, base)
 
-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>')
+    if 'menu' == s[#s] then
+        local h = io.open(l, 'r')
+        if nil ~= h then
+            print('Found ' .. l)
+            menu = createHTML(h:read('*a'))
+            h:close()
+            menu = string.gsub(menu, 'ul>', 'menu>')
+        end
+    else
+        if 1 ~= #s then
+            site[l] = s
+        else
+            site[l] = base
+        end
+    end
 end
 
+-- TODO - Only do these first things if menu.md doesn't exist, the second for headers.md
+--if '' == menu then
+    for k, v in pairs(site) do
+        if 'string' == type(v) then
+            local m = '[' .. v .. '](' .. v .. '.HTML)\n'
+            menu = menu .. string.gsub(createHTML(m), 'ul>', 'menu>')
+        else
+            local path = ''
+            for i, w in ipairs(v) do
+                path = path .. w .. '/'
+            end
+            header = header .. '<a href="' .. string.sub(path, 1, -2) .. '.HTML">' .. v[1] .. '</a> &nbsp; '
+        end
+    end
+--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 0 == #arg then
+    for l in io.popen('find . -name "*.md" -type f -printf "%P\n"'):lines() do
+        cm = ''
+        local h = io.open(l, 'r')
         if nil ~= h then
-            cm = cm .. h:read('*a')
+            createHTML(h:read('*a'), l, header, menu)
             h:close()
         else
-            print('oops! No such file ' .. a)
+            print('oops! No such file ' .. l)
         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')
+    for i,a in ipairs(arg) do
+        if filename == '' then filename = a end
+        local h = io.open(a, 'r')
         if nil ~= h then
-            createHTML(h:read('*a'), l, menu)
+            cm = cm .. h:read('*a')
             h:close()
         else
-            print('oops! No such file ' .. l)
+            print('oops! No such file ' .. a)
         end
     end
+    if filename == '' then filename = 'test.md' end
+    createHTML(cm, filename, header, menu)
 end