Gecko [ dataharbor.africa ]

Name	Size	Permission
?;diameter	[ DIR ]	drwxr-xr-x
?;dtds	[ DIR ]	drwxr-xr-x
?;help	[ DIR ]	drwxr-xr-x
?;profiles	[ DIR ]	drwxr-xr-x
?;radius	[ DIR ]	drwxr-xr-x
?;tpncp	[ DIR ]	drwxr-xr-x
?;wimaxasncp	[ DIR ]	drwxr-xr-x
AUTHORS-SHORT	38.39 KB	-rw-r--r--
COPYING	26.62 KB	-rw-r--r--
capinfos.html	12.64 KB	-rw-r--r--
cfilters	515 B	-rw-r--r--
colorfilters	1.82 KB	-rw-r--r--
console.lua	3.41 KB	-rw-r--r--
dfilters	659 B	-rw-r--r--
dftest.html	1.24 KB	-rw-r--r--
dtd_gen.lua	8.18 KB	-rw-r--r--
dumpcap.html	17.06 KB	-rw-r--r--
editcap.html	16.05 KB	-rw-r--r--
ipmap.html	4.05 KB	-rw-r--r--
manuf	1.41 MB	-rw-r--r--
mergecap.html	7.15 KB	-rw-r--r--
pdml2html.xsl	5.92 KB	-rw-r--r--
randpkt.html	3.96 KB	-rw-r--r--
rawshark.html	23.49 KB	-rw-r--r--
reordercap.html	2.85 KB	-rw-r--r--
services	918.31 KB	-rw-r--r--
smi_modules	315 B	-rw-r--r--
text2pcap.html	11.16 KB	-rw-r--r--
tshark.html	79.91 KB	-rw-r--r--
wireshark-filter.html	17.43 KB	-rw-r--r--
wireshark.html	155.65 KB	-rw-r--r--
ws.css	3.82 KB	-rw-r--r--

Code Editor : console.lua

-- console
-- A console and a window to execute commands in lua
--
-- (c) 2006 Luis E. Garcia Ontanon <luis@ontanon.org>
--
-- $Id$
-- 
-- 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 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

${this.title}

Code Editor : console.lua