src/ffluci/fs.lua

   1 --[[
   2 FFLuCI - Filesystem tools
   3
   4 Description:
   5 A module offering often needed filesystem manipulation functions
   6
   7 FileId:
   8 $Id$
   9
  10 License:
  11 Copyright 2008 Steven Barth <steven@midlink.org>
  12
  13 Licensed under the Apache License, Version 2.0 (the "License");
  14 you may not use this file except in compliance with the License.
  15 You may obtain a copy of the License at
  16
  17         http://www.apache.org/licenses/LICENSE-2.0
  18
  19 Unless required by applicable law or agreed to in writing, software
  20 distributed under the License is distributed on an "AS IS" BASIS,
  21 WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  22 See the License for the specific language governing permissions and
  23 limitations under the License.
  24
  25 ]]--
  26
  27 module("ffluci.fs", package.seeall)
  28
  29 require("lfs")
  30
  31 -- Checks whether a file exists
  32 function isfile(filename)
  33         local fp = io.open(path, "r")
  34         if file then file:close() end
  35         return file ~= nil
  36 end
  37
  38 -- Returns the content of file
  39 function readfile(filename)
  40         local fp, err = io.open(filename)
  41
  42         if fp == nil then
  43                 error(err)
  44         end
  45
  46         local data = fp:read("*a")
  47         fp:close()
  48         return data
  49 end
  50
  51 -- Returns the content of file as array of lines
  52 function readfilel(filename)
  53         local fp, err = io.open(filename)
  54         local line = ""
  55         local data = {}
  56
  57         if fp == nil then
  58                 error(err)
  59         end
  60
  61         while true do
  62                 line = fp:read()
  63                 if (line == nil) then break end
  64                 table.insert(data, line)
  65         end
  66
  67         fp:close()
  68         return data
  69 end
  70
  71 -- Writes given data to a file
  72 function writefile(filename, data)
  73         local fp, err = io.open(filename, "w")
  74         if fp == nil then
  75                 error(err)
  76         end
  77         fp:write(data)
  78         fp:close()
  79 end
  80
  81 -- Returns the file modification date/time of "path"
  82 function mtime(path)
  83         return lfs.attributes(path, "modification")
  84 end
  85
  86 -- Simplified dirname function
  87 function dirname(file)
  88         return string.gsub(file, "[^/]+$", "")
  89 end
  90
  91 -- Diriterator - alias for lfs.dir - filter . and ..
  92 function dir(path)
  93         local e = {}
  94         for entry in lfs.dir(path) do
  95                 if not(entry == "." or entry == "..") then
  96                         table.insert(e, entry)
  97                 end
  98         end
  99         return e
 100 end
 101
 102 -- Alias for lfs.mkdir
 103 function mkdir(...)
 104         return lfs.mkdir(...)
 105 end