activeadmin-orac 1.0.0.pre4

data/features/step_definitions/dashboard_steps.rb

@@ -0,0 +1,15 @@
+Then /^I should see the default welcome message$/ do
+  step %{I should see "Welcome to Active Admin" within "#dashboard_default_message"}
+end
+
+Then /^I should not see the default welcome message$/ do
+  step %{I should not see "Welcome to Active Admin"}
+end
+
+Then /^I should see a dashboard widget "([^"]*)"$/ do |name|
+  expect(page).to have_css '.dashboard .panel h3', text: name
+end
+
+Then /^I should not see a dashboard widget "([^"]*)"$/ do |name|
+  expect(page).to_not have_css '.dashboard .panel h3', text: name
+end

data/features/step_definitions/factory_steps.rb

@@ -0,0 +1,35 @@
+def create_user(name, type = 'User')
+  first_name, last_name = name.split(' ')
+  user = type.camelize.constantize.where(first_name: first_name, last_name: last_name).first_or_create(username: name.tr(' ', '').underscore)
+end
+
+Given /^(a|\d+)( published)?( unstarred|starred)? posts?(?: with the title "([^"]*)")?(?: and body "([^"]*)")?(?: written by "([^"]*)")?(?: in category "([^"]*)")? exists?$/ do |count, published, starred, title, body, user, category_name|
+  count     = count == 'a' ? 1 : count.to_i
+  published = Time.now              if published
+  starred   = starred == " starred" if starred
+  author    = create_user(user)     if user
+  category  = Category.where(name: category_name).first_or_create if category_name
+  title   ||= "Hello World %i"
+  count.times do |i|
+    Post.create! title: title % i, body: body, author: author, published_at: published, custom_category_id: category.try(:id), starred: starred
+  end
+end
+
+Given /^a category named "([^"]*)" exists$/ do |name|
+  Category.create! name: name
+end
+
+Given /^a (user|publisher) named "([^"]*)" exists$/ do |type, name|
+  create_user name, type
+end
+
+Given /^a store named "([^"]*)" exists$/ do |name|
+  Store.create! name: name
+end
+
+Given /^I create a new post with the title "([^"]*)"$/ do |title|
+  first(:link, 'Posts').click
+  click_link "New Post"
+  fill_in 'post_title', with: title
+  click_button "Create Post"
+end

data/features/step_definitions/filter_steps.rb

@@ -0,0 +1,39 @@
+Then /^I should see a select filter for "([^"]*)"$/ do |label|
+  expect(page).to have_css '.filter_select label', text: label
+end
+
+Then /^I should see a string filter for "([^"]*)"$/ do |label|
+  expect(page).to have_css '.filter_string label', text: label
+end
+
+Then /^I should see a date range filter for "([^"]*)"$/ do |label|
+  expect(page).to have_css '.filter_date_range label', text: label
+end
+
+Then /^I should see the following filters:$/ do |table|
+  table.rows_hash.each do |label, type|
+    step %{I should see a #{type} filter for "#{label}"}
+  end
+end
+
+Given(/^I add parameter "([^"]*)" with value "([^"]*)" to the URL$/) do |key, value|
+  url = page.current_url
+  separator = url.include?('?') ? '&' : '?'
+  visit url + separator + key.to_s + '=' + value.to_s
+end
+
+Then(/^I should( not)? have parameter "([^"]*)"( with value "([^"]*)")?$/) do |negative, key, compare_val, value|
+  query = URI(page.current_url).query
+  if query.nil?
+    expect(negative).to eq true
+  else
+    params = Rack::Utils.parse_query query
+    if compare_val
+      expect(params[key]).to_not eq value if negative
+      expect(params[key]).to eq value unless negative
+    else
+      expect(params[key]).to eq nil if negative
+      expect(params[key]).to be_present unless negative
+    end
+  end
+end

data/features/step_definitions/flash_steps.rb

@@ -0,0 +1,11 @@
+Then /^I should see a flash with "([^"]*)"$/ do |text|
+  expect(page).to have_content text
+end
+
+Then /^I should see a successful create flash$/ do
+  expect(page).to have_css 'div.flash_notice', text: /was successfully created/
+end
+
+Then /^I should not see a successful create flash$/ do
+  expect(page).to_not have_css 'div.flash_notice', text: /was successfully created/
+end

data/features/step_definitions/format_steps.rb

@@ -0,0 +1,52 @@
+require 'csv'
+
+Then "I should see nicely formatted datetimes" do
+  expect(page.body).to match /\w+ \d{1,2}, \d{4} \d{2}:\d{2}/
+end
+
+Then /^I should( not)? see a link to download "([^"]*)"$/ do |negate, format|
+  method = negate ? :to_not : :to
+  expect(page).send method, have_css("#index_footer a", text: format)
+end
+
+# Check first rows of the displayed CSV.
+Then /^I should download a CSV file with "([^"]*)" separator for "([^"]*)" containing:$/ do |sep, resource_name, table|
+  body   = page.driver.response.body
+  content_type_header, content_disposition_header = %w[Content-Type Content-Disposition].map do |header_name|
+    page.response_headers[header_name]
+  end
+  expect(content_type_header).to eq 'text/csv; charset=utf-8'
+  expect(content_disposition_header).to match /\Aattachment; filename=".+?\.csv"\z/
+
+  begin
+    csv = CSV.parse(body, col_sep: sep)
+    table.raw.each_with_index do |expected_row, row_index|
+      expected_row.each_with_index do |expected_cell, col_index|
+        cell = csv.try(:[], row_index).try(:[], col_index)
+        if expected_cell.blank?
+          expect(cell).to eq nil
+        else
+          expect(cell || '').to match /#{expected_cell}/
+        end
+      end
+    end
+  rescue
+    puts "Expecting:"
+    p table.raw
+    puts "to match:"
+    p csv
+    raise $!
+  end
+end
+
+Then /^I should download a CSV file for "([^"]*)" containing:$/ do |resource_name, table|
+  step %{I should download a CSV file with "," separator for "#{resource_name}" containing:}, table
+end
+
+Then /^the CSV file should contain "([^"]*)" in quotes$/ do |text|
+  expect(page.driver.response.body).to match /"#{text}"/
+end
+
+Then /^the encoding of the CSV file should be "([^"]*)"$/ do |text|
+  expect(page.driver.response.body.encoding).to be Encoding.find(Encoding.aliases[text] || text)
+end

data/features/step_definitions/i18n_steps.rb

@@ -0,0 +1,3 @@
+When /^I set my locale to "([^"]*)"$/ do |lang|
+  I18n.locale = lang
+end

data/features/step_definitions/index_scope_steps.rb

@@ -0,0 +1,21 @@
+Then /^I should( not)? see the scope "([^"]*)"( selected)?$/ do |negate, name, selected|
+  should = "I should#{' not' if negate}"
+  scope = ".scopes#{' .selected' if selected}"
+  step %{#{should} see "#{name}" within "#{scope}"}
+end
+
+Then /^I should see the scope "([^"]*)" not selected$/ do |name|
+  step %{I should see the scope "#{name}"}
+  expect(page).to_not have_css '.scopes .selected', text: name
+end
+
+Then /^I should see the scope "([^"]*)" with the count (\d+)$/ do |name, count|
+  name = name.tr(' ','').underscore.downcase
+  step %{I should see "#{count}" within ".scopes .#{name} .count"}
+end
+
+Then /^I should see the scope "([^"]*)" with no count$/ do |name|
+  name = name.tr(" ", "").underscore.downcase
+  expect(page).to     have_css ".scopes .#{name}"
+  expect(page).to_not have_css ".scopes .#{name} .count"
+end

data/features/step_definitions/index_views_steps.rb

@@ -0,0 +1,3 @@
+When /^I click "(.*?)"$/ do |link|
+  click_link(link)
+end

data/features/step_definitions/layout_steps.rb

@@ -0,0 +1,3 @@
+Then /^I should see the Active Admin layout$/ do
+  expect(page).to have_css '#active_admin_content #main_content_wrapper'
+end

data/features/step_definitions/member_link_steps.rb

@@ -0,0 +1,7 @@
+Then /^I should see an action item button "([^"]*)"$/ do |content|
+  expect(page).to have_css '.action_items a', text: content
+end
+
+Then /^I should not see an action item button "([^"]*)"$/ do |content|
+  expect(page).to_not have_css '.action_items', text: content
+end

data/features/step_definitions/menu_steps.rb

@@ -0,0 +1,11 @@
+Then /^I should see a menu item for "([^"]*)"$/ do |name|
+  expect(page).to have_css '#tabs li a', text: name
+end
+
+Then /^I should not see a menu item for "([^"]*)"$/ do |name|
+  expect(page).to_not have_css '#tabs li a', text: name
+end
+
+Then /^I should see a nested menu item for "([^"]*)"$/ do |name|
+  expect(page).to have_css '#tabs > li > ul > li > a', text: name
+end

data/features/step_definitions/meta_tag_steps.rb

@@ -0,0 +1,3 @@
+Then /^the site should contain a meta tag with name "([^"]*)" and content "([^"]*)"$/ do |name, content|
+  expect(page).to have_xpath("//meta[@name='#{name}' and @content='#{content}']", visible: false)
+end

data/features/step_definitions/pagination_steps.rb

@@ -0,0 +1,15 @@
+Then /^I should not see pagination$/ do
+  expect(page).to_not have_css '.pagination'
+end
+
+Then /^I should see pagination with (\d+) pages$/ do |count|
+  expect(page).to have_css '.pagination span.page', count: count
+end
+
+Then /^I should see the pagination "Next" link/ do
+  expect(page).to have_css "a", text: "Next"
+end
+
+Then /^I should not see the pagination "Next" link/ do
+  expect(page).to_not have_css "a", text: "Next"
+end

data/features/step_definitions/sidebar_steps.rb

@@ -0,0 +1,13 @@
+Then /^I should see a sidebar titled "([^"]*)"$/ do |title|
+  expect(page).to have_css '.sidebar_section h3', text: title
+end
+
+Then /^I should not see a sidebar titled "([^"]*)"$/ do |title|
+  title = title.tr(' ', '').underscore
+  sidebars = page.all :css, "##{title}_sidebar_section"
+  expect(sidebars.count).to eq 0
+end
+
+Then(/^I should see a sidebar titled "(.*?)" above sidebar titled "(.*?)"$/) do |top_title, bottom_title|
+  expect(page).to have_css %Q(.sidebar_section:contains('#{top_title}') + .sidebar_section:contains('#{bottom_title}'))
+end

data/features/step_definitions/site_title_steps.rb

@@ -0,0 +1,17 @@
+Then /^I should see the site title "([^"]*)"$/ do |title|
+  expect(page).to have_css 'h1#site_title', text: title
+end
+
+Then /^I should not see the site title "([^"]*)"$/ do |title|
+  expect(page).to_not have_css 'h1#site_title', text: title
+end
+
+Then /^I should see the site title image "([^"]*)"$/ do |image|
+  img = page.find('h1#site_title img')
+  expect(img[:src]).to eq(image)
+end
+
+Then /^I should see the site title image linked to "([^"]*)"$/ do |url|
+  link = page.find('h1#site_title a')
+  expect(link[:href]).to eq(url)
+end

data/features/step_definitions/symbol_leak_steps.rb

@@ -0,0 +1,3 @@
+Then /^"(.*?)" shouldn't be a symbol$/ do |sym|
+  expect(Symbol.all_symbols.map &:to_s).to_not include(sym), 'symbol detected!'
+end

data/features/step_definitions/tab_steps.rb

@@ -0,0 +1,8 @@
+Then /^the "([^"]*)" tab should be selected$/ do |name|
+  step %{I should see "#{name}" within "ul#tabs li.current"}
+end
+
+Then(/^I should see two tabs "(.*?)" and "(.*?)"$/) do |tab_1, tab_2|
+  expect(page).to have_link(tab_1)
+  expect(page).to have_link(tab_2)
+end

data/features/step_definitions/table_steps.rb

@@ -0,0 +1,116 @@
+Then /^I should see (\d+) ([\w]*) in the table$/ do |count, resource_type|
+  expect(page).to \
+    have_css("table.index_table tr > td:first-child", count: count.to_i)
+end
+
+# TODO: simplify this, if possible?
+class HtmlTableToTextHelper
+  def initialize(html, table_css_selector = "table")
+    @html = html
+    @selector = table_css_selector
+  end
+
+  def to_array
+    rows = Nokogiri::HTML(@html).css("#{@selector} tr")
+    rows.map do |row|
+      row.css('th, td').map do |td|
+        cell_to_string(td)
+      end
+    end
+  end
+
+  private
+
+  def cell_to_string(td)
+    str = ""
+    input = td.css('input').last
+
+    if input
+      str << input_to_string(input)
+    end
+
+    str << td.content.strip.gsub("\n", ' ')
+  end
+
+  def input_to_string(input)
+    case input.attribute("type").value
+    when "checkbox"
+      if input.attribute("disabled")
+        "_"
+      else
+        if input.attribute("checked")
+          "[X]"
+        else
+          "[ ]"
+        end
+      end
+    when "text"
+      if input.attribute("value").present?
+        "[#{input.attribute("value")}]"
+      else
+        "[ ]"
+      end
+    when "submit"
+      input.attribute("value")
+    else
+      raise "I don't know what to do with #{input}"
+    end
+  end
+end
+
+module TableMatchHelper
+  # @param table [Array[Array]]
+  # @param expected_table [Array[Array[String]]]
+  # The expected_table values are String. They are converted to
+  # Regexp when they start and end with a '/'
+  # Example:
+  #
+  #   assert_table_match(
+  #     [["Name", "Date"], ["Philippe", "Feb 08"]],
+  #     [["Name", "Date"], ["Philippe", "/\w{3} \d{2}/"]]
+  #   )
+  def assert_tables_match(table, expected_table)
+    expected_table.each_index do |row_index|
+      expected_table[row_index].each_index do |column_index|
+        expected_cell = expected_table[row_index][column_index]
+        cell = table.try(:[], row_index).try(:[], column_index)
+        begin
+          assert_cells_match(cell, expected_cell)
+        rescue
+          puts "Cell at line #{row_index} and column #{column_index}: #{cell.inspect} does not match #{expected_cell.inspect}"
+          puts "Expecting:"
+          table.each { |row| puts row.inspect }
+          puts "to match:"
+          expected_table.each { |row| puts row.inspect }
+          raise $!
+        end
+      end
+    end
+  end
+
+  def assert_cells_match(cell, expected_cell)
+    if expected_cell =~ /^\/.*\/$/
+      expect(cell).to match /#{expected_cell[1..-2]}/
+    else
+      expect((cell || "").strip).to eq expected_cell
+    end
+  end
+end
+
+World(TableMatchHelper)
+
+# Usage:
+#
+#   I should see the "invoices" table:
+#     | Invoice #    | Date     | Total Amount |
+#     |    /\d+/     | 27/01/12 |       $30.00 |
+#     |    /\d+/     | 12/02/12 |       $25.00 |
+#
+Then /^I should see the "([^"]*)" table:$/ do |table_id, expected_table|
+  expect(page).to have_css "table##{table_id}"
+
+  assert_tables_match(
+    HtmlTableToTextHelper.new(page.body, "table##{table_id}").to_array,
+    expected_table.raw
+  )
+end

data/features/step_definitions/user_steps.rb

@@ -0,0 +1,52 @@
+def ensure_user_created(email)
+  user = AdminUser.where(email: email).first_or_create(password: 'password', password_confirmation: 'password')
+
+  unless user.persisted?
+    raise "Could not create user #{email}: #{user.errors.full_messages}"
+  end
+  user
+end
+
+Given /^(?:I am logged|log) out$/ do
+  click_link 'Logout' if page.all(:css, "a", text: 'Logout').any?
+end
+
+Given /^I am logged in$/ do
+  step 'log out'
+  login_as ensure_user_created 'admin@example.com'
+end
+
+# only for @requires-reloading scenario
+Given /^I am logged in with capybara$/ do
+  ensure_user_created 'admin@example.com'
+  step 'log out'
+
+  visit new_admin_user_session_path
+  fill_in 'Email',    with: 'admin@example.com'
+  fill_in 'Password', with: 'password'
+  click_button 'Login'
+end
+
+Given /^an admin user "([^"]*)" exists$/ do |email|
+  ensure_user_created(email)
+end
+
+Given /^"([^"]*)" requests a password reset with token "([^"]*)"( but it expires)?$/ do |email, token, expired|
+  visit new_admin_user_password_path
+  fill_in 'Email', with: email
+  allow(Devise).to receive(:friendly_token).and_return(token)
+  click_button "Reset My Password"
+
+  AdminUser.where(email: email).first.update_attribute :reset_password_sent_at, 1.month.ago if expired
+end
+
+Given /^override locale "([^"]*)" with "([^"]*)"$/ do |path, value|
+  keys_value  = path.split('.') + [value]
+  locale_hash = keys_value.reverse.inject{|a,n| {n=>a}}
+  I18n.available_locales
+  I18n.backend.store_translations(I18n.locale, locale_hash)
+end
+
+When /^I fill in the password field with "([^"]*)"$/ do |password|
+  fill_in 'admin_user_password', with: password
+end