filesystemtest.lua

local ins = {}

FILE = "tmpfile.txt"
CYCLES = 20

function average(inmassiv)
    local rezik = 0
  
    for i = 1, #inmassiv do
      rezik = inmassiv[i] + rezik
    end
    return rezik / #inmassiv
  end

for i = 1, CYCLES do
    local res = {}
    file = io.open(FILE, "w")
    local alltime = os.clock()
    for i = 1, 100000 * i do
        local s = os.clock()
        file:write(math.random(0,999999999).."rippo\n")
        table.insert(res, os.clock() - s)
    end
    print("dest: ".. FILE .." | "..i..": write ("..100000 * i.." lines): "..os.clock() - alltime .." seconds / one line average: "..average(res) * 1000000 .." us")
    file:close()
    res = {}
    alltime = os.clock()
    for l in io.lines(FILE) do
        local s = os.clock()
        table.insert(ins, l)
        table.insert(res, os.clock() - s)
    end
    print("dest: ".. FILE .." | "..i..": read ("..100000 * i.." lines): "..os.clock() - alltime .." seconds / one line average: "..average(res) * 1000000 .." us")
    res = {}
    alltime = os.clock()
    for l in io.lines(FILE) do
        local s = os.clock()
        if string.find(l, ".*.*.*.*.*.*.*.*.*\0") then
            table.insert(ins, l)
        end
        table.insert(res, os.clock() - s)
    end
    print("dest: ".. FILE .." | "..i..": read(with substrings) ("..100000 * i.." lines): "..os.clock() - alltime .." seconds / one line average: "..average(res) * 1000000 .." us")    
end