fxri 0.1.0

data/lib/Search_Engine.rb

@@ -0,0 +1,165 @@
+# Copyright (c) 2005 Martin Ankerl
+class Search_Engine
+	def initialize(gui, data)
+		@gui = gui
+		@data = data
+		@search_thread = nil
+	end	
+	
+	# Executed whenever a search criteria changes to update the packet list.
+	def on_search
+		# restart current search
+		@end_time = Time.now + $cfg.search_delay
+		@restart_search = true
+		@gui.search_label.enabled = false
+		return if @search_thread && @search_thread.status
+			
+		@search_thread = Thread.new(@search_thread) do
+			begin
+				@gui.search_label.enabled = false
+				# wait untill deadline
+				while (t = (@end_time - Time.now)) > 0
+					sleep(t)
+				end
+				
+				@data.gui_mutex.synchronize do
+					# the thread has to use the gui mutex inside
+					@restart_search = false
+					
+					match_data = get_match_data
+				
+					# remove all items
+					@gui.packet_list.dirty_clear
+					
+					# add all items that match the search criteria
+					status_text_deadline = Time.now + $cfg.status_line_update_interval
+					@data.items.each do |item|
+						#item.parent = @gui.packet_list if match?(item, match_data)
+						if match?(item, match_data)
+							item.show
+							now = Time.now
+							if now > status_text_deadline
+								update_search_status_text
+								status_text_deadline = now + $cfg.status_line_update_interval
+							end
+						end
+						break if @restart_search
+					end
+					update_search_status_text
+					
+					if (@gui.packet_list.numItems > 0)
+						@gui.packet_list.setCurrentItem(0) 
+						@gui.packet_list.selectItem(0)
+						@gui.main.show_info(@gui.packet_list.getItem(0).packet_item.data)
+					end
+					@gui.search_label.enabled = true
+					
+				end # synchronize
+			end while @restart_search# || match_data != @gui.search_field.text.downcase.split
+		end #thread.new
+	end
+	
+	def get_match_data
+		str_to_match_data(@gui.search_field.text)
+	end
+
+	# Converts a string into a match_data representation.
+	def str_to_match_data(str, index=0)
+		words = [ ]
+		exclude = [ ]
+		is_exclude = false
+		
+		while str[index]
+			case str[index]
+			when ?", ?'
+				word, index = get_word(str, index+1, str[index])
+				unless word.empty?
+					if is_exclude
+						exclude.push word
+						is_exclude = false
+					else
+						words.push word
+					end
+				end
+			
+			when 32 # space
+				is_exclude = false
+
+=begin
+			when ?>
+				min, index = get_word(str, index+1)
+				min = @gui.logic.size_to_nr(min)
+				
+			when ?<
+				max, index = get_word(str, index+1)
+				max = @gui.logic.size_to_nr(max)
+=end
+			when ?-
+				is_exclude = true
+			
+			else
+				word, index = get_word(str, index)
+				if is_exclude
+					exclude.push word
+					is_exclude = false
+				else
+					words.push word
+				end				
+			end
+			
+			index += 1
+		end
+		
+		# check if word has upcase letters
+		words.collect! do |w| 
+			[w, /[A-Z]/.match(w)!=nil]
+		end
+		exclude.collect! do |w| 
+			[w, /[A-Z]/.match(w)!=nil]
+		end
+		[words, exclude]
+	end
+	
+	def get_word(str, index, delim=32) # 32==space
+		word = ""
+		c = str[index]
+		while (c && c != delim)
+			word += c.chr
+			index += 1
+			c = str[index]
+		end
+		[word, index]
+	end
+
+	# Update the text for the number of displayed packs.
+	def update_search_status_text
+		@gui.search_label.text = sprintf($cfg.text.search, @gui.packet_list.numItems, @data.items.size)
+	end
+
+	# Find out if item is matched by current search criteria.
+	def match?(item, match_data)
+		words, exclude, min, max = match_data
+		
+		# check text that has to be there
+		searchable, sortable_downcase, sortable_normal = item.sortable(0)
+		words.each do |match_str, is_sensitive|
+			if is_sensitive
+				return false unless sortable_normal.include?(match_str)
+			else
+				return false unless sortable_downcase.include?(match_str)
+			end
+		end
+		
+		# check text not allowed to be there
+		exclude.each do |match_str, is_sensitive|
+			if is_sensitive
+				return false if sortable_normal.include?(match_str)
+			else
+				return false if sortable_downcase.include?(match_str)
+			end		
+		end
+		
+		# each check ok
+		true
+	end
+end

data/lib/fxirb.rb

@@ -0,0 +1,339 @@
+#! /usr/bin/env ruby
+
+# TODO
+# - handle user input redirection
+# - readline
+# - multiline commands
+
+# Credits:
+# - Initial linux version:  Gilles Filippini
+# - Initial windows port : Marco Fraillis
+# - Currently maintained and developed by 
+#     Martin DeMello <martindemello@gmail.com>
+
+require "fox12"
+require "irb"
+require "singleton"
+require "English"
+
+include Fox
+
+STDOUT.sync = true
+
+class FXIRBInputMethod < IRB::StdioInputMethod
+
+	def initialize
+		super 
+		@history = 1
+		@begin = nil
+		@end = nil
+	end
+
+	def gets 
+		print @prompt
+		
+		if @prompt =~ /(\d+)[>*]/
+			print "  "*$1.to_i
+		end
+		
+		str = FXIrb.instance.gets
+		if /^exit/ =~ str
+			exit
+		end
+		
+		@line_no += 1
+		@history = @line_no + 1
+		@line[@line_no] = str
+	end
+	
+	def compact
+		print [@compact, @continued].inspect
+		if false # @compact
+			@compact = false
+			a = @line_no - @continued
+			@lines[a] = @lines[a..2].join
+		end
+	end
+	
+	def prevCmd
+		if @line_no > 0
+			@history -= 1 unless @history <= 1
+			return line(@history)
+		end
+		return ""
+	end
+	
+	def nextCmd
+		if (@line_no > 0) && (@history < @line_no)
+			@history += 1
+			return line(@history)
+		end
+		return ""
+	end
+	
+end
+
+module IRB
+	def IRB.start_in_fxirb(im)
+		if RUBY_VERSION < "1.7.3"
+			IRB.initialize(nil)
+			IRB.parse_opts
+			IRB.load_modules
+		else
+			IRB.setup(nil)
+		end
+		IRB.restart(im)
+	end
+	
+	def IRB.restart(im)
+		irb = Irb.new(nil, im)    
+	
+		@CONF[:IRB_RC].call(irb.context) if @CONF[:IRB_RC]
+		@CONF[:MAIN_CONTEXT] = irb.context
+		trap("SIGINT") do
+			irb.signal_handle
+		end
+		
+		catch(:IRB_EXIT) do
+			irb.eval_input
+		end
+		print "\n"
+	end
+end
+
+class FXIrb < FXText
+	include Singleton
+	include Responder
+
+	attr_reader :input
+
+	def FXIrb.init(p, tgt, sel, opts)
+		unless @__instance__
+			Thread.critical = true
+			begin
+				@__instance__ ||= new(p, tgt, sel, opts)
+			ensure
+				Thread.critical = false
+			end
+		end
+		return @__instance__
+	end
+	
+	def initialize(p, tgt, sel, opts)
+		@parent = p
+		FXMAPFUNC(SEL_KEYRELEASE, 0, "onKeyRelease")
+		FXMAPFUNC(SEL_KEYPRESS, 0, "onKeyPress")
+		FXMAPFUNC(SEL_LEFTBUTTONPRESS,0,"onLeftBtnPress")
+		FXMAPFUNC(SEL_MIDDLEBUTTONPRESS,0,"onMiddleBtnPress")
+		FXMAPFUNC(SEL_LEFTBUTTONRELEASE,0,"onLeftBtnRelease")
+
+		super
+		setFont(FXFont.new(FXApp.instance, "lucida console", 9))
+	end
+
+	def create
+		super
+		restart
+	end
+	
+	def restart
+		setFocus
+		setText("")
+		# IRB initialization
+		@inputAdded = false
+		@input = IO.pipe
+		$DEFAULT_OUTPUT = self
+
+		@im = FXIRBInputMethod.new
+		if @irb
+			@irb.kill
+			@irb = Thread.new {
+				IRB.restart(@im)
+			}
+		else
+			@irb = Thread.new {
+				IRB.start_in_fxirb(@im)
+			}
+		end
+	end
+	
+
+	def onKeyRelease(sender, sel, event)
+		case event.code
+		when Fox::KEY_Return, Fox::KEY_KP_Enter
+			newLineEntered
+		end
+		return 1
+	end
+
+	def onKeyPress(sender,sel,event)
+		case event.code
+		when Fox::KEY_Return, Fox::KEY_KP_Enter
+			setCursorPos(getLength)
+			super
+		when Fox::KEY_Up,Fox::KEY_KP_Up
+			str = @im.prevCmd.chop
+			if str != ""
+				removeText(@anchor, getLength-@anchor)
+				write(str)
+			end
+		when Fox::KEY_Down,Fox::KEY_KP_Down
+			str = @im.nextCmd.chop
+			if str != ""
+				removeText(@anchor, getLength-@anchor)
+				write(str)
+			end
+		when Fox::KEY_Left,Fox::KEY_KP_Left
+			if getCursorPos > @anchor
+				super
+			end
+		when Fox::KEY_Delete,Fox::KEY_KP_Delete,Fox::KEY_BackSpace
+			if getCursorPos > @anchor
+				super
+			end
+		when Fox::KEY_Home, Fox::KEY_KP_Home
+			setCursorPos(@anchor)
+		when Fox::KEY_End, Fox::KEY_KP_End
+			setCursorPos(getLength)
+		when Fox::KEY_Page_Up, Fox::KEY_KP_Page_Up,
+			Fox::KEY_Page_Down, Fox::KEY_KP_Page_Down
+		when Fox::KEY_bracketright
+			#auto-dedent if the } or ] is on a line by itself
+			if (emptyline? or (getline == "en")) and indented?
+				str = getline
+				@anchor -= 2
+				rmline
+				appendText(str)
+				setCursorPos(getLength)
+			end
+			super
+		when Fox::KEY_u
+			if (event.state & CONTROLMASK) != 0 
+				str = extractText(getCursorPos, getLength - getCursorPos)
+				rmline
+				appendText(str)
+				setCursorPos(@anchor)
+			end
+			super
+		when Fox::KEY_k
+			if (event.state & CONTROLMASK) != 0
+				str = extractText(@anchor, getCursorPos-@anchor)
+				rmline
+				appendText(str)
+				setCursorPos(getLength)
+			end
+			super
+		when Fox::KEY_d
+			if (event.state & CONTROLMASK) != 0
+				restart
+=begin
+				#Ctrl - D
+			  rmline
+				appendText(exit)
+				sendCommand("exit")
+				newLineEntered
+=end
+			else
+				# test for 'end' so we can dedent
+				if (getline == "en") and indented?
+					str = getline
+					@anchor -= 2
+					rmline
+					appendText(str)
+					setCursorPos(getLength)
+				end
+			end
+			super
+		else
+			super
+		end
+	end
+
+	def getline
+		extractText(@anchor, getLength-@anchor)
+	end
+
+	def rmline
+		str = getline
+		removeText(@anchor, getLength-@anchor)
+		str
+	end
+
+	def emptyline?
+		getline == ""
+	end
+
+	def indented?
+		extractText(@anchor-2, 2) == "  "
+	end
+
+	def onLeftBtnPress(sender,sel,event)
+		@store_anchor = @anchor
+		setFocus
+		super
+	end
+
+	def onLeftBtnRelease(sender,sel,event)
+		super
+		@anchor = @store_anchor
+		setCursorPos(@anchor)
+		setCursorPos(getLength)
+	end
+
+	def onMiddleBtnPress(sender,sel,event)
+		pos=getPosAt(event.win_x,event.win_y)
+		if pos >= @anchor
+			super
+		end
+	end
+
+	def newLineEntered
+		processCommandLine(extractText(@anchor, getLength-@anchor))
+	end
+
+	def processCommandLine(cmd)
+		#write("[#{cmd}]")
+		@input[1].puts cmd
+		@inputAdded = true
+		@irb.run
+	end
+
+	def sendCommand(cmd)
+		setCursorPos(getLength)
+		makePositionVisible(getLength) unless isPosVisible(getLength)
+		cmd += "\n"
+		appendText(cmd)
+		processCommandLine(cmd)
+	end
+
+	def write(obj)
+		str = obj.to_s
+		appendText(str)
+		setCursorPos(getLength)
+		makePositionVisible(getLength) unless isPosVisible(getLength)
+		return str.length
+	end
+
+	def gets
+		@anchor = getLength
+		if !@inputAdded
+			Thread.stop
+		end
+		@inputAdded = false
+		return @input[0].gets
+	end
+end
+
+# Stand alone run
+if __FILE__ == $0
+	application = FXApp.new("FXIrb", "ruby")
+	application.threadsEnabled = true
+	Thread.abort_on_exception = true
+	application.init(ARGV)
+	window = FXMainWindow.new(application, "FXIrb", nil, nil, DECOR_ALL, 0, 0, 580, 500)
+	FXIrb.init(window, nil, 0, LAYOUT_FILL_X|LAYOUT_FILL_Y|TEXT_WORDWRAP|TEXT_SHOWACTIVE)
+	application.create
+	window.show(PLACEMENT_SCREEN)
+	application.run
+end
+