include("WBInclusions") global VERSION = "004" global BASE = "/ROM/BO/c9/" global OKs = Dict() AGOs = [] USERS = [] EMP("global C9IMAGDICT = " * RRead("C9IMAGDICT", "asis")) global ix = 1 function RD(dir) # println(" dir: \"",dir, "\"") files = readdir(dir) for f in files if isdir(dir * f) RD(dir * f * "/") continue end if !(endswith(f, ".jpg") || endswith(f, ".gif") || endswith(f, ".png")) continue end global ok = false global notok = 0 global q = "" global force = false while !ok try if isfile("\\Oldimages\\" * f * q) xx = get(OKs, lowercase(f), "SSSSS") mismatch = "" if (xx != "SSSSS") && (RRead(dir * f, "raw") != RRead(xx, "raw")) mismatch = " " * HI_RED * "MISMATCH!" * HI_END end println("\\Oldimages\\" * f * q * " ?? " * dir * f * " ?? " * get(OKs, lowercase(f), HI_AQUA * xx * HI_END) * mismatch) ok = true continue end cp(dir * f, "\\Oldimages\\" * f * q) mt = stat(dir * f) #println(" " * dir * f * " " , string(stat(dir * f).mtime)) #println("OK ", dir * f , " ", "\\Oldimages\\" * f * q) OKs[f] = lowercase(dir * f) push!(AGOs,[stat(dir * f).mtime, dir*f]) ok = true catch ex local s = string(ex) if length(s) > 200 s = s[1:200] * "..." end println("Failure: ", dir * f * " " * typeof(ex), ".\n", s); ok = true end end global ix += 1 end end foreach(rm, filter(contains("."), readdir("/OLDIMAGES",join=true))) # What a shit! RD(BASE) LIST1 = [] LIST2 = [] global USED = 0 AGOss = sort(AGOs,by = x -> x[1], rev = true) for item in AGOss xxx = item[2][12:length(item[2])] xxxx = "" xxxxx = "" if (a = get(C9IMAGDICT[2], xxx, "NUTHIN")) != "NUTHIN" xxxx = " " * replace(replace(replace(string(a), r"Dict{String, (Int32|Any)}" => ""), r"[()]" => ""), r"\" => (\d+)," => s"\" => \1,") * "" xxxxx = " USED" global USED += 1 for u in keys(a) if !(u in USERS) push!(USERS, u) end end end push!(LIST2, replace(string(Dates.unix2datetime(item[1])), r"T(\d{2}):(\d{2}).*" => s" \1:\2") * "" * xxxxx * "" * xxx * " " * xxxx) end AGOst = sort(AGOs, by = x -> lowercase(x[2])) for item in AGOst xxx = item[2][12:length(item[2])] xxxx = "" xxxxx = "" if (a = get(C9IMAGDICT[2], xxx, "NUTHIN")) != "NUTHIN" xxxx = " " * replace(replace(replace(string(a), r"Dict{String, (Int32|Any)}" => ""), r"[()]" => ""), r"\" => (\d+)," => s"\" => \1,") * "" xxxxx = " USED" end push!(LIST1, replace(string(Dates.unix2datetime(item[1])), r"T(\d{2}):(\d{2}).*" => s" \1:\2") * "" * xxxxx * "" * xxx * " " * xxxx) end #println("\n\n") global junk10 = open("JUNK10.html", "w") write(junk10, "\n\n\n\nLink inventory\n\n\n\n
\"Previous\"Welcome
\n
\n") write(junk10, "

c9images v" * VERSION * "  [" * C9IMAGDICT[1] * "]
USED: " * string(USED) * ".  Total: " * formatFixed(length(LIST1)) * ".   Chronological order

\n" * "\n") for i = 1 : length(LIST1) write(junk10, "" * LIST1[i] * "\n") end write(junk10, "—— Chronological order (Top) ——\n") for i = 1 : length(LIST1) write(junk10, "" * LIST2[i] * "\n") end global U = "" Uc = "" for u in sort(USERS, by = x -> lowercase(x)) global U *= Uc * "" * u * "" global Uc = ", " end write(junk10,"\n

Users:  " * U * ".

") write(junk10, "\n
\n
\"This
\n
\n") close(junk10) println("ix: ", ix - 1)