Compare commits
2 Commits
e74d70af1b
...
a98460360c
| Author | SHA1 | Date | |
|---|---|---|---|
 murat
|
a98460360c | ||
|
murat
|
5fbe2da916 |
@@ -12,20 +12,32 @@ 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
|
||||
-- match file names ending with ".md"
|
||||
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 = ""
|
||||
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
|
||||
@@ -110,159 +122,164 @@ end
|
||||
-- get index.html content
|
||||
local indexFile = io.open("index.html"):read("*all")
|
||||
|
||||
-- remove and create "public/" directory
|
||||
lfs.rmdir("public")
|
||||
-- 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
|
||||
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)
|
||||
-- STYLING
|
||||
local function styleLists(s)
|
||||
local lines = {}
|
||||
for line in (s .. "\n"):gmatch("([^\n]*)\n") do
|
||||
table.insert(lines, line)
|
||||
end
|
||||
end
|
||||
|
||||
if inUl then table.insert(result, "</ul>") end
|
||||
if inOl then table.insert(result, "</ol>") end
|
||||
local result = {}
|
||||
local inUl = false
|
||||
local inOl = false
|
||||
|
||||
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
|
||||
for _, line in ipairs(lines) do
|
||||
local ulItem = line:match("^[%-%*%+]%s+(.*)")
|
||||
local olItem = line:match("^%d+%.%s+(.*)")
|
||||
|
||||
local result = {}
|
||||
local pLines = {}
|
||||
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!
|
||||
|
||||
local function flushP()
|
||||
if #pLines > 0 then
|
||||
table.insert(result, "<p>" .. table.concat(pLines, "\n") .. "</p>")
|
||||
pLines = {}
|
||||
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
|
||||
|
||||
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)
|
||||
local function styleParagraph(s)
|
||||
local lines = {}
|
||||
for line in (s .. "\n"):gmatch("([^\n]*)\n") do
|
||||
table.insert(lines, 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>")
|
||||
local result = {}
|
||||
local pLines = {}
|
||||
|
||||
return s
|
||||
end
|
||||
markdownFiles[index].content = styling(markdownFiles[index].content)
|
||||
local function flushP()
|
||||
if #pLines > 0 then
|
||||
table.insert(result, "<p>" .. table.concat(pLines, "\n") .. "</p>")
|
||||
pLines = {}
|
||||
end
|
||||
end
|
||||
|
||||
-- replace <!-- sitecontents --> with markdown file content
|
||||
local start_idx, end_idx = content:find("<!-- sitecontents -->", 1, true)
|
||||
if start_idx and end_idx then
|
||||
local first = content:sub(1, start_idx - 1)
|
||||
local second = content:sub(end_idx + 1)
|
||||
content = first .. markdownFiles[index].content .. second
|
||||
end
|
||||
while content:find("<!-- title -->", 1, true) do
|
||||
start_idx, end_idx = content:find("<!-- title -->", 1, true)
|
||||
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)
|
||||
|
||||
-- replace <!-- sitecontents --> with markdown file content
|
||||
local start_idx, end_idx = content:find("<!-- sitecontents -->", 1, true)
|
||||
if start_idx and end_idx then
|
||||
local first = content:sub(1, start_idx - 1)
|
||||
local second = content:sub(end_idx + 1)
|
||||
content = first .. markdownFiles[index].options["title"] .. second
|
||||
content = first .. markdownFiles[index].content .. second
|
||||
end
|
||||
while content:find("<!-- title -->", 1, true) do
|
||||
start_idx, end_idx = content:find("<!-- title -->", 1, true)
|
||||
if start_idx and end_idx then
|
||||
local first = content:sub(1, start_idx - 1)
|
||||
local second = content:sub(end_idx + 1)
|
||||
content = first .. markdownFiles[index].options["title"] .. second
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
htmlFile:write(content)
|
||||
htmlFile:close()
|
||||
else
|
||||
print("Error: Cannot create html file for " .. markdownFiles[index].filePath)
|
||||
htmlFile:write(content)
|
||||
htmlFile:close()
|
||||
else
|
||||
print("Error: Cannot create html file for " .. markdownFiles[index].filePath)
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
Reference in New Issue
Block a user