1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
|
module (..., package.seeall)
-- no initializer in model - use controller.init for that
local function file_info ( path )
local file = io.popen("ls -lh " .. path )
local file_inuse = io.popen("fuser " .. path )
split = require("split")
local file_info_result = file:read("*a") or "unknown"
local fileinuseresult = file_inuse:read("*a") or "unkown"
if fileinuseresult == "" then
fileinuseresult = "Delete"
else
fileinuseresult = "in use"
end
local size = rawget(split("%s+", file_info_result),5)
local lastmod = rawget(split("%s+", file_info_result),6) .. " " .. rawget(split("%s+", file_info_result),7) .. " " .. rawget(split("%s+", file_info_result),8)
file:close()
file_inuse:close()
return lastmod,size,fileinuseresult
end
local function list_files ( path )
local listed_files = {}
local open_files = {}
split = require("split")
local files = io.popen("find " .. path .. " -type f | sort")
table.insert ( listed_files , cfe{inuse="Delete", save="Save", view="View", size="Size", lastmod="Last Modified", name="File"} )
if ( files ) then
local f = files:read("*a") or "unknown"
for k,v in pairs(split("%s", f)) do
if v ~= "" then
local lastmod,size,fileinuseresult = file_info(v)
if ( fileinuseresult == "Delete" ) then
del="/delete?id=" .. k
else
del=nil
end
table.insert ( listed_files , cfe{inuse=fileinuseresult, del=del, save="", view="/view?id=" .. k, size=size, lastmod=lastmod, name=v, type="", id=k} )
end
end
files:close()
end
return listed_files
end
get = function (self,path)
local logfile_result = {}
return list_files( path )
end
|
