RubyGems - redcar-dev - Versions diffs - 0.12.17dev - Mend

redcar-dev 0.12.17dev

Files changed (655) hide show

data/plugins/html_view/assets/redcar.css ADDED Viewed

@@ -0,0 +1,44 @@
+.grey {
+  background-color: #eee;
+}
+td.plugin {
+  text-align: left;
+}
+td.links {
+  text-align: right;
+}
+body {
+  font-family: sans-serif;
+}
+h1, h2, h3, h4, h5 {
+  border-bottom: 1px solid black;
+}
+table {
+  border-collapse: collapse;
+  font-size: 0.8em;
+}
+th {
+  padding: 7px 12px;
+  border: 1px solid #bbb;
+}
+td {
+  padding: 7px 12px;
+  border: 1px solid #bbb;
+}
+tr.error {
+  background-color: #FCC;
+}
+tr.cancelled {
+  background-color: #EEE;
+}

data/plugins/html_view/features/browser_bar.feature ADDED Viewed

@@ -0,0 +1,47 @@
+Feature: Navigating web content in HtmlTabs using the browser bar
+  Background:
+    When I will choose "plugins/html_view/features/fixtures" from the "open_directory" dialog
+    And I open a directory
+    And I open the browser bar
+    And I type "sample.html" into the "New URL:" field in the speedbar
+    And I press "Go!" in the speedbar
+  Scenario: Refresh a tab
+    Given I will choose "plugins/html_view/features/fixtures/sample.html" from the "open_file" dialog
+    When I open a file
+    And I replace the contents with "<html>I see you!</html>"
+    And I save the tab
+    And I close the focussed tab
+    And I open the browser bar
+    And I press "Refresh" in the speedbar
+    Then the HTML tab should say "I see you!"
+  Scenario: Go to a new URL in a HtmlTab
+    When I type "other.html" into the "New URL:" field in the speedbar
+    And I press "Go!" in the speedbar
+    Then the HTML tab should say "Is today Tuesday?"
+  # Scenario: Move back and forward in the browser history
+  #   When I type "other.html" into the "New URL:" field in the speedbar
+  #   And I press "Go!" in the speedbar
+  #   And I press "<" in the speedbar
+  #   Then the HTML tab should say "Hello!!"
+  #   When I press ">" in the speedbar
+  #   Then the HTML tab should say "Is today Tuesday?"
+  #
+  # Scenario: View page source from the browser bar
+  #   When I press "Source" in the speedbar
+  #   Then I should see "<html><b>Hello!!</b></html>" in the edit tab
+  Scenario: Add a new bookmark to a project
+    When I type "other.html" into the "New URL:" field in the speedbar
+    Given I would type "Other" in an input box
+    And I would type "" in an input box
+    When I press "+" in the speedbar
+    And I open the web bookmarks tree
+    Then I should see "Other" in the tree
+  Scenario: When a HTML tab loses focus, the browser bar is hidden
+    When I open a new edit tab
+    Then there should not be an open speedbar

data/plugins/html_view/features/fixtures/other.html ADDED Viewed

	@@ -0,0 +1 @@
1	+ <html><b>Is today Tuesday?</b></html>

data/plugins/html_view/features/fixtures/sample.html ADDED Viewed

	@@ -0,0 +1 @@
1	+ <html><b>Hello!!</b></html>

data/plugins/html_view/features/step_definitions/html_view_steps.rb ADDED Viewed

@@ -0,0 +1,64 @@
+Then /^the HTML tab (should (not )?say|says) "([^"]*)"$/ do |_, negation, needle|
+  limit = 5
+  contents = nil
+  started = false
+  thread = Thread.new do
+    started = true
+    start = Time.now
+    contents = get_browser_contents
+    while !contents or (contents and !contents.match(needle)) && Time.now - start < limit
+      contents = get_browser_contents
+      sleep 0.1
+    end
+  end
+  Redcar.gui.yield_until { started && !thread.alive? }
+  # For now, just skip on XUL platforms on which we can't get browser exec results
+  # (current version of SWT and XulRunner). More info at:
+  # https://bugs.eclipse.org/bugs/show_bug.cgi?id=259687
+  unless (contents.nil? or contents.empty?) and [:windows, :linux].include? Redcar.platform
+    negation ? (contents.should_not match needle) : (contents.should match needle)
+  end
+end
+When /^I click "([^\"]+)" in the HTML tab$/ do |link|
+  html_view = focussed_tab.html_view
+  # The JQuery way doesn't seem to work - I'm getting errors with this:
+  # => html_view.controller.execute(%{ $("a:contains(#{link.gsub('"', '\"')})").click(); })
+  # So, click the link the old-fashioned way.
+  js = <<-JAVASCRIPT
+    var link, evt, links, cancelled, i;
+    links = document.getElementsByTagName("a");
+    for (i = 0; i < links.length; i++) {
+      if (links[i].innerHTML.search(#{link.inspect}) > -1) {
+        link = links[i];
+        break;
+      }
+    }
+    if (typeof(link) !== "undefined") {
+      if (document.createEvent) {
+        evt = document.createEvent("MouseEvents");
+        evt.initMouseEvent("click", true, true, window, 0, 0, 0, 0, 0, false, false, false, false, 0, null);
+        cancelled = !link.dispatchEvent(evt);
+      } else if (link.fireEvent) {
+        cancelled = !link.fireEvent("onclick");
+      }
+      if (!cancelled) {
+        window.location = link.href;
+      }
+    }
+  JAVASCRIPT
+  html_view.controller.execute(js)
+end
+When /^I open the browser bar$/ do
+  Redcar::HtmlView::ToggleBrowserBar.new.run
+end
+When /^I open a web preview$/ do
+  Redcar::HtmlView::ViewFileInWebBrowserCommand.new.run
+end

data/plugins/html_view/features/step_definitions/web_view_steps.rb ADDED Viewed

@@ -0,0 +1,12 @@
+Then /I should see "(.*)" in the web view/ do |expected|
+  body.include?(expected)
+end
+Given /^I fill in "(.*)" with "(.*)" in the web view$/ do |field, value|
+  fill_in(field, :with => value)
+end
+When /I press "(.*)" in the web view/ do |button_name|
+  click_button(button_name)
+end

data/plugins/html_view/features/support/env.rb ADDED Viewed

@@ -0,0 +1,27 @@
+def htmlview_fixtures_path
+  File.expand_path(File.dirname(__FILE__) + "/../fixtures")
+end
+def htmlview_fixtures_redcar
+  File.join(htmlview_fixtures_path,".redcar")
+end
+def reset_htmlview_fixtures
+  FileUtils.rm_rf(htmlview_fixtures_redcar) if File.exists?(htmlview_fixtures_redcar)
+  File.open(htmlview_fixtures_path + "/sample.html", "w") do |f|
+    f.print "<html><b>Hello!!</b></html>"
+  end
+  File.open(htmlview_fixtures_path + "/other.html", "w") do |f|
+    f.print "<html><b>Is today Tuesday?</b></html>"
+  end
+end
+Before do
+  reset_htmlview_fixtures
+end
+After do
+  reset_htmlview_fixtures
+end

data/plugins/html_view/features/web_preview.feature ADDED Viewed

@@ -0,0 +1,21 @@
+Feature: Previewing how a file will appear in a browser
+  Scenario: Previewing an untitled tab
+    When I open a new edit tab
+    And I replace the contents with "<html>test 1-2-3</html>"
+    And I open a web preview
+    Then my active tab should be "Preview"
+    And the HTML tab should say "test 1-2-3"
+  Scenario: Previewing a saved file
+    Given I will choose "plugins/html_view/features/fixtures/sample.html" from the "open_file" dialog
+    When I open a file
+    And I replace the contents with "<html>test 1-2-3</html>"
+    And I open a web preview
+    Then my active tab should be "Preview: sample.html"
+    And the HTML tab should say "Hello!!"
+    When I close the focussed tab
+    And I save the tab
+    And I open a web preview
+    Then my active tab should be "Preview: sample.html"
+    And the HTML tab should say "test 1-2-3"

data/plugins/html_view/lib/html_controller.rb ADDED Viewed

@@ -0,0 +1,50 @@
+module Redcar
+  module HtmlController
+    include Redcar::Observable
+    # Reload the index page
+    def reload_index
+      notify_listeners(:reload_index)
+    end
+    # Override this to return a message if the user should be prompted
+    # before closing the tab.
+    def ask_before_closing
+      nil
+    end
+    # Override this to run code right before the tab is closed.
+    def close
+      nil
+    end
+    # Call execute with a string of javascript to execute the script
+    # in the context of the browser widget.
+    def execute(script)
+      notify_listeners(:execute_script, script)
+    end
+    def javascript_controller_actions
+      methods = self.methods - Object.methods
+      <<-JS
+        <script type="text/javascript">
+          function makeController (methods) {
+            var controller = {};
+            methods.map(function (method) {
+              var jsMethod = method.replace(/_(.)/g, function () {
+                    return arguments[1].toUpperCase();
+                  });
+              controller[jsMethod] = function () {
+                var args = Array.prototype.slice.call(arguments);
+                return JSON.parse(rubyCall.apply(this, [method].concat(args)));
+              };
+            });
+            return controller;
+          }
+          Controller = makeController(#{methods.inspect});
+        </script>
+      JS
+    end
+  end
+end

data/plugins/html_view/lib/html_view.rb ADDED Viewed

@@ -0,0 +1,170 @@
+require 'html_view/commands'
+require 'html_view/browser_bar'
+require 'html_view/html_tab'
+require 'html_controller'
+require 'html_view/default_controller'
+module Redcar
+  class HtmlView
+    def self.default_css_path
+      File.expand_path(File.join(Redcar.root, %w(plugins html_view assets redcar.css)))
+    end
+    def self.jquery_path
+      File.expand_path(File.join(Redcar.root, %w(plugins html_view assets jquery-1.4.min.js)))
+    end
+    def self.keymaps
+      map = Redcar::Keymap.build("main", [:osx, :linux, :windows]) do
+        link "Alt+Shift+B", ToggleBrowserBar
+        link "Alt+Shift+P", ViewFileInWebBrowserCommand
+      end
+      [map]
+    end
+    def self.menus
+      Redcar::Menu::Builder.build do
+        sub_menu "File" do
+          item "Web Preview", :command => ViewFileInWebBrowserCommand, :priority => 8
+        end
+        sub_menu "View" do
+          item "Toggle Browser Bar", :command => ToggleBrowserBar, :priority => 11
+        end
+      end
+    end
+    def self.storage
+      @storage ||= begin
+         storage = Plugin::Storage.new('html_view')
+         storage.set_default('use_external_browser_for_urls', false)
+         storage
+      end
+    end
+    def self.show_browser_bar?
+      if win = Redcar.app.focussed_window and
+        win.speedbar and win.speedbar.is_a?(BrowserBar)
+        return true
+      end
+      false
+    end
+    def self.tidy_url(url)
+      unless url.include?("://")
+        if File.exists?(url)
+          url = "file://#{url}"
+        elsif project = Redcar::Project::Manager.focussed_project and
+          relpath = File.join(project.path,url) and
+          File.exists?(relpath)
+          url = "file://#{relpath}"
+        else
+          url = "http://#{url}"
+        end
+      end
+      url
+    end
+    attr_reader :controller
+    def initialize(html_tab)
+      @html_tab = html_tab
+      @html_tab.add_listener(:controller_action, &method(:controller_action))
+    end
+    def controller=(new_controller)
+      @controller = new_controller
+      @html_tab.title = controller.title
+      func = RubyFunc.new(@html_tab.controller.browser, "rubyCall")
+      func.controller = @controller
+      refresh
+      attach_controller_listeners
+    end
+    def refresh
+      controller_action("index")
+    end
+    def attach_controller_listeners
+      @controller.add_listener(:reload_index) { controller_action("index") }
+      @controller.add_listener(:execute_script) do |script|
+        result = nil
+        begin
+          Redcar.update_gui do
+            begin
+              browser = @html_tab.controller.browser
+              unless browser.is_disposed
+                result = browser.evaluate(script)
+              end
+            rescue => e
+              puts e.message
+              puts e.backtrace
+            end
+          end
+        rescue => e
+          puts e.message
+          puts e.backtrace
+        end
+        result
+      end
+    end
+    def controller_action(action_name, params=nil)
+      text = nil
+      begin
+        action_method_arity = controller.method(action_name).arity
+        text = if action_method_arity == 0
+                 controller.send(action_name)
+               elsif action_method_arity == 1
+                 controller.send(action_name, params)
+               end
+      rescue => e
+        text = <<-HTML
+          Sorry, there was an error.<br />
+          <pre><code>
+            #{e.message}
+            #{e.backtrace}
+          </code></pre>
+        HTML
+      end
+      if text
+        unless @html_tab.controller.browser.disposed
+          @html_tab.controller.browser.set_text(text.to_s + setup_javascript_listeners)
+        end
+      end
+    end
+    def contents=(source)
+      @html_tab.controller.browser.set_text(source)
+    end
+    private
+    class RubyFunc < Swt::Browser::BrowserFunction
+      def function(args)
+        begin
+          if result = controller.send(*args.to_a)
+            return JSON(result)
+          else
+            return "{}"
+          end
+        rescue JSON::GeneratorError => e
+          nil
+        rescue Object => e
+          puts "caught in controller"
+          puts e.message
+          puts e.backtrace
+        end
+      end
+      attr_accessor :controller
+    end
+    # TODO: remove this method once we have a default layout that
+    #       has <%= javascript_controller_actions %>
+    def setup_javascript_listeners
+      controller.javascript_controller_actions
+    end
+  end
+end