watobo 0.9.8.677

data/lib/watobo/gui/checks_policy_frame.rb

@@ -0,0 +1,123 @@
+# .
+# checks_policy_frame.rb
+# 
+# Copyright 2012 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
+# .
+module Watobo
+  module Gui
+    class ChecksPolicyFrame < FXVerticalFrame
+      attr :policy_name
+      def onPolicyChanged(sender, sel, item)
+        @policy_name = @policyCombo.getItemText(@policyCombo.currentItem)
+        policy = @policyCombo.getItemData(@policyCombo.currentItem)
+        applyPolicy(policy)
+      end
+
+      def isElementChecked(data)
+        item = @tree.findItemByData(data)
+        item.checked
+      end
+
+      def applyPolicy(policy)
+        return false if policy.nil?
+        tree_elements = []
+        @checks.each do |check|
+          status = true
+          begin
+            status = policy[check.class.to_s]
+          rescue
+          puts "unknown policy or unknown test [#{@policy}] - [#{check.class.to_s}"
+          end
+          a = {
+            :name => "#{check.info[:check_group]}|#{check.info[:check_name]}",
+            :enabled => status,
+            :data => check
+          }
+          tree_elements.push a
+        end
+
+        showTree(tree_elements)
+      end
+
+      def showInfo(check)
+
+      end
+
+      def showTree(elements)
+        @tree.createTree(elements)
+      end
+
+      def getSelectedModules()
+        sel = @tree.getCheckedData
+      #sel.map { |i| p i.class }
+      end
+
+      def initialize(parent, checks, policy)
+        # Invoke base class initialize function first
+        super(parent, :opts => LAYOUT_FILL_X| LAYOUT_FILL_Y, :padding => 0)
+
+        @checks = checks
+        @policy_list = policy.is_a?(Hash) ? policy : default_policy(checks)         # policy settings
+
+        policy_frame = FXHorizontalFrame.new(self, :opts => LAYOUT_FILL_X|LAYOUT_SIDE_TOP)
+
+        policy_name = @policy_list[:default_policy] if @policy_list.has_key? :default_policy
+        @current_policy = @policy_list[policy_name] if @policy_list.has_key? policy_name
+
+        policy_count = ( @policy_list.is_a? Hash ) ? @policy_list.length-1 : 0
+
+        @policyCombo = FXComboBox.new(policy_frame, policy_count, nil, 0,
+        COMBOBOX_INSERT_LAST|FRAME_SUNKEN|FRAME_THICK|LAYOUT_SIDE_TOP|LAYOUT_FILL_X)
+
+        @policyCombo.numVisible = policy_count
+        @policyCombo.connect(SEL_COMMAND, method(:onPolicyChanged))
+
+        tree_frame = FXVerticalFrame.new(self, :opts => LAYOUT_FILL_X|LAYOUT_FILL_Y|FRAME_GROOVE)
+        @tree = CheckBoxTreeList.new(tree_frame)
+
+        if @policy_list
+          @policy_list.each do |pname, p|
+            next if pname.is_a? Symbol
+            @policyCombo.appendItem(pname, p)
+          end
+          # select policy
+          index = @policyCombo.findItem(policy_name)
+          if index >= 0 then
+          @policyCombo.setCurrentItem(index)
+          end
+        applyPolicy(@current_policy)
+        end
+      end
+
+      private
+
+      def default_policy(checks)
+        @policy_list = Hash.new
+        @policy_list[:default_policy] = 'default'
+        dp = @policy_list['default'] = Hash.new
+        checks.each do |ac|
+          dp[ac.class.to_s] = false
+        end
+        @current_policy = dp
+        @policy_list
+      end
+    end
+  #--
+  end
+end

data/lib/watobo/gui/client_cert_dialog.rb

@@ -0,0 +1,227 @@
+# .
+# client_cert_dialog.rb
+# 
+# Copyright 2012 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
+# .
+module Watobo
+  module Gui
+    class ClientCertDialog < FXDialogBox
+
+      NO_SELECTION = "no site selected"
+
+      attr :client_certificates
+      def savePasswords?()
+        @save_pws_cbt.checked?
+      end
+
+      include Responder
+
+      def initialize(owner, project, prefs={})
+
+        super(owner, "Client Certificates", :opts => DECOR_ALL)
+        @project = project
+        FXMAPFUNC(SEL_COMMAND, ID_ACCEPT, :onAccept)
+
+        @password_policy = {
+          :save_passwords => false
+        }
+
+        @cert_path = nil
+        @client_certificates = {}
+        @client_certificates = project.getClientCertificates unless project.getClientCertificates.nil?
+        puts client_certificates.to_yaml
+
+        @password_policy.update prefs[:password_policy] if prefs.has_key? :password_policy
+
+        @site_dt = FXDataTarget.new('')
+        @client_cert_dt = FXDataTarget.new('')
+        @client_key_dt = FXDataTarget.new('')
+        @password_dt = FXDataTarget.new('')
+        @retype_dt = FXDataTarget.new('')
+
+        main_frame = FXVerticalFrame.new(self, :opts => LAYOUT_FILL_X|LAYOUT_FILL_Y|FRAME_GROOVE)
+
+        frame = FXHorizontalFrame.new(main_frame, :opts => LAYOUT_FILL_X)
+
+        @scope_only_cb = FXCheckButton.new(frame, "scope only", nil, 0, ICON_BEFORE_TEXT|LAYOUT_SIDE_LEFT)
+        @scope_only_cb.setCheck(false)
+
+        @scope_only_cb.connect(SEL_COMMAND) { updateSitesCombo() }
+
+        @sites_combo = FXComboBox.new(frame, 5,  @site_dt, FXDataTarget::ID_VALUE,
+        COMBOBOX_STATIC|FRAME_SUNKEN|FRAME_THICK|LAYOUT_SIDE_TOP|LAYOUT_FILL_X)
+
+        @sites_combo.numVisible = @sites_combo.numItems >= 20 ? 20 : @sites_combo.numItems
+        @sites_combo.numColumns = 25
+        @sites_combo.editable = true
+        updateSitesCombo()
+
+        @sites_combo.connect(SEL_COMMAND, method(:update_fields))
+        matrix = FXMatrix.new(main_frame, 3, :opts => MATRIX_BY_COLUMNS|LAYOUT_FILL_X|LAYOUT_FILL_Y)
+
+        FXLabel.new(matrix, "Certificate File:", nil, LAYOUT_TOP|JUSTIFY_RIGHT)
+        @client_cert_txt = FXTextField.new(matrix,  25,
+        :target => @client_cert_dt, :selector => FXDataTarget::ID_VALUE,
+        :opts => TEXTFIELD_NORMAL|LAYOUT_SIDE_RIGHT)
+
+        FXButton.new(matrix, "Select").connect(SEL_COMMAND){ select_cert_file }
+
+        FXLabel.new(matrix, "Key File:", nil, LAYOUT_TOP|JUSTIFY_RIGHT)
+        @client_key_txt = FXTextField.new(matrix, 25,
+        :target => @client_key_dt, :selector => FXDataTarget::ID_VALUE,
+        :opts => TEXTFIELD_NORMAL|LAYOUT_SIDE_RIGHT)
+        FXButton.new(matrix, "Select").connect(SEL_COMMAND){ select_key_file }
+
+        matrix = FXMatrix.new(main_frame, 2, :opts => MATRIX_BY_COLUMNS|LAYOUT_FILL_X|LAYOUT_FILL_Y)
+        FXLabel.new(matrix, "Password:", nil, LAYOUT_TOP|JUSTIFY_RIGHT)
+        @password_txt = FXTextField.new(matrix, 25,
+        :target => @password_dt, :selector => FXDataTarget::ID_VALUE,
+        :opts => TEXTFIELD_NORMAL|LAYOUT_SIDE_RIGHT|TEXTFIELD_PASSWD)
+
+        FXLabel.new(matrix, "Retype:", nil, LAYOUT_TOP|JUSTIFY_RIGHT)
+        @retype_txt = FXTextField.new(matrix, 25,
+        :target => @retype_dt, :selector => FXDataTarget::ID_VALUE,
+        :opts => TEXTFIELD_NORMAL|LAYOUT_SIDE_RIGHT|TEXTFIELD_PASSWD)
+
+        @save_pws_cbt = FXCheckButton.new(matrix, "save passwords")
+        @save_pws_cbt.checkState = false
+        @save_pws_cbt.checkState = true if @password_policy[:save_passwords] == true
+        note_label = FXLabel.new(matrix, "This setting affects all passwords!!!")
+
+        buttons = FXHorizontalFrame.new(main_frame, :opts => LAYOUT_SIDE_BOTTOM|LAYOUT_FILL_X|PACK_UNIFORM_WIDTH,
+        :padLeft => 40, :padRight => 40, :padTop => 20, :padBottom => 20)
+
+        accept = FXButton.new(buttons, "&Accept", nil, self, ID_ACCEPT,
+        FRAME_RAISED|FRAME_THICK|LAYOUT_RIGHT|LAYOUT_CENTER_Y)
+        accept.enable
+        # Cancel
+        FXButton.new(buttons, "&Cancel", nil, self, ID_CANCEL,
+        FRAME_RAISED|FRAME_THICK|LAYOUT_RIGHT|LAYOUT_CENTER_Y)
+      end
+
+      private
+
+      def updateSitesCombo()
+        @sites_combo.clearItems
+        @sites_combo.appendItem(NO_SELECTION, nil)
+        @site_dt.value = NO_SELECTION
+        @project.listSites(:in_scope => @scope_only_cb.checked? ){ |site|
+          #puts "Site: #{site}"
+          @sites_combo.appendItem(site, site)
+        }
+        @sites_combo.numVisible = @sites_combo.numItems >= 20 ? 20 : @sites_combo.numItems
+        @sites_combo.setCurrentItem(0, true) if @sites_combo.numItems > 0
+        # @sites_combo.text = @sites_combo.getItemText(@sites_combo.currentItem)
+        @sites_combo.handle(self, FXSEL(SEL_UPDATE, 1), nil)
+      end
+
+      def select_cert_file()
+        cert_filename = FXFileDialog.getOpenFilename(self, "Select Certificate File", @cert_path)
+        if cert_filename != "" then
+          if File.exists?(cert_filename) then
+            @client_cert_dt.value = cert_filename
+            @client_cert_txt.handle(self, FXSEL(SEL_UPDATE, 0), nil)
+            @cert_path = File.dirname(cert_filename)
+          end
+        end
+      end
+
+      def select_key_file()
+
+        key_filename = FXFileDialog.getOpenFilename(self, "Select Key File", @cert_path)
+        if key_filename != "" then
+          if File.exists?(key_filename) then
+            @client_key_dt.value = key_filename
+            @client_key_txt.handle(self, FXSEL(SEL_UPDATE, 0), nil)
+            @cert_path = File.dirname(key_filename)
+          end
+        end
+      end
+
+      def updateFields()
+        # @sites_combo.handle(self, FXSEL(SEL_UPDATE, 1), nil)
+        @client_cert_txt.handle(self, FXSEL(SEL_UPDATE, 0), nil)
+        @client_key_txt.handle(self, FXSEL(SEL_UPDATE, 0), nil)
+      end
+
+      def update_fields(sender, sel, item)
+        @site_dt.value = item
+        if @client_certificates.has_key? item
+          puts "* certs found"
+          c = @client_certificates[item]
+          @client_cert_dt.value = c[:certificate_file]
+          @client_key_dt.value = c[:key_file]
+          @password_dt.value = c[:password]
+          @retype_dt.value = c[:password]
+          @client_cert_txt.handle(self, FXSEL(SEL_UPDATE, 0), nil)
+          @client_key_txt.handle(self, FXSEL(SEL_UPDATE, 0), nil)
+          @password_txt.handle(self, FXSEL(SEL_UPDATE, 0), nil)
+          @retype_txt.handle(self, FXSEL(SEL_UPDATE, 0), nil)
+        end
+      end
+
+      def onAccept(sender, sel, event)
+
+        password = nil
+        if @site_dt.value.empty? or @site_dt.value == NO_SELECTION
+          FXMessageBox.information(self, MBOX_OK, "No Site Selected", "You must select a site from the drop down list.")
+          return 0
+        end
+
+        unless @password_dt.value.empty?
+          puts "* password is set"
+          if @password_dt.value != @retype_dt.value
+            FXMessageBox.information(self, MBOX_OK, "Passwords", "Passwords don't match!")
+            return 0
+          end
+          password = @password_dt.value
+        end
+
+        unless File.exist?(@client_cert_dt.value)
+          FXMessageBox.information(self, MBOX_OK, "File not found", "#{@client_cert_dt.value} does not exist!")
+          return 0
+
+        end
+        unless File.exist?(@client_key_dt.value)
+          FXMessageBox.information(self, MBOX_OK, "File not found", "#{@client_key_dt.value} does not exist!")
+          return 0
+
+        end
+        # last but not least check if private key can be accessed
+        begin
+          key = OpenSSL::PKey::RSA.new(File.open(@client_key_dt.value), password)
+        rescue => bang
+          FXMessageBox.information(self, MBOX_OK, "Wrong Password", "Could not open private key file. Wrong password?")
+          return 0
+        end
+        #  puts @auth_table.settings.to_yaml
+        @client_certificates[@site_dt.value] = {
+          :certificate_file => @client_cert_dt.value,
+          :key_file => @client_key_dt.value,
+          :password => password.nil? ? "" : password
+        }
+
+        getApp().stopModal(self, 1)
+        self.hide()
+        return 1
+      end
+    end
+
+  end
+end

data/lib/watobo/gui/confirm_scan_dialog.rb

@@ -0,0 +1,67 @@
+# .
+# confirm_scan_dialog.rb
+# 
+# Copyright 2012 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'
+
+module Watobo
+  module Gui
+    class ConfirmScanDialog < FXDialogBox
+
+      include Responder
+
+      attr :scope
+      def onAccept(sender, sel, event)
+
+        getApp().stopModal(self, 1)
+        self.hide()
+        return 1
+      end
+
+      def initialize(owner, chatlist, scan_settings={})
+        super(owner, "Confirm Scan", DECOR_ALL, :width => 500, :height => 400)
+
+        FXMAPFUNC(SEL_COMMAND, ID_ACCEPT, :onAccept)
+
+        base_frame = FXVerticalFrame.new(self, :opts => LAYOUT_FILL_X|LAYOUT_FILL_Y, :padding => 0)
+        FXLabel.new(base_frame, "The following #{chatlist.length} chats will be scanned:")
+
+        # @chatTable = ConversationTable.new(base_frame, :opts => LAYOUT_FILL_X|LAYOUT_FILL_Y)
+@chatTable = ConversationTable.new(base_frame)
+        @chatTable.showConversation(chatlist)
+
+        buttons_frame = FXHorizontalFrame.new(base_frame,
+        :opts => LAYOUT_FILL_X|LAYOUT_SIDE_TOP)
+
+        @finishButton = FXButton.new(buttons_frame, "Accept" ,  nil, nil, :opts => BUTTON_NORMAL|LAYOUT_RIGHT)
+        @finishButton.enable
+        @finishButton.connect(SEL_COMMAND) do |sender, sel, item|
+        #self.handle(self, FXSEL(SEL_COMMAND, ID_CANCEL), nil)
+          self.handle(self, FXSEL(SEL_COMMAND, ID_ACCEPT), nil)
+        end
+
+        @cancelButton = FXButton.new(buttons_frame, "Cancel" ,
+        :target => self, :selector => FXDialogBox::ID_CANCEL,
+        :opts => BUTTON_NORMAL|LAYOUT_RIGHT)
+
+      end
+    end
+  end
+end