/usr/share/wireshark/console.lua is in libwireshark-data 1.6.7-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 | -- console
-- A console and a window to execute commands in lua
--
-- (c) 2006 Luis E. Garcia Ontanon <luis@ontanon.org>
--
-- $Id: console.lua 35729 2011-01-31 21:13:20Z jake $
--
-- Wireshark - Network traffic analyzer
-- By Gerald Combs <gerald@wireshark.org>
-- Copyright 1998 Gerald Combs
--
-- This program is free software; you can redistribute it and/or
-- modify it under the terms of the GNU General Public License
-- as published by the Free Software Foundation; either version 2
-- of the License, or (at your option) any later version.
--
-- This program is distributed in the hope that it will be useful,
-- but WITHOUT ANY WARRANTY; without even the implied warranty of
-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-- GNU General Public License for more details.
--
-- You should have received a copy of the GNU General Public License
-- along with this program; if not, write to the Free Software
-- Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
if (gui_enabled()) then
-- Note that everything is "local" to this "if then"
-- this way we don't add globals
-- Evaluate Window
local function evaluate_lua()
local w = TextWindow.new("Evaluate Lua")
w:set_editable()
-- button callback
local function eval()
-- get the window's text and remove the result
local text = string.gsub(w:get_text(),"%c*--%[%[.*--%]%]$","")
-- if the text begins with '=' then convert = into return
text = string.gsub(text,"^=","return ")
-- evaluate text
local result = assert(loadstring(text))()
if (result ~= nil) then
w:set(text .. '\n\n--[[ Result:\n' .. result .. '\n--]]')
else
w:set(text .. '\n\n--[[ Evaluated --]]')
end
end
w:add_button("Evaluate",eval)
end
local console_open = false
local date = rawget(os,"date") -- use rawget to avoid disabled's os.__index
if type(date) ~= "function" then
-- 'os' has been disabled, use a dummy function for date
date = function() return "" end
end
-- Console Window
local function run_console()
if console_open then return end
console_open = true
local w = TextWindow.new("Console")
-- save original logger functions
local orig = {
critical = critical,
warn = warn,
message = message,
info = info,
debug = debug
}
-- define new logger functions that append text to the window
function critical(x) w:append( date() .. " CRITICAL: " .. tostring(x) .. "\n") end
function warn(x) w:append( date() .. " WARN: " .. tostring(x) .. "\n") end
function message(x) w:append( date() .. " MESSAGE: " .. tostring(x) .. "\n") end
function info(x) w:append( date() .. " INFO: " .. tostring(x) .. "\n") end
function debug(x) w:append( date() .. " DEBUG: " .. tostring(x) .. "\n") end
-- when the window gets closed restore the original logger functions
local function at_close()
critical = orig.critical
warn = orig.warn
message = orig.message
info = orig.info
debug = orig.debug
console_open = false
end
w:set_atclose(at_close)
info("Console opened")
end
function ref_manual()
browser_open_url("http://www.wireshark.org/docs/wsug_html_chunked/wsluarm.html")
end
function wiki_page()
browser_open_url("http://wiki.wireshark.org/Lua")
end
register_menu("Lua/Evaluate", evaluate_lua, MENU_TOOLS_UNSORTED)
register_menu("Lua/Console", run_console, MENU_TOOLS_UNSORTED)
register_menu("Lua/Manual", ref_manual, MENU_TOOLS_UNSORTED)
register_menu("Lua/Wiki", wiki_page, MENU_TOOLS_UNSORTED)
end
|