rabbit 0.9.3 → 1.0.0

data/lib/rabbit/middleware/config.ru

@@ -0,0 +1,42 @@
+# -*- mode: ruby; coding: utf-8 -*-
+#
+# Copyright (C) 2011  Kouhei Sutou <kou@clear-code.com>
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+require "drb/drb"
+
+require "rabbit/middleware/controller"
+
+environment = ENV["RACK_ENV"] || "development"
+case environment
+when "development"
+  use Rack::ShowExceptions
+end
+
+use Rack::Runtime
+use Rack::ContentLength
+
+use Rack::Deflater
+use Rack::ConditionalGet
+
+use Rack::Lint
+use Rack::Head
+
+rabbit = DRbObject.new_with_uri(ENV["RABBIT_URI"])
+application = Rabbit::Middleware::Controller.new do |controller|
+  controller.rabbit = rabbit
+end
+run application

data/lib/rabbit/middleware/controller.rb

@@ -0,0 +1,66 @@
+# -*- mode: ruby; coding: utf-8 -*-
+#
+# Copyright (C) 2011  Kouhei Sutou <kou@clear-code.com>
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+require "sinatra/base"
+
+module Rabbit
+  module Middleware
+    class Controller < Sinatra::Base
+      attr_accessor :rabbit
+
+      set :app_file, File.join(File.dirname(__FILE__), "config.ru")
+
+      layout
+
+      before do
+        content_type("text/html", "charset" => "UTF-8")
+      end
+
+      get "/" do
+        haml :index
+      end
+
+      get "/pages/next" do
+        @rabbit.move_to_next_if_can
+        haml :index
+      end
+
+      get "/pages/previous" do
+        @rabbit.move_to_previous_if_can
+        haml :index
+      end
+
+      get "/pages/:number" do |number|
+        @rabbit.move_to_if_can(number.to_i)
+        haml :index
+      end
+
+      def title
+        "Rabbit"
+      end
+
+      def slide_title
+        current_slide_title = @rabbit.slide_title
+        if current_slide_title.respond_to?(:force_encoding)
+          current_slide_title.force_encoding("ASCII-8BIT")
+        end
+        current_slide_title
+      end
+    end
+  end
+end

data/lib/rabbit/middleware/public/stylesheets/rabbirack.css

@@ -0,0 +1,12 @@
+ul,
+ul li
+{
+    display: inline;
+}
+
+.navi
+{
+    font-size: 72px;
+    display: block;
+    padding: 1em;
+}

data/lib/rabbit/middleware/views/index.haml

@@ -0,0 +1,13 @@
+%ul
+  %li
+    - if @rabbit.have_next_slide?
+      %a(href="/pages/next")
+        .navi 次へ
+    - else
+      .navi 次へ
+  %li
+    - if @rabbit.have_previous_slide?
+      %a(href="/pages/previous")
+        .navi 前へ
+    - else
+      .navi 前へ

data/lib/rabbit/middleware/views/layout.haml

@@ -0,0 +1,8 @@
+%html
+  %head
+    %meta(http-equiv="Content-Type" content="text/html; charset=UTF-8")
+    %link(rel="stylesheet" type="text/css" media="all" href="/stylesheets/rabbirack.css")
+    %title
+      =slide_title
+  %body
+    =yield

data/lib/rabbit/parser/ext/aafigure.rb

@@ -5,7 +5,7 @@ module Rabbit
         module_function
         AVAILABLE_OPTIONS = ["linewidth", "foreground", "fill", "background",
                              "option"]
-        def make_image_by_aafigure(path, prop, logger)
+        def make_image(path, prop, logger)
           image_file = Tempfile.new("rabbit-image-aafigure")
           command = ["aafigure",
                      "--type", "svg",

data/lib/rabbit/parser/ext/blockdiag.rb

@@ -0,0 +1,46 @@
+module Rabbit
+  module Parser
+    module Ext
+      module BlockDiag
+        module_function
+        AVAILABLE_FLAG_OPTIONS = ["antialias"]
+        # "font" is treated as specially.
+        AVAILABLE_VALUE_OPTIONS = []
+        def make_image(path, prop, logger)
+          image_file = Tempfile.new("rabbit-image-blockdiag")
+          command = ["blockdiag",
+                     "-T", "svg",
+                     "-o", image_file.path]
+          font = find_font(prop)
+          command.concat(["-f", font]) if font
+          AVAILABLE_FLAG_OPTIONS.each do |name|
+            command << "--#{name}" if /\A(?:true|yes)\z/i =~ prop[name].to_s
+          end
+          AVAILABLE_VALUE_OPTIONS.each do |name|
+            command.concat(["--#{name}", prop[name]]) if prop.has_key?(name)
+          end
+          command << path
+          if SystemRunner.run(*command)
+            image_file
+          else
+            format = _("tried blockdiag command: %s")
+            additional_info = format % command.inspect
+            raise BlockDiagCanNotHandleError.new(command.join(' '),
+                                                 additional_info)
+          end
+        end
+
+        def find_font(prop)
+          font = prop["font"]
+          return font if font and File.exist?(font)
+          fonts = prop["fonts"]
+          return nil if fonts.nil?
+          fonts = fonts.split(/\s*,\s*/) if fonts.is_a?(String)
+          fonts.find do |font|
+            File.exist?(font)
+          end
+        end
+      end
+    end
+  end
+end

data/lib/rabbit/parser/ext/coderay.rb

@@ -0,0 +1,66 @@
+require 'coderay'
+
+require 'rabbit/utils'
+require 'rabbit/parser/ext/escape'
+
+module Rabbit
+  module Parser
+    module Ext
+      module CodeRay
+        include GetText
+
+        module_function
+        def highlight(lang, text, logger)
+          tokens = ::CodeRay.scan(text.strip, lang.to_sym)
+          tokens.encode(RabbitEncoder.new)
+        end
+
+        class RabbitEncoder < ::CodeRay::Encoders::Encoder
+          include Element
+
+          def setup(options)
+            super
+            @out = SyntaxHighlightingBlock.new
+            @elements = [@out]
+          end
+
+          def text_token(text, type=:plain)
+            p [:text, type, text] if Utils.syntax_highlighting_debug?
+            escaped_text = Escape.escape_meta_character(text)
+            text_element = SyntaxHighlightingText.new(Text.new(escaped_text))
+            tag_name = type.to_s.gsub(/_/, '-')
+            CustomTag.new("syntax-#{tag_name}", text_element)
+          end
+
+          def open_token(kind)
+            p [:open, kind] if Utils.syntax_highlighting_debug?
+            @out = TextContainer.new
+            @elements << @out
+            CustomTag.new("syntax-#{kind}")
+          end
+
+          def begin_line(kind)
+            p [:begin_line, kind] if Utils.syntax_highlighting_debug?
+            nil
+          end
+
+          def end_line(kind)
+            p [:end_line, kind] if Utils.syntax_highlighting_debug?
+            nil
+          end
+
+          def close_token(kind)
+            p [:close, kind] if Utils.syntax_highlighting_debug?
+            block = @elements.pop
+            @out = @elements.last
+            block
+          end
+
+          def finish(options)
+            super
+          end
+        end
+      end
+    end
+  end
+end

data/lib/rabbit/parser/ext/emacs.rb

@@ -0,0 +1,116 @@
+require 'nokogiri'
+
+require 'rabbit/utils'
+require 'rabbit/parser/ext/escape'
+
+module Rabbit
+  module Parser
+    module Ext
+      module Emacs
+        include Element
+        include GetText
+
+        module_function
+        def highlight(text, logger, mode_line=nil)
+          src_file = Tempfile.new("rabbit-emacs")
+          src_file.open
+          src_file.print("#{mode_line}\n") if mode_line
+          src_file.print(text)
+          src_file.close
+          html_file = Tempfile.new("rabbit-emacs-html")
+          args = [
+                  "--batch",
+                  "--eval",
+                  "(htmlize-file \"#{src_file.path}\" \"#{html_file.path}\")",
+                 ]
+          if SystemRunner.run("emacs", *args)
+            html_file.open
+            html_to_rabbit(html_file.read, mode_line, logger)
+          else
+            nil
+          end
+        end
+
+        def html_to_rabbit(html, mode_line, logger)
+          html = remove_newline_around_pre(html)
+          html = remove_mode_line(html, mode_line)
+          node = Nokogiri::HTML(html)
+          pre = find_element(node, "pre")
+          address = find_element(node, "address")
+          element = node_to_rabbit(pre, logger)
+          if element
+            logger.info(address.text) if address
+            element
+          else
+            nil
+          end
+        end
+
+        def remove_newline_around_pre(html)
+          html = html.gsub(/<pre([^>]*)>\n/i, '<pre\1>')
+          html.gsub(/\n<\/pre>/i, '</pre>')
+        end
+
+        def remove_mode_line(html, mode_line)
+          return html if mode_line.nil?
+          html.gsub(/<pre([^>]*)>([^\n]+\n)/i) do
+            attributes = $1
+            mode_line_html = $2
+            mode_line_text = mode_line_html.gsub(/<.+?>/, '')
+            if mode_line_text.strip == mode_line.strip
+              "<pre#{attributes}>"
+            else
+              "<pre#{attributes}>#{mode_line_html}"
+            end
+          end
+        end
+
+        def find_element(node, name)
+          node.css(name)[0]
+        end
+
+        def node_to_rabbit(node, logger)
+          case node.name
+          when "pre"
+            element = SyntaxHighlightingBlock.new
+            node.children.each do |child|
+              if child.text?
+                element << text_to_rabbit(child.text, "plain")
+              else
+                child_element = node_to_rabbit(child, logger)
+                element << child_element unless child_element.nil?
+              end
+            end
+            element
+          when "span"
+            p [node.text, node["class"]] if Utils.syntax_highlighting_debug?
+            text_to_rabbit(node.text, normalize_class_name(node["class"]))
+          else
+            format = _("emacs: unsupported element name: %s")
+            logger.warn(format % element.name)
+            nil
+          end
+        end
+
+        def normalize_class_name(name)
+          case name
+          when "comment-delimiter"
+            "comment"
+          when "keyword"
+            "reserved"
+          when "variable-name"
+            "variable"
+          else
+            name
+          end
+        end
+
+        def text_to_rabbit(text, type)
+          escaped_text = Escape.escape_meta_character(text)
+          text_element = SyntaxHighlightingText.new(Text.new(escaped_text))
+          CustomTag.new("syntax-#{type}", text_element)
+        end
+      end
+    end
+  end
+end

data/lib/rabbit/parser/ext/enscript.rb

@@ -1,7 +1,4 @@
-begin
-  require 'htree'
-rescue LoadError
-end
+require 'nokogiri'
 
 require 'rabbit/utils'
 require 'rabbit/parser/ext/escape'
@@ -58,16 +55,12 @@ module Rabbit
         end
 
         def html_to_rabbit(html, logger)
-          unless defined?(HTree)
-            logger.warn(_("enscript: can't find HTree library"))
-            return nil
-          end
-          tree = HTree(extract_newline_around_pre(html))
-          pre = find_element(tree, "pre")
-          address = find_element(tree, "address")
-          element = tree_to_rabbit(pre, logger)
+          node = Nokogiri::HTML(extract_newline_around_pre(html))
+          pre = find_element(node, "pre")
+          address = find_element(node, "address")
+          element = node_to_rabbit(pre, logger)
           if element
-            logger.info(address.extract_text.to_s)
+            logger.info(address.text) if address
             PreformattedBlock.new(element)
           else
             nil
@@ -79,18 +72,18 @@ module Rabbit
           html.gsub(/\n<\/pre>/i, '</pre>')
         end
 
-        def find_element(tree, name)
-          tree.find_element("{http://www.w3.org/1999/xhtml}#{name}")
+        def find_element(node, name)
+          node.css(name)[0]
         end
 
-        def tree_to_rabbit(tree, logger)
-          element = element_to_rabbit(tree, logger)
+        def node_to_rabbit(node, logger)
+          element = element_to_rabbit(node, logger)
           return nil if element.nil?
-          tree.each_child do |child|
+          node.children.each do |child|
             if child.text?
-              element << Text.new(Escape.escape_meta_character(child.to_s))
+              element << Text.new(Escape.escape_meta_character(child.text))
             else
-              child_element = tree_to_rabbit(child, logger)
+              child_element = node_to_rabbit(child, logger)
               element << child_element unless child_element.nil?
             end
           end
@@ -98,7 +91,7 @@ module Rabbit
         end
 
         def element_to_rabbit(element, logger)
-          case element.qualified_name
+          case element.name
           when "pre"
             PreformattedText.new
           when "b"
@@ -112,7 +105,7 @@ module Rabbit
             text
           else
             format = _("enscript: unsupported element name: %s")
-            logger.warn(format % element.qualified_name)
+            logger.warn(format % element.name)
             nil
           end
         end