125 lines
3.8 KiB
Lua
Executable File
125 lines
3.8 KiB
Lua
Executable File
#!/usr/bin/env lua
|
|
|
|
-- porteail.lua
|
|
|
|
--[[ Requirements ]]--
|
|
|
|
require 'lfs'
|
|
|
|
--[[ Variables ]]--
|
|
|
|
-- Mandatories files
|
|
configFile = './' .. 'configrc'
|
|
-- Default directories values
|
|
local currentpath = os.getenv('CURDIR') or '.'
|
|
default_dir_category = 'categ'
|
|
default_dir_component = 'composants'
|
|
-- Default files values
|
|
default_img_filename = 'generique.png'
|
|
default_header_filename = 'entete.html'
|
|
default_footer_filename = 'enqueue.html'
|
|
default_categ_extension = 'txt'
|
|
|
|
|
|
--[[ Functions ]]--
|
|
|
|
function getConfig(file)
|
|
result = {}
|
|
f = assert(io.open(file, 'r'))
|
|
while true do
|
|
line = f.read(f)
|
|
if not line then break end
|
|
local key = line:match('([^#].-)[ ]+=')
|
|
local val = line:match('=[ ]+(.*)')
|
|
local comment = string.find(line, '^#+(.*)')
|
|
if comment then
|
|
-- do nothing with comment
|
|
elseif key then
|
|
result[key] = val
|
|
end
|
|
end
|
|
assert(f:close())
|
|
return result
|
|
end
|
|
|
|
function listing (path, extension)
|
|
files = {}
|
|
if lfs.attributes(path) then
|
|
for file in lfs.dir(path) do
|
|
if file ~= "." and file ~= ".." then
|
|
local f = path..'/'..file
|
|
local attr = lfs.attributes (f)
|
|
filext = (string.match(file, "[^\\/]-%.?([^%.\\/]*)$"))
|
|
if attr.mode == 'file' and filext == extension then
|
|
table.insert(files, f)
|
|
end
|
|
end
|
|
end
|
|
else
|
|
files = nil
|
|
end
|
|
return files
|
|
end
|
|
|
|
function process(filepath)
|
|
-- parse given file
|
|
for line in io.lines(filepath) do
|
|
-- check if this line is a comment ("# my comment"), a category ("[[My category]]Its description") or an element ("Title##Description##URL##Image")
|
|
is_comment = string.find(line, '^#+.*')
|
|
is_title = string.find(line, '%[%[(.*)%]%](.*)')
|
|
is_element = string.find(line, '(.*)##(.*)##(.*)##(.*)')
|
|
if is_comment then
|
|
-- do nothing because it's a comment
|
|
elseif is_title then
|
|
title = ''
|
|
for t in string.gmatch(line, '%[%[(.*)%]%].*') do title = title .. t end
|
|
description =''
|
|
for d in string.gmatch(line, '%[%[.*%]%](.*)') do description = description .. d end
|
|
print("TITLE: " .. '\n\t' .. title .. '\n\t' .. description)
|
|
elseif is_element then
|
|
title = ''
|
|
description = ''
|
|
url = ''
|
|
img = ''
|
|
for t in string.gmatch(line, '(.*)##.*##.*##.*') do title = title .. t end
|
|
for d in string.gmatch(line, '.*##(.*)##.*##.*') do description = description .. d end
|
|
for u in string.gmatch(line, '.*##.*##(.*)##.*') do url = url .. u end
|
|
for i in string.gmatch(line, '.*##.*##.*##(.*)') do img = img .. i end
|
|
print("ELEMENT: " .. '\n\t' .. title .. '\n\t' .. description .. '\n\t' .. url .. '\n\t' .. img)
|
|
end
|
|
end
|
|
end
|
|
|
|
--[[ Principal ]]--
|
|
|
|
-- fetch user defined values
|
|
config = getConfig(configFile)
|
|
-- create values for directories
|
|
categ = config['CATEGORIES'] or default_dir_category
|
|
component = config['COMPOSANTS'] or default_dir_component
|
|
-- create values for files
|
|
header_filename = config['ENTETE'] or default_header_filename
|
|
footer_filename = config['ENQUEUE'] or default_footer_filename
|
|
-- other default values
|
|
categ_extension = config['CATEGORIES_EXT'] or default_categ_extension
|
|
-- get header and footer content
|
|
header_file = assert(io.open(currentpath .. '/' .. component .. '/' .. header_filename, 'r'))
|
|
header = assert(header_file:read('*a'))
|
|
assert(header_file:close())
|
|
footer_file = assert(io.open(currentpath .. '/' .. component .. '/' .. footer_filename, 'r'))
|
|
footer = assert(footer_file:read('*a'))
|
|
assert(footer_file:close())
|
|
-- Browse categ directory
|
|
local categories_files = listing (currentpath .. '/' .. categ, categ_extension)
|
|
if categories_files then
|
|
for k,v in pairs(categories_files) do
|
|
-- read category content
|
|
attr = lfs.attributes(v)
|
|
if attr and attr.mode == 'file' then
|
|
process(v)
|
|
end
|
|
end
|
|
else
|
|
print ("-- No category file found!")
|
|
end
|