watobo 0.9.8.677

data/lib/watobo/gui/utils/load_icons.rb

@@ -0,0 +1,54 @@
+# .
+# load_icons.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
+    
+    def self.load_gui_icon(name)
+      icon = load_icon(File.join(@icon_path, name)) 
+    end
+    
+    def self.load_icon(filename)
+      begin
+        icon = nil
+        return icon if @application.nil?
+        #filename = 
+        File.open(filename, "rb") do |f| 
+          if filename.strip =~ /\.ico$/ then
+            icon = FXICOIcon.new(@application, f.read)
+            #icon = FXICOIcon.new(getApp(), f.read)
+          elsif filename.strip =~ /\.png$/ then
+            icon = FXPNGIcon.new(@application, f.read)
+          elsif filename.strip =~ /\.gif$/ then
+            icon = FXGIFIcon.new(@application, f.read)
+          end
+          icon.create
+        end
+        
+        icon
+      rescue => bang
+        puts "Couldn't load icon: #{filename}"
+        puts bang
+      end
+      
+    end
+  end
+end

data/lib/watobo/gui/utils/load_plugins.rb

@@ -0,0 +1,94 @@
+# .
+# load_plugins.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
+    @plugin_list = []
+    def self.add_plugin(p)
+      @plugin_list << p
+    end
+
+    def self.plugins
+      @plugin_list
+    end
+
+    def self.clear_plugins
+      @plugin_list = []
+    end
+
+    module Utils
+      def self.load_plugins(project=nil)
+        raise ArgumentError, "Need a project" unless project
+        # this is the old plugin style
+        Dir["#{Watobo.plugin_path}/*"].each do |sub|
+          if File.ftype(sub) == "directory"
+            puts "+ #{sub}"
+            Dir["#{sub}/#{File.basename(sub)}.rb"].each do |plugin_file|
+              begin
+                puts "* processing plugin file #{plugin_file}" if $DEBUG
+                require plugin_file
+                group = File.basename(sub)
+                plugin = File.basename(plugin_file).sub(/\.rb/,'')
+                # load "#{@settings[:module_path]}/#{modules}/#{check}"
+                group_class = group.slice(0..0).upcase + group.slice(1..-1).downcase
+                #
+                plugin_class = plugin.slice(0..0).upcase + plugin.slice(1..-1).downcase
+                class_constant = Watobo.class_eval("Watobo::Plugin::#{group_class}::#{plugin_class}")
+
+                Watobo::Gui.add_plugin class_constant.new(Watobo::Gui.application, project)
+              rescue => bang
+                puts bang
+                puts bang.backtrace if $DEBUG
+              #   notify(:logger, LOG_INFO, "problems loading plugin: #{plugin_file}")
+              end
+            end
+
+            # this the way loading new plugins
+
+            Dir["#{sub}/gui/#{File.basename(sub)}.rb"].each do |plugin_file|
+              begin
+                puts "* processing plugin file #{plugin_file}" if $DEBUG
+                require plugin_file
+                group = File.basename(sub)
+                plugin = File.basename(plugin_file).sub(/\.rb/,'')
+                # load "#{@settings[:module_path]}/#{modules}/#{check}"
+                group_class = group.slice(0..0).upcase + group.slice(1..-1).downcase
+                #
+                plugin_class = plugin.slice(0..0).upcase + plugin.slice(1..-1).downcase
+                class_name = "Watobo::Plugin::#{group_class}::Gui::Main"
+                puts class_name
+                class_constant = Watobo.class_eval(class_name)
+
+                Watobo::Gui.add_plugin class_constant.new(Watobo::Gui.application, project)
+              rescue => bang
+                puts bang
+                puts bang.backtrace if $DEBUG
+              #   notify(:logger, LOG_INFO, "problems loading plugin: #{plugin_file}")
+              end
+            end
+          end
+        end
+
+      end
+    #-------------
+    end
+  end
+end

data/lib/watobo/gui/utils/master_password.rb

@@ -0,0 +1,90 @@
+# .
+# master_password.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
+    module MasterPW
+      @master_password = ''
+      @save_without_master = false
+      @save_passwords = false
+      # set the master password
+      def self.set=(pw)
+        @master_password = ''
+        return false unless pw.is_a? String
+        @master_password = pw
+        true
+      end
+
+      def self.set?
+        return false unless @master_password.is_a? String
+        @master_password.empty?
+      end
+
+      def self.disable
+        @save_without_master = false
+        @master_password = ''
+      end
+
+      def self.enable
+        @save_without_master = true
+      end
+
+      def self.save_passwords?
+        @save_passwords
+      end
+
+      def self.save_passwords=(state)
+        @save_passwords = state
+      end
+
+      def self.save_without_master=(state)
+        @save_without_master = state
+      end
+
+      def self.save_without_master?
+        @save_without_master
+      end
+
+      # retrieve the master password
+      def self.get
+        @master_password
+      end
+
+      # check if master password is set
+      def self.enabled?
+        return @master_password.empty?
+      end
+
+      def self.settings
+        s = { :save_passwords => @save_passwords, :save_without_master => @save_without_master }
+      end
+
+      def self.settings=(s)
+        return false unless s.is_a? Hash
+        @save_passwords = s[:save_passwords] if s.has_key? :save_passwords
+        @save_without_master = s[:save_without_master] if s.has_key? :save_without_master
+        true
+      end
+
+    end
+
+  end
+end

data/lib/watobo/gui/utils/save_default_settings.rb

@@ -0,0 +1,99 @@
+# .
+# save_default_settings.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
+    def self.save_default_settings(project)
+      mp = ''
+      save_pws = false
+
+      puts "= Master Password Settings ="
+      puts Watobo::Gui::MasterPW.settings.to_yaml
+
+      if Watobo::Gui::MasterPW.save_passwords?
+        save_pws = true
+        unless Watobo::Gui::MasterPW.set?
+        save_pws = false unless Watobo::Gui::MasterPW.save_without_master?
+        end
+      end
+
+      Watobo.save_proxy_settings( :save_passwords => save_pws, :key => mp )
+      
+      
+      Watobo::Conf::General.save
+      Watobo::Conf::Interceptor.save
+      
+      return true
+=begin
+    proxy_has_credentials = false
+
+    settings[:forwarding_proxy].each_key do |p|
+    next if p == :default_proxy
+    proxy = settings[:forwarding_proxy][p]
+
+    if proxy.has_key? :password and proxy[:password] != ''
+    #       puts " - proxy #{p} has password #{proxy_list[p][:credentials][:password]}"
+    proxy_has_credentials = true
+    end
+    end
+    end
+
+    if proxy_has_credentials == true
+    if settings[:password_policy][:save_passwords] == true
+    if settings[:password_policy][:save_without_master] == false
+    if Watobo::Gui.master_password.empty?
+    # puts "* need master password for proxy"
+    dlg = MasterPWDialog.new(self)
+    if dlg.execute != 0
+    Watobo::Gui.master_password = dlg.masterPassword
+    end
+    end
+    unless Watobo::Gui.master_password.empty?
+    settings[:forwarding_proxy].each_key do |p|
+    #creds = settings[:forwarding_proxy][p][:credentials]
+    #pass = "$$WPE$$" + creds[:password]
+    pass = settings[:forwarding_proxy][p][:password]
+    unless pass.empty?
+    creds[:password] = Crypto.encryptPassword(pass, Watobo::Gui.master_password)
+    creds[:encrypted] = true
+    end
+    end
+    else
+    cleanCredentials(settings)
+    FXMessageBox.information(self,MBOX_OK,"No MasterPassword", "Could not encrypt proxy passwords. No Passwords have been saved!")
+    end
+    else
+    puts "* saving passwords without protection!!!!"
+    end
+    else
+    cleanCredentials(settings)
+    end
+    # puts "=== DEFAULT SETTINGS PASSWORD POLICY"
+    # puts YAML.dump(settings)
+    Watobo::Utils.save_settings(@default_settings_file, settings )
+=end
+
+    end
+
+  end
+
+end

data/lib/watobo/gui/utils/save_project_settings.rb

@@ -0,0 +1,21 @@
+# .
+# save_project_settings.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
+# .

data/lib/watobo/gui/utils/save_proxy_settings.rb

@@ -0,0 +1,45 @@
+# .
+# save_proxy_settings.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
+  def self.save_proxy_settings(prefs)
+
+    c_prefs = {
+      :save_passwords => false,
+      :key => ""
+    }
+
+    c_prefs.update prefs
+
+    Watobo::Conf::ForwardingProxy.save do |name, proxy|
+      next unless proxy.is_a? Hash
+      unless c_prefs[:save_passwords] == false
+        unless c_prefs[:key].empty?
+
+      end
+      else
+        proxy[:password] = ''
+      end
+    end
+
+  end
+
+end

data/lib/watobo/gui/utils/save_session_settings.rb

@@ -0,0 +1,21 @@
+# .
+# save_session_settings.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
+# .

data/lib/watobo/gui/utils/session_history.rb

@@ -0,0 +1,134 @@
+# .
+# session_history.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
+
+# Watobo::Gui::History
+=begin
+    Class for managing history entries
+    entries are organised as a hash.
+    each entry consists of a hash.
+    the key of an entry is based on its session filename
+
+    @history_entry[session_file] = {
+    :last_used
+    :created
+    :project_name
+    :session_name
+    :description
+    }
+=end
+    class SessionHistory
+
+      attr_accessor :max_entries
+      def save()
+        begin
+          File.open(@history_file,"w") { |fh| fh.write YAML.dump(@history_entries) }
+        rescue => bang
+        puts bang
+        puts bang.backtrace if $DEBUG
+        end
+      end
+
+      def entries
+        @history_entries
+      end
+
+      def add_entry(prefs = {})
+        t_now = Time.now.to_i
+        return false unless prefs.has_key? :session_name or prefs.has_key? :project_name
+        puts "#"
+        hid = history_id(prefs[:project_name], prefs[:session_name])
+        @history_entries[hid] ||= {
+          :created => t_now
+        }
+        @history_entries[hid][:last_used] = t_now
+
+        [ :description, :project_name, :session_name ].each do |k|
+          @history_entries[hid][k] = prefs[k] if prefs.has_key? k
+        end
+
+        while @history_entries.length > @max_entries do
+          oid, ov = @history_entries.min_by{ |id,v| v[:last_used] }
+          @history_entries.delete oid
+        end
+
+        save()
+      end
+
+      def delete_entry(project_name, session_name)
+        @history_entries.delete history_id(project_name, session_name)
+      end
+
+      def update_usage(project_name, session_name)
+        t_now = Time.now.to_i
+        return false unless prefs.has_key? :session_name or prefs.has_key? :project_name
+        hid = history_id(prefs[:project_name], prefs[:session_name])
+        return false unless @history_entries.has_key? hid
+        @history_entries[hid][:last_used] = t_now
+        save()
+      end
+
+      def each(&b)
+        @history_entries.each_key{ |k|
+          yield @history_entries[k] if block_given?
+        }
+      end
+
+      def load(history_file)
+        if File.exist? history_file
+        @history_entries = YAML.load_file(history_file)
+        end
+      end
+
+      def initialize(filename)
+
+        @max_entries = 8
+        @history_entries = Hash.new
+        @history_file = filename
+
+        if File.exist? @history_file
+        load(@history_file)
+        else
+          begin
+            File.open(@history_file,"w") { |fh| fh.write YAML.dump(@history_entries) }
+          rescue => bang
+          puts bang
+          puts bang.backtrace if $DEBUG
+          end
+        end
+
+      end
+
+      private
+
+      def history_id(project_name, session_name)
+        text = [ project_name, session_name ].join("$")
+        return Digest::MD5.hexdigest(text)
+      end
+
+    end
+
+  end
+
+end

data/lib/watobo/gui/workspace_dialog.rb

@@ -0,0 +1,89 @@
+# .
+# workspace_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 WorkspaceDialog < FXDialogBox
+
+         attr :workspace_dir
+
+         def open_select_workspace_dir_dialog(sender, sel, ptr)
+            workspace_dir = FXFileDialog.getOpenDirectory(self, "Select Workspace Directory", @workspace_dir.value)
+            if workspace_dir != "" then
+               if File.exists?(workspace_dir) then
+                  @workspace_dir.value = workspace_dir
+                  @workspace_dir.handle(self, FXSEL(SEL_UPDATE, 0), nil)
+                  updateProjectList(@workspace_dir.value)
+               end
+            end
+         end
+
+
+         def initialize(parent, prefs)
+            # Invoke base class initialize function first
+            #  super(parent, "New Project", DECOR_TITLE|DECOR_BORDER)
+            super(parent, "Define Workspace", DECOR_ALL)
+
+            @workspace_dir = FXDataTarget.new('')
+
+            if prefs[:workspace_dir] then
+               if File.exists?(prefs[:workspace_dir]) then
+                  @workspace_dir.value = prefs[:workspace_dir]
+               end
+            end
+
+            base_frame = FXVerticalFrame.new(self, :opts => LAYOUT_FILL_X|LAYOUT_FILL_Y)
+
+            workspace_path_form = FXHorizontalFrame.new(base_frame,
+            :opts => LAYOUT_FILL_X|LAYOUT_SIDE_TOP)
+            FXLabel.new(workspace_path_form, "Workspace Directory:" )
+            @workspaceText = FXTextField.new(workspace_path_form, 60,
+            :target => @workspace_dir, :selector => FXDataTarget::ID_VALUE,
+            :opts => TEXTFIELD_NORMAL|LAYOUT_FILL_X|LAYOUT_FILL_COLUMN)
+
+            browse_button=FXButton.new(workspace_path_form, "Change")
+            browse_button.connect(SEL_COMMAND, method(:open_select_workspace_dir_dialog) )
+
+
+            #
+            # BUTTONS FRAME
+            #
+            buttons_frame = FXHorizontalFrame.new(base_frame,
+            :opts => LAYOUT_FILL_X|LAYOUT_SIDE_TOP)
+
+            @finishButton = FXButton.new(buttons_frame, "Finish" ,  nil, nil, :opts => BUTTON_NORMAL|LAYOUT_RIGHT)
+            @finishButton.disable
+            @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