watobo 0.9.21 → 0.9.23

data/lib/watobo/gui/confirm_scan_dialog.rb

@@ -1,12 +1,3 @@
-#.
-# confirm_scan_dialog.rb
-#.
-# Copyright 2014 by siberas, http://www.siberas.de
-# This file is part of WATOBO (Web Application Tool Box) http://watobo.sourceforge.com
-# WATOBO 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 version 2 of the License.
-# WATOBO 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 WATOBO; if not, write to the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
-
 require 'watobo/gui/conversation_table'
 
 # @private 

data/lib/watobo/gui/conversation_table.rb

@@ -1,24 +1,16 @@
-#.
-# conversation_table.rb
-#.
-# Copyright 2014 by siberas, http://www.siberas.de
-# This file is part of WATOBO (Web Application Tool Box) http://watobo.sourceforge.com
-# WATOBO 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 version 2 of the License.
-# WATOBO 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 WATOBO; if not, write to the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
-
 class CustomTableItem < FXTableItem
   attr_accessor :color
   attr_accessor :backcolor
+
   def drawContent table, unusable_dc, x, y, w, h
-    FXDCWindow.new(table) {|dc|
+    FXDCWindow.new(table) { |dc|
       if @color and not selected?
 
         if @backcolor
-        dc.foreground = @backcolor
-        hg = table.horizontalGridShown? ? 1 : 0
-        vg = table.verticalGridShown? ? 1 : 0
-        dc.fillRectangle(x + vg, y + hg, w - vg, h - hg)
+          dc.foreground = @backcolor
+          hg = table.horizontalGridShown? ? 1 : 0
+          vg = table.verticalGridShown? ? 1 : 0
+          dc.fillRectangle(x + vg, y + hg, w - vg, h - hg)
         end
 
         dc.foreground = @color
@@ -46,13 +38,13 @@ class FXColoredTable < FXTable
 
   def setCellBackground row, column, color
     getItem(row, column).backcolor = color
-  # puts getItem(row, column).methods.sort
-  #  updateItem row, column
+    # puts getItem(row, column).methods.sort
+    #  updateItem row, column
   end
 end
 
 # @private 
-module Watobo#:nodoc: all
+module Watobo #:nodoc: all
   module Gui
     TABLE_COL_METHOD = 0x0001
     TABLE_COL_HOST = 0x0002
@@ -64,13 +56,14 @@ module Watobo#:nodoc: all
     TABLE_COL_SSL = 0x0100
     class ConversationTable < FXTable
       #    class ConversationTable < FXColoredTable
-      
+
       attr :filter
 
       attr_accessor :autoscroll
       attr_accessor :url_decode
 
       include Watobo::Gui::Icons
+
       def subscribe(event, &callback)
         (@event_dispatcher_listeners[event] ||= []) << callback
       end
@@ -97,9 +90,9 @@ module Watobo#:nodoc: all
         self.numRows
       end
 
-    
+
       def apply_filter(filter={})
-        @filter = filter      
+        @filter = filter
         puts @filter.to_yaml if $DEBUG
         update_table
       end
@@ -109,15 +102,15 @@ module Watobo#:nodoc: all
         if currentRow >= 0
           chatid = getRowText(currentRow).to_i
           chat = Watobo::Chats.get_by_id(chatid)
-        return chat
+          return chat
         end
         return nil
       end
 
       def chat_visible?(chat)
         begin
-          return false if @filter[:ok_only] == true and chat.response.responseCode !~ /200/ 
-           
+          return false if @filter[:ok_only] == true and chat.response.responseCode !~ /200/
+
           if @filter[:unique]
             unless Watobo::Gui.project.nil?
               uniq_hash = Watobo::Gui.project.uniqueRequestHash chat.request
@@ -133,7 +126,7 @@ module Watobo#:nodoc: all
           end
           # puts "* passed scope"
           if @filter[:hide_tested]
-          return false if chat.tested?
+            return false if chat.tested?
           end
           # puts "* passed hide tested"
           unless @filter[:doc_filter].include?(chat.request.doctype)
@@ -145,8 +138,8 @@ module Watobo#:nodoc: all
             # puts @filter.to_yaml
             # puts chat.response.responseCode
 
-            if @filter[:response] == true 
-              return false if @filter[:text_only] == true and chat.response.content_type !~ /(text|javascript|xml|json)/ 
+            if @filter[:response] == true
+              return false if @filter[:text_only] == true and chat.response.content_type !~ /(text|javascript|xml|json)/
               return true if chat.response.join.unpack("C*").pack("C*") =~ /#{@filter[:text]}/i
             end
 
@@ -160,7 +153,7 @@ module Watobo#:nodoc: all
         false
       end
 
-      def showConversation( chat_list = nil, prefs = {} )
+      def showConversation(chat_list = nil, prefs = {})
         clearConversation()
         if chat_list.nil?
           Watobo::Chats.each do |chat|
@@ -195,20 +188,20 @@ module Watobo#:nodoc: all
 
       def updateComment(row, comment)
         col = @col_order.index(TABLE_COL_COMMENT)
-        self.setItemText(row, col, comment.gsub(/[^[:print:]]/,' '))
+        self.setItemText(row, col, comment.gsub(/[^[:print:]]/, ' '))
       end
 
       def addChat(chat, *prefs)
         return false if chat.nil?
         if self.getNumRows <= 0 then
           clearConversation()
-        # initColumns()
+          # initColumns()
         end
 
-        @current_chat_list.push chat 
+        @current_chat_list.push chat
         if prefs.include? :ignore_filter
           add_chat_row(chat)
-        return true
+          return true
         end
         add_chat_row(chat) if Chats.match?(chat, @filter)
         return true
@@ -222,18 +215,18 @@ module Watobo#:nodoc: all
 
         @columns.each do |type, name|
           index = @col_order.index(type)
-          self.setColumnText( index, name )
-          self.setColumnIcon(@col_order.index(TABLE_COL_SSL), TBL_ICON_LOCK)# puts self.getItem(@col_order.index(col), 0  ).class.to_s
+          self.setColumnText(index, name)
+          self.setColumnIcon(@col_order.index(TABLE_COL_SSL), TBL_ICON_LOCK) # puts self.getItem(@col_order.index(col), 0  ).class.to_s
         end
 
       end
 
-      def initialize( owner, unused = nil )
+      def initialize(owner, unused = nil)
         @event_dispatcher_listeners = Hash.new
 
         super(owner, :opts => TABLE_COL_SIZABLE|TABLE_ROW_SIZABLE|LAYOUT_FILL_X|LAYOUT_FILL_Y|TABLE_READONLY|LAYOUT_SIDE_TOP, :padding => 2)
-        
-         @filter = {}
+
+        @filter = {}
 
         @url_decode = true
 
@@ -243,7 +236,7 @@ module Watobo#:nodoc: all
         self.setCellColor(1, 0, FXRGB(240, 255, 240))
         self.setCellColor(1, 1, FXRGB(240, 240, 255))
 
-      #  reset_filter
+        #  reset_filter
         #   FXMAPFUNC(SEL_CLICKED, FXTable::ID_SELECT_CELL, :onSelectCell)
         @current_chat_list = []
         @uniq_chats = Hash.new
@@ -265,7 +258,7 @@ module Watobo#:nodoc: all
         @columns[TABLE_COL_SSL] = ""
 
         # initialize columns order
-        @col_order = [ TABLE_COL_SSL, TABLE_COL_METHOD, TABLE_COL_HOST, TABLE_COL_PATH, TABLE_COL_PARMS, TABLE_COL_STATUS, TABLE_COL_COOKIE, TABLE_COL_COMMENT ]
+        @col_order = [TABLE_COL_SSL, TABLE_COL_METHOD, TABLE_COL_HOST, TABLE_COL_PATH, TABLE_COL_PARMS, TABLE_COL_STATUS, TABLE_COL_COOKIE, TABLE_COL_COMMENT]
 
         # init cell width
         @cell_width = Hash.new
@@ -296,66 +289,68 @@ module Watobo#:nodoc: all
           column_width = self.getColumnWidth(index)
 
           new_width = case column_width
-          when column_width > @cell_auto_max
-            @cell_auto_max
-          when ( column_width > @cell_width_defaults[type] )
-            @cell_width_defaults[type]
-          when @cell_width_defaults[type]
-            self.fitColumnsToContents(index)
-            w = self.getColumnWidth(index)
-            w = @cell_auto_max if self.getColumnWidth(index) > @cell_auto_max
-            w = @cell_width_defaults[type] if self.getColumnWidth(index) < @cell_width_defaults[type]
-            w
-          else
-          @cell_width_defaults[type]
-          end
+                        when column_width > @cell_auto_max
+                          @cell_auto_max
+                        when (column_width > @cell_width_defaults[type])
+                          @cell_width_defaults[type]
+                        when @cell_width_defaults[type]
+                          self.fitColumnsToContents(index)
+                          w = self.getColumnWidth(index)
+                          w = @cell_auto_max if self.getColumnWidth(index) > @cell_auto_max
+                          w = @cell_width_defaults[type] if self.getColumnWidth(index) < @cell_width_defaults[type]
+                          w
+                        else
+                          @cell_width_defaults[type]
+                      end
           self.setColumnWidth(index, new_width)
           @cell_width[type] = new_width
           self.rowHeaderMode = 0
 
           adjustCellWidth()
-          
-          
+
+
         end
-        
-        self.connect(SEL_CHANGED){ |sender, sel, item|
-         # puts "SEL_CHANGED #{item.row}"
+
+        self.connect(SEL_CHANGED) { |sender, sel, item|
+          # puts "SEL_CHANGED #{item.row}"
           self.selectRow(item.row, false)
-           chat = self.getItemData(item.row, 0)
-           notify(:chat_selected, chat) if chat.respond_to? :request
+          chat = self.getItemData(item.row, 0)
+          notify(:chat_selected, chat) if chat.respond_to? :request
         }
-        
-        self.connect(SEL_COMMAND){ |sender, sel, item|
-         # puts "SEL_COMMAND #{item.row}"
+
+        self.connect(SEL_COMMAND) { |sender, sel, item|
+          # puts "SEL_COMMAND #{item.row}"
           self.selectRow(item.row, false)
-           chat = self.getItemData(item.row, 0)
-           notify(:chat_selected, chat) if chat.respond_to? :request
+          chat = self.getItemData(item.row, 0)
+          notify(:chat_selected, chat) if chat.respond_to? :request
         }
-        
-        self.connect(SEL_DOUBLECLICKED){ |sender, sel, item|
-          #   puts "SEL_DOUBLECLICKED #{item.row}"
-          self.selectRow(item.row, false)
-           chat = self.getItemData(item.row, 0)
-           notify(:chat_doubleclicked, chat) if chat.respond_to? :request
+
+        self.connect(SEL_DOUBLECLICKED) { |sender, sel, item|
+          #  puts "SEL_DOUBLECLICKED #{item.row}"
+          if item.row >= 0
+            self.selectRow(item.row, false)
+            chat = self.getItemData(item.row, 0)
+            notify(:chat_doubleclicked, chat) if chat.respond_to? :request
+          end
         }
-        
-        self.connect(SEL_SELECTED){ |sender, sel, item|
-           #  puts "SEL_SELECTED #{item.row}"
+
+        self.connect(SEL_SELECTED) { |sender, sel, item|
+          #  puts "SEL_SELECTED #{item.row}"
           self.selectRow(item.row, false)
-           chat = self.getItemData(item.row, 0)
-           notify(:chat_selected, chat) if chat.respond_to? :request
+          chat = self.getItemData(item.row, 0)
+          notify(:chat_selected, chat) if chat.respond_to? :request
         }
 
         adjustCellWidth()
 
         addHotkeyHandler(self)
-        
+
         start_update_timer
       end
 
       def scrollUp()
         #self.makePositionVisible(0, 0)
-         self.setPosition(self.xPosition, 0)
+        self.setPosition(self.xPosition, 0)
       end
 
       def scrollDown()
@@ -367,17 +362,17 @@ module Watobo#:nodoc: all
         #puts "contentHeight: #{self.contentHeight}"
         #puts "y-diff: #{self.viewportHeight - self.contentHeight}"
         #puts "---"
-         self.setPosition(self.xPosition, (self.viewportHeight - self.contentHeight))
+        self.setPosition(self.xPosition, (self.viewportHeight - self.contentHeight))
       end
-      
+
       def start_update_timer
         @last_row_count = 0
-        @timer = FXApp.instance.addTimeout( 150, :repeat => true) {
+        Watobo.save_thread {
           if self.getNumRows != @last_row_count
-             scrollDown if @autoscroll == true
-             @last_row_count = self.getNumRows
+            scrollDown if @autoscroll == true
+            @last_row_count = self.getNumRows
           end
-          }
+        }
 
       end
 
@@ -392,10 +387,10 @@ module Watobo#:nodoc: all
 
       def add_chat_row(chat)
         return false unless chat.respond_to? :request
-        return false unless chat.respond_to? :response 
+        return false unless chat.respond_to? :response
         return false if chat.request.nil?
         return false if chat.response.nil?
-        
+
         lastRowIndex = self.getNumRows
         self.appendRows(1)
 
@@ -412,7 +407,7 @@ module Watobo#:nodoc: all
 
         index = @col_order.index(TABLE_COL_HOST)
         self.setItemText(lastRowIndex, index, chat.request.host)
-        self.getItem(lastRowIndex,index).justify = FXTableItem::LEFT
+        self.getItem(lastRowIndex, index).justify = FXTableItem::LEFT
 
         index = @col_order.index(TABLE_COL_PATH)
         self.setItemText(lastRowIndex, index, chat.request.path)
@@ -422,14 +417,14 @@ module Watobo#:nodoc: all
         ps = ""
         rup = chat.request.urlparms
         unless rup.nil?
-        ps << rup
-        end        
+          ps << rup
+        end
 
         if chat.request.method =~ /POST/ and !chat.request.body.nil? then
-            post_parms_string = ''
-            post_parms_string << chat.request.body            
-            ps << "&&" unless ps.empty?
-            ps << post_parms_string          
+          post_parms_string = ''
+          post_parms_string << chat.request.body
+          ps << "&&" unless ps.empty?
+          ps << post_parms_string
         end
 
         ps = "*MULTIPART*" if chat.request.content_type =~ /multipart/i
@@ -437,24 +432,24 @@ module Watobo#:nodoc: all
         parms = ""
         unless ps.empty?
           ps_ascii = ps.force_encoding('ASCII-8BIT')
-          
+
           if @url_decode == true
             if chat.request.content_type =~ /(json|xml)/
               parms = ps_ascii
-            else              
-              parms = CGI.unescape(ps_ascii)              
+            else
+              parms = CGI.unescape(ps_ascii)
             end
           end
-          parms.gsub!(/[^[:print:]]/,'.')
+          parms.gsub!(/[^[:print:]]/, '.')
 
         end
-        
+
         self.setItemText(lastRowIndex, index, parms)
         self.getItem(lastRowIndex, index).justify = FXTableItem::LEFT
 
         index = @col_order.index(TABLE_COL_STATUS)
         self.setItemText(lastRowIndex, index, chat.response.status)
-        self.getItem(lastRowIndex,index).justify = FXTableItem::LEFT
+        self.getItem(lastRowIndex, index).justify = FXTableItem::LEFT
 
         if chat.response.header_value("set-cookie").first then
           index = @col_order.index(TABLE_COL_COOKIE)
@@ -470,12 +465,12 @@ module Watobo#:nodoc: all
           self.setItemText(lastRowIndex, index, cc)
           self.getItem(lastRowIndex, index).justify = FXTableItem::LEFT
         end
-        
+
         self.setItemData(lastRowIndex, 0, chat)
 
         #self.makePositionVisible(self.numRows-1, 0) if @autoscroll == true
         if @autoscroll == true
-          self.setPosition(self.xPosition, (self.viewportHeight - self.contentHeight - 20 ))
+          self.setPosition(self.xPosition, (self.viewportHeight - self.contentHeight - 20))
         end
       end
 
@@ -487,8 +482,8 @@ module Watobo#:nodoc: all
           add_chat_row(chat)
         end
       end
-      
-            
+
+
       def adjustCellWidth()
         begin
           self.rowHeader.width = 40
@@ -507,54 +502,54 @@ module Watobo#:nodoc: all
         @ctrl_pressed = false
 
         widget.connect(SEL_KEYPRESS) { |sender, sel, event|
-        # puts event.code
-        cont = false
+          # puts event.code
+          cont = false
           @ctrl_pressed = true if event.code == KEY_Control_L or event.code == KEY_Control_R
           #  @shift_pressed = true if @ctrl_pressed and ( event.code == KEY_Shift_L or event.code == KEY_Shift_R )
-          if event.code == KEY_Return             
-           chat = current_chat 
-           notify(:chat_doubleclicked, chat) if chat.respond_to? :request
-          cont = true # special handling of KEY_Return, because we don't want a linebreak in textbox.
+          if event.code == KEY_Return
+            chat = current_chat
+            notify(:chat_doubleclicked, chat) if chat.respond_to? :request
+            cont = true # special handling of KEY_Return, because we don't want a linebreak in textbox.
           end
 
           case event.code
-          when KEY_F1
-
-            unless event.moved?
-              FXMenuPane.new(self) do |menu_pane|
-                FXMenuCaption.new(menu_pane, "Hotkeys:")
-                FXMenuSeparator.new(menu_pane)
-                [ "G - Goto",
-                  "<ctrl-n> - Goto Next",
-                  "<ctrl-N> - Goto Prev",
-                  "<space>  - Edit Comment"
-                ].each do |hk|
-                  FXMenuCaption.new(menu_pane, hk).backColor = 'yellow'
+            when KEY_F1
+
+              unless event.moved?
+                FXMenuPane.new(self) do |menu_pane|
+                  FXMenuCaption.new(menu_pane, "Hotkeys:")
+                  FXMenuSeparator.new(menu_pane)
+                  ["G - Goto",
+                   "<ctrl-n> - Goto Next",
+                   "<ctrl-N> - Goto Prev",
+                   "<space>  - Edit Comment"
+                  ].each do |hk|
+                    FXMenuCaption.new(menu_pane, hk).backColor = 'yellow'
+                  end
+
+                  menu_pane.create
+                  menu_pane.popup(nil, event.root_x, event.root_y)
+                  app.runModalWhileShown(menu_pane)
                 end
 
-                menu_pane.create
-                menu_pane.popup(nil, event.root_x, event.root_y)
-                app.runModalWhileShown(menu_pane)
               end
 
-            end
-
-          when KEY_space
-            chat = current_chat
-            notify(:edit_comment, chat) if chat
-          when KEY_G
-            open_goto_url_dialog
-            cont = true
+            when KEY_space
+              chat = current_chat
+              notify(:edit_comment, chat) if chat
+            when KEY_G
+              open_goto_url_dialog
+              cont = true
           end
 
           if @ctrl_pressed
             case event.code
-            when KEY_n
-              show_next
-            when KEY_N
-              show_prev
-            when KEY_f
-              notify(:open_filter_dlg)
+              when KEY_n
+                show_next
+              when KEY_N
+                show_prev
+              when KEY_f
+                notify(:open_filter_dlg)
             end
             cont = false
           end
@@ -576,61 +571,60 @@ module Watobo#:nodoc: all
         end
         true
       end
-      
+
       def show_next()
         i = get_next_match
         if i >= 0
-        selectRow(i, false) 
-         setCurrentItem(i, 2)
-         makePositionVisible(i,2)
-         end
+          selectRow(i, false)
+          setCurrentItem(i, 2)
+          makePositionVisible(i, 2)
+        end
       end
-      
+
       def show_prev()
         i = get_prev_match
         if i >= 0
-        selectRow(i, false) 
-         setCurrentItem(i, 2)
-         makePositionVisible(i,2)
-         end
+          selectRow(i, false)
+          setCurrentItem(i, 2)
+          makePositionVisible(i, 2)
+        end
       end
-      
-      
+
+
       def show_nearest()
         sel = -1
         pi = get_prev_match()
         ni = get_next_match()
-       
+
         sel = pi
-        if ( ni >= 0 ) and ( pi >= 0 )
-          sel = ( currentRow - pi ) > ( ni - currentRow ) ? ni : pi
+        if (ni >= 0) and (pi >= 0)
+          sel = (currentRow - pi) > (ni - currentRow) ? ni : pi
         elsif pi >= 0
           sel = pi
-        else 
+        else
           sel = ni
         end
-        
+
         if sel >= 0
-          selectRow(sel, false)       
+          selectRow(sel, false)
           setCurrentItem(sel, 2)
-          makePositionVisible(sel,2)        
+          makePositionVisible(sel, 2)
         end
-        
+
         false
       end
-      
-      
-      
+
+
       def get_next_match()
         return -1 if @url_pattern.nil?
         return -1 if @url_pattern.empty?
-      
+
         row = currentRow + 1
         match = -1
         while row < numRows
           chat = self.getItemData(row, 0)
           if chat.request.url.to_s =~ /#{@url_pattern}/i
-            match = row 
+            match = row
             #puts chat.request.url.to_s
           end
           return match if match >= 0
@@ -638,17 +632,17 @@ module Watobo#:nodoc: all
         end
         match
       end
-      
+
       def get_prev_match()
         return -1 if @url_pattern.nil?
         return -1 if @url_pattern.empty?
-     
+
         row = currentRow - 1
         match = -1
         while row >= 0
           chat = self.getItemData(row, 0)
           if chat.request.url.to_s =~ /#{@url_pattern}/i
-            match = row 
+            match = row
             #puts chat.request.url.to_s
           end
           return match if match >= 0