sakai-cle-test-api 0.0.7 → 0.0.9

data/lib/sakai-cle-test-api/data_objects/assessment.rb

@@ -0,0 +1,32 @@
+class AssessmentObject
+
+  include PageObject
+  include Utilities
+  include ToolsMenu
+
+  attr_accessor :title, :site
+
+  def initialize(browser, opts={})
+    @browser = browser
+
+    defaults = {
+      :title=>random_alphanums,
+      :site=>"placeholder"
+    }
+    options = defaults.merge(opts)
+    @title=options[:title]
+    @site=options[:site]
+    raise "You must specify a Site for your Assessment" if @site==nil
+  end
+
+  def create
+    my_workspace.open_my_site_by_name @site unless @browser.title=~/#{@site}/
+    tests_and_quizzes unless @browser.title=~/Tests & Quizzes$/
+    on_page AssessmentsList do |page|
+      page.title=@title
+      page.create
+    end
+    # Do more here eventually...
+  end
+
+end

data/lib/sakai-cle-test-api/data_objects/assignment.rb

@@ -0,0 +1,62 @@
+class AssignmentObject
+
+  include PageObject
+  include Utilities
+  include ToolsMenu
+
+  attr_accessor :title, :site, :instructions, :id, :link
+
+  def initialize(browser, opts={})
+    @browser = browser
+
+    defaults = {
+        :title=>random_alphanums,
+        :instructions=>random_multiline(500, 10, :string),
+        :site=>"placeholder"
+
+    }
+    options = defaults.merge(opts)
+
+    @title=options[:title]
+    @instructions=options[:instructions]
+    @site=options[:site]
+    raise "You must specify a Site for your Assignment" if @site==nil
+  end
+
+  def create
+    open_my_site_by_name @site unless @browser.title=~/#{@site}/
+
+    # Go to assignments page
+    assignments unless @browser.title=~/Assignments$/
+    on_page AssignmentsList do |page|
+      page.add
+    end
+    on_page AssignmentAdd do |add|
+      add.title=@title
+      add.instructions=@instructions
+      add.post
+    end
+    on_page AssignmentsList do |list|
+      @id = list.get_assignment_id @title
+      @link = list.assignment_href @title
+    end
+  end
+
+  def edit opts={}
+    open_my_site_by_name @site unless @browser.title=~/#{@site}/
+    assignments unless @browser.title=~/Assignments$/
+    list = AssignmentsList.new @browser
+    edit = list.edit_assignment @title
+    edit.title=opts[:title] unless opts[:title] == nil
+    unless opts[:instructions] == nil
+      edit.source(edit.editor)
+      edit.source=opts[:instructions]
+    end
+    edit.post
+
+    @title=opts[:title] unless opts[:title] == nil
+    @instructions=opts[:instructions] unless opts[:instructions] == nil
+
+  end
+
+end

data/lib/sakai-cle-test-api/data_objects/event.rb

@@ -0,0 +1,86 @@
+class EventObject
+
+  include PageObject
+  include Utilities
+  include ToolsMenu
+
+  attr_accessor :title, :month, :day, :year, :start_hour, :start_minute,
+                :start_meridian, :duration_hours, :duration_minutes, :end_hour,
+                :end_minute, :end_meridian, :message, :site, :link
+
+  def initialize(browser, opts={})
+    @browser = browser
+
+    defaults = {
+        :title=>random_alphanums,
+        :month=>in_15_minutes[:month_str],
+        :day=>in_15_minutes[:day],
+        :year=>in_15_minutes[:year],
+        :start_hour=>in_15_minutes[:hour],
+        :start_minute=>in_15_minutes[:minute],
+        :start_meridian=>in_15_minutes[:meridian],
+        :duration_hours=>nil,
+        :duration_minutes=>nil,
+        :end_hour=>nil,
+        :end_minute=>nil,
+        :end_meridian=>nil,
+        :message=>random_multiline(400,20, :alpha),
+        :site=>"placeholder"
+    }
+    options = defaults.merge(opts)
+
+    @title=options[:title]
+    @month=options[:month]
+    @day=options[:day]
+    @year=options[:year]
+    @start_hour=options[:start_hour]
+    @start_minute=options[:start_minute]
+    @start_meridian=options[:start_meridian]
+    @duration_hours=options[:duration_hours]
+    @duration_minutes=options[:duration_minutes]
+    @end_hour=options[:end_hour]
+    @end_minute=options[:end_minute]
+    @end_meridian=options[:end_meridian]
+    @message=options[:message]
+    @site=options[:site]
+
+  end
+
+  def create
+    open_my_site_by_name @site unless @browser.title=~/#{@site}/
+    calendar unless @browser.title=~/Calendar$/
+    cal = Calendar.new @browser
+    add_event = cal.add
+    add_event.message=@message
+    add_event.title=@title
+    add_event.month=@month
+    add_event.day=@day
+    add_event.year=@year
+    add_event.start_hour=@start_hour
+    add_event.start_minute=@start_minute
+    add_event.start_meridian=@start_meridian
+    if @end_hour == nil && @duration_hours == nil
+      @duration_hours = add_event.hours
+      @duration_minutes = add_event.minutes
+      @end_hour = add_event.end_hour
+      @end_minute = add_event.end_minute
+      @end_meridian = add_event.end_meridian
+    elsif @end_hour == nil
+      add_event.hours=@duration_hours
+      add_event.minutes=@duration_minutes
+      @end_hour = add_event.end_hour
+      @end_minute = add_event.end_minute
+      @end_meridian = add_event.end_meridian
+    elsif @duration_hours == nil
+
+    else
+
+    end
+
+    cal = add_event.save_event
+
+    @link = cal.event_href @title
+
+  end
+
+end

data/lib/sakai-cle-test-api/data_objects/lesson.rb

@@ -0,0 +1,137 @@
+class ModuleObject
+
+  include PageObject
+  include Utilities
+  include ToolsMenu
+
+  attr_accessor :title, :description, :keywords, :start_date, :end_date, :site
+
+  def initialize(browser, opts={})
+    @browser = browser
+
+    defaults = {
+      :title=>random_alphanums
+    }
+    options = defaults.merge(opts)
+
+    @title=options[:title]
+    @description=options[:description]
+    @keywords=options[:keywords]
+    @start_date=options[:start_date]
+    @end_date=options[:end_date]
+    @site=options[:site]
+    raise "You must specify a Site name for your lesson" if @site==nil
+  end
+
+  def create
+    open_my_site_by_name @site unless @browser.title=~/#{@site}/
+    lessons unless @browser.title=~/Lessons$/
+    reset
+    on_page Lessons do |page|
+      page.add_module
+    end
+    on_page AddEditModule do |page|
+      page.title=@title
+      page.description=@description
+      page.keywords=@keywords
+      page.start_date=@start_date
+      page.end_date=@end_date
+      page.add
+    end
+    on_page ConfirmModule do |page|
+      page.return_to_modules
+    end
+  end
+
+end
+
+class ContentSectionObject
+
+  include PageObject
+  include Utilities
+  include ToolsMenu
+
+  attr_accessor :site, :module, :title, :instructions, :modality, :content_type,
+                :copyright_status, :editor_content, :file_name, :file_path, :url, :url_title,
+                :file_description, :url_description
+
+  def initialize(browser, opts={})
+    @browser = browser
+
+    defaults = {
+      :title=>random_alphanums,
+      :copyright_status=>"Public Domain",
+      :modality=>[:check_textual]
+    }
+    options = defaults.merge(opts)
+
+    @site=options[:site]
+    @module=options[:module]
+    @title=options[:title]
+    @instructions=options[:instructions]
+    @modality=options[:modality]
+    @content_type=options[:content_type]
+    @copyright_status=options[:copyright_status]
+    @editor_content=options[:editor_content]
+    @file_name=options[:file_name]
+    @file_path=options[:file_path]
+    @file_description=options[:file_description]
+    @url=options[:url]
+    @url_title=options[:url_title]
+    @url_description=options[:url_description]
+    raise "Your modality variable must be an Array containing one or more keys\nthat match the checkbox methods, like this:\n[:uncheck_textual, :check_visual, :check_auditory]" unless @modality.class==Array
+    raise "You must specify a Site for your Section" if @site==nil
+    raise "You must specify a Module for your Section" if @module==nil
+  end
+
+  def create
+    open_my_site_by_name @site unless @browser.title=~/#{@site}/
+    lessons unless @browser.title=~/Lessons$/
+    reset
+    on_page Lessons do |page|
+      page.open_lesson @module
+    end
+    on_page AddEditModule do |page|
+      page.add_content_sections
+    end
+    on_page AddEditContentSection do |page|
+      page.title=@title
+      page.instructions=@instructions
+      @modality.each do |content|
+        page.send(content)
+      end
+      page.content_type=@content_type unless @content_type==nil
+      sleep 3 # Need to wait for page refresh
+      case @content_type
+        when "Compose content with editor"
+          page.source(page.content_editor)
+          page.source=@editor_content
+        when "Upload or link to a file"
+          page.select_a_file
+          on_page LessonAddAttachment do |subpage|
+            subpage.upload_local_file @file_name, @file_path
+            subpage.continue
+          end
+          page.file_description=@file_description
+        when "Link to new or existing URL resource on server"
+          page.select_url
+          on_page SelectingContent do |subpage|
+            subpage.new_url=@url
+            subpage.url_title=@url_title
+            subpage.continue
+          end
+          page.url_description=@url_description
+        when "Upload or link to a file in Resources"
+          page.select_or_upload_file
+          on_page AddFiles do |subpage|
+            subpage.select @file_name
+            subpage.continue
+          end
+        else
+          raise "You have a typo in what you've specified for your Section's content type.\nIt must be one of the options contained in the dropdown."
+      end
+      page.copyright_status=@copyright_status
+      page.add
+    end
+  end
+end

data/lib/sakai-cle-test-api/data_objects/resource.rb

@@ -0,0 +1,174 @@
+class FileObject
+
+  include PageObject
+  include Utilities
+  include ToolsMenu
+
+  attr_accessor
+
+  def initialize(browser, opts={})
+    @browser = browser
+
+    defaults = {}
+    options = defaults.merge(opts)
+  end
+
+  def create
+
+  end
+
+end
+
+class FolderObject
+  include PageObject
+  include Utilities
+  include ToolsMenu
+
+  attr_accessor :name, :parent_folder, :site
+
+  def initialize(browser, opts={})
+    @browser = browser
+
+    defaults = {
+        :name=>random_alphanums
+    }
+    options = defaults.merge(opts)
+
+    @name = options[:name]
+    @parent_folder = options[:parent_folder]
+    @site = options[:site]
+    raise "You must specify a Site for your Folder" if @site==nil
+  end
+
+  def create
+    open_my_site_by_name @site unless @browser.title=~/#{@site}/
+    resources unless @browser.title=~/Resources$/
+    on_page Resources do |page|
+      page.create_subfolders_in @parent_folder
+    end
+    on_page CreateFolders do |page|
+      page.folder_name.set @name
+      page.create_folders_now
+    end
+  end
+
+end
+
+class WebLinkObject
+  include PageObject
+  include Utilities
+  include ToolsMenu
+
+  attr_accessor
+
+  def initialize(browser, opts={})
+    @browser = browser
+
+    defaults = {}
+    options = defaults.merge(opts)
+    @site = options[:site]
+    raise "You must specify a Site for your Web Link" if @site==nil
+  end
+
+  def create
+
+  end
+
+end
+
+class HTMLPageObject
+
+  include PageObject
+  include Utilities
+  include ToolsMenu
+
+  attr_accessor :name, :description, :site, :folder, :html, :url
+
+  def initialize(browser, opts={})
+    @browser = browser
+
+    defaults = {
+        :name=>random_alphanums,
+        :description=>random_multiline(500, 10, :alpha),
+        :html=>"<body>Body</body>"
+    }
+    options = defaults.merge(opts)
+
+    @name = options[:name]
+    @description = options[:description]
+    @site = options[:site]
+    @folder = options[:folder]
+    @html = options[:html]
+    @site = options[:site]
+    raise "You must specify a Site for your HTML Page" if @site==nil
+  end
+
+  def create
+    open_my_site_by_name @site unless @browser.title=~/#{@site}/
+    resources unless @browser.title=~/Resources$/
+    on_page Resources do |page|
+      page.create_html_page_in @folder
+    end
+    on_page CreateHTMLPageContent do |page|
+      page.source(page.editor)
+      page.source=@html
+      page.continue
+    end
+    on_page CreateHTMLPageProperties do |page|
+      page.name.set @name
+      page.description.set @description
+      # Put more here as needed later
+      page.finish
+    end
+    on_page Resources do |page|
+      @url = page.href(@name)
+    end
+  end
+
+end
+
+class TextDocumentObject
+  include PageObject
+  include Utilities
+  include ToolsMenu
+
+  attr_accessor
+
+  def initialize(browser, opts={})
+    @browser = browser
+
+    defaults = {}
+    options = defaults.merge(opts)
+    @site = options[:site]
+    raise "You must specify a Site for your Text Document" if @site==nil
+  end
+
+  def create
+    open_my_site_by_name @site unless @browser.title=~/#{@site}/
+    resources unless @browser.title=~/Resources$/
+  end
+
+end
+
+class CitationListObject
+  include PageObject
+  include Utilities
+  include ToolsMenu
+
+  attr_accessor
+
+  def initialize(browser, opts={})
+    @browser = browser
+
+    defaults = {}
+    options = defaults.merge(opts)
+    @site = options[:site]
+    raise "You must specify a Site for your Citations List" if @site==nil
+  end
+
+  def create
+    open_my_site_by_name @site unless @browser.title=~/#{@site}/
+    resources unless @browser.title=~/Resources$/
+  end
+
+end