rabbit 0.6.2

data/lib/rabbit/source/rwiki.rb

@@ -0,0 +1,54 @@
+require 'rabbit/source/base'
+require 'rwiki/soap/driver'
+
+module Rabbit
+  module Source
+    class RWiki
+
+      include Base
+      include LimitAccessInterval
+      
+      def self.initial_args_description
+        N_("[RWIKI_SOAP_IF_URI] and [PAGE_NAME]")
+      end
+
+      def initialize(encoding, logger, soap_if_uri, name)
+        @soap_if_uri = soap_if_uri
+        @name = name
+        super(encoding, logger)
+        @driver = ::RWiki::SOAP::Driver.new(@soap_if_uri)
+        @driver.log_dir = tmp_dir_name
+      end
+
+      def need_read?
+        super or old?(@last_modified, :modified)
+      end
+      
+      private
+      def _read
+        begin
+          @last_modified = modified
+          @driver.src(@name)
+        rescue ::SOAP::Error
+          @logger.error($!.message)
+          @last_modified = Time.now + MINIMUM_ACCESS_TIME
+          ""
+        end
+      end
+
+      def modified
+        begin
+          @driver.modified(@name)
+        rescue ::SOAP::Error
+          @logger.error($!.message)
+          Time.now
+        end
+      end
+
+      def init_base
+        set_base(::File.dirname(@soap_if_uri.to_s))
+      end
+    end
+
+  end
+end

data/lib/rabbit/source/slide-share.rb

@@ -0,0 +1,53 @@
+require "uri"
+require "open-uri"
+
+require 'rabbit/source/base'
+
+module Rabbit
+  module Source
+    class SlideShare
+
+      include Base
+
+      class << self
+        def initial_args_description
+          N_("[USER] and [TITLE]")
+        end
+      end
+
+      def initialize(encoding, logger, user, title)
+        @user = user
+        @title = title
+        @uri = ::URI.parse("#{slide_uri}/download")
+        super(encoding, logger)
+        @last_modified = nil
+      end
+
+      private
+      def _read
+        begin
+          @uri.open do |f|
+            @last_modified = f.last_modified
+            f.read
+          end
+        rescue
+          @logger.error($!.message)
+          @last_modified = Time.now
+          ""
+        end
+      end
+
+      def init_base
+        set_base(slide_uri)
+      end
+
+      def last_modified
+        @last_modified ||= Time.now
+      end
+
+      def slide_uri
+        "http://www.slideshare.net/#{@user}/#{@title}"
+      end
+    end
+  end
+end

data/lib/rabbit/source/uri.rb

@@ -0,0 +1,73 @@
+require "uri"
+require "open-uri"
+
+require 'rabbit/source/base'
+
+module Rabbit
+  module Source
+    class URI
+
+      include Base
+      include LimitAccessInterval
+
+      class << self
+        def new(encoding, logger, uri)
+          parsed_uri = ::URI.parse(uri)
+          case parsed_uri.scheme
+          when nil, /file/i
+            File.new(encoding, logger, parsed_uri.path)
+          else
+            super
+          end
+        end
+
+        def initial_args_description
+          N_("URI")
+        end
+      end
+      
+      def initialize(encoding, logger, uri)
+        @uri = ::URI.parse(uri)
+        super(encoding, logger)
+        @last_modified = nil
+      end
+
+      def need_read?
+        super or old?(@last_modified, :last_modified)
+      end
+
+      private
+      def _read
+        begin
+          @uri.open do |f|
+            @last_modified = f.last_modified
+            f.read
+          end
+        rescue
+          @logger.error($!.message)
+          @last_modified = Time.now + MINIMUM_ACCESS_TIME
+          ""
+        end
+      end
+
+      def init_base
+        base = @uri.dup
+        base.path = ::File.dirname(base.path)
+        set_base(base.to_s)
+      end
+
+      def last_modified
+        begin
+          @uri.open do |f|
+            f.last_modified
+          end
+        rescue
+          @logger.error($!.message)
+          Time.now
+        end
+      end
+
+    end
+
+  end
+end

data/lib/rabbit/stock.rb

@@ -0,0 +1,31 @@
+require 'gtk2'
+
+require 'rabbit/rabbit'
+
+module Rabbit
+  module Stock
+    extend GetText
+    
+    RABBIT = :rabbit_rabbit
+    
+    @@loaded = false
+    
+    module_function
+    def init(canvas)
+      return if @@loaded
+      @@loaded = true
+      Gtk::Stock.add(RABBIT, N_("Rabbit"))
+      begin
+        image_theme = Theme::Searcher.find_theme("rabbit-images", true)
+        file = Theme::Searcher.find_file("lavie-icon.png", [image_theme])
+        loader = ImageLoader.new(file)
+        loader.resize(32, 32)
+        factory = Gtk::IconFactory.new
+        factory.add(RABBIT.to_s, Gtk::IconSet.new(loader.pixbuf))
+        factory.add_default
+      rescue LoadError
+        canvas.logger.warn($!)
+      end
+    end
+  end
+end

data/lib/rabbit/theme-browser.rb

@@ -0,0 +1,104 @@
+require 'gtk2'
+
+require 'rabbit/rabbit'
+require 'rabbit/image'
+require 'rabbit/theme/searcher'
+require 'rabbit/theme-browser/page'
+
+module Rabbit
+  class ThemeBrowser
+    include GetText
+    
+    attr_reader :logger, :themes
+    
+    def initialize(logger, locales, startup_theme=nil)
+      @logger = logger
+      @locales = locales
+      @pages = {}
+      @startup_theme = startup_theme
+      load_themes
+      init_gui
+    end
+    
+    def set_window_size(width, height)
+      @window.set_default_size(width, height)
+      @pages.each_value do |page|
+        page.default_size_changed(width, height)
+      end
+    end
+    
+    def run
+      Document.load_tag_table(@themes)
+      @window.show_all
+      @notebook.page = @init_page_number
+      page.change_tree(@startup_theme, "theme") if @startup_theme
+    end
+    
+    def load_themes
+      Theme::Entry.reload_template
+      @themes = Theme::Searcher.collect_all_theme
+    end
+
+    def page
+      current_locale = @locales[@notebook.page]
+      @pages[current_locale]
+    end
+    
+    private
+    def init_gui
+      init_window
+      current_locale = Locale.get
+      @init_page_number = 0
+      @locales.each_with_index do |locale, i|
+        @init_page_number = i if /#{locale}/ =~ current_locale
+        
+        GetText.locale = current_locale
+        locale_name_for_the_locale = _(locale)
+        GetText.locale = locale
+        page = Page.new(self)
+        @pages[locale] = page
+        label = Gtk::Label.new(locale_name_for_the_locale)
+        @notebook.append_page(page.widget, label)
+      end
+    end
+    
+    def init_window
+      @window = Gtk::Window.new
+      @window.signal_connect("destroy") do
+        Gtk.main_quit
+      end
+      @window.signal_connect("key_press_event") do |widget, event|
+        if event.state.control_mask?
+          case event.keyval
+          when Gdk::Keyval::GDK_q
+            @window.destroy
+          when Gdk::Keyval::GDK_r
+            page.reload
+          end
+        end
+        false
+      end
+      init_icon_list
+      init_notebook
+    end
+
+    def init_icon_list
+      image_theme = Theme::Searcher.find_theme("rabbit-images", true)
+      file = Theme::Searcher.find_file("lavie-icon.png", [image_theme])
+      loader = ImageLoader.new(file)
+      @window.icon_list = [loader.pixbuf]
+    rescue LoadError
+      @logger.warn($!)
+    end
+    
+    def init_notebook
+      @notebook = Gtk::Notebook.new
+      @notebook.signal_connect("switch-page") do |book, page, n|
+        @current_locale = @locales[n]
+        GetText.locale = @current_locale
+        false
+      end
+      @window.add(@notebook)
+    end
+  end
+end

data/lib/rabbit/theme-browser/default-tag.yaml

@@ -0,0 +1,89 @@
+body:
+  size: 10
+  left-margin: 20
+  right-margin: 20
+
+heading1:
+  weight: bold
+  pixels-above-lines: 10
+  pixels-below-lines: 10
+  left-margin: 5
+  size: 20
+
+heading2:
+  pixels-above-lines: 10
+  pixels-below-lines: 5
+  left-margin: 7
+  size: 17
+
+heading3:
+  pixels-above-lines: 10
+  pixels-below-lines: 3
+  left-margin: 10
+  size: 14
+
+item:
+  pixels-above-lines: 2
+  pixels-below-lines: 2
+
+item-content:
+
+link:
+  foreground: blue
+  underline: single
+
+code:
+  family: Monospace
+  foreground: "#2E8B57"
+  weight: bold
+
+variable:
+  family: Monospace
+  foreground: "#ab940e"
+
+description:
+  pixels-below-lines: 4
+
+description-term:
+  family: Monospace
+  size: 12
+  weight: bold
+  pixels-below-lines: 4
+
+description-content:
+  left-margin: 30
+  pixels-below-lines: 8
+
+parameter:
+  pixels-below-lines: 4
+
+parameter-name:
+  foreground: red
+  family: Monospace
+
+parameter-default:
+  foreground: gray
+  family: Monospace
+  style: italic
+
+parameter-description:
+  left-margin: 40
+  right-margin: 40
+
+paragraph:
+
+top-level-paragraph:
+  pixels-above-lines: 5
+
+verbatim-block:
+  left-margin: 40
+  right-margin: 40
+  background: yellow
+
+image:
+  pixels-above-lines: 5
+  pixels-below-lines: 5
+
+image-description:
+  foreground: gray
+

data/lib/rabbit/theme-browser/document.rb

@@ -0,0 +1,200 @@
+require 'English'
+require 'forwardable'
+
+require 'gtk2'
+require "rd/rdfmt"
+
+require 'rabbit/rabbit'
+require 'rabbit/image'
+require 'rabbit/theme/searcher'
+require 'rabbit/theme-browser/rd2document-lib'
+
+module Rabbit
+  class ThemeBrowser
+    class Document
+      extend Forwardable
+      include GetText
+
+      @@tag_table = nil
+      class << self
+        def load_tag_table(themes)
+          @@tag_table = Gtk::TextTagTable.new
+          theme_infos = themes.collect do |entry|
+            ["theme-link-#{entry.name}", {}]
+          end
+          [theme_infos, Tag::INFOS].each do |infos|
+            infos.each do |name, properties|
+              tag = Gtk::TextTag.new(name)
+              properties.each do |key, value|
+                tag.set_property(key, value)
+              end
+              @@tag_table.add(tag)
+            end
+          end
+        end
+      end
+      
+      def_delegators(:@page, :logger)
+
+      attr_reader :view, :name, :type
+      
+      def initialize(page)
+        @page = page
+        @name = nil
+        @type = nil
+        @hovering = false
+        @category_buffers = {}
+        @theme_buffers = {}
+        load_cursor
+        init_gui
+      end
+      
+      def change_buffer(name, type)
+        @name, @type = name, type
+        __send__("change_to_#{type}_buffer", name)
+      end
+      
+      private
+      def init_gui
+        @view = Gtk::TextView.new
+        @view.wrap_mode = Gtk::TextTag::WRAP_WORD
+        @view.editable = false
+        @view.signal_connect("event-after") do |_, *args|
+          event_after(*args)
+        end
+        @view.signal_connect("motion-notify-event") do |_, *args|
+          motion_notify_event(*args)
+        end
+      end
+      
+      def load_cursor
+        @hand_cursor = Gdk::Cursor.new(Gdk::Cursor::HAND2)
+        @regular_cursor = Gdk::Cursor.new(Gdk::Cursor::XTERM)
+      end
+      
+      def update_buffer(name, buffers)
+        buffer = buffers[name]
+        if buffer.nil?
+          buffer = Gtk::TextBuffer.new(@@tag_table)
+          buffers[name] = buffer
+          yield(buffer)
+        end
+        @view.buffer = buffer
+      end
+
+      def rd2document(buffer, iter, source)
+        tree = RD::RDTree.new("=begin\n#{source}\n=end\n")
+        visitor = RD2DocumentVisitor.new(buffer, iter, logger)
+        visitor.visit(tree)
+      end
+      
+      def change_to_category_buffer(name)
+        update_buffer(name, @category_buffers) do |buffer|
+          source = "= #{_(name)}\n"
+          @page.themes.each do |entry|
+            if entry.category == name
+              source << "  * ((<#{_(entry.title)}|#{entry.name}>))\n"
+            end
+          end
+          iter = buffer.start_iter
+          rd2document(buffer, iter, source)
+        end
+      end
+      
+      def change_to_theme_buffer(name)
+        update_buffer(name, @theme_buffers) do |buffer|
+          entry = @page.themes.find {|entry| entry.name == name}
+          iter = buffer.start_iter
+          rd = entry.to_rd
+          if entry.image_theme?
+            rd << "== %s\n" % _("Images")
+            entry.files.each do |name|
+              rd << "\n"
+              rd << "=== #{File.basename(name)}\n"
+              rd << "\n"
+              rd << "  # image\n"
+              rd << "  # src = file://#{name}\n"
+              rd << "  # keep_ratio = true\n"
+              rd << "  # height = 100\n"
+              rd << "\n"
+            end
+          end
+          rd2document(buffer, iter, rd)
+        end
+      end
+      
+      def event_after(event)
+        unless event.kind_of?(Gdk::EventButton) and
+            event.button == 1 and
+            event.event_type == Gdk::Event::BUTTON_RELEASE
+          return false
+        end
+        
+        buffer = @view.buffer
+        range = buffer.selection_bounds
+        if range and range[0].offset != range[1].offset
+          return false
+        end
+        
+        x, y = view.window_to_buffer_coords(Gtk::TextView::WINDOW_WIDGET,
+                                            event.x, event.y)
+        iter = @view.get_iter_at_location(x, y)
+        follow_if_link(iter)
+        false
+      end
+      
+      def follow_if_link(iter)
+        iter.tags.each do |tag|
+          name, type = link_tag_info(tag)
+          if name and type
+            @page.change_tree(name, type)
+            break
+          end
+        end
+      end
+      
+      def set_cursor_if_appropriate(x, y)
+        buffer = @view.buffer
+        iter = @view.get_iter_at_location(x, y)
+        
+        hovering = false
+        
+        iter.tags.each do |tag|
+          if link_tag?(tag)
+            hovering = true
+            break
+          end
+        end
+        
+        if hovering != @hovering
+          @hovering = hovering
+          window = @view.get_window(Gtk::TextView::WINDOW_TEXT)
+          if @hovering
+            cursor = @hand_cursor
+          else
+            cursor = @regular_cursor
+          end
+          window.cursor = cursor
+        end
+      end
+      
+      def motion_notify_event(event)
+        x, y = @view.window_to_buffer_coords(Gtk::TextView::WINDOW_WIDGET,
+                                             event.x, event.y)
+        set_cursor_if_appropriate(x, y)
+        @view.window.pointer
+        false
+      end
+      
+      def link_tag?(tag)
+        /-?link-?/ =~ tag.name
+      end
+      
+      def link_tag_info(tag)
+        if /^(theme|category)-link-/ =~ tag.name
+          [$POSTMATCH, $1]
+        end
+      end
+    end
+  end
+end