testability-driver-qt-sut-plugin 1.2.1 → 1.3.0

data/lib/testability-driver-plugins/testability-driver-qt-sut-plugin/behaviours/application.rb

@@ -47,6 +47,13 @@ module MobyBehaviour
     #
 	  module Application
 
+
+      @@__multitouch_operation = false
+
+      def multitouch_ongoing?
+        @@__multitouch_operation
+      end
+
 	    # == description
 	    # Start to track a popup that may appear on the screen. Tracking is done based on the class name of the 
 	    # widget implementing popup functionality. Base class name can also be used in case framework level 
@@ -217,17 +224,20 @@ module MobyBehaviour
 	    #
 	    #
 	    def multi_touch(&block)
-
-    		multitouch_operation( &block )
-
+        begin 
+          @@__multitouch_operation = true
+          multitouch_operation( &block )
+        ensure
+          @@__multitouch_operation = false
+        end
 	    end
 
 	    # == description
 	    # Resizes the application window so that width becomes height and vice versa.
 	    # 
       # == arguments
-	    # Symbol
-	    #  direction
+	    # direction
+	    #  Symbol
 	    #   description: For future support
 	    #
 	    # == returns
@@ -242,7 +252,7 @@ module MobyBehaviour
 	    end
 
     private
-	    
+
 	    def multitouch_operation( &block )
 
 		    # make sure the situation is ok before freeze

data/lib/testability-driver-plugins/testability-driver-qt-sut-plugin/behaviours/behaviour.rb

@@ -52,33 +52,67 @@ module MobyBehaviour
       @@_direction_map = { :Up => '0', :Down => '180', :Left => '270', :Right => '90' }
       @@_pinch_directions = { :Horizontal => '90', :Vertical => '0'}
       @@_rotate_direction = [ :Clockwise, :CounterClockwise ]
+      @@_events_enabled = false
 
       # == nodoc
       # should this method be private?
       def command_params( command = MobyCommand::WidgetCommand.new )   
 
-        if attribute( 'objectType' ) == 'Graphics' and attribute( 'visibleOnScreen' ) == 'false' and self.creation_attributes[:visibleOnScreen] != 'false'
+        if attribute( 'objectType' ) == 'Graphics' and attribute( 'visibleOnScreen' ) == 'false' and @creation_attributes[ :visibleOnScreen ] != 'false'
+
           begin
-            self.creation_attributes.merge!({'visibleOnScreen' => 'true'})
-            self.parent.child(self.creation_attributes)
+
+            #try to make the item visible if so wanted
+            fixture( 'qt', 'ensureVisible'   ) if sut_parameters[ :ensure_visible,     false ].true?
+            fixture( 'qt', 'ensureQmlVisible') if sut_parameters[ :ensure_qml_visible, false ].true?
+            
+            @creation_attributes.merge!( 'visibleOnScreen' => 'true' )
+
+            @parent.child( @creation_attributes )
+
           rescue
-            Kernel::raise MobyBase::TestObjectNotVisibleError
+
+            raise MobyBase::TestObjectNotVisibleError
+
           end
+
         end
 
-        command.set_event_type(sut_parameters[ :event_type, "0" ])
+        _object_type = attribute( 'objectType' ).intern
 
         #for components with object visible on screen but not actual widgets or graphicsitems
-        if attribute( 'objectType' ) == 'Embedded'
-          command.application_id( get_application_id )
-          command.set_object_id( parent.id )
-          command.object_type( parent.attribute( 'objectType' ).intern )
+        if _object_type == :Embedded
+
+          _object_type = @parent.attribute( 'objectType' ).intern
+
+          _object_id = @parent.id
+
         else
-          command.application_id( get_application_id )
-          command.set_object_id( @id )
-          command.object_type( attribute( 'objectType' ).intern )
+
+          _object_id = @id
+
         end
 
+        command.application_id( get_application_id )
+
+        command.set_object_id( _object_id )
+
+        command.object_type( _object_type )
+
+        command.set_event_type( sut_parameters[ :event_type, "0" ] )
+
+        # set app id as vkb if the attribute exists as the command needs to go to the vkb app
+        begin
+
+          # raises exception if value not found
+          value = attribute( 'vkb_app_id' )
+
+          command.application_id( value )
+
+        rescue MobyBase::AttributeNotFoundError
+
+        end    
+
         command
 
       end
@@ -96,6 +130,7 @@ module MobyBehaviour
         command
       end
 
+      # TODO: document me
       def do_sleep(time)
 
         time = time.to_f * 1.3
@@ -107,6 +142,7 @@ module MobyBehaviour
 
       end
 
+      # TODO: document me
       def center_x
 
         #x = attribute( 'x_absolute' ).to_i
@@ -118,6 +154,7 @@ module MobyBehaviour
 
       end
 
+      # TODO: document me
       def center_y
 
         #y = attribute( 'y_absolute' ).to_i
@@ -129,6 +166,43 @@ module MobyBehaviour
 
       end  
 
+      # TODO: document me
+      def param_set_configured?( params, key )
+
+        if params.kind_of?(Hash) && params.has_key?(key)
+
+          #( params[ key ].nil? ? sut_parameters[ key, 'false' ] : params[ key ].to_s ).to_s == "true"
+
+          ( params[ key ] || sut_parameters[ key, false ] ).true?
+
+        else
+
+          #sut_parameters[ key, 'false' ].true?
+
+          sut_parameters[ key, false ].true?
+
+        end
+      end
+
+      # TODO: document me
+      def execute_behavior( params, command )
+
+        if !get_application.multitouch_ongoing? && !@@_events_enabled && param_set_configured?( params, :ensure_event ) 
+
+          ensure_event(:retry_timeout => 5, :retry_interval => 0.5) {
+
+            @sut.execute_command( command )
+
+          }
+
+        else
+
+          @sut.execute_command( command )
+
+        end
+
+      end
+
       # enable hooking for performance measurement & debug logging
       TDriver::Hooking.hook_methods( self ) if defined?( TDriver::Hooking )
 

data/lib/testability-driver-plugins/testability-driver-qt-sut-plugin/behaviours/configure_behaviour.rb

@@ -50,7 +50,7 @@ module MobyBehaviour
 
       # == description
       # Enabled the logging on the target for the given application or sut (qttasserver). 
-      # Logs are written to the target in (\logs\testability)
+      # Logs are written to the target in (/logs/testability)
       #
       # == returns
       # NilClass

data/lib/testability-driver-plugins/testability-driver-qt-sut-plugin/behaviours/events.rb

@@ -69,17 +69,18 @@ module MobyBehaviour
       # Exception
       #  description: In case of an error
       #    
-      def enable_events(filter_array = nil)
+      def enable_events(filter_array = nil, params = {})
 
         begin
           command = plugin_command #in qt_behaviour 
           command.command_name( 'EnableEvents' )
           params_str = ''
           filter_array.each {|value| params_str << value << ','} if filter_array
-          command.command_params( 'EventsToListen' => params_str)
+          params['EventsToListen'] = params_str
+          command.command_params( params )
           command.service( 'collectEvents' ) 
           @sut.execute_command( command)
-
+          @@_events_enabled = true
         rescue Exception => e
 
           $logger.behaviour "FAIL;Failed enable_events with refresh \"#{filter_array.to_s}\".;#{ identity };enable_events;"
@@ -110,6 +111,7 @@ module MobyBehaviour
           command.command_name( 'DisableEvents' )
           command.service( 'collectEvents' )
           @sut.execute_command( command)
+          @@_events_enabled = false
         rescue Exception => e
           $logger.behaviour "FAIL;Failed disable_events.;#{ identity };disable_events;"
           Kernel::raise e 

data/lib/testability-driver-plugins/testability-driver-qt-sut-plugin/behaviours/file_transfer.rb

@@ -311,6 +311,7 @@ module MobyBehaviour
       end
 
       def read_file(source_file)
+=begin
         file_data=''
         if File.file?(source_file)
           open_file = File.open(source_file, 'r')
@@ -319,6 +320,20 @@ module MobyBehaviour
           end
         end
         return file_data.to_s
+=end
+
+        begin
+
+          # return file content as string
+          File.open( source_file, 'rb:binary' ).read
+
+        rescue
+
+          # return empty string in case of exception raised
+          ''
+
+        end
+
       end
 
 

data/lib/testability-driver-plugins/testability-driver-qt-sut-plugin/behaviours/fixture.rb

@@ -42,33 +42,32 @@ module MobyBehaviour
     # == objects
     # sut;*
     #
-	module Fixture
-
-	  include MobyBehaviour::QT::Behaviour
+	  module Fixture
 
+	    include MobyBehaviour::QT::Behaviour
 
       # == description
       # Sends a fixture call to the target. The fixture will be executed either
-	  # inside the application process or the qttasserver process (if used for sut). 
-	  # The fixture will get a pointer to the object to which this call is made to.
-	  # 
+      # inside the application process or the qttasserver process (if used for sut). 
+      # The fixture will get a pointer to the object to which this call is made to.
+      # 
       #
       # == arguments
       # fixture_name
       #  String
-      #   description: Name of the fixture. Fixture mapping is in the tdriverparameters.xml file.
+      #   description: Name of the fixture. Fixture mapping is in the tdriver_parameters.xml file.
       #   example: tasfixture
-	  #
-	  # fixture_method
-	  #  String
+      #
+      # fixture_method
+      #  String
       #   description: Name of the action to be executed in the fixture.
       #   example: callApi
-	  #    
-	  # parameters_hash
-	  #  Hash
+      #    
+      # parameters_hash
+      #  Hash
       #   description: Optional hash of pareters passed on to the fixture.
       #   example: {:name => 'John'}
-	  #
+      #
       # == returns
       # QString
       #   description: The value returned but the fixture.
@@ -78,60 +77,73 @@ module MobyBehaviour
       # ArgumentError
       #  description:  In case the given parameters are not valid.
       #    
-	  def fixture( fixture_name, fixture_method, parameters_hash = {} )
+	    def fixture( fixture_name, fixture_method, parameters_hash = {} )
+
+        # verify that arguments were given in correct format
+        fixture_name.check_type String, 'wrong argument type $1 for fixture name (expected $2)'
+
+        fixture_method.check_type String, 'wrong argument type $1 for fixture method name (expected $2)'
+
+        parameters_hash.check_type Hash, 'wrong argument type $1 for fixture parameters (expected $2)'
+
+		    result = nil
 
-		Kernel::raise ArgumentError.new("Fixture name -parameter was of wrong type: expected 'String' was '%s'" % fixture_name.class.to_s) unless fixture_name.kind_of?( String )
-		Kernel::raise ArgumentError.new("Fixture method -parameter was of wrong type: expected 'String' was '%s'" % fixture_method.class.to_s) unless fixture_method.kind_of?( String )
+		    begin
 
-		ret = nil
+          # default parameters
+		      params = { :name => fixture_name, :command_name => fixture_method, :parameters => parameters_hash, :async => false }
 
-		begin
-		  params = {:name => fixture_name, :command_name => fixture_method, :parameters => parameters_hash, :async => false}
-		  #for sut send the fixture command to qttasserver (appid nil)
-		  if self.class == MobyBase::SUT
-			params.merge!( {:application_id => nil, :object_id => @id, :object_type => :Application} )
-			ret = execute_command( MobyCommand::Fixture.new( params ) )
-		  else
-			params.merge!( {:application_id => get_application_id, :object_id => @id, :object_type => attribute( 'objectType' ).intern} )
-			ret = @sut.execute_command( MobyCommand::Fixture.new( params ) )
-		  end				  
-		rescue Exception => e
+	        # for sut send the fixture command to qttasserver (appid nil)
+          if sut?
 
-		  $logger.behaviour "FAIL;Failed when calling fixture with name #{fixture_name} method #{fixture_method} parameters #{parameters_hash.inspect}.;#{id.to_s};sut;{};fixture;"
+			      params.merge!( :application_id => nil, :object_id => @id, :object_type => :Application )
 
-		  Kernel::raise MobyBase::BehaviourError.new("Fixture", "Failed to execute fixture name #{fixture_name} method #{fixture_method}")
-		end
+          else
 
-		$logger.behaviour "PASS;The fixture command was executed successfully with name #{fixture_name} method #{fixture_method} parameters #{parameters_hash.inspect}.;#{id.to_s};sut;{};fixture;"
+			      params.merge!( :application_id => get_application_id, :object_id => @id, :object_type => attribute( 'objectType' ).to_sym )
 
-		ret
+          end
 
-	  end
+          result = @sut.execute_command( MobyCommand::Fixture.new( params ) )
+				    
+		    rescue
+
+		      $logger.behaviour "FAIL;Failed when calling fixture with name #{ fixture_name.inspect } method #{ fixture_method.inspect } parameters #{ parameters_hash.inspect }.;#{ @id.to_s };sut;{};fixture;"
+
+		      raise MobyBase::BehaviourError.new( "Fixture", "Failed to execute fixture name #{ fixture_name.inspect } method #{ fixture_method.inspect }" )
+
+		    end
+
+		    $logger.behaviour "PASS;The fixture command was executed successfully with name #{ fixture_name.inspect } method #{ fixture_method.inspect } parameters #{ parameters_hash.inspect }.;#{ @id.to_s };sut;{};fixture;"
+
+		    result
+
+	    end
 
       # == description
       # Sends a fixture call to the target. The fixture will be executed either
-	  # inside the application process or the qttasserver process (if used for sut). 
-	  # The fixture will get a pointer to the object to which this call is made to.
-	  # This version of the fixture call is asynchronous. This means that no return value
-	  # is returned.
-	  # 
+      # inside the application process or the qttasserver process (if used for sut). 
+      # The fixture will get a pointer to the object to which this call is made to.
+      # This version of the fixture call is asynchronous. This means that no return value
+      # is returned.
+      # 
       #
       # == arguments
       # fixture_name
       #  String
-      #   description: Name of the fixture. Fixture mapping is in the tdriverparameters.xml file.
+      #   description: Name of the fixture. Fixture mapping is in the tdriver_parameters.xml file
       #   example: tasfixture
-	  #
-	  # fixture_method
-	  #  String
-      #   description: Name of the action to be executed in the fixture.
+      #
+      # fixture_method
+      #  String
+      #   description: Name of the action to be executed in the fixture
       #   example: callApi
-	  #    
-	  # parameters_hash
-	  #  Hash
-      #   description: Optional hash of pareters passed on to the fixture.
+      #    
+      # parameters_hash
+      #  Hash
+      #   description: Optional hash of parameters passed on to the fixture
       #   example: {:name => 'John'}
-	  #
+      #
       # == returns
       # NilClass
       #   description: -
@@ -141,40 +153,62 @@ module MobyBehaviour
       # ArgumentError
       #  description:  In case the given parameters are not valid.
       #    
-	  def async_fixture( fixture_name, fixture_method, parameters_hash = {} )
+	    def async_fixture( fixture_name, fixture_method, parameters_hash = {} )
+
+        # verify that arguments were given in correct format
+        fixture_name.check_type String, 'wrong argument type $1 for fixture name (expected $2)'
+
+        fixture_method.check_type String, 'wrong argument type $1 for fixture method name (expected $2)'
+
+        parameters_hash.check_type Hash, 'wrong argument type $1 for fixture parameters (expected $2)'
+
+		    result = nil
+
+        begin
+
+          # default parameters
+          params = { :name => fixture_name, :command_name => fixture_method, :parameters => parameters_hash, :async => true }
+
+          # for sut send the fixture command to qttasserver (appid nil)
+          if sut?
+
+            params.merge!( :application_id => nil, :object_id => @id, :object_type => :Application )
+
+          else
+
+            params.merge!( :application_id => get_application_id, :object_id => @id, :object_type => attribute( 'objectType' ).to_sym )
+
+          end
+
+          result = @sut.execute_command( MobyCommand::Fixture.new( params ) )
+
+        rescue
+
+          $logger.behaviour "FAIL;Failed when calling async_fixture with name #{ fixture_name.inspect } method #{ fixture_method.inspect } parameters #{ parameters_hash.inspect }.;#{ @id.to_s };sut;{};fixture;"
+
+          raise MobyBase::BehaviourError.new("Fixture", "Failed to execute async_fixture name #{ fixture_name.inspect } method #{ fixture_method.inspect }")
 
-		Kernel::raise ArgumentError.new("Fixture name -parameter was of wrong type: expected 'String' was '%s'" % fixture_name.class.to_s) unless fixture_name.kind_of?( String )
-		Kernel::raise ArgumentError.new("Fixture method -parameter was of wrong type: expected 'String' was '%s'" % fixture_method.class.to_s) unless fixture_method.kind_of?( String )
+        end
 
-		ret = nil
+        $logger.behaviour "PASS;The fixture command was executed successfully with name #{ fixture_name.inspect } method #{ fixture_method.inspect } parameters #{ parameters_hash.inspect }.;#{ @id.to_s };sut;{};fixture;"
 
-		begin
-		  params = {:name => fixture_name, :command_name => fixture_method, :parameters => parameters_hash, :async => true}
-		  #for sut send the fixture command to qttasserver (appid nil)
-		  if self.class == MobyBase::SUT
-			params.merge!( {:application_id => nil, :object_id => @id, :object_type => :Application} )
-			ret = execute_command( MobyCommand::Fixture.new( params ) )
-		  else
-			params.merge!( {:application_id => get_application_id, :object_id => @id, :object_type => attribute( 'objectType' ).intern} )
-			ret = @sut.execute_command( MobyCommand::Fixture.new( params ) )
-		  end
-		rescue Exception => e
+        result
 
-		  $logger.behaviour "FAIL;Failed when calling async_fixture with name #{fixture_name} method #{fixture_method} parameters #{parameters_hash.inspect}.;#{id.to_s};sut;{};fixture;"
+	    end
 
-		  Kernel::raise MobyBase::BehaviourError.new("Fixture", "Failed to execute async_fixture name #{fixture_name} method #{fixture_method}")
-		end
+      # == nodoc
+      def fixtures
 
-		$logger.behaviour "PASS;The fixture command was executed successfully with name #{fixture_name} method #{fixture_method} parameters #{parameters_hash.inspect}.;#{id.to_s};sut;{};fixture;"
+        # pass call to fixtures service object          
+        TDriver::FixtureService.new( :target => self )
 
-		ret
+      end
 
-	  end
+	    # enable hooking for performance measurement & debug logging
+	    TDriver::Hooking.hook_methods( self ) if defined?( TDriver::Hooking )
 
-	  # enable hooking for performance measurement & debug logging
-	  TDriver::Hooking.hook_methods( self ) if defined?( TDriver::Hooking )
+	  end # Fixture
 
-	end
+  end # QT
 
-  end
-end
+end # MobyBehaviour