54 lines
1.4 KiB
Lua
54 lines
1.4 KiB
Lua
-- fonction dir() pour afficher les fichiers dans la flash
|
|
print("\n dir2.lua zf191123.1402 \n")
|
|
|
|
function calc_chksum_file(name_file)
|
|
size_file = 1 chksum_file = 0
|
|
-- local f = io.open(name_file, "r")
|
|
local f = file.open(name_file, "r")
|
|
while true do
|
|
local t = f:read(1) if t == nil then break end
|
|
chksum_file = chksum_file + size_file * string.byte(t)
|
|
size_file = size_file + 1
|
|
if size_file%100 == 0 then uart.write(0,".") end
|
|
end
|
|
f:close()
|
|
print(name_file)
|
|
end
|
|
|
|
function dirfile(k)
|
|
calc_chksum_file(k)
|
|
print(k..string.rep(" ",24-string.len(k)).." : "..size_file..", "..chksum_file)
|
|
size_file=nil chksum_file=nil k=nil
|
|
end
|
|
|
|
function dir()
|
|
local zdir={}
|
|
-- local pfile = io.popen("ls -1r ")
|
|
local pfile = file.list()
|
|
for k,v in pairs(pfile) do
|
|
calc_chksum_file(k)
|
|
if (size_file ~= 1) and (chksum_file ~= 1) then
|
|
zdir[#zdir+1]=k..string.rep(" ",24-string.len(k)).." : "..size_file..", "..chksum_file
|
|
end
|
|
end
|
|
-- pfile:close()
|
|
table.sort(zdir)
|
|
for i=1, #zdir do
|
|
print(zdir[i])
|
|
end
|
|
size_file=nil chksum_file=nil k=nil
|
|
end
|
|
|
|
--dir()
|
|
|
|
--[[
|
|
dir()
|
|
dirfile("dir2.lua")
|
|
|
|
for k,v in pairs(_G) do print(k,v) end
|
|
|
|
status, err = pcall(function () print(zhash("il était une fois trois petits cochons roses...")) end) if status==false then print("Error: ",err) end
|
|
]]
|
|
|
|
|