323 lines
13 KiB
Lua
323 lines
13 KiB
Lua
local lfs = require("lfs")
|
|
|
|
-- list of markdown files in working directory
|
|
local markdownFiles = {}
|
|
|
|
local haveIndexmd = false
|
|
local haveIndexhtml = false
|
|
-- amount of markdown files in working directory
|
|
local markdownFileCount = 0
|
|
local currentDir = lfs.currentdir()
|
|
for file in lfs.dir(currentDir) do
|
|
-- ignore "." and ".." files
|
|
if not(file:sub(1,2) == ".." or file:sub(1,1) == '.') then
|
|
local filePath = currentDir .. '/' .. file
|
|
if file:match("index.md") then haveIndexmd = true end
|
|
if file:match("index.html") then haveIndexhtml = true end
|
|
-- match file names ending with ".md"
|
|
if file:match("%.md$") then
|
|
markdownFileCount = markdownFileCount + 1
|
|
markdownFiles[markdownFileCount] = {
|
|
options = {},
|
|
filePath = filePath,
|
|
fileName = file:sub(1, file:len()-3),
|
|
content = "",
|
|
hasHtml = false
|
|
}
|
|
end
|
|
end
|
|
end
|
|
-- check html files with same name as the md files
|
|
for file in lfs.dir(currentDir) do
|
|
if file:match("%.html$") then
|
|
for index, value in ipairs(markdownFiles) do
|
|
if file:match(value.fileName .. ".html") then
|
|
markdownFiles[index].hasHtml = true
|
|
print(value.fileName .. "file has a html template file.")
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
-- stop the program if "index.html" or "index.md" doesn't exist
|
|
if (not(haveIndexhtml) and not(haveIndexmd)) then return print("Can't find index.html or index.md!") end
|
|
|
|
-- check for options section on every markdown file
|
|
for index, file in ipairs(markdownFiles) do
|
|
local f = io.open(file.filePath, 'r')
|
|
if f then
|
|
local content = f:read("*all")
|
|
f:close()
|
|
if content:sub(1,4) ~= "---\n" then
|
|
return print(file.filePath .. " file doesn't have a options section!")
|
|
end
|
|
local fileOptions = content:sub(5, content:len())
|
|
if fileOptions:find("---") then
|
|
fileOptions = fileOptions:sub(1, fileOptions:find("---\n")-1)
|
|
local lines = {}
|
|
local lineCount = 0
|
|
while fileOptions:find("\n") do
|
|
lineCount = lineCount + 1
|
|
lines[lineCount] = fileOptions:sub(1, fileOptions:find("\n"))
|
|
fileOptions = fileOptions:sub(fileOptions:find("\n")+1, fileOptions:len())
|
|
end
|
|
|
|
-- fill options table
|
|
for _, value in ipairs(lines) do
|
|
if value:sub(value:len(), value:len()) == "\n" then
|
|
value = value:sub(1, value:find("\n")-1)
|
|
end
|
|
local colonPos = value:find(":")
|
|
if colonPos then
|
|
local key = value:sub(1, colonPos - 1):match("^%s*(.-)%s*$")
|
|
local val = value:sub(colonPos + 1):match("^%s*(.-)%s*$")
|
|
if key and key ~= "" then
|
|
markdownFiles[index].options[key] = val
|
|
end
|
|
end
|
|
end
|
|
else
|
|
return print(file.filePath .. " file doesn't have a options section!")
|
|
end
|
|
else
|
|
print("can't read the file " .. file.filePath)
|
|
end
|
|
end
|
|
|
|
-- replace markdownFiles.content with md file content
|
|
for index, _ in ipairs(markdownFiles) do
|
|
local f = io.open(markdownFiles[index].filePath)
|
|
if f then
|
|
local content = f:read("*a")
|
|
f:close()
|
|
|
|
-- delete options section
|
|
content = content:sub(5, content:len())
|
|
content = content:sub(content:find("---\n")+4, content:len())
|
|
|
|
markdownFiles[index].content = content
|
|
end
|
|
end
|
|
|
|
for index, _ in ipairs(markdownFiles) do
|
|
print("---------------")
|
|
-- print file path with index
|
|
print(index .. ': ' .. markdownFiles[index].filePath)
|
|
local f = io.open(markdownFiles[index].filePath, 'r')
|
|
if f then
|
|
f:close()
|
|
-- print file content
|
|
print(markdownFiles[index].content)
|
|
-- print file options
|
|
print("--- OPTIONS ---")
|
|
for key, val in pairs(markdownFiles[index].options) do
|
|
print(key .. ": " .. val)
|
|
end
|
|
print("---------------")
|
|
else
|
|
print("can't read the file " .. markdownFiles[index].filePath)
|
|
end
|
|
end
|
|
|
|
-- get index.html content
|
|
local indexFile = io.open("index.html"):read("*all")
|
|
|
|
-- delete html files and create "public/" directory
|
|
for file in lfs.dir(currentDir .. "/public") do
|
|
if file:match("%.html$") then
|
|
os.remove(currentDir .. "/public/" .. file)
|
|
end
|
|
end
|
|
lfs.mkdir("public")
|
|
|
|
for index, _ in ipairs(markdownFiles) do
|
|
if markdownFiles[index].options["draft"] ~= "yes" then
|
|
local workDir = lfs.currentdir()
|
|
-- create html file for that md file
|
|
local htmlFile = io.open(workDir .. "/public/" .. markdownFiles[index].fileName .. ".html", 'w')
|
|
if htmlFile then
|
|
local content = indexFile
|
|
if markdownFiles[index].hasHtml then content = io.open(markdownFiles[index].fileName .. ".html"):read("*all") end
|
|
|
|
-- STYLING
|
|
local function styleLists(s)
|
|
local lines = {}
|
|
for line in (s .. "\n"):gmatch("([^\n]*)\n") do
|
|
table.insert(lines, line)
|
|
end
|
|
|
|
local result = {}
|
|
local inUl = false
|
|
local inOl = false
|
|
|
|
for _, line in ipairs(lines) do
|
|
local ulItem = line:match("^[%-%*%+]%s+(.*)")
|
|
local olItem = line:match("^%d+%.%s+(.*)")
|
|
|
|
if ulItem then
|
|
if inOl then table.insert(result, "</ol>"); inOl = false end
|
|
if not inUl then table.insert(result, "<ul>"); inUl = true end
|
|
table.insert(result, "<li>" .. ulItem .. "</li>") -- ulItem!
|
|
|
|
elseif olItem then
|
|
if inUl then table.insert(result, "</ul>"); inUl = false end
|
|
if not inOl then table.insert(result, "<ol>"); inOl = true end
|
|
table.insert(result, "<li>" .. olItem .. "</li>")
|
|
|
|
else
|
|
if inUl then table.insert(result, "</ul>"); inUl = false end
|
|
if inOl then table.insert(result, "</ol>"); inOl = false end
|
|
table.insert(result, line)
|
|
end
|
|
end
|
|
|
|
if inUl then table.insert(result, "</ul>") end
|
|
if inOl then table.insert(result, "</ol>") end
|
|
|
|
return table.concat(result, "\n")
|
|
end
|
|
local function styleParagraph(s)
|
|
local lines = {}
|
|
for line in (s .. "\n"):gmatch("([^\n]*)\n") do
|
|
table.insert(lines, line)
|
|
end
|
|
|
|
local result = {}
|
|
local pLines = {}
|
|
|
|
local function flushP()
|
|
if #pLines > 0 then
|
|
table.insert(result, "<p>" .. table.concat(pLines, "\n") .. "</p>")
|
|
pLines = {}
|
|
end
|
|
end
|
|
|
|
for _, line in ipairs(lines) do
|
|
local isBlock = line:match("^<") or line:match("^#")
|
|
local isEmpty = line:match("^%s*$")
|
|
|
|
if isBlock or isEmpty then
|
|
flushP()
|
|
table.insert(result, line)
|
|
else
|
|
table.insert(pLines, line)
|
|
end
|
|
end
|
|
flushP()
|
|
|
|
return table.concat(result, "\n")
|
|
end
|
|
local function styling(s)
|
|
-- blockquote
|
|
local lines = {}
|
|
for line in (s .. "\n"):gmatch("([^\n]*)\n?") do
|
|
local nline = line:gsub("^>%s*(.*)", "<blockquote>%1</blockquote>")
|
|
table.insert(lines, nline)
|
|
end
|
|
s = table.concat(lines, "\n")
|
|
-- lists
|
|
s = styleLists(s)
|
|
-- paragraph
|
|
s = styleParagraph(s)
|
|
s = s:gsub("<p></p>", "")
|
|
-- line breaks
|
|
s = s:gsub("\r?\n", "<br>")
|
|
-- remove <br> tags around block elements
|
|
local blockTags = { "ul", "ol", "li", "blockquote", "p",
|
|
"h1", "h2", "h3", "h4", "h5", "h6", "hr" }
|
|
for _, tag in ipairs(blockTags) do
|
|
s = s:gsub("(</" .. tag .. ">)<br>", "%1")
|
|
s = s:gsub("<br>(</" .. tag .. ">)", "%1")
|
|
s = s:gsub("(<" .. tag .. ">)<br>", "%1")
|
|
s = s:gsub("<br>(<" .. tag .. ">)", "%1")
|
|
end
|
|
-- self-closing hr
|
|
s = s:gsub("(<hr>)<br>", "%1")
|
|
s = s:gsub("<br>(<hr>)", "%1")
|
|
-- headers
|
|
s = s:gsub("######%s*(.-)%s*<br>", "<h6>%1</h6>")
|
|
s = s:gsub("#####%s*(.-)%s*<br>", "<h5>%1</h5>")
|
|
s = s:gsub("####%s*(.-)%s*<br>", "<h4>%1</h4>")
|
|
s = s:gsub("###%s*(.-)%s*<br>", "<h3>%1</h3>")
|
|
s = s:gsub("##%s*(.-)%s*<br>", "<h2>%1</h2>")
|
|
s = s:gsub("#%s*(.-)%s*<br>", "<h1>%1</h1>")
|
|
-- TODO: h1 and h2 using == and --
|
|
-- bold and italic text
|
|
s = s:gsub("%*%*(.-)%*%*", "<b>%1</b>")
|
|
s = s:gsub("%*(.-)%*", "<i>%1</i>")
|
|
s = s:gsub("%_%_(.-)%_%_", "<b>%1</b>")
|
|
s = s:gsub("%_(.-)%_", "<i>%1</i>")
|
|
-- images
|
|
s = s:gsub("!%[(.-)%]%((.-)%)", '<img src="%2" alt="%1"></img>')
|
|
-- links
|
|
s = s:gsub("%[(.-)%]%((.-)%)", '<a href="%2">%1</a>')
|
|
-- code
|
|
s = s:gsub("`(.-)`", "<code>%1</code>")
|
|
-- horizontal rule
|
|
s = s:gsub("%-%-%-", "<hr>")
|
|
|
|
return s
|
|
end
|
|
markdownFiles[index].content = styling(markdownFiles[index].content)
|
|
|
|
-- start_idx, end_idx = c
|
|
-- {{pageContent}} shortcode
|
|
content = content:gsub("{{pageContent}}", markdownFiles[index].content)
|
|
-- {{pageTitle}} shortcode
|
|
content = content:gsub("{{pageTitle}}", markdownFiles[index].options["title"])
|
|
|
|
local start_idx, end_idx
|
|
-- list shortcodes
|
|
while content:find("{{list:}}", 1, true) do
|
|
start_idx, end_idx = content:find("{{list:}}")
|
|
if start_idx and end_idx then
|
|
local first = content:sub(1, start_idx - 1)
|
|
local second = content:sub(end_idx + 1)
|
|
if second:find("{{:list}}", 1, true) then
|
|
start_idx, end_idx = second:find("{{:list}}")
|
|
if start_idx and end_idx then
|
|
local shortcode = second:sub(1, start_idx - 1)
|
|
local third = second:sub(end_idx + 1)
|
|
local function formatShortcode(element)
|
|
local dir = markdownFiles[index].filePath:match("(.*)/[^/]+%.md$")
|
|
local results = {}
|
|
|
|
for mdfile in lfs.dir(dir) do
|
|
if mdfile:match("%.md$") and mdfile ~= markdownFiles[index].fileName .. ".md" then
|
|
local fileName = mdfile:match("(.-)%.md$")
|
|
|
|
for i, _ in ipairs(markdownFiles) do
|
|
if markdownFiles[i].fileName == fileName then
|
|
local copy = element
|
|
|
|
-- replace items starting with list.item.
|
|
for option in copy:gmatch("{{list%.item%.(.-)}}") do
|
|
local value = markdownFiles[i].options[option]
|
|
if value then
|
|
copy = copy:gsub("{{list%.item%." .. option .. "}}", value)
|
|
end
|
|
end
|
|
|
|
table.insert(results, copy)
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
return table.concat(results, "\n")
|
|
end
|
|
shortcode = formatShortcode(shortcode)
|
|
content = first .. shortcode .. third
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
htmlFile:write(content)
|
|
htmlFile:close()
|
|
else
|
|
print("Error: Cannot create html file for " .. markdownFiles[index].filePath)
|
|
end
|
|
end
|
|
end
|