rabbit 0.6.2

data/lib/rabbit/theme/scroll-effect/property.rb

@@ -0,0 +1,3 @@
+@category = N_("Effect")
+@title = N_("Scroll Effect")
+@description = N_("Provide scroll_effect method that scrolls content.")

data/lib/rabbit/theme/scroll-effect/scroll-effect.rb

@@ -0,0 +1,32 @@
+def scroll_effect(target, options={})
+  proc_name = options[:proc_name] || "scroll-effect"
+
+  target.delete_post_draw_proc_by_name(proc_name)
+
+  return if options[:uninstall]
+
+  idle_id = nil
+  effected = false
+  slided_x = nil
+  target.add_around_draw_proc(proc_name) do |canvas, x, y, w, h, simulation,
+                                             next_proc|
+    canvas.save_context do
+      if !simulation and !effected
+        slided_x ||= w
+        slided_x = [slided_x - (w / 10), 0].max
+        canvas.translate_context(slided_x, 0)
+        idle_id ||= Gtk.idle_add do
+          continue = !slided_x.zero?
+          unless continue
+            idle_id = nil
+            slided_x = nil
+            effected = true
+          end
+          canvas.activate("Redraw")
+          continue
+        end
+      end
+      next_proc.call(canvas, x, y, w, h, simulation)
+    end
+  end
+end

data/lib/rabbit/theme/searcher.rb

@@ -0,0 +1,120 @@
+require 'rabbit/theme/entry'
+
+module Rabbit
+  module Theme
+    module Searcher
+      def initialize(*args, &blocks)
+        @theme_stack = []
+        @image_entries = []
+        super
+      end
+
+      def push_theme(entry)
+        @theme_stack.push(entry)
+      end
+
+      def pop_theme
+        @theme_stack.pop
+      end
+
+      def in_theme(entry)
+        push_theme(entry)
+        yield(entry)
+      ensure
+        pop_theme
+      end
+
+      def add_image_path(name)
+        @image_entries << find_theme(name, true)
+      end
+
+      # for backward compatibility
+      alias add_theme_path add_image_path
+      
+      module_function
+      def theme_dir(base_dir)
+        File.join(base_dir, 'rabbit', 'theme')
+      end
+      
+      def image_dir(base_dir)
+        File.join(base_dir, 'rabbit', 'image')
+      end
+
+      def find_theme(theme_name=name, only_image=false)
+        if only_image
+          collector = "collect_image_theme"
+        else
+          collector = "collect_all_theme"
+        end
+        found_entry = nil
+        __send__(collector) do |entry|
+          if theme_name == entry.name
+            found_entry = entry
+            break
+          end
+        end
+        raise LoadError, "can't find theme: #{theme_name}." if found_entry.nil?
+        found_entry
+      end
+
+      def find_file(target, themes=nil)
+        themes ||= @theme_stack + @image_entries
+        found_entry = themes.find do |entry|
+          entry.have_file?(target)
+        end
+        if found_entry.nil?
+          names = themes.collect {|entry| entry.name}
+          raise LoadError,
+                "can't find file in themes #{names.inspect}: #{target}."
+        end
+        found_entry.full_path(target)
+      end
+
+      def collect_all_theme(&block)
+        theme_names = {}
+        themes = []
+        callback = Proc.new do |entry|
+          unless theme_names.has_key?(entry.name)
+            theme_names[entry.name] = true
+            themes << entry
+            block.call(entry) if block
+          end
+        end
+        collect_image_theme(&callback)
+        collect_theme(&callback)
+        themes.sort
+      end
+
+      def collect_theme(&block)
+        _collect_theme($LOAD_PATH, &block)
+      end
+
+      def collect_image_theme(&block)
+        _collect_theme(Config::IMAGE_PATH + $LOAD_PATH,
+                       "image_dir", :image, &block)
+      end
+      
+      def _collect_theme(path, converter=nil, type=nil, &block)
+        converter ||= "theme_dir"
+        themes = []
+        theme_name = {}
+        path.each do |dir|
+          base_name = __send__(converter, dir)
+          if File.directory?(base_name)
+            Dir.foreach(base_name) do |theme|
+              next if /\A..?\z/ =~ theme
+              entry = Entry.new(File.join(File.expand_path(base_name), theme),
+                                type)
+              if entry.available? and !theme_name.has_key?(theme)
+                block.call(entry) if block
+                themes << entry
+                theme_name[theme] = true
+              end
+            end
+          end
+        end
+        themes.sort
+      end
+    end
+  end
+end

data/lib/rabbit/theme/show-frame/property.rb

@@ -0,0 +1,16 @@
+@category = N_("Debug")
+@title = N_("ShowFrame")
+@abstract = N_("Debug toolkit to show element frames")
+@description = N_("Show element frames useful for debug.")
+@parameters = {
+  "@show_frame_color" => {
+    :default => "'blue'",
+    :description => N_("Frame color."),
+  },
+  "@show_frame_uninstall" => {
+    :default => "nil",
+    :description => N_("Whether uninstalling this toolkit or not. " \
+                       "This option is useful for cases you do not want to " \
+                       "make the toolkit work for certain slides."),
+  },
+}

data/lib/rabbit/theme/show-frame/show-frame.rb

@@ -0,0 +1,17 @@
+proc_name = "show-frame"
+
+@show_frame_color ||= "blue"
+
+match("**") do
+  delete_pre_draw_proc_by_name(proc_name)
+  delete_post_draw_proc_by_name(proc_name)
+
+  break if @show_frame_uninstall
+  
+  params = {
+    :proc_name => proc_name,
+    :frame_color => @show_frame_color,
+  }
+  
+  draw_frame(params)
+end

data/lib/rabbit/theme/simple-item-mark/property.rb

@@ -0,0 +1,5 @@
+@category = N_("Toolkit")
+@title = N_("SimpleItemMark")
+@abstract = N_("Toolkit to display simple black circles as list item marks")
+@description = N_("Displays simple black circles at the head of list items.")
+@dependencies = %w(default-item-mark)

data/lib/rabbit/theme/simple-item-mark/simple-item-mark.rb

@@ -0,0 +1,112 @@
+include_theme("default-item-mark")
+
+slide_body = [Slide, Body]
+
+item_list_item = [ItemList, ItemListItem]
+
+match(*(slide_body + (item_list_item * 1))) do |items|
+  name = "item1"
+  
+  mark_width = screen_x(2)
+  mark_height = screen_y(2)
+  indent_width = mark_width * 3
+  color = "black"
+
+  items.delete_pre_draw_proc_by_name(name)
+  items.delete_post_draw_proc_by_name(name)
+  
+  draw_mark(items, indent_width, mark_width, mark_height, name) do
+    |item, canvas, x, y, w, h|
+    x -= mark_width
+    canvas.draw_circle(true, x, y, w, h, color)
+  end
+
+  space = @space * (3 / 4.0)
+  items.margin_bottom = space
+end
+
+match(*(slide_body + (item_list_item * 2))) do |items|
+  name = "item2"
+  
+  mark_width = screen_x(1.5)
+  mark_height = screen_y(1.5)
+  indent_width = mark_width * 3
+  color = "black"
+  
+  items.delete_pre_draw_proc_by_name(name)
+  items.delete_post_draw_proc_by_name(name)
+  
+  draw_mark(items, indent_width, mark_width, mark_height, name) do
+    |item, canvas, x, y, w, h|
+    x -= mark_width
+    canvas.draw_circle(true, x, y, w, h, color)
+  end
+
+  space = @space * (2 / 4.0)
+  items.margin_bottom = space
+end
+
+match(*(slide_body + (item_list_item * 3))) do |items|
+  name = "item3"
+  
+  mark_width = screen_x(1.0)
+  mark_height = screen_y(1.0)
+  indent_width = mark_width * 3
+  color = "black"
+  
+  items.delete_pre_draw_proc_by_name(name)
+  items.delete_post_draw_proc_by_name(name)
+  
+  draw_mark(items, indent_width, mark_width, mark_height, name) do
+    |item, canvas, x, y, w, h|
+    x -= mark_width
+    canvas.draw_circle(true, x, y, w, h, color)
+  end
+
+  space = @space * (1 / 4.0)
+  items.margin_bottom = space
+end
+
+enum_list_item = [EnumList, EnumListItem]
+
+match(*(slide_body + enum_list_item + item_list_item)) do |items|
+  name = "enum-item1"
+  
+  mark_width = screen_x(1.5)
+  mark_height = screen_y(1.5)
+  indent_width = mark_width * 3
+  color = "black"
+
+  items.delete_pre_draw_proc_by_name(name)
+  items.delete_post_draw_proc_by_name(name)
+  
+  draw_mark(items, indent_width, mark_width, mark_height, name) do
+    |item, canvas, x, y, w, h|
+    x -= mark_width
+    canvas.draw_circle(true, x, y, w, h, color)
+  end
+
+  space = @space * (2 / 4.0)
+  items.margin_bottom = space
+end
+
+match(*(slide_body + enum_list_item + (item_list_item * 2))) do |items|
+  name = "enum-item2"
+  
+  mark_width = screen_x(1.0)
+  mark_height = screen_y(1.0)
+  indent_width = mark_width * 3
+  color = "black"
+
+  items.delete_pre_draw_proc_by_name(name)
+  items.delete_post_draw_proc_by_name(name)
+  
+  draw_mark(items, indent_width, mark_width, mark_height, name) do
+    |item, canvas, x, y, w, h|
+    x -= mark_width
+    canvas.draw_circle(true, x, y, w, h, color)
+  end
+
+  space = @space * (1 / 4.0)
+  items.margin_bottom = space
+end

data/lib/rabbit/theme/slide-background-image/property.rb

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

data/lib/rabbit/theme/slide-background-image/slide-background-image.rb

@@ -0,0 +1,25 @@
+proc_name = "slide-background-image"
+
+if @slide_background_image.nil?
+  theme_exit("must specify @slide_background_image!!")
+end
+
+match(Slide) do |slides|
+  loader = ImageLoader.new(find_file(@slide_background_image))
+  resized = false
+
+  slides.delete_pre_draw_proc_by_name(proc_name)
+
+  slides.add_pre_draw_proc(proc_name) do |slide, canvas, x, y, w, h, simulation|
+    unless simulation
+      unless loader.nil?
+        unless resized
+          loader.resize(canvas.width, canvas.height)
+          resized = true
+        end
+        loader.draw(canvas, 0, 0)
+      end
+    end
+    [x, y, w, h]
+  end
+end

data/lib/rabbit/theme/slide-background/property.rb

@@ -0,0 +1,6 @@
+@category = N_("Backward compatibility")
+@title = N_("SlideBackground")
+@abstract = N_("Backward compatibility theme for ((<slide-background-image>))")
+@description = N_("See ((<slide-background-image>))")
+@parameters = {
+}

data/lib/rabbit/theme/slide-background/slide-background.rb

@@ -0,0 +1,3 @@
+format = _("%s is deprecated. Use %s instead.")
+warning(format % ["slide-background", "slide-background-image"])
+include_theme("slide-background-image")

data/lib/rabbit/theme/slide-footer-info/property.rb

@@ -0,0 +1,43 @@
+@category = N_("Toolkit")
+@title = N_("Slide Footer Info")
+@abstract = N_("Toolkit to display information at the footer")
+@description = N_("Displays information with a line at the footer of slides.")
+@parameters = {
+  "@slide_footer_info_line_color" => {
+    :default => "#666",
+    :description => N_("Line color."),
+  },
+  "@slide_footer_info_line_width" => {
+    :default => "screen_y(0.1)",
+    :description => N_("Line width."),
+  },
+  "@slide_footer_info_line_pattern" => {
+    :default => N_("white <-> black gradation"),
+    :description => N_("Line fill pattern. @slide_footer_info_line_color " \
+                       "is ignored if this parameter is specified."),
+  },
+  "@slide_footer_info_text_size" => {
+    :default => "screen_size(1.5 * Pango::SCALE)",
+    :description => N_("Text size."),
+  },
+  "@slide_footer_info_x_margin" => {
+    :default => "screen_x(1)",
+    :description => N_("x-axis margin."),
+  },
+  "@slide_footer_info_text_color" => {
+    :default => "#666",
+    :description => N_("Text color."),
+  },
+  "@slide_footer_info_text_over_line" => {
+    :default => "false",
+    :description => N_("Whether show a text over line or not."),
+  },
+  "@slide_footer_info_base_y" => {
+    :default => "canvas.height - @margin_bottom",
+    :description => N_("Base y-axis position to stroke line."),
+  },
+  "@slide_footer_info_uninstall" => {
+    :default => "false",
+    :description => N_("Whether uninstall this theme or not."),
+  }
+}

data/lib/rabbit/theme/slide-footer-info/slide-footer-info.rb

@@ -0,0 +1,42 @@
+name = "slide-footer-info"
+
+@slide_footer_info_line_color ||= "#666"
+@slide_footer_info_line_width ||= screen_y(0.1)
+@slide_footer_info_line_params ||= {
+  :pattern => {
+    :base => [0, 0, canvas.width, 0],
+    :type => :linear,
+    :color_stops => [
+                     [0.0, 1, 1, 1],
+                     [0.3, 0, 0, 0],
+                     [0.7, 0, 0, 0],
+                     [1.0, 1, 1, 1],
+                    ],
+  }
+}
+@slide_footer_info_text_size ||= screen_size(1.5 * Pango::SCALE)
+@slide_footer_info_x_margin ||= screen_x(1)
+@slide_footer_info_text_color ||= "#666"
+@slide_footer_info_text_over_line ||= false
+@slide_footer_info_base_y ||= canvas.height - @margin_bottom
+
+include_theme("edge-info-toolkit")
+
+match(SlideElement) do
+  delete_pre_draw_proc_by_name(name)
+
+  break if @slide_footer_info_uninstall
+
+  draw_edge_info(:name => name,
+                 :line_width => @slide_footer_info_line_width,
+                 :line_color => @slide_footer_info_line_color,
+                 :line_params => @slide_footer_info_line_params,
+                 :left_text => @slide_footer_info_left_text,
+                 :right_text => @slide_footer_info_right_text,
+                 :text_position => :lower,
+                 :text_over_line => @slide_footer_info_text_over_line,
+                 :text_size => @slide_footer_info_text_size,
+                 :text_color => @slide_footer_info_text_color,
+                 :x_margin => @slide_footer_info_x_margin,
+                 :y => @slide_footer_info_base_y)
+end