webmcp

annotate framework/env/trace/_render_sub_tree.lua @ 0:9fdfb27f8e67

Version 1.0.0
author jbe/bsw
date Sun Oct 25 12:00:00 2009 +0100 (2009-10-25)
parents
children 0b7e87f2dc91
rev   line source
jbe/bsw@0 1 local function open(class)
jbe/bsw@0 2 slot.put('<li class="trace_' .. class .. '">')
jbe/bsw@0 3 end
jbe/bsw@0 4 local function open_head()
jbe/bsw@0 5 slot.put('<div class="trace_head">')
jbe/bsw@0 6 end
jbe/bsw@0 7 local function close_head()
jbe/bsw@0 8 slot.put('</div>')
jbe/bsw@0 9 end
jbe/bsw@0 10 local function close()
jbe/bsw@0 11 slot.put('</li>')
jbe/bsw@0 12 end
jbe/bsw@0 13 function trace._render_sub_tree(node)
jbe/bsw@0 14 local function render_children(tail)
jbe/bsw@0 15 if #node > 0 then
jbe/bsw@0 16 slot.put('<ul class="trace_list">')
jbe/bsw@0 17 for idx, child in ipairs(node) do
jbe/bsw@0 18 trace._render_sub_tree(child)
jbe/bsw@0 19 end
jbe/bsw@0 20 if tail then
jbe/bsw@0 21 slot.put(tail)
jbe/bsw@0 22 end
jbe/bsw@0 23 slot.put("</ul>")
jbe/bsw@0 24 end
jbe/bsw@0 25 end
jbe/bsw@0 26 local function close_with_children()
jbe/bsw@0 27 close_head()
jbe/bsw@0 28 render_children()
jbe/bsw@0 29 close()
jbe/bsw@0 30 end
jbe/bsw@0 31 local node_type = node.type
jbe/bsw@0 32 if node_type == "root" then
jbe/bsw@0 33 render_children()
jbe/bsw@0 34 elseif node_type == "debug" then
jbe/bsw@0 35 open("debug")
jbe/bsw@0 36 slot.put(encode.html(node.message))
jbe/bsw@0 37 close()
jbe/bsw@0 38 elseif node_type == "request" then
jbe/bsw@0 39 open("request")
jbe/bsw@0 40 open_head()
jbe/bsw@0 41 slot.put("REQUESTED")
jbe/bsw@0 42 if node.view then
jbe/bsw@0 43 slot.put(" VIEW")
jbe/bsw@0 44 elseif node.action then
jbe/bsw@0 45 slot.put(" ACTION")
jbe/bsw@0 46 end
jbe/bsw@0 47 slot.put(
jbe/bsw@0 48 ": ",
jbe/bsw@0 49 encode.html(node.module),
jbe/bsw@0 50 "/",
jbe/bsw@0 51 encode.html(node.view or node.action)
jbe/bsw@0 52 )
jbe/bsw@0 53 close_with_children()
jbe/bsw@0 54 elseif node_type == "config" then
jbe/bsw@0 55 open("config")
jbe/bsw@0 56 open_head()
jbe/bsw@0 57 slot.put('Configuration "', encode.html(node.name), '"')
jbe/bsw@0 58 close_with_children()
jbe/bsw@0 59 elseif node_type == "filter" then
jbe/bsw@0 60 open("filter")
jbe/bsw@0 61 open_head()
jbe/bsw@0 62 slot.put(encode.html(node.path))
jbe/bsw@0 63 close_with_children()
jbe/bsw@0 64 elseif node_type == "view" then
jbe/bsw@0 65 open("view")
jbe/bsw@0 66 open_head()
jbe/bsw@0 67 slot.put(
jbe/bsw@0 68 "EXECUTE VIEW: ",
jbe/bsw@0 69 encode.html(node.module),
jbe/bsw@0 70 "/",
jbe/bsw@0 71 encode.html(node.view)
jbe/bsw@0 72 )
jbe/bsw@0 73 close_with_children()
jbe/bsw@0 74 elseif node_type == "action" then
jbe/bsw@0 75 if
jbe/bsw@0 76 node.status and (
jbe/bsw@0 77 node.status == "ok" or
jbe/bsw@0 78 string.find(node.status, "^ok_")
jbe/bsw@0 79 )
jbe/bsw@0 80 then
jbe/bsw@0 81 open("action_success")
jbe/bsw@0 82 elseif
jbe/bsw@0 83 node.status and (
jbe/bsw@0 84 node.status == "error" or
jbe/bsw@0 85 string.find(node.status, "^error_")
jbe/bsw@0 86 )
jbe/bsw@0 87 then
jbe/bsw@0 88 open("action_softfail")
jbe/bsw@0 89 else
jbe/bsw@0 90 open("action_neutral")
jbe/bsw@0 91 end
jbe/bsw@0 92 open_head()
jbe/bsw@0 93 slot.put(
jbe/bsw@0 94 "EXECUTE ACTION: ",
jbe/bsw@0 95 encode.html(node.module),
jbe/bsw@0 96 "/",
jbe/bsw@0 97 encode.html(node.action)
jbe/bsw@0 98 )
jbe/bsw@0 99 close_head()
jbe/bsw@0 100 if node.status == "softfail" then
jbe/bsw@0 101 render_children(
jbe/bsw@0 102 '<li class="trace_action_status">Status code: "' ..
jbe/bsw@0 103 encode.html(node.failure_code) ..
jbe/bsw@0 104 '"</li>'
jbe/bsw@0 105 )
jbe/bsw@0 106 else
jbe/bsw@0 107 render_children()
jbe/bsw@0 108 end
jbe/bsw@0 109 close()
jbe/bsw@0 110 elseif node_type == "redirect" then
jbe/bsw@0 111 open("redirect")
jbe/bsw@0 112 open_head()
jbe/bsw@0 113 slot.put("303 REDIRECT TO VIEW: ", encode.html(node.module), "/", encode.html(node.view))
jbe/bsw@0 114 close_with_children()
jbe/bsw@0 115 elseif node_type == "forward" then
jbe/bsw@0 116 open("forward")
jbe/bsw@0 117 open_head()
jbe/bsw@0 118 slot.put("INTERNAL FORWARD TO VIEW: ", encode.html(node.module), "/", encode.html(node.view))
jbe/bsw@0 119 close_with_children()
jbe/bsw@0 120 elseif node_type == "exectime" then
jbe/bsw@0 121 open("exectime")
jbe/bsw@0 122 open_head()
jbe/bsw@0 123 slot.put(
jbe/bsw@0 124 "Finished after " ..
jbe/bsw@0 125 string.format("%.1f", os.monotonic_hires_time() * 1000) ..
jbe/bsw@0 126 ' ms (' ..
jbe/bsw@0 127 string.format("%.1f", os.clock() * 1000) ..
jbe/bsw@0 128 ' ms CPU)'
jbe/bsw@0 129 )
jbe/bsw@0 130 close_with_children()
jbe/bsw@0 131 elseif node_type == "sql" then
jbe/bsw@0 132 open("sql")
jbe/bsw@0 133 if node.error_position then
jbe/bsw@0 134 -- error position starts counting with 1
jbe/bsw@0 135 local part1 = string.sub(node.command, 1, node.error_position - 1)
jbe/bsw@0 136 --local part2 = string.sub(node.command, node.error_position - 1, node.error_position + 1)
jbe/bsw@0 137 local part2 = string.sub(node.command, node.error_position)
jbe/bsw@0 138 slot.put(encode.html(part1))
jbe/bsw@0 139 slot.put('<span class="trace_error_position">&rArr;</span>')
jbe/bsw@0 140 slot.put(encode.html(part2))
jbe/bsw@0 141 --slot.put('</span>')
jbe/bsw@0 142 --slot.put(encode.html(part3))
jbe/bsw@0 143 else
jbe/bsw@0 144 slot.put(encode.html(node.command))
jbe/bsw@0 145 end
jbe/bsw@0 146 close();
jbe/bsw@0 147 elseif node_type == "error" then
jbe/bsw@0 148 open("error")
jbe/bsw@0 149 open_head()
jbe/bsw@0 150 slot.put("UNEXPECTED ERROR")
jbe/bsw@0 151 close_head()
jbe/bsw@0 152 close()
jbe/bsw@0 153 end
jbe/bsw@0 154 end

Impressum / About Us