You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
64 lines
1.6 KiB
64 lines
1.6 KiB
#!/usr/bin/env lua
|
|
local sitelib = require "sitelib"
|
|
local fs = require "lfs"
|
|
|
|
print("Reading blog entries")
|
|
local mdfiles = {}
|
|
for file in fs.dir(sitelib.srcpath.."/blog/") do
|
|
if file:sub(1,1) ~= "." then
|
|
local index = tonumber(file:match("(%d+).md"))
|
|
if index then
|
|
mdfiles[index] = file
|
|
end
|
|
end
|
|
end
|
|
|
|
if not fs.attributes(sitelib.gopherpath) then
|
|
fs.mkdir(sitelib.gopherpath)
|
|
end
|
|
|
|
local index=""
|
|
local itemtemplate = [[%s <item>
|
|
<title>%s</title>
|
|
<description>%s</description>
|
|
<link>%s</link>
|
|
<guid>%s</guid>
|
|
<pubDate>%s</pubDate>
|
|
</item>
|
|
]]
|
|
print("Generating index")
|
|
for i = #mdfiles, #mdfiles - 9, -1 do
|
|
infile = mdfiles[i]
|
|
local fpath = "/blog/"..infile
|
|
local infile = sitelib.srcpath.."/blog/"..infile
|
|
local uuid = "https://"..sitelib.hostname..(fpath:sub(1,-3)).."html"
|
|
print(infile,fpath,uuid)
|
|
--[[
|
|
local u = io.popen("./uuidfile.sh "..infile)
|
|
local uuid = u:read("*a"):match("[^\n]+")
|
|
u:close()
|
|
]]--
|
|
local f = io.open(infile,"rb")
|
|
local c = f:read("*a")
|
|
f:close()
|
|
local page = sitelib.parsepage(c)
|
|
local fline = page.md:match("\n\n(.-)\n")
|
|
print(fline)
|
|
-- attempt to convert existing date to a dumb RFC 822 date
|
|
local d = io.popen("date --date='"..page.date.."' '+%a, %d %b %Y %H:%M:00 %z'"):read("*a"):match("(.+)\n")
|
|
index = string.format(itemtemplate,index,page.title,fline,uuid,uuid,d)
|
|
end
|
|
|
|
index=[[<?xml version="1.0" encoding="UTF-8" ?>
|
|
<rss version="2.0">
|
|
<channel>
|
|
<title>ShadowKat Studios</title>
|
|
<link>https://shadowkat.net</link>
|
|
<description>ShadowKat Studios Blog Entries</description>
|
|
]]..index
|
|
|
|
local f = io.open(sitelib.outpath.."/rss.xml","wb")
|
|
f:write(index)
|
|
f:write([[</channel>
|
|
</rss>]])
|
|
f:close()
|
|
|