Gros problème, je me suis aperçu que la commande file.readline dans web_srv2.lua a un gros bug quand une ligne est longue, j'ai dû la réécrire et testée dans cat.lua. Me reste encore à corriger web_srv2.lua

This commit is contained in:
Christian Zufferey
2019-11-24 22:05:21 +01:00
parent 0b6f71ca95
commit 8b80e0f61f
6 changed files with 69 additions and 27 deletions
+16 -12
View File
@@ -1,18 +1,22 @@
-- fonction cat() pour afficher le contenu d'un fichier dans la flash
print("\n cat.lua zf192026.0858 \n")
print("\n cat.lua zf191124.2204 \n")
function zread_line()
local zline = ""
while true do
local t = zf:read(1) if t == nil then return end
zline = zline..t
if t == "\n" then return string.sub(zline,1,string.len(zline)-1) end
end
end
function cat(zfile)
print("\n"..zfile.."\n-------------------------------")
zfilei = file.open(zfile, "r")
i=1
zline=file.readline()
repeat
-- print(i..": "..string.sub(zline,1,string.len(zline)-1))
print(string.sub(zline,1,string.len(zline)-1))
i=i+1 zline=file.readline()
until zline== nil
file.close(zfilei)
zf = file.open(zfile, "r")
while true do
zline = zread_line() if zline == nil then break end
print(zline)
end
zf:close()
print("-------------------------------")
end