module Symbiont
  module WebObjects
    
    class SelectList < WebObject
      # This method is used to return an Option object based on the index provided.
      # @return [Symbiont::WebObjects::Option]
      def [](idx)
        Object::Symbiont::WebObjects::Option.new(options[idx])
      end
      
      # This method returns an array of Option objects that are contained within
      # a select list object.
      # @return [array of Symbiont::WebObjects::Option]
      def options
        web_objects = []
        options = @web_object.wd.find_elements(:xpath, option_xpath)
        options.each do |opt|
          web_objects << Object::Symbiont::WebObjects::Option.new(opt)
        end
        web_objects
      end
      
      # Selects an option from the select list.
      def select(value)
        @web_object.select(value)
      end
      
      # Selects the option whose value attribute matches the provided string.
      def select_value(value)
        @web_object.select_value(value)
      end
      
      # This method returns an array of strings that contain the text of the
      # currently selected options in a select list.
      # @return [Array<String>]
      def selected_options
        @web_object.selected_options.map { |e| e.text }.compact
      end
      
      # This method returns an array of strings that contain the values of the
      # currently selected options in a select list.
      # @return [Array<String>]
      def selected_values
        @web_object.selected_options.map { |e| e.value }.compact
      end
      
      # This method returns true if any of the text or the lable of any option
      # that is selected matches the provided value.
      # @param [String, Regexp] value A value to check for
      # @return [Boolean]
      def selected?(value)
        @web_object.selected? value
      end
      
      # This method checks to see if the select list has one or more options
      # where the text or the label matches the provided value.
      # @param [String, Regexp] value A value to check for.
      # @return [Boolean]
      def include?(value)
        @web_object.include? value
      end
      
      protected
      
      def option_xpath
        ".//child::option"
      end
    end # class: SelectList
    
    ::Symbiont::WebObjects.class_for_tag[:select] = ::Symbiont::WebObjects::SelectList
    
  end # module: WebObjects
end # module: Symbiont