2008-03-02 21:52:58 +00:00
|
|
|
--[[
|
|
|
|
FFLuCI - Filesystem tools
|
|
|
|
|
|
|
|
Description:
|
|
|
|
A module offering often needed filesystem manipulation functions
|
|
|
|
|
|
|
|
FileId:
|
|
|
|
$Id$
|
|
|
|
|
|
|
|
License:
|
|
|
|
Copyright 2008 Steven Barth <steven@midlink.org>
|
|
|
|
|
|
|
|
Licensed under the Apache License, Version 2.0 (the "License");
|
|
|
|
you may not use this file except in compliance with the License.
|
|
|
|
You may obtain a copy of the License at
|
|
|
|
|
|
|
|
http://www.apache.org/licenses/LICENSE-2.0
|
|
|
|
|
|
|
|
Unless required by applicable law or agreed to in writing, software
|
|
|
|
distributed under the License is distributed on an "AS IS" BASIS,
|
|
|
|
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
|
|
See the License for the specific language governing permissions and
|
|
|
|
limitations under the License.
|
|
|
|
|
|
|
|
]]--
|
|
|
|
|
|
|
|
module("ffluci.fs", package.seeall)
|
|
|
|
|
2008-03-29 18:22:21 +00:00
|
|
|
require("posix")
|
2008-03-02 21:52:58 +00:00
|
|
|
|
2008-03-22 21:26:44 +00:00
|
|
|
-- Checks whether a file exists
|
|
|
|
function isfile(filename)
|
|
|
|
local fp = io.open(path, "r")
|
|
|
|
if file then file:close() end
|
|
|
|
return file ~= nil
|
|
|
|
end
|
|
|
|
|
2008-03-02 21:52:58 +00:00
|
|
|
-- Returns the content of file
|
|
|
|
function readfile(filename)
|
2008-03-24 15:39:32 +00:00
|
|
|
local fp, err = io.open(filename)
|
2008-03-12 20:52:28 +00:00
|
|
|
|
2008-03-02 21:52:58 +00:00
|
|
|
if fp == nil then
|
2008-03-30 19:12:16 +00:00
|
|
|
return nil, err
|
2008-03-02 21:52:58 +00:00
|
|
|
end
|
2008-03-12 20:52:28 +00:00
|
|
|
|
2008-03-02 21:52:58 +00:00
|
|
|
local data = fp:read("*a")
|
|
|
|
fp:close()
|
|
|
|
return data
|
|
|
|
end
|
|
|
|
|
2008-03-12 20:52:28 +00:00
|
|
|
-- Returns the content of file as array of lines
|
|
|
|
function readfilel(filename)
|
2008-03-24 15:39:32 +00:00
|
|
|
local fp, err = io.open(filename)
|
2008-03-12 20:52:28 +00:00
|
|
|
local line = ""
|
|
|
|
local data = {}
|
|
|
|
|
|
|
|
if fp == nil then
|
2008-03-30 19:12:16 +00:00
|
|
|
return nil, err
|
2008-03-12 20:52:28 +00:00
|
|
|
end
|
|
|
|
|
|
|
|
while true do
|
|
|
|
line = fp:read()
|
|
|
|
if (line == nil) then break end
|
|
|
|
table.insert(data, line)
|
|
|
|
end
|
|
|
|
|
|
|
|
fp:close()
|
|
|
|
return data
|
|
|
|
end
|
|
|
|
|
2008-03-02 21:52:58 +00:00
|
|
|
-- Writes given data to a file
|
|
|
|
function writefile(filename, data)
|
2008-03-24 15:39:32 +00:00
|
|
|
local fp, err = io.open(filename, "w")
|
2008-03-30 19:12:16 +00:00
|
|
|
|
2008-03-02 21:52:58 +00:00
|
|
|
if fp == nil then
|
2008-03-30 19:12:16 +00:00
|
|
|
return nil, err
|
2008-03-02 21:52:58 +00:00
|
|
|
end
|
2008-03-30 19:12:16 +00:00
|
|
|
|
2008-03-02 21:52:58 +00:00
|
|
|
fp:write(data)
|
|
|
|
fp:close()
|
2008-03-30 19:12:16 +00:00
|
|
|
|
|
|
|
return true
|
2008-03-02 21:52:58 +00:00
|
|
|
end
|
|
|
|
|
|
|
|
-- Returns the file modification date/time of "path"
|
|
|
|
function mtime(path)
|
2008-03-29 18:22:21 +00:00
|
|
|
return posix.stat(path, "mtime")
|
2008-03-02 21:52:58 +00:00
|
|
|
end
|
|
|
|
|
2008-03-29 18:22:21 +00:00
|
|
|
-- basename wrapper
|
2008-03-29 21:17:54 +00:00
|
|
|
basename = posix.basename
|
2008-03-29 18:22:21 +00:00
|
|
|
|
|
|
|
-- dirname wrapper
|
2008-03-29 21:17:54 +00:00
|
|
|
dirname = posix.dirname
|
2008-03-02 21:52:58 +00:00
|
|
|
|
|
|
|
-- Diriterator - alias for lfs.dir - filter . and ..
|
|
|
|
function dir(path)
|
2008-03-29 18:22:21 +00:00
|
|
|
local e = posix.dir(path)
|
|
|
|
table.remove(e, 1)
|
|
|
|
table.remove(e, 1)
|
2008-03-02 21:52:58 +00:00
|
|
|
return e
|
2008-03-24 15:39:32 +00:00
|
|
|
end
|
|
|
|
|
|
|
|
-- Alias for lfs.mkdir
|
2008-03-29 21:17:54 +00:00
|
|
|
mkdir = posix.mkdir
|