sambal-cle 0.1.4 → 0.1.5

data/lib/sambal-cle/data_objects/forum.rb

@@ -24,28 +24,28 @@ class ForumObject
   alias :name :title
 
   def create
-    open_my_site_by_name @site unless @browser.title=~/#{@site}/
-    forums unless @browser.title=~/Forums$/
+    open_my_site_by_name
+    forums
     on Forums do |forums|
       forums.new_forum
     end
     on EditForum do |edit|
       edit.title.set @title
-      edit.short_description.set @short_description unless @short_description==nil
+      edit.short_description.fit @short_description
       edit.enter_source_text(edit.editor, @description) unless @description==nil
       edit.save
     end
   end
     
   def edit opts={}
-    open_my_site_by_name @site unless @browser.title=~/#{@site}/
+    open_my_site_by_name @site
     forums unless @browser.title=~/Forums$/
     on Forums do |forum|
       forum.forum_settings @title
     end
     on EditForum do |edit|
-      edit.title.set opts[:title] unless opts[:title] == nil
-      edit.short_description.set opts[:short_description] unless opts[:short_description]==nil
+      edit.title.fit opts[:title]
+      edit.short_description.fit opts[:short_description]
       unless opts[:description] == nil
         edit.enter_source_text edit.editor, opts[:description]
       end
@@ -55,8 +55,8 @@ class ForumObject
   end
     
   def view
-    open_my_site_by_name @site unless @browser.title=~/#{@site}/
-    forums unless @browser.title=~/Forums$/
+    open_my_site_by_name @site
+    forums
     on Forums do |forum|
       forum.open_forum @title
     end
@@ -72,8 +72,8 @@ class ForumObject
   end
 
   def get_entity_info
-    open_my_site_by_name @site unless @browser.title=~/#{@site}/
-    forums unless @browser.title=~/Forums$/
+    open_my_site_by_name @site
+    forums
     # TODO: Something will probably be needed here, in case we're currently
     # on a Forum page already.
     on Forums do |forum|
@@ -117,15 +117,14 @@ class TopicObject
     options = defaults.merge(opts)
     
     set_options(options)
-    raise "You must define a site for your Topic" if @site==nil
-    raise "You must specify an existing Forum for your Topic" if @forum==nil
+    requires @site, @forum
   end
 
   alias :name :title
 
   def create
-    open_my_site_by_name @site unless @browser.title=~/#{@site}/
-    forums unless @browser.title=~/Forums$/
+    open_my_site_by_name @site
+    forums
     on Forums do |forums|
       forums.new_topic_for_forum @forum
     end
@@ -138,15 +137,15 @@ class TopicObject
   end
 
   def edit opts={}
-    open_my_site_by_name @site unless @browser.title=~/#{@site}/
-    forums unless @browser.title=~/Forums$/
+    open_my_site_by_name @site
+    forums
     on Forums do |forum|
       reset
       forum.topic_settings @title
     end
     on AddEditTopic do |edit|
-      edit.title.set opts[:title] unless opts[:title] == nil
-      edit.short_description.set opts[:short_description] unless opts[:short_description]==nil
+      edit.title.fit opts[:title]
+      edit.short_description.fit opts[:short_description]
       unless opts[:description] == nil
         edit.enter_source_text edit.editor, opts[:description]
       end
@@ -156,8 +155,8 @@ class TopicObject
   end
     
   def view
-    open_my_site_by_name @site unless @browser.title=~/#{@site}/
-    forums unless @browser.title=~/Forums$/
+    open_my_site_by_name @site
+    forums
     on Forums do |forum|
       reset
       forum.open_topic @title
@@ -174,8 +173,8 @@ class TopicObject
   end
 
   def get_entity_info
-    open_my_site_by_name @site unless @browser.title=~/#{@site}/
-    forums unless @browser.title=~/Forums$/
+    open_my_site_by_name @site
+    forums
     on Forums do |forums|
       forums.topic_settings @title
     end

data/lib/sambal-cle/data_objects/glossary_term.rb

@@ -0,0 +1,71 @@
+class GlossaryTermObject
+
+  include Foundry
+  include DataFactory
+  include StringFactory
+  include Workflows
+  
+  attr_accessor :term, :short_description, :long_description, :portfolio
+  
+  def initialize(browser, opts={})
+    @browser = browser
+    
+    defaults = {
+      :term=>random_alphanums,
+      :short_description=>random_alphanums,
+      :long_description=>random_alphanums
+    }
+    options = defaults.merge(opts)
+    
+    set_options(options)
+    requires @portfolio
+  end
+    
+  def create
+    open_my_site_by_name @portfolio
+    glossary
+    on Glossary do |list|
+      list.add
+    end
+    on AddEditTerm do |term|
+      term.term.set @term
+      term.short_description.set @short_description
+      term.long_description=@long_description
+      term.add_term
+    end
+  end
+    
+  def edit opts={}
+    open_my_site_by_name @portfolio
+    glossary
+    on Glossary do |list|
+      list.edit @term
+    end
+    on AddEditTerm do |term|
+      term.term.fit opts[:term]
+      term.short_description.fit opts[:short_description]
+      term.long_description=opts[:long_description] unless opts[:long_description]==nil
+      term.save_changes
+    end
+    set_options(opts)
+  end
+    
+  def open
+    open_my_site_by_name @portfolio
+    glossary
+    on Glossary do |list|
+      list.open @term
+    end
+  end
+    
+  def delete
+    open_my_site_by_name @portfolio
+    glossary
+    on Glossary do |list|
+      list.delete @term
+    end
+  end
+  
+end
+    
+      

data/lib/sambal-cle/data_objects/lesson.rb

@@ -21,8 +21,8 @@ class ModuleObject
   alias :name :title
 
   def create
-    open_my_site_by_name @site unless @browser.title=~/#{@site}/
-    lessons unless @browser.title=~/Lessons$/
+    open_my_site_by_name @site
+    lessons
     reset
     on_page Lessons do |page|
       page.add_module
@@ -74,8 +74,8 @@ class ContentSectionObject
   alias :name :title
 
   def create
-    open_my_site_by_name @site unless @browser.title=~/#{@site}/
-    lessons unless @browser.title=~/Lessons$/
+    open_my_site_by_name @site
+    lessons
     reset
     on_page Lessons do |page|
       page.open_lesson @module
@@ -89,12 +89,13 @@ class ContentSectionObject
       @modality.each do |content|
         page.send(content)
       end
-      page.content_type.select @content_type unless @content_type==nil
+      page.content_type.fit @content_type
     end
 
     on AddEditContentSection do |page| # Note we are reinstantiating the class here because of
                                        # an issue with Selenium Webdriver throwing a
                                        # WeakReference error, given the partial page reload.
+                                       # TODO: Figure out if there's a better solution for this
       case @content_type
         when "Compose content with editor"
           page.enter_source_text page.content_editor, @editor_content
@@ -135,16 +136,16 @@ class ContentSectionObject
   end
 
   def edit opts={}
-    open_my_site_by_name @site unless @browser.title=~/#{@site}/
-    lessons unless @browser.title=~/Lessons$/
+    open_my_site_by_name @site
+    lessons
     reset
     on Lessons do |list|
       list.check_section @title
       list.edit
     end
     on AddEditContentSection do |edit|
-      edit.title.set opts[:title] unless opts[:title]==nil
-      edit.instructions.set opts[:instructions] unless opts[:instructions]==nil
+      edit.title.fit opts[:title]
+      edit.instructions.fit opts[:instructions]
       if opts[:modality].class==Array
         opts[:modality].each do |item|
           edit.send(item)

data/lib/sambal-cle/data_objects/matrix.rb

@@ -0,0 +1,142 @@
+class MatrixObject
+
+  include Foundry
+  include DataFactory
+  include StringFactory
+  include Workflows
+  
+  attr_accessor :portfolio, :title, :description, :columns, :rows, :status, :cells
+  
+  def initialize(browser, opts={})
+    @browser = browser
+    
+    defaults = {
+      :title=>random_alphanums,
+      :description=>random_alphanums,
+      :columns=>[
+          {:name=>random_alphanums, :bg_color=>random_hex_color, :font_color=>random_hex_color},
+          {:name=>random_alphanums, :bg_color=>random_hex_color, :font_color=>random_hex_color},
+          {:name=>random_alphanums, :bg_color=>random_hex_color, :font_color=>random_hex_color}
+      ],
+      :rows=>[
+          {:name=>random_alphanums, :bg_color=>random_hex_color, :font_color=>random_hex_color},
+          {:name=>random_alphanums, :bg_color=>random_hex_color, :font_color=>random_hex_color},
+          {:name=>random_alphanums, :bg_color=>random_hex_color, :font_color=>random_hex_color}
+      ],
+      :cells=>[]
+    }
+    options = defaults.merge(opts)
+    set_options(options)
+    requires @portfolio
+
+  end
+    
+  def create
+    open_my_site_by_name @portfolio
+    matrices
+    on Matrices do |list|
+      list.add
+    end
+    on AddEditMatrix do |add|
+      add.title.set @title
+
+      # TODO Add filling in the non-essential fields.
+
+    end
+    @columns.each do |column|
+      on AddEditMatrix do |add|
+        add.add_column
+      end
+      on AddEditColumn do |add|
+        add.name.set column[:name]
+        add.background_color.set column[:bg_color]
+        add.font_color.set column[:font_color]
+        add.update
+      end
+    end
+    @rows.each do |row|
+      on AddEditMatrix do |add|
+        add.add_row
+      end
+      on AddEditRow do |add|
+        add.name.set row[:name]
+        add.background_color.set row[:bg_color]
+        add.font_color.set row[:font_color]
+        add.update
+      end
+    end
+    on AddEditMatrix do |add|
+      add.save_changes
+    end
+    on EditMatrixCells do |matrix|
+      matrix.return_to_list
+    end
+  end
+    
+  def edit opts={}
+    
+    set_options(opts)
+  end
+    
+  def view
+    
+  end
+    
+  def delete
+    
+  end
+
+  def publish
+
+  end
+
+  def export
+
+  end
+
+end
+    
+class CellObject
+
+  include Foundry
+  include DataFactory
+  include StringFactory
+  include Workflows
+  
+  attr_accessor :title, :instructions, :rationale, :examples, :matrix, :row, :column, :id
+  
+  def initialize(browser, opts={})
+    @browser = browser
+    
+    defaults = {
+      :title=>random_alphanums,
+      :instructions=>random_alphanums,
+      :rationale=>random_alphanums,
+      :examples=>random_alphanums
+    }
+    options = defaults.merge(opts)
+    
+    set_options(options)
+    requires @matrix, @row, @column
+  end
+    
+  def create
+    #:id=>cell.html[/(?<=hrefViewCell\(\').+(?=')/]
+  end
+    
+  def edit opts={}
+    
+    set_options(opts)
+  end
+    
+  def view
+    
+  end
+    
+  def delete
+    
+  end
+  
+end
+    
+            

data/lib/sambal-cle/data_objects/message.rb

@@ -21,8 +21,8 @@ class MessageObject
   end
 
   def create
-    open_my_site_by_name @site unless @browser.title=~/#{@site}/
-    messages unless @browser.title=~/Messages$/
+    open_my_site_by_name @site
+    messages
   end
 
   alias compose create

data/lib/sambal-cle/data_objects/poll.rb

@@ -22,8 +22,8 @@ class PollObject
   end
     
   def create
-    open_my_site_by_name @site unless @browser.title=~/#{@site}/
-    polls unless @browser.title=~/Polls$/
+    open_my_site_by_name @site
+    polls
     on Polls do |polls|
       polls.add
     end

data/lib/sambal-cle/data_objects/portfolio.rb

@@ -0,0 +1,120 @@
+class PortfolioSiteObject
+
+  include Foundry
+  include DataFactory
+  include DateFactory
+  include StringFactory
+  include Workflows
+  
+  attr_accessor :title, :description, :short_description, :contact_email, :site_email,
+                :site_contact_name, :access, :default_role, :creator, :status,
+                :creation_date, :id, :participants
+  
+  def initialize(browser, opts={})
+    @browser = browser
+    
+    defaults = {
+      :title=>random_alphanums,
+      :site_email=>random_nicelink(32),
+      :participants=>{}
+    }
+    options = defaults.merge(opts)
+    
+    set_options(options)
+    requires @title
+  end
+    
+  def create
+    my_workspace
+    site_setup
+    on_page SiteSetup do |page|
+      page.new
+    end
+    on SiteType do |page|
+      # Select the Portfolio Site radio button
+      page.portfolio_site.set
+      page.continue
+    end
+    on PortfolioSiteInfo do |info|
+      info.title.set @title
+      info.description=@description unless @description==nil
+      info.short_description.fit @short_description
+      #TODO Add support for other fields here
+      info.continue
+    end
+    on PortfolioSiteTools do |tools|
+      # TODO Add support for individual tool selection and reuse of material from other sites
+      tools.all_tools.set
+      tools.continue
+    end
+    on PortfolioConfigureToolOptions do |options|
+      options.email.set @site_email
+      # TODO Add support for other fields here
+      options.continue
+    end
+    on SiteAccess do |access|
+      # TODO Support non-default selections here
+      access.continue
+    end
+    on ConfirmSiteSetup do |confirm|
+      if confirm.request_button.present?
+        confirm.request_site
+      else
+        confirm.create_site
+      end
+    end
+    # TODO: Add definition of @participants variable here
+    # Create a string that will match the new Site's "creation date" string
+    @creation_date = right_now[:sakai]
+
+    on SiteSetup do |site_setup|
+      site_setup.search(Regexp.escape(@title))
+
+      # Get the site id for storage
+      @browser.frame(:class=>"portletMainIframe").link(:href=>/xsl-portal.site/, :index=>0).href =~ /(?<=\/site\/).+/
+      @id = $~.to_s
+    end
+  end
+    
+  def edit opts={}
+    
+    set_options(opts)
+  end
+    
+  def view
+    
+  end
+    
+  def delete
+    
+  end
+
+  def add_official_participants(role, *participants)
+    list_of_ids=participants.join("\n")
+    open_my_site_by_name @title
+    site_editor
+    on SiteEditor do |site|
+      site.add_participants
+    end
+    on SiteSetupAddParticipants do |add|
+      add.official_participants.set list_of_ids
+      add.continue
+    end
+    on SiteSetupChooseRole do |choose|
+      choose.radio_button(role).set
+      choose.continue
+    end
+    on SiteSetupParticipantEmail do |send|
+      send.continue
+    end
+    on SiteSetupParticipantConfirm do |confirm|
+      confirm.finish
+    end
+    if @participants.has_key?(role)
+      @participants[role].insert(-1, participants).flatten!
+    else
+      @participants.store(role, participants)
+    end
+  end
+
+end