RDI 0.1.0.20091020

data/lib/rdi/Plugins/Views/SimpleWxGUI/LocationSelectors/Directory.desc.rb

@@ -0,0 +1,13 @@
+#--
+# Copyright (c) 2009 Muriel Salvan (murielsalvan@users.sourceforge.net)
+# Licensed under the terms specified in LICENSE file. No warranty is provided.
+#++
+
+require 'rdi/Plugins/WxRubyDepDesc'
+
+{
+  :Dependencies => [
+    # WxRuby
+    ::RDI::getWxRubyDepDesc
+  ]
+}

data/lib/rdi/Plugins/Views/SimpleWxGUI/LocationSelectors/Directory.rb

@@ -0,0 +1,45 @@
+#--
+# Copyright (c) 2009 Muriel Salvan (murielsalvan@users.sourceforge.net)
+# Licensed under the terms specified in LICENSE file. No warranty is provided.
+#++
+
+require 'rdi/Model/LocationSelector'
+
+module RDI
+
+  module Views
+
+    module LocationSelectors
+
+      module SimpleWxGUI
+
+        class Directory < RDI::Model::LocationSelector
+
+          # Give user the choice of a new location
+          #
+          # Return:
+          # * _Object_: A location, or nil if none selected
+          def getNewLocation
+            rLocation = nil
+
+            require 'rdi/Plugins/WxCommon'
+            RDI::Views::RDIWx.ensureWxApp do
+              showModal(Wx::DirDialog, nil) do |iModalResult, iDialog|
+                if (iModalResult == Wx::ID_OK)
+                  rLocation = iDialog.path
+                end
+              end
+            end
+
+            return rLocation
+          end
+
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/lib/rdi/Plugins/Views/SimpleWxGUI.desc.rb

@@ -0,0 +1,13 @@
+#--
+# Copyright (c) 2009 Muriel Salvan (murielsalvan@users.sourceforge.net)
+# Licensed under the terms specified in LICENSE file. No warranty is provided.
+#++
+
+require 'rdi/Plugins/WxRubyDepDesc'
+
+{
+  :Dependencies => [
+    # WxRuby
+    ::RDI::getWxRubyDepDesc
+  ]
+}

data/lib/rdi/Plugins/Views/SimpleWxGUI.rb

@@ -0,0 +1,60 @@
+#--
+# Copyright (c) 2009 Muriel Salvan (murielsalvan@users.sourceforge.net)
+# Licensed under the terms specified in LICENSE file. No warranty is provided.
+#++
+
+require 'rdi/Model/View'
+
+module RDI
+
+  module Views
+
+    class SimpleWxGUI < RDI::Model::View
+
+      # Ask the user about missing dependencies.
+      # This method will use a user interface to know what to do with missing dependencies.
+      # For each dependency, choices are:
+      # * Install it
+      # * Ignore it
+      # * Change the context to find it (select directory...)
+      #
+      # Parameters:
+      # * *ioInstaller* (_Installer_): The RDI installer
+      # * *iMissingDependencies* (<em>list<DependencyDescription></em>): The missing dependencies list
+      # Return:
+      # * <em>list<DependencyUserChoice></em>: The corresponding user choices
+      def execute(ioInstaller, iMissingDependencies)
+        # List of corresponding dependencies user choices
+        # list< DependencyUserChoice >
+        rDependenciesUserChoices = []
+
+        # Initialize the list
+        iMissingDependencies.each do |iDepDesc|
+          rDependenciesUserChoices << RDI::Model::DependencyUserChoice.new(ioInstaller, 'SimpleWxGUI', iDepDesc)
+        end
+        # Display the dialog
+        require 'rdi/Plugins/Views/SimpleWxGUI/DependenciesLoaderDialog'
+        if (defined?(showModal) == nil)
+          require 'RUtilAnts/GUI'
+          RUtilAnts::GUI.initializeGUI
+        end
+        if (defined?($rUtilAnts_URLCache) == nil)
+          require 'RUtilAnts/URLCache'
+          RUtilAnts::URLCache.initializeURLCache
+        end
+        # If an application is already running, use it
+        require 'rdi/Plugins/WxCommon'
+        RDI::Views::RDIWx.ensureWxApp do
+          showModal(DependenciesLoaderDialog, nil, ioInstaller, rDependenciesUserChoices) do |iModalResult, iDialog|
+            # Nothing to do
+          end
+        end
+
+        return rDependenciesUserChoices
+      end
+
+    end
+
+  end
+
+end

data/lib/rdi/Plugins/Views/Text/LocationSelectors/Directory.rb

@@ -0,0 +1,44 @@
+#--
+# Copyright (c) 2009 Muriel Salvan (murielsalvan@users.sourceforge.net)
+# Licensed under the terms specified in LICENSE file. No warranty is provided.
+#++
+
+require 'rdi/Model/LocationSelector'
+
+module RDI
+
+  module Views
+
+    module LocationSelectors
+
+      module Text
+
+        class Directory < RDI::Model::LocationSelector
+
+          # Give user the choice of a new location
+          #
+          # Return:
+          # * _Object_: A location, or nil if none selected
+          def getNewLocation
+            rLocation = nil
+
+            puts 'Please enter a directory name (Ctrl-C to cancel):'
+            $stdout.write('-Directory-> ')
+            begin
+              rLocation = $stdin.gets.chomp
+            rescue Exception
+              rLocation = nil
+            end
+
+            return rLocation
+          end
+
+        end
+
+      end
+
+    end
+
+  end
+
+end

data/lib/rdi/Plugins/Views/Text.rb

@@ -0,0 +1,257 @@
+#--
+# Copyright (c) 2009 Muriel Salvan (murielsalvan@users.sourceforge.net)
+# Licensed under the terms specified in LICENSE file. No warranty is provided.
+#++
+
+require 'rdi/Model/View'
+
+module RDI
+
+  module Views
+
+    class Text < RDI::Model::View
+
+      # Ask the user about missing dependencies.
+      # This method will use a user interface to know what to do with missing dependencies.
+      # For each dependency, choices are:
+      # * Install it
+      # * Ignore it
+      # * Change the context to find it (select directory...)
+      #
+      # Parameters:
+      # * *ioInstaller* (_Installer_): The RDI installer
+      # * *iMissingDependencies* (<em>list<DependencyDescription></em>): The missing dependencies list
+      # Return:
+      # * <em>list<DependencyUserChoice></em>: The corresponding user choices
+      def execute(ioInstaller, iMissingDependencies)
+        # List of corresponding dependencies user choices
+        # list< DependencyUserChoice >
+        rDependenciesUserChoices = []
+
+        # Fill it from the beginning
+        iMissingDependencies.each do |iDepDesc|
+          rDependenciesUserChoices << RDI::Model::DependencyUserChoice.new(ioInstaller, 'Text', iDepDesc)
+        end
+        # Start looping unless user validates its choices
+        lExit = false
+        while (!lExit)
+          display(ioInstaller, iMissingDependencies, rDependenciesUserChoices)
+          # Wait for input
+          $stdout.write('Please enter choice number -> ')
+          lUserChoiceText = $stdin.gets
+          # Parse user choice
+          lInvalid = false
+          # Check that we have an array of integers not 0
+          lUserChoice = lUserChoiceText.chomp('.').chomp.split('.').map do |iElem|
+            lInt = iElem.to_i
+            if (lInt == 0)
+              lInvalid = true
+            end
+            next lInt
+          end
+          if (!lInvalid)
+            # Check that each value does not exceed maximal value
+            if ((lUserChoice.empty?) or
+                (lUserChoice[0] > iMissingDependencies.size + 1))
+              lInvalid = true
+            elsif (lUserChoice[0] == iMissingDependencies.size + 1)
+              if (lUserChoice.size == 1)
+                # We want to apply those choices
+                lExit = true
+              else
+                lInvalid = true
+              end
+            else
+              # A given dependency has been selected
+              lDepDesc = iMissingDependencies[lUserChoice[0]-1]
+              lDepUserChoice = rDependenciesUserChoices[lUserChoice[0]-1]
+              case lUserChoice[1]
+              when 1
+                # Ask to modify the context somewhere
+                if (lUserChoice.size == 2)
+                  # Just select that we locate it
+                  lDepUserChoice.setLocate
+                else
+                  # We try to use a given ContextModifier
+                  if (lUserChoice.size == 3)
+                    if (lUserChoice[2] > lDepUserChoice.AffectingContextModifiers.size)
+                      lInvalid = true
+                    else
+                      # Select a new location for the given context modifier
+                      lDepUserChoice.affectContextModifier(lDepUserChoice.AffectingContextModifiers[lUserChoice[2]-1])
+                    end
+                  else
+                    lInvalid = true
+                  end
+                end
+              when 2
+                # Ask to ignore the dependency
+                if (lUserChoice.size == 2)
+                  lDepUserChoice.setIgnore
+                else
+                  lInvalid = true
+                end
+              when 3
+                # Ask to install the dependency
+                if (lUserChoice.size == 4)
+                  if (lUserChoice[2] > lDepDesc.Installers.size)
+                    lInvalid = true
+                  else
+                    lInstallerName, lInstallerContent, lContextModifiers = lDepDesc.Installers[lUserChoice[2]-1]
+                    # Access the possible destinations
+                    ioInstaller.accessPlugin('Installers', lInstallerName) do |ioPlugin|
+                      if (lUserChoice[3] > ioPlugin.PossibleDestinations.size)
+                        lInvalid = true
+                      else
+                        lDepUserChoice.setInstaller(lUserChoice[2]-1, lUserChoice[3]-1)
+                        # Check if it is a DEST_OTHER flavour
+                        if (ioPlugin.PossibleDestinations[lUserChoice[3]-1][0] == DEST_OTHER)
+                          # Replace the other location of this dependency
+                          if (!lDepUserChoice.selectOtherInstallLocation(ioPlugin.PossibleDestinations[lUserChoice[3]-1][1]))
+                            lDepUserChoice.setInstaller(lUserChoice[2]-1, 0)
+                          end
+                        end
+                      end
+                    end
+                  end
+                else
+                  lInvalid = true
+                end
+              else
+                lInvalid = true
+              end
+            end
+          end
+          # Now either store the last selection
+          if (lInvalid)
+            puts "Invalid selection. Please type the selection correctly (i.e. 1.3.2)"
+          end
+        end
+
+        return rDependenciesUserChoices
+      end
+
+      private
+
+      # Display the current state
+      #
+      # Parameters:
+      # * *ioInstaller* (_Installer_): The RDI installer
+      # * *iMissingDependencies* (<em>list<DependencyDescription></em>): The missing dependencies list
+      # * *iDepsUserChoices* (<em>list<DependencyUserChoice></em>): The corresponding user choices
+      def display(ioInstaller, iMissingDependencies, iDepsUserChoices)
+        lIdxMissingDeps = 1
+        iMissingDependencies.each do |iDepDesc|
+          lDepID = iDepDesc.ID
+          # Get the dependency info
+          lDepUserChoice = iDepsUserChoices[lIdxMissingDeps-1]
+          # Check the state of this dependency
+          lStateText = ''
+          lLocateChoice = ' '
+          lIgnoreChoice = ' '
+          lInstallChoice = ' '
+          if (lDepUserChoice.Locate)
+            # To be located
+            lLocateChoice = '*'
+            # Check if the Testers are all resolved
+            if (lDepUserChoice.ResolvedTesters.size == iDepDesc.Testers.size)
+              lStateText = 'Found'
+            else
+              lStateText = 'Locate incomplete'
+            end
+          elsif (lDepUserChoice.Ignore)
+            # To be ignored
+            lIgnoreChoice = '*'
+            lStateText = 'Ignore'
+          else
+            # To be installed
+            lInstallChoice = '*'
+            lStateText = 'Install'
+          end
+          # Display title
+          puts "#{lIdxMissingDeps}. [ #{lStateText} ] #{lDepID}"
+          puts ''
+          # Display the "Locate it" choice
+          puts "  #{lIdxMissingDeps}.1. (#{lLocateChoice}) Locate it"
+          lIdxTester = 0
+          iDepDesc.Testers.each do |iTesterInfo|
+            iTesterName, iTesterContent = iTesterInfo
+            # Check the state of this tester
+            lTesterText = nil
+            if (lDepUserChoice.ResolvedTesters.has_key?(lIdxTester))
+              lTesterText = 'Found'
+            else
+              lTesterText = 'Missing'
+            end
+            puts "        [ #{lTesterText} ] #{iTesterName} - #{iTesterContent}"
+            lIdxTester += 1
+          end
+          # Display the choices for location
+          lIdxACM = 1
+          lDepUserChoice.AffectingContextModifiers.each do |iCMName|
+            puts "    #{lIdxMissingDeps}.1.#{lIdxACM}. Add location to #{iCMName}"
+            lIdxACM += 1
+          end
+          puts ''
+          # Display the "Ignore it" choice
+          puts "  #{lIdxMissingDeps}.2. (#{lIgnoreChoice}) Ignore it"
+          puts ''
+          # Display the "Install it" choice
+          puts "  #{lIdxMissingDeps}.3. (#{lInstallChoice}) Install it"
+          lIdxInstaller = 1
+          iDepDesc.Installers.each do |iInstallerInfo|
+            iInstallerName, iInstallerContent, iContextModifiers = iInstallerInfo
+            lInstallSelectionText = ' '
+            if (lDepUserChoice.IdxInstaller == lIdxInstaller-1)
+              lInstallSelectionText = '*'
+            end
+            puts "    #{lIdxMissingDeps}.3.#{lIdxInstaller}. (#{lInstallSelectionText}) #{iInstallerName} - #{iInstallerContent}"
+            puts '               Install in:'
+            ioInstaller.accessPlugin('Installers', iInstallerName) do |iPlugin|
+              lIdxDest = 1
+              iPlugin.PossibleDestinations.each do |iDestInfo|
+                iDestFlavour, iDestLocation = iDestInfo
+                lFlavourText = nil
+                lDestLocation = iDestLocation
+                case iDestFlavour
+                when DEST_LOCAL
+                  lFlavourText = 'Local'
+                when DEST_SYSTEM
+                  lFlavourText = 'System'
+                when DEST_USER
+                  lFlavourText = 'User'
+                when DEST_TEMP
+                  lFlavourText = 'Temporary'
+                when DEST_OTHER
+                  lFlavourText = 'Other'
+                  if (lDepUserChoice.IdxInstaller == lIdxInstaller-1)
+                    lDestLocation = lDepUserChoice.OtherLocation
+                  else
+                    lDestLocation = 'Choose'
+                  end
+                else
+                  logBug "Unknown flavour ID: #{iDestFlavour}"
+                  lFlavourText = 'Unknown'
+                end
+                lInstallLocationSelectionText = ' '
+                if (lDepUserChoice.IdxDestination == lIdxDest-1)
+                  lInstallLocationSelectionText = '*'
+                end
+                puts "      #{lIdxMissingDeps}.3.#{lIdxInstaller}.#{lIdxDest}. (#{lInstallLocationSelectionText}) #{lFlavourText} - #{lDestLocation}"
+                lIdxDest += 1
+              end
+            end
+            lIdxInstaller += 1
+          end
+          puts ''
+          lIdxMissingDeps += 1
+        end
+        # Display the apply choice
+        puts "#{lIdxMissingDeps}. Apply."
+      end
+
+    end
+
+  end
+
+end

data/lib/rdi/Plugins/WxCommon.rb

@@ -0,0 +1,69 @@
+#--
+# Copyright (c) 2009 Muriel Salvan (murielsalvan@users.sourceforge.net)
+# Licensed under the terms specified in LICENSE file. No warranty is provided.
+#++
+
+require 'wx'
+
+module RDI
+
+  module Views
+
+    module RDIWx
+
+      # Dummy Class that executes code in a Wx application context
+      # This is used only if there is no already an existing application
+      class DummyApp < Wx::App
+
+        # Constructor
+        #
+        # Parameters:
+        # * *iCodeBlock* (_Proc_): The code to call
+        def initialize(iCodeBlock)
+          super()
+          @CodeBlock = iCodeBlock
+        end
+
+        # Initialize the application
+        def on_init
+          @CodeBlock.call
+          return false
+        end
+
+      end
+
+      # Get the main Ex application, or nil if none
+      #
+      # Return:
+      # * <em>Wx::App</em>: The application
+      def self.getWxMainApp
+        rApp = nil
+
+        begin
+          rApp = Wx.get_app
+        rescue Exception
+          rApp = nil
+        end
+
+        return rApp
+      end
+
+      # Ensure that some given code is run in a Wx::App context
+      #
+      # Parameters:
+      # * _CodeBlock_: To execute in the Wx::App context
+      def self.ensureWxApp(&iCodeBlock)
+        if (self.getWxMainApp != nil)
+          # We are already running
+          iCodeBlock.call
+        else
+          # Call the dummy application
+          DummyApp.new(iCodeBlock).main_loop
+        end
+      end
+
+    end
+
+  end
+
+end

data/lib/rdi/Plugins/WxRubyDepDesc.rb

@@ -0,0 +1,36 @@
+#--
+# Copyright (c) 2009 Muriel Salvan (murielsalvan@users.sourceforge.net)
+# Licensed under the terms specified in LICENSE file. No warranty is provided.
+#++
+
+module RDI
+
+  # Give the description of the RubyGems dependency
+  # It has been put in this singular file because it is required by many different plugins
+  #
+  # Return:
+  # * <em>map<Symbol,Object></em>: The description
+  def self.getWxRubyDepDesc
+    return RDI::Model::DependencyDescription.new('WxRuby 2.0.0').addDescription( {
+      :Testers => [
+        {
+          :Type => 'RubyRequires',
+          :Content => [ 'wx' ]
+        }
+      ],
+      :Installers => [
+        {
+          :Type => 'Gem',
+          :Content => 'wxruby',
+          :ContextModifiers => [
+            {
+              :Type => 'GemPath',
+              :Content => '%INSTALLDIR%'
+            }
+          ]
+        }
+      ]
+    } )
+  end
+
+end

data/lib/rdi/rdi.rb

@@ -0,0 +1,8 @@
+#--
+# Copyright (c) 2009 Muriel Salvan (murielsalvan@users.sourceforge.net)
+# Licensed under the terms specified in LICENSE file. No warranty is provided.
+#++
+
+require 'rdi/Model/DependencyDescription'
+require 'rdi/Model/DependencyUserChoice'
+require 'rdi/Installer'