cmsimple 0.2.0

data/config/environment.rb

@@ -0,0 +1,2 @@
+require 'bundler/setup'
+require File.expand_path "../../spec/rails_app/config/environment", __FILE__

data/config/routes.rb

@@ -0,0 +1,34 @@
+Cmsimple::Engine.routes.draw do
+
+  match '/cmsimple/snippets/:name/preview' => 'snippets#preview'
+  match '/cmsimple/snippets/:name/options' => 'snippets#options'
+  match '/cmsimple/snippets' => 'snippets#index', :as => :snippets
+
+  resources :pages do
+    member do
+      get :publish
+    end
+    resources :versions, :only => [:index] do
+      member do
+        put :revert_to
+      end
+    end
+  end
+
+  resources :paths, :only => [:index, :create, :destroy]
+
+  scope '/cmsimple' do
+    resources :images
+  end
+
+  get '/mercury/:type/:resource' => "mercury#resource"
+
+  get '/editor(/*path)' => "pages#editor", :as => :mercury_editor
+
+  get '*path' => 'front#show'
+  root :to => 'front#show', :via => :get
+
+  put '*path' => 'pages#update_content'
+  root :to => 'pages#update_content', :via => :put
+
+end

data/db/migrate/20120201221410_create_cmsimple_pages.rb

@@ -0,0 +1,10 @@
+class CreateCmsimplePages < ActiveRecord::Migration
+  def change
+    create_table :cmsimple_pages do |t|
+      t.string :path, :null => false
+      t.string :template
+      t.text :content
+    end
+    add_index :cmsimple_pages, :path
+  end
+end

data/db/migrate/20120222185901_add_title_parent_id_and_position_to_pages.rb

@@ -0,0 +1,10 @@
+class AddTitleParentIdAndPositionToPages < ActiveRecord::Migration
+  def change
+    change_table :cmsimple_pages do |t|
+      t.string :title
+      t.integer :parent_id
+      t.integer :position, :default => 0
+    end
+    add_index :cmsimple_pages, :parent_id
+  end
+end

data/db/migrate/20120229185214_add_slug_to_pages.rb

@@ -0,0 +1,7 @@
+class AddSlugToPages < ActiveRecord::Migration
+  def change
+    change_table :cmsimple_pages do |t|
+      t.string :slug
+    end
+  end
+end

data/db/migrate/20120323200439_add_is_root_to_page.rb

@@ -0,0 +1,5 @@
+class AddIsRootToPage < ActiveRecord::Migration
+  def change
+    add_column :cmsimple_pages, :is_root, :boolean, default: false
+  end
+end

data/db/migrate/20120328174339_add_meta_info_to_cmsimple_pages.rb

@@ -0,0 +1,9 @@
+class AddMetaInfoToCmsimplePages < ActiveRecord::Migration
+  def change
+    change_table :cmsimple_pages do |t|
+      t.string :keywords
+      t.text   :description
+      t.string :browser_title
+    end
+  end
+end

data/db/migrate/20120329172857_create_cmsimple_path.rb

@@ -0,0 +1,11 @@
+class CreateCmsimplePath < ActiveRecord::Migration
+  def change
+    create_table :cmsimple_paths do |t|
+      t.string :uri
+      t.string :redirect_uri
+      t.integer :page_id
+
+      t.timestamps
+    end
+  end
+end

data/db/migrate/20120407024752_create_cmsimple_images.rb

@@ -0,0 +1,13 @@
+class CreateCmsimpleImages < ActiveRecord::Migration
+  def change
+    create_table :cmsimple_images do |t|
+      t.string :attachment
+      t.string :width
+      t.string :height
+      t.string :file_size
+      t.string :content_type
+      t.string :title
+      t.timestamps
+    end
+  end
+end

data/db/migrate/20120410041105_add_timestamps_to_cmsimple_pages.rb

@@ -0,0 +1,7 @@
+class AddTimestampsToCmsimplePages < ActiveRecord::Migration
+  def change
+    change_table :cmsimple_pages do |t|
+      t.timestamps
+    end
+  end
+end

data/db/migrate/20120425211937_add_published_at_to_cmsimple_pages.rb

@@ -0,0 +1,6 @@
+class AddPublishedAtToCmsimplePages < ActiveRecord::Migration
+  def change
+    add_column :cmsimple_pages, :published_at, :datetime
+    add_index  :cmsimple_pages, :published_at
+  end
+end

data/db/migrate/20120430175047_create_cmsimple_versions.rb

@@ -0,0 +1,13 @@
+class CreateCmsimpleVersions < ActiveRecord::Migration
+  def up
+    create_table :cmsimple_versions do |t|
+      t.text     :content
+      t.string   :template
+      t.datetime :published_at
+      t.integer  :page_id
+      t.timestamps
+    end
+    add_index :cmsimple_versions, :page_id
+    add_index :cmsimple_versions, :published_at
+  end
+end

data/db/migrate/20120831233927_rename_path_to_current_uri_on_paths.rb

@@ -0,0 +1,5 @@
+class RenamePathToCurrentUriOnPaths < ActiveRecord::Migration
+  def change
+    rename_column :cmsimple_pages, :path, :uri
+  end
+end

data/features/create.feature

@@ -0,0 +1,18 @@
+@javascript
+Feature: As a user I should be able to create pages on the site
+
+  Background:
+    Given a page exists at a custom path with custom content
+    And I visit that page's edit path
+
+  Scenario: As a user I add a page from the sitemap panel
+    When I open the sitemap
+    And I add a new page
+    Then I should be redirected to the new page
+    And I should see the page in the sitemap
+
+  Scenario: As a user I add a page from the sitemap panel
+    When I open the sitemap
+    And I add a new home page
+    Then I should be redirected to the home page
+    And I should see the page in the sitemap

data/features/delete.feature

@@ -0,0 +1,12 @@
+@javascript
+Feature: As a user I should be able to delete pages on the site
+
+  Scenario: As a user I should be able to delete a page
+    Given a page exists at a custom path with custom content
+    And I visit that page's edit path
+    And I edit the page's metadata
+    And the editor won't prompt when leaving the page
+    And I accept confirmations
+    When I follow "Delete"
+    Then I should be redirected to the home page
+

data/features/edit.feature

@@ -0,0 +1,54 @@
+@javascript
+Feature: As a user I should be able to edit pages on the site
+
+  Scenario: As a user I should be able to view a page with custom content at a specified path
+    Given a page exists at a custom path with custom content
+    When I visit that page's edit path
+    Then I should be able to edit that page's content
+
+  Scenario: As a user I want to be able to insert a snippet into a pages content
+    Given a page exists at a custom path with custom content
+    And I visit that page's edit path
+    And the content of the editable region is simple content
+    And I make a selection
+
+    When I open the snippet panel
+    And I drag the example snippet into the editable region
+    Then the modal window should be visible
+    And I should see "Snippet Options" within the modal title
+
+    When I fill in "First name" with "Fred"
+    And fill in "Last name" with "Flinstone"
+    And press "Create Snippet"
+    Then the modal window should not be visible
+    And the contents of the editable region should be "this is <div data-version='1' data-snippet='snippet_0' class='example-snippet' contenteditable='false'><h1>Fred Flinstone</h1></div><span>simple</span> <b>content</b>"
+
+    When I save and reload the page
+    Then the contents of the editable region should be "this is <div data-version='1' data-snippet='snippet_0' class='example-snippet' contenteditable='false'><h1>Fred Flinstone</h1></div><span>simple</span> <b>content</b>"
+
+    When I edit the snippet
+    Then the "First name" field should contain "Fred"
+    And the "Last name" field should contain "Flinstone"
+    And the editor won't prompt when leaving the page
+
+  Scenario: As a user I want to be able to edit the meta data of a page
+    Given a page exists at a custom path with custom content
+    And I visit that page's edit path
+    When I edit the page's metadata
+    And I change the slug to "new_path"
+    Then I should be on "/editor/new_path"
+
+  Scenario: As a user I want to be able to change the template of a page
+    Given a page exists at a custom path with custom content
+    And I visit that page's edit path
+    When I edit the page's metadata
+    And I change the template to "test"
+    Then I should see "Test template with content" in the content frame
+
+  Scenario: As a user I want to be able to change the SEO info of a page
+    Given a page exists at a custom path with custom content
+    And I visit that page's edit path
+    When I edit the page's metadata
+    And I change the seo info of the page
+    Then I should see that seo info on the page
+

data/features/publishing.feature

@@ -0,0 +1,31 @@
+@javascript
+Feature: As a user I should be able to create pages on the site
+
+  Background:
+    Given a page exists at a custom path with custom content
+    And I visit that page's edit path
+
+  Scenario: As a user I have to publish pages for them to be public
+    Given I open the sitemap
+    And I add a new page
+    When I publish the current page
+    Then the current page should be publicly available
+
+  Scenario: As a user changes to a page don't appear to the public until they are published
+    Given I open the sitemap
+    And I add a new page
+    And I publish the current page
+    When I make changes to the current page
+    Then the current page should only show published content
+
+  Scenario: A user should see an indication of having unpublished changes
+    Given I open the sitemap
+    When I add a new page
+    Then there should be an indication of unpublished changes
+
+    When I publish the current page
+    Then there should not be an indication of unpublished changes
+
+    When I make changes to the current page
+    Then there should be an indication of unpublished changes
+

data/features/redirects.feature

@@ -0,0 +1,27 @@
+@javascript
+Feature: As a user I should be able to add redirects on the site
+
+  Background:
+    Given a page exists at a custom path with custom content
+    And I visit that page's edit path
+
+  Scenario: As a user I add a redirect from the redirects panel
+    When I open the redirects
+    And I add a new redirect
+    Then I should see the path in the redirects
+
+    When I visit the new redirect
+    Then I should be redirected to the about page
+
+  Scenario: As a user I should not be able to add a duplicate redirect from the redirects panel
+    When I open the redirects
+    And I add a new duplicate redirect
+    Then I should not see the duplicate path in the redirects
+    And I should be alerted to the duplicate redirect
+
+  Scenario: As a user I delete a redirect from the redirects panel
+    Given I open the redirects
+    And I add a new redirect
+    When I delete the redirect
+    Then I should not see the path in the redirects
+

data/features/step_definitions/mercury_steps.rb

@@ -0,0 +1,440 @@
+
+# Taken from /jejacks0n/mercury/master/features/step_definitions/mercury_steps.rb
+## Generic web steps
+#------------------------------------------------------------------------------
+When /^(?:|I )click on (.+)$/ do |locator|
+  selector = selector_for(locator)
+  find(selector, :message => "Unable to locate the element '#{selector}' to click on").click
+end
+
+Then /^(.+) should (not )?be visible$/ do |locator, boolean|
+  selector = selector_for(locator)
+  if boolean == 'not '
+    page.has_no_css?("#{selector}")
+  else
+    page.has_css?("#{selector}", :visible => true)
+  end
+end
+
+# scoping step for different windows
+When /^(.*) in the "([^"]*)" window$/ do |s, window|
+  page.driver.within_window(window) do
+    step(s)
+  end
+end
+
+
+## Mercury general steps
+#------------------------------------------------------------------------------
+Given /^(?:|I )adjust the configuration to have: \{([^\}]*)\}$/ do |javascript|
+  Rails.application.config.mercury_config = JSON.parse("{#{javascript}}")
+end
+
+# scoping step for the mercury content frame
+When /^(.*) in the content frame$/ do |s|
+  page.driver.within_frame('mercury_iframe') do
+    step(s)
+  end
+end
+
+# silence mercury's onbeforeunload confirmation
+Given /^the editor won't prompt when leaving the page$/ do
+  page.driver.execute_script('Mercury.silent = true;')
+end
+
+
+## Toolbar specific steps
+#------------------------------------------------------------------------------
+# for the select dropdowns
+When /^(?:|I )select (.*?) from the dropdown$/ do |locator|
+  selector = selector_for(locator)
+  find(selector, :message => "Unable to locate the element '#{selector}' to click on").click
+end
+
+
+## Panel specific steps
+#------------------------------------------------------------------------------
+When /^(?:I )(?:open|close|toggle) the (.*?) panel$/ do |panel_locator|
+  step(%Q{I click on the "#{panel_locator}" button})
+end
+
+
+## Modal specific steps
+#------------------------------------------------------------------------------
+When /^(?:I )close the modal(?: window)?$/ do
+  step(%Q{I click on the modal close button})
+end
+
+
+## Region specific steps
+#------------------------------------------------------------------------------
+# setting content
+Given /^the content of (.*?) (?:is|are|has|includes) (.*?)$/ do |region_locator, contents|
+  step(%Q{I set the contents of #{region_locator} to #{contents}})
+end
+
+When /^(?:|I )(?:change|set) the contents? of (.*?) to (.*?)$/ do |region_locator, contents|
+  region_id = region_selector_for(region_locator).gsub('#', '')
+  content = contents[0] == '"' ? contents : "\"#{contents_for(contents)}\""
+  page.driver.within_frame('mercury_iframe') do
+    find("##{region_id}", :message => "Unable to locate a region matching '##{region_id}'")
+    page.driver.execute_script <<-JAVASCRIPT
+      var element = top.jQuery(document).find('##{region_id}');
+      if (element.data('mercury') == 'markdown') {
+        element.find('textarea').val(#{content});
+      } else {
+        var region = top.mercuryInstance.getRegionByName('#{region_id}');
+        region.content(#{content});
+      }
+    JAVASCRIPT
+  end
+end
+
+# setting/making selections
+When /^(?:|I )(?:make|have) a selection$/ do
+  step(%Q{I have a selection for "span"})
+end
+
+When /^(?:|I )(?:make|have) a selection (?:in (.*?) )?for "([^"]*)"$/ do |region_locator, selector|
+  step(%Q{I can simulate complex javascript events})
+  # assume the first editable region if one wasn't provided'
+  region_selector = region_selector_for(region_locator || 'the editable region')
+  page.driver.within_frame('mercury_iframe') do
+    find("#{region_selector}", :message => "Unable to locate a region matching '#{region_selector}'")
+    find("#{region_selector} #{selector}", :message => "Unable to locate a match for '#{selector}' inside '#{region_locator}'")
+    page.driver.execute_script <<-JAVASCRIPT
+      var element = top.jQuery(document).find('#{region_selector}');
+      if (element.data('mercury') == 'markdown') {
+        alert('unimplemented');
+        throw('unimplemented');
+      } else {
+        var selectedElement = element.find('#{selector}');
+        var selection = new top.Mercury.Regions.Full.Selection(window.getSelection(), document);
+        selection.selectNode(selectedElement.get(0));
+        selectedElement.simulate('mouseup');
+      }
+    JAVASCRIPT
+  end
+end
+
+# other events
+When /^(?:|I )double click on (.*?) in (.*?)$/ do |locator, region_locator|
+  step(%Q{I can simulate complex javascript events})
+  selector = selector_for(locator)
+  # assume the first editable region if one wasn't provided'
+  region_selector = region_selector_for(region_locator || 'the editable region')
+  page.driver.within_frame('mercury_iframe') do
+    find("#{region_selector}", :message => "Unable to locate a region matching '#{region_selector}'")
+    find("#{region_selector} #{selector}", :message => "Unable to locate a match for '#{selector}' inside '#{region_locator}'")
+    page.driver.execute_script <<-JAVASCRIPT
+      top.jQuery(document).find('#{region_selector} #{selector}').simulate('dblclick');
+    JAVASCRIPT
+  end
+end
+
+# getting contents
+Then /^the contents? of (.*?) should be "([^"]*)"$/ do |region_locator, content|
+  region_selector = region_selector_for(region_locator)
+  page.driver.within_frame('mercury_iframe') do
+    find("#{region_selector}", :message => "Unable to locate a region matching '#{region_selector}'")
+    results = page.driver.execute_script <<-JAVASCRIPT
+      var element = top.jQuery(document).find('#{region_selector}');
+      if (element.data('mercury') == 'markdown') {
+        return element.find('textarea').val();
+      } else {
+        return element.html();
+      }
+    JAVASCRIPT
+    assert_equal content, results.gsub('"', "'").gsub("\n", '')
+  end
+end
+
+
+## Saving specific steps
+#------------------------------------------------------------------------------
+# caching for the last save -- a request will still be made
+Given /^save results will be cached$/ do
+  page.driver.execute_script <<-JAVASCRIPT
+    Mercury.PageEditor.prototype.save = function() {
+      window.cachedResults = this.serialize();
+    }
+  JAVASCRIPT
+end
+
+# check for the last save cached results
+Then /^the save should have (.*?) for (.*?)$/ do |contents, region_locator|
+  region_id = region_selector_for(region_locator).gsub('#', '')
+  content = contents[0] == '"' ? contents : "\"#{contents_for(contents)}\""
+  results = page.driver.execute_script <<-JAVASCRIPT
+    return (window.cachedResults['#{region_id}']) ?
+      window.cachedResults['#{region_id}']['value'] : null;
+  JAVASCRIPT
+  assert_equal content, "\"#{results}\""
+end
+
+
+## Table editing specific steps
+#------------------------------------------------------------------------------
+# in the modal window
+When /^(?:|I )(?:add|insert) a (row|column) (before|after)(?: it)?$/ do |row_or_column, before_or_after|
+  name = "insert_#{row_or_column}_#{before_or_after}".camelcase(:lower)
+  step(%Q{I click on ".mercury-modal-content input[name=#{name}]"})
+end
+
+When /^(?:|I )delete the(?: current)? (row|column)$/ do |row_or_column|
+  name = "delete_#{row_or_column}".camelcase(:lower)
+  step(%Q{I click on ".mercury-modal-content input[name=#{name}]"})
+end
+
+When /^(?:|I )(increase|decrease) the (rowspan|colspan)$/ do |increase_or_decrease, rowspan_or_colspan|
+  name = "#{increase_or_decrease}_#{rowspan_or_colspan}".camelcase(:lower)
+  step(%Q{I click on ".mercury-modal-content input[name=#{name}]"})
+end
+
+Then /^the selected cell should be (.*?)$/ do |locator|
+  selector = selector_for(locator).gsub('td:', 'td.selected:')
+  find("#{selector}", :message => "Unable to locate the selected cell for '#{selector}'")
+end
+
+# in general
+Then /^the(?: table)? (row|column) count should be (\d+)$/ do |row_or_column, expected_count|
+  method = "get_#{row_or_column}_count".camelcase(:lower)
+  actual_count = page.driver.execute_script("return Mercury.tableEditor.#{method}()")
+  assert_equal expected_count.to_i, actual_count.to_i
+end
+
+
+## Snippet specific steps
+#------------------------------------------------------------------------------
+# setting snippet options
+Given /^the options for the (.*?) snippet "([^"]*)" are (.*?)$/ do |snippet_name, snippet_id, options|
+  @snippet_id = snippet_id
+  options_json = parse_snippet_options_from(options)
+  page.driver.execute_script <<-JAVASCRIPT
+    Mercury.Snippet.load({#{snippet_id}: {name: '#{snippet_name}', options: #{options_json}}});
+  JAVASCRIPT
+end
+
+# dragging/dropping
+When /^(?:|I )(?:drag|drop) (.*?) (?:into|on) (.*?)$/ do |snippet_locator, region_locator|
+  snippet_name = snippet_name_for(snippet_locator)
+  region_id = region_selector_for(region_locator).gsub('#', '')
+  page.driver.within_frame('mercury_iframe') do
+    find("##{region_id}", :message => "Unable to locate a region matching '##{region_id}'")
+    page.driver.execute_script <<-JAVASCRIPT
+      var element = top.jQuery(document).find('##{region_id}');
+      if (element.data('mercury') == 'markdown') {
+        alert('unimplemented');
+        throw('unimplemented');
+      } else {
+        var region = top.mercuryInstance.getRegionByName('#{region_id}');
+        region.selection().range.collapse(true);
+        document.execCommand('insertHTML', false, '<img data-snippet="#{snippet_name}" src="/assets/mercury/default-snippet.png">');
+        element.trigger('possible:drop');
+      }
+    JAVASCRIPT
+  end
+end
+
+When /^(?:|I )hover over (.*?)(?: in (.*?))?$/ do |locator, region_locator|
+  step(%Q{I can simulate complex javascript events})
+  selector = selector_for(locator)
+  region_selector = region_selector_for(region_locator || 'the editable region')
+  page.driver.within_frame('mercury_iframe') do
+    find("#{region_selector}", :message => "Unable to locate a region matching '#{region_selector}'")
+    page.driver.execute_script <<-JAVASCRIPT
+      var element = top.jQuery(document).find('#{region_selector}');
+      if (element.data('mercury') == 'markdown') {
+        alert('unimplemented');
+        throw('unimplemented');
+      } else {
+        element.find('#{selector}').simulate('mousemove');
+      }
+    JAVASCRIPT
+  end
+end
+
+When /^(?:|I )edit the snippet$/ do
+  step(%{I hover over the snippet})
+  step(%{click on the edit snippet settings toolbar button})
+end
+
+
+## Dropping image specific steps
+#------------------------------------------------------------------------------
+#When /^(?:|I )drop an image into (.*?) from a different browser/ do |region_locator|
+#  Given(%Q{I can simulate complex javascript events})
+#  region_selector = region_selector_for(region_locator || 'the editable region')
+#  page.driver.within_frame('mercury_iframe') do
+#    find("#{region_selector}", :message => "Unable to locate a region matching '#{region_selector}'")
+#    page.driver.execute_script <<-JAVASCRIPT
+#      var element = top.jQuery(document).find('#{region_selector}');
+#      if (element.data('type') == 'markupable') {
+#        alert('unimplemented');
+#        throw('unimplemented');
+#      } else {
+#        element.find('#{region_selector}').simulate('drop', {'text/html': '<img src="testing.gif"/>'});
+#      }
+#    JAVASCRIPT
+#  end
+#end
+
+
+## Javascript event simulation steps
+#------------------------------------------------------------------------------
+Given /^(?:|I )can simulate complex javascript events$/ do
+  page.driver.execute_script(EVENT_SIMULATION_JAVASCRIPT)
+end
+
+#------------------------------------------------------------------------------
+
+EVENT_SIMULATION_JAVASCRIPT = <<-JAVASCRIPT
+  /*
+   * jquery.simulate - simulate browser mouse and keyboard events
+   *
+   * Copyright 2011, AUTHORS.txt (http://jqueryui.com/about)
+   * Dual licensed under the MIT or GPL Version 2 licenses.
+   * http://jquery.org/license
+   *
+   */
+  ;(function($) {
+
+  $.fn.extend({
+    simulate: function(type, options) {
+      return this.each(function() {
+        var opt = $.extend({}, $.simulate.defaults, options || {});
+        new $.simulate(this, type, opt);
+      });
+    }
+  });
+
+  $.simulate = function(el, type, options) {
+    this.target = el;
+    this.options = options;
+
+    if (/^drag$/.test(type)) {
+      this[type].apply(this, [this.target, options]);
+    } else {
+      this.simulateEvent(el, type, options);
+    }
+  }
+
+  $.extend($.simulate.prototype, {
+    simulateEvent: function(el, type, options) {
+      var evt = this.createEvent(type, options);
+      this.dispatchEvent(el, type, evt, options);
+      return evt;
+    },
+    createEvent: function(type, options) {
+      if (/^mouse(over|out|down|up|move)|(dbl)?click$/.test(type)) {
+        return this.mouseEvent(type, options);
+      } else if (/^key(up|down|press)$/.test(type)) {
+        return this.keyboardEvent(type, options);
+      }
+    },
+    mouseEvent: function(type, options) {
+      var evt;
+      var e = $.extend({
+        bubbles: true, cancelable: (type != "mousemove"), view: window, detail: 0,
+        screenX: 0, screenY: 0, clientX: 0, clientY: 0,
+        ctrlKey: false, altKey: false, shiftKey: false, metaKey: false,
+        button: 0, relatedTarget: undefined
+      }, options);
+
+      var relatedTarget = $(e.relatedTarget)[0];
+
+      if ($.isFunction(document.createEvent)) {
+        evt = document.createEvent("MouseEvents");
+        evt.initMouseEvent(type, e.bubbles, e.cancelable, e.view, e.detail,
+          e.screenX, e.screenY, e.clientX, e.clientY,
+          e.ctrlKey, e.altKey, e.shiftKey, e.metaKey,
+          e.button, e.relatedTarget || document.body.parentNode);
+      } else if (document.createEventObject) {
+        evt = document.createEventObject();
+        $.extend(evt, e);
+        evt.button = { 0:1, 1:4, 2:2 }[evt.button] || evt.button;
+      }
+      return evt;
+    },
+    keyboardEvent: function(type, options) {
+      var evt;
+
+      var e = $.extend({ bubbles: true, cancelable: true, view: window,
+        ctrlKey: false, altKey: false, shiftKey: false, metaKey: false,
+        keyCode: 0, charCode: 0
+      }, options);
+
+      if ($.isFunction(document.createEvent)) {
+        try {
+          evt = document.createEvent("KeyEvents");
+          evt.initKeyEvent(type, e.bubbles, e.cancelable, e.view,
+            e.ctrlKey, e.altKey, e.shiftKey, e.metaKey,
+            e.keyCode, e.charCode);
+        } catch(err) {
+          evt = document.createEvent("Events");
+          evt.initEvent(type, e.bubbles, e.cancelable);
+          $.extend(evt, { view: e.view,
+            ctrlKey: e.ctrlKey, altKey: e.altKey, shiftKey: e.shiftKey, metaKey: e.metaKey,
+            keyCode: e.keyCode, charCode: e.charCode
+          });
+        }
+      } else if (document.createEventObject) {
+        evt = document.createEventObject();
+        $.extend(evt, e);
+      }
+      if ($.browser.msie || $.browser.opera) {
+        evt.keyCode = (e.charCode > 0) ? e.charCode : e.keyCode;
+        evt.charCode = undefined;
+      }
+      return evt;
+    },
+    dispatchEvent: function(el, type, evt) {
+      if (el.dispatchEvent) {
+        el.dispatchEvent(evt);
+      } else if (el.fireEvent) {
+        el.fireEvent('on' + type, evt);
+      }
+      return evt;
+    },
+    drag: function(el) {
+      var self = this, center = this.findCenter(this.target),
+        options = this.options,	x = Math.floor(center.x), y = Math.floor(center.y),
+        dx = options.dx || 0, dy = options.dy || 0, target = this.target;
+      var coord = { clientX: x, clientY: y };
+      this.simulateEvent(target, "mousedown", coord);
+      coord = { clientX: x + 1, clientY: y + 1 };
+      this.simulateEvent(document, "mousemove", coord);
+      coord = { clientX: x + dx, clientY: y + dy };
+      this.simulateEvent(document, "mousemove", coord);
+      this.simulateEvent(document, "mousemove", coord);
+      this.simulateEvent(target, "mouseup", coord);
+      this.simulateEvent(target, "click", coord);
+    },
+    findCenter: function(el) {
+      var el = $(this.target), o = el.offset(), d = $(document);
+      return {
+        x: o.left + el.outerWidth() / 2 - d.scrollLeft(),
+        y: o.top + el.outerHeight() / 2 - d.scrollTop()
+      };
+    }
+  });
+
+  $.extend($.simulate, {
+    defaults: {
+      speed: 'sync'
+    },
+    VK_TAB: 9,
+    VK_ENTER: 13,
+    VK_ESC: 27,
+    VK_PGUP: 33,
+    VK_PGDN: 34,
+    VK_END: 35,
+    VK_HOME: 36,
+    VK_LEFT: 37,
+    VK_UP: 38,
+    VK_RIGHT: 39,
+    VK_DOWN: 40
+  });
+
+  })(jQuery);
+JAVASCRIPT