-- Decompiled using luadec 2.0 standard by sztupy (http://luadec51.luaforge.net) -- Command line was: -d C:\Downloads\luadec51_2.0_win32_bin\lua\model\site\Site.luac ---------------------------------------------- 1 NEWTABLE 0 0 0 SET_CTR(Tpend) = 0 next bool: 0 locals(0): vpend(0): tpend(1): 0{{}} (...) ---------------------------------------------- 2 GETGLOBAL 1 0 SET_CTR(Tpend) = 0 next bool: 0 locals(1): 0{l_0_0} vpend(0): tpend(1): 1{log} (...) local l_0_0 = {} ---------------------------------------------- 3 SELF 1 1 257 SET_CTR(Tpend) = 0 SET_CTR(Tpend) = 1 next bool: 0 locals(1): 0{l_0_0} vpend(0): tpend(2): 2{log} 1{log:obtain} (...) local l_0_0 = {} ---------------------------------------------- 4 LOADK 3 2 SET_CTR(Tpend) = 2 next bool: 0 locals(1): 0{l_0_0} vpend(0): tpend(3): 2{log} 1{log:obtain} 3{"Site"} (...) local l_0_0 = {} ---------------------------------------------- 5 CALL 1 3 2 SET_CTR(Tpend) = 0 next bool: 0 locals(1): 0{l_0_0} vpend(0): tpend(1): 1{log:obtain("Site")} (...) local l_0_0 = {} ---------------------------------------------- 6 SETTABLE 0 259 260 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_0_0} 1{l_0_1} vpend(1): -1{l_0_0.name=""} tpend(0): (...) local l_0_0 = {} local l_0_1 = log:obtain("Site") ---------------------------------------------- 7 SETTABLE 0 261 260 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_0_0} 1{l_0_1} vpend(1): -1{l_0_0.localFolderPath=""} tpend(0): (...) local l_0_0 = {} local l_0_1 = log:obtain("Site") l_0_0.name = "" ---------------------------------------------- 8 CLOSURE 2 0 ---------------------------------------------- 1 NEWTABLE 1 0 0 SET_CTR(Tpend) = 0 next bool: 0 locals(1): 0{l_1_0} vpend(0): tpend(1): 1{{}} (l_1_0) ---------------------------------------------- 2 GETGLOBAL 2 0 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_1_0} 1{l_1_1} vpend(0): tpend(1): 2{setmetatable} (l_1_0) local l_1_1 = {} ---------------------------------------------- 3 MOVE 3 1 0 SET_CTR(Tpend) = 1 next bool: 0 locals(2): 0{l_1_0} 1{l_1_1} vpend(0): tpend(2): 2{setmetatable} 3{l_1_1} (l_1_0) local l_1_1 = {} ---------------------------------------------- 4 MOVE 4 0 0 SET_CTR(Tpend) = 2 next bool: 0 locals(2): 0{l_1_0} 1{l_1_1} vpend(0): tpend(3): 2{setmetatable} 3{l_1_1} 4{l_1_0} (l_1_0) local l_1_1 = {} ---------------------------------------------- 5 CALL 2 3 1 next bool: 0 locals(2): 0{l_1_0} 1{l_1_1} vpend(0): tpend(0): (l_1_0) local l_1_1 = {} setmetatable(l_1_1, l_1_0) ---------------------------------------------- 6 SETTABLE 0 257 0 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_1_0} 1{l_1_1} vpend(1): -1{l_1_0.__index=l_1_0} tpend(0): (l_1_0) local l_1_1 = {} setmetatable(l_1_1, l_1_0) ---------------------------------------------- 7 RETURN 1 2 0 next bool: 0 locals(2): 0{l_1_0} 1{l_1_1} vpend(0): tpend(0): (l_1_0) local l_1_1 = {} setmetatable(l_1_1, l_1_0) l_1_0.__index = l_1_0 return l_1_1 ---------------------------------------------- 8 RETURN 0 1 0 next bool: 0 locals(0): vpend(0): tpend(0): (l_1_0) local l_1_1 = {} setmetatable(l_1_1, l_1_0) l_1_0.__index = l_1_0 return l_1_1 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_0_0} 1{l_0_1} vpend(0): tpend(1): 2{function(l_1_0) local l_1_1 = {} setmetatable(l_1_1, l_1_0) l_1_0.__index = l_1_0 return l_1_1 end} (...) local l_0_0 = {} local l_0_1 = log:obtain("Site") l_0_0.name = "" l_0_0.localFolderPath = "" ---------------------------------------------- 9 SETTABLE 0 262 2 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_0_0} 1{l_0_1} vpend(1): -1{l_0_0.new=function(l_1_0) local l_1_1 = {} setmetatable(l_1_1, l_1_0) l_1_0.__index = l_1_0 return l_1_1 end} tpend(0): (...) local l_0_0 = {} local l_0_1 = log:obtain("Site") l_0_0.name = "" l_0_0.localFolderPath = "" ---------------------------------------------- 10 CLOSURE 2 1 ---------------------------------------------- 1 GETGLOBAL 2 0 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_2_0} 1{l_2_1} vpend(0): tpend(1): 2{string} (l_2_0, l_2_1) ---------------------------------------------- 2 GETTABLE 2 2 257 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_2_0} 1{l_2_1} vpend(0): tpend(1): 2{string.lower} (l_2_0, l_2_1) ---------------------------------------------- 3 MOVE 3 1 0 SET_CTR(Tpend) = 1 next bool: 0 locals(2): 0{l_2_0} 1{l_2_1} vpend(0): tpend(2): 2{string.lower} 3{l_2_1} (l_2_0, l_2_1) ---------------------------------------------- 4 CALL 2 2 2 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_2_0} 1{l_2_1} vpend(0): tpend(1): 2{string.lower(l_2_1)} (l_2_0, l_2_1) ---------------------------------------------- 5 GETGLOBAL 3 0 SET_CTR(Tpend) = 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(1): 3{string} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) ---------------------------------------------- 6 GETTABLE 3 3 258 SET_CTR(Tpend) = 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(1): 3{string.find} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) ---------------------------------------------- 7 MOVE 4 2 0 SET_CTR(Tpend) = 1 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(2): 3{string.find} 4{l_2_2} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) ---------------------------------------------- 8 LOADK 5 3 SET_CTR(Tpend) = 2 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(3): 3{string.find} 4{l_2_2} 5{".png$"} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) ---------------------------------------------- 9 CALL 3 3 2 SET_CTR(Tpend) = 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(1): 3{string.find(l_2_2, ".png$")} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) ---------------------------------------------- 10 TEST 3 0 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(0): (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) ---------------------------------------------- 11 JMP 0 2 next bool: 1 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(0): (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) ---------------------------------------------- 12 LOADBOOL 3 1 0 SET_CTR(Tpend) = 0 next bool: 1 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(1): 3{true} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) ---------------------------------------------- 13 RETURN 3 2 0 Exps(0): at 10 dest 14 neg 0 (string.find(l_2_2, ".png$") (null) string.find(l_2_2, ".png$")) cpd -1 Stored at endif list: <14> next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(0): (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true ---------------------------------------------- 14 GETGLOBAL 3 0 SET_CTR(Tpend) = 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(1): 3{string} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end ---------------------------------------------- 15 GETTABLE 3 3 258 SET_CTR(Tpend) = 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(1): 3{string.find} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end ---------------------------------------------- 16 MOVE 4 2 0 SET_CTR(Tpend) = 1 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(2): 3{string.find} 4{l_2_2} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end ---------------------------------------------- 17 LOADK 5 4 SET_CTR(Tpend) = 2 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(3): 3{string.find} 4{l_2_2} 5{".gif$"} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end ---------------------------------------------- 18 CALL 3 3 2 SET_CTR(Tpend) = 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(1): 3{string.find(l_2_2, ".gif$")} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end ---------------------------------------------- 19 TEST 3 0 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(0): (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end ---------------------------------------------- 20 JMP 0 2 next bool: 1 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(0): (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end ---------------------------------------------- 21 LOADBOOL 3 1 0 SET_CTR(Tpend) = 0 next bool: 1 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(1): 3{true} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end ---------------------------------------------- 22 RETURN 3 2 0 Exps(0): at 19 dest 23 neg 0 (string.find(l_2_2, ".gif$") (null) string.find(l_2_2, ".gif$")) cpd -1 Stored at endif list: <23> next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(0): (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true ---------------------------------------------- 23 GETGLOBAL 3 0 SET_CTR(Tpend) = 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(1): 3{string} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end ---------------------------------------------- 24 GETTABLE 3 3 258 SET_CTR(Tpend) = 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(1): 3{string.find} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end ---------------------------------------------- 25 MOVE 4 2 0 SET_CTR(Tpend) = 1 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(2): 3{string.find} 4{l_2_2} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end ---------------------------------------------- 26 LOADK 5 5 SET_CTR(Tpend) = 2 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(3): 3{string.find} 4{l_2_2} 5{".jpg$"} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end ---------------------------------------------- 27 CALL 3 3 2 SET_CTR(Tpend) = 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(1): 3{string.find(l_2_2, ".jpg$")} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end ---------------------------------------------- 28 TEST 3 0 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(0): (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end ---------------------------------------------- 29 JMP 0 2 next bool: 1 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(0): (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end ---------------------------------------------- 30 LOADBOOL 3 1 0 SET_CTR(Tpend) = 0 next bool: 1 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(1): 3{true} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end ---------------------------------------------- 31 RETURN 3 2 0 Exps(0): at 28 dest 32 neg 0 (string.find(l_2_2, ".jpg$") (null) string.find(l_2_2, ".jpg$")) cpd -1 Stored at endif list: <32> next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(0): (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true ---------------------------------------------- 32 GETGLOBAL 3 0 SET_CTR(Tpend) = 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(1): 3{string} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end ---------------------------------------------- 33 GETTABLE 3 3 258 SET_CTR(Tpend) = 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(1): 3{string.find} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end ---------------------------------------------- 34 MOVE 4 2 0 SET_CTR(Tpend) = 1 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(2): 3{string.find} 4{l_2_2} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end ---------------------------------------------- 35 LOADK 5 6 SET_CTR(Tpend) = 2 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(3): 3{string.find} 4{l_2_2} 5{".swf$"} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end ---------------------------------------------- 36 CALL 3 3 2 SET_CTR(Tpend) = 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(1): 3{string.find(l_2_2, ".swf$")} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end ---------------------------------------------- 37 TEST 3 0 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(0): (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end ---------------------------------------------- 38 JMP 0 2 next bool: 1 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(0): (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end ---------------------------------------------- 39 LOADBOOL 3 1 0 SET_CTR(Tpend) = 0 next bool: 1 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(1): 3{true} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end ---------------------------------------------- 40 RETURN 3 2 0 Exps(0): at 37 dest 41 neg 0 (string.find(l_2_2, ".swf$") (null) string.find(l_2_2, ".swf$")) cpd -1 Stored at endif list: <41> next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(0): (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end if string.find(l_2_2, ".swf$") then return true ---------------------------------------------- 41 LOADBOOL 3 0 0 SET_CTR(Tpend) = 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(1): 3{false} (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end if string.find(l_2_2, ".swf$") then return true end ---------------------------------------------- 42 RETURN 3 2 0 next bool: 0 locals(3): 0{l_2_0} 1{l_2_1} 2{l_2_2} vpend(0): tpend(0): (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end if string.find(l_2_2, ".swf$") then return true end return false ---------------------------------------------- 43 RETURN 0 1 0 next bool: 0 locals(0): vpend(0): tpend(0): (l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end if string.find(l_2_2, ".swf$") then return true end return false SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_0_0} 1{l_0_1} vpend(0): tpend(1): 2{function(l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end if string.find(l_2_2, ".swf$") then return true end return false end} (...) local l_0_0 = {} local l_0_1 = log:obtain("Site") l_0_0.name = "" l_0_0.localFolderPath = "" l_0_0.new = function(l_1_0) local l_1_1 = {} setmetatable(l_1_1, l_1_0) l_1_0.__index = l_1_0 return l_1_1 end ---------------------------------------------- 11 SETTABLE 0 263 2 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_0_0} 1{l_0_1} vpend(1): -1{l_0_0.isPathToBinary=function(l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end if string.find(l_2_2, ".swf$") then return true end return false end} tpend(0): (...) local l_0_0 = {} local l_0_1 = log:obtain("Site") l_0_0.name = "" l_0_0.localFolderPath = "" l_0_0.new = function(l_1_0) local l_1_1 = {} setmetatable(l_1_1, l_1_0) l_1_0.__index = l_1_0 return l_1_1 end ---------------------------------------------- 12 CLOSURE 2 2 ---------------------------------------------- 1 GETGLOBAL 2 0 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_3_0} 1{l_3_1} vpend(0): tpend(1): 2{string} (l_3_0, l_3_1) ---------------------------------------------- 2 GETTABLE 2 2 257 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_3_0} 1{l_3_1} vpend(0): tpend(1): 2{string.find} (l_3_0, l_3_1) ---------------------------------------------- 3 MOVE 3 1 0 SET_CTR(Tpend) = 1 next bool: 0 locals(2): 0{l_3_0} 1{l_3_1} vpend(0): tpend(2): 2{string.find} 3{l_3_1} (l_3_0, l_3_1) ---------------------------------------------- 4 LOADK 4 2 SET_CTR(Tpend) = 2 next bool: 0 locals(2): 0{l_3_0} 1{l_3_1} vpend(0): tpend(3): 2{string.find} 3{l_3_1} 4{"^"} (l_3_0, l_3_1) ---------------------------------------------- 5 GETUPVAL 5 0 0 SET_CTR(Tpend) = 3 next bool: 0 locals(2): 0{l_3_0} 1{l_3_1} vpend(0): tpend(4): 2{string.find} 3{l_3_1} 4{"^"} 5{l_0_0} (l_3_0, l_3_1) ---------------------------------------------- 6 GETTABLE 5 5 259 SET_CTR(Tpend) = 3 next bool: 0 locals(2): 0{l_3_0} 1{l_3_1} vpend(0): tpend(4): 2{string.find} 3{l_3_1} 4{"^"} 5{l_0_0.localFolderPath} (l_3_0, l_3_1) ---------------------------------------------- 7 CONCAT 4 4 5 SET_CTR(Tpend) = 2 next bool: 0 locals(2): 0{l_3_0} 1{l_3_1} vpend(0): tpend(3): 2{string.find} 3{l_3_1} 4{"^" .. l_0_0.localFolderPath} (l_3_0, l_3_1) ---------------------------------------------- 8 CALL 2 3 3 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_3_0} 1{l_3_1} vpend(0): tpend(1): 2{string.find(l_3_1, "^" .. l_0_0.localFolderPath)} (l_3_0, l_3_1) ---------------------------------------------- 9 TEST 2 0 1 next bool: 0 locals(4): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} vpend(0): tpend(0): (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) ---------------------------------------------- 10 JMP 0 9 next bool: 1 locals(4): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} vpend(0): tpend(0): (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) ---------------------------------------------- 11 GETUPVAL 4 1 0 SET_CTR(Tpend) = 0 next bool: 1 locals(4): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} vpend(0): tpend(1): 4{l_0_1} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) ---------------------------------------------- 12 SELF 4 4 260 SET_CTR(Tpend) = 0 SET_CTR(Tpend) = 1 next bool: 1 locals(4): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} vpend(0): tpend(2): 5{l_0_1} 4{l_0_1:error} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) ---------------------------------------------- 13 LOADK 6 5 SET_CTR(Tpend) = 2 next bool: 1 locals(4): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} vpend(0): tpend(3): 5{l_0_1} 4{l_0_1:error} 6{"asked to get URL for a path not in the site - failing ["} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) ---------------------------------------------- 14 MOVE 7 1 0 SET_CTR(Tpend) = 3 next bool: 1 locals(4): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} vpend(0): tpend(4): 5{l_0_1} 4{l_0_1:error} 6{"asked to get URL for a path not in the site - failing ["} 7{l_3_1} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) ---------------------------------------------- 15 LOADK 8 6 SET_CTR(Tpend) = 4 next bool: 1 locals(4): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} vpend(0): tpend(5): 5{l_0_1} 4{l_0_1:error} 6{"asked to get URL for a path not in the site - failing ["} 7{l_3_1} 8{"]"} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) ---------------------------------------------- 16 CONCAT 6 6 8 SET_CTR(Tpend) = 2 next bool: 1 locals(4): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} vpend(0): tpend(3): 5{l_0_1} 4{l_0_1:error} 6{"asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]"} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) ---------------------------------------------- 17 CALL 4 3 1 Exps(0): at 9 dest 20 neg 1 (l_3_2 (null) l_3_2) cpd -1 Stored at endif list: <20> next bool: 0 locals(4): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} vpend(0): tpend(0): (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") ---------------------------------------------- 18 RETURN 1 2 0 next bool: 0 locals(4): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} vpend(0): tpend(0): (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 ---------------------------------------------- 19 JMP 0 43 next bool: 0 locals(4): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} vpend(0): tpend(0): (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 ---------------------------------------------- 20 GETGLOBAL 4 0 SET_CTR(Tpend) = 0 next bool: 0 locals(4): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} vpend(0): tpend(1): 4{string} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 ---------------------------------------------- 21 GETTABLE 4 4 263 SET_CTR(Tpend) = 0 next bool: 0 locals(4): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} vpend(0): tpend(1): 4{string.sub} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 ---------------------------------------------- 22 MOVE 5 1 0 SET_CTR(Tpend) = 1 next bool: 0 locals(4): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} vpend(0): tpend(2): 4{string.sub} 5{l_3_1} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 ---------------------------------------------- 23 MOVE 6 3 0 SET_CTR(Tpend) = 2 next bool: 0 locals(4): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} vpend(0): tpend(3): 4{string.sub} 5{l_3_1} 6{l_3_3} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 ---------------------------------------------- 24 CALL 4 3 2 SET_CTR(Tpend) = 0 next bool: 0 locals(4): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} vpend(0): tpend(1): 4{string.sub(l_3_1, l_3_3)} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 ---------------------------------------------- 25 GETGLOBAL 5 8 Stored at endif list: <63> SET_CTR(Tpend) = 0 next bool: 0 locals(5): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} vpend(0): tpend(1): 5{PATH_SEPARATOR} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) ---------------------------------------------- 26 EQ 0 5 265 next bool: 0 locals(5): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} vpend(0): tpend(0): (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) ---------------------------------------------- 27 JMP 0 34 next bool: 1 locals(5): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} vpend(0): tpend(0): (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) ---------------------------------------------- 28 GETGLOBAL 5 0 SET_CTR(Tpend) = 0 next bool: 1 locals(5): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} vpend(0): tpend(1): 5{string} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) ---------------------------------------------- 29 GETTABLE 5 5 257 SET_CTR(Tpend) = 0 next bool: 1 locals(5): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} vpend(0): tpend(1): 5{string.find} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) ---------------------------------------------- 30 MOVE 6 4 0 SET_CTR(Tpend) = 1 next bool: 1 locals(5): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} vpend(0): tpend(2): 5{string.find} 6{l_3_4} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) ---------------------------------------------- 31 LOADK 7 10 SET_CTR(Tpend) = 2 next bool: 1 locals(5): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} vpend(0): tpend(3): 5{string.find} 6{l_3_4} 7{":\\"} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) ---------------------------------------------- 32 CALL 5 3 3 SET_CTR(Tpend) = 0 next bool: 1 locals(5): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} vpend(0): tpend(1): 5{string.find(l_3_4, ":\\")} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) ---------------------------------------------- 33 TEST 5 0 0 Exps(0): at 26 dest 62 neg 0 (PATH_SEPARATOR == "\\") cpd -1 Stored at endif list: <62> 63 next bool: 0 locals(7): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} vpend(0): tpend(0): (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") ---------------------------------------------- 34 JMP 0 20 next bool: 1 locals(7): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} vpend(0): tpend(0): (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") ---------------------------------------------- 35 GETGLOBAL 7 0 SET_CTR(Tpend) = 0 next bool: 1 locals(7): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} vpend(0): tpend(1): 7{string} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") ---------------------------------------------- 36 GETTABLE 7 7 263 SET_CTR(Tpend) = 0 next bool: 1 locals(7): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} vpend(0): tpend(1): 7{string.sub} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") ---------------------------------------------- 37 MOVE 8 4 0 SET_CTR(Tpend) = 1 next bool: 1 locals(7): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} vpend(0): tpend(2): 7{string.sub} 8{l_3_4} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") ---------------------------------------------- 38 LOADK 9 11 SET_CTR(Tpend) = 2 next bool: 1 locals(7): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} vpend(0): tpend(3): 7{string.sub} 8{l_3_4} 9{1} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") ---------------------------------------------- 39 SUB 10 6 268 SET_CTR(Tpend) = 3 next bool: 1 locals(7): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} vpend(0): tpend(4): 7{string.sub} 8{l_3_4} 9{1} 10{l_3_6 - 2} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") ---------------------------------------------- 40 CALL 7 4 2 SET_CTR(Tpend) = 0 next bool: 1 locals(7): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} vpend(0): tpend(1): 7{string.sub(l_3_4, 1, l_3_6 - 2)} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") ---------------------------------------------- 41 GETGLOBAL 8 0 Exps(0): at 33 dest 55 neg 0 (l_3_5 (null) l_3_5) cpd -1 Stored at endif list: <55> 62 63 SET_CTR(Tpend) = 0 next bool: 0 locals(8): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} 7{l_3_7} vpend(0): tpend(1): 8{string} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) ---------------------------------------------- 42 GETTABLE 8 8 269 SET_CTR(Tpend) = 0 next bool: 0 locals(8): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} 7{l_3_7} vpend(0): tpend(1): 8{string.upper} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) ---------------------------------------------- 43 MOVE 9 7 0 SET_CTR(Tpend) = 1 next bool: 0 locals(8): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} 7{l_3_7} vpend(0): tpend(2): 8{string.upper} 9{l_3_7} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) ---------------------------------------------- 44 CALL 8 2 2 SET_CTR(Tpend) = 0 next bool: 0 locals(8): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} 7{l_3_7} vpend(0): tpend(1): 8{string.upper(l_3_7)} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) ---------------------------------------------- 45 MOVE 7 8 0 SET_CTR(Tpend) = 0 next bool: 0 locals(8): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} 7{l_3_7} vpend(1): 7{l_3_7=string.upper(l_3_7)} tpend(0): (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) ---------------------------------------------- 46 LOADK 8 14 SET_CTR(Tpend) = 0 next bool: 0 locals(8): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} 7{l_3_7} vpend(0): tpend(1): 8{"/_DRIVE_"} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) ---------------------------------------------- 47 MOVE 9 7 0 SET_CTR(Tpend) = 1 next bool: 0 locals(8): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} 7{l_3_7} vpend(0): tpend(2): 8{"/_DRIVE_"} 9{l_3_7} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) ---------------------------------------------- 48 LOADK 10 15 SET_CTR(Tpend) = 2 next bool: 0 locals(8): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} 7{l_3_7} vpend(0): tpend(3): 8{"/_DRIVE_"} 9{l_3_7} 10{"_EVIRD_"} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) ---------------------------------------------- 49 GETGLOBAL 11 0 SET_CTR(Tpend) = 3 next bool: 0 locals(8): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} 7{l_3_7} vpend(0): tpend(4): 8{"/_DRIVE_"} 9{l_3_7} 10{"_EVIRD_"} 11{string} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) ---------------------------------------------- 50 GETTABLE 11 11 263 SET_CTR(Tpend) = 3 next bool: 0 locals(8): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} 7{l_3_7} vpend(0): tpend(4): 8{"/_DRIVE_"} 9{l_3_7} 10{"_EVIRD_"} 11{string.sub} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) ---------------------------------------------- 51 MOVE 12 4 0 SET_CTR(Tpend) = 4 next bool: 0 locals(8): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} 7{l_3_7} vpend(0): tpend(5): 8{"/_DRIVE_"} 9{l_3_7} 10{"_EVIRD_"} 11{string.sub} 12{l_3_4} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) ---------------------------------------------- 52 MOVE 13 6 0 SET_CTR(Tpend) = 5 next bool: 0 locals(8): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} 7{l_3_7} vpend(0): tpend(6): 8{"/_DRIVE_"} 9{l_3_7} 10{"_EVIRD_"} 11{string.sub} 12{l_3_4} 13{l_3_6} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) ---------------------------------------------- 53 CALL 11 3 2 SET_CTR(Tpend) = 3 next bool: 0 locals(8): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} 7{l_3_7} vpend(0): tpend(4): 8{"/_DRIVE_"} 9{l_3_7} 10{"_EVIRD_"} 11{string.sub(l_3_4, l_3_6)} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) ---------------------------------------------- 54 CONCAT 4 8 11 SET_CTR(Tpend) = 0 next bool: 0 locals(8): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} 7{l_3_7} vpend(1): 4{l_3_4="/_DRIVE_" .. l_3_7 .. "_EVIRD_" .. string.sub(l_3_4, l_3_6)} tpend(0): (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) ---------------------------------------------- 55 GETGLOBAL 7 0 SET_CTR(Tpend) = 0 next bool: 0 locals(7): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} vpend(0): tpend(1): 7{string} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) l_3_4 = "/_DRIVE_" .. l_3_7 .. "_EVIRD_" .. string.sub(l_3_4, l_3_6) end ---------------------------------------------- 56 GETTABLE 7 7 272 SET_CTR(Tpend) = 0 next bool: 0 locals(7): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} vpend(0): tpend(1): 7{string.gsub} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) l_3_4 = "/_DRIVE_" .. l_3_7 .. "_EVIRD_" .. string.sub(l_3_4, l_3_6) end ---------------------------------------------- 57 MOVE 8 4 0 SET_CTR(Tpend) = 1 next bool: 0 locals(7): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} vpend(0): tpend(2): 7{string.gsub} 8{l_3_4} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) l_3_4 = "/_DRIVE_" .. l_3_7 .. "_EVIRD_" .. string.sub(l_3_4, l_3_6) end ---------------------------------------------- 58 LOADK 9 9 SET_CTR(Tpend) = 2 next bool: 0 locals(7): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} vpend(0): tpend(3): 7{string.gsub} 8{l_3_4} 9{"\\"} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) l_3_4 = "/_DRIVE_" .. l_3_7 .. "_EVIRD_" .. string.sub(l_3_4, l_3_6) end ---------------------------------------------- 59 LOADK 10 17 SET_CTR(Tpend) = 3 next bool: 0 locals(7): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} vpend(0): tpend(4): 7{string.gsub} 8{l_3_4} 9{"\\"} 10{"/"} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) l_3_4 = "/_DRIVE_" .. l_3_7 .. "_EVIRD_" .. string.sub(l_3_4, l_3_6) end ---------------------------------------------- 60 CALL 7 4 2 SET_CTR(Tpend) = 0 next bool: 0 locals(7): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} vpend(0): tpend(1): 7{string.gsub(l_3_4, "\\", "/")} (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) l_3_4 = "/_DRIVE_" .. l_3_7 .. "_EVIRD_" .. string.sub(l_3_4, l_3_6) end ---------------------------------------------- 61 MOVE 4 7 0 SET_CTR(Tpend) = 0 next bool: 0 locals(7): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} 5{l_3_5} 6{l_3_6} vpend(1): 4{l_3_4=string.gsub(l_3_4, "\\", "/")} tpend(0): (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) l_3_4 = "/_DRIVE_" .. l_3_7 .. "_EVIRD_" .. string.sub(l_3_4, l_3_6) end ---------------------------------------------- 62 RETURN 4 2 0 next bool: 0 locals(5): 0{l_3_0} 1{l_3_1} 2{l_3_2} 3{l_3_3} 4{l_3_4} vpend(0): tpend(0): (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) l_3_4 = "/_DRIVE_" .. l_3_7 .. "_EVIRD_" .. string.sub(l_3_4, l_3_6) end l_3_4 = string.gsub(l_3_4, "\\", "/") end return l_3_4 ---------------------------------------------- 63 RETURN 0 1 0 next bool: 0 locals(0): vpend(0): tpend(0): (l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) l_3_4 = "/_DRIVE_" .. l_3_7 .. "_EVIRD_" .. string.sub(l_3_4, l_3_6) end l_3_4 = string.gsub(l_3_4, "\\", "/") end return l_3_4 end SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_0_0} 1{l_0_1} vpend(0): tpend(1): 2{function(l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) l_3_4 = "/_DRIVE_" .. l_3_7 .. "_EVIRD_" .. string.sub(l_3_4, l_3_6) end l_3_4 = string.gsub(l_3_4, "\\", "/") end return l_3_4 end end} (...) local l_0_0 = {} local l_0_1 = log:obtain("Site") l_0_0.name = "" l_0_0.localFolderPath = "" l_0_0.new = function(l_1_0) local l_1_1 = {} setmetatable(l_1_1, l_1_0) l_1_0.__index = l_1_0 return l_1_1 end l_0_0.isPathToBinary = function(l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end if string.find(l_2_2, ".swf$") then return true end return false end ---------------------------------------------- 15 SETTABLE 0 264 2 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_0_0} 1{l_0_1} vpend(1): -1{l_0_0.getURLForPath=function(l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) l_3_4 = "/_DRIVE_" .. l_3_7 .. "_EVIRD_" .. string.sub(l_3_4, l_3_6) end l_3_4 = string.gsub(l_3_4, "\\", "/") end return l_3_4 end end} tpend(0): (...) local l_0_0 = {} local l_0_1 = log:obtain("Site") l_0_0.name = "" l_0_0.localFolderPath = "" l_0_0.new = function(l_1_0) local l_1_1 = {} setmetatable(l_1_1, l_1_0) l_1_0.__index = l_1_0 return l_1_1 end l_0_0.isPathToBinary = function(l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end if string.find(l_2_2, ".swf$") then return true end return false end ---------------------------------------------- 16 CLOSURE 2 3 ---------------------------------------------- 1 GETUPVAL 2 0 0 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(1): 2{l_0_1} (l_4_0, l_4_1) ---------------------------------------------- 2 SELF 2 2 256 SET_CTR(Tpend) = 0 SET_CTR(Tpend) = 1 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(2): 3{l_0_1} 2{l_0_1:info} (l_4_0, l_4_1) ---------------------------------------------- 3 LOADK 4 1 SET_CTR(Tpend) = 2 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(3): 3{l_0_1} 2{l_0_1:info} 4{"get path for URI == "} (l_4_0, l_4_1) ---------------------------------------------- 4 MOVE 5 1 0 SET_CTR(Tpend) = 3 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(4): 3{l_0_1} 2{l_0_1:info} 4{"get path for URI == "} 5{l_4_1} (l_4_0, l_4_1) ---------------------------------------------- 5 LOADK 6 2 SET_CTR(Tpend) = 4 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(5): 3{l_0_1} 2{l_0_1:info} 4{"get path for URI == "} 5{l_4_1} 6{" with self.localFolderPath = "} (l_4_0, l_4_1) ---------------------------------------------- 6 GETTABLE 7 0 259 SET_CTR(Tpend) = 5 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(6): 3{l_0_1} 2{l_0_1:info} 4{"get path for URI == "} 5{l_4_1} 6{" with self.localFolderPath = "} 7{l_4_0.localFolderPath} (l_4_0, l_4_1) ---------------------------------------------- 7 CONCAT 4 4 7 SET_CTR(Tpend) = 2 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(3): 3{l_0_1} 2{l_0_1:info} 4{"get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath} (l_4_0, l_4_1) ---------------------------------------------- 8 CALL 2 3 1 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) ---------------------------------------------- 9 GETGLOBAL 2 4 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(1): 2{string} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) ---------------------------------------------- 10 GETTABLE 2 2 261 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(1): 2{string.find} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) ---------------------------------------------- 11 MOVE 3 1 0 SET_CTR(Tpend) = 1 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(2): 2{string.find} 3{l_4_1} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) ---------------------------------------------- 12 LOADK 4 6 SET_CTR(Tpend) = 2 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(3): 2{string.find} 3{l_4_1} 4{"^/"} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) ---------------------------------------------- 13 CALL 2 3 2 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(1): 2{string.find(l_4_1, "^/")} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) ---------------------------------------------- 14 TEST 2 0 0 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) ---------------------------------------------- 15 JMP 0 71 next bool: 1 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) ---------------------------------------------- 16 GETGLOBAL 2 7 SET_CTR(Tpend) = 0 next bool: 1 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(1): 2{PATH_SEPARATOR} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) ---------------------------------------------- 17 EQ 0 2 264 next bool: 1 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) ---------------------------------------------- 18 JMP 0 47 next bool: 2 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) ---------------------------------------------- 19 GETGLOBAL 2 4 SET_CTR(Tpend) = 0 next bool: 2 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(1): 2{string} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) ---------------------------------------------- 20 GETTABLE 2 2 261 SET_CTR(Tpend) = 0 next bool: 2 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(1): 2{string.find} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) ---------------------------------------------- 21 MOVE 3 1 0 SET_CTR(Tpend) = 1 next bool: 2 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(2): 2{string.find} 3{l_4_1} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) ---------------------------------------------- 22 LOADK 4 9 SET_CTR(Tpend) = 2 next bool: 2 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(3): 2{string.find} 3{l_4_1} 4{"_DRIVE_"} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) ---------------------------------------------- 23 CALL 2 3 3 SET_CTR(Tpend) = 0 next bool: 2 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(1): 2{string.find(l_4_1, "_DRIVE_")} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) ---------------------------------------------- 24 TEST 2 0 0 Exps(0): at 14 dest 87 neg 0 (string.find(l_4_1, "^/") (null) string.find(l_4_1, "^/")) cpd -1 Stored at endif list: <87> Exps(0): at 17 dest 66 neg 0 (PATH_SEPARATOR == "\\") cpd -1 Stored at endif list: <66> 87 next bool: 0 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") ---------------------------------------------- 25 JMP 0 24 next bool: 1 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") ---------------------------------------------- 26 GETGLOBAL 4 4 SET_CTR(Tpend) = 0 next bool: 1 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(1): 4{string} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") ---------------------------------------------- 27 GETTABLE 4 4 261 SET_CTR(Tpend) = 0 next bool: 1 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(1): 4{string.find} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") ---------------------------------------------- 28 MOVE 5 1 0 SET_CTR(Tpend) = 1 next bool: 1 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(2): 4{string.find} 5{l_4_1} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") ---------------------------------------------- 29 LOADK 6 10 SET_CTR(Tpend) = 2 next bool: 1 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(3): 4{string.find} 5{l_4_1} 6{"_EVIRD_"} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") ---------------------------------------------- 30 CALL 4 3 3 SET_CTR(Tpend) = 0 next bool: 1 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(1): 4{string.find(l_4_1, "_EVIRD_")} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") ---------------------------------------------- 31 TEST 4 0 0 Exps(0): at 24 dest 50 neg 0 (l_4_2 (null) l_4_2) cpd -1 Stored at endif list: <50> 66 87 next bool: 0 locals(6): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") ---------------------------------------------- 32 JMP 0 24 next bool: 1 locals(6): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") ---------------------------------------------- 33 LT 0 3 4 next bool: 1 locals(6): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") ---------------------------------------------- 34 JMP 0 22 next bool: 2 locals(6): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") ---------------------------------------------- 35 GETGLOBAL 6 4 SET_CTR(Tpend) = 0 next bool: 2 locals(6): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} vpend(0): tpend(1): 6{string} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") ---------------------------------------------- 36 GETTABLE 6 6 267 SET_CTR(Tpend) = 0 next bool: 2 locals(6): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} vpend(0): tpend(1): 6{string.sub} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") ---------------------------------------------- 37 MOVE 7 1 0 SET_CTR(Tpend) = 1 next bool: 2 locals(6): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} vpend(0): tpend(2): 6{string.sub} 7{l_4_1} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") ---------------------------------------------- 38 ADD 8 3 268 SET_CTR(Tpend) = 2 next bool: 2 locals(6): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} vpend(0): tpend(3): 6{string.sub} 7{l_4_1} 8{l_4_3 + 1} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") ---------------------------------------------- 39 SUB 9 4 268 SET_CTR(Tpend) = 3 next bool: 2 locals(6): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} vpend(0): tpend(4): 6{string.sub} 7{l_4_1} 8{l_4_3 + 1} 9{l_4_4 - 1} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") ---------------------------------------------- 40 CALL 6 4 2 SET_CTR(Tpend) = 0 next bool: 2 locals(6): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} vpend(0): tpend(1): 6{string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1)} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") ---------------------------------------------- 41 MOVE 7 6 0 Exps(0): at 31 dest 57 neg 0 (l_4_4 (null) l_4_4) cpd -1 Exps(1): at 33 dest 57 neg 0 (l_4_3 < l_4_4) cpd -1 Stored at endif list: 50 <57> 66 87 SET_CTR(Tpend) = 0 next bool: 0 locals(7): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} 6{l_4_6} vpend(0): tpend(1): 7{l_4_6} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) ---------------------------------------------- 42 LOADK 8 13 SET_CTR(Tpend) = 1 next bool: 0 locals(7): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} 6{l_4_6} vpend(0): tpend(2): 7{l_4_6} 8{":"} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) ---------------------------------------------- 43 GETGLOBAL 9 4 SET_CTR(Tpend) = 2 next bool: 0 locals(7): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} 6{l_4_6} vpend(0): tpend(3): 7{l_4_6} 8{":"} 9{string} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) ---------------------------------------------- 44 GETTABLE 9 9 267 SET_CTR(Tpend) = 2 next bool: 0 locals(7): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} 6{l_4_6} vpend(0): tpend(3): 7{l_4_6} 8{":"} 9{string.sub} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) ---------------------------------------------- 45 MOVE 10 1 0 SET_CTR(Tpend) = 3 next bool: 0 locals(7): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} 6{l_4_6} vpend(0): tpend(4): 7{l_4_6} 8{":"} 9{string.sub} 10{l_4_1} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) ---------------------------------------------- 46 ADD 11 5 268 SET_CTR(Tpend) = 4 next bool: 0 locals(7): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} 6{l_4_6} vpend(0): tpend(5): 7{l_4_6} 8{":"} 9{string.sub} 10{l_4_1} 11{l_4_5 + 1} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) ---------------------------------------------- 47 CALL 9 3 2 SET_CTR(Tpend) = 2 next bool: 0 locals(7): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} 6{l_4_6} vpend(0): tpend(3): 7{l_4_6} 8{":"} 9{string.sub(l_4_1, l_4_5 + 1)} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) ---------------------------------------------- 48 CONCAT 1 7 9 SET_CTR(Tpend) = 0 next bool: 0 locals(7): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} 4{l_4_4} 5{l_4_5} 6{l_4_6} vpend(1): 1{l_4_1=l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1)} tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) ---------------------------------------------- 49 JMP 0 7 next bool: 0 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) ---------------------------------------------- 50 GETTABLE 4 0 259 SET_CTR(Tpend) = 0 next bool: 0 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(1): 4{l_4_0.localFolderPath} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) ---------------------------------------------- 51 GETGLOBAL 5 4 SET_CTR(Tpend) = 1 next bool: 0 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(2): 4{l_4_0.localFolderPath} 5{string} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) ---------------------------------------------- 52 GETTABLE 5 5 267 SET_CTR(Tpend) = 1 next bool: 0 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(2): 4{l_4_0.localFolderPath} 5{string.sub} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) ---------------------------------------------- 53 MOVE 6 1 0 SET_CTR(Tpend) = 2 next bool: 0 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(3): 4{l_4_0.localFolderPath} 5{string.sub} 6{l_4_1} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) ---------------------------------------------- 54 LOADK 7 14 SET_CTR(Tpend) = 3 next bool: 0 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(4): 4{l_4_0.localFolderPath} 5{string.sub} 6{l_4_1} 7{2} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) ---------------------------------------------- 55 CALL 5 3 2 SET_CTR(Tpend) = 1 next bool: 0 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(2): 4{l_4_0.localFolderPath} 5{string.sub(l_4_1, 2)} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) ---------------------------------------------- 56 CONCAT 1 4 5 SET_CTR(Tpend) = 0 next bool: 0 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(1): 1{l_4_1=l_4_0.localFolderPath .. string.sub(l_4_1, 2)} tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) Stored at endif list: <57> 57 66 87 ---------------------------------------------- 57 GETGLOBAL 4 4 SET_CTR(Tpend) = 0 next bool: 0 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(1): 4{string} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end ---------------------------------------------- 58 GETTABLE 4 4 271 SET_CTR(Tpend) = 0 next bool: 0 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(1): 4{string.gsub} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end ---------------------------------------------- 59 MOVE 5 1 0 SET_CTR(Tpend) = 1 next bool: 0 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(2): 4{string.gsub} 5{l_4_1} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end ---------------------------------------------- 60 LOADK 6 16 SET_CTR(Tpend) = 2 next bool: 0 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(3): 4{string.gsub} 5{l_4_1} 6{"/"} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end ---------------------------------------------- 61 LOADK 7 8 SET_CTR(Tpend) = 3 next bool: 0 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(4): 4{string.gsub} 5{l_4_1} 6{"/"} 7{"\\"} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end ---------------------------------------------- 62 CALL 4 4 2 SET_CTR(Tpend) = 0 next bool: 0 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(1): 4{string.gsub(l_4_1, "/", "\\")} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end ---------------------------------------------- 63 MOVE 1 4 0 SET_CTR(Tpend) = 0 next bool: 0 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(1): 1{l_4_1=string.gsub(l_4_1, "/", "\\")} tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end ---------------------------------------------- 64 RETURN 1 2 0 next bool: 0 locals(4): 0{l_4_0} 1{l_4_1} 2{l_4_2} 3{l_4_3} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 ---------------------------------------------- 65 JMP 0 27 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 ---------------------------------------------- 66 GETGLOBAL 2 4 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(1): 2{string} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 ---------------------------------------------- 67 GETTABLE 2 2 261 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(1): 2{string.find} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 ---------------------------------------------- 68 MOVE 3 1 0 SET_CTR(Tpend) = 1 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(2): 2{string.find} 3{l_4_1} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 ---------------------------------------------- 69 LOADK 4 6 SET_CTR(Tpend) = 2 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(3): 2{string.find} 3{l_4_1} 4{"^/"} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 ---------------------------------------------- 70 CALL 2 3 2 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(1): 2{string.find(l_4_1, "^/")} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 ---------------------------------------------- 71 TEST 2 0 0 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 ---------------------------------------------- 72 JMP 0 9 next bool: 1 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 ---------------------------------------------- 73 GETTABLE 2 0 259 SET_CTR(Tpend) = 0 next bool: 1 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(1): 2{l_4_0.localFolderPath} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 ---------------------------------------------- 74 GETGLOBAL 3 4 SET_CTR(Tpend) = 1 next bool: 1 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(2): 2{l_4_0.localFolderPath} 3{string} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 ---------------------------------------------- 75 GETTABLE 3 3 267 SET_CTR(Tpend) = 1 next bool: 1 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(2): 2{l_4_0.localFolderPath} 3{string.sub} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 ---------------------------------------------- 76 MOVE 4 1 0 SET_CTR(Tpend) = 2 next bool: 1 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(3): 2{l_4_0.localFolderPath} 3{string.sub} 4{l_4_1} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 ---------------------------------------------- 77 LOADK 5 14 SET_CTR(Tpend) = 3 next bool: 1 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(4): 2{l_4_0.localFolderPath} 3{string.sub} 4{l_4_1} 5{2} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 ---------------------------------------------- 78 CALL 3 3 2 SET_CTR(Tpend) = 1 next bool: 1 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(2): 2{l_4_0.localFolderPath} 3{string.sub(l_4_1, 2)} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 ---------------------------------------------- 79 CONCAT 2 2 3 SET_CTR(Tpend) = 0 next bool: 1 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(1): 2{l_4_0.localFolderPath .. string.sub(l_4_1, 2)} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 ---------------------------------------------- 80 RETURN 2 2 0 Stored at endif list: 87 <93> Exps(0): at 71 dest 82 neg 0 (string.find(l_4_1, "^/") (null) string.find(l_4_1, "^/")) cpd -1 Stored at endif list: <82> 87 93 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) ---------------------------------------------- 81 JMP 0 11 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) ---------------------------------------------- 82 GETTABLE 2 0 259 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(1): 2{l_4_0.localFolderPath} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) ---------------------------------------------- 83 MOVE 3 1 0 SET_CTR(Tpend) = 1 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(2): 2{l_4_0.localFolderPath} 3{l_4_1} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) ---------------------------------------------- 84 CONCAT 2 2 3 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(1): 2{l_4_0.localFolderPath .. l_4_1} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) ---------------------------------------------- 85 RETURN 2 2 0 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) else return l_4_0.localFolderPath .. l_4_1 ---------------------------------------------- 86 JMP 0 6 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) else return l_4_0.localFolderPath .. l_4_1 end ---------------------------------------------- 87 GETUPVAL 2 0 0 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(1): 2{l_0_1} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) else return l_4_0.localFolderPath .. l_4_1 end ---------------------------------------------- 88 SELF 2 2 273 SET_CTR(Tpend) = 0 SET_CTR(Tpend) = 1 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(2): 3{l_0_1} 2{l_0_1:warn} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) else return l_4_0.localFolderPath .. l_4_1 end ---------------------------------------------- 89 LOADK 4 18 SET_CTR(Tpend) = 2 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(3): 3{l_0_1} 2{l_0_1:warn} 4{"failed to find a path for URI == "} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) else return l_4_0.localFolderPath .. l_4_1 end ---------------------------------------------- 90 MOVE 5 1 0 SET_CTR(Tpend) = 3 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(4): 3{l_0_1} 2{l_0_1:warn} 4{"failed to find a path for URI == "} 5{l_4_1} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) else return l_4_0.localFolderPath .. l_4_1 end ---------------------------------------------- 91 CONCAT 4 4 5 SET_CTR(Tpend) = 2 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(3): 3{l_0_1} 2{l_0_1:warn} 4{"failed to find a path for URI == " .. l_4_1} (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) else return l_4_0.localFolderPath .. l_4_1 end ---------------------------------------------- 92 CALL 2 3 1 Stored at endif list: <93> 93 next bool: 0 locals(2): 0{l_4_0} 1{l_4_1} vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) else return l_4_0.localFolderPath .. l_4_1 end else l_0_1:warn("failed to find a path for URI == " .. l_4_1) ---------------------------------------------- 93 RETURN 0 1 0 next bool: 0 locals(0): vpend(0): tpend(0): (l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) else return l_4_0.localFolderPath .. l_4_1 end else l_0_1:warn("failed to find a path for URI == " .. l_4_1) end end SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_0_0} 1{l_0_1} vpend(0): tpend(1): 2{function(l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) else return l_4_0.localFolderPath .. l_4_1 end else l_0_1:warn("failed to find a path for URI == " .. l_4_1) end end end} (...) local l_0_0 = {} local l_0_1 = log:obtain("Site") l_0_0.name = "" l_0_0.localFolderPath = "" l_0_0.new = function(l_1_0) local l_1_1 = {} setmetatable(l_1_1, l_1_0) l_1_0.__index = l_1_0 return l_1_1 end l_0_0.isPathToBinary = function(l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end if string.find(l_2_2, ".swf$") then return true end return false end l_0_0.getURLForPath = function(l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) l_3_4 = "/_DRIVE_" .. l_3_7 .. "_EVIRD_" .. string.sub(l_3_4, l_3_6) end l_3_4 = string.gsub(l_3_4, "\\", "/") end return l_3_4 end end ---------------------------------------------- 18 SETTABLE 0 265 2 SET_CTR(Tpend) = 0 next bool: 0 locals(2): 0{l_0_0} 1{l_0_1} vpend(1): -1{l_0_0.getPathForURI=function(l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) else return l_4_0.localFolderPath .. l_4_1 end else l_0_1:warn("failed to find a path for URI == " .. l_4_1) end end end} tpend(0): (...) local l_0_0 = {} local l_0_1 = log:obtain("Site") l_0_0.name = "" l_0_0.localFolderPath = "" l_0_0.new = function(l_1_0) local l_1_1 = {} setmetatable(l_1_1, l_1_0) l_1_0.__index = l_1_0 return l_1_1 end l_0_0.isPathToBinary = function(l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end if string.find(l_2_2, ".swf$") then return true end return false end l_0_0.getURLForPath = function(l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) l_3_4 = "/_DRIVE_" .. l_3_7 .. "_EVIRD_" .. string.sub(l_3_4, l_3_6) end l_3_4 = string.gsub(l_3_4, "\\", "/") end return l_3_4 end end ---------------------------------------------- 19 RETURN 0 2 0 next bool: 0 locals(2): 0{l_0_0} 1{l_0_1} vpend(0): tpend(0): (...) local l_0_0 = {} local l_0_1 = log:obtain("Site") l_0_0.name = "" l_0_0.localFolderPath = "" l_0_0.new = function(l_1_0) local l_1_1 = {} setmetatable(l_1_1, l_1_0) l_1_0.__index = l_1_0 return l_1_1 end l_0_0.isPathToBinary = function(l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end if string.find(l_2_2, ".swf$") then return true end return false end l_0_0.getURLForPath = function(l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) l_3_4 = "/_DRIVE_" .. l_3_7 .. "_EVIRD_" .. string.sub(l_3_4, l_3_6) end l_3_4 = string.gsub(l_3_4, "\\", "/") end return l_3_4 end end l_0_0.getPathForURI = function(l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) else return l_4_0.localFolderPath .. l_4_1 end else l_0_1:warn("failed to find a path for URI == " .. l_4_1) end end end return l_0_0 ---------------------------------------------- 20 RETURN 0 1 0 next bool: 0 locals(0): vpend(0): tpend(0): (...) local l_0_0 = {} local l_0_1 = log:obtain("Site") l_0_0.name = "" l_0_0.localFolderPath = "" l_0_0.new = function(l_1_0) local l_1_1 = {} setmetatable(l_1_1, l_1_0) l_1_0.__index = l_1_0 return l_1_1 end l_0_0.isPathToBinary = function(l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end if string.find(l_2_2, ".swf$") then return true end return false end l_0_0.getURLForPath = function(l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) l_3_4 = "/_DRIVE_" .. l_3_7 .. "_EVIRD_" .. string.sub(l_3_4, l_3_6) end l_3_4 = string.gsub(l_3_4, "\\", "/") end return l_3_4 end end l_0_0.getPathForURI = function(l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) else return l_4_0.localFolderPath .. l_4_1 end else l_0_1:warn("failed to find a path for URI == " .. l_4_1) end end end return l_0_0 (...) local l_0_0 = {} local l_0_1 = log:obtain("Site") l_0_0.name = "" l_0_0.localFolderPath = "" l_0_0.new = function(l_1_0) local l_1_1 = {} setmetatable(l_1_1, l_1_0) l_1_0.__index = l_1_0 return l_1_1 end l_0_0.isPathToBinary = function(l_2_0, l_2_1) local l_2_2 = string.lower(l_2_1) if string.find(l_2_2, ".png$") then return true end if string.find(l_2_2, ".gif$") then return true end if string.find(l_2_2, ".jpg$") then return true end if string.find(l_2_2, ".swf$") then return true end return false end l_0_0.getURLForPath = function(l_3_0, l_3_1) local l_3_2, l_3_3 = string.find(l_3_1, "^" .. l_0_0.localFolderPath) if not l_3_2 then l_0_1:error("asked to get URL for a path not in the site - failing [" .. l_3_1 .. "]") return l_3_1 else local l_3_4 = string.sub(l_3_1, l_3_3) if PATH_SEPARATOR == "\\" then local l_3_5, l_3_6 = string.find(l_3_4, ":\\") if l_3_5 then local l_3_7 = string.sub(l_3_4, 1, l_3_6 - 2) l_3_7 = string.upper(l_3_7) l_3_4 = "/_DRIVE_" .. l_3_7 .. "_EVIRD_" .. string.sub(l_3_4, l_3_6) end l_3_4 = string.gsub(l_3_4, "\\", "/") end return l_3_4 end end l_0_0.getPathForURI = function(l_4_0, l_4_1) l_0_1:info("get path for URI == " .. l_4_1 .. " with self.localFolderPath = " .. l_4_0.localFolderPath) if string.find(l_4_1, "^/") then if PATH_SEPARATOR == "\\" then local l_4_2, l_4_3 = string.find(l_4_1, "_DRIVE_") if l_4_2 then local l_4_4, l_4_5 = string.find(l_4_1, "_EVIRD_") if l_4_4 and l_4_3 < l_4_4 then local l_4_6 = string.sub(l_4_1, l_4_3 + 1, l_4_4 - 1) l_4_1 = l_4_6 .. ":" .. string.sub(l_4_1, l_4_5 + 1) else l_4_1 = l_4_0.localFolderPath .. string.sub(l_4_1, 2) end end l_4_1 = string.gsub(l_4_1, "/", "\\") return l_4_1 else if string.find(l_4_1, "^/") then return l_4_0.localFolderPath .. string.sub(l_4_1, 2) else return l_4_0.localFolderPath .. l_4_1 end else l_0_1:warn("failed to find a path for URI == " .. l_4_1) end end end return l_0_0