Mercurial Hosting > luan
view src/luan/modules/http/tools/luan_threads.luan @ 1150:0842b9b570f8
change http headers interface
author | Franklin Schmidt <fschmidt@gmail.com> |
---|---|
date | Sun, 04 Feb 2018 18:03:37 -0700 |
parents | 4cddfc06a34f |
children | 1f9d34a6f308 |
line wrap: on
line source
local Luan = require "luan:Luan.luan" local error = Luan.error local assert_table = Luan.assert_table or error() local Io = require "luan:Io.luan" local Time = require "luan:Time.luan" local Http = require "luan:http/Http.luan" java() local Thread = require "java:java.lang.Thread" local LuanException = require "java:luan.LuanException" return function() Io.stdout = Http.response.text_writer() local threads = Thread.getAllStackTraces() local threads = {} for thread, trace in Luan.pairs(Thread.getAllStackTraces()) do threads[#threads+1] = { trace = trace string = thread.toString() state = thread.getState() } end %> <html> <body> <h1>Luan Threads</h1> <p><%=Http.request.headers["host"]%> - <%=Time.format(Time.now())%></p> <% local count = 0 for _, thread in Luan.ipairs(threads) do local luan_trace = assert_table(LuanException.justLuan(thread.trace)) if #luan_trace > 0 then %> <p><%=thread.string%> <%=thread.state%> <ul> <% for i, el in Luan.ipairs(luan_trace) do local line = LuanException.toString(el); %><li><%=line%></li><% end %> </ul></p> <% count = count + 1 end end %> <p><%=count%> threads found</p> </body> </html> <% end