rabbit-qt 0.1.0

data/lib/rabbit/theme/document.erb

@@ -0,0 +1,35 @@
+= <%= _(@title) %>
+
+: <%= _("Name") %>
+   <%= @name %>
+
+: <%= _("Category") %>
+   <%= _(category) %>
+
+<% if @abstract %>
+: <%= _("Abstract") %>
+   <%= _(@abstract) %>
+<% end %>
+
+<% if @description %>
+== <%= _("Description") %>
+
+<%= _(@description) %>
+<% end %>
+
+<% unless @dependencies.empty? %>
+== <%= _("Dependency themes") %>
+<%   @dependencies.each do |theme| %>
+  * ((<<%= theme %>>))
+<%   end %>
+<% end %>
+
+<% unless @parameters.empty? %>
+== <%= _("Parameters") %>
+<%   @parameters.each do |name, info| %>
+: ((|<%= name %>|))
+   (<%= _("Default: ") %>(({<%= _(info[:default]) %>})))
+
+   <%= _(info[:description]) %>
+<%   end %>
+<% end %>

data/lib/rabbit/theme/edge-info-toolkit/edge-info-toolkit.rb

@@ -0,0 +1,87 @@
+match(SlideElement) do |slides|
+  slides.each do |slide|
+    singleton_class = class << slide; self; end
+    make_formatted_layout = Proc.new do |props, text|
+      make_layout(span(props, text))
+    end
+    applier = self
+    singleton_class.send(:define_method, :draw_edge_info) do |options|
+      name = options[:name] || "edge-info"
+      add_pre_draw_proc(name) do |canvas, x, y, w, h, simulation|
+        unless simulation
+          line_width = options[:line_width] || screen_y(0.1)
+          line_color = options[:line_color] || "#666"
+          line_params = options[:line_params] || {}
+          left_text = options[:left_text]
+          center_text = options[:center_text]
+          right_text = options[:right_text]
+          text_position = options[:text_position] || :lower
+          text_over_line = options[:text_over_line]
+          text_size = options[:text_size] || screen_size(1.5 * Pango::SCALE)
+          text_color = options[:text_color] || "#666"
+          x_margin = options[:x_margin] || screen_x(1)
+
+          base_y = options[:y] || (canvas.height - applier[:margin_bottom])
+          if text_position == :lower
+            line_y = base_y + (line_width / 2.0).floor
+          else
+            line_y = base_y - (line_width / 2.0).ceil
+          end
+
+          line_width_params = {:line_width => line_width}
+          canvas.draw_line(0, line_y, canvas.width, line_y,
+                           line_color, line_params.merge(line_width_params))
+
+          props = {
+            "font-family" => applier[:font_family],
+            "size" => text_size,
+            "color" => text_color,
+          }
+          left_layout = center_layout = right_layout = nil
+          if left_text and !left_text.empty?
+            left_layout = make_formatted_layout.call(props, left_text)
+          end
+          if center_text and !center_text.empty?
+            center_layout = make_formatted_layout.call(props, center_text)
+            center_layout.alignment = :center
+            center_layout.width = (w - (x_margin * 2)) * Pango::SCALE
+          end
+          if right_text and !right_text.empty?
+            right_layout = make_formatted_layout.call(props, right_text)
+          end
+
+          layouts = [left_layout, center_layout, right_layout].compact
+          unless layouts.empty?
+            max_height = layouts.collect {|layout| layout.pixel_size[1]}.max
+            if text_position == :lower
+              text_space = canvas.height - base_y
+              text_space -= line_width unless text_over_line
+              text_space -= (text_space - max_height) / 2
+              text_base_y = canvas.height - text_space
+            else
+              text_space = base_y
+              text_space -= line_width unless text_over_line
+              text_space -= (text_space - max_height) / 2
+              text_base_y = base_y - text_space
+            end
+
+            if left_layout
+              canvas.draw_layout(left_layout, x_margin, text_base_y)
+            end
+
+            if center_layout
+              canvas.draw_layout(center_layout, x_margin, text_base_y)
+            end
+
+            if right_layout
+              text_width, text_height = right_layout.pixel_size
+              right_text_x = canvas.width - text_width - x_margin
+              canvas.draw_layout(right_layout, right_text_x, text_base_y)
+            end
+          end
+        end
+        [x, y, w, h]
+      end
+    end
+  end
+end

data/lib/rabbit/theme/edge-info-toolkit/property.rb

@@ -0,0 +1,3 @@
+@category = N_("Toolkit")
+@title = N_("Edge Info Toolkit")
+@description = N_("Displays information with line at the edge of slide.")

data/lib/rabbit/theme/emphasize-keyword/emphasize-keyword.rb

@@ -0,0 +1,16 @@
+def emphasize_keyword(target, keyword)
+  to_container(target).substitute_text do |_, text|
+    if /#{keyword}/u =~ text
+      result = text.split(/(#{keyword})/u).collect do |sub_text|
+        if sub_text == keyword
+          Emphasis.new(Text.new(sub_text))
+        else
+          sub_text
+        end
+      end
+      result
+    else
+      text
+    end
+  end
+end

data/lib/rabbit/theme/emphasize-keyword/property.rb

@@ -0,0 +1,4 @@
+@category = N_("Toolkit")
+@title = N_("Emphasize Keyword")
+@description = N_("Provides emphasize_keyword method that markups " \
+                  "specified keyword as emphasis text.")

data/lib/rabbit/theme/enishi-green/enishi-green.rb

@@ -0,0 +1,61 @@
+green_background_color = "#639943"
+green_foreground_color = "#ffffff"
+
+@title_slide_title_font_size = @large_font_size
+@title_slide_subtitle_font_size = @x_small_font_size
+
+include_theme("default")
+
+match(TitleSlide) do |slides|
+  slides.vertical_centering = false
+
+  slides.margin_top = canvas.height * 0.1
+
+  slides.add_pre_draw_proc do |slide, canvas, x, y, w, h, simulation|
+    unless simulation
+      canvas.draw_rectangle(true, 0, 0, canvas.width, canvas.height,
+                            green_background_color)
+    end
+    [x, y, w, h]
+  end
+end
+
+match(TitleSlide, "*") do |elems|
+  elems.horizontal_centering = false
+  elems.prop_set("foreground", green_foreground_color)
+end
+
+match(TitleSlide, Title) do |titles|
+  titles.spacing = canvas.height * 0.075
+end
+
+match(TitleSlide, Subtitle) do |subtitles|
+  subtitles.align = :right
+
+  subtitles.add_pre_draw_proc do |subtitle, canvas, x, y, w, h, simulation|
+    y = canvas.height * 0.3
+    h = canvas.height - y
+    [x, y, w, h]
+  end
+end
+
+match(TitleSlide, Author) do |authors|
+  authors.align = :right
+  authors.prop_set("size", @small_font_size)
+
+  authors.add_pre_draw_proc do |author, canvas, x, y, w, h, simulation|
+    y = canvas.height * 0.8
+    h = canvas.height - y
+    [x, y, w, h]
+  end
+end
+
+match(TitleSlide, Institution) do |authors|
+  authors.prop_set("size", @small_font_size)
+
+  authors.add_pre_draw_proc do |author, canvas, x, y, w, h, simulation|
+    y = canvas.height * 0.8
+    h = canvas.height - y
+    [x, y, w, h]
+  end
+end

data/lib/rabbit/theme/enishi-green/property.rb

@@ -0,0 +1,3 @@
+@category = N_("Theme")
+@title = N_("Enishi Green")
+@description = N_("EnishTech green based theme")

data/lib/rabbit/theme/entry.rb

@@ -0,0 +1,202 @@
+# Copyright (C) 2005-2025  Sutou Kouhei <kou@cozmixng.org>
+#
+# 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.,
+# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+
+require "erb"
+
+require_relative '../rabbit'
+require_relative "../gem-finder"
+require_relative "../theme-configuration"
+
+module Rabbit
+  module Theme
+    class Entry
+      extend ERB::DefMethod
+      
+      include Enumerable
+      include ERB::Util
+      include GetText
+
+      THEME_BASE_NAME = "theme"
+      PROPERTY_BASE_NAME = "property"
+
+      attr_reader :name, :title, :description
+      attr_reader :abstract
+      attr_reader :dependencies, :parameters
+
+      def initialize(theme_dir, name)
+        @theme_dir = theme_dir
+        @name = name
+        @title = @name
+        @category = nil
+        @abstract = nil
+        @description = nil
+        @dependencies = []
+        @parameters = {}
+        parse_property if available?
+      end
+
+      def available?
+        File.readable?(theme_file)
+      end
+
+      def property_editable?
+        File.writable?(property_file)
+      end
+
+      def <=>(other)
+        @name <=> other.name
+      end
+
+      def have_file?(target)
+        File.exist?(full_path(target))
+      end
+
+      def full_path(target)
+        if have_data_dir?
+          File.join(data_dir, target)
+        else
+          # backward compatibility
+          File.join(@theme_dir, target)
+        end
+      end
+
+      def category
+        @category || N_("Etc")
+      end
+
+      def image_theme?
+        have_data_dir?
+      end
+
+      def data_dir
+        File.join(@theme_dir, "data")
+      end
+
+      def files
+        if have_data_dir?
+          Dir.glob(File.join(data_dir, "*")).sort
+        else
+          # backward compatibility
+          rejected_files = [theme_file, property_file]
+          Dir[File.join(@theme_dir, "*")].delete_if do |name|
+            rejected_files.include?(name)
+          end.sort
+        end
+      end
+
+      private
+      def property_file
+        File.join(@theme_dir, "#{PROPERTY_BASE_NAME}.rb")
+      end
+
+      def parse_property
+        file = property_file
+        if File.exist?(file)
+          content = File.open(file) {|f| f.read}
+          begin
+            instance_eval(content, file)
+          rescue SyntaxError
+            Rabbit.logger.warn($!)
+          end
+        end
+      end
+
+      def have_data_dir?
+        File.directory?(data_dir)
+      end
+    end
+
+    class FileEntry < Entry
+      def theme_file
+        File.join(@theme_dir, "#{@name}.rb")
+      end
+    end
+
+    class ImageFileEntry < FileEntry
+      def image_theme?
+        true
+      end
+    end
+
+    class DirectoryEntry < Entry
+      def theme_file
+        File.join(@theme_dir, "#{THEME_BASE_NAME}.rb")
+      end
+
+      def data_dir
+        dedicated_dir = File.join(@theme_dir, "data")
+        if File.directory?(dedicated_dir)
+          dedicated_dir
+        else
+          @theme_dir
+        end
+      end
+    end
+
+    class ImageDirectoryEntry < DirectoryEntry
+      def image_theme?
+        true
+      end
+    end
+
+    class GemEntry < Entry
+      def initialize(name)
+        @spec = nil
+        if valid_gem_name?(name)
+          finder = GemFinder.new
+          begin
+            @spec = finder.find(name, "#{ThemeConfiguration::GEM_NAME_PREFIX}-")
+          rescue Gem::GemNotFoundException
+          end
+        end
+        theme_dir = nil
+        theme_dir = @spec.gem_dir if @spec
+        super(theme_dir, name)
+      end
+
+      def available?
+        @theme_dir and super
+      end
+
+      def theme_file
+        File.join(@theme_dir, "#{THEME_BASE_NAME}.rb")
+      end
+
+      def full_path(target)
+        File.join(data_dir, target)
+      end
+
+      def files
+        Dir.glob(File.join(data_dir, "*")).sort
+      end
+
+      private
+      def valid_gem_name?(name)
+        /\A[a-z\d_\-]+\z/i =~ name
+      end
+    end
+
+    class ImageGemEntry < GemEntry
+      def available?
+        @theme_dir and File.directory?(data_dir)
+      end
+
+      def image_theme?
+        true
+      end
+    end
+  end
+end

data/lib/rabbit/theme/footer-comment/footer-comment.rb

@@ -0,0 +1,74 @@
+theme_exit unless display?
+
+proc_name = "footer-comment"
+
+@footer_comment_color ||= @foreground
+@footer_comment_shadow_color ||= @shadow_color
+@footer_comment_props ||= {
+  "size" => (@x_small_font_size * 0.5).ceil,
+  "font_family" => @font_family,
+  "color" => @footer_comment_color,
+  "shadow-color" => @footer_comment_shadow_color,
+}
+@footer_comment_padding ||= {
+  :left => 3 * @space,
+  :right => 3 * @space,
+  :bottom => (@space * 0.5).ceil,
+}
+@footer_comment_min_display_time ||= 1
+@footer_comment_keep_last_comment ||= false
+
+match(SlideElement) do |slides|
+  slides.delete_post_draw_proc_by_name(proc_name)
+  canvas.delete_on_comment_proc_by_name(proc_name)
+
+  break if @footer_comment_uninstall
+
+  comments = []
+  canvas.on_comment(proc_name) do |comment|
+    if comments.empty?
+      GLib::Timeout.add_seconds(@footer_comment_min_display_time) do
+        canvas.activate("Redraw")
+        not comments.empty?
+      end
+    end
+    comments << comment
+  end
+
+  redraw_time = nil
+  slides.add_post_draw_proc(proc_name) do |slide, canvas, x, y, w, h, simulation|
+    unless simulation
+      unless comments.empty?
+        redraw_time ||= Time.now
+        content = comments.first
+        text = Text.new(ERB::Util.h(content.strip.gsub("\n", " ")))
+        if Time.now - redraw_time > @footer_comment_min_display_time
+          redraw_time = nil
+          if @footer_comment_keep_last_comment
+            comments.shift if comments.size > 1
+          else
+            comments.shift
+          end
+        end
+        set_font_family(text)
+        text.font @footer_comment_props
+        text.padding_with @footer_comment_padding
+        text.compile(canvas, x, y, w, h)
+
+        # set horizontal
+        text_x = x
+        text_w = w - text.padding_left - text.padding_right
+        text.compile(canvas, text_x, y, text_w, h)
+
+        # set vertical
+        text_y = canvas.height - slide.margin_bottom - slide.padding_bottom
+        text_y -= text.height
+        text_h = h - text.height
+        text.compile(canvas, text_x, text_y, text_w, text_h)
+
+        text.draw
+      end
+    end
+    [x, y, w, h]
+  end
+end

data/lib/rabbit/theme/footer-comment/property.rb

@@ -0,0 +1,3 @@
+@category = N_("Comment")
+@title = N_("Footer Comment")
+@description = N_("Show comment on the footer.")

data/lib/rabbit/theme/footer-logo/footer-logo.rb

@@ -0,0 +1,30 @@
+proc_name = "footer-logo"
+
+if @footer_logo_image.nil?
+  theme_exit("must specify @footer_logo_image!!")
+end
+@footer_logo_keep_ratio = true if @footer_logo_keep_ratio.nil?
+@footer_logo_margin_right ||= @margin_right
+@footer_logo_margin_bottom ||= @margin_bottom + screen_y(1)
+@footer_logo_uninstall ||= false
+
+match(SlideElement) do
+  delete_pre_draw_proc_by_name(proc_name)
+
+  break if @footer_logo_uninstall
+
+  loader = ImageLoader.new(find_file(@footer_logo_image))
+  loader.keep_ratio = @footer_logo_keep_ratio
+  available_w = canvas.width - @footer_logo_margin_right
+  available_h = canvas.height - @footer_logo_margin_bottom
+  add_pre_draw_proc(proc_name) do |slide, canvas, x, y, w, h, simulation|
+    if simulation
+      loader.resize(available_w * 0.1, available_h * 0.1)
+    else
+      loader.draw(canvas,
+                  available_w - loader.width,
+                  available_h - loader.height)
+    end
+    [x, y, w, h]
+  end
+end

data/lib/rabbit/theme/footer-logo/property.rb

@@ -0,0 +1,26 @@
+@category = N_("Toolkit")
+@title = N_("Footer Logo")
+@abstract = N_("Toolkit to display an image as logo at the footer")
+@description = N_("Displays an image as a logo at the footer of slides.")
+@parameters = {
+  "@footer_logo_image" => {
+    :default => N_("(Must be specified.)"),
+    :description => N_("Image file name."),
+  },
+  "@footer_logo_keep_ratio" => {
+    :default => "true",
+    :description => N_("Whether keep ratio of an image or not."),
+  },
+  "@footer_logo_margin_right" => {
+    :default => "@margin_right",
+    :description => N_("Right margin of an image."),
+  },
+  "@footer_logo_margin_bottom" => {
+    :default => "@margin_bottom + screen_y(1)",
+    :description => N_("Bottom margin of an image."),
+  },
+  "@footer_logo_uninstall" => {
+    :default => "false",
+    :description => N_("Whether uninstall this theme or not."),
+  },
+}

data/lib/rabbit/theme/green-circle/green-circle.rb

@@ -0,0 +1,14 @@
+@color_circle_foreground = "black"
+@color_circle_background = "white"
+
+@color_circle_color = "#6fd195"
+@color_circle_light_color = "#d2ffe2"
+@color_circle_bright_color ="#dfffec"
+
+@color_circle_graffiti_color = "green"
+
+# add_image_path("rabbit-images")
+# @color_circle_open_quote_image = "open-quote-green.png"
+# @color_circle_close_quote_image = "close-quote-green.png"
+
+include_theme("color-circle")

data/lib/rabbit/theme/green-circle/property.rb

@@ -0,0 +1,3 @@
+@category = N_("Theme")
+@title = N_("Green Circle")
+@description = N_("Green Circle theme")

data/lib/rabbit/theme/headline-logo/headline-logo.rb

@@ -0,0 +1,24 @@
+proc_name = "headline-logo"
+
+if @headline_logo_image.nil?
+  theme_exit("must specify @headline_logo_image!!")
+end
+
+match("**", HeadLine) do |heads|
+
+  loader = ImageLoader.new(find_file(@headline_logo_image))
+
+  heads.each do |head|
+    head.delete_pre_draw_proc_by_name(proc_name)
+    head.delete_post_draw_proc_by_name(proc_name)
+
+    head.add_pre_draw_proc(proc_name) do |canvas, x, y, w, h, simulation|
+      if simulation
+        loader.resize(nil, head.height)
+      else
+        loader.draw(canvas, x + w - loader.width, y)
+      end
+      [x, y, w, h]
+    end
+  end
+end

data/lib/rabbit/theme/headline-logo/property.rb

@@ -0,0 +1,10 @@
+@category = N_("Toolkit")
+@title = N_("HeadlineLogo")
+@abstract = N_("Toolkit to display an image as a logo at the headlines")
+@description = N_("Displays an image as a logo at the headlines of slides.")
+@parameters = {
+  "@headline_logo_image" => {
+    :default => N_("(Must be specified.)"),
+    :description => N_("Image file name."),
+  },
+}

data/lib/rabbit/theme/icon/icon.rb

@@ -0,0 +1,3 @@
+# warn("icon theme is deprecated. " +
+#      "You can't set custom window icon. " +
+#      "Please remove 'include_theme(\"icon\")'.")

data/lib/rabbit/theme/icon/property.rb

@@ -0,0 +1,24 @@
+@category = N_("Toolkit")
+@title = N_("Icon")
+@abstract = N_("Toolkit to specify an image or images as icons")
+@description = N_("Specifies an image or images as icons of the window, " \
+                  "which will be used by some window managers and desktop " \
+                  "environments, for example when the window is minimized " \
+                  "(or 'iconified'), in the window frame, or when windows " \
+                  "are switched. " \
+                  "The specified image or images are automatically scaled " \
+                  "to the icon sizes case by case. " \
+                  "When several images are specified and they have " \
+                  "different sizes, an image with the most similar size to " \
+                  "that of icon among them is chosen and scaled in order to " \
+                  "improve the quality of image finally displayed.")
+@parameters = {
+  "@icon_image" => {
+    :default => "[]",
+    :description => N_("List of image file names."),
+  },
+  "@icon_images" => {
+    :default => "nil",
+    :description => N_("Image file name."),
+  },
+}