-- vim:set ft=lua:
ct=[=[
EDCB
EpgTimerSrv.exeのHTTPサーバ機能は有効です。
必要に応じてHttpPublicフォルダをカスタマイズしてください。
英数ハイフン7文字以内のサブフォルダを↓にリストします。
※リストされたくないものは8文字以上などにしてください。
]=]
for i,v in ipairs(edcb.FindFile(mg.script_name:gsub('[^\\/]*$','*'),0) or {}) do
if v.isdir and #v.name<8 and v.name:find('^[0-9A-Za-z-]+$') and v.name~='api' then
ct=ct..''..v.name..'/
\n'
end
end
ct=ct..[=[
]=]
function ImfFixdate(t)
return ('%s, %02d %s %d %02d:%02d:%02d GMT'):format(({'Sun','Mon','Tue','Wed','Thu','Fri','Sat'})[t.wday],t.day,
({'Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec'})[t.month],t.year,t.hour,t.min,t.sec)
end
mg.write('HTTP/1.1 200 OK'
..'\r\nDate: '..ImfFixdate(os.date('!*t'))
..'\r\nContent-Type: text/html; charset=utf-8'
..(mg.request_info.request_method~='HEAD' and '\r\nContent-Length: '..#ct or '')
..(mg.keep_alive(true) and '' or '\r\nConnection: close')
..'\r\n\r\n'
..(mg.request_info.request_method~='HEAD' and ct or ''))