Air724ugLora/demo/fs/testFs4useratio.lua

--- 模块功能：文件操作功能测试.
-- @author openLuat
-- @module fs.testFs
-- @license MIT
-- @copyright openLuat
-- @release 2018.03.27

module(...,package.seeall)

local USER_DIR1,USER_DIR11 = "/dir1","/dir11"
local USER_DIR2,USER_DIR21,USER_DIR211 = "/dir2","/dir21","/dir211"
local USER_DIR3 = "/dir3"

--[[该demo提供四种接口，第一种readfile(filename)读文件，第二种writevala(filename,value)，写文件内容，附加模式，
第三种function writevalw(filename,value)，写文件内容，覆盖模式，第四种deletefile(filename)，删除文件。--]]

--[[
    函数名：readfile(filename)
    功能：打开所输入文件名的文件，并输出储存在里面额内容
    参数：文件名
    返回值：无                     ]]
local function readfile(filename)--打开指定文件并输出内容
    
    local filehandle=io.open(filename,"r")--第一个参数是文件名，第二个是打开方式，'r'读模式,'w'写模式，对数据进行覆盖,'a'附加模式,'b'加在模式后面表示以二进制形式打开
    if filehandle then          --判断文件是否存在
        local fileval=filehandle:read("*all")--读出文件内容
      if  fileval  then
           print(filename)  --如果文件存在，打印文件内容
           filehandle:close()--关闭文件
      else 
           print("The file is empty")--文件不存在
      end
    else 
        print("文件不存在或文件输入格式不正确") --打开失败  
    end 
    
end

local rt = true

--[[
    函数名： writevala(filename,value)
    功能：向输入的文件中添加内容，内容附加在原文件内容之后
    参数：第一个文件名，第二个需要添加的内容
    返回值：无                         --]]
local function writevala(filename,value)--在指定文件中添加内容,函数名最后一位就是打开的模式
    local filehandle = io.open(filename,"a+")--第一个参数是文件名，后一个是打开模式'r'读模式,'w'写模式，对数据进行覆盖,'a'附加模式,'b'加在模式后面表示以二进制形式打开
    if filehandle then
        rt = filehandle:write(value)--写入要写入的内容
        print("write rt",rt)
        filehandle:close()
    else
        print("文件不存在或文件输入格式不正确") --打开失败  
    end
end



--[[
    函数名：writevalw(filename,value)
    功能：向输入文件中添加内容，新添加的内容会覆盖掉原文件中的内容
    参数：同上
    返回值：无                 --]]
local function writevalw(filename,value)--在指定文件中添加内容
    local filehandle = io.open(filename,"w")--第一个参数是文件名，后一个是打开模式'r'读模式,'w'写模式，对数据进行覆盖,'a'附加模式,'b'加在模式后面表示以二进制形式打开
    if filehandle then
        filehandle:write(value)--写入要写入的内容
        filehandle:close()
    else
        print("文件不存在或文件输入格式不正确") --打开失败  
    end
end


--[[函数名：deletefile(filename)
    功能：删除指定文件中的所有内容
    参数：文件名
    返回值：无             --]]
local function deletefile(filename)--删除指定文件夹中的所有内容
    local filehandle = io.open(filename,"w")
    if filehandle then
        filehandle:write()--写入空的内容
        print("successfully delete")
        filehandle:close()
    else
        print("文件不存在或文件输入格式不正确") --打开失败  
    end
end

--打印文件系统的剩余空间
print("get_fs_free_size: "..rtos.get_fs_free_size().." Bytes")
--成功创建一个目录(目录已存在，也返回true表示创建成功)

local function dir1test()
    if rtos.make_dir(USER_DIR1) then
        if rtos.make_dir(USER_DIR11) then
            readfile(USER_DIR11.."/file11.txt")
            writevala(USER_DIR11.."/file11.txt","file11 test")
            readfile(USER_DIR11.."/file11.txt")
            writevalw(USER_DIR11.."/file11.txt","file11 test2")
            --deletefile(USER_DIR11.."/file11.txt")
            readfile(USER_DIR11.."/file11.txt")
            
            readfile(USER_DIR11.."/file12.txt")
            writevala(USER_DIR11.."/file12.txt","file11 test")
            readfile(USER_DIR11.."/file12.txt")
            writevalw(USER_DIR11.."/file12.txt","file11 test2")
            --deletefile(USER_DIR11.."/file12.txt")
            readfile(USER_DIR11.."/file12.txt")        
        end
    end
end

local function dir2test()
    if rtos.make_dir(USER_DIR2) then
        if rtos.make_dir(USER_DIR21) then
            rtos.make_dir(USER_DIR211)
            readfile(USER_DIR21.."/file21.txt")
            writevala(USER_DIR21.."/file21.txt","file21 test")
            readfile(USER_DIR21.."/file21.txt")
            writevalw(USER_DIR21.."/file21.txt","file21 test2")
            --deletefile(USER_DIR21.."/file21.txt")
            readfile(USER_DIR21.."/file21.txt")
            
            readfile(USER_DIR21.."/file3.txt")
            writevala(USER_DIR21.."/file3.txt","file3 test")
            readfile(USER_DIR21.."/file3.txt")
            writevalw(USER_DIR21.."/file3.txt","file3 test2")
            --deletefile(USER_DIR21.."/file3.txt")
            readfile(USER_DIR21.."/file3.txt")        
        end
    end
end

local function file1test()
    readfile("/file1.txt")
    writevala("/file1.txt","file1 test")
    readfile("/file1.txt")
    writevalw("/file1.txt","file1 test2")
    --deletefile("/file1.txt")
    readfile("/file1.txt")    
end

local function file3test()
    readfile("/file3.txt")
    writevala("/file3.txt","file3 test")
    readfile("/file3.txt")
    writevalw("/file3.txt","file3 test2")
    --deletefile("/file3.txt")
    readfile("/file3.txt")    
end

local function file4test()
    readfile("/file4.txt")
    writevala("/file4.txt","file4 test")
    readfile("/file4.txt")
    writevalw("/file4.txt","file4 test2")
    --deletefile("/file4.txt")
    readfile("/file4.txt")    
end

local function dir3test()
    if rtos.make_dir(USER_DIR3) then
        print("MAKE DIR3 SUCC")
    else
        print("MAKE DIR3 FAIL")        
    end
end

local cnt = 0

local str512 = "12345678901234567890123456789012345678901234567890123456789012345678901234567890abcdefghkkll111122222ffssssss33334444455566666777812345678901234567890123456789012345678901234567890123456789012345678901234567890abcdefghkkll111122222ffssssss33334444455566666777812345678901234567890123456789012345678901234567890123456789A012345678901234567890abcdefghkkll111122222ffssssss33334444455566666777812345678901234567890123456789012345678901234567890123456789012345678901234567890abcdefghkkll111122222ffssssss333344444555666667778"
local str = str512..str512
local function filewtest()
    if rt then
        cnt = cnt + 1
    end
    print("get_fs_free_size: cnt"..rtos.get_fs_free_size().." Bytes",cnt)
    writevala("/file1.txt",str)  
end


local function emptyfile(filename)
    local filehandle = io.open(filename,"w")
    if filehandle then
        print("successfully empty")
        filehandle:close()
    else
        print("文件不存在或文件输入格式不正确") --打开失败  
    end
end

local function filemptest()
    cnt = cnt + 1
    print("get_fs_free_size: cnt"..rtos.get_fs_free_size().." Bytes",cnt)
    emptyfile("/file"..cnt..".txt")
end

local function makedir(dir)
    if rtos.make_dir(dir) then
        print("makedir suc")
    else
        print("makedir fail")    
    end
end

local function makedirtest()
    cnt = cnt + 1
    print("get_fs_free_size: cnt"..rtos.get_fs_free_size().." Bytes",cnt)   
    makedir("/dir"..cnt)    
end

local str10 = str..str..str..str..str..str..str..str..str..str
local function filew10ktest()
    if rt then
        cnt = cnt + 1
    end
    print("get_fs_free_size: cnt"..rtos.get_fs_free_size().." Bytes",cnt)
    writevala("/file"..cnt..".txt",str10)
end

local str100 = str10..str10..str10..str10..str10..str10..str10..str10..str10..str10
local function filew100ktest()
    if rt then
        cnt = cnt + 1
    end
    print("get_fs_free_size: cnt"..rtos.get_fs_free_size().." Bytes",cnt)
    writevala("/file"..cnt..".txt",str100)  
end

local function test()
    --filewtest()
    filemptest()
    --makedirtest()
    --filew10ktest()
    --filew100ktest()
end

sys.timerLoopStart(test,1000)