From 469becc873e8aaeca23c5b8dbc1609f4c17112ea Mon Sep 17 00:00:00 2001
From: Christian Zufferey <christian@zufferey.com>
Date: Sat, 23 Nov 2019 14:03:27 +0100
Subject: [PATCH] wip

---
 WIFI_sniffer/cret_project/dir2.lua            | 53 +++++++++++++++++++
 .../{tst_dir1.lua => zz_host_dir1.lua}        |  0
 WIFI_sniffer/cret_project/zz_host_dir2.lua    | 33 ++++++++++++
 3 files changed, 86 insertions(+)
 create mode 100644 WIFI_sniffer/cret_project/dir2.lua
 rename WIFI_sniffer/cret_project/tst_dir/{tst_dir1.lua => zz_host_dir1.lua} (100%)
 create mode 100755 WIFI_sniffer/cret_project/zz_host_dir2.lua

diff --git a/WIFI_sniffer/cret_project/dir2.lua b/WIFI_sniffer/cret_project/dir2.lua
new file mode 100644
index 0000000..f8ca585
--- /dev/null
+++ b/WIFI_sniffer/cret_project/dir2.lua
@@ -0,0 +1,53 @@
+-- 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
+]]
+
+
diff --git a/WIFI_sniffer/cret_project/tst_dir/tst_dir1.lua b/WIFI_sniffer/cret_project/tst_dir/zz_host_dir1.lua
similarity index 100%
rename from WIFI_sniffer/cret_project/tst_dir/tst_dir1.lua
rename to WIFI_sniffer/cret_project/tst_dir/zz_host_dir1.lua
diff --git a/WIFI_sniffer/cret_project/zz_host_dir2.lua b/WIFI_sniffer/cret_project/zz_host_dir2.lua
new file mode 100755
index 0000000..b23ee6d
--- /dev/null
+++ b/WIFI_sniffer/cret_project/zz_host_dir2.lua
@@ -0,0 +1,33 @@
+#!/usr/local/bin/lua5.1
+-- script lua à faire tourner sur le host pour calculer les checksum de tous les fichiers
+-- du dossier en cours, donc PAS sur le NodeMCU !
+-- source: https://stackoverflow.com/questions/5303174/how-to-get-list-of-directories-in-lua (30%)
+
+print("\n zz_host_dir2.lua   zf191123.1318   \n")
+
+function calc_chksum_file(name_file)
+    size_file = 1   chksum_file = 0   local f = io.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
+    end
+    f:close()
+end
+
+function scandir(directory)
+    local zdir={}   local pfile = io.popen("ls -1r "..directory)
+    for name_file in pfile:lines() do
+        calc_chksum_file(name_file)
+        if (size_file ~= 1) and (chksum_file ~= 1) then
+            zdir[#zdir+1]=name_file..string.rep(" ",24-string.len(name_file)).." : "..size_file..", "..chksum_file
+        end
+    end
+    pfile:close()
+    table.sort(zdir)
+    for i=1, #zdir do
+        print(zdir[i])
+    end
+end
+
+scandir("./")